File TEST.PA (PAL assembler source file)

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

7FI3M	R2 
F/E7T.5B0"0*M7FI3M	R6 CF/U7T.6B0"0*M7FI3M	R2 GF/D7D.1B0"0*M7FI3M	R6 OF/U7B.2B0"0*M7FI3M	R2 +F/M7P.0B0"0*M7FI3M	R2 7F/P7Y.3B0"0*M7FI3M	R2 SF/I7V.4B0"0*M3F	F/XB=.0N12MZJ7LSO.=B0"1646JOF/Q7R.0B0"2*M7FGS/UB=.0F02MZJ7I+S.=B0"0602JOF/D7F.7B0"1*M7FCS/A^=.1B02MZJ
ESX.=B0"060.J^*"0*M7TCY+EB,"0*M* B * B 3T[S*MBJ* B 2 * +MCP..F-* > 3W	A7TR 3I3L6 ST3Y& 7SJ 3ESAY*M* B * B 7TOL*MBJ* B 2 N L7A*JB * B 2 7J3P& 6 	T+PCE6 J/7EWTR7N6JKC+L3F" 60*JB * B 2 GT+D" .2V1* > C7R*JB * B 2 7J+SB 7TCYE*M* B * B 3TSA* " .2J1* > L7F*JB * 
 2 7J7SR 3YWP*MBJ* B 2 * +MCP3IN 3R[L* B 2/WR7TKUN*M.*Z1"0*M+NB,"0*M+TB,"0*M+MB,"0*M+KB,"0*M+LB,"0*M+PB,"0*M+N3N" 60*J*L.2B0*MBJ* B 2 N +LCA3C3L* B 2/;I3I	T3A	L+ZCE7T	T*MBJ* B 6 R L7S*JB * B 2 OKC*M* B * B 3TSA* " N*M* B * B 3DGC6 J "1*M* B * B 3TSA* " .7
7*2B * > 3I	N3TGI7L+I+EB 3L?OP*M* B * B 3DGC2 N N7T*JB * B 2 GT+DB 2(SAD7R*JB * B 2 OD+AB R622J?L+O3P2 7J3SN 3R[L*MBJ* B 6 R +ACD7IJ *2B 2 2/7OCO6 	T7POE*MBJ* B 2 * +MCS6 KP7ISN* > 3QWU3S	T7OON*MBJ* B 2 * +MCS7LOI+TCN* > +OCN3TWH6 STY*M* B * B 3DGC* CI+RB
* B 6/SS3OWRS*M* B * B 7I+S6 J *1B * B 6/OE3P;O7COE*MBJ* B 2 & +SCZ. KR* B * B/+ICN3LOO3A	T7OON*MBJ* B 2 & +SCZ2 ;C+TB 2 :/2 T+RCUP*M* B * B 7JCM2 2 7OCO*MBJ* B 6 R +ACD" 7P*JB * B 6 +SA*M* B * B 7JCM* : *+B3* B 6/WJ+LCP+ICF3P3O3A	R+TCY+ICS"+*M* B * B 3TS
* " .7R0*1B 2/	C3A& 7NSS3ROU3T?U3NN 3OW*MBJ* B 2 R +CCA. CS* B * > 7PSU2 ;I2 GS3M3P7EJ 7OSU3IWN*MBJ* B 2 N L7A*JB * B 2 GT+DB N*M* B * B 3CGI*MBJ* B 2 R +CCA2 ;N*MBJ* B 6 R +ACD" 7K*JB * B 6 SRL*M* B * B 3R3A*MBJ* B 6 R +ACD. Z(.2F0* B 2/WS7TV 3PN +DCF7IO
7TWR3C	TO7N*JB * B 2 OD+AB S61*JB * B 2 7J3P& . R("060.JGQ6,R 7ESX2 :/3UKM+ECR+OCF3S7A3PWL+S>:6MFJ*2B,7TE+T> 3S7A3PWL2 ;I7TKE3V3A2 ;I6 OM/E+C"/*M+Q232 WT+XCT2 N/3H;A3N3E6 WN3MWB+R>:6MFJ*4B,2 WT+XCT2/GS3M3P+ECS3S?T3RSE2 ;I2 	F3ESL":6/.JWQ6,R 7ESX6 N/7TKA3T
I3GF 3T2 3OGC3T?I+N>:6MFJ*6B,7TE+T> 3P3O3A	R+TCY+OCF3SGT+RCT3P3U/S+E"/*M+R21" 60.JKR.,B 2MNJ+N3T" 602JSA+D3R. GQ*MBJ* B . KQ*MBJ* B . OQ*MBJ* B 6 F "4*M* B 6 F "5*M* B 6 F "6*M.LR*"060*JB * B 2 3CA*M* B * B 3C[D. J *0B * > 7ZKE3O> U7T*JB * B 2 GT+DB .(R2*
B0* > 3TWH*MBJ* B 2 R +CCA2 GD* B * > 7DOI3PGLY*M* B * B 3DGC* CI+DCA* B 6/WB3FWFR*M* B * B 7I+S2 GD*MBJ* B 2 * +MCP* : "-62*JB * B . V6*0B0* > 3SGT+RCT+UCP3AOD*MBJ* B . Z .5Z0* B 6 J/3ES2 C3A;N+ECL"0*M* B * B 7NCO*MBJ* B 2 : O7P*JB * B 2 ?NP*M* B * B 7NC
*MBJ* B . Z .5V0* B * > 3W	A3TZ +OCR3SGT+RCT3P3US7E*JB * B . V6"061*JB * B 2 7J+PB ..F-6MNJ*0B,2 : +OCP* B * > 3CGH3NWF7R 3ON +ICA+OCN6-B 3OGL7R	T*MBJ* B 6 R +ACD. ^(.4N6*MBJ* B 6 N +PCA2 3CA*M* B * B 7JCM* : "-662JGS3M3P+EB,3TSA2 6 *MBJ* B . Z .5Z0* B * 
 2/GS3M3P3EN 3H;A3N3E" 7M*JB * B 2 ?NP*M* B * B 7NCO*MBJ* B 2 : O7P*JB * B 2 ?NP*M* B * B .6B5"5*M* B * B .6B5*1B * > 3W	A3TZ +OCR3S7A3PWL*MBJ* B 2 * +MCP* 6."1*M* B * B 3C3L*MBJ* B 6 N M7A*JB * B 2 7J+PB 7POO* B 2 */7UCM2 [I2 GS3M3P3E& 7PB 3O	S7T[IE*M* B
* B 3S3T2 GRR*M* B * B 3S3T2 GR+RB * > 7D[I3IWD6 	B" 64*JB * B 2 7J+PB ..N+6MBJ+O3S2 N +LCL7RKA*MBJ* B 6 J A7R.JGS*,B 2 SC/FF *0B * > 3S3E7SC2 GD+TCA3FWI+LCDK*M* B * B 3DGC* CI+LB 2/GS+VCE3S7A3PCL*MBJ* B 6 R +ACD3I2 *MBJ* B 2 N +DCF. B2*MBJ* B 2 R +CCA3I2
* B 6 N/3AWV2 ;I2 	F3ESL* B27AOLO*M* B * B 3C[D. B *MBJ* B 2 & +SCZ" 7L*JB * B 6 OI+ZB N7N*JB * B 2 7J+PB ..J+*MBJ* B 2 * +MCP. KS*MBJ* B 2 * +MCS2 WD7L	A*MBJ* B 2 * +MCP2 GS3M3P+EB 6 R/3AWK2 WN+XCT3S7A3PWL6MNJ*2B,2 N L7L*JB * B 2 SC+FB *1B0* > 7SSE6 CU*M
J* B 6 R +ACD" 7N*JB * B 2 OD3A& . J(*0B 2 Z/+OCR7FSF*MBJ* B 6 R +ACD* 6("1*M* B * B 3DGC* CI.(F2*MBJ* B 6 R +ACD* CN* B * > 7RWO3T;IE*M* B * B 7RKA*MBJ* B 2 & +SCZ+I" "261*JB * B 6 +SA*M* B * B 7JCM* 6."3*M* B * B 3C[I. F "0*M* B * B 7JOM* CI.(V1*0B * B 
/?D2 [F3T> 7NN 7ACM7LOE*MBJ* B 2 N +DCF"0*M* B * B 7JOM6 B 3OWW+RB * > 3C7O7PSU7ER +HCE3CWO7FN 3QGU3RSE*MBJ* B 2 * +MCS+I" .3B4*0B * > 7DOI3PGLY*M* B * B 7HSL2MRJ3EGL+YB," 60*JB * B 2 GT+DB T*M* B * B 3CGI*MBJ* B 2 R +CCA2 OT*MBJ* B 6 R +ACD. ^(.4V3* > 61
S2 	T+MCE3D3D+ACY3O3N+Y: .9^66 OME7C*JB * B 2 OD+AB D7A*JB * B 6 OI+ZB D7A*JB * B 2 7J+PB ..F-* B 2/WD7L	A*MBJ* B 6 R +ACD. ^(.3V7* > 2 WD7L	A2 613SOE" *M* B * B 3DGC2 R A*M* B * B 7I+S6 R C*M* B * B 7JCM* : *-B5* B 2/R 3EGL7YN 3OWM2 ?MR7E*JB * B 2 7J3P& 
 WD7L	A6MRJ+CB,"0*M+D3A" 60*J*L.6B02M2J7ISS+NB,"0*M* B * B 3CGL2 3CL*M* B * B 3DGC2 WNX7T.JGL*,B 6 OKF*M* B * B 7JCM2 2 *1B 6 ^/7ASI2 ?F3RF 2 CA7R*JB * B 6 KKB*M* B * B 7TOL* B 2/WR+ACD3ASN2 OE+HCO3CGHR*M* B * B 3TSA* " .7N5*0B ./J-"560*JB * B 6 CSA*M* B 
 B 7JCM2 2 7ISSR7N*JB * B 2 GT+DB .(^7*7B0* > .-B1*MBJ* B 6 N M7A*JB * B 2 7J+PB ..N+* > 6 WJ+MCP+ICF3A: 3UKME7R*JB * B 2 GT+DB *(B52 F//CB=2 [I2 	M7NOU2 F /CJ=2 [I2 ?P7SSI3IWV*MBJ* B 2 F +NCD. ^(*MBJ* B 6 R +ACD2 WNX7T*JB * B 6 SRL*M* B * B 3R3A*MBJ* B 2
R +CCA2 WN+XCT* > 2 GS+VCE3N7U7BKE"*68*JB * B 2 7J+PB L612J	L7SKT+NB,3CGL*MBJ* B 6 R +ACD2 WNX7T*JB * B 2 GRR*M* B * B 7RKT*MBJ* B 2 * +MCP3I2 7ISS+NB 6 J/3ECT+RCN7WSI3H: 3IKM+ECR+ICNA7C6JKP7ISN.,B *MBJ* B 2 R +CCA2 WNX7T6JKP+TB,6 R +ACD3I: 7ESX*MBJ* B 2 
 S7W*JB * B 2 ;A+DB .(^7* B 2/WG/TF +SCT3CGHR*M* B * B 3SGN*MBJ* B 2 * +MCP7IB 3R;I+TB 6 J/7EWT+RCN+ICF3D;OE*M* B * B 3TSA* 6("460*JB * B 6 CSA*M* B * B 3TSA* " .1B0*MBJ* B 6 R +ACD. J(*4B0* B 2 6/3AWK* B87BS6 OA3C	I2 ?CD7E*JB * B 2 7J+SB 7TCYE*M* B * B 3
SA* CI7NET*M* B * B 3ASN* " *7B7* > 7GSE2 :23DN 7HKA*MBJ* B 6 N N7A*JB * B 2 7J3P& 6 KP7ISN* > 7RSE3U;R2 [I2 ?DN7E*JB * B 2 GT+DB .(R-"0*M* B * B 3SGP*MBJ* B 6 R +ACD. F("060*JB * B 2 GT+DB .(R2"0*M* B * B 7JOM6 	T+PCE* > 7TCY3EN 7HCA*MBJ* B 2 & +SCZ2 WNX
T*JB * B 2 7J+PB 7PSR2M:J7ESX.,B "M2J.*B1"0602J?P7WKE.,B *MBJ* B 2 N +LCA2 3CL*M* B * B 3TSA2 : *MBJ* B 6 J A7R*JB * B 2 	CA*M* B * B 3DGC2 : 7CWON7T*JB * B 2 GT+DB .(R2"060*JB * B 2 OD+AB S*M* B * B 3TSA* " .1B6*0B * B * B * > 3I	N3TGI7L+I3A	TO7N*JB * B 
 OD+AB 3T7EP*M+P21* B 3C[D. F "0*M* B 3TSA* CI+SB 2/WG7TJ 3E3A2 GPR7T*JB * B 2 SC+FB "0*M* B * B 3DGC. R "4*M* B * B 7JOM* CI"7*M* B * B 3F?LT*M* B * B 7FGS+UB * B 6/GS7UKA3E& T*M* B * B 7FWP+TB 3SWT+MCP* B 2/GS+VCE3T7E7PKO3A	RL7Y*JB * B 2 WFX7T*JB * B 6 
I+ZB S*M* B * B 3C[D. F "0*M* B * B 3TSA* CI+SB * > 7GSE2 7I+ACG7PKAT*M* B * B 3C[D. B *MBJ* B 2 R +CCA. R4*MBJ* B 2 * +MCS/I^ *MBJ* B 2 Z 7LSO*MBJ* B 2 Z 7SWQ* B * > 7SWQ3AWR6 SI*MBJ* B 2 Z 3ASD6 N 3T7E+PB * > 3ASD2 WR+ACL7PKAT*M* B * B 7FET*M* B * B 3C[
. N "0*M* B * B 7JCM* CI"7*M* B * B 7FWP3T& 2 WT+MCP* > 7S[A3E& 3NZ 3I3E/DN *MBJ* B 2 Z 7GSE* CI3T7EP*M* B * B 7FET*M* B * B 3C[D" 60*JB * B 2 7J3S& " 67*JB * B 6 OF+UCB2 7S+ACX* > 3CWH+CCK7FKO2 GM7XZ 7AWLE*M* B * B 7FCSA*M* B * B 3F7J+PB ..N+* B 2 */7UCM
 [I2 ?N/T: 2 GM7XZ 7ZWLE*M* B * B 3FSA+DB 3SGMX*M* B * B 7FWP+TB 3SGM+XB * > 7S[A3E: +ECW7MA2 GV3LWU*MBJ* B 2 Z 7I+S6 R 7ECM*MBJ* B 2 Z 7ESX*MBJ* B 2 N +DCF" 60*JB * B 6 OI+ZB S*M* B * B 7I+S2 : 7CWO+NCT* B 2/;I3CWR3M;E3YN 3O;U7TKE*MBJ* B 2 * +MCP. GP*MBJ
 B 6 R +ACD" 7N*JB * B 2 GRR*M* B * B 3CGI*MBJ* B 2 R +CCA2 ON3O;UT*M* B * B 3TSA* " .1B6*0B * > 3R	E7NSI3I3A3IWZ*MBJ* B 2 R +CCA2 WTM7P*JB * B 2 GT+DB .(R4"060*JB * B 2 OD+AB S*M+P22* B 7JOM* CI"7*M* B * B 3FWG+TB 3SGMX*M* B * B 7FGSR*M* B * B 7FWP+TB 3S
MX*M* B * B 7FET*M* B * B 3C[D. B3*MBJ* B 2 * +MCS/I^ *MBJ* B 2 Z 7GSE* CI3T7E+PB 2 ^/+ECT3CWO7FN 3QGU3RSE*MBJ* B 2 Z 7ESX*MBJ* B 2 N +DCF"0*M* B * B 7JOM* CI"7*M* B * B 7FOI+ZB 3T7EP*M* B * B 7FGSR*M* B * B 3F	D+VB 3SGM+XB * > 7D[I3IWD6 	B2 GM7XZ 7AWLE*M
 B * B 7FCM+YB 3N7U+BB * > 3M3U7TCI+LCY+BCY.2R0"7*M* B * B 3F	FX*M* B * B 7FET*M* B * B 3C[D. J "0*M* B * B 3TSA. R "4*M* B * B 3DGC* CI+SB 6 N/7TKO3E& 3NJ 3U[FE7R*JB * B 2 SC/FB *MBJ* B 2 & +SCZ" 7S*JB * B 6 OI+ZB 3N?C7USN*MBJ* B 2 * +MCP. KP* B 2 R/3O: 
ESX2 ?CE7F*JB * B 2 3C3AN L7L*JB * B 2 GT+DB N*M* B * B 7RKA" *M* B * B 3CGI*MBJ* B 2 R +CCA2 ON3O;U+TB * > 2 : "/62*JB * B 2 GT+DB S*M* B * B 3TSA* " "-61*JB * B 2 OD+AB 3T7EP*M* B * B 3C[D. J "0*M+P23* B 3TSA* CI3T7E+PB 6 N/3AWV2 	M3R?RR*M* B * B 3DGC* 
I+SB 2 &/3M
A3E> +FB 3CWOF*M* B * B 7I+S6 N *MBJ* B 6 R +ACD3T7EP*M* B * B 3TSA* " "-61*JB * B 2 OD+AB 3T7EP*M* B * B 7I+S2 : 7CWON7T*JB * B 2 7J+PB P63*JB * B 2 SC/FB *MBJ* B 2 * +MCP7IB 3OWW+RB 6 J/7EWTR7N*J3S. J .4B06MRJ7ECM.,F .6B06MNJ7MA.,B .;.0"0*M3SWT+M3P. .0.
B;2M:J3UKM.,B .0N1.;^3.7.7.0B0"0*M3N?C7USN.,B "M2J* B * B 3FWI+LCD"1*M.*V1"0*M3D[O/F7T"6602J?S/R7T"5642J[F+TB," 60*JB * B 2 SC+FB "160*JB * B 2 7J3S& 2 ?D7FSF*MBJ* B 2 * +MCS7IN 7OSR*MBJ* B 2 N +ICF"0*M* B * B 7JCM* CI7FSF* B 2/WR7TKUN*M"LBZ7FWP3T& 2 WT+M
P* > 7S[A3E& 3NZ 3I3E/DN *MBJ* B 2 Z 7GSE* CI3T7EP*M* B * B 7FET*M* B * B 3C[D" 60*JB * B 2 7J3S& " 67*JB * B 6 OF+UCB2 7S+ACX* > 3CWH+CCK7FKO2 GM7XZ 7AWLE*M* B * B 7FCSA*M* B * B 3F7J+PB ..N+* B 2 */7UCM2 [I2 ?N/T: 2 GM7XZ 7ZWLE*M* B * B 3FSA+DB 3SGMX*M*
B * B 7FWP+TB 3SGM+XB * > 7S[A3E: +ECW7MA2 GV3LWU*MBJ* B 2 Z 7I+S6 R 7ECM

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