File POKER.BA (BASIC source file)

Directory of image this file is from
This file as a plain text file

21R +ICM/AV(*02)/BF("56)2JR23E[F+NA/X6)7ISN.(B12*;R7D"(")6)2JR33E[F+NB/X6)/XF-*0*07ISN*(?X.1B0")*M64KP7ISN2"WW3L?C+MCE+TCO3TWH2 GH3LSL+ECN7COA3I?N*.B +WCE3EOA3H" 3AWV. J$*0J0.MVJ3P	R+NKT7I^ 3I3L6 CO+ECN3TWH2 WB3T	T+NCG3B[E3OWR2 T3ER 7R
A6;& +OCU3OWP3NF 3FWTR6"6JB63R;I7T^"3H;E2 ?Y3UZ 3OSL2,J +ECT*0B;2 ?T2 C3E/C2,J +ECT*.J5.M^J3P	R+NKT3E?N3UG2 GT+LCK*-B-7LSE*	CS7GSE2 ?D+WCN+TCO7BOU3IWN+SKS.M"J3P	R+NCT.M&J7LSE/OF=.MFJ20WL/T7C.2B0.MFJ21WL/T7S.2B0.MFJ22WL/T7P"0*M61J33ASN3O	MZ7E.JR13P	R+NCT.M
J25[I/C6<25T/EON*6B7.MFJ66KP7ISN2"T3EF 3NWT6 OI. V$*.B 7I^ 3I3L2 WD+AKL" *M61B73R;IT6 .J"17IOF6>R53H;E*2B0.MFJ29?G3SKU.3N8.MJJ20WL/T7P/PF+"06 .JF27LSE7SN="-65.JJ27LSE3CN="-65.JN27FKO/ZF=/TGO"0*M22^47OWS/B^1"4*M22:57ESXZ6 .JZ23P	R+NKT7YWO3R" 3ASN*:B".MJJ27
L/T7N"1*M22^87OWS/B"1"5*M22293E;T"=66.JB37LSE/IJ=.MNJ21?G3SKU.2^1.MNJ62KP7ISN" *M23&3/F3I6>R63H;E"467.JR33I[F+NA.02)6=R73H;E*3B7.MNJ25WL/T7X.1F1"060.JZ37GSO/OJ4.MNJ27[I3FGN*(&0.<^=3TWH/NB4" *M23287ET.=F1.1B1.MNJ29?G/TSO"2*M24&03F;F/AB(.)6>21T/ESN"56 .JF47
SE/XF=.1F1"1*M24223E	T"=67.JN47LSE/ZJ="36 .JR47GSO/O"5.MRJ25WL/T7Z"1*M24^63O?T"561.J^47IWF.>F=23T/EWN"46 .J"43I[F+NA.0:)6=R23H;E*5B0.MRJ29?G/TSO"2*M25207E+T"=60.JF57LSE/KB=.MVJ62KP7ISN*"CI3CWH+CKK.MVJ23?G/T[O"2*M25&4/F3U.=Z13TWH/N^5" *M25257E+T"=62.JZ53I[
+NA.0:)6=R13H;E*5B8.MVJ27WL/T7Z*3B5.MVJ28WL/T7V3ZZ++NA*0B).MVJ29?G3SKU.3"4.MZJ60B 3R;I+TJ 3I2	3L> 3P;E2 	W+TCH6"Z;.MZJ21WL/T7KV*M26^27OWS/BB3"5*M26^37OWS/BV6" *M26^43O?T"862.JV63I	F.<N>3TWH/NZ7.MZJ66KP7ISN" *M66B73R;I3T&"2 	WN6".J"67LSE3CN="+7P.J&63P	R+NK
7N
O* CI7H[A+ER 2"N;2;F"+NCD7YWO2 GH+VCE.$."S6 .JB73P	R+NKT+DCO7YWO2 	W+SCH+TCO3C;O3T;I+UKE";6 .JF77ICN3UT"$6 .JJ73IF*$J=7YOE2"T/EGN"2*M27&3+FSH2=:"7OR"3H;E.4B1.M^J64KP7ISN2";A3SWW7R& +ECS+OCR+N3O2 SI7ISO""*M27^53O?T"760.JZ73I	F.<R>3TWH/NF8.M^J67KP7ISN" *M67
83R;I7T&"+OCU3W;I""*M27297EOT*=/SP*M28^03O?T"669.JF87RSE3U;R.M"J62KP7ISN" *M*8B33P	R+NKT7N
O2 WW6 KD+ACW*-B-7H
O2 GM+NCY7CKA+DCS+DCO7YWO2 GW+NKT";*M28&47NWPT7T.JV87ISF6=R03H;E*9B8.M"J26WL/T7Z*1B0.M"J27[I/TR<3TWH/NB9" *M68B83R;I7T&"+OCU3C;A*	CT3DGR3W6 3OWR2 T+ACN7TKH+ECE7CKA+DKS" *M28^93O?T"864.JB93P	R+NKT3WGH3TF +RCE3TWH+ICR3N7U7BKE+SB".M&J21?F7RF 6=R1O7T.JJ97ICN7
WT.M&J23?G3SKU.1N7.M&J24WN7XGT" *M69B53R;I7T&"7OKU2 WN3W" 3ASN*:B".M&J26WL/T7N"1*M29^77OWS/B"1"5*M29287E+T.=B1*+CT.M&J29?F/R7U26?T"160.JB120[I7ISN*(?X61:0*(7U*6&).<F>20&*+NT/XF/*0^/UV-6)R)3H;E.1J0.MFJ20^17OWS/B^1"3*M.1J07NE+TCU.MFJ60B33R;IT6 .JB164KP7ISN*
CI+ACM3T/A3I
N6"*;.-B1.-/T2"GC+RKD";6 .JB125[I/ZF=61R+3TWH/NB1"96 .JB166KP7ISN*"KS.MFJ60B73R;IT6 .JB128?G/TGO*1B0.MFJ60B93R;IT6 .JF120WL/T7N"6*M.1F17LSE3V&=.MFJ21223E	T"=61.JF123?G3SKU.2^1.MFJ21243EKT"=7U.JF125WL/T7MD*M.1Z17I[F.<^>3TWH/NF1"96 .JF127WL/T7Z*2B8.MFJ21^83
?T.1N3" *M.1&13I	F.<Z>3TWH/NJ1"26 .JJ120WL/T7Z"1*M.1F27GSO/ON1"36 .JJ122[I/U6>61R33H;E.1^2.MFJ22237E+T"=62.JJ124[I3FGN*(&0.<Z>3TWH/NJ1"6*M.1V27LSE/ZF="96 .JJ126?G/TGO*3B3.MFJ22&7/F;U.=Z13TWH/NN1"2*M.1"27LSE/ZF="96 .JJ129[I3FGN*(&0.<">3TWH/NN1"1*M.1B37LSE/
F="16 .JN121?G/TGO*3B3.MFJ23227E+T"=62.JN123WL/T7K"0*M.1R37GOO/UOB"065.JN125[I/T:<6.R53H;E.1V4.MFJ23&6/F7V27T/EGN"460.JN127[I/I:<26T/EGN*4B0.MFJ63B83R;I3T&"2	3L2 C3E/C""6 .JN129?G/TGO*4B6.MFJ24207E[T*=/Z3FGN*(&0" *M.1F47GOO/UOB"468.JR162B 3R;I+TJ 3I2	3LJ 
EKT";7V.JR123WL/T7KV*M.1R47GOO/UOB"066.JR125?G3SKU*6B5.MFJ64B63R;IT6 .JR167KP7ISN2"?N7W^ 3EN 7OCM3AWR2 GH7NOD""6 .JR128WL+TSJ*=SH.MFJ24293E/T2$&="$*M.1B53P	R+NKT+MCY3H;A+DJ:" *M.1F57LSE/NZ=.MFJ25^27OWS/B"1"5*M.1N57LSE/NF=.MFJ25^47OWS/BF2"7*M.1V53P	R+NCT.M
J65B63R;I7T&"+OCU7H[A+EJ ";6 .JV127WL/T7KD*M.1"57GOO/UOB"669.JV129WL+TSH*=SJ.MFJ26203E	T2$.="$*M.1F67LSE3K6=

Note: Lines longer than 256 characters were wrapped



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search