File SPIEL2.BA (BASIC source file)

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

65B 3R;I+TJ 3K;E3N;E2 	S3ER +ICE3S	P7EKL3EWG/L+N6"2;7ICN+UCT7A2$3IGF*$J=+JKA2 T+ECN.1B8.MFJ60B 3R;I7TR +ACB.(B3*)J;3S	P7EKL3EWG/L+N""*M*2B03P	R+NCT7\KP7ISN7\KP7ISN.MNJ60B 3R;I+TJ 3B	E2 	D3EWS7MN 3PWI7LN 3O3L+ECN3SWI2 WG3G;E2 WD3NN 7OCM3UWT7RN 3PWI3L;E".6"
JB46 KP7ISN6 N"+ICE3KWO3NWN3NV 3IWN7N^ 7ESR6 
Z3IOS3H;E* B13USN* B63E;I3GKE+E;N""*M*5B03P	R+NCT2"	S+NCN7DOE6 CS3I3E3S& +SCT+ECS3E;I7E* 3I3E3ZA7L* 3UV 3RWR3IC+E;N""*M*6B03P	R+NCT6"WA3SWS3RWD3M" 3AWB7NN +ICE3DWI2 ?M3E3G3IC3K	E7T* 7WOI3CWH+NJ .M^J60B 3R;I+TJ 7SOY3T7E2 ;U7D* 3UGF+LCL+ZCU3WWA3HWL3NR +ACS3
	E7SSS":6".JB86 KP7ISN2 J"+ECI3Z[U3A3L6 KE3WWU3RWF+LCT7DKE2 WR3C;H+ECR3S	E+NCE7WKE+T3E""*M*9B03P	R+NCT2"	D+ECS7GOE3C	H7ESH2 WJ3DOO3HJ +ECI7SOY3T7E2 	N7CSH".6".JB160B 3R;I+TJ 3NOA3HV 3IWN3RJ 7ESS3I7M3T;E2 GZ+HCL3V;O6 WD3RC3LWA3UWF7N^ 3ISR2 GD+SJ .MFJ*1B03P
R+NCT6"CS3I3E2 KA3GKE3ROO3H;E2.R 3A;N6 KE3H3A3T;E2 WW7DKE2 	S3E: 3OC2 WDR6".JJ160B 3R;I+TJ 3ROE3HWN3RV 3IWN7NB 3U/N+TB.3W;E7NN +ICE3OWD3RR +ECR3ROE3HWN3RR +IKE.MFJ*3B03P	R+NCT2"	Z7E+L3A3H6 KE3R	E7CSH2 GH3B;E6 KE3HWA+LCT7DKE2 WB3TWR3FWF3NWD2 	E3N;E""*M.1B4
 KP7ISN6 B"3U/N3TR.+ACS3ESN3E
R3E;B+ICS7DOE6 CS3I3E7S^ 3ISR2 7A2 OS7HWL+SCS7AOU3GSE3ROU+KKT.MFJ*5B03P	R+NCT2"WW+NCN3SWI2 SO+ECR7DKE2 WR3C;H+ECR3DWI2 GZ+HCL*1B57EKR3EOI3H;E2 	W+RCD3DWI""*M.1B66 KP7ISN6 N"3U7M3E" 3AKL7IKE7T^.3E;N2 	S3E> 7DKE2 WD7RJ 3EC7NKE2 	D7E* 3A3H. N2""*M.1B76 KP7IS
2 V"3RWR3IC+ECN3ER3A3E3T* 3EWW7IOL2 WD3R^ 3E;G+ECR3E;I+ECN3P;U+KKT.MFJ*8B03P	R+NCT7\KP7ISN7\KP7ISN7\KP7ISN.MFJ*9B03P	R+NCT2"	Z7E+L3A3H* B * J ";*M.2B02 ;I7PSU" 7A.JF260B 3R;I+TJ 7MA3IGM+LCE7DKU3C3H3A[U3ZA+LB * B ""6;.JJ220& 7NWP3TJ .MJJ*3B07LSE. 7U*0C\7LS
. 7V"0*M.2B42 WL7T" "=60.JV260B 3R;I+TJ 3W3O3L;E2 	S7E* 3UGF+LCL3OWD7RN 7YSS/E?M""6;.JZ220& 7NWP3TN "$*M.2B72 [I* SC6=*"3UGF+LKL2 T+ECN.3B1.MJJ*8B0+ICF/C6$6"	S3SWT+MB"3TWH/N" "760.J&260B 3R;I+TJ 7WOA2 ?S+LCL7DOA2 WB7DWE3T;E"?6".JB320^ 3O?T. V2"0*M.3B12 ?F
R& *=B1+TCOB*M.3B26 KP7ISN2 R"3UOR3HGL3U;F3U7M/E+R2"&,.MNJ*3B03R;A3D7O3IWZ.MNJ*4B07LSE. 7W7ISN*(.166J*+ND*1&).MNJ*5B03P	R+NCT2"WM+ICN7WKE+TJ:";7W.JZ3202 +ECT7X"="+7W.J^360B 3R;I+TJ 7DKE3Z	E3T
I7EN 3U7M+EJ:";7X.J"320& 7F" .=V12 T+ECN.8B2.MNJ*9B0+ICF/X6>7AR 3H;E. B6"0*M.4B02 [I. 7X*2B33TWH/NZ "260.JF460B 3R;I+TJ 7IKH2 WW/R+T""6;.JJ420& 7NWP7T* .MRJ*3B0+ICF/ZZ>2 T+ECN.8B5.MRJ*4B0+ICF/ZF<2 T+ECN.8B5.MRJ*5B07LSE. 7X7X*+.MRJ*6B03P	R+NCT2"WD3RWZ3I	T+
CE3S7U/M+E6"";.MRJ*7B0+ICF/X6>7AR 3H;E. J6"0*M.4B82 [I. 7X*1B53TWH/N" "260.J&420& 7F" .=N22 T+ECN.6B0.MVJ*0B07NE3T& .MVJ*1B03P	R+NCT6"OE2 	S+NCD2"&;2;R"3UOR3HGG3E
N7EZ 3OKR+E;I""*M.5B26 KP7ISN6 ^"3EWD7RN +ICE3NOO3HR +ECR3ROE3HWN3RV 3RGH3LWT3NV 3IWN7NB 3U/N+TJ!.MVJ*3B03P	R7N3T3P	R7N3T3P	RN7T.JR560B 3R;I+TJ 3W3O3L;E2 	S3E: 3OC2 	E+NCE3R;U/D?E2 *(/AB 7DKE2 WN+I	N* B ""6;.JV520& 7NWP7TN "$*M.5B62 [I* SS2=*"+AB"3TWH/NJ 
460.J^520& 7FN *$J=3N	E+NB"3TWH/NZ "460.J"560B 3R;I+TJ 7WOA2 ?S+LCL7DOA2 WB7DWE3T;E"?6".J&520^ 3O?T. R5"0*M.6B02 ?G3SKU. J1"360.JF620^ 3O?T. R5"0*M.6B22 ?G3SKU. J1"760.JN620^ 3O?T. R5"0*M.6B46 KP7ISN2 R"+ECR3C7O7PSU+ECR7HSA6"V;6;B"3U/N+TKE.MZJ*5B03P	R+NCT
"	S3E" 3AWB+NJ .;/V6"WP7NSKE6".JZ660B 3R;I7T2 3P	R7N3T3P	R7N3T3P	RN7T.J^660B 3R;I+TJ 3W3O3L;E2 	S3E: 3OC2 	E7NN 3PWI+LB?2(GJ2 SO+ECR3N	E+NJ)";*M.6B82 ;I7PSU* ST.MZJ*9B0+ICF/T6$2"GJ6"R 3H;E. N7"0*M.7B02 [I* ST2=:"3E;I6"R 3H;E. B8"0*M.7B16 KP7ISN6 ^"+ACS3S3
3LR +ACS3BSE7ESU/E?N""*M.7B22 ?G+TCO.6B8.M^J*3B0+ICF7UZ>2 T+ECN.7B6.M^J*4B03P	R+NCT2"GD7SN 3PWI3L& +SCT3UWN7NOT3C	H3EWD+NJ!.M^J*5B07GSO/OF "960.JZ760B 3R;I+TJ 7DKE2 ?C7MWP7TKE2 GH3T6 +IKT.;/U6"WP7NSK+ECN7G
E3O;N+EGN""*M.7B72 ?G+TCO.1B9.M^J*8B03P	R+NCT2"	S3E" 3AWB3N6 +ICT6"Z;6;B"3U/N3T;E2 WG3W;O3N;E"!6".J&720^ 3O?T. &1"0*M.8B06 KP7ISN2 R"+ACS3S	P+ECL7ISS6 WZ2 ;E+DKE.M"J*1B03S?TP*M.8B22 WL7T" 2=;I7T"(*/&2.M"J*3B03P	R+NCT2"	D7EN 3U7M7E^ 3USR3E" 3AKL7IKET6".JR8
0^ 3O?T. J3"0*M.8B56 KP7ISN2 R"7IOE+ECR7WKE3T& +SCT+ZCU3HOO3H> 7DKE6 WZ2 	T+EKF.M"J*6B07GSO/OR "160.J^820Z +OCR/IF=2 ?T" 7B.J"860B 3R;I+TJ 7DKU3C3H3A[U3N7U7MKE*:B * B * J ";7I.J&8202 +ECT3D&=+NT/X^/")*M.9B02 WL7TB *=7X7ISN*(*7D6).JF920& 7F" .=J22 T+ECN.1V
"0*M.9B22 [I* CP*>B03TWH/N& "460.JN9202 +ECT/PF=.M&J*4B03P	R+NCT2"WM+ICN7WKE/T."P*M.9B52 WL7T" *=/XP*M.9B66 KP7ISN2 R"7E+R7ESI3IWG6 WS3MWM.:."X*M.9B72 [I. ;X*=CA3TWH/NZ "060.J"920& 7F" .=V12 T+ECN.1F3"0*M.9B92 [I. 7X*2B33TWH/NZ "260.JB1*0B03P	R+NCT2"I7R^ 
ESR.:.".MFJ.0B12 ;I7PSU" 7Y.JB1*2B0+ICF/YZ>2 T+ECN.1^3"0*M.1N020& 7F& *<B13TWH/NF .3B7.MFJ.0B42 WL7T" *=/XY*M.1V060B 3R;I+TJ 7DKE3Z	E3T
I7EN 3U7M+EJ:";7X.JB1*6B0+ICF/X6>7AR 3H;E. J6"0*M.1^020& 7F" .=V12 T+ECN.1F3"0*M.1"020& 7F" .=N22 T+ECN.6B0.MFJ.0B92 [I. ;X*=7A67R 3H;E. B6"0*M.1B120: 7ESX" 7I.JF1*1B03P	R+NCT6"OE2 	S+NCD2"&;2;R"3UOR3HGL3E[U7EZ 3OKR+EGI""*M.1J160B 3R;I+TJ 3WSE+ECR3SWI2 ?N
CCH7DKE2 WR3C;H+ECR3ER7ASL+ECN3E;I+ECN3P;U+KKT.MFJ.1B36 KP7ISN6 ^"3O3L+ECN3SWI2 ?N+CCH3E;I7EJ 3USN+EB?2(GJ2 SO+ECR3N	E+NJ)";*M.1R120& 7NWP7TR "$*M.1V120& 7FR *$J=+JKA2 T+ECN.2B5.MFJ.1B62 [I* ST2=:"3E;I6"R 3H;E. R6"0*M.1^160B 3R;I+TJ 7WOA2 ?S+LCL7DOA2 WB7D
E3T;E"?6".JF1*8B07GSO/OF .1B3.MFJ.1B96 KP7ISN2 R"+ECR3C7O7PSU+ECR7HSA6"V;6;B"3U/N+TKE.MFJ.2B06 KP7ISN6 N"+ICE3HKA+ECN6"Z;6;B"3U/N+TKE.MFJ.2B12 ?G+TCO.6B6.MFJ.2B22 ?G+TCO.1B0"0*M.1N260J +ECM3SKU7RWO3T;I7EJ 3EC7NKE.MFJ.2B42 WL7TV *=/U"1*M.1V260B 3R;I+TJ 7DK
2 WR3C;H+ECR7HSA2 	E3N;E6 WP7NSK6 KE3H3A3T;E"!6".JJ1*6B07RSE3U;R.MFJ.2B72 WR7MN 7UKB7OSU3IWN6 CS3IWLR6 .JJ1*8B07LSE. 7V/VF+.MFJ.2B96 KP7ISN6 N"+ICE3HKA+ECN3E;I+ECN3P;U+KCT3ER7ASL+EGN""*M.1B360J 7EWTR7N.JN1*1B07LSE. 7X7ISN*(?X"26).JN1*2B03P	R+NCT2"	D7EN 3U
M7E^ 3USR3E" 3AKL7IKET6".JN1*3B03P	R+NCT2"WD3RWZ3I	T+GCE3S7U/M+E6"";.MFJ.3B42 ?G+TCO.8B7.MFJ.3B52 WL7TB "=62.JN1*6B07GSO/O& "460.JN1*7B03P	R+NCT2"	D3EWS7R^ 7ESR6 OI7T* 3U" 3OC2 SO+ECR+ZCU3TWIF6".JN1*8B07GSO/OF .0B0.MFJ.3B92 ;ED*MBZ

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