Tic-tac-toe: Difference between revisions
→{{header|EasyLang}}
Line 4,748:
textsize 14
#
linewidth 2
clear
Line 4,768:
.
.
c = (ind - 1) mod 3
r = (ind - 1) div 3
Line 4,787:
.
.
for i = 1 to 3
s += f[a]
Line 4,798:
.
.
res = 0
for i = 1 step 3 to 7
Line 4,820:
.
.
call rate rval done
if done = 1
Line 4,846:
.
.
color 555
move 16 4
Line 4,859:
state += 2
.
call minmax 4 -11 11 val mov
f[mov] = 4
Line 4,869:
.
.
mov = floor ((mouse_x - 6) / 28) + 3 * floor ((mouse_y - 16) / 28) + 1
if f[mov] = 0
|