SCORETOTALDICEHOLDFACENUMOFSCRTOTALNAMETEMPPLAYENUMPLAYERCAYDDLIHLTURGHBESPAINUSCAVSCOLCOFREBESTSWINNEHULURAMSERELOCATE@@@@@  !"#$%&'()%%*******************************%%* DICE *%%* by *%%* John Young *%%* --------------------------- *%%* NEW ATARI USER - Dec/Jan 91 *%%*******************************d{{9@<@,9@,9@,9@,;@T,9@,;@,;@,;@@,;@,n@@6.6$$$$%$$$$%$$$$$$$%%$$$%$$$%%$%$$$%$%%$%$%$%$%%$%%$%%$%x.@.@@K: A) A0 A A A-@68,-;;67+&@,$@%@<$@,. --@@)68<,-6@-   A A A(!!"@)"A!Ap @ A@d@@+"ԠРΠ٠%%6-F:A`,%AV$F:Aa,%@@q1 #A!-@@%"-%1 )-@@'%%A0) k0@@70@@Q0@k0@@@--@")A6%- -@@@$=!A6%@%A%=A6%@%)=!A6%@%A(%=A6%@%.A!A6%@&%AD%=A6%@'%A 37A6%@8AV7A6%@98'@'AR@B@-@@(&DICE By John YoungL-@V11((`11((|ONES |Add ones only | |j11((|TWOS |Add twos only | |t11((|THREES |Add threes only | |~11((|FOURS |Add fours only | |11((|FIVES |Add fives only | |11((|SIXES |Add sixes only | |11((|2 OF A KIND | 10| |11((|3 OF A KIND | 15| |11((|4 OF A KIND | 20| |11((|FULL HOUSE | 25| |11((|5 OF A KIND | 50| |11((|CHANCE |Add all dice | |11((11((|TOTAL | |11(($--- DISPLAY LIST DATA ---134,4,4,132,134,134--- COLOUR TABLE DATA --- 0,38,0,198,58,52,58,84̠ɠŠ;@D, #A(--@@D")67<,.>:,- 2*6-P:C:,'AV,*6-C:,&$AV<-AA-BBAFBBAPAY@4Z$dTT72,152,72,172,0,6,185,2,6,141,10,212,141,24,208,185,3,6,141,26,208,238,0,6,238n<<0,6,173,0,6,205,1,6,144,5,169,0,141,0,6,104,168,104,64uvԠҠƠӠwx)-@@)( (2-4) ?)@*@I*@R'6-&@H*$ AԠӧӠ-@O6-!-@=(Ҡ O-@ @A)@[9+@*A")"@2)"@F,* @G6-%@S67,.>:,[(>:,:"A&*!$67,.26-&@:(>:,"AUAu" A '"A,d67+&@,$@%@%+@&,'@<+&@,$@%+@&,'@%,.v-@ @( 6   $=>٠Š?@-@@J-@T A#^ Ah A!r A"|  $""ŠӠԠǠŠ.-@.(SP RETURN@-@%@@(7+&@,$@%@<$@,*-@@&68,-* &-@@0)@:I"@!-@?( 1 2 3 4 5 I AD"AU$Nl@I*@S'6-&@H668,-(+8,,R-@%$@@l(>:@2%8,$A,X@2A@b-@@l8," A v  $נŠ6-P:H:,$@,//2A&$@@@H-@%$@@H(7$@ %@<$@ %@,H-@%$@@H(7$@ %@<$@ %@,H-@%$@@H(7$@ %@<$@ %@ ,68,-%@ %%2$12 ԠӠƠŠӠ346-6->-@@H68,-R-@@\ 8," 68,-8,%@f p 8,!6-8,z8,"@6-@ $ Ԡ٠ϠŠ1-@@18<,"6@A" --@-(SP RETURN  A$6- A&* 6-*6-F:A6%@%$@,''A6%@%$@@8)@["@26-%@I2A&$@@[B7hAL"AU-A6%@%$@?B7hI A%L$"@6-@-8<,6@#6-%@- A"p<-@7@%( <A6%@%$@/%2/ A"̠ΠԠ%%2A@@ -@@ 1"@12AP@@ 6-8<, #"6@6. # A#P$ A&. -@7@%(8  B %%2L A'V $] ^ !!ŠŠŠ_ ` &6- @&6-$8,j E%!@* @*&@E6-@%+&@,$@t '"@*"@*'6-@%~ %"@*"@%6-@P 2"@#-@@.6-%8,2  $  Š̠  68<,- 68,-8,% A' -@`@ 6@ ,,2@&P:'@, ) )2 .-@.(  )@% & ٠Š' ( & 6. &67@&B:=:,,,.=:,2 -@7@%(< $  ٠̠  - 6. -67@&B:=:8,,,,.=:8,, -@6@ ( $  ĠƠŠ  6-6- -@  8,!6-8,6-   J-@J(7+&@,$@%@<$@," ,-@!@,(PLAY AGAIN ٯΩ ?' =AdAU$6-F:A ,=6-P:'@,$@, -@6 50@52$@@@@ &F:Ad,"AU & A(`J n)@A >2k(( n$Q R ٠ҠԠS T AF:A,&@^ 6-F:A,$AVh  +AYr ;@4,| #A) --@@4")67<,.>:,-  6-?:C:,<, AVF:A,$ cc104,104,133,207,104,133,206,169,0,133,204,169,224,133,205,162,4,160,0,177,204,145,206,136,208 ((249,230,205,230,207,202,208,242,96  ŠӠ  #A00 /-@"+%@2%/  $ %%170,170,170,170,170,170,170,170 %%170,170,190,190,190,190,170,170 D:DICE.BAS