!P#_G? G!6Y:\68BBb@Bb@RBBBB@R@;19;2;6;"": 5A=0B=0C=0D=05500| A=BB=CC=D2000 A=BB=C3000 B=CC=D5000 A=B4000  !A>3C>31500 MON06000p ?21,0;5;"YOU LOSE 5 PENCE *-* HARD LUCK" "(10 :10 :10 :502 ' DAVID BROWN , 90Z IA$="M"16,15;1;MON;6;0;" ":92\ _A$="1"A$="2"21,0;5;" ONLY ";A$;" PENCE IS NOT ENOUGH ":1004 A$="L"85004! ?21,0;5;"NO FOREIGN COINS THANKYOU.. 5p.." Z=110 ""1005 Z Z=1100d  =""Z ="5"94^  90Z ?21,0;5;" FEATURE ** PRESS 'S' TO STOP " PZ=025:.01z# =,Z:.01z# =,502-Z:.01z# =,Z+40(:Z X=(*4)+11 f14,8;7;"^^";13 ,8;"00";12 ,8;"05";11 ,8;"10" X=14G$="^^" X=13 G$="00" X=12 G$="05" "X=11 G$="10" 'X,8;G$ (.001wn,64@ ,="S"1700 J 1520 X=14X=13 21,0;5;"BAD LUCK YOU STOPPED IT TO SOON.":Z=-10 -20-1:.1}L,Z:Z:90Z X=12 21,0;5;" YOU WIN 5 PENCE ":MON=MON+5:Z=-20-10 :.1}L,Z:Z:90Z X=11 21,0;5;" YOU WIN 10 PENCE ":MON=MON+10 :Z=010 :.1}L,Z:Z:90Z  A=1AA=100d A=2AA=200 A=3AA=300, W21,0;5;1;" FOUR IN A ROW YOU HAVE WON `";AA/100d;" " ?I=030:.01z# =,15:.01z# =,16:I  7500L ?I=030:.01z# =,20:.01z# =,21:I D2050:X=121:(*8):W,Z:Z/10 ,W:X .5,5 U0,3,2,3,4,3,5,5,0,6,5,3,4,3,5,3,7,5,2,6,5,3,4,3,5,3,9 ,3.5`,7,1.5@,7,4,5,3,5,3,4,3,2,4,4,4  5  MON=MON+AA  90Z A=0AA=70F A=1AA=30 A=2AA=502 A=3AA=502 @21,0;5;" THREE IN A ROW = ";AA;" PENCE" MZ=23:X=04:.1}L,Z:.1}L,X+10 :X:Z 7500L ִ.3,0:.3,2:.3,4:.5,5:.6,0:.3,5:.3,4:.3,5:.5,7:.6,2 MON=MON+AA 90Z >21,0;5;" FIRST TWO = 10 PENCE " 9X=-60:Y=12:.1}L,X:Y:X  AA=10  7500L  MON=MON+AA 10 :502  90Z ?21,0;5;" LAST THREE = 30 PENCE "  AA=30 9Z=15:X=07:.02{# =,Z:X:Z  7500L Z.3,0:.3,2:.3,4:.5,5:.6,0  MON=MON+AA  90Z |H21,0;5;1;" MULTI JACKPOT `5 WELL DONE " }AA=500 MZ=25:X=05:.1}L,Z:.1}L,Z+10 :X:Z  7500L EZ=15:Y=07:Y:.02{# =,Y:Y:Z:5 tY=12:2050:X=121:(*8):W,Z:Z/10 ,W:X:Y=1.73333,0 Y=2.5,5 Y EZ=15:Y=07:Y:.02{# =,Y:Y:Z:5  MON=MON+AA  5  DAVID BROWN  90Z pE21,0;5;" YOU HAVE RUN OUT OF MONEY " zBZ=13:X=15:.1}L,-10 -X:X:Z .8L,-502 I502:21,0;5;" GO HOME TO GET SOME MORE ? " ""6030 =""6040 ="Y"MON=502:H=H+1:21,0;5;" FRUIT MACHINE BY DAVID BROWN ":10 :80P:21,0;5;" YOU NOW HAVE 50 PENCE MORE ":10 :100d:89Y ="N"8600!  6040 X#Z=07:.01z# =,Z:Z b?21,0;5;" HOLD HOLD HOLD HOLD HOLD " l9Z=-21-14:.1}L,Z:Z:3:10 v_21,0;5;"PRESS: Q W E R C CANCEL N START" (16,13 ;6;" " A$=:A$=""7050 BA$="Q"H1=1:16,13 ;"H":.2~L,0 BA$="W"H2=1:16,15;"H":.2~L,2 BA$="E"H3=1:16,17;"H":.2~L,4 CA$="R"H4=1:16,19;"H":.353333,5 A$="C"7200  QA$="N"21,0;5;" ":99c  7050  XH1=0:H2=0:H3=0:H4=0:16,13 ;6;" " * 7050 L DAVID BROWN `?21,0;5;" PRESS G TO GAMBLE C TO COLLECT " j="G"7550~ t ="C" ~ GG=0 "V=14:X$="00":Y$="x2" V,23;X$ '.02{# =,-5:.02{# =,5 V-1,23;Y$ R="C"13 ,23;7;0;"x2";14,23;"00": ="G"7610 GG=07800x GG=27550~ GG=013 ,23;"x2";12 ,23;"x4";11 ,23;"x6":21,0;5;" BAD LUCK YOU LOSE IT ALL ":Z=-10 -20-1:.1}L,Z:Z:30:90Z 6.1}L,0:.1}L,2:.1}L,4 ""7621  GG=4 X$="x4":Y$="00" 12 ,23;X$ '.02{# =,-5:.02{# =,5 14,23;Y$ ="G"7670 ="C"GG=2:7775_ GG=47810 GG=07630 GG=07610 6.1}L,2:.1}L,4:.1}L,6 ""7682  GG=6  X$="x6":Y$="x2" 11 ,23;X$ '.02{# =,-5:.02{# =,5 (13 ,23;Y$ 2="G"7770Z 3="C"GG=4:7950 <GG=67820 AGG=27685 Z_GG=621,0;5;" ":14,23;"00";13 ,23;"x2";12 ,23;"x4":21,0;5;" YOU NOW HAVE WON `";(AA*6)/100d;+("0"AA*6/100dɺ(AA*6/100d)):Z=120:.01z# =,Z:.1}L,Z/2:Z:AA=AA*6: _UGG=221,0;5;" ":12 ,23;"x4";11 ,23;"x6";14,23;"00":21,0;5;" YOU NOW HAVE WON `";(AA*2)/100d;+("0"AA*2/100dɺ(AA*2/100d)):Z=0-10 -1:.1}L,Z:Z:AA=AA*2: x.X$="00":Y$="x2":GG=2:7555 .X$="x4":Y$="00":GG=0:7640 2X$="x6":Y$="x2":GG=2:7700  7775_ K21,0;5;" ":13 ,23;"x2";14,23;"00";11 ,23;"x6";21,0;5;" YOU NOW HAVE WON `";(AA*4)/100d;+("0"AA*4/100dɺ(AA*4/100d)):Z=010 :.05|L,Z:.1}L,Z:Z:AA=AA*4: ? @/Z=07:.01z# =,Z:Z:Z:5 J?21,0;5;" HOLD NUDGE HOLD NUDGE HOLD " TrZ=07:.1}L,Z:Z:Z:5:3:10 :.15~,20:10 :.8L,-5 Yc21,0;5;"1-4 Q-R A-F N START C CANCEL" Z(16,13 ;6;" " ^A$=:A$=""8030^ h\A$="Q"H1=1:U1=0:D1=0:16,13 ;"H":.2~L,0 k[A$="A"16,13 ;"^":D1=0:H1=1:U1=1:.2~L,-8 n[A$="1"16,13 ;"":U1=0:H1=1:D1=1:.2~L,10 r^A$="W"H2=1:D2=0:U2=0:16,15;"H":.2~L,3 u[A$="S"16,15;"^":D2=0:H2=1:U2=1:.2~L,-6 x[A$="2"16,15;"":U2=0:H2=1:D2=1:.2~L,12 |]A$="E"H3=1:U3=0:D3=0:16,17;"H":.45ffff,7 [A$="D"16,17;"^":D3=0:H3=1:U3=1:.2~L,-4 [A$="3"D3=1:16,17;"":U3=0:H3=1:.2~L,14 ^A$="R"H4=1:U4=0:D4=0:16,19;"H":.2~L,9 [A$="F"16,19;"^":D4=0:H4=1:U4=1:.2~L,-2 [A$="4"16,19;"":U4=0:H4=1:D4=1:.2~L,16 A$="C"8200 SA$="N"21,0;5;" ":8800`"  8030^ H1=0:H2=0:H3=0:H4=0:U1=0:U2=0:U3=0:U4=0:D1=0:D2=0:D3=0:D4=0 '16,13 ;6;" "  8030^ !4>21,0;5;" DO YOU WANT TO LEAVE ? (Y/N)" !>="Y"8600! !H="N"90Z !M DAVID BROWN !R 8510>! !?21,0;5;" " !HZ=110 :.01z# =,18:.01z# =,20:5:Z !Z=(MON-(502*H)) ![:9 ,4;"YOU HAVE "+("WON "Z>502*H)+("LOST "Z<502-H);Z;" PENCE" !411 ,0;" WINNINGS MINUS YOUR OWN MONEY" ! DAVID BROWN !3MON<(502*H)" YOU USED MORE THAN YOU WON" !ʕ10 :300,:0:0:7::A=0546:A:7::200:11 ,0;" ENTER RUN TO PLAY AGAIN " !Z$ !ޯZ$="RUN TO PLAY AGAIN"Z=-10 -20-1:.1}L,Z:" VERY FUNNY ** VERY FUNNY ":Z::11 ,0;" ENTER RUN TO PLAY AGAIN ":8660! ! Z$="NEW" ! Z$="RUN" !Z$="STOP"Z$="" !B11 ,0;" ENTER RUN TO PLAY AGAIN ":8660! "`U1=18821u" "eU2=18830~" "jU3=18840" "oU4=18850" "pD1=18860" "qD2=18870" "rD3=18880" "sD4=18890" "t 99c "uS(10 ,13 )=5028,13 ;6;2;"":A=0 "vS(10 ,13 )=228,13 ;2;6;"":A=1 "wS(10 ,13 )=4808,13 ;6;0;"":A=2 "xS(10 ,13 )=40(8,13 ;5;0;"":A=3 "y*10 ,13 ;5;0;"" "z 8805e" "S(10 ,15)=5028,15;6;2;"":B=0 "S(10 ,15)=228,15;2;6;"":B=1 "S(10 ,15)=4808,15;6;0;"":B=2 "S(10 ,15)=40(8,15;5;0;"":B=3 "*10 ,15;6;0;"" " 8810j" "S(10 ,17)=5028,17;6;2;"":C=0 "S(10 ,17)=228,17;2;6;"":C=1 "S(10 ,17)=4808,17;6;0;"":C=2 "S(10 ,17)=40(8,17;5;0;"":C=3 "*10 ,17;2;6;"" " 8815o" "S(10 ,19)=5028,19;6;2;"":D=0 "S(10 ,19)=228,19;2;6;"":D=1 "S(10 ,19)=4808,19;6;0;"":D=2 "S(10 ,19)=40(8,19;5;0;"":D=3 "*10 ,19;6;2;"" " 8816p" "R(6,13 )=5028,13 ;6;2;"":A=0 "R(6,13 )=228,13 ;2;6;"":A=1 "R(6,13 )=4808,13 ;6;0;"":A=2 "R(6,13 )=40(8,13 ;5;0;"":A=3 ")6,13 ;5;0;"" " 8817q" "R(6,15)=5028,15;6;2;"":B=0 "R(6,15)=228,15;2;6;"":B=1 "R(6,15)=4808,15;6;0;"":B=2 "R(6,15)=40(8,15;5;0;"":B=3 ")6,15;6;0;"" " 8818r" "R(6,17)=5028,17;6;2;"":C=0 "R(6,17)=228,17;2;6;"":C=1 "R(6,17)=4808,17;6;0;"":C=2 "R(6,17)=40(8,17;5;0;"":C=3 ")6,19;6;2;"" " 8819s" "R(6,19)=5028,19;6;2;"":D=0 "R(6,19)=228,19;2;6;"":D=1 "R(6,19)=4808,19;6;0;"":D=2 "R(6,19)=40(8,19;5;0;"":D=3 ")6,19;2;6;"" " 8820t" #(/9060d#:Y=07:X:"a"+Y,X:Y #2#Y=07:X:"b"+Y,X:Y #F#Y=07:X:"d"+Y,X:Y #P#Y=07:X:"e"+Y,X:Y #Z#Y=07:X:"f"+Y,X:Y #d255,126~,60<,24,60<,126~,255,0,129,195,231,255,231,195,129,0 #nI0,0,60<,126~,255,126~,60<,0 #x8,20,34",85U,137,85U,34",8,8,28,62>,65A,127,65A,62>,28 ##Y=07:X:"i"+Y,X:Y #0,00010000,00010000,00010000,01010100T,001110008,00010000,0 #R9120#:Y=07:X:"j"+Y,X:Y:Y=07:X:"k"+Y,X:Y #1,1,010~,010~,00111100<,00111100<,00011000,00011000,00011000,00011000,00111100<,00111100<,010~,010~,1,1 # # DAVID BROWN P#xho2""  ~]#W P PMM3x3MA]#w]_}P#>~<<~Áf~<<~~<~@|@@~~@|@@@ @@ >>BB<DHpHDB@~BfZBBBBbRJFB  @ @@@ @ @ @ @@    @ @ @@@@ ` @@ @ @@@@ @@@@@ ` @@@` @0 @0   0|xxý5BDDBBD6|(BBBB0 6BB~BB 06BDB$D6|xB>x۽x@00N000# # <@QP#P#0\\\yXL![!`PP!!0z""i[|s~)LW K SR Pr102f,231,255,255,255,126~,60<,24:Y=07:X:"c"+Y,X:Y  H=1 #Y=07:X:"g"+Y,X:Y 00010000,0010 ,010@,1,010@,0010 ,00010000,0 #Y=07:X:"h"+Y,X:Y 00001000,0100,010,1,010,0100,00001000,0 MON=502:6:6::127,88X,502:105i,100d,5:149,100d,5:127,88X,10 :100d,76L:546,0,2 m18,9 ;"BY ";1;"DAVID";0;" ";1;"BROWN":9000(#:10 :190  PENDEEN  FRUIT MACHINE DAVID BROWN ?6:6::0,9 ;1;"FRUIT MACHINE" v23658j\,8:'" X X - - ANY TWO = 10p - X X X LAST THREE = 30p OTHER WINS ARE SHOWN LATER" 5'"WHEN THE HOLD FEATURE OPERATES PRESS KEYS Q TO R DEPENDING ON WHICH FRUITS YOU WANT TO HOLD WHEN THE NUDGE FEATURE OPERATES PRESS KEYS A TO F TO NUDGE UP AND KEYS 1 TO 4 TO NUDGE DOWN PRESS 'M' TO FIND OUT HOW MUCH MONEY YOU HAVE IN THE MACHINE PRESS 'L' IF YOU WANT TO LEAVE" "THE WIN LINE IS SHOWN BY THE NUMBER SHOWS HOW MANY GOES ARE LEFT, UNLESS YOU PRESS 'M' *YOU START WITH ONLY 50 PENCE*":'" PRESS ANY KEY TO CONTINUE":10 :0 0H1=0:H2=0:H3=0:H4=0 0U1=0:U2=0:U3=0:U4=0 0D1=0:D2=0:D3=0:D4=0 :''"THE 4 WHITE NUMBERS ON THE RIGHTHAND SIDE OF THE MACHINE OPERATEWITH THE GAMBLE SYSTEM. eg: 00 = NO WIN x2 = DOUBLE AMOUNT x4 = FOUR TIMES ORIGINAL AMOUNT x6 = *SIX TIMES ORIGINAL AMOUNT" ''"WHEN A AND A COME AT THE SAME TIME THEN THE FEATURE MODE WILL OPERATE. YOU MUST STOP THE BLACK NUMBER BY PRESSING 'S'." +0,9 ;1;"FRUIT MACHINE" C18,0;" PRESS ANY KEY TO PLAY":10 :0 / 5: 0Z=020:Y=05:Z,Y;5;" ":Y:Z:Z=020:Y=2631:Z,Y;5;" ":Y:Z:21,0;5;" " 2u5,1;7;0;"-";6,1;" 70 ";5,28;"";6,28;" `5 " 3u8,1;7;0;"-";9 ,1;" 30 ";8,28;"";9 ,28;" `1 " 4y11 ,1;7;0;"-";12 ,1;" 50 ";11 ,28;"";12 ,28;" `2 " 5y14,1;7;0;"-";15,1;" 50 ";14,28;"";15,28;" `3 " <0,6;"":20,6;"":F=020:F,6;"";F,26;"":F F1,7;"":19,7;"":F=218:F,7;"";25;"":F:2,10 ;"FRUIT MACHINE" Px4,11 ;" ";12 ,11 ;" ":F=511 :F,11 ;"";21;"":F Q77M,22:107k,0:75K,35#:110n,0:84T,25:83S,26:82R,27:81Q,28:80P,29:79O,30:78N,31:77M,32 :76L,33!:75K,34":74J,35# R175,25:176,26:177,27:178,28:179,29:180,30:181,31:182,32 :183,33!:184,34":185,35# S85U,26:86V,27:87W,28:88X,29:89Y,30:81Q,0:170,30:171,29:172,28:173,27:174,26:175,25 T88X,30:87W,31:86V,32 :85U,33!:84T,34":175,34":174,33!:173,32 :172,31:171,30 U75K,22:76L,23:77M,24:78N,25:79O,26:80P,27:180,27:181,26:182,25:183,24:184,23:185,22:179,28 V76L,22:75K,23:74J,24:111o,0:186,22:186,23:186,24 X9100d,60<,7:130,60<,7:160,60<,7:8,13 ;6;2;"";8,15;6;2;"";8,17;6;2;"";8,19;6;2;"";6,13 ;2;6;"";6,15;2;6;"";6,17;2;6;"";6,19;2;6;"";10 ,13 ;6;0;"";10 ,15;5;0;"";10 ,17;6;0;"";10 ,19;5;0;"" Y,8,9 ;"";8,23;"" Z%MJ=0:MON06000p [t14,8;7;"^^";13 ,8;"00";12 ,8;"05";11 ,8;"10";14,23;"00";13 ,23;"x2";12 ,23;"x4";11 ,23;"x6":16,13 ;6;" ";21,0;5;0;" ENTER '5' PENCE ":16,15;1;MON/5;6;0;" " \A$=:A$=""92\ ]A$"5"1000 ^21,0;5;" ":MON=MON-5:H1=0:H2=0:H3=0:H4=0:U1=0:U2=0:U3=0:U4=0:D1=0:D2=0:D3=0:D4=0 _?16,15;1;MON/5;6;0;" " `"HO=(*8):NO=(*4) a0MON45-NO=2HO=58000@ b%MON45-HO=57000X dO=(*10 )+10 e E=0O fH1=1108l iA=(*7) lH2=1115s nB=(*4) sH3=1125} xC=(*7) }H4=1130 ~D=(*4) %200+A:E=O.08}# =,6 %210+B:E=O.08}# =,8 &220+C:E=O.08}# =,10 &230+D:E=O.08}# =,12 E {H1=1H2=1H3=1H4=1.08}# =,6:.08}# =,8:.08}# =,10 :.08}# =,12 240 ~8,13 ;6;2;"":6,13 ;2;6;"":10 ,13 ;6;2;"": ~8,13 ;2;6;"":6,13 ;5;0;"":10 ,13 ;2;6;"": ~8,13 ;6;0;"":6,13 ;5;0;"":10 ,13 ;6;2;"": ~8,13 ;5;0;"":6,13 ;2;6;"":10 ,13 ;5;0;"": ~6,13 ;2;6;"":8,13 ;7;0;"":10 ,13 ;5;0;"": |8,15;6;2;"";6,15;6;0;"";10 ,15;2;6;"": |8,15;2;6;"";6,15;2;6;"";10 ,15;5;0;"": |8,15;6;0;"";6,15;6;0;"";10 ,15;2;6;"": |8,15;5;0;"";6,15;2;6;"";10 ,15;2;6;"": ~8,17;6;2;"":6,17;5;0;"":10 ,17;6;0;"": ~8,17;2;6;"":6,17;6;2;"":10 ,17;6;0;"": ~8,17;6;0;"":6,17;6;0;"":10 ,17;6;2;"": ~8,17;5;0;"":6,17;6;2;"":10 ,17;6;2;"": ~8,17;7;3;"":6,17;5;0;"":10 ,17;6;0;"": ~8,19;6;2;"":6,19;6;0;"":10 ,19;6;0;"": ~8,19;2;6;"":6,19;6;0;"":10 ,19;6;2;"": ~8,19;6;0;"":6,19;6;2;"":10 ,19;2;6;"": ~8,19;5;0;"":6,19;6;0;"":10 ,