Source Code Tick-Tack-Toe 8x8

ini adalah source code game Tick- Toe 8x8
ini untuk bahasa prolog di strawberry prolog.


win_deep(0). % You can change this two numbers to make the AI more clever
nolose_deep(0).

?-
   set(pos([[f,f,f,f,f,f,f,f],[f,f,f,f,f,f,f,f],[f,f,f,f,f,f,f,f],[f,f,f,f,f,f,f,f],[f,f,f,f,f,f,f,f],[f,f,f,f,f,f,f,f],[f,f,f,f,f,f,f,f],[f,f,f,f,f,f,f,f]])),
   set(lose_flag(false)),
   brush(system_color(window)),
  % G_opening is bitmap_image("gambar\\LOL.bmp",_),

   window( _, _, win_func(_), "Tick-Tack-Toe 8x8(LOL)", 650, 650, 650, 650).