Anonymous user
Morpion solitaire/Unicon: Difference between revisions
m
→Main and Core Game Play Procedures: tidy
m (→Main and Core Game Play Procedures: version) |
m (→Main and Core Game Play Procedures: tidy) |
||
Line 28:
<lang Unicon>link printf,strings,options
$define MORPVER "1.7g"
$define EXTENDED 1
procedure main(A)
$ifdef EXTENDED
MorpionConf(A)
if \M_ReplayFile then ReplayMorpion()
else if \M_Limit === 1 then ShowGame(SingleMorpion())
else MultiMorphion(\M_Limit)
$else
printf("--- Morpion Solitaire 5 (v%s) (single
M_Strategy := RandomPlayer
M_Mvalid := ValidMove5T # can be changed to 5D
M_WriteGame := WriteMoveLogPS
M_Output := &output
|