File SLOTS.BA (BASIC source file)

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

.1B02 WR7MB 3RSO3UWC3DJ 3YZ 3RSE2 	M3RKA3E3L3EF +NCD3BKO2 GH3RWP3R> 3N* +A;N. &2.,F .9N7.MFJ*1B03R7E6 SI2 	S3M3U3AWT7SR +HCE3S?L3T6 3AC3IWN".*M.1V12 WR+M* **B*3C;O7VKE3TSE2 ?T2 GB3SOI2-3P+UCS+BCY7D[A3EF +H3L2 	D7GSIA7L.JF166J 3EGM3RGK7B	L6 KT7AON7LSA+ECD+
CO/OS2 GB3SOI6 	B2 GK7YJ 2.Z 3IS+ECR*.:.3DOE.MFJ*2B03P	R7N3T3P	R+NCT2"WW3L?C+MCE+TCO3TWH* [H3MN 3A	S+NCO*!J!.MFJ*3B03P	R+NCT2"?Y3UF +RCE3SGT3N	D+NCG+ICN3F?R+NCT+OCF3OWN2 [O6 WO3R> +N7E3A7R2 GB3N	D+T;S""*M.1B46 KP7ISN6 &"+OCU7M	A2 WB3TZ 3R7O. F$2 ?T. F$*0:
6 R 7OB 3U3L2 T3EF +R3M6 KP7EOS2 TE6".JR165B 3R;I+TJ 7RSE3U;R2 WK3TF 3FWT3R6 3A	K+NCG7YWO3RJ +E;T6"C\3R;I7T2 3P	R+NCT2"?G+OCD3LOU+KF *!J!.MFJ*5B07LSE. 7P"0*M.1B66 KP7ISN7\KP7ISN2"?Y+UCR7BSE""6;.J^120& 7NWP3T6 .MFJ*8B0+ICF/MF>*0B03TWH/N" "660.J&120& 3F6 *<
13TWH/N" "860.JB2206 2=;I3T6(")*M.2B12 ?G3SKU. J1*7B0.MJJ*2B03P	RN7T.JN2202 +ECT3X&=+NT66J*+ND*0.)"16).JR2202 +ECT3Y&=+NT66J*+ND*0.)"16).JV2202 +ECT3Z&=+NT66J*+ND*0.)"16).JZ260B 3R;IT*M.2B72 [I. 7X61R 3H;E. F9"0*M.2B82 [I. 7X62R 3H;E. N9"0*M.2B92 [I. 7X63
 3H;E. V9"0*M.3B02 [I. 7X64R 3H;E. ^9"0*M.3B12 [I. 7X65R 3H;E. &9"0*M.3B22 [I. 7X66R 3H;E. B1"160.JN320& 7F& *=B13TWH/NF .0B3.MNJ*4B0+ICF/YJ=2 T+ECN.1V0"0*M.3B52 [I. 7Y63R 3H;E. B1"760.JZ320& 7F& *=B43TWH/NF .0B9.MNJ*7B0+ICF/YV=2 T+ECN.1F1"0*M.3B82 [I. 7Y
6R 3H;E. F1"360.J&320& 7F* *=B13TWH/NF .1B5.MRJ*0B0+ICF/ZJ=2 T+ECN.1^1"0*M.4B12 [I. 7Z63R 3H;E. F1"960.JJ420& 7F* *=B43TWH/NF .2B1.MRJ*3B0+ICF/ZV=2 T+ECN.1N2"0*M.4B42 [I. 7Z66R 3H;E. J1"560.JV420& 7F" *=CY3TWH/NZ "060.JZ420& 7F" *=CZ3TWH/NZ "360.J^420& 7F
 *=CZ3TWH/NZ "560.J"460B 3R;IT*M.4B96 KP7ISN6 &"+OCU7LOO+TJ..MVJ*0B07LSE. 7P3P6-.MVJ*1B03P	R+NCT2"?Y+UCR3SGT3N	D7NOG6 KA+ER 6"B;.MVJ*2B03P	R+NCT7\KP7ISN6 ^"7ASN2 ;A3OT+ECR3P3U+L" 3Y> 3R: .)."3\;I7PSU* SA3\[I* SA6=&"6"R 3H;E. Z1"0*M.5B56 KP7ISN.MVJ*6B0+ICF
PB<2 T+ECN.6B7.MVJ*7B0+ICF/PB=2 T+ECN.6B9.MVJ*8B0+ICF/PB>2 T+ECN.7B1.MVJ*9B07GSO/OF .3B5.MZJ*0B0+ICF7Y*=2 T+ECN.7B3.MZJ*1B0+ICF/YF=2 T+ECN.8B2.MZJ*2B07GSO/OF .3F4.MZJ*3B0+ICF/ZF=2 T+ECN.8B2.MZJ*4B07GSO/OR "760.JV620& 7F* *=B13TWH/N" "260.JZ620^ 3O?T. N1"4
1.J^660B 3R;I+TJ 3PWL3AWS2 WS7ER +HCE7SOY3T7E2 GM3N
A+ECR3ASN2 GP7YV 7PR +HCE3M;O+ECY7YWO6 
O+EF "!6".J"620^ 3O?T. N1"560.J&660B 3R;I3T""+E3Y2 ?Y3UJ 3R/O3EV 3V;E".6".JB720^ 3O?T. N1"560.JF760B 3R;I+TJ 3C3O3LOE7T& 7OKU2 	W3N	N7NOG6 KF+OCM3TWH6 	S3SWT3M6 3AGN7GKE* F!""*M.7B22 ?G+TCO.1V3"0*M.7B32 [I. 7Z61R 3H;E. "7"0*M.7B46 KP7ISN7\KP7ISN*"**7TCO2 
D3LGL+R**""*M.7B56 KP7ISN6 &"+OCU3W;O"!6".JZ760B *="(.(B1**	M*+	M*+	P.M^J*7B07GSO/OV "160.J"760B 3R;I7TC\3R;I+T*"2***3A/C7PSO****""*M.7B96 KP7ISN6 &"+OCU3W;O"!6".JB860B *="(.(B1206*2)6+6)B+")*M.8B12 ?G+TCO.5B1.M"J*2B03P	R7N3T3P	R+NKT2*?D3U3B3EJ +A+R""*M.8
36 KP7ISN2"?Y7U^ +OGN""*M.8B4. 7P*("(256*2)6+6)B+")*M.8B52 ?G+TCO.5B1.M"J*6B03P	R+NKT7HWO+SCE3L7I7IOT6 KA+ER .1B0""*M.8B72 ?G+TCO.1B6.M"J*8B03P	R+NKT3M;I7IWM3MJ +ECT+ICS*$J1.M"J*9B07GSO/OF "660.JB920^ 3O?T. J2"0*M.9B16 KP7ISN2"GB/R."3\?G3SKU. N1"160.JJ920
 3O?T. N3"0*M.9B36 KP7ISN2"WB+LKL2;
\7OWS/BF .3B1.M&J*4B07GSO/ON "360.JV960B 3R;I3T>"3R;A+GKE2;
\7OWS/BF .3B1.M&J*6B07GSO/ON "360.J^960B 3R;I3T2"3E?M/N."3\?G3SKU. N1"160.J"920^ 3O?T. N3"0*M.9B96 KP7ISN2"3P+UKM2;
\7OWS/BF .3B1.MFJ.0B02 ?G+TCO.3B3.MFJ.0B16 KP7ISN2"C7EKR/Y."3\?G3SKU. N1"160.JB1*2B07GSO/ON "360.JB1*3B03P	R+NKT2 GB/R."3\?G3SKU. N1"160.JB1*4B07GSO/ON "960.JB1*5B03P	R+NKT2 WB+LKL2;
\7OWS/BF .3B1.MFJ.0B62 ?G+TCO.3B9.MFJ.0B76 KP7ISN2"> 3R;A+GKE2;
\7OWS/BF .3B1.MFJ.0B82 ?G+TCO.3B9.MFJ.0B96 KP7ISN2"2 3E?M/N."3\?G3SKU. N1"160.JF1*0B07GSO/ON "960.JF1*1B03P	R+NKT2 3P+UKM2;
\7OWS/BF .3B1.MFJ.1B22 ?G+TCO.3B9.MFJ.1B36 KP7ISN2"N 7HKE+RKY2;
\7OWS/BF .3B1.MFJ.1B42 ?G+TCO.3B9.MFJ.1B56 KP7ISN2"J +AKR.MFJ.1B62 ?G+TCO.4B5.MFJ.1B76 KP7ISN2"J 3E3L""*M.1"120^ 3O?T. V4"0*M.1&160B 3R;I+TB"3OGR3NWG""*M.1B220^ 3O?T. V4"0*M.1F260B 3R;I+TB"3L7E+OKN.MFJ.2B22 ?G+TCO.4B5.MFJ.2B36 KP7ISN6"B 3L7U""*M.1R220^ 3O
T. V4"0*M.1V260B 3R;I+TB"3CWH7R	R""*M.1Z220^ 3O?T. V4"0*M.1^220Z +OCR/Q6461R /OF "06 .JJ1*9B07NE7TF "4*M.1B360J 7EWTR7N.JN1*1B07FKO. T*=B1+TCO"5*M.1N320: 7ESX. T.MFJ.3B42 WR7TKUN*M.1R361B 3R;I7TC\3R;I+TJ 7DWO3BWL*!J!.MFJ.3J46 KP7ISN6 &"+OCU3W;O"!6".JN1*4B
+P"=.(J(**	M*+	M*+	P.MFJ.3R42 ?G+TCO.5B1.MFJ.3B52 ;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