File CSAF.PA (PAL assembler source file)

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

2/GC3SWS3TWT2 ;E7TKE2,2 3O/O+U3P2 3C3OWS6:J /TS. KVB&I.8N/.0^/"4*M2IWV/R7S"I616J"I7LOI/TFI*I>I7CCO3Y	R7GSH2 3A+SCO7G[I+ECN+ICN7PKA+A;MP7A"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/2JN/7O	P3R
I+HCT2 N(*)B .1^9.4F,.9V7.,&1*7B6+BCY3D
I3IGT3LV 3Q	U3PWM+NCT7CKO7PKO3A	TO7N"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/"J6/6JR/+HCE3I[N3O7R3A	T+OCN+ICN3T	H3SR 7OWC3M;E3T& 7SN 3U+B7ESC2 ?T2 C3A
N7E^ 3IT7OSU2 ?N3TOIE*M2/;A7DN 7HWO+LCD7NSO2 WB2 ?C7NSS3RWU3DF 3SF 2 ?C3M	M3TWM+NCT+BCY3D
I3IGT3LV 3Q	U3PWMN7T2JN/7OCR3OGR3T?I+NB.2 	D7GSI+ACL7EWQ3I7P7ESN2 ?C3R?P7RSA3I;O6 OA3S7U+ECS+NCO7ROE3P;O3SKI3I	LT7Y2JZ/+OCR7A	N6 KE7RKO7SR 7HSA2 GM3YF 3PWP+ACR+ICN3T	H3SR 7OWC3M;ET6."J6/6JR/+HCE3S[O3TGW+RCE7DOE3C	R3BSE2 ;I2 T+ICS3DOO3UWM+NCT+ICS7FKU7NOI3H
E2 ?T2 T7EB 3UOR7HOAE7R6JV/3NWD3RF 2 	L3C;E+SCE7FKO6 OU3E> 3NF 2 	S3N3G3EN 7OCM3UWT7RN 7YSS+ECM3ASN2 GC3NJ 3EN 3O	PE7D*J"/7WSI3H& 3N3C3U	S+OCN+OCF3D
I3IGT7LN	2 ?C7PKY3IG3T: 3O	T+C	E2 ;O+LCY7FKO6 OU3E& 7NN 3UC*M>J7SOY3T7E2,V 3XWC+PCT+ACS7M	A6 SO7HKE7WOI3EJ 7EB 7R[O3IWD3D& 7N^ 7RSI3I
N6 	B2 	D7GSI+A;L*M>J*M>J3D
I3IGT3LV 3Q	U3PWM+NCT7CKO7PKO3A	T+OCN7AOS3UWM3S: 7OJ 7ECS7OON3I	B7LSI3YZ +OCR3TWH6 OUE*M6/KO2 WR3LGI3B3I7I	T2 [O6 SI7SN 7OSF7WKA3E> 3NV 3Q	U3PWM+NCT3TGH3T& 3S: +OCT7SCU3P	L+ECDB7Y2JR/3I	G3T3A".*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M"/*M2I3X7ISS"I&02/	L+SCT
TOAK*M6/OCA7F2JZ/3O7R+ACT+OCF7MOA3S
A3E& S6:2J6/+S3G2IKZ3LOO/KN *M>J7WKO/DF 6ICO2,;UI	T7BSI. BI2=;E7TKE*M>J"I&I212=3O/OU7P"J&/.IJI2=3C3OWS*M>J"I&I.9F-.16 2 ;UI7T6J^/3OSR" &23ASD7ROE3S> 7FN 7TKA3T> 3F" 3ESA+ECR3I[N3OZ +OCR7ESN+E/R3L?O7KCU*M>J2I6I7USS2 3A3LJ 3E& 7NN 3AWM2 	F3ESL*M>J6ISS7AWT7S
 3OSR2 ?F3RN 7LOOE*M2/?W+RCD23ZI3I3E3D> 3F" 3ESA+ECR+ICN7BSI/SZ *-B87FKO2 ;E7TKE2+?L7OWKP*M"/&I3ROE7S+I7EB +UCT+ICN3HGE7DKE.+N16 	B2 ?L7OWKP*M"/&I.I607NSO2 ?F3USN6 KO2 P3Y	S3C3A6 KE7RKO*M>J7WKO/DR 6ISS7AWT7S^ 3OSR2 ?F3RV 3NWT3R2+3O/OU7P6JN/7TSA+UCS7WKO7DJ
7EWT7RON* CB3SGT7TOU2 ?F7RB 7HOY3IGC3LV 3R?R3RV(*,/L+CB)O7R2J:/+E;G6 KE7RKO2 ?C+DCE7FKO2 ?L3GOI+ACL7EKR+OCR2(?N+NCE3D[E3IWN7D& +E	T"M6J2JZI.1F="0&I2/	F3ESL2 [O* ?R3WJ 3U[FE7R6JJI3ESA"=606J^I7RSI/ER=.0B0"M&J7R
E3ISN.=B1"M&J3BOA3K	F.=B3"M&J3W
R/A7P"4602JJI3A/C/B7L"5606JNI3K[P/I7L"7602J"I7S+I/ER="0*M*M>J7PKA3AWM7TKE3SZ +OCR7ROT"8*M2I;I7ISW"=602JNI/U7R"1606JRI3A/S6=OCA7F2JZI3I3E3DNI+UWR"160"J&L.*B3"0606JSS7ASR",6I2J?L+O3P2IGCL*M2IWR3C	EV*M3ASDR&,"0*M2IOD3AZIL7D2JFI/C^7"7656JRIA	D3ASDR*M2IOD3A6I3
[VL7G2JRIC	A3SGT7TOU"M&J7JOM2ISC7FOMG*M2IGT3D& 2ISAD7R2JNID	F7CKU"M&J3DGC6IWC7NSI"M&J3TSA6IWC7NSI2IR/+E;T6 	T+PCE+OCF3OWP7RSA3I;O"M&J3C3L2 GRL*M6I+SL*M2I7J3PVI3NWTR*M2I7S3AN L7A2J*I+MCP+I"I3C?LS7E2J*I+MCP+I"I3L?O7KCU"M6J2J3A3D;OE&,3C3L2 3CA&I"M&J7I+S2 SAD
R6JRIA	D3SGT7TOU6IJ/7EWT+RCN+ICT+TCO3C3A7LKE"M&J7JOM2ISC7FOMG*M2IOD3A& 2ISAD7R2JNID	F7CKU"M&J3TSA2I3FD*M2IOD7AJI3FSL"M&J3TSA2IWM3V3FG*M2IGCL*M2I?PS7T2J[R+L3D"I602J*IM	P3L?OP*M3C;U+I3T"I602JWM3V3FG&,"0*M3SGT7TOU.,BI"M6J2JSC7FOMG&,"0*M3FSL.,BI"M&J7JCM" 	I3C
D3M
S"M2J7ESN+E3R2I3C3AN L7L2J*IM	S7GSE3A
R"M&J7JOM" 	I2(;E3T/L+P>I3SWE2 [I2 3A3RGE+DCY3E	X7SOT2M2J7KKP+T3N2I7JP& 3ASL3OWN"M&J7JCM6ISN+F>I+N7O7NSO2 ?F3USN"M&J7JCM2 RI3EWL+T>I7YOE2-WD7LSE3E& T6I6JSNF&,7JOM2IGBC7K2J*I+MCS+I"I3H;A7SSE2IR/3OF 2 GH3N3D+ECRO7P6JKW3FSL.,BI2M"J3DGR+D3R"I602J*IM	P3ASL3OWN
M&J7JCM2I3A3D;OE*M2M^J3EGT+R3G"I&02I^/+ECT3A
R3SZ 3R7O2 GC3LWL7RN	2 WM3SGSG7E2J&IS	Z3ASDR*M2I7J3SNI3D7FS7G6JRI+ACD3IFI7DKD6I^/3OSR" 622JRIC	A7HKD7AKD"M&J7I+S2ISAD7R2JFI/CB4"0&06I^/7RSIE*M2IGT3D& 2ISAD	R2/?W+RCD"3*M2ISC3FNIU7R2JRIC	A3W[RL7D2J*I+MCP3I^I3EGTR7G6JJL7DKO.,BI"M&J3ASN.IN("7646JRIA	D.(J-"06
6JNI+ZCA3CGL"M&J7JCM2 FI3L?DN	E2/?N3TN R7C2J*I+MCP7IJI7DKO6I^/+ACS3COR"M6J2JGB+C3K"I602J*I+MCS+I"I3U	T7LSS"M&J3BOA3K	F*I>I+TCO3F3I3E^ A7P2J*I+MCP2I3A3D;O+E>I3N;O2-WZR7O2J*I+MCS+I"I3U	T7LSS"M&J3BOA3K3B"M&J7JCM2I/B7EKR6IB/7AOS6 SS7AWTS*M2IGT3D& 2I>(7LKDS7Z2
RI+CCA+I"I3ROE7S+I"M&J7JOM" 	I2(GH3NWS+T>I3RGE3D2 7ASS2 WR3C> 7FB 7R[E2 	FL7E6JJI3ESA.+GF"+&12/?D7NR	6 SS3OWR2 GDT7A2J&I3NC"M&J7JOM6 JI7DKO2IV/3R?R7RJ 3ESA3I
N2 GL+SCT3B/L2M:J3E
W+A3P2I7J3S& 6IV(3T3IS7T6J^I3RGGP&I6/KW3IWT2 WN3W^ A7P2J*IM	P3ASL3OWN"M&J3TSA2I"(7S+IE*M2IOD3A& 6IJ(7EOCI7Z2J*I+MCP3IJI3A/C"M6J2J/B7EKR2,FIN	D.(^3"7&52/OA6=SS7AWTS*M2IGT+D"I.-F42IN/3LGE3R2 3ESA+ECR7EKRO7R6JNI+ZCA3CGL"M&J7JCM2I3A3D;OE*M2I7J3P:I3E
WA	P2/WY7S^-7RSI3E: +ECW7GCA"M6J2JWD7LSE2,*I+MCS2IGBC7K2J*I+MCS+I"I3H;A7SSE"M&J3W	R+T/EF612JVI7MSPI7N2J*I+MCP2I3A3D;OE*M2IGTD& 2(/L7PSRN*M2IOD3A& 2IV(3N3TK7P2J*I+MCP+I"I3F?LO7P"J*M2IGPG7E"J6L6JSU7IOLT&,"0*M2IGT3D& 2IN(3U	NT*M2I;A+D"I"7*M2IOD3A6I/SGG"M&J3T
A" 	I3U	T7LSS"M&J3DGC6IOMG&22/;FC*M6IOI7ZVI3T3IS7T2J*I+MCS+I"I3DGO"M&J3TSA6IOMG632JRI+CCA+I"I3SGT7TOU"M&J3TSA" 	I6(SS7AWTS6I6JNIN7A2J&IS	Z3U	T7LSS"M&J7JCM" 	I3U	T7LSS"M6J2JGH3NWST&,"0*M2IGT3D& 2IN(3U	NT*M2I;A+D"I"7*M2IGT+D"I.4B0"0*M2IOD3A6I/SGG"M&J3TSA" 	
3H;A7SSE"M&J3DGC6IOMG&22/;F3CJ+3U[FL7D2J&IS	Z3H;A7SSE"M&J3TSA" 	I3H;A7SSE"M&J3DGC6IOMG&36/WBF*M2IGTD& 3ROE7S+I"M&J3DGC6IOMG642J&IS	Z3H;A7SSE"M&J7JOM" 	I2(?DA*M2IGT3D6I/SWG"M&J3DGC" 	I6(SS7AWTS*M2IGT3D& 6IN(7TSAU7S6JNIN7A2J&IS	Z3H;A7SSE2I^/3OSO2 WRT*M2I7J3
& 2IGH3NWST*M2M6J+S3G2IKZ3LOO/KN 2M6J/SGG.,BI2M6J/SKG.,BI2M6J/SOG.,BI2M6J/SSG.,BI2M6J/SWG.,BI"M6J2JWR3C	SZ&,"0*M2L?L7OWKP&,7JOM" 	I2(WG7TKAG*M2IGT3D& 2I"(3DGRD7R6JRIA	D.(N1"M&J3DGC2IWR3TSAR*M2I7J3SVI3N3TK7P2J:IO	P2IV/3R?RR*M2I/SP&I2/?N3TZ 3O;UD*M2IGT3D& 2
&(3NC.+N16IJ/7EOC3IWZ"M&J7JOM" 	I2(SC7FOMG*M2IOD3A& 2IWR3TSAR*M2ISC3FNIU7R2J*I+MCP+I"I3ASL3OWN"M6J2J;E3T/LP&,"0*M2IGT3D& 6I^(3R3FD*M2IGT+D"I.2B2*1>I7AKL3ESA3Y" +ACS.4B0"0*M2IOD7AVI3S[RL7D2J*I+MCS6ISU7IOLT6I6JJI3E	WN7D2J*IM	P7SOTE	T6/KE7RKO"M&J3TSA2I"(7S+I
*M2IODA& 3ROE7S+I"M&J3DGC2I	F7LWNM*M2I7J3PZIL622J3F7OCO2,*I+MCS6ISU7IOLT*M2I/S3P	FL*M2I7J7PNI3TWST*M/FKL2,&IS	Z3F3I3N7U"M&J7JOM2 "I7AONE7T6JJI3ESA.+GF"M&J3IONH&I6/WB3FWFR*M2I7J7PNI3TWST*M2IGT+D"I3IONH*M2IOD7ABI"1*M2IGT3D& .IGP"M&J3SGN2 3CA*M2I7J3P:I3FSNR	
2/WS3N	T3N3E2.Z 3IWL2 ?N3TZ 3O;UD*M2IGT3D& 2I&(3NC.+N1"M&J3DGC2I3O7DOR+Z>I7FKO2 ;E7TKE2-?F3USN2 WR7TKU7NN	2 GB7COK3POAE*M2IGT3D& 2I"(3DGRD7R2JRIC	AP626JRIA	D.(F-*0>I7FKI+SCT*1B03CGH3ROA7TKES*M2IOD7ANI7CSN6MNJ3L?OP&,3TSA" 	IP612JNII7A6JOU3R3FD&,"0*M2IGT3D&
.IKP"M&J3C[D6IWCR*M2I;A+D"I.1^72I6/3AOT3H" /I^ "M&J3SGZ2 3CA*M2I7J3PZI3L?O+P>I7NSO2 ?C3RWR+CCT3F3I3E. E7Y2J&IS	ZP612J&IS	ZP622J&IS	Z3S;CT*M2I7J7PNI3L?OP*M6IOI3ZVI3N3TK	P2/?F3USN2M:J3FSN+R3T6IOI3ZVI3N3TK	P2/?N3TZ 3O;UD*M7SOT+E3T2IOD3A& 6IN(7TSAU	S2/3A3L" 3
WV6 SS7AWT3S& 3NF /CB(2 ?F3RZ 3O;U3D:++OCT7FWO+N	D"M&J7JCM" 	I7ESN7LCK"M6J.JGP.,BI6MBJ"2&,"0*M3S;CT&,"0*M3F3I3N7U.,BI2M>J7LKD+S3Z"I602JWR3TSAR&,"0*M"M&J3P
AE*M2L3C3OWS2,*I+MCS+I"I3U	T7LSS"M&J3W
RA7P2J*I+MCP+I"I3ASL3OWN2IV/3R?R7R^ 7RSI3I
N2 GGP*M2IGT+D"I3H	SZ7E2JRI+CCA+I"I3ROE7S+I"M&J7JOM" 	I2(GH3NWS+T>I3W	R+TCE3S;E3T;IE7L6J^I7RSI3EZ+"1*M2IWZR*M2I7J3P& 2IF(3L?DN7E2J*I+MCS+I"I3U	T7LSS"M&J7R
E3ISN"M&J7JCM" 	I2(3A3D;OE*M2I7J3P& 2IF(3L?DN7E"J*M3DGO.,BI"M&J3C3A"M&J3S;ED7W2JNIS7A2J6IS7G2J*I+MCP3IRIO7A"J*M7ZKE.,BI2MVJ7MSP+I3N.IJ5.;B1.5F;.1.5.1B2.;J1.4F;.3.1.4.0.4.0.4.0"164.JBI.;.0.0B;.;B4.;B4.;B4.;B4.;B4.;B4"M&J3Z3B3O/C. R12M&J3NC6,*I3B?L+CCK"4&06
OU+ECD+BCY3L?O7KCU2 ?F7RJ 3ESA3I
N2 WH3AWDR*M"M&J"$*M"ZB"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