#include "stdafx.h"
#include "astar1.h"



struct cmp{
	inline bool operator()(const int & a, const int & b) const{
		if(open[a].val == open[b].val)
			return open[a].step > open[b].step;		
		return open[a].val > open[b].val;
	}
};

CString ASTAR1::getIntroduction(){
	CString intro = "A*搜索算法\r\n\r\n"
					"f(x) = g(x) + h(x)，\r\n"
					"其中g(x)為搜索深度\r\n"
					"h(x)為所有圖片到達目的地的曼哈頓距離之和，\r\n"
					"在h(x)系數為1的情況下保證為最優解";

	return intro;
}

int ASTAR1::search(int begin, int end, int &stop, int val){
	if((getreverse(begin) & 1) != (getreverse(end) & 1) ){  //逆序數不一樣，無解
		result = NOANSWER;
		return -1;
	}
	std::priority_queue<int, std::vector<int>, cmp> Q;
	result = SUCCESS;	
	open[0].father = -1;
	open[0].step = 0;
	open[0].status = begin;	
	open[0].val = reset(begin, end) * val;
	int index, tmp;
	for(index = 0, tmp = begin; tmp % 10; ++index, tmp /= 10);
	open[0].zero = index;
	Q.push(top = 0);
	tree.reset();
	tree.add(begin);
	while(!stop && !Q.empty()){
		index = Q.top();
		Q.pop();
		if(open[index].status == end){
			last_index = index;
			totalnode = top;
			expanded = top + 1 - Q.size();
			inopen = Q.size();
			return 1;
		}
		int zero = open[index].zero;
		for(int i = 0; i < dir_count[zero]; i++){				
			int tmp = getnextstatus(open[index].status, zero, dir[zero][i]);
			if(tree.add(tmp) ){
				open[++top].father = index;
				open[top].status = tmp;
				open[top].step = open[index].step + 1;
				open[top].zero = dir[zero][i];
				if(!val)
					open[top].val = open[top].step;
				else
					open[top].val = (getval(tmp, (open[index].val - open[index].step) / val, zero, dir[zero][i]) * val)
						+ open[top].step;				
				Q.push(top);
			}
		}
	}

	expanded = top + 1 - Q.size();
	inopen = Q.size();
	if(stop){
		result = STOP;
		return -2;
	}
	result = CANTFIND;
	return 0;
}