function?posl?=?blockfork（stage）

posl?=?[];
poscorner?=?[1?3?7?9];
posedge???=?[2?4?6?8];
poscenter?=?[5];

if?sum（any（stage（poscorner））==1）==2
????emptyposition?=?find（stage（poscorner）==0）;
????if?emptyposition~=0
????????stage（emptyposition（1））?=?2;
????????posl?=?emptyposition（1）;
????end
end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????310??2011-11-17?12:29??井字棋\makeafork.m

?????文件????????205??2011-09-28?18:13??井字棋\oppositecorner.m

?????文件????????270??2011-09-28?16:54??井字棋\pickwinspot.m

?????文件????????187??2011-10-04?17:27??井字棋\drawCir.m

?????文件????????167??2011-10-04?17:27??井字棋\drawCross.m

?????文件????????450??2011-11-17?09:35??井字棋\drawStage.m

?????文件????????312??2011-11-17?11:45??井字棋\playermove.m

?????文件????????351??2011-12-25?12:38??井字棋\tictactoe.m

?????文件????????195??2011-12-25?12:31??井字棋\whowon.m

?????文件???????1156??2011-11-17?09:24??井字棋\computermove.m

?????文件????????271??2011-09-29?00:50??井字棋\findlosespot.m

?????文件????????310??2011-11-17?12:29??井字棋\blockfork.m

?????文件?????????17??2012-05-15?21:16??井字棋\說明.txt

?????目錄??????????0??2012-03-05?13:46??井字棋

-----------?---------??----------?-----??----

?????????????????4201????????????????????14