File F1126.PA (PAL assembler source file)

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

6/OA3S
I7NR 3AWP6 OU+ECR7D[E3IWC2 GN7MOE6 KF+OCM7ISN3E;R+ACL3LKA7EOL"M6J6JR/7HOI2 WV3R	S+OCN+ICS3ISN3EWP3NWD+NCT+OCF3TWH2 WD3VOIE*M6/WN3MWB+RCS7AOS3O	C3AWT7D^ 3IT2 GT7POE2." 3EONE*M6/SI2 	W+LCL3R;U2 	W+TCH+P?S68N 7YSS+ECM7WSI+HJ 3B	U+LKD".*M*M>J3MSO3I	F+ECD.7F/.
^/"3*M2/?T6 OU3EJ 3LOO/KZ 6 OA2 GP3R7A3EWT3RJ 3LOO3K& 7FB 7ROE7ESN".*M*M>J7AOS3EKM+LCY3I[N3O7R3A	T/O+N*M>J2IN.3OR +TCA"/7L"J&/.*F=.2B0.0"(*9R)*M>J6IN.7AN +YCS7ASU7OOA*M>J7NSO7ER 7HOI6 KP7OKG+ACM7M	A2 WB6 WR3N> 3N: +O7N3DOE7SOY3T7E*-B87SOY3T7ES*M2/	V3A* 7U
S* : 3RF 3U?TA7S"J*M2/?F3R2 3ION7TCA+ECS3D[E3IWN6 SLA*M2/WD7FWA+LCT+ICS3DOE7TCAE*M"M&J3I;F3D[E6 SL/A2 3LGT.=.03DGT.=:1"M&J3I;F3D[E6 SD/A2 3LGT.=.13DGT.=:0"M6J6JVI/S7R.2B0"M6J2JZI3I3E/DF "M&J.*B2"060"J*M2I3C3AN L7L2J*I+MCS+I" .7B7*0>I7UKSI7N*JBI. B16M*J3D3
P&,3CGL2 3CL& 2/WW2 	W+SCH+TCO3D3E3EWT2 T7EV 7SKE2 WD3VOIE*M2I7J3S& 6 V(S	R2/GN7MOE6.N 3O& 7NWQ3IWR2 WD3VOI3E: 3UKM7EOR"M&J. F "2&I2/;A3DJ 3U3I+DJ 3U	N3TKA+LKE".*M6M*J7D[EN6,2J[I7NKZ3O2 +TCA2<WD3VOI3E2 /TCA">*M3I;F3Z?R6 SD/A2 7D[E3IWC6 SD/A:02 R/3E	V+CCE3
7A3ER;3E	V+CCE3N7U7BKE"M&J. B "M&J7JCM2 ?LO	P2/GH+VCE3G;O7ER 3H?R3UG2 3A3LF 3V	A3LKA+LCE3U	N+T;S"M&J3TSA2 SZ3E;V"+&12/	P+CCK+UCP7D[E3IWC6 WN3MWBR*M2IOD3A& 2 SZ7TSP+R>I3ASN2 GS+VCE+ICN3TKAL7E2J&I+SCZ7ZSD7PKT6IB/3O;I7TR 3O: 7ESX"M&J3TSA2 SZ3E;V"+&12/?N3WN 3
OL2 SA3DWR+SCS+OCF3UWS3RR +E;V2 GN+MCE3TKAL7E6JRI+ACD.(^7"4&06/OI. ^7*4.07D[E"*M2IOD7A* 3DOTT*M2IOD3A& 2 SZ7TSC2I:/+OCW3CWL+ACR7OSU2 3O3DV 7NKTY*M2IGT3DR 7TA2I:/+OCW7ROE7TKO3ER 3E	V+CCE3N7AE*M2IOD7A* 7D[E+N>I7FKI+SCT7WKOD*M2IGT3DR 7TA"+&12/WS3C;O7D^ 3OSR2
:(3O: 3UKM+E	R"M&J3TSA2 SZ7TSP+R>I3ASN6 WP3T& 7NV 7NSI6 WN3MWBR*M2IGT+D" *6603U	N3TKAL7E2JRI+CCA3ZWD+V/N"1*M2I7J7P* 3D3T+P>I3ASN2 ?L+OCP7FKO2 WN+XCT3U	NT6."J*M3L?OP&,3CGL2 3CL*M6IOI7ZV 7NSI"M&J3TSA* CI3U	N+T>I3POI7KV 3PR +E;V6 WN3MWBR*M2I;S3AN +LCA6I*/3E?
3SV +NCD7LOIT*M2I7J3PV 7XSI"M&J3TSA2 ;UI7T6JRI+ACD6(V-7NSI3A3B+E>I+TCO3C3A7CV 7NSI6 WN3MWBR*M2I7J3S> 3N	LN	E6/OI2 T+ICS3U	N3T> 3N	LN7E2J*I+MCP3L?O+P>IN7O2J*I+MCS3C3RF*M2I7J3SR 3OGLB7L2J*I+MCP3L?OP*M7ZSD7PKT6,V 7NSI3A3BE*M7ZSD+C3T"I602J;U+I3T2I;U3IGT3BWL"-
1"J*M3O3N3IWN.,B "M&J3I;F3Z?R6 SL/A2 "M&J3C3L2 GRR& 2/T+ICS7GSE7SV 7NSI2 V(3V;E* B-3OSD2)& 3N2 3I/N"M&J3TSA. F("0& 2/WW2 ?N3W" 3AWV2 ?N2 GP3UWS* B++ECX3U	N3T& 3NF C*M.IF6"4&12I^/7OR 3O2 3ION2 ?MD7E.JBI.0F0*I>I+ACC+TCO3XKO"M&J.0V4"2&I2//S+ICP+ICF3L;I7K* 3E
R"M&J..R+.&^1*7.7.6B0*0>I7JCM* .."4*M.I^0"0&32I6/3OWV"M&J.0B0"0*M*I...3F&.7^7.+B6"0&06/WJ+MCP3A?R3USN2 T3E> +NCE7FKO2 ?N2 	LN7K.JBI.7N1"M&J.0B0"0*M.IB0"0622JNI+LCA3C3L"M&J3TSA. V(.0B02I^/E7T.JZI.1F5"M&J3CGL2 3CL*M.IF6"5646JJIT7R6JNI+NCL3CGL* >I3S	K3P& 7FR
3AWP2 /O"M&J7JCM2 ;O3L;I*1>I7NSO2 ;O3L;I/E6 2 ?N2 WN+ECD+TCO3W	AT*M.IF6"4&12I^/7OR 3O2 3I/N2 ?MD7E.JBI.4Z1*I>I+ICN3OSR+ECR+TCO3W	A7TV 3N	TL*M*I6..1F&.7^7.+B6"0&02/GT+PCE3F;I3ISE7D.JBI.0J0*I>I3BOA7KR /O" 2 ?MD7E2J&I+SCZ3O3N3IWN6IJ/7EWT+RCN+TCO3C3A+L. *2B:7
CA3E> *.;K2M>J3N	L+N212 3C3AN L7L6JRI+ACD.(B2"M&J.6R1"1&I2/	L+NCC3MSOE*M.IB0"0&42I&/*/CO3PWR7SSE"M&J.0B0"2&I*/B83MSOE*M2I7J3P& 2 ;O3L;IE*M2MRJ7TA6,RI7ESX2 2/+T?A"M&J">*M"M&J3I;F3Z?R6 SD/A2 "M&J3C3L6 SR+RB;7RKT"M&J3TSA. ^("0&06/SS7ASR2 ?M3T?I3N& 7NJ 3EWV3R
S"M&J.6Z7"2&I2/3C7EKA6 SS7AWT7SJ +ECGA*M.I^6"6&42I2/3OSA6 N 7TSA+UCS3R
E" 7A.JZI.7F7*I>I3W	A3TZ +OCR3S7O3ET3I
N2 ?T2 GH3PWPN*M2I7J+P: "-61.JZI.7J7*I>I3RGE+DB 3SGT7TOU2 WR3GJ "M&J3ASN. R("0&02/?L+OCK+ACT3S3E6 KE3RJ I7T6JNI+NCA3CGL* >I7BSI6 OI2 WS+TB,3U	N3T: +OCT+OCN3L;IE*M6IOI3Z> 3N	LN	E2/;U+ICT3O3N3IWN6,J 7EWT+RCN+TCO3C3A+L. "2*M2I7J3P& 2 ;O3L;IE*M2MRJ7TA6,RI7ESX
 R/+T?A"M&J">*M2MVJ7XSI2,NI+LCA3C3L"M&J3C[I2 SC/FB "M&J7JCM* CI.(Z7"060"J*M7PSR7ESX.,B "M&J3DGC6 KP7TCI"M&J3TSA* CI7PSRI7P6JNIN7A2J*I+MCP7IB 3RWTX7T6JJIT7R6JJIT7R6JJIT7R2J*I+MCS/P[R7BSI"M&J3TSA* CI7PSRI7P2J*I+MCS/P[R7BSI"M&J7I+S6 KP7TCI"M&J7JCM6 KP7TE/TJ+
MBJ3R	TP&,"0*M/P[R7BSI.,B "M&J3ASN. ^("7*M2I;SA*M2I7J3P& 6 KP7TET*M2IGT+D" .-B4"M&J3SGP"M&J3TSA. F("0606JRI+ACD.(R2"0*M2I7J3S> 7PSUC*M2I7J3P& 6 KP26	BT*M7OWP+T3C"I606JRIL7S6JRIS7F2J*I+MCP..F-"M&J3CGL2 3CL*M2I7J3P& 6 CO3UOT"M6J6JBI3AWG"M6J2J?D3LKA+LB,"0*M2
3C3AN L7L6JRI+ACD.(B4"0612JRI+CCA3H;A7ESN"M&J3TSA2 ;UI7T2JRI+CCA3U	NT&22/?C+PCY3P	O3NWT7RR 7OR 7HOI2 GPG7E6JRI+ACD7IV 7NSI*2>I3POI7KV 3PR 3E	V+CCE3N7U7BKE"M&J7JOM* CI6(OUR*M"I&12IZ/3EOT3H& +TCS3H;A3DWLR*M3H;A7ESN.,B "M&J7HSL"M&J3C[I" 602J*I+MCS3I" 3AWNN	T
/WRA7D2J[I7NKZ3O2 /T3A.0F1"0& */B13P
A+E" .1"22 SW+SB)+TCO3FWI+LCD"16>2J[I7NKZ3OR /T3A.0F1"1& 2/WD3CGT7POE6 SS7ASR2 ?F3RGW/R;D"M&J.4B0"0&I6/SA2 ?L/CR .0B0.-F4"767.JBI*I>I3B?L+CCK7ZKE3O> 7FR 3AWP"M&J7HSL"M&J3C[I" 602J*I+MCS3I" 3AWNN	T2/WRA7D.JBI.1F1*I>I61B 3AWG"M&J.4B2"0&I2/WB3H;I3DJ 3LOO/KB 
M&J"6&I2/GP3R7A3EWT3RJ 3LOOK*M2I3HT*M"M&J3CGL2 3CL*M2IGT+D" 3DGTX*M2I7J7SB 3RWTX7T6JRI+ACD3U	NT626JRI+ACD.(Z260V-7NSI3A3B+E>I3M/A+ECS3AOS+ICI3U	N3T: 3UKME7R2J*I+MCS7OWPT7C2JRI+CCA3LKAE7L2JRI+CCA3LKA+E/L*1>I3CWL+ACR3F?R7MB 7R[E7IWOS*M2IOD3A2 3AWB/LJ+"M6J2J
I+SCZ+I" .4B2*2>I3S	K3P& 7FB 3AGR3MJ 3LOOK*M2I7J3PJ /LCK2I:/+OB:7T	R2 3B3O/C" 606JRI+ACD+I" .4B3*0>I7GSE2 GL3BWL2 C7AOR"M&J7JOM6 SRL&66/[O+ECR+TCO3H
I3H> 3RWDR*M2IOD3A2 3AWB+L>I7FKO2 GL3B3E2 C3E/C".*M2IGT3D& . R(.3F02I:/7ESX"M&J3ASN. ^("7*M2IGT3D2 3AWB+L>I3F;I3IS6 CU6 N17TR W7O2JRI+CCA3LKAE7L6JRI+ACD+I" .4B3*2>I23SR2 CA7R2J*I+MCS3R3T*6>I3OWV7RR 3O" 3IG6 KO7DKE"M&J3DGC2 GL3B3E"+616JRI+ACD+I" .4B3*3>I7L
A3TN 7HKA"M&J3ASN. ^("7*M2IGT3D2 3AWB/LF+"M&J3DGC2 GL3B3E"+616JRI+ACD+I" .4^2*7>I7ISN3E;R+ACL3LKAL7E2JRI+CCA7ISN3L3B6IN/7TOAH*M2I7J3P2 3F;I3IS2I^/3OZ 3I	N+SCHU7P"J*M3B/L"0&,3TSA* CI.(B4"0606JRI+ACD.(Z-.2B6"M&J3SGZ2 3CA*M2I7J7PV 3NGLB*M2IGT3D& . R(.0F0"M&J
TSA* 6(.0F7"4*M6I+S3AN L7A2J*I+MCP3U3NA7B6JRI+ACD+I" .4B0*5>I+WCE3AWR2 ?W3R	K+NCG+OCN3LKAE7L2JFI+NCD.(R7"0602JNI+LCL7RKT"M&J3DGC2 GL3B3E"M&J3TSA* CI.(B4"0642JFI+NCD.(R1"0602JNI+LCL3R3T"M&J3TSA2 GL3B3E"M&J3DGC2 GL3B3E"M&J3TSA* CI.(B4"0662JFI+NCD.(^7"M&J3TS
2 GL3B3E"M&J3DGC2 GL3B3E"M&J3TSA2 GL3B3E"M&J3DGC2 ;I3TKLL*M3L	F7NOI6,R +ACD6(KP3LKAL*M2I7J7SB 3RWTX7T6JRI+ACD2(GL3B3E"M&J7JOM2 C7KWDP*M2I7J3PR 3U3PA	B2/WW2 3A3RGE+DCY7H[A3ER 3E	V+CCE+BCY3TGH3T: 3AWM"M&J3CGL2 3CL*M2IGT+D" .7R7*0>I3C3A3C3U3AWT"M&J3TSA* CI3U
NT&22/;I7DE2 ;I+TCO3TKAL7E2JRI+CCA3A
S3ISN"M&J3TSA2 ;I3TKL+L>I7GSE2 ;I7TKE3N3A2 GL3B3E"M&J3DGC* CI3A
S3ISN2IV/3NWT3R& T*M2I7J3P& 2 ?D3LKAL*M2M&J3N3T+B3L" 602J;U/IKT.,BI2MFJ3S	G+N3D" 606JKP3LKA+LB,.4R0"0*M3LKA+E3L.I.0.0B;"M6J2J;U3LKA6,RI+ACD6(KP3U3N"M&J7JOM6 KP7TET*M2I7J3P& 2 ?D3LKAL*M7DCU3LKA2,N +LCA3C3L"M&J3TSA2 R(3U7PS7G2J*I+MCP3U3N+A/B"1*M"M&J3P
AE*M7DCU3M
S6,R 7ESX* B/+ICS7DCU2 GN+M3E2 ?N3TF 3S	S3GWND6/6JKP3U3N6,RI7ESX" &/3U3N3AWB3LSE"/*M2MNJ3HSK+U3P" 602JRI+CCA3C/HD*M2IGT3D& 2 CK7D2JRI+CCA3C/HA612J&I+SCZ3C/HD*M2IGT3D& 2 CK7D2JRI+CCA3C/H+A.1"1*M2I7J3S& 6 V(S7R.JFI"2&I2/;I3Q	UR7E2JC/KGA.,BI.;.0"0*M6IOI3ZN 3
SKU	P2/?N2 WD3VOI3EJ 7YR 7HOI2 GN+MCE7AKL3ESA3YV 7XOI+T3S2 ?GO7D2J*I+MCP3IN 3HSKU	P2/[I2 WW2 GC+MCE3BOA7KR 3O" 3EWR6,R 3AWK6 KE2 WR3TZ 3R7O2 WHR7E"J*M3C/HD&,"0*M"M6J6JKC+L3F"I602JNI+LCA3C3L"M&J3TSA. J("1652J*I+MCS7OWPT7C6JRI+ACD.(F2"2*M2I7J3S> 7PSUC*M2I7J
P& 6 KCL7F"J*M3R3T"6&,"0*M2I;A+D" "7672JNI+LCL3R3T6;SR7LJ;T7L2J*I+MCP7IJ /T[L"M6J2J;U3IGT3BWL2,KZ3LOO/KF "1*M"M&J"$*MBBZ

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