4#H æ" à"á">F >-ôÿÿ~ Œß"ÂÉ  ¥  C1=10:Œ A1(13),P(7) $ Œ A(4),D(4),B(4),V(4),C(4),B1(13) ( «:·:±405:ƒ"P O K E R";:ª 2+ ±512:ƒ"DO YOU WANT INSTRUCTIONS ?"; < A7$=Þ$:„ A7$="" ‰ 60 F „ A7$="Y" ‰ ’ 1990: 90 P „ A7$<>"N" ‰ 60 Z Š Q=1 ™ 13:“ A1$(Q):‹ Q d_ ” "ACE","TWO","THREE","FOUR","FIVE","SIX","SEVEN","EIGHT","NINE","TEN","JACK","QUEEN","KING" n Š Q=0 ™ 7:“ P(Q):‹ Q x ” 2,3,5,7,10,40,100,400 ‚7 ŠQ=0™4:A(Q)=0:D(Q)=0:B(Q)=0:V(Q)=0:C(Q)=0:‹Q:Z=0:F=0 Œ ¡ –> ·:±0:ƒ"BETS ="M;:±(48):ƒ"CREDITS ="¼(C1);:±(73):ƒ"PAYOUTS";  b ±128:ƒ"TWO PAIR ="P(0);:±192:ƒ"3 / KIND ="P(1);:±256:ƒ"STRAIGHT ="P(2);:±320:ƒ"FLUSH ="P(3); ªi ±144:ƒ"FULL HOUSE ="P(4);:±208:ƒ"4 / KIND ="P(5);:±272:ƒ"STR/FLUSH ="P(6);:±336:ƒ"RYL/FLUSH ="P(7); ´ „Z=1‰• ¾ Š R=1 ™ 5:F=165 È# R ’ 470,480,490,500,510:’ 1580 Ò ‹ R Ü ¡ æ S=1:Š Q=0 ™ 4 ð A(Q)=¼(Ì*13)+1 ú D(Q)=¼(Ì*4)+1  B(Q)=A(Q)+D(Q)*20  Y=0  „ B(Q)=C(Y) ‰ 240 " 330 , „ Y=Q:Y=Y+1:„ Y=5 ‰ 330 ˆ 280 6 „ B(Q)=B(Y) ‰ 240 @ Y=Y+1:„ Y=5 ‰ 330 ˆ 280 J „ S=0 ‰ 360 T „ S=1 ‰ ‹ Q ^ 380 h 700 r ¡ | ±163:ƒ"PRESS"; † ±233:ƒ"B TO PLACE BETS";  ±297:ƒ"D TO DRAW"; š A7$="":A7$=Þ$:„ A7$=""‰ 410 ¤9 „ A7$="B"³C1>=1‰C1=C1-1:M=M+1:±7:ƒM;:±58:ƒ¼(C1);:410 ®T „C1<=0³A7$="B"‰±361:ƒ"YOU CAN'T BET ANY MORE";:±425:ƒ"YOU'LL HAVE TO DRAW";: 410 ¸Y „A7$="D"³M=0‰±361:ƒ"YOU MUST PLACE A BET";:ŠQ=1™1000:‹Q:U=361:±(U):’2060ˆ„A7$="D"‰1680  410 Ì ¡ Ö( W=451:T=514:K=525:Y=963:Z=515:H=583:• à( W=463:T=526:K=537:Y=975:Z=527:H=595:• ê( W=475:T=538:K=549:Y=987:Z=539:H=607:• ô( W=487:T=550:K=561:Y=999:Z=551:H=619:• þ) W=499:T=562:K=573:Y=1011:Z=563:H=631:•  ¡ F U=233:±(U):’2060:U=297:±(U):’2060:U=361:±(U):’2060:U=425:±(U):’2060  ±233:ƒ"1 - 5 TO HOLD CARDS"; &" ±297:ƒ"C TO CANCEL HELD CARDS"; 0 ±361:ƒ"D TO DRAW"; :9 ±392:ƒ"1";:±404:ƒ"2";:±416:ƒ"3";:±428:ƒ"4";:±440:ƒ"5"; D A7$="":A7$=Þ$:„A7$=""‰580 N! „ A7$="1"‰±390:ƒ"HELD";:V(0)=1 X! „ A7$="2"‰±402:ƒ"HELD";:V(1)=1 b! „ A7$="3"‰±415:ƒ"HELD";:V(2)=1 l! „ A7$="4"‰±427:ƒ"HELD";:V(3)=1 v! „ A7$="5"‰±439:ƒ"HELD";:V(4)=1 €4 „ A7$="C"‰U=384:±(U):’2060:ŠQ=0™4:V(Q)=0:‹Q:570 Š „ A7$="D"‰680 ” 580 ž ¡ ¨ S=0:ŠQ=0™4 ² „ V(Q)=0‰C(Q)=B(Q):240 ¼5 „ V(Q)=0‰R=Q+1:R’470,480,490,500,510:F=165:’1650 Æ ‹Q Ð ŠQ=0™4 Ú; „ V(Q)=0‰R=Q+1:R’470,480,490,500,510:F=128:’1650:’1730 ä ‹Q î ¡ ø Š I=1™4  Š J=0™I-1  % „A(J)>A(I):Q=A(I):A(I)=A(J):A(J)=Q  ‹J   ‹I * ¡ 4 T=1:V2=0 > T’870,910,960,1030,1070 H „V2=0:T=T+1:„T<>6‰830 R ŠQ=1™1000:‹Q:1110 \ ¡ f& „A(0)=A(1)³A(1)=A(2)³A(2)=A(3):V2=1 p& „A(1)=A(2)³A(2)=A(3)³A(3)=A(4):V2=1 z • „ ¡ Ž/ „A(0)=A(1)³A(1)=A(2):V2=2:„A(3)=A(4):V2=V2+1 ˜ „A(1)=A(2)³A(2)=A(3):V2=2 ¢/ „A(2)=A(3)³A(3)=A(4):V2=2:„A(0)=A(1):V2=V2+1 ¬ • ¶ ¡ À P2=0:„A(0)=A(1):P2=P2+1 Ê „A(1)=A(2):P2=P2+1 Ô „A(2)=A(3):P2=P2+1 Þ „A(3)=A(4):P2=P2+1 è „P2=2:V2=4 ò • ü ¡ 6 „D(0)=D(1)³D(1)=D(2)³D(2)=D(3)³D(3)=D(4):V2=5:’1070  „V2=6:V2=8  • $ ¡ .; „A(0)+1=A(1)³A(1)+1=A(2)³A(2)+1=A(3)³A(3)+1=A(4):V2=V2+6 8& „A(0)=1³A(1)+A(2)+A(3)+A(4)=46:V2=6 B• L ¡ V „V2=0‰1540 ` · j3 „V2=1:E=P(5)*M:±400:ƒ"FOUR OF A KIND. COLLECT"E; t4 „V2=2:E=P(1)*M:±400:ƒ"THREE OF A KIND. COLLECT"E; ~/ „V2=3:E=P(4)*M:±400:ƒ"FULL HOUSE. COLLECT"E; ˆ- „V2=4:E=P(0)*M:±400:ƒ"TWO PAIR. COLLECT"E; ’* „V2=5:E=P(3)*M:±400:ƒ"FLUSH. COLLECT"E; œ- „V2=6:E=P(2)*M:±400:ƒ"STRAIGHT. COLLECT"E; ¦0 „V2=8:E=P(7)*M:±400:ƒ"ROYAL FLUSH. COLLECT"E; °4 „V2=11:E=P(6)*M:±400:ƒ"STRAIGHT FLUSH. COLLECT"E; º ¡ Ä ŠT=0™7:P(T)=P(T)*2*M:‹T Î ±464:ƒ"DOUBLE UP - PRESS D"; Ø& ±528:ƒ"COLLECT WINNINGS - PRESS C"; â A7$=Þ$:„A7$=""‰1250 ì „A7$="C":C1=C1+Í(E):M=0:˜:90 ö „A7$<>"D"‰A7$="":1250  ¡  # Z=1:·:’160:±7:ƒ"DOUBLE PAYOUTS";  ’490:’1580  A(2)=¼(Ì*13)+1 ( D(2)=¼(Ì*4)+1 2 ±169:ƒ"PRESS B FOR BIG"; < ±233:ƒ"(LARGER THAN EIGHT)"; F ±297:ƒ"PRESS S FOR SMALL"; P ±361:ƒ"(SMALLER THAN EIGHT)"; Z A7$=Þ$:„A7$=""‰1370 d, „A7$="B":±809:ƒ"YOUR GUESS IS BIG";:1410 n. „A7$="S":±809:ƒ"YOUR GUESS IS SMALL";:1420 x 1370 ‚ „A7$="B"³A(2)>8‰1440 Œ „A7$="S"³A(2)<8‰1440 – 1480   R=3:F=128:’490:’1650:’1730 ª ŠQ=1™1000:‹Q ´i ·:E=E*2:±400:ƒ"CONGRATULATIONS - YOU GUESSED CORRECTLY";:±464:ƒ"COLLECT"E;" DOUBLE UP AGAIN PRESS D"; ¾ ŠQ=0™7:P(Q)=P(Q)*2:‹Q:1240 È R=3:F=128:’490:’1650:’1730 Ò ŠT=1™1000:‹T Ü1 ·:±400:ƒ"YOU GUESSED INCORRECTLY";:ŠT=1™500:‹T æW „C1<=0:·:±390:ƒ"SORRY - YOU'VE GOT NOTHING ELSE TO PLAY WITH....";:Š Q=1™3000:‹Q:·:‘ ð ŠQ=1™2000:‹Q ú M=0:˜:90 T „C1<=0‰1510ˆ·:±338:ƒ"SORRY - YOU WIN NOTHING";:±466:ƒ"PRESS ANY KEY TO CONTINUE";  A7$=Þ$:„A7$=""‰1550  1530 " ¡ , » 6 ±(W):ƒ[A10 176]; @ ±(Y):ƒ[A10 131]; J$ ±(T):ƒß$(170);:T=T+64:„T>960‰1630 T 1610 ^+ ±(K):ƒß$(149);:K=K+64:„K>960:F=165:1650 h 1630 r ±(Z):ƒ[A10 F]; | Z=Z+64:„Z>960:• † 1650  ŠR=1™5 š R’470,480,490,500,510 ¤ F=128:’1650:’1730 ® ‹R ¸ 530 Â$ D(R-1)’1750,1790,1820,1870:’1930 Ì • ÖQ »:H=H+61:±(H):ƒß$(184)+ß$(191)+ß$(180)+ß$(176)+ß$(190)+ß$(189)+ß$(144);:H=H+64 à@ ±(H):ƒß$(130)+ß$(175)+ß$(191)+ß$(191)+ß$(191)+ß$(135);:H=H+66 ê! ±(H):ƒß$(139)+ß$(159)+ß$(129); ô • þX »:±(H):ƒß$(160)+ß$(180);:H=H+63:±(H):ƒß$(184)+ß$(191)+ß$(191)+ß$(189)+ß$(144);:H=H+63 X ±(H):ƒß$(174)+ß$(191)+ß$(143)+ß$(159)+ß$(175)+ß$(191)+ß$(132);:H=H+167:±(H):ƒß$(133);  • * »:±(H):ƒß$(184)+ß$(188)+ß$(144);:H=H+63 &0 ±(H):ƒß$(162)+ß$(143)+ß$(159)+ß$(167);:H=H+63 0@ ±(H):ƒß$(168)+ß$(191)+ß$(189)+ß$(189)+ß$(191)+ß$(189);:H=H+65 :1 ±(H):ƒß$(139)+ß$(129)+ß$(149)+ß$(139)+ß$(129); D • N" »:±(H):ƒß$(184)+ß$(144);:H=H+62 X8 ±(H):ƒß$(160)+ß$(190)+ß$(191)+ß$(191)+ß$(180);:H=H+63 bH ±(H):ƒß$(136)+ß$(191)+ß$(191)+ß$(191)+ß$(191)+ß$(191)+ß$(157);:H=H+65 l8 ±(H):ƒß$(130)+ß$(175)+ß$(191)+ß$(191)+ß$(135);:H=H+66 v ±(H):ƒß$(139)+ß$(129) € • Š B1$(R-1)=A1$(A(R-1)) ” ±(Z-448):ƒB1$(R-1) ž I=À(B1$(R-1)) ¨ J=Y-54-I ² ±(J):ƒB1$(R-1); ¼ • Æ·:±20:ƒ"** P O K E R **" Ь ƒ:ƒ" THIS GAME IS VERY SIMPLE TO PLAY. YOU START WITH TEN CREDITS AND YOU BET AS MANY AS YOU LIKE ON EACH HAND. THEN YOU DRAW THE CARDS AND SELECT THE CARDS YOU WANT"; ÚP ƒ" TO HOLD. YOU THEN DRAW THE CARDS AGAIN AND YOU ARE TOLD IF YOU HAVE WON." ä­ ƒ\" IF YOU WIN YOU HAVE THE CHOICE TO DOUBLE UP OR TO COLLECT YOUR MONEY. IF YOU DOUBLE UP, YOU ARE BETTING ON WHETHER A CARD IS BIG (GREATER THAN EIGHT) OR SMALL "; î– ƒ "(LESS THAN EIGHT). IF YOU GUESS CORRECTLY, YOU DOUBLE YOU WINNINGS. THE GAME CONTINUES UNTIL YOU RUN OUT OF CREDITS. GOOD LUCK ......." ø ƒ "PRESS ANY KEY TO START.";  „ Þ$="" ‰ 2050 ˆ ·:•  - N=U/64+1:N=N*64-U:ŠI=1™N-1:ƒ" ";:‹I:±(U):• ÿÿPOKER€":Š C=1 ™ 250:‹ C: 790 ˆ 900 ¢A ± 1,14:°:ƒ "Transfer Energy:":ª:± 1,15:ƒ "Shields ava