File DIGITS.BA (BASIC source file)

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

.2B02 WR+M* **B*3D
I7IOT2 GG+MCE3F?R3MR 7ASR7MWO+TCH3LKI7RKA3Y6 3O	D3FWI3DZ +OCR.MJJ*0B13R7E* **2*J 3A	S7CB-7LOU6 	B2 GD+VCE3A3H2,R 3I	G3T3A2 SP/PF-.1R/25^ 7RWOP*M.2J02 WR7MKA3KKA+LCY3TGR3N3S3AWT7DR 3O> +SB87BOA+ICC+BCY7K	A* ;R2 	F3SWH+R: 2.R.E7C.JF260B 3R;I+TJ 3T	H3S& 3SF 
 GG+MCE+OCF3GWU3S	S+N;G""*M.2B26 KP7ISN2 Z"+OCR7ION7TWR3C	T7OON6,R 3YWP. F	*	B,7EOL7ER 3YWP. B	.	.".MJJ*3B07ICN+UCTE*M.2B42 [I. 7E60R 3H;E. Z3"0*M.2B56 KP7ISN.MJJ*6B03P	R+NCT2"3P7EOA7ER 3AWK* CA3PWI+CCE+OCF7PCA+ECR3ASN6 KW3IWT2 ?D+WKN.MJJ*7B03P	R+NCT2"T3E
 3I	G+TCS*	^0*,^ *12	6 KO. J	6	R 7HKI+TCY3T7I+ECS+ACT3R;A3D7O".6".J"260B 3R;I+TJ 7AKR3A
N7ER 3H7E2 ;I2 T3RWE2 	L7NOE2 [O2 WT3NR 3I	G+T;S""*M.2B96 KP7ISN2 &"2 	W+LCL3A/S2 ?F7RR 3H7E. B16 SA* CA3T7I+EJ..MNJ*0B03P	R+NCT*"CI3W3I3LF 3LGW+YCS3GWU+SCS7FKI+S3T2 ;A7DR 3H;E2 ?L+OCK+ACT7YWOR6".JF360B 3R;I+TJ 7NE3T: 3UKM+ECR+TCO3SWE2 [I* CI7WOA2 	R7GSH*
B +BCY7PKU3E2 3U/C* KI.MNJ*2B03P	R+NCT6"WO7GSH2 ?T2 WB2 	R7GSH. B12 	T7MOE*.B 7BSU* CI7HCO7ER 3OR 3OJ 7EST+EKR.MNJ*3B03P	R+NCT2"T+ACN3TGH+T* ****""*M.3B46 KP7ISN7\KP7ISN.MNJ*6B03RGE3DF *,3BC*M.3B72 GD+TCA.0F,",63.J"320R +ICM/MJ(.6J,*)B,/KJ(*,&22,2 *(28"26
.J"325Z +OCR/IB=2 ?T. Z2.MNJ*9B07FKO. 7J60R /OJ +\M3I*,.)F=.MRJ*0B07NE3T* .MRJ*0B57NE3T& .MRJ*1B07FKO. 7I20?T"8*M.4V12 ?F3R* *=B0+TCO223\*(3I/J6)"3*M.4B22 WN+XCTJ*M.4V22 WN+XCTI*M.4B32 ?F3R& *=B0+TCO"2*M.4V32 ?F3R* *=B0+TCO22/\*(3I/J6)"9*M.4B42 WN+XCTJ*M.
V42 WN+XCTI*M.4B5* L.0B,.)J=+\L.4F,.)J=+\L.8J,.)J=.MRJ*6B5/MB(*,&16=20/MB(*,&2"=60.J"460* .=Z2/\GZ6=28/Z62"2*M.5B1. 7X"0*M.5B22 ?F7RR *=B1+TCO"3*M.5B36 KP7ISN.MVJ*4B03P	R+NCT2"WT3N: 3UKM7EOR2 3P7EOA/E.".MVJ*5B07ICN+UCT/NF(2):,*(&2*,N*32)/NR(2):,*(&5*,N*62
/N^(2):,*(&8*,N*92)/NF("06).JZ520Z +OCR/IF=2 ?T. B1.MVJ*7B03W:=*(	I"-61.J"520& 7F^ 2=
S7N^(6)R 3H;E. J6"0*M.5B96 KP7ISN6 V"+SCE3O3N7YR +HCE3D
I7IOT. B	*	B,*	^12,> +R^ *2:	""*M.6B06 KP7ISN2 2"+E
T7SR +RCY3AGG+I;N2"
\3O?T. N5"0*M.6B22 WN+XCTI*M.6B36 KP7ISN7\KP7ISN2 6"3Y^ 7UOE+S2"2"?Y+UCR+N;O*"J,7ROE7USL*"J,+N;O2 	R7GSH6"C\3R;IT*M.6B62 ?F7RV *=B1+TCO"160.J^620: *=N7U2)/SB=.MZJ*9B07FKO. 7J60R /OJ .M^J*0B0/S613A.*.(KZ*,	J*++B7L*(21*,2)N+**M3Z*,")*M.7B12 [I. ;S+SB13TWH/N
 "660.JJ720& 7FN .<GS2 T+ECN.7B4.M^J*3B0+ICF3RSN*(&0.<V.2 T+ECN.7B6.M^J*4B07SN=21
\"=7J.JZ720: 7ESX" 7J.J^760B 3R;I3T^ *,N+U2).M^J*8B0+ICF3G:=*(	U2 T+ECN.8B1.M^J*9B03P	R+NCT6"KW3O
N6"",.M"J*0B07GSO/O" "860.JF860" *=/X"1*M.8B26 KP7ISN6 J"3IG+T2"X*M.8B3* M3Z:,2)6=*(3Z+N.)"1*M.8B4* L+Z21/N6)7L*(21:,.)F+.M"J*5B07K*(22:,2).=.(KZ*,	N"+61.JZ860* *=7Z7ISN*(?Z*9*)"9*M.8B7. 7Z63***+NU6).J"860* 61*=2-;I7T*(*/&9"*69.J&860* 22:=*(	U.M&J*0B07NE7
V .M&J*1B07NE7TR .M&J*2B03P	RN7T.JN920& 7F" .>B12 T+ECN.9B8.M&J*4B0+ICF/XF<60R 3H;E. B1"160.JV960B 3R;I+TJ 3I^ 7UOE3SSE6 E7ASC+LCY.1N/2 [O2 ?Y+UCR3N7U7BKE+SJ..M&J*6B03P	R+NCT6"SI6 OI* CA3TWI2 GG+M;E""*M.9B72 ?G+TCO.1N0"0*M.9B86 KP7ISN2 &"6 WG7EOS+ECD7MKO7
R 3H;A* >123> 7F& 7OKU6 WN3MWB+R;S""*M.9B96 KP7ISN2 &"2 	W+NJ.3\?F7RF *=B1+TCO61203P	R+NCT7CKH.$^(6)2;7NE7TF .MFJ.0B02 ?G+TCO.1N0"0*M.1F060B 3R;I+TJ 3I^ 7UOE3SSE2 WL+SCS3TGH/NF */B3+OCF7YWO3R: 3UKM7EOR".6".JB1*2B03P	R+NCT2"?Y3UJ 7ESA2 WM*.B 3C;O3GGR3T3U3A
T7OON* ****J*.MFJ.0B36 KP7ISN.MFJ.0B46 KP7ISN2 R"7O& +OCU3W;A7TR 7OR +RCY3AGG+ICN*(B17FKO2 WY+SB,20Z +OCR+N	O""6;.JB1*6B07ICN+UCTX*M.1^020& 7F" *=B13TWH/NN "865.JB1*8B03P	R7N3T3P	R+NCT2"T3A/N3SZ +OCR3TWH2 GG+M;E""*M.1&020V N7DBJBZ

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