File AXISE.FT (FORTRAN source file)

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

6IWS3B?R3U	T+NCE3A	X7S"(3P
A7E&,3P
A3E&,3BSC2,ON7HKA6,A3L;E2,;A3GWL2,	F7RSS3VR,7ESL+A	V2MNJ"M&J3D7I7EON3I;O2 KI+CD"26)"J7C2JVI3Q	U3V3A3EON+E" 7XOL*,	B6,"(+L3C+D2)6([Y+A3LA6)"J7C"J	C3SGT3NGD+RCD7WKE+TCE3FWU7RR +ICC2-2 3A;E+GCE3USN2 WZ3IC3EN3OEE*M7CNI3T;A7DKA7D^ 7ESR3EZ 7UKE2 	T+C6 2 KA3SGT+
CD3USN2 WB3SC3R[I3T;UG*MC*M3CRI3AGT* 3T7Z*,7H*,62",3TOI7S&,3TOI+S> * :0*22 * :0*2B7.,B ..N1*52 * :0*5B4",*M/CFI* :1*02 * :2*0> 2MNJ"M&J/T6 * :0"2*M*ICZ.=B ..V3"M&J+ZCH.=B ..^1"5*M.IKZ* B=.0^."M&J3X	T+CCS.=F ".*M6ISY7IOC* B="26."J7C.JB5*ICS6=R 3S;I2(;A3GWL
)*M*ICC6=R 7COO2(;A3GWL")*M*ICA.=F ".602JJI* B=.2B."M&J/D6 * :1"0*M2IWI/X6 " 602J:I/C6 2 ON7HKA2MNJ"M&J+ICF2(ON.)F *020.3B0.,B3"0*M.1B0*ICA*=6 A*M*ICB.=N ".602JRI* B=.3B."M&J+NCC*=6 N7C"J7C.JB3202I3FGL/G6 " 602JRI7ESL* B=7AOB2(WD3LGTV6).JB420&I+F" 3D3E/TF
*0:0.)V *020.4B5.,V4"0*M.4B52IWD+LCT2=R 7ESL**:0"1*M2IWI/X6 2 WI/XF-"M&J7GSO/OR "060.JB520&I+F" 3D3E/TB-..F0.)V *520.6B0.,B6"0*M.5B52I[I2 R(7ESL*-:1*0B).5B6.,B6.0Z,"060.JZ520RI7ESL* B=3D3E/TF*.0B."M&J7IE* B=7IE"+612J^I3O?T. V5"0*M.6B0.IGX.06 . B1*.*02*WIX
M6I[X+ACL2=Z 7IOR+T+V/XB1"M&J3D3E/T6 2 WD3LGT7V"*"160"J7C2JRI/X6 6 *-"M&J+DCY2=F 2*R(2*Z*+	T"M&J+XCN6=" 3P
A3ER+3XN*6-	D"*7S6J&I/N6 6 CY3AWG6+D**/S+D+YC*MC*M6ID* B=3A3X+E+N.0V.2-3F7OSA2(ON6)**H*M2I[I2 &(+E	X. V6.0Z,*620.6B5.MZJ"5&0+DCX2=R 7X*-3HZ*3LGO3T&(7AOB2(WI+X&).MZJ"6&0+DCY2=F 2*J(**/ZT6)6J"I/T6 6 CX3AWG6+D**7C+D+YS*M6ISY* B=3YGP+G/E+D+X3SR+3YN*2MNJ.MZJ"8
0+XCL6=" 3P
AE*M2I3Y* B=3YGPG7E6J"I+LCS6=" 3TOI7SN*"M&J3XOL* B=3X	T+C+SC*MC*M6I	D* B=3TF*"M&J+DCX6=N 6*	D"M&J+DCY2=N 6*	D2MNJ"M&J7MA* B=3A3X+E?N3Y	TC7S2JRI/OF .0B0* CI.=B * B,7MA"M&J/J6 " 622J&I+F" 3A;I7T"(3V3A6)"-3V3A.)^ *020.6B9.,B7"0*M.6B9*ICJ*=6 "1*M.7B02IGC+LCL3
7U7BKE6 "(7N&,7N*,6,[X+A3L3A
N+L3EJ6)2J&I+F" 3L3F+A	G. J7.0^,*120.7B2.M^J"1&0+ICF*(7I7MA*/&2. J7.0^,*125.7B2.M^J"1&53L3F+ACG.=F .M^J"2&0+ICF2([L3L
A.)& *020.9B0.,N7"0*M.7B32IGC+LCL3S7Y3B3O6 "(7T&,7T*,2,KI+C3D3A
N+L3E+N	C"M&J+ICF2(WI+XB).7B4.,B8.0^,"460.JR720NI3A3L6 	S3M?B+L" .9&9..&,*9:9*,3Z*	* * 2	3A
N+L3E"36)2J&I/EGX* B=7IE"M&J+ICF2(WI+X&1. V7.0^,*620.7B6.M^J"5&07IE.16 . F-.M^J"6&03C3A3L: 3UKM+ECR.(&9*92..9&96.*,.,B1*.*0**6(7IE2)F,3N3G3E&,/EGX")*M.8B02I[L3L
A* B="-61.JB960"I/N6 2 ;X6+SY7IOC"*7C6J&I/N6 2 ;Y6+SY7IOC"*7S6J"I3V3A* B=3XGV7L&+3TOI3SR*7ESL"M&J3C3A7LB 7LSO6 "(7L&,/LN,")*M2I[I2 &(2-GM+XB).9B1.,B1*520.9B1.M&J"1&0/K6 6 SY7IOC2/7A+OD3X	T+C3S3Y	T+C/S.1B./EZ-")*M2I?D. V920* * B=*12 " 7K2JNI3A3L2 3P+OCT2(3
6-D2,3Y6+	D*,&2"M&J3C3A7LB 7LSO6 "(7L&,/LJ,")*M2I3X* B=+X/L3XOL"M&J+YCL6=& 7L"+L7S2JNI3A3L2 3P+OCT2(3X2,3Y*,&2"M&J3C3A7LB 7LSO6 "(3LR-7X&,3LR+/YJ,")*M.9B52I?C3N	T3NWU.MFJ.0B02I?C3N	T3NWU.MFJ.0B52IWR7TKUN*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