23 lines
293 B
Text
23 lines
293 B
Text
|
Filename:SINK
|
||
|
|
Lbl 1
|
||
|
|
0->A~Z
|
||
|
|
ClrText
|
||
|
|
"1. New game [SINK]2. Continue last game3. Stats 4. Quit"
|
||
|
|
?->A
|
||
|
|
If A=1
|
||
|
|
Then Prog "SINK-NG"
|
||
|
|
Goto 1
|
||
|
|
IfEnd
|
||
|
|
If A=2
|
||
|
|
Then Prog "SINK-LG"
|
||
|
|
Goto 1
|
||
|
|
IfEnd
|
||
|
|
If A=3
|
||
|
|
Then Prog "SINK-STA"
|
||
|
|
Goto 1
|
||
|
|
IfEnd
|
||
|
|
If A=4
|
||
|
|
Then ClrText
|
||
|
|
Stop
|
||
|
|
IfEnd
|
||
|
|
Goto 1
|