10 '²¼ÄØGAME
20 CLV:CLS
30 ?"===== ²¼ÄØGAME =====":?
40 S=15+RND(15)
50 GOSUB170
60 T=0:?:?"   Your Turn (1~3º) ";:INPUT N
70 IF (N=0)+(N>3)GOTO60 ELSE S=S-N
80 GOSUB170
90 IF S=1 THEN GOTO 180
100 T=1:?:?"   My Turn  ";
110 N=(S-1)%4:IF N=0 N=RND(2)+1
120 ?N;"º ÄØϽ"
130 S=S-N
140 GOSUB170
150 IF S=1 THEN GOTO 180
160 GOTO60
170 ?:?"The Remaining Stones ";S;"º":RETURN
180 ?:IF T=1 ?"   YOU LOSE¥¥¥" ELSE ?"   YOU WIN!!":?:?:END