#########;#####;####; где
Первая колонка 9 цифр -- очерёдность заполнения игроками клеточек поля
Вторая колонка 5 цифр -- ходы 1-го игрока
третья колонка 4 цифры -- ходы 2-го игрока
схема
Add(MainForm,2953706,84,77)
{
Height=298
}
Add(Memory,8586173,210,84)
{
Default=String(123456789)
}
Add(Button,4794150,42,189)
{
Left=15
Top=10
Caption=">>"
link(onClick,14483491:doEvent1,[])
}
Add(ListBox,626462,812,322)
{
Left=120
Top=5
Width=240
Height=250
Point(doSave)
}
Add(For,937194,119,196)
{
Start=1
End=9
link(onEvent,8955840:doEvent1,[])
link(onStop,1867074:doData,[(158,209)(158,349)])
}
Add(For,15032230,266,196)
{
Start=1
End=8
link(onEvent,9874744:doEvent1,[])
}
Add(For,5153321,413,196)
{
Start=1
End=7
link(onEvent,1460964:doEvent1,[])
}
Add(For,505564,560,196)
{
Start=1
End=6
link(onEvent,8862435:doEvent1,[])
}
Add(For,5084940,707,196)
{
Start=1
End=5
link(onEvent,14337298:doEvent1,[])
}
Add(For,13771652,854,196)
{
Start=1
End=4
link(onEvent,3771135:doEvent1,[])
}
Add(For,12372847,1001,196)
{
Start=1
End=3
link(onEvent,11720629:doEvent1,[])
}
Add(Hub,8955840,189,196)
{
link(onEvent1,1542147:doCopy,[(214,202)(214,188)(109,188)(109,153)])
link(onEvent2,15032230:doFor,[(242,209)(242,202)])
}
Add(Hub,9874744,336,196)
{
link(onEvent1,14926235:doCopy,[(361,202)(361,188)(256,188)(256,153)])
link(onEvent2,5153321:doFor,[(375,209)(375,202)])
}
Add(Hub,1460964,483,196)
{
link(onEvent1,13197112:doCopy,[(508,202)(508,188)(403,188)(403,153)])
link(onEvent2,505564:doFor,[(538,209)(538,202)])
}
Add(Hub,8862435,630,196)
{
link(onEvent1,6041627:doCopy,[(655,202)(655,188)(550,188)(550,153)])
link(onEvent2,5084940:doFor,[(697,209)(697,202)])
}
Add(Hub,14337298,777,196)
{
link(onEvent1,14378675:doCopy,[(809,202)(809,188)(697,188)(697,153)])
link(onEvent2,13771652:doFor,[(822,209)(822,202)])
}
Add(Hub,3771135,924,196)
{
link(onEvent1,14925969:doCopy,[(949,202)(949,188)(844,188)(844,153)])
link(onEvent2,12372847:doFor,[(949,209)(949,202)])
}
Add(Hub,11720629,1071,196)
{
link(onEvent1,11174019:doCopy,[(1096,202)(1096,188)(991,188)(991,153)])
link(onEvent2,3964517:doFor,[(1131,209)(1131,202)])
}
Add(Memory,13611596,133,77)
{
Default=Integer(1)
}
Add(Memory,8961364,357,84)
{
Default=String()
}
Add(GetDataEx,5741733,210,119)
{
link(Data,8586173:Value,[])
}
Add(Copy,1542147,119,147)
{
Count=1
link(onCopy,16006820:doValue,[])
link(Str,5741733:Var1,[(125,124)])
link(Position,11853312:Var1,[(132,138)])
link(Count,459717:Var2,[])
}
Add(Memory,16006820,168,147)
{
link(onData,12967616:doDelete,[])
}
Add(Delete,12967616,210,147)
{
link(onDelete,8961364:doValue,[(249,153)(249,90)])
link(Str,5741733:Var2,[])
link(Position,11853312:Var3,[(223,138)])
link(Count,12223103:Var2,[])
}
Add(GetDataEx,11853312,161,133)
{
Angle=2
link(Data,937194:Position,[(167,242)(125,242)])
}
Add(GetDataEx,459717,133,126)
{
link(Data,13611596:Value,[])
}
Add(Copy,14926235,266,147)
{
Count=1
link(onCopy,3255379:doValue,[])
link(Str,14926893:Var1,[(272,124)])
link(Position,10900635:Var1,[(279,137)])
link(Count,8878350:Var2,[])
}
Add(Memory,3255379,315,147)
{
link(onData,12585867:doDelete,[])
}
Add(Delete,12585867,357,147)
{
link(onDelete,8643631:doValue,[(396,153)(396,90)])
link(Str,14926893:Var2,[])
link(Position,10900635:Var3,[(370,137)])
link(Count,2218627:Var2,[])
}
Add(GetDataEx,14926893,357,119)
{
link(Data,8961364:Value,[])
}
Add(GetDataEx,12223103,224,126)
{
Angle=3
link(Data,459717:Var3,[])
}
Add(GetDataEx,8878350,280,126)
{
Angle=3
link(Data,12223103:Var3,[])
}
Add(GetDataEx,10900635,301,132)
{
Angle=2
link(Data,15032230:Position,[(307,237)(272,237)])
}
Add(Memory,8643631,504,84)
{
Default=String()
}
Add(Copy,13197112,413,147)
{
Count=1
link(onCopy,4438040:doValue,[])
link(Str,9244676:Var1,[(419,124)])
link(Position,7561411:Var1,[(426,137)])
link(Count,16449176:Var2,[])
}
Add(Memory,4438040,462,147)
{
link(onData,8584444:doDelete,[])
}
Add(Delete,8584444,504,147)
{
link(onDelete,12833701:doValue,[(543,153)(543,90)])
link(Str,9244676:Var2,[])
link(Position,7561411:Var3,[(517,137)])
link(Count,2615921:Var2,[])
}
Add(GetDataEx,9244676,504,119)
{
link(Data,8643631:Value,[])
}
Add(GetDataEx,7561411,448,132)
{
Angle=2
link(Data,5153321:Position,[(454,236)(419,236)])
}
Add(GetDataEx,2218627,371,126)
{
Angle=3
link(Data,8878350:Var3,[])
}
Add(GetDataEx,16449176,427,126)
{
Angle=3
link(Data,2218627:Var3,[])
}
Add(Memory,12833701,651,84)
{
Default=String()
}
Add(Copy,6041627,560,147)
{
Count=1
link(onCopy,12177004:doValue,[])
link(Str,8719570:Var1,[(566,124)])
link(Position,8617012:Var1,[(573,137)])
link(Count,15102060:Var2,[])
}
Add(Memory,12177004,609,147)
{
link(onData,14878231:doDelete,[])
}
Add(Delete,14878231,651,147)
{
link(onDelete,9193454:doValue,[(690,153)(690,90)])
link(Str,8719570:Var2,[])
link(Position,8617012:Var3,[(664,137)])
link(Count,367841:Var2,[])
}
Add(GetDataEx,8719570,651,119)
{
link(Data,12833701:Value,[])
}
Add(GetDataEx,15102060,574,126)
{
Angle=3
link(Data,2615921:Var3,[])
}
Add(GetDataEx,8617012,595,132)
{
Angle=2
link(Data,505564:Position,[(601,236)(566,236)])
}
Add(Memory,9193454,798,84)
{
Default=String()
}
Add(Copy,14378675,707,147)
{
Count=1
link(onCopy,14239043:doValue,[])
link(Str,3349704:Var1,[(713,124)])
link(Position,13645675:Var1,[(720,137)])
link(Count,871589:Var2,[])
}
Add(Memory,14239043,756,147)
{
link(onData,1492374:doDelete,[])
}
Add(Delete,1492374,798,147)
{
link(onDelete,6719118:doValue,[(837,153)(837,90)])
link(Str,3349704:Var2,[])
link(Position,13645675:Var3,[(811,137)])
link(Count,13670687:Var2,[])
}
Add(GetDataEx,3349704,798,119)
{
link(Data,9193454:Value,[])
}
Add(GetDataEx,871589,721,126)
{
Angle=3
link(Data,367841:Var3,[])
}
Add(GetDataEx,13645675,742,132)
{
Angle=2
link(Data,5084940:Position,[(748,236)(713,236)])
}
Add(Memory,6719118,945,84)
{
Default=String()
}
Add(Copy,14925969,854,147)
{
Count=1
link(onCopy,10328643:doValue,[])
link(Str,1479001:Var1,[(860,124)])
link(Position,1128297:Var1,[(867,137)])
link(Count,1588853:Var2,[])
}
Add(Memory,10328643,903,147)
{
link(onData,7733489:doDelete,[])
}
Add(Delete,7733489,945,147)
{
link(onDelete,2159667:doValue,[(984,153)(984,90)])
link(Str,1479001:Var2,[])
link(Position,1128297:Var3,[(958,137)])
link(Count,12567870:Var2,[])
}
Add(GetDataEx,1479001,945,119)
{
link(Data,6719118:Value,[])
}
Add(GetDataEx,1588853,868,126)
{
Angle=3
link(Data,13670687:Var3,[])
}
Add(GetDataEx,1128297,889,132)
{
Angle=2
link(Data,13771652:Position,[(895,236)(860,236)])
}
Add(GetDataEx,13670687,812,126)
{
Angle=3
link(Data,871589:Var3,[])
}
Add(GetDataEx,2615921,518,126)
{
Angle=3
link(Data,16449176:Var3,[])
}
Add(GetDataEx,367841,665,126)
{
Angle=3
link(Data,15102060:Var3,[])
}
Add(Memory,2159667,1092,84)
{
Default=String()
}
Add(Copy,11174019,1001,147)
{
Count=1
link(onCopy,3622036:doValue,[])
link(Str,3384574:Var1,[(1007,124)])
link(Position,13221054:Var1,[(1014,137)])
link(Count,6638824:Var2,[])
}
Add(Memory,3622036,1050,147)
{
link(onData,12863872:doDelete,[])
}
Add(Delete,12863872,1092,147)
{
link(onDelete,6542889:doValue,[(1131,153)(1131,90)])
link(Str,3384574:Var2,[])
link(Position,13221054:Var3,[(1105,137)])
link(Count,4039895:Var2,[])
}
Add(GetDataEx,3384574,1092,119)
{
link(Data,2159667:Value,[])
}
Add(GetDataEx,6638824,1015,126)
{
Angle=3
link(Data,12567870:Var3,[])
}
Add(GetDataEx,13221054,1036,132)
{
Angle=2
link(Data,12372847:Position,[(1042,236)(1007,236)])
}
Add(GetDataEx,12567870,959,126)
{
Angle=3
link(Data,1588853:Var3,[])
}
Add(For,3964517,1106,196)
{
Start=1
End=2
link(onEvent,1675336:doCopy,[(1145,202)(1145,153)])
}
Add(Memory,6542889,1246,84)
{
Default=String()
}
Add(Copy,1675336,1155,147)
{
Count=1
link(onCopy,5878084:doValue,[])
link(Str,6731347:Var1,[(1161,124)])
link(Position,13584055:Var1,[(1168,137)])
link(Count,15422984:Var2,[])
}
Add(Memory,5878084,1204,147)
{
link(onData,6774310:doDelete,[])
}
Add(Delete,6774310,1246,147)
{
link(onDelete,9722156:doString,[(1285,153)(1285,272)(648,272)(648,293)])
link(Str,6731347:Var2,[])
link(Position,13584055:Var3,[(1259,137)])
link(Count,15422984:Var3,[(1266,131)])
}
Add(GetDataEx,6731347,1246,119)
{
link(Data,6542889:Value,[])
}
Add(GetDataEx,15422984,1169,126)
{
Angle=3
link(Data,4039895:Var3,[])
}
Add(GetDataEx,13584055,1190,132)
{
Angle=2
link(Data,3964517:Position,[(1196,236)(1112,236)])
}
Add(GetDataEx,4039895,1106,126)
{
Angle=3
link(Data,6638824:Var3,[])
}
Add(FormatStr,9722156,658,287)
{
DataCount=9
Mask="%1%2%3%4%5%6%7%8%9;%1%3%5%7%9;%2%4%6%8;"
link(onFString,9568385:doAdd,[])
link(Str1,16006820:Value,[(664,264)(174,264)])
link(Str2,3255379:Value,[(671,257)(321,257)])
link(Str3,4438040:Value,[(678,250)(468,250)])
link(Str4,12177004:Value,[(685,243)(615,243)])
link(Str5,14239043:Value,[(692,243)(762,243)])
link(Str6,10328643:Value,[(699,250)(909,250)])
link(Str7,3622036:Value,[(706,257)(1056,257)])
link(Str8,5878084:Value,[(713,264)(1210,264)])
}
Add(Button,16607587,651,350)
{
Left=15
Top=200
Caption="Save"
link(onClick,92800:doExecute,[])
}
Add(SDialog,92800,700,350)
{
Filter="TXT|*.txt"
FileName="КрестНоль.txt"
link(onExecute,626462:doSave,[])
}
Add(StrList,9568385,749,287)
{
}
Add(Hub,14483491,84,189)
{
link(onEvent1,9568385:doClear,[(109,195)(109,300)])
link(onEvent2,937194:doFor,[])
}
Add(DoData,1867074,749,343)
{
link(onEventData,626462:doText,[])
link(Data,9568385:Text,[])
}
123
456
789