From RISC OS
|
| Trainspotter
| Written By Sion Cleaver
| (C) Blasts of the Xtreme 2006
|
SCRIPT_TYPE 1
|
BEGIN "Trainspotter"
FLAGS NoAutoFly
PACKS 1
WIDTH 5 * CW
HEIGHT 2 * CH + 11 * COH
ZeroToWin 104 - CARDSIN$2
| Foundations
FOR stack = 0 TO 3
FOUNDATION
X stack * CW
Y 0
Deal 3,2
DealCard x1
FLAGS Join____
ID 2
END
END
| Reserves
FOR stack = 0 TO 7
STACK
X stack * CW
Y CH
DEAL 0,2
DRAGUPTO 1
MAX 0
ID 1
END
END
| Stock
STACK
X 4 * CW
Y 0
DEAL 96
DEALTO 1,2
TAKEFROM 1,2
MAX 0
DRAGUPTO 0
FLAGS PaintCount
ID 3
END
END