ZXTape! 0Created with Ramsoft MakeTZXGAMBLER sf &0:0:0:1: 44696 19,0;:"" @2,4;6;"LICENSED FROM-";5;"ROSSWARE" D18,3;6;"GAMBLER ";7;" copyright 1987" 19,8;7;"-";4;"D";6;"I";3;"A";5;"M";4;"O";6;"N";3;"D ";5;"G";4;"A";6;"M";3;"E";5;"S";7;"-" 19,0;:"" (19,0;:"" Ab!&SCREEN X5FFFFFFFFFFFFFFFFFFEEEEEEEEEEEEEEFFFFFFFFFGGGGGGGGGGGGGGGGGDFCEDFCCEDFCEGjCODE hQjQ>@``?<?=>cgksc>< ?>c>``>cc> ,l ``>c>>``~cc> >cc>cc>>cc?> c ~~~>ccccc~cc~cc~>c```c>|fcccf|``````~```>c``oc>cccccc? ?cc>cflxlfc``````cwkcccccs{ogcc>ccccc>~cc~```~cc~lfc>c`>c>~cccccc>ccccc6ccccck6c66cf< 0`DUDUEFVNVVAA30x00?x~~~~~~DUDUE?FVNVV?AAA@??@@????? ?|????o?@@б!Pw#!Zw#!Pw#!Zw#``q8q88qs9p9s``8q8q8qs9sp966{1810013093{8q8q8qs9sp9<<Ѽ7Ѣ//Ѫ ـ71773ـ30Ѩ //Ѿ///Ѫ/Ѡ01773ق0ـ3{/Ѣ/ќ/Ѫ {q8q88qs9p9s``010101330``11q8q88qs9p9s{8q8q8qs9sp9{``  {q8q88qs9p9s{8q8q8qs9sp9GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGEEFFFFFFFFFFFFFFFFFFFFFFFFFFFFEEEEFFFFFFGFFFFFFFFFFFFFFFFFFFFFEEDDFFFFFFFFFFFFFFFFFFFFFFFFFFFFDDCCFFFFFFFFFFFFFFFFFFFFFFFFFFFFCCД% ͜9~Г9 ͸qIBА a Ͱawwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww3333333333IB3333333333wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwway9ـga})A~a}ِay}ab9 a Ͷm٨ 3333333333ab3333333333q a ͆ ٨ abc ya͎ٺ:DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDFFFFFFFFFFCCCCCCBCCCCCFFFFFFFFFFDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE>!"!>Z ͢>!}ͭ͢>!}ͭ!>!>!"!"*ùR!\Z>"B*S!\Z>"H*T!\Z>"N*U!\Z>"T!K>) *MH(1)E!I\Z>Q!K>) *ÀH(2)x!|\Z>Q!K>) *óH(3)!\Z>Q!K>) *H(4)!\Z>QL* R$! \Z>Z!hL*8S$2!4\Z>Z!hL*cT$]!_\Z>Z!hL*ÎU$!\Z>Z!h*÷DET!\Z>"*RS!\Z>"*RL1!\Z>"*RL2!\Z>"*BRL3;!>\Z>"*eRL4^!a\Z>"*!ѧRͩ|ʓ*!ѧRͩ|ʯØ*!Rͻ*!ѧRͻ͚|]*!Rͻ*! ѧRͻ͚|s!K>) V!K>) V!K>) V!K>) V"*"!*S*",!".!K>) V!ѧRͩ|*B!ѧR"B*B!ѧRͩ|!"B!K>) V!ѧRͩ|!*H!ѧR"H*H!ѧRͩ|!!"H!K>) V!ѧRͩ|t*N!ѧR"N*N!ѧRͩ|t!"N!K>) V!ѧRͩ|*T!ѧR"T*T!ѧRͩ|!"T!!S"!"***K>) VѧRͩ!ѧRͩ|*!6!"!!S"!"*!6!"*!ѧRͩ|të*!ѧRͩ|ʐó×*[K "0RAA*[K "0R**[,K. "*0R{{**[,K. "*0R{{!K>) V!ѧRͩ|A!"f!K>) V!ѧRͩ|l!"f!K>) V!ѧRͩ|ʗ!"f!K>) V!ѧRͩ|!"f*!ѧRͩ|!!8! |***!ѧRѧRͩ|Z!!8!*fK>) !Q*"c*!ѧRͩ|ʑ!!8!|***!ѧRѧRͩ|!!8! *"*fK>) !Qc*!ѧRͩ|)!!8!|***!ѧRѧRͩ|ʊ!!8!*"*fK>) !Qc!!8!|*!ѧRͩ|L*B!ѧR]T6!CZ!hÓ*!ѧRͩ|/L*H!ѧR]T6!CZ!hÓ*!ѧRͩ|qL*N!ѧR]T6!CZ!hÓ*!ѧRͩ|ʳL*T!ѧR]T6!CZ!hÓ*!ѧRͩ|L*B]T6!CZ!hÓ*!ѧRͩ|%L*H]T6!CZ!hÓ*!ѧRͩ|^L*N]T6!CZ!hÓ*!ѧRͩ|ʗL*T]T6!CZ!hÓ*!ѧRͩ|L*B!]T6!CZ!hÓ*!ѧRͩ|L*H!]T6!CZ!hÓ*!ѧRͩ|TL*N!]T6!CZ!hÓ*!ѧRͩ|ʓL*T!]T6!CZ!hÓ*!ѧR"L!\Z͒ÿ9!\Z͜! #|D͢**>!}L'(!\ZT*!*>!}L/)*)!+\ZTÀL!\Z͒^8Y!Z\Z͜! #|͢**>!}LÝ#$!\ZT*!*>!}L%&!\ZTÀL!\Z͒7!\Z͜! #|ʐ͢**>!}L!}Ll!g!h\ZTL!"ZTÀL!\Z͒ê0!\Z͜! #|/͢**>!}L+:!\ZT*!*>!}L;<!\ZTÀL!\Z͒I6D!E\Z͜! #|͢**>!}LÈuv!\ZT*!*>!}Lùwx!\ZTÀL!\Z͒4!\Z͜! #|m͢**>!}L'mn!!#\ZT*!*>!}LXopR!T\ZTÀL!\Z͒Ç5!\Z͜! #| ͢**>!}Lqr!\ZT*!*>!}Lst!\ZTÀL!\Z͒&3!!"\Z͜! #|ʫ͢**>!}Leij_!a\ZT*!*>!}LÖkl!\ZTÀL!\Z͒2!\Z͜! #|J͢**>!}Lef!\ZT*!*>!}L5gh/!1\ZTÀL!\Z͒d1_!`\Z͜! #|͢**>!}Lãab!\ZT*!*>!}Lcd!\ZTÀL!\Z͒A!\Z͜! #|ʈ͢**>!}LB>@<!>\ZT*!*>!}Ls[\m!o\ZTÀL!\Z͒âB!\Z͜! #|'͢**>!}L]^!\ZT*!*>!}L_{ !\ZTÀL!\Z͒AC<!=\Z͜! #|͢**>!}LÀ|}z!|\ZT*!*>!}Lñ~!\ZTÀL!\Z͒D!\Z͜! #|e͢**>!}Lؐ!\ZT*!*>!}LPؒJ!L\ZTÀL!\Z͒Ez!{\Z͜! #|͢**>!}Lþؔ!\ZT*!*>!}Lؖ!\ZTÀL!\Z͒F!\Z͜! #|ʣ͢**>!}L]٘W!Y\ZT*!*>!}LÎٚ!\ZTÀL!\Z͒ýG!\Z͜! #|B͢**>!}Lٜ!\ZT*!*>!}L-ڞ'!)\ZTÀL!\Z͒\HW!X\Z͜! #|͢**>!}LÛڠ!\ZT*!*>!}Lڢ!\ZTÀL!\Z͒I!\Z͜! #|ʀ͢**>!}L:ۤ/4!6\ZT*!*>!}Lk=,e!g\ZTÀ*!ѧRͩ|ʜÖ*!ѧRͩ|ʸ*!ѧRͩ|\|*B!"B*H!"H*N!"N*T!"T*B!ѧRͩ|5!"B*H!ѧRͩ|T!"H*N!ѧRͩ|s!"N*T!ѧRͩ|ʒ!"T\*B!ѧR"B*H!ѧR"H*N!ѧR"N*T!ѧR"T*B!ѧRͩ|!"B*H!ѧRͩ|!"H*N!ѧRͩ|=!"N*T!ѧRͩ|\!"T!!S"!"*!6!"!!S"!"*!6!"!"*!ѧRͩ|ë*!ѧRͩ|ó*!ѧRͩ|×*[K "0Rʣ*[K "0Rtt|*!ѧRͩ|ʡ*B!"B*B!ѧRͩ|ʡ!"B*!ѧRͩ|*H!"H*H!ѧRͩ|!"H*!ѧRͩ|)*N!"N*N!ѧRͩ|)!"N*!ѧRͩ|m*T!"T*T!ѧRͩ|m!"Tç*!ѧRͩ|ʺ*B!ѧR"B*B!ѧRͩ|ʺ!"B*!ѧRͩ|*H!ѧR"H*H!ѧRͩ|!"H*! ѧRͩ|H*N!ѧR"N*N!ѧRͩ|H!"N*! ѧRͩ|ʏ*T!ѧR"T*T!ѧRͩ|ʏ!"T*!ѧR"ç*!ѧR"!"*!6!"!!S"!"*!6!"*!ѧRͩ|$ë*!ѧRͩ|@ó*!ѧRͩ|\×*[K "0R0:8[\Q>> >*n(DM$*n*#nR0 ɒa{W   f  *.z{%|P}{~ŀ1ƄwƅƇƉZc${&(!*tLMVɰ)ɲAXtAl   Z  )/q"%,^@JT^T2~ [ *48>HvR\fSpzل0ڎڗnۘۢ۸  # B a  & ( * , +݀ J݁ y݂ ݊ ݔ ݞ ݨ ުK޴޾[a"6,}605:DNXZ\.bJjabcdefghijklmnopqrstuvwxyzA$B$C$D$E$F$G$H$I$J$K$L$M$N$O$P$Q$R$S$T$U$V$W$X$Y$Z$A(B(C(D(E(F(G(H(I(J(K(L(M(N(O(P(Q(R(S(T(U(V(W(X(Y(Z(ERrDEtRsRL1RL2RL3RL4TOtReG1F1w#|(!rrr}< <8B:<<2 8>2:8<2 8>2:8<2<8>2:8<2<82!dd͵:8<282::::: !?"Yd!`>w#K\s#r#^#V# H LD (CH_ADD),>*F(w#"F( ~([]\[R8ѯ*>! !>" &o2)B *[R"[\R86 T]""Ono HISOFT COLT Integer Compiler 1.0  1985 THRELFALL and HODGSON Compiling Line Compiled OK Begin End Vars Lines Names Nmtop Ctop Nvars To run *[#"!"">PͰ͢k ͢P< 6*S| *\#"n͠n~(**S\"###"]\_t(̖5̸~+' & !il-~~̙A*̕&8&&n ! (i #&n80! ! ®*]\~: N *]\~: N ®*́*6#6#[Q! # ! u?T*S\[K\R8*Y[WR"U*S\́ ))[UR"[!6͙l:Ͱ*S|(P*=\^#VWͯ*K\[S\RDM[K\*+6+6:+S]\S*S\"K\6#"Y\ͰKSͯͮlI+< *\͞*+͞*͞*[͞r< *U͞*͞*Y͞> &:o͞ < *\͞!7͵*U6#6#>aw#<>Aw#6$#<>Aw#6(#<6">!*[ .>:g>*U ! ! {=\:o\ !v_!6SU"[Ͱ*K\~_ ͸*K\U#6_#6#6ð*=\++!8*e\ ""*E\"n\:G\<2p\7z(J{!90){ ͙KB#))yx0|g}o(yxoyOxGx D|ܦ|G||/g}/o# V(N *U>?U27FKa\ ! ("+(-  (3:008 )))_!( C_\2`\n(!pKa\ -̦́Ϳ!q\~ ~@ 6 y0>"+w"[\,*a\~7~7!!\\6*a\~ #L7F*c\[a\+7~ +RDMZh/!'O0N!& Fz8( )>n>n{ !6 !Q( >n!( !!R!(!( >n> >n>>!R !!!!î||!|!+!#!+!#8͢-`i!( ( 6:Ү0ڮ0O *]\"]\>n}n|nV#^"l\"I\.͐N > > > ͔Q[Q[R"~(! >!*l\ ! >T"E\2G\!|°*[VB*R##>-0 ! >͔V*]\#~: > "]\*]\#~ ("]\ (( 8:( N:> !A 6ͅ!L n >M ͠ 67B[v\c.zRR_PR0#"v\˼DM (>*!x\ >"!v\ |( >-ͦ> '00d0 0d R>0R8<####^#V{ xoQ####q#p`iR(0^#VBK^#Vw<x*4^VR0 ut *K\͸x bkU*K\#^#V r+s"=>! >n>n!> & ! ! #)##s#r+++BKx Q wT]/!K!) >n!V !">* >n>[## ##>n>K > n>" !!0!!RVz ð> > "!S>"## ## >!! >" [Q!s,®! |( =! "!#*]\!|>n*I\#͔V! 8 .K&E!" m!< VV˸! 6  !!7# />}n! >',;}̶ N @"(! ">n!Q >! ! >" *]\#~$O52! !L .!T *[RDM< >n**]\#~N(" #~+" #n"]\##[`i[FQs! >}|! >{}, >>.& };}+}'! }N(! > ! }Aڮ˯[ҮKe\*]\#~08:8 A8˯[0˯(2($  ͐&o)P8@) K G:$(( x>*UKe\2 o Gn #n#(Ke\!4 ð~ w#[YR8 +6ð"o(w":!Fw*K\R8*Y\R"Y ! >n&=®| !!Q >" /!~o!&! E"( 2! ˯Aڮ&o> >*!{\ "®> nDM`i!>* >n( .+.(>n.>g *SRgoo !T /!|>! /B">! !9 ##V˼ /!O ||.&¦x/>n>&h. !& "!%.K&E ! .`&i !" (0ͮ>!&j !>ð®! Ϳ*SRDMͲ*˸5 .8++͢-`i¦>n>nʤ-((0 Acy]O! G$xʤ" >* >! ##N#F#~ :K\:L\͢:\2\>M :\ <͎ 0_3>! /! //! >.&8 _|(ULGö*o>>& .}&>}n!" Z !w$  !# >.& >.& ! 8 2Z!-# ! 8*]\#~"]\:($ ( ! (>" ##.>g! :(!w#6#*l\#͔V> *| *"*[FQ" c>n-̦ ( >nίn*"!!T 6Å ʠ! ###"" ! >n!Q ' ! >! !  ! >" *|  V~# V"!(*|  ~( LZh*  ~# V">n>!i >!L (s!! !! >! !h *]T6 *K\R8 [Y\R8*x.+" c # /!V!& !>Ͱ  /! /! !C KE8%+xm}H6+x( "( \ >!! *]\~) !]T#®) >n+>n!6 >! !C >! !\ !Z _GLUͶ*Ϳ.8+!>Ͱ"ͪ2 ɧRDMxV*e\ ""x*S*[Rx(*###~+q#p͜""*>w#!L .+! ! ! >!! = . / .('> !(.8<( .8 ®!(.0&>#n*K <4#!L *]\~͓ (I#(* ( *]\##~$ >"͓>"͓>͓>"͓! !Z >"͓ ͓! .>g! *w#"*K\Ͱ*Y\U#"]\*[RDM0!"E\66 *=\!s=\͐"=\Ͱ::\*K\RDM!џ|oAaa{OF.FRUIT87 J"FJ0:236066\,144:236077\,173 )n=4508045087:n,0:n cbc=22528X:1 ,44696,15:45242,64@ RER=1:9000(# 0r=12 :s=12 :t=12 :u=12 Pstb=0:cr=v(32 ):gw=0:fbg=0:det=0:hof=0 &g(24):i(24):h(4) 23659k\,0  RER=0 \"n=124:a:g(n)=a:n ]0,223,219,219,219,219,219,223,0,102f,102f,102f,102f,102f,102f,102f,0,223,195,195,223,216,216,223 ^8n=44896`44919w:a=n:i(n-44895_)=a:n nf(9 ):9500% 410 ,0;"QQQQQQ":fh=0:hl=0 &hof=1hof=0:1100L 1hl1=(*100d):hl119Ʀ="h".05|L,557:win=win-10 :cr=cr+10 :7800x:7900 bwin>99cƦ="j".05|L,35#:win=win-502:cr=cr+502:7800x:7900 ="c"1700 "win<1601AƦ="g"1550 5lk=(*20)+20:.05|L,lk:1500 #14,1;5;"GAMB" +n=124:n+44895_,g(n):n Fwn2=99c:wn3=99c:wn4=99c:wn5=99c:wn6=99c .02{# =,12 :="2"wn1=1:cbc=22532X:wn2=2:wn4=4:wn3=3:wn5=5:wn6=6:odd=2:.4L,0:st=22532X:clr=120x:1950:1600@ .02{# =,-2:="3"wn1=6:cbc=22536X:wn2=7:wn4=9 :wn3=8:odd=3:.4L,10 :st=22536X:clr=112p:1950:1600@ ".02{# =,42*:="4"wn1=10 :cbc=22543X:wn2=11 :wn3=12 :odd=4:.4L,20:st=22543X:clr=104h:1950:1600@ '.02{# =,32 :="6"wn1=1:cbc=22547X:wn2=12 :odd=6:.4L,30:st=22547X:clr=96`:1950:1600@ ,.02{# =,18:="p"win<801!wn1=12 :cbc=22551X:odd=12 :.4L,40(:st=22551X:clr=88X:1950:1600@ 6 1560 @gn=(*12 )+491 Jgx=(*5)+3 T!.01z# =,(gn-491)*3 Y1,13 ;gx;gn ^="s"1650r h 1600@ rwer=0:gn=gn-480 s7gn=wn1gn=wn2gn=wn3gn=wn4gn=wn5gn=wn61670 |*st=22556X:clr=69E:1950 }'.4L,10 :.73333,-14 ~610 ,0;"QQQQQQ":gof=0:win=0 )st=22556X:clr=0:1950 ;st=cbc:clr=1:1950:14,1;"QQQQ" +n=124:n+44895_,i(n):n wer=1 Cn=22680X22686X:n,70F:n:hof=1:1000 Cwer=1:1665:st=22528X:clr=67C:1950 Qn=2045-:.02{# =,n:.04|# =,n+10 :.01z# =,n-10 :n win=win*odd:7900 )st=22528X:clr=0:1950 !st=cbc:clr=1:1950 (14,0;"QQQQQQ":1300 $ 13 ,1;4;"COLL" 3cr=cr+win:7800x:10 ,0;"QQQQQQ" &N=20502:.008zn,N:N /N=50220-1:.008zn,N:N 13 ,1;"QQQQ"  1669 y=stst+64@+32 4y,clr:y+1,clr:y+2,clr:y+3,clr y: 3rs=(*20)+10 :2001:2002 xfh=0f(9 ):n=713 +3:f=2329+3:n,f;"QQ";n+1,f;"QQ":f:n: cr=cr-10 :7800x rl1=(*4)+4 rl2=(*4)+4 rl3=(*4)+4 rl4=(*4)+4 &rl1=rl2rl1=rl2+2:2050 &rl1=rl3rl1=rl1-1:2050  &rl2=rl3rl2=rl2-2:2050 rs=(rl1rl2rl3)2000 4ha=70F:10808 l=50000P r=59227[:"r" s=59227[:"s" t=59227[:"t" u=59227[:"u"  h(4) stb=15230n O=14 O=1B$=R$(R) O=2B$=S$(S) O=3B$=T$(T) O=4B$=U$(U) 'B$="A"F(5)=F(5)+1 'B$="B"F(1)=F(1)+1 'B$="C"F(3)=F(3)+1 'B$="D"F(7)=F(7)+1 'B$="E"F(9 )=F(9 )+1 'B$="F"F(2)=F(2)+1 'B$="G"F(6)=F(6)+1 'B$="H"F(4)=F(4)+1 'B$="I"F(8)=F(8)+1 o  2500 fbg=13430f fbg=23410R  7000X  7500L win>01300  1000 ġf(1)>07,23;5;"ef";8,23;5;"gh":f(1)=1f(1)=f(1)+1:BP=25:9800H& Ρf(2)>07,26;4;"uv";8,26;4;"wx":f(2)=1f(2)=f(2)+1:BP=25:9800H& ءf(3)>07,29;4;"ij";8,29;4;"kl":f(3)=1f(3)=f(3)+1:BP=40(:9800H& f(4)>010 ,23;6;"#$";11 ,23;6;"%&":f(4)=1f(4)=f(4)+1:BP=15:9800H& f(5)>010 ,26;3;"ab";11 ,26;3;"cd":f(5)=1f(5)=f(5)+1:BP=502:9800H& f(6)>010 ,29;5;"yz";11 ,29;5;"!";34":f(6)=1f(6)=f(6)+1:BP=20:9800H& f(7)>013 ,23;6;"mn";14,23;6;"op":f(7)=1f(7)=f(7)+1:BP=35#:9800H& f(8)>013 ,26;6;"'(";14,26;6;")*":f(8)=1f(8)=f(8)+1:BP=10 :9800H& f(9 )>013 ,29;4;"qr";14,29;4;"st":f(9 )=1f(9 )=f(9 )+1:BP=30:9800H&  3100 :3200 Ik=1621:k,0;" ":k: in=180P:f=(*5)+3:16,10 ;f;"FRUITQBINGO":.01z# =,F*8:N /18,15;4;"1QHORZ.QLINE-`5" 019,15;5;"2QHORZ.LINES-`10" 120,15;6;"FULLQHOUSE---`100" spn=(*2)+13 +RWC=(*2):RWC=13350 N.01z# =,30:19,2;"QQ";19,8;5;"DOWN" 7N=1v(26):="g"DET=2:3400H N N.01z# =,30:19,8;"QQQQ";19,2;4;"UP" 7N=1v(25):="g"det=1:3400H &n * 3330 H f(9 ) Ifh=0:2001 Jfbg=2:2255 S fbg=1 \p=1spn ^1,-10 :2250 zp WF=0 IF(1)>0F(2)>0F(3)>0WF=WF+1 IF(4)>0F(5)>0F(6)>0WF=WF+1 IF(7)>0F(8)>0F(9 )>0WF=WF+1 WF=03800 WF=3WIN=10000' WF=2WIN=1000 WF=1WIN=500 N=1WIN/100d .1}L,n/2 E21,0;6;"YOUQHAVEQWON-`";ٺ(*4)+3;N N [N=140(:.01z# =,N:.02{# =,N:.03{u\,N+3:.03{u\,N-4:N CR=CR+WIN 7800x ?3100 :9500%:fbg=0:det=0:HOF=1 7n=22680X22686X:n,70F:n:hof=1  XN=00-30-1:.09}8Q,N:.09}8Q,N-2:.1}L,N+2:N  3550 in=-10 40(:.002xn,n-15:.001wn,n:.002xn,n+10 :.003xD,n-20 n *16,11 ;5;"STEPQAQBAR" l=45456 3op=(*7):sp=op*4:sp=sp+23139cZ co=66B:5900  *n=1v(27):="g"5050 .001wn,45- co=70F:5900   5011 a.4L,0:.6,20:.9ffff,502:CO=(*2):CO=15100 :17,0;4;"UP";17,5;"QQQQ" 7N=1v(28):="g"det=1:5200P n:.001wn,33! :17,5;6;"DOWN";17,0;"QQ" 7N=1v(29):="g"det=2:5200P n:.001wn,557  5060 Pbars=0 Q%op=6od=15:5210Z Rod=(op+1)*2 S 5880 Z 5800 dn=18 mstb=1:2250 n..8L,44,:5800:5880:n x/n=300-.6:.008zn,n:n )cr=cr+((bars*od)*100d):7800x stb=0:3550 (b$=r$(r):c$=s$(s):d$=t$(t):e$=u$(u) 5820:b$=c$:5820 b$=d$:5820 b$=e$:5820  fb$="1"b$="2"b$="3"b$="A"b$="B"b$="C"bars=bars+1:f=40(502:.002xn,f:f:  A17,12 ;4;"TOTALQWINNINGS-`";5;BARS*OD   %sp,co:sp+1,co:sp+2,co 0sp+32 ,co:sp+33!,co:sp+34",co  0sp+64@,co:sp+65A,co:sp+66B,co 4 zf=140(+10 6n=115:.03{u\,n:.03{u\,n+f:n:f l=45488 C19,25;3;">@";20,25;3;"[\" np=23141eZ np=23163{Z6700, *np=np-4:6950&:np=np+4 *np=np-2:6980D:np=np+2 int=(*2) int=16100  6900 9n=1v(30):="g"np=np+2:6040 n  6950& *n=1v(31):="g"62008 n:6070 8nu=np-23139cZ : H(4) B<21,3;6;"YOUQHAVEQ";NU;"QNUDGESQLEFT.Q" Cnu=06600 L ="1"det=7:6500d N ="2"det=8:6500d P ="3"det=9 :6500d R!="4"det=10 :6500d T ="q"det=3:6500d V ="w"det=4:6500d X ="e"det=5:6500d Z ="r"det=6:6500d \="c"6600 ` .01z# =,44,:6220L d7.4L,33!:.01z# =,557:l=50000P nr=59227[:"r" xs=59227[:"s" t=59227[:"t" u=59227[:"u" nu=nu-1:6210B K7500L:win=0.5,0:.9ffff,-20:6690" f " 3550 ,ko=241:67106 -8np=23161yZ:6950&:np=23159wZ:6950& . 6750^ 6P23163{Z,ko:23164|Z,ko:23165}Z,ko:23166~Z,ko:23167Z,ko @P23195Z,ko:23196Z,ko:23197Z,ko:23198Z,ko:23199Z,ko T ^f=14 h%n=140(:.003xD,n:n n.n=40(1-1:.003xD,n:n of r2nu=99c:ko=69E:67106:6210B Pnp,67C:np+1,67C:np+32 ,67C:np+33!,67C: &Pnp,69E:np+1,69E:np+32 ,69E:np+33!,69E: DPnp,85U:np+1,85U:np+32 ,85U:np+33!,85U: X4bng=0:nud=0:sab=0:maf=0 YSf(1)>0f(2)>0f(3)>0nud=1:7100 lSf(4)>0f(5)>0f(6)>0nud=1:7100 Gf(7)>0f(8)>0f(9 )>0nud=1 Sf(1)>0f(4)>0f(7)>0bng=1:7200  Sf(2)>0f(5)>0f(8)>0bng=1:7200  Gf(3)>0f(6)>0f(9 )>0bng=1  Gf(1)>0f(5)>0f(9 )>0maf=1 *Gf(3)>0f(5)>0f(7)>0sab=1 >bng=13000 R%sab=1maf=15000 pnud=16000p  L win=0 M(b$=r$(r):c$=s$(s):d$=t$(t):e$=u$(u) VU(b$="1"b$="A")(c$="1"c$="A")(d$="1"d$="A")(e$="1"e$="A")win=win+v(1) [U(b$="2"b$="B")(c$="2"c$="B")(d$="2"d$="B")(e$="2"e$="B")win=win+v(2) `U(b$="3"b$="C")(c$="3"c$="C")(d$="3"d$="C")(e$="3"e$="C")win=win+v(3) eU(b$="4"b$="D")(c$="4"c$="D")(d$="4"d$="D")(e$="4"e$="D")win=win+v(4) jU(b$="5"b$="E")(c$="5"c$="E")(d$="5"d$="E")(e$="5"e$="E")win=win+v(5) oU(b$="6"b$="F")(c$="6"c$="F")(d$="6"d$="F")(e$="6"e$="F")win=win+v(6) tU(b$="7"b$="G")(c$="7"c$="G")(d$="7"d$="G")(e$="7"e$="G")win=win+v(7) yU(b$="8"b$="H")(c$="8"c$="H")(d$="8"d$="H")(e$="8"e$="H")win=win+v(8) ~U(b$="9"b$="I")(c$="9"c$="I")(d$="9"d$="I")(e$="9"e$="I")win=win+v(9 ) 2b$="0"c$="0"d$="0"e$="0"win=win+v(10 ) win07677 F(b$="1"b$="A")(c$="1"c$="A")(d$="1"d$="A")win=win+v(11 ) F(E$="1"E$="A")(c$="1"c$="A")(d$="1"d$="A")win=win+v(11 ) F(E$="2"E$="B")(c$="2"c$="B")(d$="2"d$="B")win=win+v(12 ) F(B$="2"B$="B")(c$="2"c$="B")(d$="2"d$="B")win=win+v(12 ) F(E$="3"E$="C")(c$="3"c$="C")(d$="3"d$="C")win=win+v(13 ) F(B$="3"B$="C")(c$="3"c$="C")(d$="3"d$="C")win=win+v(13 ) F(B$="4"B$="D")(c$="4"c$="D")(d$="4"d$="D")win=win+v(14) F(e$="4"e$="D")(c$="4"c$="D")(d$="4"d$="D")win=win+v(14) F(B$="5"B$="E")(c$="5"c$="E")(d$="5"d$="E")win=win+v(15) F(E$="5"E$="E")(c$="5"c$="E")(d$="5"d$="E")win=win+v(15) F(E$="6"E$="F")(c$="6"c$="F")(d$="6"d$="F")win=win+v(16) F(B$="6"B$="F")(c$="6"c$="F")(d$="6"d$="F")win=win+v(16) F(B$="7"B$="G")(c$="7"c$="G")(d$="7"d$="G")win=win+v(17) F(E$="7"E$="G")(c$="7"c$="G")(d$="7"d$="G")win=win+v(17) F(E$="8"E$="H")(c$="8"c$="H")(d$="8"d$="H")win=win+v(18) F(b$="8"b$="H")(c$="8"c$="H")(d$="8"d$="H")win=win+v(18) F(b$="9"b$="I")(c$="9"c$="I")(d$="9"d$="I")win=win+v(19) F(E$="9"E$="I")(c$="9"c$="I")(d$="9"d$="I")win=win+v(19) +B$="0"C$="0"D$="0"WIN=WIN+v(20) +E$="0"C$="0"D$="0"WIN=WIN+v(20) WIN07677 $E$="0"D$="0"WIN=WIN+v(21) $B$="0"C$="0"WIN=WIN+v(21) WIN07677 )B$="0"WIN=WIN+v(22):7677 E$="0"WIN=WIN+v(22) WIN=0  7900 eN=2040(:.01z# =,22:.02{# =,N-10 :.04|# =,N:.01z# =,N+10 :N   xkcr>99999CO6,0;"QQQ";6,4;"QQ";7,0;3;1;"`1000": y7,0;"QQQQQ" zLcr<0n=502-10 -.1}L:.02{# =,n:n:cr=v(32 ) Ocr<10 6,0;5;"000";6,4;6;"00": w$=cr  len=w$ %len=3w$="00"+w$:7850 &len=2w$="000"+w$:7850 len=4w$="0"+w$ X6,0;5;w$(3);6,4;6;w$(45): 10 ,0;"QQQQQQ" "10 ,0;4;WIN: #(&0:0:0:1: #)"" #1V23659k\,2:19,8;1;6;1;"PLEASEQLOADQDATA" #220,0;:"V"V() #320,0;:"R"R$() #420,0;:"S"S$() #520,0;:"T"T$() #620,0;:"U"U$() #<&19,8;" " #F=""l=:9030F# #IRER=110 #P(cr=v(32 ):9500%:1162 %917,0;6;"QQHORIZONTALQLINE...NUDGES" %>19,0;5;"QQVERTICALQLINE.....FRUITQBINGO" %=21,0;4;"QQDIAGONALQLINE.....STEPQAQBAR" % &H?N=BP-5BP+5:.01z# =,N:.003xD,N+2:N &R _t538618D908G98986858298495395C9406910I37928973F90309508726E08418786527H4870390879A56703758769B467497949797)(bXel|`rs tutbeo{fffffff{ <vz~<` 0xxaxl5h'wwY ellllnuaai  N' ,dPPd<VB538618D908G98986858298495395C9406910I37928973F90309508726E08418786527H4870390879A56703758769B46749794979ncncncncncn d XlwXWX eo0 W00440B8C1D8E6uHSSC @R )O)K%@A?@gJ()J-EȃQq.J@@@N|~~@@@N@@@N@@@N4444)I@ )J@(((?gJ)J-EEHQA(J@@@N>><|B<>~~@@@N @@@N___N,,,,)HN)J@D`DD0fJ/)J%E]ȃqq.J@@@N@@BBB@@@@N(@@@N @@@N)H J()J@ ?gJ)J@J@@@N@8BBB8@@@N@@@NH$OH$N8888)H@J()JU@?gJ)J J@@@N8@<B<@@@@N@@@N7wwwwwwwwtH$AL$N4444)JE@ a?gJ()JU@JJN@@@N@@BBH@@@@N@@@N.H$AJ$N,,,,)KE@DDaD?gJ()JUE]ȃqq.J J @ @@@N@>B~@@@N(@@@NH$AJ$N)KE@((a(0`J()JMDEQ Q"JJ@@@N@@@N|~@@@N___N88I$AI$N8888I$AHN4444||~@@@N444@@@N4444@@@N4444@@@N444~|4444|| 4444|| 44I$AHdN,,,,~@@@N,,,@@@N,,,,@@@N,,,,,,,,,,, WLWLWLWL,,,,,,I$AHdN|@@@N(@@@N@@@Nl UJUJUJUJ 8880\OOH$N8888<@@@N888@@@N8888@@@N8888888l8888 uJuJuJuJ8888;@@@N4444@@@N4ww4wwwww4@@@N4444@@@N44444wwwww4ww4~|4444 UJUJUJUJ4444wwwwwwwwx___N,,,,8@@@N,,,@@@N,,,,@@@N,,,,,,,8 8880,,,, UJUJUJUJ,,,,@@@N0@@@N(@@@N@@@N8 WlWlWlWl___N8888p||@@@N888@@@N8888@@@N8888888 8888| 8888||~`>>`>>||>~>c``cc``ccffccc``c```cccccc~`>`ccc```c``cccccc```cc``ccffcc`c>>c||ccDDDGDDDGDDDGGGGGGGGGGGGGGGGGGGGGGGGEEEEEEEEEGGGGGGGGGGGGGGGGGGGGGGGEEDDDDDDGGGGGGGGGGGGGGGGEEEEEEEEEGGGFGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGCGGCGGCGGCGGGGGGGGGGGGGGGGGGGGGGCCCCEEEEEEGGGGGGGGGGGGGGGGCCCGGGFGGGGGGGGGGGGGGGGGGCGCGGCGGCGGGGGGGGGGGGGGGGGGGGGGCCCCGFFFFGGGGGGGGGGGGGGGGGCCCGGBBBBBBBBBBBBBBBBCCCCGGBFFBBFFBBFFBBFFBCCCCGGBBBBBBBBBBBBBBBBGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGCGGGGFGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG_NV q N' ,dPPd<QCAR Ҁ)s53H618D908G9898F858B984I53DS Ӏ)95C9406910I379289G3F903095BT Ԁ)~08726E08418786E27H4870C908BU Հ)979A5F703758769B467D9794979cCUSTOMIZE $#$)EIF ERROR THEN GOTO 1  1000 364512:6:1:0:0: "" 236077\,251 dEv(32 ):r$(26):s$(26):t$(26):u$(26) n=132 :a:v(N)=A N 20000 N,10000',5000,2500 ,1000,500,300,,200,200,200,2000,1500,1200,1000,500,200,100d,80P,80P,100d,60<,20 U86V,66B,7,7,6,7,7,3,5,500 !Q$="538618D908G989868582984953" !P$="95C9406910I37928973F903095" !O$="08726E08418786527H48703908" !N$="79A56703758769B46749794979" $N=126:R$(N)=Q$(N):N $N=126:S$(N)=P$(N):N $N=126:T$(N)=O$(N):N $N=126:U$(N)=N$(N):N Qn=10 40(:.01z# =,n:.02{# =,n+10 :.03{u\,n-10 :n /:0,8;6;"CUSTOMIZER MENU" 04:64@,166:120x,0 04:64@,164:120x,0 13,0;7;"1) TO CHANGE REEL 1" 15,0;6;"2) TO CHANGE REEL 2" 17,0;5;"3) TO CHANGE REEL 3" $19 ,0;4;"4) TO CHANGE REEL 4" .311 ,0;3;"5) TO CHANGE PAYOUTS" 8113 ,0;7;"6) TO CHANGE HOLDS" B115,0;6;"7) TO CHANGE BINGO" L617,0;5;"8) TO CHANGE STEP A BAR" U219,0;4;"9) TO CHANGE NUDGES" V?21,0;7;"0) TO LOAD OR SAVE DATA TO TAPE." j="1"2000 l="0"7000X t="2"21004 ~="3"2200 ="4"2300 ="5"3000 ="7"4000 ="6"4500 ="8"5000 ="9"5400  1130j /:0,8;6;"REDEFINE REEL 1" 03:63?,166:120x,0  9000(# f17,0;6;"PLEASE ENTER REEL 1's CHARACTERSIN CODE FORM (THE REEL's LENGTHIS 24)." 21,0;" "; (N=124:7;R$(N);:N 6:"RL1:";B$  B$242050 NN=124:Z$=B$(N):NO=0:8000@:NO=12050  R$(N)=Z$:N  R$(25)=R$(1) !R$(26)=R$(2) * 1000 4/:0,8;7;"REDEFINE REEL 2" >04:63?,166:120x,0 H 9000(# Rf17,0;5;"PLEASE ENTER REEL 2's CHARACTERSIN CODE FORM (THE REEL's LENGTHIS 24)." \21,0;" "; ^(N=124:7;S$(N);:N f5:"RL2:";B$ pB$242150f rNN=124:Z$=B$(N):NO=0:8000@:NO=12150f z S$(N)=Z$:N S$(25)=S$(1) S$(26)=S$(2)  1000 /:0,8;5;"REDEFINE REEL 3" 06:63?,166:120x,0  9000(# f17,0;7;"PLEASE ENTER REEL 3's CHARACTERSIN CODE FORM (THE REEL's LENGTHIS 24)." 21,0;" "; (N=124:5;T$(N);:N 7:"RL3:";B$ B$242250 NN=124:Z$=B$(N):NO=0:8000@:NO=12250  T$(N)=Z$:N T$(25)=T$(1) T$(26)=T$(2)  1000 /:0,8;4;"REDEFINE REEL 4" 06:63?,166:120x,0  9000(# f17,0;5;"PLEASE ENTER REEL 4's CHARACTERSIN CODE FORM (THE REEL's LENGTHIS 24)." $21,0;" "; &(N=124:4;U$(N);:N .6:"RL4:";B$ 8B$242350. :NN=124:Z$=B$(N):NO=0:8000@:NO=12350. B U$(N)=Z$:N LU$(25)=U$(1) NU$(26)=U$(2) V 1000 -:0,8;5;"CHAGE PAYOUTS" :N=132 :A:N 06:62>,166:108l,0 : ]"PLEASE ENTER THE VALUES FOR EACHWIN. THE ORIGINAL VALUES ARESHOWN BELOW. (10--20000)" 6 N=122 P$ 310 ,0;" " -10 ,0;4;P$;6;V(N) "VALUE:";V(N) ,v(n)>20000 Nv(n)<10 3050 N & 1000 N"4 TRIPLE BARS:","4 DOUBLE BARS:","4 SINGLE BARS:","4 BELLS:","4 CHAMROCKS:" <"4 APPLES:","4 PLUMS:","4 PEARS:","4 LEMONS:","4 CHRRIES:" N"3 TRIPLE BARS:","3 DOUBLE BARS:","3 SINGLE BARS:","3 BELLS:","3 CHAMROCKS:" ="3 APPLES:","3 PLUMS:","3 PEARS:","3 LEMONS:","3 CHERRIES:" "2 CHERRIES:","1 CHEERY:" &:0,13 ;5;"BINGO" 06:100d,166:47/,0 >4,0;6;"PLEASE ENTER THE REQUIRED VALUES" R10 ,0;5;"UP DURATION.......";4;V(25);" (1--10)" R13 ,0;5;"DOWN DURATION.....";4;V(26);" (1--10)" "UP DURATION:";V(25) 6V(25)>10 V(25)<14050 "DOWN DURATION:";V(26) 6V(26)>10 V(26)<14070  01000 &:0,13 ;7;"HOLDS" 04:103g,166:41),0 ;3,0;6;"PLEASE ENTER REQUIRED VALUES." Z10 ,0;5;"HOLD..........";4;V(24);5;" (00--100)" Z13 ,0;5;"FEATURE HOLD..";4;V(23);5;" (00--100)" \16,0;5;"STARTING CASH.";4;V(32 );5;" (10--10000)" "HOLD (%):";V(24) 7V(24)>100dV(24)<04550 !"FEATURE HOLD (%):";V(23) 7V(23)>100dV(23)<04570 "STARTING CASH:";V(32 ) :V(32 )>10000'V(32 )<10 4590  1000 +:0,11 ;4;"STEP A BAR" /6:86V,166:84T,0 ;3,0;5;"PLEASE ENTER REQUIRED VALUES." Z10 ,0;6;"SPEED OF CHOICE.";4;V(27);6;" (1--20)" Z13 ,0;6;"UP DURATION.....";4;V(28);6;" (1--10)" Z16,0;6;"DOWN DURATION...";4;V(29);6;" (1--10)"  "SPEED OF CHOICE:";V(27) 6V(27)>20V(27)<15060 "UP DURATION:";V(28) 6V(28)>10 V(28)<15070 "OOWN DURATION:";V(29) 6V(29)>10 V(29)<15090  1000 ':0,13 ;6;"NUDGES" "07:103g,166:491,0 ,:4,0;4;"PLEASE ENTER REQUIED VALUES." 6X10 ,0;6;"NUDGE WIN.....";5;V(30);6;" (1--10)" @X13 ,0;6;"NUDGE LOSE....";5;V(31);6;" (1--10)" J"WIN:";V(30) T6V(30)>10 V(30)<15450J ^"LOSE:";V(31) h6V(31)>10 V(31)<15470^ " 1000 Xa:6;"PRESS 'S' TO SAVE DATA OR PRESS 'L' TO LOAD DATA OR PRESS 'Q' TO QUIT." Y="s"Ŧ="S"7009a Z="l"Ŧ="L"7500L \="q"Ŧ="Q"1000 ] 7001Y a%:11 ,10 ;"SAVING MODE." b "V"V() l "R"R$() v "S"S$()  "T"T$()  "U"U$() '11 ,10 ;"SAVING COMPLETE." H:6;"PLEASE LOAD THE PREVIOUSLY SAVEDDATA IN FOR VERIFICATION."  "V"V()  "R"R$()  "S"S$()  "T"T$()  "U"U$()  :"SAVING HAS BEEN SUCESSFUL." :N=1502:.01z# =,N:.03{u\,N+10 :N  1000 L:"PLEASE LOAD DATA." V 0 ` "V"V() j "R"R$() t "S"S$() ~ "T"T$()  "U"U$() $N=130:.02{# =,N:N  6  1000 @CD=Z$ J%CD<480CD>5798020T O T%CD<65ACD>73I8030^ Y ^(CD<97aCD>105iNO=1: CD=CD-32  Z$=CD: #' 9999' #(.4:4,15;"SINGLE BOXED" #216,0;"TRIPLE BAR 1 A" #<17,0;"DOUBLE BAR 2 B" #F18,0;"SINGLE BAR 3 C" #P19 ,0;"BELL 4 D" #Z210 ,0;"CHAMROCK 5 E" #d211 ,0;"APPLE 6 F" #n212 ,0;"PLUM 7 G" #x213 ,0;"PEAR 8 H" #214,0;"LEMON 9 I" #315,0;"CHERRY 0 N/A" # ' 7  N' ,dPPd<VB538618D908G98986858298495395C9406910I37928973F90309508726E08418786527H4870390879A56703758769B46749794979)(aQ538618D908G989868582984953P95C9406910I37928973F903095O08726E08418786527H48703908N79A56703758769B46749794979yoCH p  000ll$~$$~$>(> >bd&F< ~dd|   >> > ~BFFF~ ~~`~|~~BBB~@~~~@~FF~~<$~FF~~BB~ >>~~``~JR^@|<$~bbb|D~bb~~@```~~Bbbb~~@~``~~@~```~B`fb~BB~bbbF~DD~bbb@@```|~Jjjjj~Bbbbb~FBBB~~B~```~BBBF~|D~bbb~@~F~~BBbbb~bbbf$8JJjjj~BB x00>~~b~@@~Bbb~~@``~~Bbb~~B~`~< p 000~Bb~~@@~Bbbb 0000 000p@DD~bbb 00000~Bbbb~Bbb~~Bb~@@~Bb~~@```~@~~8Bbbb~bbb&8BB>BB<DHpHDB@@@@@~BfZBBBBbRJFB