File TAPE.FT (FORTRAN source file)

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

7CB 3R
O3R7A2 GTP7E*JCC2"GT+PKE2 WP3R?F7ROM* ?I3O> 7NR +HCE2 WD3VOI7EB 61^,3IT7OSU6 KP7ISN3I
N2 ;AY*M3CN 7HKA7ASC7EOR2 ;O2 T7EN 3CWR+E;N3BOE7AOU3E> 7FR 7HOI2 ;U7UWS+ACL3FGE7TKU3E&,3T& S*M7CB 7OOS3I3B7ER 3ON 7OCM3IWL2 ?C3M3P3IGC3TSE2 7I3AWG7S^ 3IT7OSU2 T3E& 3NWT3RWF3R;E+CCE+OCF2MNJ2 C3AGR3CWT+RCS+OCN3TWH2 OS3RWE+NJ.7TCA+EB"3UWS7SN 7UKB7OSU3IWN2 3C
KR 7ON 3I;G+ACL3TWH2MNJ6 CO3EGR7TKO2 ?C3NWC3R	N+NCG3TWH6 	T+PCE+OCF7ICN+UCT+ICT+ICS3W	A3T;I3GZ +O;R2MNJ2 ;O3EJ 3E3L2 WM7AON2 T+ACT3TWH2 	F+LCE3N7A3E& 3S: 3ESE+E;D3T	H3S& 3SF 2 ;O3EN 7HKA7ASCE7R*JCC3F3I3E: 3AWM2,T7EJ 3EGM3I	N+NCG7F[I3EN 7HKA7ASC7EOR2 WB3I
N6 KP3EWD3F;I+ECD7XN	2MNJ2 V(*.;G6 A7XX3XR.+A:)3T	H3SF 7SWS7ROE2 WL3G3A2 C3AGR3CWT+RCS+ICN3TWH2 	D3ROE7TKO3YF,N7D*JCC3P?R3VSI+ECS+ACN7EOA3Y6 3ET+OCD7FKO2 ?L7CSA3I
N2 GD+TCA3F3I+E3S+ACS7OCP3OWS7DR 3O> 3BWJC7T*JCC3F3I+E;S3TWH2 WS3C;O3DJ 3E3L2 GW7IOT2 ?F3RF +N^ +RB	+OCR*	
W2,WM3A	N+NCG3RGE3D> 7R^ 7RSIE6.*JCC+ICF3N	E3TWH3R> 7FR 7HOE3E& 7SR +HCE7ROE3P;O+S3E3C;O3T?R3LR 3EOS3ESN7SR 7OR +HCE3CGH3I	NN7G*JCC3QWU+R;Y+ICF3TWH2 WR3S?P3NWS2 GW+S^ +R2	3TWH2 	F+LCE+ICS3RGE3DF +NCD3TWH2 ?C7NKT+OCL3GWOS*M7CR 7OF 7UKE3YZ +OCR3CGH3I	N+NCG3
GG+I;N+ICF3TWH2 WR3S?P3NWS2 GW+S^ +W2	3TWH2 WT3R	M3N3A2MNJ2 	R7NOG2 T3RWE2 WB7LOL2 	S3G	N3F	Y+NCG3TWH6 WQ7ESS3I;O2 F	+RCE7YWO6 WS+RCE*?B	+ICF3TWH2MNJ2 ;A3SWW3R& 3S: +OCT*	
Y2,T7EB 3R
O3R7A2 
A3A;I6 OA+KCS7FKO2 	F+LCE3N7A3EV,+T;C+ICF3TWH2MNJ2 ;A3SWW3R& 7S& +E3S+ICT3W	R7TOE2 T3EZ 3IWL2 ;O2 WD3VOI7EB 61R,3H;E6 SS7ASR7SR +HCE3CGHI7N*JCC7IGN7UKI+YB.7FWO3RJ 3E3L7SJ 3I
N2,;A7DR +HCE3AGV3IGL3BWL6 CO3T?I+NCS7FKO2 C3A;I3I
N2 ?T" 7A*JCC3P?R3GGR3MN 7OON7ISS3S> +F" 3GZ,*,	D6.
T3O> 3TWH3R> 3P	T7OON2 3A7L
O2 3A7LR +HCE3VOE7TKOS*M+C" +ACS3N7U7BKE+SB)+TCO+BCE3P	R3NWT3D> +UCT*(	W6,KO2 ?T2 WR+ACD3A?N3TWH3RZ 3IWL6 R(6)N,3UC2MNJ6 OA2 [A7TKE6 WD3M	P+NCG3OWN2 	F+LCE+OCN+PB13ASN2 T+ECN3RGE3D;I3GF 7NSO7HKE".*M3C^I2IC3A;I7SR 3O^ 3FOI6.[S2MNJ"I	D3CGH7ION2 ?T6 KD+A;WS7
"J	C3FNI3H	A+NCS+TCO3MSO7I	F6.[S2MNJ"I	R3RGE3DZ 3IWL2MNJ"I	T3I	N3TGI7L+I7ER 3A3B7EB,7RCE3AWR2 ?T2 WR+ACD3A?N3TWH3RZ 3IWL2MNJ"I	W3W	R+TCE3F3I3E>,+R" 7FKO2 C3A;I3I
N6)^ 7RSI3EF +LCL3P	O7NOT2 ;I2 GT3BWL2MNJ"I	Y7YOE2 WR3S?P3NWS2 ?T2 F	+RCE7YWO6 WS+R
E6 WQ7E	R2 ?F7R^ 7RSI3I
N2 	FL7E*JCC7FKO3TGR3N& +I> 6 CO3T?I+NCS2(?I")*M7CN /R* 2 3A3PGH6.SF* B/3C/L6.SF* B/3RKK6.SF2MNJ2 C* B:3G	F7CN.+V> 6 KD+A;W+SCV2/6 3O	D+F;YS7V*JCC3BGE3RWB7IWT+NCG3V;O2 WD7COU. ".-^7"3*M2I?C3M?M3N: 3TKA6,CIT*M2I	D3M;E3S?I3N: 3TKA.(B5.0N,2)&,3F3I/EN(")*M2IG
+LCL7ACLH7A"J&13C3A3LN +LK"16)2JNI3A3L2 /R3B&(3F3I/EF(")6)2J&I3F3I/EF(2)&=3F3I/EF(.)"-"M&J3I	F+LE.26).1Z5"0*M2I[I3IWL*(&3.=V1"6602JNI3A3L2 3C/KJ(")*M2IGC+LCL3RKK2(OI3OWD")*M2I[I2 &(3CSO/EF-.1R8*)22.3J,.MJJ2I[I2 &(3CSO/EF-.5R0.)F1*,27"161"J&33C3A3L& 3OWP+N
 .	GP2	&,3F3IE6)6JJI3ESA. R(.,B1*0B)7NSP"M&J7ISP6=CI/TF+"M&J7NSP22&=+P/T7NSP"-612J&I3F:(/PKT.-B5.0V)*,25"4*M24:I/PKT.=B5"0*M25RI/OZ . 7M7ISP6,CNT626JJI3ESA. R(.,B1*1B)6(SN+AB3M:,2):,*=21"36)"J&63C;O3T;IU7E2J&I/P7T7NSP"2*M2I?G+TCO"161.J^L2IGC+LCL3C/L*(&3"M
J3C3A7LJ +KB3I?C+D	E"M&J+ICF2(OI3OWD.-Z1*3&2.1",",61"J&83C3A3L> 3OWP+N" .	GP2	&,3F3IE6)6J^I7RSI+E" .4F,*0&06 CIT*M.1B02I?F3RGM+T" +A&3"M&J+DCO*1B0/MF=6,CIT*M*1B06IKW3IWT. R(.,B1*1B)6(SN+AB3M:,2):,*=21"36).JB121ZI3O7R+ACT.(KA")*M2IGC+LCL3O3C3OWS.MFJ21NI3A3
2 3C/KR(")*M2IGC+LCL3RKK2(OI3OWD")*M2I[I2 &(3CSO/EJ-*8&8*122*220"162.JJ12I[I2 &(3CSO/ER-*8&0*123*129"163.JN12I[I2 &(3CSO/EF-.3J1.)R1.,"1.,R1.MFJ24&I+F" 3I?C+D7E.1B5.4F).5F,.6F,"5*M"1&5+ICF2(OI3OWD.-F4.6F).1J,.1F,"1*M"1&63W	R+TCE*(21.1J06)CI+T",6(SN+AB3M:,
):,*=21*32)/MF=6,CIT6).JB122ZI3O7R+ACT.(SI./N(.(SI6,"2*)&)"M&J7GSO/OF "1*M"1&87ISP"=602J^I3O?T" 61.J&12IGC+LCL3CGH+ICN2(^	3FOI"	6).JB22IGC+LCL3CGH+ICN2(R	7R
A"	6).JF22IGC+LCL3CGH+ICN2(6	3O	D+F
Y")*M2I;ED*MBLBZ

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