zamanında vb de tictak oyunu yapmıştım.şu şekilde bir mantık kullandım.
çok iyi çalışmasa da iş görüyordu hatırladığım kadarı ile anlatıyoum

a b c
1 H0 H1 2
2 H3... X X
3 H6 X X

burada pc ve insan karşılıklı oynuyordu.
her bir hüçre için bir değişken atadım

dim H(8) 'hüçre
dim P(8) 'puan

sonra bilgisayar boş hüçreler için deneme yapıyor 3lü oluşturma ihtimal olan her olasılık için pozitif bir puan oluşturma olasılığı için negativ bir puan veriyordu

for i=0 to 8

if i=0 then 'i sıfır değerinde ise

if H(1)="" and H(2)="" then P(i)=p(i)+5 ' yani a1 hüçresinin sağındaki hüçreler boş ise +5 puan ver

if h3 ve h6 boş ise pi=pi+5 gibi gider hocam

end if

next


kısaca mantık olasılıklara göre puan verme.


ayrıca google de xox tic tac toe algoritma şeklinde aratın