Programmeringstävling #2

Ser inte ut som det blir några fler som röstar, tar mig därför friheten att räkna ihop rösterna:

1.  Asimov	(savje)		- Kalaha
7.  Boten	(ChristofferC)	- Sänka Skepp
8.  La Bot	(Cirux)		- Sänka Skepp
9.  TOb 	(wpr21)		- Blank
10. Youbot	(You)		- Kalaha
11. hbot	(vb)		- \x -> y   (?)
12. dumbo	(Aqualize)	- Kalaha
-----------------------------------------------

Kalaha		- 3 röster
Sänka Skepp	- 2 röster
\x -> y		- 1 röst
Blanka röster	- 1

Med andra ord vann kalaha röstningen och kommer bli spelet som spelas. Jag smygstartade lite på kalaha protokollet, ni hittar det här http://www.poker-solitaire.com/bottav/protocol001.txt. Så nu är det bara att börja! Ska försöka skriva ihop ett förslag till server och C# skal-klient så snabbt som möjligt. Självklart är det inte försent att hoppa på tävlingen, men man kan då självklart inte påverka vilket spel som ska spelas i denna omgång.

Tog dom reglerna jag uppfattade som mest vedertagna, men inget är skrivet i sten så klart om någon skulle vilja göra en ändring

Jupp skriver i .NET 2.0.

Personligen ser jag inget problem med att ställa upp med flera botar, dock kan man begränsa det lite genom att säga att man endast får ställa upp med fler botar om dom är skrivna i olika språk och helst spelar på olika sätt... Men men vad tycker ni andra?

hunden: Tyvärr är det försent nu, deadlinen är som sagt redan passerad. Synd att du inte sa till tidigare så skulle någon kunna berätta hur man röstade. Hoppas du är med i tävlingen ändå.

Är typ halvvägs klar med servern nu, med lite tur kommer en första version ut i natt

Jo då, det går bra... Servern och skal-klienten blev jag klar med i natt, dock finns en ganska stor bugg i servern som jag inte har lyckats lösa än (den tar av någon mysterium inte emot pongar från klienter som den har skickat ping till två gånger i rad :/). Sen vet jag inte hur det funkar om man kör fler bord samtidigt, men känns som ett framtida problem... Men ska se till att fixa buggen...

Har tyvärr inte möjlighet att sätta upp en server, plus att som den är utformad just nu så måste man starta servern manuellt... men när server är tillräckligt buggfri (har lokaliserat buggen nu) så slänger jag upp den så ni kan kölra servern själva... (och ansluta lokalt via ip 127.0.0.1)

Edit: Sååå! Äntligen klart! Servern funkar som den ska (även om den stannar upp en kort stund ibland, ingen anning om varför... men det märks knappt). Och ett klient-skal finns redo och bör fungera utan problem. Jag har försökt göra så bra buggtestning som möjligt men som alltid kan man inte vara säker...

Ni hittar grejerna här: http://www.poker-solitaire.com/bottav/Kalaha.zip

I filen finns dels källkoden till servern och skal klienten, dels den byggda servern ("BotServer"), en mycket simpel färdig bot som ni kan köra mot er egna ("ExempelBot") och ett program så man kan spela själv via servern ("Manuell Klient"). ExempelBot och Manuell Klient slumpar fram sitt id så ni kan starta fler och koppla upp samtidigt mot servern. Manuell Klient fungerar så att ni skriver in nummret som finns under brädet när det skrivs ut (kolla på pilen för att se vilka ambor som är era och kom ihåg att spelet går moturs!).

Servern är mycket lättskött, vänta till alla som ska ansluta har anslutit och loggat in, sen skriver du "start" och trycker på enter. Servern startar då spelet och sätter varje klient med en annan klient (dock om det är ojämt antal klienter får en slumpvald inte spela) och låter dom spela 20 spel mot varandra. Orkar inte förklara källkoden till servern men om det är någon som vill pilla och undrar något är det bara och fråga.

Skal-klienten är inte speciellt krånglig. Det man som AI-programmerare ska koncentrera sig på är "Game" klassen. Där finns en mängd funktioner som körs när servern skickar vissa meddelanden. Av dessa funktioner är nog "RequestMove" den viktigaste, den ger nämligen vilket drag man gör... Man kan skriva en bot endast genom att ändra den funktionen (se nedan). Men det mesta står kommenterat i källkoden för Game-klassen. Vidare är det viktigt att du skriver in din bots namn och id. Detta gör du i "Controller" klassen, ändra (högst upp) [botId] till din bots id# och [botName] till din bots namn. Vidare finns en mängd paramentrar (i form av bool variablar, [writeBoard], [showServerMessages] osv.) angående vad boten ska skriva ut för meddelanden, står kommenterat vad varje paramenter styr... Utöver det så ska man nog inte pilla runt i Controller-klassen om man inte vet vad man håller på med :).

Som sagt kan man skriva en bot endast genom att ändra på "RequestMove" funktionen, här följer två exempel.

Första exemplet är en otroligt simpel bot (precis den som finns i huvudmappen som "ExempelBot"):

public int RequestMove(bool lastWasInvalid)
{
	int bestMove = -1;
	int bestValue = 0;
	for (int n = this.myPosition * 7; n < 6 + this.myPosition * 7; n++)
	{
		if (bestValue < this.board[n])
		{
			bestMove = n;
			bestValue = this.board[n];
		}
	}
	return bestMove;
}

Andra exemplet förvandlar programmet till ett program som gör att användaren kan spela (precis den som finns i huvudmappen som "Manuell Klient"), kan vara en bra idé att sätta [writeBoard] (i Controller-klassen) till true i detta fall:

public int RequestMove(bool lastWasInvalid)
{
	Console.Write("Please make move: ");
	int move = Convert.ToInt32(Console.ReadLine());
	if (this.myPosition == 0)
	{
		return (move - 1);
	}
	else
	{
	return 13 - move;
	}
}

Så tror det ska vara allt, hoppas det funkar... om det inte gör det, säg till

Oj, F# hade jag aldrig hört talas om... Snart klar med första versionen av min egna bot... Lägger kanske upp den för allmän beundran ( ) snart

Nej nej, klart jag inte lägger upp koden till min bot (skulle ju nästan vara fusk), menade att jag lägger upp min bot kompilerad (ni får beundra den genom att den krossar era )... Är väl iprincip djupsökning men med några små extra finesser... ni hittar första versionen här http://www.poker-solitaire.com/bottav/Asimov.zip

Är lite sugen på att göra en bot framtagen med någon typ av genetisk algoritm måste klura lite hur man kan lösa det..

String s = Integer.toHexString( 0x100 | (0x0ff & length) ).substring(1);

Antar att du skriver i java. Tyvärr kan jag ingen java, men alltså checkbyten är en byte i början av ett meddelande, dvs. ett tecken om man skulle läsa det som ASCII. Så i C skulle koden som tar fram checkbyten se ut så här:

char getCheckByte(char* message)
{
	int length;
	for(length = 0; message[length]!= '\\0'; length++) { }
	return (char)length;
}

Där [message] är en \0 terminerad char-array

Edit: Vet inte om det hjälper, men så här löste jag det i klienten jag skrev. C# är ju ganska likt Java..:

string messageToSend = "BLABLA:blabla:blabla\r\n";						  //Meddelandet som ska skickas
byte[] bufferMessage = Encoding.ASCII.GetBytes(messageToSend);	 //Konvertera det till bytes
byte[] buffer = new byte[1];															//Skapar checkByten
buffer = BitConverter.GetBytes(bufferMessage.Length);					 //Sätter checkByten till rätt värde
this.networkStream.Write(buffer, 0, 1);											//Skriver checkByten till nätverksströmmen
this.networkStream.Write(bufferMessage, 0, bufferMessage.Length);	//Skriver meddelandet
this.networkStream.Flush();															//Flushar meddelandet till servern

Men borde gå lika bra med:

string messageToSend = "BLABLA:blabla:blabla\r\n";
string outString = Convert.ToString(Convert.ToChar(messageToSend.Length));
outString += messageToSend;
byte[] bufferMessage = Encoding.ASCII.GetBytes(outString);
this.networkStream.Write(bufferMessage, 0, bufferMessage.Length);
this.networkStream.Flush();

this.serverIp = IPAddress.Parse("127.0.0.1"); //IPAddress.Any;

Såg din edit först nu... att det skriver ut att den har 0.0.0.0 som ip är en liten bugg, inte orkat fixa den då den inte är super viktig, funkar ju ändå...

IPAddress.Any gör att servern lyssnar till alla inkommande anslutningar... Om man kör IPAddress.Parse("127.0.0.1"); kommer den inte neka alla som inte kopplar upp lokalt?

Som sagt är jag lite rookie på nätverksprogrammering så om man inte ska använda IPAddress.Any så säg det gärna, och förklara varför...

Just nu finns det ingen begränsning i servern... Men när vi kör tävlingen så måste vi ah någon typ av begränsning...

Hade en tanke att man kunde lösa det genom att man får 1 sekund (eller liknade) per drag men tiden räknas för varje spel... så om man i ett spel har gjort 20 drag så har man 20 sekunder "tillgodo"... Sen om man gjorde ett drag på 10 sekund och de andra 19 på resten eller tog 1 sekund per drag så spelar inte det någon roll... (alltså typ som det är i schack fast istället för fast tid så har man en tid relativt till hur många drag man har (gjort))...

Edit: Har gjort lite små uppdateringar på servern, funkar lite smidigare nu... dock buggar den upp ibland om man ansluter mer än 5 klienter... om någon känner sig manad får ni gärna kolla på det... ni hittar i alla fall den här http://www.poker-solitaire.com/bottav/BotServer.zip

Asimov har variabel djupsökning men ett snitt på 5-6 ungefär (närmare information är hemligstämplat )... Har inte lagt till någon funktion för att beskära trädet... Ska försöka göra lite förbättringar jag har grubblat lite över :)...

Vad tyckte ni om mitt förslag om tidsbegränsning?

menade mer med kumulativ tidsbegränsning... sen hur mycket man får per drag är en vidare fråga men men, hoppas du får igång din bot

Hur går det för alla? något som är redo att köra en test match snart?