`B>J?,G!6X'T:\ýÁýÁÃýE|@<>BｿEB@BDb"8(ÃÃEB@B(Rx@ｿE|@~J 8>ｿE@@BF ýÁýａÁÿýE@~B>B~x>|@<>B<#x~B8B#D@fBb@BBBbfBD@ BB@B(R(@#B|ZBR<BBBRZBB| |@~J>8><#B@BBJ|~BJBBB@>@@BF @#D@BBFBDBBFBBD@ B@~B>B>x~#x~B0B @D(D@<D@D DBD<T@@ @D@<B0| <<$B<B<9888888!0 p0 ! # <@LR$*0'\\]`:?ϢGGG\$ 'j*!!@PX!!80' U!S{"\  M:@ K SR P(23613=\+256*23614>\),96`:(23613=\+256*23614>\+1),217:23610:\,255 #a(a)=a+13 *(a=1) d(p)=p+1p=6 !Ye(n)=a-double-nraise/2+(max/(f(d(n),3)+1)f(d(n),3)) (="ADAM","BEN","CALEB","DAVID","EDDIE","YOUR CARD":DAT2* ) "ONE","TWO","THREE":DAT4* *b"NOTHING","PAIR","2 PAIR","THREES","STRAIGHT","FLUSH","FULL HOUSE","FOURS","ST.FLUSH":DAT3* +1st Round Comment ,J"ME TO START THEN!","","LET'S SEE NOW...","","UP TO ME THEN!":DAT1* -5"","O.K, DOWN TO ME","I'LL SEE WHAT I'VE GOT","","" .*"ME TO OPEN","","","NOBODY LIKES IT?","" /<"LET'S SEE IF I CAN OPEN","","","","NOBODY WANT THIS ONE?" 0"","","NOTHING SO FAR?","","" 1*"MY FIRST SAY!","","","JUST A MOMENT","" 2"","","","","" 3Menu Options 4I"""PLAY IN `'s""","""PLAY IN $'s""","""DEMONSTRATION MODE""":DAT5* 5~"""FUNDS AVAILABLE: HARD:""+cncy+""500""","""MODERATE:""+cncy+""1000""","""EASY:""+cncy+""5000""":DAT6* 6g"""SEE HOW EVERYONE IS DOING""","""CHANGE THE LIMIT""","""TRY TO PEEK WINNER'S HAND""":DAT7*: P2mc=55648`:Start of Machine Code d<p=6:j=1:a=0:b=a:Priority Variables n236099\,j:PIP xe(p,13 ):See 6020 zQk(p,3):CHARACTER; Bold/cautious,Stubborn/dubious, Honest/bluff (-/+) |Cf(p,4):winnings;at stake;last raise;fold: eachplayer ~d(p):Discards +c(p,5,2):players hands p(p):Pat stand nq(p,2):Draw count- threes,twos(to test validity of two card draws-ratio should be ca. 17:1) bod=p:protagonist type=a:shy=a:max=a Assign Subroutines bSHUFFLE=3800:CARDFACE=3700t:HAND=3900<:CUT=3500 JDOCUMENT=4200h:CLEAR=4000:BACK=4100 ^TABLE=44000:SORT=4500:TEXT=4600:TEXT2=4604 cDEAL=4700\:EVAL=4800:EXCHANGE=5000:QUERYEX=5100 dYESNO=5400:OPTION1=5500|:MONEY=5800:ACCOUNT=5700D dPLAY1=6000p:ERROR=5200P:WARNING=5204T:DROPOUT=3000 HBUY=3200 :PLAY2=6500d:ARRANGE=5300 INEXTP=3100 :RAISING=7000X:CALL=7100 jCHARACTER=3400H :MAXSET=5900 :PAUSE=3300 :MENU=7200 : Transfer labels fPAYOUT=21004:LOSE=1870N:WINSOFAR=1850::SHAREPOT=2400` ]DEFAULT=1600@:AUTO= 590N:CR1= 660:R1L= 500 ZTD=1000:MAIN= 400:DLP=1110V:AUTO2=1400x ]CR2=1460:R2L=1300:SHOWDOWN=1700:SDL=1730 [LIM=2280:GAME=2200:PAY2=2130R:PEEK=2300 Sbr Labels XDSC=3230 :BU1=3224 :PRT=4414>:YLP=5406 nOP1=5522:OP2=5508:OP3=5504:OP4=5512:OP5=5520 \PL2A=6544:PL2B=6536:PL2C=6562:PL2D=6572 EPL2E=6584:PL2F=6600:PL2G=6610 [PL1A=6026:PL1B=6040:PL1C=6052:ME2=7208(  DAT1= 44,:DAT2= 40(:DAT3= 42*:DAT4= 41):DAT5= 524:DAT6= 535:DAT7= 546: 't$="text string": s$="speak string" hdct=a:Handcount run=j  Assign UDG Addresses. _UDG1=54640p:(UDG1-24):23675{\,23670v\:23676|\,23671w\  a:a:7: ֊2,7;"PUBLISHED BY ";"";3,22;""''6;" 1984 G.R.Stevens.";6;2;"ALL RIGHTS RESERVED";7;'''7;"COPYRIGHT WARNING"'''"CASES COMPUTER SIMULATIONS LTDwill rigorously protect thecopyright, of MAVERICK.Please note that unauthorised copying, hiring and lending or broadcasting of this software is strictly prohibited." pause:a:6 F(UDG1+168):23675{\,23670v\:23676|\,23671w\ IUDG1:mc+1011,23670v\:mc+1012,23671 w\  m/code addresses >overlay=mc+45-:pack=mc+1524  ,(d$="<;:82":short pair table ..e$(3,10 ):1st round table 0e$(1)="2124283437" 2e$(2)="1010232734" 4e$(3)="1021242934" 6.c$(524,2):value,suit of pack 8 character : document <Load cards >Hc$(1,1)=(mc+1596<):0-3=club,di,heart spade @Ifund=5000:s1=1:s2=1:new & old speakers BUa=3:rundat6:menu:fund=fund-(4500a$="1")-(4000a$="2"): Dp=bod:(p)layer FZ10 ,10 ;1;"GOOD LUCK!":j=10 40(2:.02{# =,j:j:j Hoverlay,0:cut J4pot=0:s2=bod:stake=0:ante=2   ****MAIN*LOOP**** Ufund<10 #0;0,0;"INSUFFICIENT FUNDS:RESTART!":pause: {j=16:f(j,2)=f(j,2)+2:f(j,3)=0:f(j,4)=0:j:ante,last raise,fold pot=pot+12  shuffle hdct=hdct+1:table Qy=0:fold=y:pass=y:fcnt=y:raise=y:patstand=y:open=y:round=y:draw=y EGE=y:EarlyGameEnd Ks$="""HAND No.""+hdct+"": YOUR DEAL!""":23681\,draw:s1=dealer Ls1bods$=s$(20)+"MY DEAL!""":1;s1+s1-1,0;"D" text2 7r(2,6):nraise=0:No.raises m(6):Pass marker b(6):bluff marker  deal:"" Dat1+(*7)  arrange  p=dealer stake=stake+2 p=d(p):start=p 1st ROUND LOOP(R1L*) "commit=0:pbodrunauto protagonist b$="WILL YOU OPEN":option1 foldCR1: round &8fund=fund-f(bod,2):f(bod,2)=0:back 0lyes=1:fcnt<5#0;0,1;"DO YOU WANT TO SEE THE REST OFTHE GAME";:yesno : yesCR1 DEGE=1:showdown N AUTO* X s1=p:t$="" bopenpbodt$ ltext vroundeval play1 p=bodfoldback nextp:CR1*  stakef(p,2)roundR1L openante=2:TD **End 1st Round loop**  Pot opened dealer=d(dealer) Dt$="NO OPENER! NEXT DEAL":pot>30t$="STILL "+t$(10 ) text:ante=ante+2  pause:MAIN  ***THE DRAW(TD*)*** fcnt=5default 4p=dealer:rune(bod,7)=1:draw marker Dat2 nextp j=1p:a$:j $s$="a$+"" TO DRAW FIRST""" .start=p:round=0 8p=boda$="IT'S YOU" Bs1=dealer:text2 Lpbodpause Vs1=p:DLP* `+p=bodrunqueryex:exchange:d1arrange jpbodrunbuy:exchange tnextp ~round DLP *2nd ROUND* 8draw=1:23681\,1:openbodpause p=open f(p,4)nextp astart=p:round=0:open=0:fold=0:raise=0:pass=0:nraise=0 2nd ROUND LOOP(R2L*) #commit=0:pbodrunAUTO2 (protagonist 2*b$="WILL YOU START THE BETTING":option1 < foldCR2 F2fund=fund-f(bod,2):f(bod,2)=0 Pback Zlyes=1:fcnt<5#0;0,1;"DO YOU WANT TO SEE THE REST OFTHE GAME";:yesno d yesCR2 nEGE=1:showdown x AUTO2* s1=p  t$="":text roundeval play2 p=bodfoldback nextp:CR2*  roundf(p,2).5p(p)p(p)=p(p)-1 typet1winsofar Compare equal types #a(e(p,5))>a(v3)winsofar a(e(p,5))a(v4)winsofar a(e(p,6))4type8share=1:lose &Lj=15:c(p,j,1)=c(win,j,1)j:share=1:lose 0/a(c(p,j,1)):EGEwarning:patstandp(patstand)=p(patstand)+1 H#f(win,2)=f(win,2)-pot R'pot=0:stake=0:PAY2* \fund=fund-f(bod,2) fTj=16:f(j,1)=f(j,1)-f(j,2):f(j,2)=0:j pPRT zdealer=d(dealer) **READY NEXT GAME*** 8#0;"READY FOR NEXT HAND";:yesno:yesrunMAIN &dat7:a=2+(t$=20):menu  a$="2"lim a$="3"peek *STATUS * table:y=0 ޓj=15:a$=cncy+f(j,1):s$="""I'M ""+(a$+"" UP""f(j,1)>0)+(a$+"" DOWN""f(j,1)<0)+(""LEVEL""f(j,1))":s1=j:text2:j:game ****SET LIM*IT**** *s$="NEW LIMIT? ":money:limit=sum:game **PEEK*** ;>.3#0;"NO LUCK!":warning:t$="":game p=win:table:hand:game ****End Main Loop**** `*SHAREPOT** j6EGE#0;0,0;"THE POT IS SHARED!" tt$="SHARING!" ~Kd1=0:j=16:f(j,4)EGEd1=d1+1:d(d1)=j zf(j,4)EGEv=15:c(j,v,1)=c(win,v,1)v:d1=d1+1:d(d1)=j:s1=j:text:p=j:hand j value=(pot/d1) 8j=1d1:f(d(j),2)=f(d(j),2)-value:j pay2  DROPOUT* >committp=p:nextp:a=stake-f(p,2):p=tp:acall nfcnt=fcnt+1:f(p,4)=1:t$="I'M OUT!":>.73333t$="I FOLD!":>.5t$="I'M BEAT!" <pbodshy>f(p,2)+max/2t$="TOO RICH FOR ME!" +foldƥ>.3p1t$="..AND ME!" Vraise=0:f(p,1)=f(p,1)-f(p,2):p=bodfund=fund-f(p,2) $f(p,2)=0:fold=1 p=bod text:.15~,-26 1p+p-1,1;1;2;" "   NEXTP* 3p=d(p):round=p=startround:f(p,4)nextp  BUY* b(p)d1=0:DSC ;type=e(p,7):d1=e(p,11 ):d2=0:d1DSC Estimate opposition value=5-fcnt:j=16:jpf(j,4)e(j,7)b=e(j,13 ):value=value+(10 b)+(2b=1)+(3b=2) j type>3BU1 Bobtails Ha(e(p,3))<13 fcnt<3type=3value>3DSC Keep pair bd1=3:d2=8:j=15:c(p,j,1)e(p,3)e(p,d2)=j:d2=d2+1 j:d2=0:DSC type=4d1=2+((e(p,5)>9 +k(p,3)value>2+k(p,3)Ũa(e(p,6))<13 )10 *>1.5@+k(p,3)m(p)):DSC:BU1* wtype=6d1=1+(fcnt<4e(p,5)=1):d1=d1-(d1=1e(p,5)<8ƥ<.2~L):DSC ctype=5a(e(p,5))>11 value>6ƥ<.2~Lb(p)=1:d1=0:Bluff discard(DSC*) )j=1d1:d(j)=e(p,j+7+d2):j Dat4:j=1d1:a$:j s$="""I'LL STAND PAT""" 9d1s$="""I'LL TAKE ""+a$+"" CARD""+(""S""d1>1)+""!""" text2  PAUSE* U#0;"Press any key when ready":.353333,24:5:.3,20 &200run:.0015wD,33! "": H(Set) CHARACTER* J:b=(*5+1) Lj=15 Njbk(j,3)=(*3)-1:k(j,(>.6)+1)=(*3)-1:k(j,1)ƥ>.5k(j,2)=k(j,1) Pj: CUT*c$ Dat2 4::7 pack,1:shuffle x=22811 \y=112 11 :value=c$(pack):suit=c$(pack,2):pack,pack+1 a$:a$="YOUR CARD".2~L,30:.3,24:#0;0,0;"CUTTING FOR DEAL (Press any key)"'"Aces high, suits count":100drun:"" 0d=1̱a$:y+d-1,x-2;a$(d):d cardface:overlay,0 y:x Find high card !high=0:j=16 Qb=c$(j):b=b+(13 b=1):b=c$(j,2)+b*4:b10 x*8+7,168-y*8:40(,0:0,-579:-40(,0:0,579 0:0  overlay,3value<11  SHUFFLE* #0;"SHUFFLING!" +c$(1,1)=(mc+1440) "": <HAND*c(5,5,2),p(layer) >/x=15:y=12 pbod:overlay,0 @clear Bv=51-1 DRc(p,v,1)x=x+2:value=c(p,v,1):suit=c(p,v,2):cardface Fv:overlay,0 H  CLEAR* zz=(mc+943):  BACK* (x=17:y=12 :clear:1 )overlay,0::zz=(mc+46.)  8j=y+1y+7:5:j,18;"":j  zx*8+7,168-y*8:40(,0:0,-579:-40(,0:0,579:0 0:overlay,0: hDOCUMENT* jdat5:a=3:menu l-cncy=96`-(60<a$="2"):run=a$"3" nlimit=25*"01246"(5*+.5):arun:run19,3;"NOW SET LIMIT FOR RAISING";:s$=" LIMIT? (0 means NO LIMIT)":money:limit=sum p 4:: 0 TABLE* 24::7 4DDat2:j=19 2:a$:j,1;a$;6;":":j 6a0:7:j=11 16:j,1;" ":j:13 ,3;"THE POT" 8p1:7:18,0;"AT STAKE: ";20,0;"FUNDS: ";:7:0 :Olimit11 ,2.5 -limit/2;1;"LIMIT:";cncy;limit:PRT <(11 ,2;1;"NO LIMITS" > PRT* @8;8;15,1;" ";18,9 ;" ";20,6;" ";15,5-(pot/2);cncy;pot;" ";18,9 ;cncy;f(bod,2);" ";20,6;cncy;fund-f(bod,2);" ":  SORT* PEvaluates and sets e(p,112),except runs, and high values for full house mc+327G,p *c(p,1,1)=(mc+347[)  TEXT*s1,s2  s$="t$" s2=bod"":TEXT2* rs2bods2+s2-1,1;1;8;0;0;" ";" "y1 +s1=bod"":#0;0,0;s$ s1bods1+s1-1,1;1;1;8;" ";1;" ":4:s1+s1-1,8;" ";" "y1:6:1:s1+s1-1,8;s$:0 .07}\(,4*s1-10 7:s2=s1: \ DEAL* ^pack,1:p=bod `0x=15:y=12 :overlay,0:clear be=15 d+c(1,e,1)=(mc+1525) f x=x+2 h+value=c(p,e,1):suit=c(p,e,2) j cardface le:overlay,0:  EVAL* · TYPE CLASS 1) bob-straight 2) bob-flush 3) bob-straight flush 4) pair 5) 2 pair 6) threes 7) straight 8) flush 9) full house10) fours11) straight flush  ARRAY e ORDER1),2) replicates3),4) value of replicates5),6) high cards7) TYPE8,9,10) discards11) Recommend No.of discards12) Flush No.13) Actual no. discards 2sort:type=e(p,7):flush=e(p,12 ) ytype=9 e(p,7-e(p,1))=e(p,3):e(p,7-e(p,2))=e(p,4):high values in full house -type>4flushtype=4draw Lookstraight skip=0:discard=1 \j=52-1:v1=c(p,j-1,1):v2=c(p,j,1):v1=v2+1j (v1=v2skip=skip+1:discard=j:j j+skip=1type=7 vj+skip=2type=1:skipv1=1(v2=13 v2=5)type=7:v2=5v1=v2:v2=4 'j=5skip=1:discard=j:j typetype=1draw 4flush=5type=8+(3type=7) ޡe(p,7)=2type=1type=2+(discard=e(p,8)c(p,e(p,8),1)=e(p,3)):odd card is odd suit or one of pair in bob-flush e(p,7)=type =type=7type=1e(p,5)=v1:e(p,6)=v2 type=1e(p,11 )=1:e(p,8)=discard:discard=1e(p,5)=c(p,2,1):e(p,6)=c(p,3,1)  EXCHANGE* 5e(p,13 )=d1:e(p,7)=0:signal draw d1patstand=p: Pq(p,1)=q(p,1)+(d1=3):q(p,2)=q(p,2)+(d1=2) Gj=1d1:c(p,d(j),1)=0:c(p,d(j),2)=0:j Dp=bodhand:overlay,(3value<11 )d15:15 fj=1d1:c(p,d(j),1)=c$(pack):c(p,d(j),2)=c$(pack,2):pack,pack+1 Op=bodvalue=c(p,d(j),1):suit=c(p,d(j),2):x=x+2:cardface j  QUERYEX*d(),c() &.1}L,12 :.1}L,24 H0,0;"Which cards will you exchange? (e.g qh 7c As) ";a$ +c(p,1,1)=(mc+1632`) d1=(mc+1621U) a=(mc+1619S)  a 7value=(mc+1623W):suit=(mc+1622V) %a=1b$="""Wrong input""" Xa=2b$="a$(value)+16+(2suit3suit)+(156+suit)+16+0+"" not in hand""" a$="A23456789JQK"  #0;b$:warning:queryex P ERROR* R#0;"Error input" TWARNING* VOj=16:.05|L,35#:2:.2~L,35#:2:j X"": ARRANGE* L#0;"DO YOU WANT THE HAND SORTED";:yesno:yesp=bod:sort:hand   YESNO* runyes=run:"": :#0;"? y/n";:.1}L,12 :.15~,17 a$=:a$=""YLP:YLP*  Hyes=a$="y":.0015wD,33!:a$"n"yes.2~L,-24:YLP """":#0;0,0;: |OPTION1* ~ s1=p:t$=" ":max=fund+1 $text:s$="BY HOW MUCH? ":OP3*  openOP1 #0;b$;:yesno:OP2* yesm(p)=10 : money:sumOP2:OP4* @sum+f(p,2)>fundt$="NOT ENOUGH FUNDS":warning:OP3 asum-stake+f(p,2)>limitlimit#0;"You're raising over the LIMIT";:warning:OP4 account:open=p: warning:OP5* n#0;0,8;"(";cncy;stake-f(bod,2);" down)"'"DO YOU WANT TO STAY IN";:yesno:OP1* yesdropout ctext:s$=""+cncy+(stake-f(bod,2))+" TO STAY IN.. More raisesthe pot! ENTER STAKE " Wmoney:sumlimitlimit#0;"You're raising over the LIMIT";:OP5 >sum+f(p,2)>fund#0;"NOT ENOUGH FUNDS";:OP5  account DACCOUNT* FU ARRAY f1) amount of winnings2) amount at risk3) last raise4) fold Hraise=sum-stake+f(p,2) J)raise>maxsum=sum-(raise-max):account LGf(p,3)=raise:f(p,2)=f(p,2)+sum:stake=f(p,2) NQraiseopenr(1+draw,p)=r(1+draw,p)+1:nraise=nraise+1 Pfold=0:pot=pot+sum RPRT:print etc.  MONEY* P.1}L,24:.15~,30:0,0;(s$);a$:a$=""money a$=cncya$=a$(2) a$=""error:money 2j=1̱a$:a$(j)>"9"a$(j)<"0"error:money  j:sum=a$   MAXSET* smax=limit:limit>502limitmax=10 *(pot/2+fund/546)+10 :limitmax>limitmax=limit v(max>fund-f(bod,2))f(bod,4)max=5*((fund-f(bod,2))/6+1):max=maxmax<1  p PLAY1* rNtype=e(p,7):a=a(e(p,5))-11 :a=type*4+(aa>0) t^rounda=19stake18-k(p,3)b(p)=1:Bluff vmaxset x openPL1a z&t$="PASS!":>.85Yt$="BY ME!" |Ztype<5ƨa(e(p,3))<11 +passpass=pass+1:m(p)=10 :text ~ Opening sum=pot/3 b(p)=1sum=pot Ha>27-pass+k(p,1)20*>4+k(p,1)sum=pot -account:s$="""I'LL OPEN FOR ""+cncy+sum" open=p:text2 !PL1A*Call,fold or raise shy=stake-f(p,2) Nsum=shy+10 *(3*shy/15+1):double=nraise-r(1,p) typedropout type>3PL1b `pot/shy<6-type-(type=3)doublefcnt>2+k(p,2)type3dropout  call type>4PL1c:PL1B* Cnraisea(e(p,5))1dropout #sum=shy+max:raising+20 +double>4double=4:PL1C* 'scale=a+(fcnt2double<3) @b=double*2+1:scale=scale-e$(1,bb+1) Kscale>k(p,1)sum=sum+(maxscale>5+k(p,1)):raising Call or fold 6commit=f(p,2)>shy*2.5 :doublecall {bet=2+(r(1,p)popen):double=1type=5a<21ƥ*10 >(3-k(p,2))dropout /ak(p,2)+e$(bet,bb+1)call  dropout d PLAY2* f6go=16*>2-k(p,2):sum=f(p,2) hd(6):type=e(p,7) jk1=6:j=16 l^f(j,4)jpk2=e(j,13 )+1:d(k2)=j:k14k1=k2:discards>3 set k1 nj p;a=a(e(p,5))-11 :a=type*4+(aa>0) rWb(p)a<16b(p)=20*>18-k(p,3)m(p)d(1)d(2) tmaxset v openPL2a xStarting the round z t$="CHECK!" |b(p)sum=max:PL2b ~3type(d(2)fcnt=4start=p)text &d(1)type<7gotext &d(3)type<6gotext _a=a-(2d(1))-1+d(2):(a+d(3))<18+k(p,1)text "a>26+k(p,1)sum=max account:PL2B* &s$="""I'LL START WITH ""+cncy+sum" open=p  text2 !PL2A*Raise,call or fold hdouble=nraise-r(2,p):shy=stake-f(p,2):sum=shy+10 *((stake+stake)/12 +1) Da<17b(p)b(p)(nraise-fcnt+1)*>1dropout b(p)raising 6commit=f(p,2)>shy*2.5 :d(1)PL2c Pat hand against #e(1)>29raising Ve(1)>27(p(d(1))+(a>18)-k(p,2))*>.92kcall  dropout d(2)PL2d:PL2C* One card buy Zf(d(2),3)ƨe(2)<29go(d(2)starta<20)dropout 0e(2)>29+k(p,1)raising  call d(3)PL2e:PL2D* Two card buy Eratio3to2=q(d(3),1)/q(d(3),2)-m(d(3)) [e(3)>23(e(3)>16ratio3to2-12 <8*go)raising Xa>23(e(3)-11 -k(p,2))*>ratio3to2/8+3.5`call  dropout  PL2E*Three or more buy opp=5-fcnt type>4PL2f  Pairs 6advantage=((pot+shy)*.8L^opp/(opp+1))/shy 5e(k1)>19-advantage+k(p,1)raising -a>16-advantage+k(p,2)call  dropout type>5PL2g:PL2F*  2 Pair (advantage=((pot+shy)*.8L^opp)/shy 5e(k1)>23-advantage+k(p,1)raising  call PL2G*Threes or better +e(k1)>23+k(p,1)raising  call XRAISING* Z/(nraise-8+k(p,1))*>2call \r(1+draw,p)=nraise ^pr=raise:account `]s$="""I,LL RAISE ""+cncy+raise":prƥ>.3s$="""AND ANOTHER"+s$(12 )+"+""!""" btext2  CALL* r(1+draw,p)=nraise et$="CALL":>.4Lt$="I'M IN!":>.4Lt$="I'LL STAY":>.5drawt$="I'LL SEE YOU" text:sum=shy  account  MENU* "B7::4,2;"CHOOSE FROM THESE OPTIONS:-"''' $5j=1a:a$:2;a$;28;"- ";j'':j &(''''"(Break Key Restarts at Any Time)" (0.2~L,20:.3,14:ME2* *F#0;" Press Key 1 - ";a:0:a$=:a$<"1"a$>aerror , "": '{*Set1:54613:charasmachine/code 54616:screen asdesired,0,GOTO 9995* ' h"poker"16384@,41230:23672x\,65534:23673y\,65535::Replace FRAMES `p$ab _  }y!3.!A=oyphahufflardfactan<u ocumenhleaacabl0orexextea\vaxchangueryeesnption|oneccounDlayprroParninTropou u laydrrangext aisinXalharacteH axse aus en ayou4osNinsofa:harepo` efaul@utNr1ailVutoxr2howdowdiamayRees u r>lpppppl2l2l2l2l2l2l2l1l1l1e(at,at(at*at)at4at5at6T text stringS speak stringdcudgpverlaacTD<;:82# 212428343710102327341021242934m4h A"DEMONSTRATION MODE"9995 ' 3 3$>>=OO (*f\Ͷ0Sf\ ~ #(:ڧ(8A=( *M\!xWyܺ0 !yxx Ay ؗ ###wyͨ~ݾ ( ~>(_4~w y ~)~)!w#!xͨ~(#= 4!>+8 ~è~w:O(:\ {ͨxݾ {ͨ~w{ͨxݾ {ͨ~wy6!6!65yͨx ݾ( q&&xͨ~ ( (p45~ w~w6!~(r> 6! ~&ͨ~wU~ 6!~+ͨ~w96! 36!N q650xͨ~ (pRwFNͨ~w#~w# >ͨ~#w~#w*]\yyͶ0###>G"]\>>. v< - >>ɝp6Ux͎M *M\!Q~#w~ Ԟ :QN *S> ݖP(= "{\ ! < - D & < *{\"{\< !yO :R :QCthe pot! ENTER STA AY IN.. More raisesthe pot! ENTER STAKE +AKE OAKE ONE CARD!+Y CARDS!+bLEVEL"f(j,1)) `435 UPI'M `435 UP`435 DOWNI'M `435 UPI'M `435 UP+ *MMMMYMM ff&fg]0MGFM23\3MGB`>v`j:>>?pp?@R@@ PLm@!"@@p x@@@DNQY98DDB @QYSYQ?UD8BZZ@B! "ʚB!!((""@ r"1DII28 J888||8l||88|kk>>>>6k>B!*$!"D a4**J (D)*-("Dq`` Ee !"R"UC@8' @s1 ABD N.>NCbv|ttrqN..>nF pqr|trq"%B Cp!‘DXQJD(qq pHQ9Q"DT"pp PPP RTTH(,(( "DI X$TB888||8l||88|kk>>>>6k> @ 0 ^@ g"^QPU*<Q P A }$9"l&9% P P!"%*)UU$D$b"""$hPhUjQEUV $DDDEF$"$``)TD a d6D$ !aPG1 >>>6k>!!vT0jä spaces*]\xxͶ0###NyyͶ8###F"]\>G>!O`i v< :&G( $.  Lv< - :G(  v< ywCxD`wD6Vͺ$Sͺ$ͺ$5ͺ$ͺ$Sͺ$ͺ$5ͺ$:O(~C wC>DwD>>:ͺ$>>=OO (*f\Ͷ0Sf\ ~ #(:ڧ(8A=( *M\!xWyܺ0 !yxx Ay ؗ ###wyͨ~ݾ ( ~>(_4~w y ~)~)!w#!xͨ~(#= 4!>+8 ~è~w:O(:\ {ͨxݾ {ͨ~w{ͨxݾ {ͨ~wy6!6!65yͨx ݾ( q&&xͨ~ ( (p45~ w~w6!~(r> 6! ~&ͨ~wU~ 6!~+ͨ~w96! 36!N q650xͨ~ (pRwFNͨ~w#~w# >ͨ~#w~#w*]\yyͶ0###>G"]\>>. v< - >>ɝp6Ux͎M *M\!Q~#w~ Ԟ :QN *S> ݖP(= "{\ ! < - D & < *{\"{\< !yO :R :QPYRMD !:Q!:Q !:R&!:Q !:R !:Q !:R<!:Q !:Q Ad!:Q ͌!:R !:Q !:Q !:R !:R <ͤ~=_!xKv\+-474A28͢-Cv\*M\*x\"v\4y303?_N~wq#N~wq##*M\N&CC*]\Ͷ0S]\*M\:T2T_2~w#~w#N*M\> p#q#   *M\FN!666*]\AAͶ0#~w#~w"Ͷ0""]\"]\6*#"5,ݾ6~ (A(*a(& J( j(Q(q(K(k( 08 8xG~y0(> w0(~6C((c($4D(d(4H(h(4S(s('*M\x!~ ݾ ~ ݾ(6H~(Gy*'4F* q4>ݾ $^#^"MASTERMAV" M\33MGWq !Uv>1 P P P M\ H@33\V]GWq !v>>BB<DHpHDB@~BfZBBBBbRJFB