#include "stratego.h"
#include <conio.h>
#define SKRIV printf
#define LOCATE gotoxy
sattautpjaser()
{
	int spelare;
/*inledning(2);*/
	for(spelare=0;spelare<2;spelare++){
		speltur(spelare);
		textcolor(spelplansfarg);
		gotoxy(28,25);
		cprintf("Pj„suppst„llning f”r spelare: %d",spelare+1);
		skrivplan();
		reenter(spelare);
		pjasut(26,(spelare+1)*4*(spelare+1),spelare);
	} /* for */
}

pjasut(x,y,spelare)
int x,y,spelare;
{
	extern char ruta[10][10][2];
	extern xlage,ylage;
	const char sym[]={' ','â','\xF','G','™','*','K','L','S','M','ě','ţ','é','#','@'};
	int pjaser=2,count2=1,loptrue=0,gamcount2=0,gamx,gamy,tg,ok,r[2],
		pjaskvar[]={1,1,1,2,3,4,4,4,5,8,1,6};
	if(spelare==1){
		xlage=0;
		ylage=6;
	}
	for(;pjaser>=0;pjaser--){
		LOCATE(1,3);
		cprintf("Pj„ser kvar: %2d",pjaser+1);
		LOCATE(1,4);
		SKRIV("Val av pj„s:       ");
		LOCATE(1,5);
		SKRIV("\30 & \31 byter pj„s  ");
		LOCATE(1,6);
		SKRIV("och return v„ljer ");
		LOCATE(1,7);
		SKRIV("                  ");
		while(!loptrue){
			gotoxy(1,8);
			cprintf("                  ");
			gotoxy(65,count2*2);
			cprintf("%1d ->",pjaskvar[count2-1]);
			gamcount2=count2;
			gotoxy(14,4);
			putch(sym[count2]);
			switch(bioskey(0)){
				case 7181:  if(pjaskvar[count2-1]>0){
											loptrue=true;
											break;
										}
				case 20480: count2=++count2>12?1:count2;
										break;
				case 18432: count2=--count2<1?12:count2;
										break;
				case 15104: hjalp(1,1);
										break;
				}
			gotoxy(65,gamcount2*2);
			cprintf("    ");
		}/* while */
/* DEL 2  UTSŽTTNING AV PJŽSET version 2 klar */
		gotoxy(1,4);
 		cprintf("Uts„ttning av pj„s:");
		gotoxy(1,5);
		cprintf("pilarna flytar    \n\015");
		cprintf("pj„sen och return");
		gotoxy(1,7);
		cprintf("s„tter ut den.");
		pjaskvar[count2-1]--;
		while(loptrue){
			textcolor(14);
			if(pjaskvar[count2-1]<=0){
				gotoxy(px+45,count2*2+1);
				cprintf("Pj„sen slut");
				} /* if */
			if(ruta[xlage][ylage][spelare]==0){
				gotoxy(1,8);
				cprintf("                   ");
			}
			if(ruta[xlage][ylage][spelare]>0){
				textcolor(5);
				gotoxy(1,8);
				cprintf("OBS ! Pj„s under ! ");
			}
			gotoxy(x,y);
			gamx=x;
			gamy=y;
			textcolor(10);
			putch(sym[count2]);
			if(spelare==0){
				r[0]=1;
				r[1]=4;
				}
				else{
				r[0]=7;
				r[1]=10;
				}
			cursor(&x,&y,12,&ok,&tg,r);
			switch(tg){
				case 7181: if(ruta[xlage][ylage][spelare]>0){
										 pjaskvar[(ruta[xlage][ylage][spelare])-1]++;
										 gotoxy(px+45,(ruta[xlage][ylage][spelare]*2)+1);
										 pjaser++;
										 cprintf("           ");
									 }
									 ruta[xlage][ylage][spelare]=count2;
									 ruta[xlage][ylage][!spelare]=13;
									 loptrue=0;
									 break;
				case 283:  pjaser++;
									 pjaskvar[count2-1]++;
									 loptrue=0;
									 gotoxy(px+45,count2*2+1);
									 cprintf("           ");
									 break;
			} /* switch */
			textcolor(spelplansfarg);
			gotoxy(gamx,gamy);
			putch(sym[ruta[mx(gamx)][my(gamy)][spelare]]);
		} /* while */
	}/* for */
}/* pjasut */