WildPheasants: Difference between revisions
From RISC OS
Jump to navigationJump to search
No edit summary |
(Removing old, irrelevant content) |
||
| (One intermediate revision by one other user not shown) | |||
| Line 1: | Line 1: | ||
| |
|||
| Wild Pheasants |
|||
| Written By Sion Cleaver |
|||
| (C) Blasts of the Xtreme 2006 |
|||
| |
|||
SCRIPT_TYPE 1 |
|||
| |
|||
BEGIN "Wild Phesants" |
|||
FLAGS NoAutoFly |
|||
PACKS 1 |
|||
WIDTH 5 * CW |
|||
HEIGHT 2 * CH + 11 * COH |
|||
ZeroToWin 52 - CARDSIN$2 |
|||
| Foundations |
|||
FOR stack = 0 TO 3 |
|||
FOUNDATION |
|||
X stack * CW |
|||
Y 0 |
|||
Deal 5,3 |
|||
DealCard x1 |
|||
FLAGS Join____ |
|||
ID 2 |
|||
END |
|||
END |
|||
| Reserves |
|||
FOR stack = 0 TO 5 |
|||
STACK |
|||
X stack * CW |
|||
Y CH |
|||
DEAL 6,2 |
|||
DRAGUPTO 1 |
|||
MAX 0 |
|||
ID 1 |
|||
END |
|||
END |
|||
| Stock |
|||
STACK |
|||
X 4 * CW |
|||
Y 0 |
|||
DEAL 48 |
|||
DEALTO 1,2 |
|||
TAKEFROM 1,2 |
|||
MAX 0 |
|||
DRAGUPTO 0 |
|||
FLAGS PaintCount |
|||
ID 3 |
|||
END |
|||
END |
|||
