KKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK  %-5=EpP`ppPP`` PP````````vvvvPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPccc00````````````000vv`vrr vvvrr  ! ! !   !  ! !$!' )!> !R!T U !W!X \ !`  b !f n !s !            cc!#?AK ``f<xlffflx~``x``~```x``~ff<!#%!#%!#%  K`+-krn*cx~s}wmf\V^tabab #ab  !# & () 0 2 4<?AA DGGGIIO Q ^c ckt fff~f<|ff|ff|>ff<+Ϋ#~0 (ȱ~`恤0 ~G`G-krn*cx~s}wmf\荇abab Laba'` #  #  #  # )NJJJJO)PU ?@8$QU U֢LL aba b ?/s|{}~_߿?߿`>>ff<+Ϋ#~0 (ȱ~`恤0 ~G`GKýÁ>|qG??>?>~~ff<00`0~~p  p f<~ OO#x??????~߿~? .  A n,+$ $$$$&&')+++--;TZZ\ci         eܜ`܅0  `ȱ ȱ ȱȱ q  ` Z`,28y+ߝ i??8߿8 {| #{{{`8 {|`|| |{{  8 | 3On3PnL?mz||{{ }` #z`M`1!2` 0 qV֩4 ȱ`ȥȱ 1%)!2???ppppppp rt Bm m v0qs ~wv0vp0km ~wp0pj0eg ~wj0j1+70 Qm0*60 Km/)5 Em,)2/85fehglknmrqts`w x Ȅ OnPnL?mƙΙ֙oÇ???o j  L L  L  L  L )NJJJJO)PU hi8$QU U֢LL aba ꐍ됍b ꐍ됍??@@??????` /  螠 `82} q, j j 82],)8`PP֙gogՙoՈhhՈ`hhՙogoՙgPPֈ`2*n*)*0  lK ;'<4`  `LL`LL`i `/`LL`LL;0``LL```ł L㓩* L* L) L Mdcab(b$c dcaaJ ) LL* L(` L`(2*_(* L 3i820 K `'9---8,0`3- 9!9`3 q- j 9L0L39&-9`99`(90$慥A9'-}],`8,}]LK-,8,}]-ְ9 9`!:0d84i2  "###""$$$$$  "" """""""" " " " " """"""""""""" !""""""" "" """""""""""""""""""""""" "  %#"  "&#""'#"(#"  ")#" *#"j:44 (d Lj:0!d..if h44ih`p0LY0Lᆥ0L'90#283Ii,8-0G  9` L{LOXp-}]klo0(93Ȅmn`Ii !9`L{>p-kl03 q- HHH(0JJJJ)(&'&'(P0JJJ)詿0JJJ)ȩ0)(&'0)斥] mG S %) ) mLՐ) :) Ÿ hhh@tȑݑ q, j j j j֩82,`82 <; /28`} q, j j#2` j,2 K L#|9!3}830`33`&(8]`2} q, j j j jL܃8` 90/ L(pTi, L&' Wm(3&'HTi, Lh0 ЛLr߅? (  Llm) (`) 0`   OnZPn ?m # L?m /   Zm Zmж`    &rrLlmt (* L(*LL Ҕ`(2*S L (* L(* L``a ꐅ됅` Ҕ8`b"bLbbaia L` * LΨ+ Lɕ,˕ Lɕɕ˕˕55 L62}4`.i/,,}]LK{1n1o"׽` Ǘ   8@ܥ  2 Zm н2 Zm б  螢  "+#",#""-#"  "" " "" "" Ȅ ꐅ됅0IPn .Pn .Pn .PniOnPniPn ?m 11 8 а` aLX' L( Lb` ( Zm( QХ&9}] j!9`-999`3 q- j 9`-99&"9`p`n qo0Dl#p90 $o!9`80n820, ,}]3 jl`l80,}]l, jl`n820 K Ln90@9憥F-9(9--}]8,0(:LNRVZ^$*18?FLR[do{bn~͒Ւ *? (6>MV‘ב%#" "###""&$$$$&#" "###""%)$$$'#" "###""%$$$$(#" "###""$,$$$)#" "###""$)$$$*#" "###""$%$$$*#"-:0d.d:ddd`&`j`h qi0bf# j`90 -o ,L jfƒhĈ qf jh` qf jh`f90 -}]f ,- j$fС򈈈- )9 ]m L/툈`HV0 VVWKSOHߦH ,N*\V ,7 ZLum\Lum28y8RŵJZV[ILVZLV&&Deee<芦;}򪽴0 08``L2,8 -m3-90 3m4.:0 9/ v g!gwȱȱ }sd ȱ }Nd  d[5r{re[6r|r[8r~rrvrvr r ]rr rLv rLv ]rЋ`P`0`0``pp0P0jz0f3&& Ȅ vnwnn nPn ,n 1ktpt12lt!2qtH h г  L tLt` t t   *WOn+WPn LLy]Lrxw] 7 L\< LP ]m P ]mP ]m8  L9 L}} `m(&' Zm(L^y , Ǘ]:  L8  L; LLyIxIx 96, j0 j) , j& j , j  j2 ʀ`22LN2LN"L#|0N8,}]#;< ,)8` "L؀2} q j2 q j,`,;< ,)8`28} q, j2 q, j,`8L | ӃZf\Pn9-! LmLmLmLmLmLm Ȅ 9-! LnLnLnLnLnLnx? z xxx@EE>й`JJJJ 3 u3!u=>?@ t=>) 3 u3!uLt uuu ?uF]`pp`PP@ = >?@׍ u2!u t? uZ!u t  rrLr F8 ?u` #|#`8  -`;L |2} q, j# 822O , K`,#8`2 2/8`8} q, j2Lp2,#L#|2 q, j "0 8`8`"" #  "t0 82`L X82} q,}]  ~sL2s is s s s  s s  s $` s# OnsPnL,n ~s s s LscFc^`0紜HHHHHHHHHHHHHvvvwWwpwWwpvvvwWwpvvvvnnnnnnnnnnvvvwWwpwWwpvvvwWwpvvvv HIEDFEKHBGICHDLMFNJOKuOLNMTQPRQSRaWUPTVUXTYW[ZXY\vYZ]\^_]q]`_a`bSacbhedfegfukidhljimhomilponrplo^rqsortvsgN[thhhh!h(h,h0hh7h>hEhahnhhhhhhhi9iRi   #@@<, `ժժ׽?ժ?W_U wWW>UUzWxWkVxVUUNZrZ~ZZZfZZZZZpppppppppppp66666666pppp66            %*WY o  !           !!                                      LoLoLoLoLqL1qL,n  ||||||||||||<??<<>>>>>>>>>>>>>||? Cc   !     $$$#          "                !                ! vwWwnnnvvvwWwnnn wÙp??????????????                                                         nnnnnnnnnnvvvwWwpwWwpvvvpwWwpvvvwWwpvvvvnnnnnnnnnnnnnvvvwWwpwWwpvvvpwWwpvvvwWwpvvvv _iuiiiiiij9jFjVjjjjhjjjjjjk kkhhh k$khhhhhhh(kh,k6kFkPkWkhhhhhmkhtkhhhhhxkh|k|khkkkkkhkhkllhlh l$lhh4lh8l=?>9A@;GLwLwpLopLgpL_pL`qLtqLpLpLqLqLqLrL]rLrLrLsLtLtLtL?uL}uLuL vL0vL4vL8v68*, @mm  :2ym2S2$2y2- nnnnm м в`  :2ym2^ ?y>Ͻ۶                                                               ,$-#.#/ 01$2#3456 78$9#:;< =M$#> ?M$#@ ALBCDEFGHIJ                                                                                                                                                                  TTTTUVV^^VPRRqG??Lj1?>pߟ?wwwhwwwwwwww"3 @ܪڋ    bcdbcdedfhghededdd$dhdijdijdkhlhmdkdkd$ddh                        VUONOPOZ[WRSQTR\XRSQTR]SSQTT_a_Q`a`YSQT^nn nn ,S):05 ::::,X,Y,"":,X,Y,L$:,X,Y,"":Z5 ::::,X,Y,"":,X1,Y,L$:,U,Y,"":}5 ::::"":0,6,4:4,1,1:1,>,75 ::::,15,0," ":,15,1,⢢"5 ::::1,12 ::::X15y ݝދ~D~EHEj'/#!d&@X@@X@XD@ȈEPPPXPEPPPU@JX@YݞPϞY"rj#2&j/#!fU :::Y1>338,&}&BZ:}ُMyىܟtُ MyQ]] KwiwK ;::Z$:Z$"";:::: (Z$)13:1=950,5;::::P(CV$,Z$,1)<::::(Z$)20LL03830L<::::LLLL1:LZ$(LZ$,LL):" ";:KKLL1CV$CV$"."<::::P0LLLGZ$;:LZ$LZ$Z$:LLLL1:Z$"."CV$(CV$,10):KKLL<::::""K ,7,6,"7"9 ::::,15,6,"16"9 ::::,18,6,"19"9 ::::,24,6,"25": ::::,33,6,"34": ::::,4,9,"5"0: ::::,12,9,"14"E: ::::,21,9,"23"Z: ::::,30,9,"32"n: ::::,1,12,"3":::::,7,12,"9":::::,9,12,"12":::::,15,12,"K "":YY1:,X,Y,"":XX8:I7 ::::,8,15,"":,8,16,""(8* ::::X15:I13:Y15:,X,Y,"":YY1:,X,Y,"":XX8:IS84 ::::,8,14,"Ϸзз"8> ::::Y6:I13:J12:,0,Y,"":YY1:J:YY1:I8H ::::Y6:I13:X2:J1138RK  ::::1,1,5:X14:Y0:L$" ROULETTE ":3220 6 ::::,4,6,"4 10 13 22 28 31"A6 ::::,1,9,"2 8 11 17 20 26 29 35"p6 ::::,4,12,"6 15 24 33"6 ::::,8,2,"Ϸзз"6 ::::Y5:I13:,0 :::: ZZJN%13 ::::NO$(ZZ)NO$(ZZ1)3 ::::AP(ZZ)AP(ZZ1)4 ::::O%(ZZ)O%(ZZ1)<4 ::::I07:VE(ZZ,I)VE(ZZ1,I):IM4& ::::ZZZZ1X40 ::::w4: ::::NO$(ZZ)"":JN%JN%14D ::::AP(ZZ)04N ::::O%(ZZ)04X ::::I07:VE(ZZ,I)0%TT1,144:52,55:56,55::29999<::::<::::,3,23,"": " ":4000=(::::N%((1)61):S%SO%(N%)8=2::::N%((1)61):C%CL%(N%)[=<::::N%((1)61):M$MR$(N%)=F::::1,C%,3::X138:,X,1,M$:X=P::::I16:1,S%,3:I=Z:K ;::Z$: Z$""< :::::" ";<::::<::::,3,23,"": " ":4000=(::::N%((1)61):S%SO%(N%)8=2::::N%((1)61):C%CL%(N%)[=<::::N%((1)61):M$MR$(N%)=F::::1,C%,3::X138:,X,1,M$:X=P::::I16:1,S%,3:I=Z:K 18":$::::,18,12,"21":.::::,24,12,"27":8::::,27,12,"30";B::::,33,12,"36";L::::1,1,75;V::::X36:Y6:L$"R1":3210P;`::::Y9:L$"R2":3210l;j::::Y12:L$"R3":3210w;t::::;::::;::::LL0:LZ$"";::::""K  ::::,X,Y,"":,X,Y1,"":XX3:J:YY3:I8\ ::::X12:Y3:L$"0": 32109f ::::X18:L$"EVEN":321089p ::::1,1,7:,26,3,"BLACK"Y9z ::::X11:Y15:L$"00":3210v9 ::::X18:L$"ODD":32109 ::::,26,15,"RED"9 ::::,1,6,"1"9 ::::K ,Y,"Ϸззззззз"6 ::::,22,Y,"ззззз":YY3:I#7 ::::,0,14,""H7 ::::,22,14,""s7 ::::,8,17,""7 ::::,8,3,"":,8,4,""7 ::::X15:I13:Y3:,X,Y, . ::::1,1,5. ::::LG1:3770:OP%(LZ$)/ ::::LZ$""2700&/ ::::AP(Z)AP(Z)VE(Z,OP%)M/ ::::VE(Z,OP%)0:VE(Z,0)VE(Z,0)1X/ ::::/ ::::Y19:,3,Y,"YOU HAVE $":,13,Y,"":AP(Z);"TO BET.":YY1/ ::::,3,Y,"HOW MUCH DO YOU WANT 1,2,7:3190:Y24:3000:1,1,71, ::::X0:Y20:S38:L13:3200:YY1:L16 ::::Y20:278071@ ::::T11000002930l1J ::::Y22:X3:E$"THE MAXIMUN BET IS $100,000"1T ::::1,2,7:3190:Y24:3000:1,1,71^ ::::X0:Y20:S38:L13:3200:YY JN%1:PR(L)0:L, ::::670- ::::AP(Z)AP(Z)PR(Z)DM(Z):DDAP(Z)- ::::.- ::::DDAP(Z)9- ::::M- ::::"":3880- ::::X5:Y5:L$(CO$,Z1,1)NO$(Z):3210:1,1,5- ::::1,4,3:X2:Y7-( ::::L$"WHAT DO YOU WANT TO SELL:":144:52,55:56,55::29999)13-L ::::.V ::::18101.[ ::::,6,7,""d.` ::::,6,8," I HOPE YOU HAD FUN ON CASINO ".e ::::,6,9,"".o ::::,16,14,"".t ::::,16,15 URN>"::Z$-B :::: (Z$)13-L ::::.V ::::18101.[ ::::,6,7,""d.` ::::,6,8," I HOPE YOU HAD FUN ON CASINO ".e ::::,6,9,"".o ::::,16,14,"".t ::::,16,15  ::::"";::Z$:Z$"". :::: (Z$)13:1,950,5. ::::P(CV$,Z$,1)7. ::::(Z$)20LL02860u." ::::LLLL1:LZ$(LZ$,LL):" ";:KKLL1CV$CV$"."., ::::P0LLLGZ$;:LZ$LZ$Z$:LLLL1:Z$"."CV$(CV$,10):KKLL.6 ,38,Y,M$:Y/ ::::I16:1,S%,3:I0 ::::Y231 1:,1,Y,M$:Y"0 ::::I16:1,S%,3:ID0 ::::X381 1:,X,23,M$:X_0 ::::I16:1,S%,3:Iq0 ::::1,1,7:0 ::::NS%((1)61):S%SO%(NS%)0 ::::NS%((1)61):C%CL%(NS%)0 ,Y,(BB$,S):, ::::,X,Y," ":,X,Y,"":,X,Y,L$:,X,Y,"":@, ::::,X,Y,"":,X1,Y,L$:,X,Y,"":N, ::::SA0e, ::::I16:N(I)0,( ::::K15:N(I)N(I)(1):K,2 ::::SAN(I)SA,< ::::I,F ::::I16,P ::::PX(I) D ::::I16:1,S%,3:I1N ::::1,1,7:1X ::::72b ::::3180:I152:A,B:1,A,B:Ii2l ::::596,5,1020,5,704,5,1020,5,770,5,1020,5,810,5,1020,5,810,5,1020,5,810,52v ::::1020,5,770,5,1020,5,770,5,1020,5,770,5,1020,5,704,5,1020,5,770,53 3::::3730:I137:A,B:1,A,B:I.4::::596,5,1020,3,596,5,1020,3,596,5,1020,6,596,5,1020,3,596,5,1020,3,596,5z4::::1020,6,596,5,1020,3,596,5,1020,3,704,5,1020,6,739,5,1020,6,770,104::::1020,6,704,5,1020,3,770,5,1020,3,810,25,1020,6,77G5/u::::50u::::TT,(TT)251:TT1,144:52,55:56,55::299990,3,596,5,1020,6,596,5,1020,3,596,5,1020,3,596,5z4::::1020,6,596,5,1020,3,596,5,1020,3,704,5,1020,6,739,5,1020,6,770,104::::1020,6,704,5,1020,3,770,5,1020,3,810,25,1020,6,77 TO BET"/ ::::,10,Y1,"":"( 100 -";AP(Z);")"0 ::::,30,Y,"?"A0 ::::LG6:CV$"0123456789":3770:T(LZ$):LZ$""2800f0 ::::T1T:T2(T100)100:TTT2z0 ::::T028800 ::::Y22:X2:E$"THE BET MUST BE A MULTIPLE OF 100"0" :::: 3210-2 ::::1,1,5-< ::::CV$" ":VV$"1234567" .F ::::Y9:I17&.P ::::VE(Z,I)02680H.Z ::::,2,Y,"":I:,5,Y,DE$(I)k.d ::::,24,Y,"$":VE(Z,I):YY1.n ::::CV$CV$(VV$,I,1).x ::::I. ::::1,4,3. ::::,17,20,"OPTION?" 1:L1h ::::Y20:27801m ::::T10 29802r ::::T1100T1AP(Z)298032| ::::Y22:X13:E$"INVALID BET"[2 ::::1,2,7:3190:Y24:3000:1,1,72 ::::X0:Y20:S38:L13:3200:YY1:L2 ::::Y20:27802 ::::DM(Z)T12 :::: ," BYE !!".y ::::,16,16,"".~ ::::1,1,5:$/ ::::,16,23,""::Z$9/ :::: (Z$)13I/ ::::1,2,7Y/ ::::65526/p::::TT("FF12"):774,0:1288,0:806,101:816,255:29999//u::::/0u::::TT,(TT)251:TT1,  ::::"";::Z$: Z$"".@ :::::" ";.J ::::!/T ::::NS%((1)61):S%SO%(NS%)F/^ ::::NS%((1)61):C%CL%(NS%)k/h ::::NS%((1)61):M$MR$(NS%)/r ::::1,C%,3::X138:,X,1,M$:X/| ::::I16:1,S%,3:I/ ::::Y123:  ::::NS%((1)61):M$MR$(NS%)1 ::::1,C%,3::X138:,X,1,M$:X"1 ::::I16:1,S%,3:I@1 ::::Y123:,38,Y,M$:Y[1 ::::I16:1,S%,3:I|1& ::::Y231 1:,1,Y,M$:Y10 ::::I16:1,S%,3:I1: ::::X381 1:,X,23,M$:X1 N(I)SA,Z ::::I,d ::::I16#-n ::::PX(I)0.5MOMIO(I)1:MOMIO(I)((1PX(I))1)/-x ::::I:- ::::H- ::::""- ::::0,10,5:1,7,3:X10:Y2:L$" HORCE RACE "- ::::2570:1,1,5- ::::- ::::- ::::LL0:LZ$""- ::::1020,5,704,5,1020,5,596,15,1020,20,596,5,1020,5,704,5,1020,5,770,5L3 ::::1020,5,810,5,1020,5,810,5,1020,5,810,5,1020,5,770,5,1020,5,770,53 ::::1020,5,770,5,1020,5,596,5,1020,5,596,5,1020,5,596,5,1020,5,704,30,1020,103t::::3~::::7 0,5,1020,3,739,54::::1020,3,704,5,1020,6,770,5,1020,6,704,105::::15h::::1,2,7:,9,0,""[5r::::,9,1," HORSE RACE "5|::::,9,2,""5::::5::::"":0,1,25::::65526 @` s0b0ب!p@>@ 8 pa80 q`0ب0 `@@@@Æ80a\<DdŅ 0ب0 ``x :::Y5:I16:1,I,3:,0,Y," "#::::,0,Y1," "8::::,1,Y1," "J ::::YY3:Il::::,10,3," S T A R T !!"::::3710:,10,3," "::::,26,3," FINISH "::::Y5:I16:,27,Y,""::::,27,Y1 MOM$((MOMIO(I)),2)"-1)":,13,Y,MOM$:YY1:I80::::Y15:I46:r:::::MOM$((MOMIO(I)),2)"-1)":,33,Y,MOM$:YY1:ID::::1,5,3N::::,16,19,"OPTION?":1,1,5X::::,19,21,"":LG1:CV$"123456":2800:O(Z)(LZ$)b::::LZ$"" NT TO SELL":2560"::::Y12:L$"ANY OF YOUR PROPERTIES(Y/N)?"5"::::2560:1,1,5e"::::,33,12," ":LG1:CV$"NY":2800:P$LZ$}":::: LZ$""1710"::::P$"Y"1800"::::ZZZ"::::2410:ZZ1"::::1810"::::1890" ,3:X4:Y7$::::L$"WHAT DO YOU WANT TO SELL:": 2560!$::::1,1,5@$::::CV$" ":VV$"1234567"T$::::Y9:I17n$::::VE(Z,I)02000$::::,2,Y,"":I:,5,Y,DE$(I)$::::,24,Y,"$":VE(Z,I):YY1$::::CV$CV$(VV$,I,1)$: VE(Z,0)01660 J::::"":2900:1,C,3:,5,5,NO$(Z):1,1,7H T::::,7,7,"YOU CAN'T PLAY ANY MORE" ^::::,5,9,"YOU LOST ALL YOUR MONEY ":,9,11,"AND YOUR PROPERTIES!!" h::::,13,14," SORRY !!!" r::::2350:ZZZ:2410:ZZ1:1810!| . "%/::::YY1)&4::::,2,Y,"HOW MUCH DO YOU WANT TO BET ":,19,21," "P&9::::,11,Y1," "{&>::::,11,Y1,"":"( 100 -";AP(Z);") "&H::::,30,Y,"?"&R::::LG6:CV$"0123456789":2800:T(LZ$):LZ$""2120&\: P::::ZZ::::Z0d::::!n::::O(Z)GR1490@x::::PR(Z)MOMIO(GR)DM(Z)X::::PR(Z)D1470l::::"":2900::::,5,5,"THE RACETRACK IS CLOSE!!!"::::2350::::5000::::1850::::1500:::: :::T11000002270(::::Y11:X5:E$"THE MAXIMUM BET IS $100,000"6(::::1,7,3:2540:2342c(::::1,C%,3:X138:,X,23,M$:X:1,1,5(::::X1:Y8:S35:L15:2550:YY1:L(::::Y8:2100(::::T1100 T1AP(Z)2330(::: I),Y1," ":GR0GRI$::::1090<.::::P(I)P(I)2(1PX(I)(0)):1,I,2i8::::,P(I),Y," ":,P(I),Y1," "uB::::IL::::BI255960::::,8,23,"THE WINNER IS: ":OP$(GR);:1,1,5::::I12000::3040:: :::: (Z$)13:2550"*. ::::X4:Y23:L$" CONTINUE END ":25702*B ::::: Z$Q*L :::: (Z$)13 Z$"E"u*V ::::1,1,7:X0:Y23:S39:2550*` ::::*j :::: ZZJN%1*t ::::NO$(ZZ)NO$(ZZ1)*~ ::::AP(ZZ)AP(ZZ1) ,""::::1,I,3:"";:,33,Y,(OP$(I),6)""-::::1,1,5?::::YY3:IX::::I16:P(I)0:m::::GR0:BI192::::Y(TI):I16:Y(I1)35:1,500,1:1,1020,1::::P(I)271000::::BIBI2(I1):,P(I),Y," ":,P(I 580l::::AP(Z)AP(Z)DM(Z)(v::::ZZ1:ZJN%1D::::"": 4200:1,1,5o::::Y7223:X037:,X,Y,"":X:Y::::Y5:I16:1,I,3:,0,Y,""::::,1,Y1,""::::,0,Y1,((I),2)::::YY3:I::::3160: ::::CC2:ZZ1":::: ZJN%1#&::::L0JN%1:PR(L)0:L+#0::::400V#:::::AP(Z)AP(Z)PR(Z)DM(Z):DDPR(Z)a#D::::|#N::::DDDM(Z):PR(Z)0#X::::#b::::"":2900#l::::1,C,3:X5:Y5:L$NO$(Z):2560:1,1,5#v::::1,7 :::I$::::,17,20,"OPTION?" %::::1,1,5(%::::LG1:2800:OP%(LZ$)?%::::LZ$""2010^% ::::AP(Z)AP(Z)VE(Z,OP%)%::::VE(Z,OP%)0:VE(Z,0)VE(Z,0)1% ::::%*::::Y7:,2,Y,"YOU HAVE: $ ":,13,Y,"":AP(Z);"TO BET ::::"":2900:1,C,3:X10:Y5:L$NO$(Z):2560:1,1,5Q!::::1,5,2:X5:Y7:L$"YOU LOST ALL YOUR MONEY!!":2570f!:::: GOSUB2350!:::: X=4:Y=7:S=25:GOSUB2550!::::1,C%,3:X138:,X,23,M$:X:1,1,5!::::1,5,2:X5:Y11:L$"DO YOU WA :::T1T:T2(T100)100:TTT2'f::::T02210A'p::::Y11:X2:E$"THE AMOUNT MUST BE A MULTIPLE OF 100"]'z::::1,7,3:2540:2342'::::1,C%,3:X138:,X,23,M$:X:1,1,5'::::X1:Y8:S36:L15:2550:YY1:L'::::Y8:2100': 1870::::ZZ1 :::: ZJN%1!::::Y9:Z0JN%1Z::::,31,Y,"":PR(Z)0" LOST ":,30,Y,"$":PR(Z)m::::YY1: Z|::::2350:::: GOSUB2740"::::Z$"E"5000,::::C3:Z0:6::::AP(Z)1001810@:::: :Y11:X16:E$"INVALID BET")::::1,7,3:2540:23423)::::1,C%,3:X138:,X,23,M$:X:1,1,5_) ::::X1:Y8:S35:L15:2550:YY1:Lr) ::::Y8:2100) ::::DM(Z)T1)$ ::::)& ::::X16:Y23:L$"":2570)( ::::: Z$)* ::4200:1,1,5::::1,14,3J ::::X2:Y6:L$" NAME BET AMOUNT WIN/LOSE":2560:Y9Z::::1,1,7r::::C3:Z0JN%1(::::1,C,3:,2,Y,NO$(Z):1,1,52::::,12,Y,"":OP$(O(Z))<::::,22,Y,"$":DM(Z)F::::CC2:YY1 * ::::O(ZZ)O(ZZ1)+ ::::I07:VE(ZZ,I)VE(ZZ1,I):I+ ::::ZZZZ1$+ ::::C+ ::::NO$(ZZ)"":JN%JN%1U+ ::::AP(ZZ)0f+ ::::O(ZZ)0+ ::::I07:VE(ZZ,I)0:I+ ::::JN%05000+ ::::+ ::::,X,Y,E$:+ ::::,X1 ),Y1," ":GR0GRI::::1020=::::P(I)P(I)2(1PX(I)(0)):1,I,2j::::,P(I),Y," ":,P(I),Y1," "u::::::::I16:Y(I1)35:1,500,1:1,1020,1::::P(I)271070::::BIBI2(I1):,P(I),Y," ":,P( x`<|bf 0fFf<00`0~~p f>``|fff|fff>60x000>ff>|``|fffff<``flx|f8<kcc|ffffff>|f```<`<|00006ffff<fff<ck6"f<|~ 0~<00000< 0|0b< <<~t>3333339 A"$  $HANY PLAYERS?"0::::LG1:CV$"12345":2800:JN%(LZ$)F::::LZ$""250_"::::Y13:K0JN%1,::::,4,Y,"NAME OF PLAYER":K1,6::::YY1@:::: KJ::::Y13T::::LG8:CV$"ABCDEFGHIJKLMNOPQRSTUVWXYZ"^::::Z0JN%1:0ffffffff>`<|bf 0fFf<00`0~~p  p::::,3,15,"1) SILVER("\::::,23,15,"4) QUEEN ("y::::,3,16,"2) FLASH ("::::,23,16,"5) JOY ("::::,3,17,"3) WIND ("::::,23,17,"6) MORO ("::::Y15:I13:"&::::TPSLX@(`<|bf 0fFf<00`0~~pf>``|fff|fff>60x000>ff>|``|fffff<``flx|f8<kcc|ffffff>|f```<`<|00006ffff<fff<ck6"f<|~ 0~<00000< 0|0b< <<~ h::::,25,Y,"?")r::::2800:NO$(Z)" "LZ$" "?|::::LZ$""360Q::::YY1:Z`::::2580u::::W1:C1:Z0:::::DO:::: 3040::::4200:1,1,5:::::CC2::::1,C,2:X5:Y5:L$NO$(Z):2560:1,1,5:2090! >>00000000 @ @ H$p88p<~~~~<6>````````9 ~<<~<~ff~<ff<>>0000>v66 LZ$,LL):" ";:KKLL1CV$CV$"."A'::::P0LLLGZ$;:LZ$LZ$Z$:LLLL1:Z$"."CV$(CV$,10):KKLLb'::::"";::Z$:Z$""s':::::" ";~'::::'::::N%((1)61):S%SO%(N%)'::::N%((1)61):C%CL%(N%)'&::::N% YOU BET ON THE WINNING HORSE. "&%J::::,3,12,"THE AMOUNT YOU CAN WIN DEPENDS"W%T::::,3,14,"ON THE ODDS OF EACH HORSE THAT"%^::::,3,16,"WILL BE SHOWN AT THE BEGINNIG OF"%h::::,3,18,"EACH RACE."%::::580&::::2050:"A$=C(34)+C x"::Z$q,:::: (Z$)13,::::1,1,1:"",::::,3,6,"- WHEN ANY PLAYER WINS MORE THAN",::::,5,":1,1,5~::::,3,5,"A) BETTING PASS:"D::::,3,8,"YOU WIN IF THE FIRST THROW IS 7 "v::::,3,10,"OR 11 AND YOU LOSE IT THE FIRST"::::,3,12,"THROW IS 2, 3 OR 12."::::,3,14,"IF YOU THROW ANY OTHER NUMBER," ::::,3,16,":I)::::Y2311:,1,Y,M$:Y *::::I16:1,S%,3:I+*::::X3811:,X,23,M$:XF*::::I16:1,S%,3:IX*::::1,1,7:m*::::"":0,1,5* ::::1,2,5:,10,10,"WAIT..."*::::1,1,5* ::::**::::"":0,10,4:4,11 >>00000000 88p88p<~~~~<6>````````<~ff~<ff<>>cccc((1)61):M$MR$(N%)(0::::1,C%,5::X138:,X,1,M$:X)(:::::I16:1,S%,3:IG(D::::Y123:,38,Y,M$:Yb(N::::I16:1,S%,3:I(X::::Y2311:,1,Y,M$:Y(b::::I16:1,S%,3:I(l::::X3811:,X,23,M$:X(v::::I16(51)+C(27)+C(68):LOAD(A$),8,1":"RUN"-&::::1319,19:1320,13:1321,13:239,3:B&::::LL0:LZ$""c&::::"";::Z$:Z$""&:::: (Z$)13:1,950,5&::::P(CV$,Z$,1)&:::: (Z$)20LL01770&::::LLLL1:LZ$ 0ffffffff>`<|bf 0fFf<00`0~~p  p::::,3,4,"COMMON RULES FOR ALL THREE GAMES:"y+C::::,3,5,""+H::::,3,10,"- EACH PLAYER STARTS WITH $2000"+R::::,3,12,"- THE MAXI?333333cc<<:1,S%,3:I(::::1,1,7:)::::N%((1)61):S%SO%(N%)1)::::N%((1)61):C%CL%(N%)T)::::N%((1)61):M$MR$(N%){)::::1,C%,5::X138:,X,1,M$:X)::::I16:1,S%,3:I)::::Y123:,38,Y,M$:Y)::::I16:1,S%,3 ?::::TT("FF12"):774,0:1288,0:806,101:816,255:29999T::::(142)(8)m::::I18:I,"":I ::::LE$(22)::::"W","E","L","C","O","M","E","T","O","P","L","U","S"," ","C","A","S","I","N","O"::::I120:LE$(I):I<::: "p::::,6,14,"ROWS, YOUR ODDS WILL BE 2 TO 1"Ez::::,6,15,"ON EACH BET. "v::::,3,17,"C) IF YOU BET ON ANY NUMBER "::::,6,18,"YOUR ODDS WILL BE 36 TO ONE"::::,6,19,"ON EACH BET."::::580:2050"::::2050: "' ::::,3,10,"THE ROULETTE BOARD IS DIVIDED IN "[::::,3,11,"38 NUMBERED SLOTS INCLUDING 0 AND" ::::,3,12,"00. 18 ARE RED AND 18 ARE BLACK."4::::,3,14,"THE 0 AND 00 HAVE NO COLOR.":580:"":19309::::,15,3,""  (::::Y19:Z0JN%1)::::,31,Y,"":PR(Z)0"LOST":,30,Y,"$":PR(Z)0)::::YY1: ZD)::::Y24:3052[)::::Z$"E"4000n)::::C3:Z0:)::::AP(Z)1002480)::::VE(Z,0)02270)::::"":3880:X2:Y2:L$(CO$,Z1::::,16,23,""X:::::Z$0b:::: (Z$)13@l::::1,1,7\v::::I023:,I,23," "g::::v::::1810::::1,2,7::::,15,2,""::::,15,3," ROULETTE "::::,15,4,""::::1,0:E0: L11:&b::::NA%F2%(L)E1 'l::::LL1'v::::?'::::E1PR(Z)DM(Z)2:2530:Ս2550N'::::2030j'::::L0:E0: L11:'::::NA%F3%(L)E1'::::LL1'::::'::::E1PR(Z)DM(Z)2:2530:Ս2550'::::1 1:,1,I,"":1,((1)900I),2: I,::::1,1,5F::::,19,4,""d::::,19,5," MENU "~::::,19,6,""::::1,1,5:,4,11,"A) ROULETTE"::::,4,13,"B) CRAPS"::::,4,15,"C) HORSE RACE "::::,4,1):2530:Ս2550$:::: 2030%::::L0:E0: L17:)%::::NA%RO%(L)E18%::::LL1C%::::j%::::E1PR(Z)DM(Z):2530:Ս2550z%:::: 2030%::::NA%0R1:A(NA%2):RNA%(2A)%::::R0PR(Z)DM(Z):2530:Ս2550%:::Z$:::: (Z$)13:2090=::::SO%(6),CL%(6),MR$(6):7`::::900,950,1000,970,930,850"::::285:I16:SO%(I):I,::::5,9,7,8,3,126::::300:I16:CL%(I):I@::::"","*","","","",""J::::320:I16:MR$(I):O YOU WANT INSTRUCTIONS(Y/N)?"#::::LG1:CV$"YN":1710:::::LZ$""1000X::::O$LZ$:O$"N"1440g::::1930w$::::1,1,5)::::,17,3,"".::::,17,4," CRAPS "3::::,17,5,""8::::1,1,5:B:::""F::::0,1,4'P::::7::FOCOSRZ::::1,7,5: I5 31:,I,5,"ф": I~d::::1,8,5: I5 19:,31,I,"ф": In::::1,6,5: I31 5 1x::::,I,19,"ф": I::::1,3,5: I19 5 1:,5,I,"ф": I::::1,5,5  "A$=C(34)+C(49)+C(27)+C(68):LOAD(A$),8,1":"RUN"O::::1319,19:1320,13:1321,13:239,3:^::::1810n::::1,1,5::::,17,2,""::::,17,3," CRAPS "::::,17,4,""::::1,2,7:::::,5,12,"D>::::,15,4," ROULETTE "1C::::,15,5,"":1,1,7eE::::,3,9,"A) IF YOU BET ON RED, BLACK, ODD "H::::,6,10,"OR EVEN, YOUR ODDS WILL BE"R::::,6,11,"1 TO 1 ON EACH BET"f::::,3,13,"B) IF YOU BET ON ANY OF THE THREE,1)NO$(Z):3210:1,1,7 *::::,9,7,"YOU CAN'T PLAY ANY MORE "U*::::,10,9,"YOU LOST ALL YOUR MONEY":,10,11,"AND YOUR PROPERTIES"y*::::,13,14," SORRY !!!"*::::Y23:3000:ZZZ:3060:ZZ1:2480*::::"":3880:X10:Y5:L$(CO$2,7&::::,4,12,"DO YOU WANT INSTRUCTIONS (Y/N)?C::::LG1:CV$"YN":1710Y::::LZ$""690v::::O$LZ$:O$"N"940::::1930::::1,2,7::::,15,3,""::::,15,4," ROULETTE "::::,15,5,"2030'::::O%(Z)O%(Z)100(::::O%(Z)NA%PR(Z)DM(Z)36:2530:Ս25507(::::O%(Z)O%(Z)100O(::::PR(Z)D2080c(::::"":3880(::::,5,5,"CASINO IS CLOSED!!!"( ::::3000(::::3870( ::::ZZ1(*:::: ZJN%17,"D) END "'::::1,2,7:,22,19,"OPTION?"7::::1,1,1V::::LG1:CV$"ABCD":1710l::::LZ$""490}::::OP$LZ$::::OP$"A"650&::::OP$"B"9600::::OP$"C"1460:::::OP$"D"2390D::::1,1,5: N:::2030 &::::NA%37R0:A(NA%2):RNA%(2A)0&::::R1PR(Z)DM(Z):2530:Ս2550?&::::2030[&::::L0:E0: L11:t&&::::NA%F1%(L)E1&0::::LL1&:::::&D::::E1PR(Z)DM(Z)2:2530:Ս2550&N:::: 2030&X::::LIT::::""^::::1,1,7%h::::""5r::::1,8,5j|:::: I1 38:,I,1,"":1,((1)900I),2: I:::: I1 23:,38,I,"":1,((1)900I),2: I:::: I38 1 1::::,I,23,"":1,((1)900I),2: I:::: I23 ::,3,10,"CRAPS IS A TWO DICE GAME,"4L::::,3,12,"WITH TWO BETTING OPTIONS:"RV::::,11,15,"A) 'PASS '"u`::::,11,17,"B) 'DON'T PASS'"j::::580:"":1930:1,1,5o::::,17,2,""t::::,17,3," CRAPS "y::::,17,4,"::::X16:I17+::::2,950,3:,X,10,LE$(I)=::::XX1:IR::::X18:I89r::::2,950,3:,X,12,LE$(I)::::XX1:I::::X14:I1020::::2,950,3:,X,14,LE$(I)::::XX1:I::::1,9,5:::::,16,23,"" ?::::TT("FF12"):774,0:1288,0:806,101:816,255:29999X::::I18:I,"":Id ::::8:::: NO$(4),AP(4),RO%(17),NE%(17),F1%(11),F2%(11),F3%(11),O%(4),PR(4),DM(4) :::: DE$(7),VE(4,7),GX(7),GY(7),PX(37),PY(37),CX(37),CY(37),MR$(6 W 3 " ::::,2,22,"2 RED "( ::::,14,22,"5 ROW 1 "F::::,28,22,"8 NUMBER"a ::::,2,23,"3 EVEN"*::::,14,23,"6 ROW 2 "4::::1,2,7>::::,27,23,"OPTION?":1,1,5H::::LG1:CV$"12345678":3770:O%(Z)(LZ$)R: NOPQRSTUVWXYZ"X::::Z0JN%1:%b::::,23,Y,"?"Gl::::3770:NO$(Z)" "LZ$" "]v::::LZ$""610o::::YY1:Z::::X0:Y19:S38:J1JN%:3200:YY1::::J::::W1:Z0::::::::X4:Y18:L$(CO$,Z1,1)NO$(Z) Y18:L$(CO$,Z1,1)NO$(Z):3210:1,1,57::::,8,20,"WHAT NUMBER (00,0-36)?"K::::,31,20,""}::::LG2:CV$"0123456789":3770:LZ$""960::::LZ$"00"1040:O%(Z)(LZ$):B0::::O%(Z)0O%(Z)371050::::Y21:X13:E$"T::::900,950,1000,970,930,850,::::I16:SO%(I):IC::::5,9,7,8,3,12^::::I16:CL%(I):I::::"","","*","","",""::::I16:MR$(I):I:::: 3230::::,10,22,"(1-5)"::::,1,21," HOW MANY PLAYERS ?"):AY(W)PY(O%(Z))B::::WW1 L::::I110:1,1000,5:I0V::::1,1,5I`::::O%(Z)O%(Z)100Xj::::ZZ1lt:::: ZJN%1~::::1,1,3:X8:Y21:L$"PRESS TO PLAY":3220:1,1,5:::::Z$:::: (Z$)32::::X,7,10,13,7,10,13,7,10,13,7,10,13,7,10,1396::::IO21:PY(I):In@::::7,10,13,7,10,13,7,10,13,7,10,13,7,10,13,16J::::I2237:PY(I):IT::::12,1,4,7,10,13,16,19,22,25,28,31,34,1,4,7,10,13,16,19,22,25,28,31,34^::::I024:CX(I):I::O%(Z)71229 !::::,12,Y,OP$(O%(Z))!::::1230N!::::O%(Z)137,13,Y,"00":,13,Y,"":O%(Z)100i!::::,20,Y,"$":DM(Z)!::::CC2:YY1:Z!::::R2:K12:Y7!::::I13:!::::X1:!::::J112:!::::WW15:TORCYCLE,TV SET,CLUB MEMBERSHIP,HOUSER::::BB$"":I1100:BB$BB$" "::CO$""m::::I17:DE$(I):I::::BLACK,RED,EVEN,ODD,ROW 1,ROW 2,ROW 3::::I17:OP$(I):I::::28,28,20,20,37,37,37::::I17:GX(I):I ::W)1430"x::::WW#::::1,1,5:2,900,2:,CX(I),CY(I),"ф"7#::::,CX(I),CY(I)," "[#::::CX(I)NXCY(I)NY1500y#::::,CX(I),CY(I),"ф":#::::NN8409205:1,NN,1:NN#::::NN1120:NN#::::NN880900:1,NN,1:NN#),CL%(6),SO%(6) (::::D5000000J2::::A1: L0 11:F1%(L)A:AA3:Lq<::::A2:L011:F2%(L)A:AA3:LF::::A3:L011:F3%(L)A:AA3:LP::::1,3,5,7,9,12,14,16,18,19,21,23,25,27,30,32,34,36Z::::I017:RO%(I):I+d::::2,:::LZ$""820\::::AP(Z)AP(Z)DM(Z)?f::::S38:X0:Y18:L16:3200:YY1:LWp::::O%(Z)8 940lz::::XGX(O%(Z))::::YGY(O%(Z))::::,X,Y,(CO$,Z1,1)"*":1,1,7::::I110:1,1000,5:I:::: 1130::::X2::3210:1,1,5:2770,::::X0:Y18:S38:J16:3200:YY1:Jb::::X4:Y18:L$(CO$,Z1,1)NO$(Z):3210:1,1,5::::1,15,3:X15:Y19:L$" BETS: ":3210:1,1,5::::,2,21,"1 BLACK"::::,14,21,"4 ODD "::::,28,21,"7 RORY IT AGAIN"::::1,2,7:3190:Y24:3000:1,1,7F::::X0:Y20:S38:L13:3200:YY1:LY::::Y20:950o::::O%(Z)37:B1::::X0:Y18:S35:3200:Y20:3200:.::::,PX(O%(Z)),PY(O%(Z)),(CO$,Z1,1)"*"8::::AX(W)PX(O%(Z)::::LG1:CV$"12345":3770:JN%(LZ$)0::::LZ$""490]::::S30:X0:Y21:L12:3200:YY1:Lv::::Y19:K0JN%1&::::,1,Y," NAME OF PLAYER":K1,0::::YY1::::: KD::::Y19N::::LG10:CV$"ABCDEFGHIJKLM5:Y21:S30:3200 ::::NA%((1)37) ::::NXPX(NA%)2 ::::NYPY(NA%)B ::::1,9,3 ::::X2:Y18:L$" NAME BET AMOUNT WIN/LOSE":3210:Y19 ::::1,1,7 ::::Z0JN%1 ::::,0,Y,(CO$,Z1,1)NO$(Z):1,1,5 ::"h::::1,4,7,10,13,16,19,22,25,28,31,34,12>r::::I2537:CX(I):I|::::4,7,7,7,7,7,7,7,7,7,7,7,7,10,10,10,10,10,10,10,10,10,10,10,10::::I025:CY(I):I::::13,13,13,13,13,13,13,13,13,13,13,13,16::::I2637:CY(I):I XAX(WW)YAY(WW)1320"::::WW'" ::::1,1,5:2,900,2:,X,Y,"ф"::"::::L1R:LM"::::,X,Y," "\"(::::XX3h"2::::Jw"<::::YY3"F::::I"P::::RR10"Z::::K"d::::I037"n::::WW15:CX(I)AX(WW)CY(I)AY(W::4,16,4,16,7,10,13&::::I17:GY(I):Ir::::12,1,1,1,4,4,4,7,7,7,10,10,10,13,13,13,16,16,16,19,19,19,22,22,22::::I024:PX(I):I::::25,25,25,28,28,28,31,31,31,34,34,34,12"::::I2537:PX(I):I,::::4,7,10,13,7,10,13::::NN9007701:1,NN,1:NN$::::I38$::::I!$@::::Z0::$T::::O%(Z)7 2000n$^:::: O%(Z)1640,1700,1760,1790,1820,1880,1940$h::::L0:E0: L17:$r::::NA%NE%(L)E1$|::::LL1$::::$::::E1PR(Z)DM(Z4,6,8,10,11,13,15,17,20,22,24,26,28,29,31,33,35Gn::::I017:NE%(I):Iex::::I04:AP(I)2000:I::::7,2000,3000,1000,1500,900,500,4000::::I04:130:J07::::: VE(I,J)::::J::::I::::CAR,YACHT,COMPUTER,MOA < `PLUS.CASINO202A"0D!"2D%"3D'"1D0"AMGIS6D "AMGIS7D 11)KK 0 123P/ SABOTEURKKKKKKKKKKKKKK ?::::TT("FF12"):774,0:1288,0:806,101:816,255:29999T::::(142)(8)m?::::TT("FF12"):774,0:1288,0:806,101:816,255:29999T::::(142)(8)m::::I18:I,"":I ::::LE$(22)::::"W","E","L","C","O","M","E","T","O","P?::::T ?::::TT("FF12"):774,0:1288,0:806,101:816,255:29999T::::(142)(8)m::::I18:I,"":I ::::LE$(22)::::"W","E","L","C","O","M","E","T","O","P","L","U","S"," ","C","A","S","I","N","O"::::I120:LE$(I):I<::::""F::::0,1,4' ::::XX1:IR::::X18:I89r::::2,950,3:,X,12,LE$(I)::::XX1:I::::X14:I1020::::2,950,3:,X,14,LE$(I)::::XX1:I::::1,9,5:::::,16,23,""::Z$:::: (Z$)13:2090=::::SO%(6),CL%(6),MR$(6):7`::::900,9 00I),2: I:::: I1 23:,38,I,"":1,((1)900I),2: I:::: I38 1 1::::,I,23,"":1,((1)900I),2: I:::: I23 1 1:,1,I,"":1,((1)900I),2: I,::::1,1,5F::::,19,4,""d::::,19,5," MENU "~:::::::OP$"A"650&::::OP$"B"9600::::OP$"C"1460:::::OP$"D"2390D::::1,1,5: N::::,16,23,""X:::::Z$0b:::: (Z$)13@l::::1,1,7\v::::I023:,I,23," "g::::v::::1810::::1,2,7::::,15,2,"::::,15,4," ROULETTE "::::,15,5,""' ::::,3,10,"THE ROULETTE BOARD IS DIVIDED IN "[::::,3,11,"38 NUMBERED SLOTS INCLUDING 0 AND" ::::,3,12,"00. 18 ARE RED AND 18 ARE BLACK."4::::,3,14,"THE 0 AND 00 HAVE N::,3,13,"B) IF YOU BET ON ANY OF THE THREE"p::::,6,14,"ROWS, YOUR ODDS WILL BE 2 TO 1"Ez::::,6,15,"ON EACH BET. "v::::,3,17,"C) IF YOU BET ON ANY NUMBER "::::,6,18,"YOUR ODDS WILL BE 36 TO ONE"::::,6,19,"ON EACH BET."::::,5,12,"DO YOU WANT INSTRUCTIONS(Y/N)?"#::::LG1:CV$"YN":1710:::::LZ$""1000X::::O$LZ$:O$"N"1440g::::1930w$::::1,1,5)::::,17,3,"".::::,17,4," CRAPS "3::::,17,5,""8::::1,1,5:B::::,3,1:,3,5,"A) BETTING PASS:"D::::,3,8,"YOU WIN IF THE FIRST THROW IS 7 "v::::,3,10,"OR 11 AND YOU LOSE IT THE FIRST"::::,3,12,"THROW IS 2, 3 OR 12."::::,3,14,"IF YOU THROW ANY OTHER NUMBER," ::::,3,16,"THAT NUMBER BECOMES YOUR 'POINT'"!2::::,3,8,"YOU WIN IF THE FIRST THROW IS"j!<::::,3,10,"2, 3 OR 12 AND YOU LOSE IF"!F::::,3,12,"THE FIRST THROW IS 7 OR 11."!P::::,3,14,"IF YOU THROW ANY OTHER NUMBER,"!Z::::,3,16,"THAT NUMBER BECOMES YOUR 'POINT'"."d::::,3,18,"AND YOU'LL  F7Y  YP`qD|CD|BYPYhC1hC1hCPXYhC1hC1hCTtT9t \)t7)PtّൄT O\7 7PtTftTt\Q@tT)Tt\7TTFtTtP::::7::FOCOSRZ::::1,7,5: I5 31:,I,5,"ф": I~d::::1,8,5: I5 19:,31,I,"ф": In::::1,6,5: I31 5 1x::::,I,19,"ф": I::::1,3,5: I19 5 1:,5,I,"ф": I::::1,5,5 ::::X16:I17+::::2,950,3:,X,10,LE$(I)=50,1000,970,930,850"::::285:I16:SO%(I):I,::::5,9,7,8,3,126::::300:I16:CL%(I):I@::::"","*","","","",""J::::320:I16:MR$(I):IT::::""^::::1,1,7%h::::""5r::::1,8,5j|:::: I1 38:,I,1,"":1,((1)9:,19,6,""::::1,1,5:,4,11,"A) ROULETTE"::::,4,13,"B) CRAPS"::::,4,15,"C) HORSE RACE "::::,4,17,"D) END "'::::1,2,7:,22,19,"OPTION?"7::::1,1,1V::::LG1:CV$"ABCD":1710l::::LZ$""490}::::OP$LZ$""::::,15,3," ROULETTE "::::,15,4,""::::1,2,7&::::,4,12,"DO YOU WANT INSTRUCTIONS (Y/N)?C::::LG1:CV$"YN":1710Y::::LZ$""690v::::O$LZ$:O$"N"940::::1930::::1,2,7::::,15,3,"O COLOR.":580:"":19309::::,15,3,"" >::::,15,4," ROULETTE "1C::::,15,5,"":1,1,7eE::::,3,9,"A) IF YOU BET ON RED, BLACK, ODD "H::::,6,10,"OR EVEN, YOUR ODDS WILL BE"R::::,6,11,"1 TO 1 ON EACH BET"f::::::580:2050"::::2050:"A$=C(34)+C(49)+C(27)+C(68):LOAD(A$),8,1":"RUN"O::::1319,19:1320,13:1321,13:239,3:^::::1810n::::1,1,5::::,17,2,""::::,17,3," CRAPS "::::,17,4,""::::1,2,7:0,"CRAPS IS A TWO DICE GAME,"4L::::,3,12,"WITH TWO BETTING OPTIONS:"RV::::,11,15,"A) 'PASS '"u`::::,11,17,"B) 'DON'T PASS'"j::::580:"":1930:1,1,5o::::,17,2,""t::::,17,3," CRAPS "y::::,17,4,"":1,1,5~::: 2 ::::,3,18,"AND YOU'LL WIN IF YOU THROW IT"b ::::,3,20,"AGAIN BEFORE THROWING A 7. "q :::: 580 ::::"":1930:1,1,5 ::::,17,2,"" ::::,17,3," CRAPS " #::::,17,4,"":1,1,5!(::::,3,5,"B) BETTING DON'T PASS"= WIN IF YOU THROW A "\"n::::,3,20,"7 BEFORE YOU THROW IT AGAIN"j"::::580"::::2050:"A$=C(34)+C(50)+C(27)+C(68):LOAD(A$),8,1":"RUN""::::1319,19:1320,13:1321,13:239,3:"::::1810#::::1,1,5!#::::,13,2,""E# "]$"::::,13,4," HORSE RACE "}$'::::,13,5,""$,::::1,1,5$6::::,3,8,"IN THIS GAME YOU'LL WIN MONEY ONLY"$@::::,3,10,"IF YOU BET ON THE WINNING HORSE. "&%J::::,3,12,"THE AMOUNT YOU CAN WIN DEPENDS"W%T::::,3,14,"ON THE ODDS ";::Z$:Z$""&:::: (Z$)13:1,950,5&::::P(CV$,Z$,1)&:::: (Z$)20LL01770&::::LLLL1:LZ$LZ$,LL):" ";:KKLL1CV$CV$"."A'::::P0LLLGZ$;:LZ$LZ$Z$:LLLL1:Z$"."CV$(CV$,10):KKLLb'::::"";::Z$: Y2311:,1,Y,M$:Y(b::::I16:1,S%,3:I(l::::X3811:,X,23,M$:X(v::::I16:1,S%,3:I(::::1,1,7:)::::N%((1)61):S%SO%(N%)1)::::N%((1)61):C%CL%(N%)T)::::N%((1)61):M$MR$(N%){)::::1,C%,5::X138:,X,1,M$: T..."*::::1,1,5* ::::**::::"":0,10,4:4,11,1*4::::1,1,5+9::::,3,3,""E+>::::,3,4,"COMMON RULES FOR ALL THREE GAMES:"y+C::::,3,5,""+H::::,3,10,"- EACH PLAYER ?::::TT("FF12"):774,0:1288,0:806,101:816,255:29999::::A$(34)(65)(77)(71)(73)(83)(54)(27)(68)::::(8)::::I18:I,"":I::::A0A1:(A$),8,1::::A65298:A,(A)251:A1,120:52,112:56,112::::IHZ::::CAR,YACHT,COMPUTER,MOTORCYCLE,TV SET,CLUB MEMBERSHIP,HOUSEcd::::I17:DE$(I):Ie::::900,950,1000,970,930,850f::::I16:SO%(I):Ig::::5,9,7,8,3,12h::::I16:CL%(I):Ii::::"","","","","",""j::,5,Y,"NAME OF PLAYER":K1,'::::YY14:::: KB::::Y16q::::LG8:CV$"ABCDEFGHIJKLMNOPQRSTUVWXYZ"::::Z0JN%1:::::,23,Y,"?"::::2180::::LZ$""250::::NO$(Z)" "LZ$" ""::::YY1:Z,:::PLAY"%r::::,4,18,"PASS OR DON'T PASS (P/D)?"B|::::LG1:CV$"DP":2180X::::LZ$""370k::::O$(Z)LZ$::::AP(Z)AP(Z)DM(Z)::::S32:X3:Y14:L15:1900:YY1:L:::: Z::::1100::::1,1,2:X8:Y14:L$"PRESS11,6,"":((SA%),2):,X1,6,"":1,1,5:EB04:::: GOSUB1710Q::::X7:Y14:S30:1900~::::1,2,7:X138:,X,23,"*":X:1,1,5::::NB%SA%::::::1,1,2:X16:Y13:L$"TRY AGAIN":1910::::1,1,2:X10:Y14:L$"PRESS TO PLAY":1910:1,1,5$:::::Z$: (Z$)32R::::X6:Y13:S30:L12: 1900:YY1:L::::1,2,7:X138:,X,23,"*":X:1,1,5&::::25300::::EB0,X1,6,"":SA%:::::2550D::::EBEB1: SA%NB%SA%7E::::,7,::::8@ :::: NO$(4),AP(4),O$(4),PR(4),DM(4),DE4(7),VE(4,7)q::::D5000000:BB$"":I150:BB$BB$" ":I::::I04:AP(I)2000:I(::::7,2000,3000,1000,1500,900,500,40002::::I04:40:J07:<:::: VE(I,J)F::::JP::::I16:MR$(I):I n:::: 19309x::::,12,17,"(1-5)"_::::,5,16,"HOW MANY PLAYERS?"::::LG1:CV$"12345":2180::::LZ$""130::::JN%(LZ$)::::S25:X1:Y16:L12:1900:YY1:L::::Y16:K0 JN%1:::X2:Y16:S33:J1JN%:1900:YY1%6::::J@@::::W1: Z0 JN%1vJ::::1,2,7:X3:Y14:L$NO$(Z):1910:1,1,5:1490T::::X1:Y14:S35:J16:1900:YY1:J^::::1,2,7:X4:Y14:L$NO$(Z):1910:1,1,5h::::,4,16,"DO YOU WANT TO  TO PLAY ":1910:1,1,5$:::::Z$?:::: (Z$)32:2530N::::2550}::::SA%2SA%3SA%7SA%11SA%12660::::X5:Y14:S30:1900::::1,7,2::::,8,12,"THE *POINT* NUMBER IS:":SA%::::1,7,2:,X VE(Z,OP%)%::::VE(Z,OP%)0:VE(Z,0)VE(Z,0)1%::::V%::::Y16:,3,Y,"YOU HAVE: $":,15,Y,"":AP(Z);"TO BET .":YY2%::::,3,Y,"HOW MUCH DO YOU WANT TO BET"%::::,9,Y1,"":"( 100 -";AP(Z);")"%::::,30,Y,"?"%::::LG6:CV$" 138:,X,23,"*":X:1,1,5:Y18:1500'@::::T11000001650F'J::::Y21:X6:E$"THE HOUSE LIMIT IS $100,000"i'T::::1,2,7:1890:1710:1,1,7'^::::X4:Y18:S32:L14:1900:YY1:L'h::::1,2,7:X138:,X,23,"*":X:1,1,5:Y18:1500 :(::::X15:Y23:L$"":1920)::::: Z$):::: (Z$)13B)::::1,1,7:X0:Y23:S39:1900M)::::)::::X6:Y23:L$" CONTINUE END":1920)::::: Z$):::: (Z$)13 Z$"E": 1750):::: ZZ::JN%02720*X::::*b::::,X,Y,E$:+l::::,X1,Y,(BB$,S):;+v::::,X,Y,"":,X,Y,L$:,X,Y,"":O+{::::,X,Y,L$:{+::::,X,Y,"":,X1,Y,L$:,X,Y,"":+::::"":4,1,1:0,6,4+::::1,2,7::X138:,X,1,"*":X+::::14," THE NUMBER IS:":SA%:1,1,5F::::7AG::::584:I16:A,B:1,A,B:IYH::::739,10,810,12qI::::854,12,881,20J::::854,12,881,27X::::Z0JN%1b::::O$(Z)"P"640l::::SA%NB%1190:Ս1260v::::650:::Z0JN%1::::O$(Z)"P"7103::::SA%7SA%111190:Ս1260A::::720e::::SA%7SA%111260:Ս1190q::::Z::::Y18:Z0JN%1:::::PR(Z)0,32,Y,"LOST":,30,Y,"$":PR(Z)::::YY1:PR(Z)0::::ZEY":,9,11,"AND YOUR PROPERTIES!!"*/::::,13,14," SORRY !!!"P0::::1710:ZZZ:1770:ZZ1:10504::::"":2630:1,2,7:X4:Y5:L$NO$(Z):1915:1,1,5>::::1,1,2:X5:Y7:L$"YOU LOST ALL YOUR MONEY!!":1910\::::1,C%,2:X138:::::ZZZ::::1770 ::::1060 ::::1280* ::::CC1:ZZ1> $:::: ZJN%1M .::::1930l 8::::LOJN%1:PR(L)0:Lz B::::320 L::::1,9,2 V::::X2:Y16:L$" NAME BET AMOUNT WIN/LOSE ":1910:Y18 `::::1,R(Z)D1250!::::"":2630$"::::,10,11," "L"::::,10,12," "{"::::,10,13," ":1,1,4"::::,11,12,"CASINO IS CLOSED!":1,1,5"::::1710:2720"::::"::::PR(Z)#P::::,2,Y,"":I:,5,Y,DE$(I)$Z::::,24,Y,"$":VE(Z,I):YY19$d::::CV$CV$(VV$,I,1)E$n::::IU$x::::1,2,7r$::::,17,20,"OPTION?"$::::1,1,5$::::LG1:2180$::::LZ$""1400$::::OP%(LZ$)$::::AP(Z)AP(Z)0123456789":2180:LZ$""1520!&::::T(LZ$):T1T:T2(T100)100:TTT25&::::T01600n&::::Y21:X3:E$"THE BET MUST BE A MULTIPLE OF 100"&"::::1,2,7:1890:1710:1,1,7&,::::X1:Y18:S36:L14:1900:YY1:L&6::::1,2,7:X'm::::T10 1660(r::::T1100T1AP(Z)1690+(|::::Y21:X14:E$"INVALID BET"N(::::1,2,7:1890:1710:1,1,7{(::::X4:Y18:S32:L14:1900:YY1:L(::::1,2,7:X138:,X,23,"*":X:1,1,5:Y18:1500(::::DM(Z)T1(:::JN%1)::::NO$(ZZ)NO$(ZZ1)*::::AP(ZZ)AP(ZZ1)*::::O%(ZZ)O%(ZZ1)E*::::I07:VE(ZZ,I)VE(ZZ1,I):IV*::::ZZZZ1a*&::::*0::::NO$(ZZ)"":JN%JN%1*:::::AP(ZZ)0*D::::O%(ZZ)0*N::::I07:VE(ZZ,I)0:I*S::STARTS WITH $2000"+R::::,3,12,"- THE MAXIMUN BET IS $100.000" ,\::::,3,14,"- YOU CAN ONLY BET MULTIPLES"%,f::::,5,15,"OF 100."6,::::1,1,5:\,::::,16,23,""::Z$q,:::: (Z$)13,::::1,1,1:"",::::,3,6,"- WHEN ANY PLAYER::::SA%NB%1260:Ս1190::::Z:7308::::X5:Y14:S30:1900:1,2,7i::::,9,14,"THE NUMBER IS:":SA%:1,1,5u::::7::::664:I16:A,B:1,A,B:I::::739,10,810,12::::854,12,881,20::::854,12,881,27:::::1762 :::: GOSUB2120::::Z$"E"27202 ::::C3:Z0:M*::::AP(Z)1001050f+::::VE(Z,0)0820,::::"":2630:1,1,2:,5,5,NO$(Z):1,1,7-::::,7,7,"YOU CAN'T PLAY ANY MORE".::::,7,9,"YOU LOST ALL YOUR MON,X,23,M$:X:1,1,5,::::1,1,2:X5:Y11:L$"DO YOU WANT TO SELL":1910^::::Y12:L$"ANY OF YOUR PROPERTIES(Y/N)?"t::::1910:1,1,5::::,34,12,"":LG1:CV$"YN":2180:::: LZ$""930::::P$LZ$::::P$"Y"10401,7 j::::C3:Z0JN%1$!t::::1,2,7:X2:L$NO$(Z):1915:1,1,5[!~::::O$(Z)"P",11,Y,"PASS":,11,Y,"DON'T PASS"v!::::,22,Y,"$":DM(Z)!::::YY1: Z!::::!::::AP(Z)AP(Z)DM(Z)2:DDAP(Z)!::::PR(Z)DM(Z)!::::P 0:DDAP(Z)"::::#::::"":26304# ::::1,1,2:X4:Y5:L$NO$(Z):1910:1,1,5L#::::1,7,2:X4:Y7{#::::L$"WHAT DO YOU WANT TO SELL:": 1910#(::::1,1,5#2::::CV$" ":VV$"1234567"#<::::Y9:I17#F::::VE(Z,I)01390$:X3 ::::I16:1,S%,3:I3 ::::1,1,7:3 ::::""4 ::::655264/u::::K40u::::TT,(TT)251:TT1,144:52,55:56,55::29999,6,"": SA%:,X,6,"":1,1,5z2< ::::2F ::::N%((1)61):S%SO%(N%)2G ::::N%((1)61):C%C ?::::TT("FF12"):774,0:1288,0:806,101:816,255:29999X::::I18:I,"":Id ::::8:::: NO$(4),AP(4),RO%(17),NE%(17),F1%(11),F2%(11),F3%(11),O%(4),PR(4),DM(4) :::: DE$(7),VE(4,7),GX(7),GY(7),PX(37),PY(37),CX(37),CY(37),MR$(6 4,6,8,10,11,13,15,17,20,22,24,26,28,29,31,33,35Gn::::I017:NE%(I):Iex::::I04:AP(I)2000:I::::7,2000,3000,1000,1500,900,500,4000::::I04:130:J07::::: VE(I,J)::::J::::I::::CAR,YACHT,COMPUTER,MO WINS MORE THAN",::::,5,7,"$5,000,000 THE CASINO WILL CLOSE"-::::,3,11,"- IF YOU LOSE ALL YOUR INITIAL "M-::::,5,12,"MONEY YOU WILL HAVE THE OPTION"x-::::,5,13,"TO SELL YOUR PROPERTIES."- ::::,14,20,"GOOD LUCK!!!"-$ ::::1,1,5:-8 :::" BYE !!".y ::::,16,16,"".~ ::::1,1,5:$/ ::::,16,23,""::Z$9/ :::: (Z$)13I/ ::::1,2,7Y/ ::::65526/p::::TT("FF12"):774,0:1288,0:806,101:816,255:29999//u::::/0u::::TT,(TT)251:TT1,144:52,55:56,55:APS ":,16,4,"",::::1,1,5-::::,7,5,"Ϸ"J-::::,7,11,"̯"W- ::::Y5v-::::J15:,7,YJ,"":J- ::::J15:,33,YJ,"":J-*::::,8,6," 2 3 4 5 6 7 8 9 10 11 12"-/::::P0LLLGZ$;:LZ$LZ$Z$:LLLL1:Z$"."CV$(CV$,10):KKLL+/::::"";::Z$: Z$"""::Z$-B :::: (Z$)13-L ::::.V ::::18101.[ ::::,6,7,""d.` ::::,6,8," I HOPE YOU HAD FUN ON CASINO ".e ::::,6,9,"".o ::::,16,14,"".t ::::,16,15,:29999I16:1,1000,3:I+::::Y123:,38,Y,"*":Y,::::I16:1,1000,3:I9,::::Y231 1:,1,Y,"*":YV,::::I16:1,1000,3:Iy,::::X381 1:,X,23,"*":X,::::I16:1,1000,3:I,::::1,2,7:,16,2,"":,16,3," CR4::::X15:2490:X23:2490->::::-z:::: .::::LL0:LZ$"",.::::"";::Z$:Z$""K.:::: (Z$)13:1,950,5b.::::P(CV$,Z$,1).::::(Z$)20LL02240.::::LLLL1:LZ$(LZ$,LL):" ";:KKLL1CV$CV$"." ::::,X,9,"̯"/8 ::::/B ::::,X,7,"ַ"0L ::::,X,8,""0V ::::,X,9,"̯"%0` :::::0j ::::,X,7,"ַ"O0t ::::,X,8," "d0~ ::::,X,9,""o0 ::::0 ::::,X,7,"ַ"0 ::::,X,8,""0 ::::,X,9,""0 ::::0 ,2450,24901 ::::XX8:K1 :::: SA%11X27:X127:26102 :::: SA%12X30:X130:261082( ::::X(SA%2)2:X1Xo22 ::::I111,2,7:,X,6,"": SA%:,X,6,"":1,1,5z2< ::::2F ::::N%((1)61):S%SO%(N%)2G ::::N%((1)61):C%C "h::::1,4,7,10,13,16,19,22,25,28,31,34,12>r::::I2537:CX(I):I|::::4,7,7,7,7,7,7,7,7,7,7,7,7,10,10,10,10,10,10,10,10,10,10,10,10::::I025:CY(I):I::::13,13,13,13,13,13,13,13,13,13,13,13,16::::I2637:CY(I):I ::::LG1:CV$"12345":3770:JN%(LZ$)0::::LZ$""490]::::S30:X0:Y21:L12:3200:YY1:Lv::::Y19:K0JN%1&::::,1,Y," NAME OF PLAYER":K1,0::::YY1::::: KD::::Y19N::::LG10:CV$"ABCDEFGHIJKLM :3210:1,1,5:2770,::::X0:Y18:S38:J16:3200:YY1:Jb::::X4:Y18:L$(CO$,Z1,1)NO$(Z):3210:1,1,5::::1,15,3:X15:Y19:L$" BETS: ":3210:1,1,5::::,2,21,"1 BLACK"::::,14,21,"4 ODD "::::,28,21,"7 RO :::LZ$""820\::::AP(Z)AP(Z)DM(Z)?f::::S38:X0:Y18:L16:3200:YY1:LWp::::O%(Z)8 940lz::::XGX(O%(Z))::::YGY(O%(Z))::::,X,Y,(CO$,Z1,1)"*":1,1,7::::I110:1,1000,5:I:::: 1130::::X2:RY IT AGAIN"::::1,2,7:3190:Y24:3000:1,1,7F::::X0:Y20:S38:L13:3200:YY1:LY::::Y20:950o::::O%(Z)37:B1::::X0:Y18:S35:3200:Y20:3200:.::::,PX(O%(Z)),PY(O%(Z)),(CO$,Z1,1)"*"8::::AX(W)PX(O%(Z)5:Y21:S30:3200 ::::NA%((1)37) ::::NXPX(NA%)2 ::::NYPY(NA%)B ::::1,9,3 ::::X2:Y18:L$" NAME BET AMOUNT WIN/LOSE":3210:Y19 ::::1,1,7 ::::Z0JN%1 ::::,0,Y,(CO$,Z1,1)NO$(Z):1,1,5 ::XAX(WW)YAY(WW)1320"::::WW'" ::::1,1,5:2,900,2:,X,Y,"ф"::"::::L1R:LM"::::,X,Y," "\"(::::XX3h"2::::Jw"<::::YY3"F::::I"P::::RR10"Z::::K"d::::I037"n::::WW15:CX(I)AX(WW)CY(I)AY(W::::NN9007701:1,NN,1:NN$::::I38$::::I!$@::::Z0::$T::::O%(Z)7 2000n$^:::: O%(Z)1640,1700,1760,1790,1820,1880,1940$h::::L0:E0: L17:$r::::NA%NE%(L)E1$|::::LL1$::::$::::E1PR(Z)DM(Z:::2030 &::::NA%37R0:A(NA%2):RNA%(2A)0&::::R1PR(Z)DM(Z):2530:Ս2550?&::::2030[&::::L0:E0: L11:t&&::::NA%F1%(L)E1&0::::LL1&:::::&D::::E1PR(Z)DM(Z)2:2530:Ս2550&N:::: 2030&X::::L2030'::::O%(Z)O%(Z)100(::::O%(Z)NA%PR(Z)DM(Z)36:2530:Ս25507(::::O%(Z)O%(Z)100O(::::PR(Z)D2080c(::::"":3880(::::,5,5,"CASINO IS CLOSED!!!"( ::::3000(::::3870( ::::ZZ1(*:::: ZJN%1::::900,950,1000,970,930,850,::::I16:SO%(I):IC::::5,9,7,8,3,12^::::I16:CL%(I):I::::"","","*","","",""::::I16:MR$(I):I:::: 3230::::,10,22,"(1-5)"::::,1,21," HOW MANY PLAYERS ?"NOPQRSTUVWXYZ"X::::Z0JN%1:%b::::,23,Y,"?"Gl::::3770:NO$(Z)" "LZ$" "]v::::LZ$""610o::::YY1:Z::::X0:Y19:S38:J1JN%:3200:YY1::::J::::W1:Z0::::::::X4:Y18:L$(CO$,Z1,1)NO$(Z)W 3 " ::::,2,22,"2 RED "( ::::,14,22,"5 ROW 1 "F::::,28,22,"8 NUMBER"a ::::,2,23,"3 EVEN"*::::,14,23,"6 ROW 2 "4::::1,2,7>::::,27,23,"OPTION?":1,1,5H::::LG1:CV$"12345678":3770:O%(Z)(LZ$)R:Y18:L$(CO$,Z1,1)NO$(Z):3210:1,1,57::::,8,20,"WHAT NUMBER (00,0-36)?"K::::,31,20,""}::::LG2:CV$"0123456789":3770:LZ$""960::::LZ$"00"1040:O%(Z)(LZ$):B0::::O%(Z)0O%(Z)371050::::Y21:X13:E$"T):AY(W)PY(O%(Z))B::::WW1 L::::I110:1,1000,5:I0V::::1,1,5I`::::O%(Z)O%(Z)100Xj::::ZZ1lt:::: ZJN%1~::::1,1,3:X8:Y21:L$"PRESS TO PLAY":3220:1,1,5:::::Z$:::: (Z$)32::::X::O%(Z)71229 !::::,12,Y,OP$(O%(Z))!::::1230N!::::O%(Z)137,13,Y,"00":,13,Y,"":O%(Z)100i!::::,20,Y,"$":DM(Z)!::::CC2:YY1:Z!::::R2:K12:Y7!::::I13:!::::X1:!::::J112:!::::WW15:W)1430"x::::WW#::::1,1,5:2,900,2:,CX(I),CY(I),"ф"7#::::,CX(I),CY(I)," "[#::::CX(I)NXCY(I)NY1500y#::::,CX(I),CY(I),"ф":#::::NN8409205:1,NN,1:NN#::::NN1120:NN#::::NN880900:1,NN,1:NN#):2530:Ս2550$:::: 2030%::::L0:E0: L17:)%::::NA%RO%(L)E18%::::LL1C%::::j%::::E1PR(Z)DM(Z):2530:Ս2550z%:::: 2030%::::NA%0R1:A(NA%2):RNA%(2A)%::::R0PR(Z)DM(Z):2530:Ս2550%: 0:E0: L11:&b::::NA%F2%(L)E1 'l::::LL1'v::::?'::::E1PR(Z)DM(Z)2:2530:Ս2550N'::::2030j'::::L0:E0: L11:'::::NA%F3%(L)E1'::::LL1'::::'::::E1PR(Z)DM(Z)2:2530:Ս2550':::: (::::Y19:Z0JN%1)::::,31,Y,"":PR(Z)0"LOST":,30,Y,"$":PR(Z)0)::::YY1: ZD)::::Y24:3052[)::::Z$"E"4000n)::::C3:Z0:)::::AP(Z)1002480)::::VE(Z,0)02270)::::"":3880:X2:Y2:L$(CO$,Z1 ,Z1,1)NO$(Z):3210:1,1,5#+::::1,15,3:X5:Y7:L$"YOU LOST ALL YOUR MONEY!!":3220P+ ::::1,C%,3:X138:,X,23,M$:X:1,1,5+L ::::1,15,3:X3:Y11:L$"DO YOU WANT TO SELL":3210+V ::::Y12:L$"ANY OF YOUR PROPERTIES(Y/N)?"+` ::::32 JN%1:PR(L)0:L, ::::670- ::::AP(Z)AP(Z)PR(Z)DM(Z):DDAP(Z)- ::::.- ::::DDAP(Z)9- ::::M- ::::"":3880- ::::X5:Y5:L$(CO$,Z1,1)NO$(Z):3210:1,1,5- ::::1,4,3:X2:Y7-( ::::L$"WHAT DO YOU WANT TO SELL:": . ::::1,1,5. ::::LG1:3770:OP%(LZ$)/ ::::LZ$""2700&/ ::::AP(Z)AP(Z)VE(Z,OP%)M/ ::::VE(Z,OP%)0:VE(Z,0)VE(Z,0)1X/ ::::/ ::::Y19:,3,Y,"YOU HAVE $":,13,Y,"":AP(Z);"TO BET.":YY1/ ::::,3,Y,"HOW MUCH DO YOU WANT 1,2,7:3190:Y24:3000:1,1,71, ::::X0:Y20:S38:L13:3200:YY1:L16 ::::Y20:278071@ ::::T11000002930l1J ::::Y22:X3:E$"THE MAXIMUN BET IS $100,000"1T ::::1,2,7:3190:Y24:3000:1,1,71^ ::::X0:Y20:S38:L13:3200:YY2 ::::1,1,32 ::::X15:L$"":32202 ::::: Z$3 :::: (Z$)1383 ::::1,1,7:X15:Y24:S10:3200C3 ::::|3 ::::X6:L$" CONTINUE END":32203 ::::: Z$3 :::: (Z$)13 Z$"E": 30403 :I4b ::::JN%040004l ::::4v ::::,X,Y,E$:5 ::::,X,Y,(BB$,S):05 ::::,X,Y,"":,X,Y,L$:,X,Y,"":Z5 ::::,X,Y,"":,X1,Y,L$:,X,Y,"":}5 ::::"":0,6,4:4,1,1:1,2,75 ::::,15,0," ":,15,1,""5,Y,"Ϸззззззз"6 ::::,22,Y,"ззззз":YY3:I#7 ::::,0,14,""H7 ::::,22,14,""s7 ::::,8,17,""7 ::::,8,3,"":,8,4,""7 ::::X15:I13:Y3:,X,Y, ::::,X,Y,"":,X,Y1,"":XX3:J:YY3:I8\ ::::X12:Y3:L$"0": 32109f ::::X18:L$"EVEN":321089p ::::1,1,7:,26,3,"BLACK"Y9z ::::X11:Y15:L$"00":3210v9 ::::X18:L$"ODD":32109 ::::,26,15,"RED"9 ::::,1,6,"1"9 ::::18":$::::,18,12,"21":.::::,24,12,"27":8::::,27,12,"30";B::::,33,12,"36";L::::1,1,75;V::::X36:Y6:L$"R1":3210P;`::::Y9:L$"R2":3210l;j::::Y12:L$"R3":3210w;t::::;::::;::::LL0:LZ$"";::::"",1)NO$(Z):3210:1,1,7 *::::,9,7,"YOU CAN'T PLAY ANY MORE "U*::::,10,9,"YOU LOST ALL YOUR MONEY":,10,11,"AND YOUR PROPERTIES"y*::::,13,14," SORRY !!!"*::::Y23:3000:ZZZ:3060:ZZ1:2480*::::"":3880:X10:Y5:L$(CO$10:1,1,5,j ::::,30,12,"":LG1:CV$"NY":3770:P$LZ$,t :::: LZ$""2380(,y ::::P$LZ$?,~ ::::P$"Y"2470M, ::::ZZZb, ::::3060:ZZ1q, ::::2480, ::::2570, ::::CC2:ZZ1, :::: ZJN%1, ::::3230, ::::L0 3210-2 ::::1,1,5-< ::::CV$" ":VV$"1234567" .F ::::Y9:I17&.P ::::VE(Z,I)02680H.Z ::::,2,Y,"":I:,5,Y,DE$(I)k.d ::::,24,Y,"$":VE(Z,I):YY1.n ::::CV$CV$(VV$,I,1).x ::::I. ::::1,4,3. ::::,17,20,"OPTION?"TO BET"/ ::::,10,Y1,"":"( 100 -";AP(Z);")"0 ::::,30,Y,"?"A0 ::::LG6:CV$"0123456789":3770:T(LZ$):LZ$""2800f0 ::::T1T:T2(T100)100:TTT2z0 ::::T028800 ::::Y22:X2:E$"THE BET MUST BE A MULTIPLE OF 100"0" ::::1:L1h ::::Y20:27801m ::::T10 29802r ::::T1100T1AP(Z)298032| ::::Y22:X13:E$"INVALID BET"[2 ::::1,2,7:3190:Y24:3000:1,1,72 ::::X0:Y20:S38:L13:3200:YY1:L2 ::::Y20:27802 ::::DM(Z)T12 :::::::: ZZJN%13 ::::NO$(ZZ)NO$(ZZ1)3 ::::AP(ZZ)AP(ZZ1)4 ::::O%(ZZ)O%(ZZ1)<4 ::::I07:VE(ZZ,I)VE(ZZ1,I):IM4& ::::ZZZZ1X40 ::::w4: ::::NO$(ZZ)"":JN%JN%14D ::::AP(ZZ)04N ::::O%(ZZ)04X ::::I07:VE(ZZ,I)0 ::::1,1,5:X14:Y0:L$" ROULETTE ":3220 6 ::::,4,6,"4 10 13 22 28 31"A6 ::::,1,9,"2 8 11 17 20 26 29 35"p6 ::::,4,12,"6 15 24 33"6 ::::,8,2,"Ϸзз"6 ::::Y5:I13:,0"":YY1:,X,Y,"":XX8:I7 ::::,8,15,"":,8,16,""(8* ::::X15:I13:Y15:,X,Y,"":YY1:,X,Y,"":XX8:IS84 ::::,8,14,"Ϸзз"8> ::::Y6:I13:J12:,0,Y,"":YY1:J:YY1:I8H ::::Y6:I13:X2:J1138R ,7,6,"7"9 ::::,15,6,"16"9 ::::,18,6,"19"9 ::::,24,6,"25": ::::,33,6,"34": ::::,4,9,"5"0: ::::,12,9,"14"E: ::::,21,9,"23"Z: ::::,30,9,"32"n: ::::,1,12,"3":::::,7,12,"9":::::,9,12,"12":::::,15,12," ;::Z$:Z$"";:::: (Z$)13:1,950,5;::::P(CV$,Z$,1)<::::(Z$)20LL03830L<::::LLLL1:LZ$(LZ$,LL):" ";:KKLL1CV$CV$"."<::::P0LLLGZ$;:LZ$LZ$Z$:LLLL1:Z$"."CV$(CV$,10):KKLL<::::"" :::Y123:,38,Y,M$:Y=d::::I16:1,S%,3:I=n::::Y231 1:,1,Y,M$:Y>x::::I16:1,S%,3:I4>::::X381 1:,X,23,M$:XO>::::I16:1,S%,3:Ia>::::1,1,7:o>::::"">::::65526>/u::::>0u::::TT,(TT)251: KK;::Z$: Z$""< :::::" ";<::::<::::,3,23,"": " ":4000=(::::N%((1)61):S%SO%(N%)8=2::::N%((1)61):C%CL%(N%)[=<::::N%((1)61):M$MR$(N%)=F::::1,C%,3::X138:,X,1,M$:X=P::::I16:1,S%,3:I=Z:%TT1,144:52,55:56,55::29999<::::<::::,3,23,"": " ":4000=(::::N%((1)61):S%SO%(N%)8=2::::N%((1)61):C%CL%(N%)[=<::::N%((1)61):M$MR$(N%)=F::::1,C%,3::X138:,X,1,M$:X=P::::I16:1,S%,3:I=Z:jUU*UUPPPPUUUU UUP@PTUUUU    QQQQUTTU@TT*UU* EE  PUUPTUU*@UU**TP@@****@@@@    PUUKKKKK