File ADVENT.FT (FORTRAN source file)

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

+CB 7A[D7ESN3UWRS*MC*M3C6 3O	D3FWI3DJ 3Y. 7ESN2 3B3A/C7EST2MNJ* B * B * B * B 2 ;E3G;I7EKE3I
N6 	S3SWT+MCS3G?RU7P*JCC* B * B * B * B 3D
I3IGT3LV 3Q	U3PWM+NCT7CKOP6.*JCC* B * B * B * B *1653J3U.-^72MNJ2 ?M3D[I3ISE6 	B2I?B7BN 3U;PI7K"J	C2I	D+SCK3E
N3IWN3E	RN7G"J	C.IF22-OO/T^-"7*M3C> 3R
I3IGN7LZ 7EOR3I;O2 GW3SZ +OCR3DOE7SOY3T7E.-B12MNJ2 WN+XCT7VKE3S?I7N^ +ACS7FKO2 ?F7RKT+ACN+I7V7PWL7SV 3NWDR*M7CR +HCE7IOA6 CO3EGR3T;I7GN 7YSS+ECM+OCN3TWH2 SP/PF-.1^/"0*M7CR 7HOI2 WV3R	S+OCN+ICS7FKO2 ?F7RKT+ACN+ICV.(CV*1CC+OCR7LSA+E	R2MNJ2 ;U7DKE6 SR.-F12 ;
2 F*+N+Y2 SP/PF-"1*MC*MC*M+CB 7CKU3R;E3T2 3I	M/T+S2MNJ.IV760R 7R[A+ECL7OSP3I;O+S" 3TGR3V3E6,R 7ROV+I	Z".*M/CNI*0B03VOO7AWB7LKA7Y^ 3OSR+S" 3KGT+BB,3AGT+BB,3TKA7S+I")6."J	C.1B52 ?L7CSA3I;O+S" 3LWT+X3T6 SS7ESX2,. +E3Y2 ?C+N3D2 KA+BB,3A3T+O3C2 ?L3C	S+Z:)2MNJ.
B120> 3BWJ7COT6 B(3LOA6,B 3LOA+EB,7FI+DB,7FI+E3D2 	L+NCK6(
T3IWC*)B,3PWT+X3T6 KP+O	P".*M+CBI*3B52"OA3T?I+NB"7VKE+BCS2(OA7TCS+KB,3VKR7S+I")6."J	C.2V02 GR3N?D3M6 7EOS3AWG+S" 3RWT+X3T6 SR3X	S+Z:)2MNJ.IF 22R 3I[F3EWR+NCT3PGL7YKE2 3C7AOS3I	F7CSA3I;O+S" 3CWT+X3T6 [C+A3L2 3C3SGM+X:)2MNJ.IJ 20" 7ISN+SB,7LOE/SN 2 "(7ISN+L
C2 	H3NWT+DB,3H;I+T3S2 ;H3T	S+Z:)2MNJ2I7[3A	G3C6 7EOS3AWG3SF +RCE7CKU3R;E7T	L2 WD3C7O7MSI3TSE]*M+CBI*3B53M
A+ICC7MOE3S
A+ECS6(SM7ESX2,6 7AOG+I	Z".*M+CB 3TWH+RCE3AWR2 3A+SCO3L7I7IOT2 W3IC2 GC3N?N3TJ 3EV 3XWC3EWD3DR +UCE+TCO3TWH6 SS3ROU7TKU3E> F*M+CB 3TWH2 GD3TKA3AWS*.B *(;E+G2.2 T7EZ 3OGC3B3U7A	R6 OU+ECS/NF/.0B02 ?T2 WD7TKE3M;I7E^ 3OSR6 	T+P3E2MNJ6 N 7OR 7HKE3EN +A
N3TJ 3E6 3OWR2 T+ACN.1B060^ 3OSR+S&.6 R 7HOE7EV 3PWP3R2 3I	M+TCS3AWR":*M/CFI.0B02 ?N7NN-3Y?N3N7Y7OOU2 ?V3CKA3UGL+RCY7WKOD7S"J	C.3B02 ?L7CSA3I;OS*M/CFI*0B03O+B7ESCS*MC*M3C&I3M3P3I	C3T& 3NWT7GKE2 F(*-	Z"M&J3L
O3IGC3L2 3MGW+R3N3C?L3S
N2,GP3NOI2,	H3NWTD6,*JB * B *1BI* B * B 3C?L3SSE2,GG7VWE7PN,7CKO+N3G3DWSE7N"J7C2JNI3O7M+OCN6/T3T?C+MB/3RWT+X3T3L;I+E3S3AOS7VKA"M&J3C7O3M;O6 Z/3OOC+O?M6 SK+A3B3AGT7BR,7AOBI7Z2JNI3O7M+OCN2/3P3A?C+MB/3A3T+O3C3L;I7KB,3LOA3EZ,3IWX3D",3OSLN7G"J	C3C7O3M;O2 6/3TO
+O?M6 SM7ESX"M&J3C7O3M;O6 B/3TOX+O?M6 SP7ESX"M&J3C7O3M;O2 F/3BOB+O?M2 KAB*M2I?C3M?M+N> 7MOI3C7O2/2 7IWN+S3E7T[R3SN,7LOS+E3S3OSL3LOO2,?L3CN,3V3A2,/T2,WN3W?LC6,*JB * B 21.I+E3Y3PGL3CZ,3ISX2,OA7TCS3KN,3OSN2,	H7NOT2,;H3TGM7XB,7RCO2,GT7L	L2,GT7L	L"26,*JB * B 2
"I7ISN+L3C3C3H+O3C3C3H/OKC6,OD3E;E2,[D3L
A2,3D+O3C3D3A3TOL2,WK+Y3S3L7A3P^,7RSAE*M2I?C3M?M+N> 7MOI3C7O"/*M* B . N 2IGC+G3E3RSO2,?R+D223SWT+P3S7BKI3DR,7OKO2,	P3L?L7WN,3N/A3EZ,7IOS+U3R3TKA7LSE",*M* B . R 2I3C+A3M7OOY7TKE2,GM3G	Z3NR,7WKA3F.,3N[I3EZ,3OSO2,?B3T3T7E^,3AWT3R>,+I3L3PGL+N3T*MBJ* B " &53PG
/NKT6,A3E6,7IKR+O3R3DGR3G;O2,C3A7S6,KT3O3L6,KT3O3L22J,7EKA2,WM3SGS7GZ,3ESN",*M* B . Z 2IGB3TWT3R:,3U
G+E3T3C	O+N3S3CWH+S3T3E
G7SR,3RSI+N3T7VOA3EV,3MGR+L3D7PKYA7M2JNI3O7M+OCN2/	M3S?CM6/*JB * B 67BI7EKA7LJ,+U3G3CGH+I3N3BOA3K2,3O/O2,GC+V3E3N3U3LV,7NKT+N3C7DKP3S;S2,GS3Y2,3O/C",*M* B . " 2IT7R
O2,	F+N3D7I[N7ESN6,WT7RON2,7L7WKA3N.,3N3F+O3C7DSE3A3I2,KA7BWNM6,*JB * B 29:I3USM+I3E7MA3DWI2,/D3I3L2,?F3OGB3RJ,7OWN3SN,3LOO+K213C?L/CKK",*M* B . F 2I3C3O;S7GB,3A	N3CN,7LOO+E3D7G[A7ECU2,OS3O;R3G>,3D?L7CN,3TWRA7M2JNI3O7M+OCN2/	M/SKC2/& 6,SR3X	S3ZN,3L7S+A3X3

A7S+I2,?L3C	S3ZN,7TE7TN,7TE3T2,7TET6,*JB * B 61NI7ESC6,KT3AWV7LR,7RCV+O3S7T[R7S+I2,GT3BSN3X>,+B3J3J.,2,WV+R3B7HSN7S+I",*M* B . J 2IGM7XKT3S",7ISN+E3D7HSN3LOO2,/K2MNJ"M&J3D7I7EON3I;O2 	L7NOE.(J1")*M2I;I3T
E+ECR3TGR3V3E.(V7*02)7T[R7POO.(V7"06)2JRI3IWM3N	S+OCN3KGT/BN(*0&06,SA+AB.3B0")*M2I	D3M;E3S?I3N2 7TE/TF(*5&06,SS7ESX.(V1*02)7K	E.(V1*02)3C;O/DF(*5&02,KA/BF(*5&0",*M* B . F 6ISA3LOO.(V1"06)2JRI3IWM3N	S+OCN3PGL/CF(*0&02,3P3AWC.(B1*02)7FI/DF(*0&02,	F3XSE.(B1*
2)3L;I/KJ(*0&0",*M* B . F 6ISP7ESX.(B1*02)3P?R/PF(*0&0"M&J3D7I7EON3I;O2 OA7TCS/KN("56)2JRI3IWM3N	S+OCN3RWT+XT.2V0")*M2I	D3M;E3S?I3NN 7TE/TF(*22)3CGV/LF("26)2JRI3IWM3N	S+OCN3H;I3TOL.(B22)",7ISN+ED*2&02,	H7NOT.(B2*,&42MNJ2I	D3M;E3S?I3N6 7TE/TN("56)2JRI3IWM3
	S+OCN+TK*2&06,OD3E;E*(&62,3D+OC*62)3O3D+OC"66)"J7C"J7C2JNI3A3L2 WS3TSIL*M2IGC+LCL3I	NT*M2IGC+LCL3B
I3GWI"M&J3C3A3LV 7XSI"M&J3ESN&M*J"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B

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