File FOCINT.PA (PAL assembler source file)

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

2/;I3I	T+ACL3DGI3L
O+UCE7FKO6 OP*/B83FOOA7L"J*M.IF*"7662J&I7NSI"M6J*J*I.4B0"0*M3I	NT&,3TSA6 R(7ECLC7H2JRI+CCA.1Z7"M&J3DGC2 WT7L
S"M&J3C[D"M&J3TSA* CI.(B2*7>I7M[O3E2 3E
N+TCH+OCF3I	N3TGI3LR 3I3A7OWGE*M2ISC/FF "0*M2IOD3AJ 7UKF*I"/7JOU3T& 3NN 3AWS")*M2I?IN*M6IWP3S+H"M&J2I?D"+612J&IO7F6JRI+ACD.(N4"0&0*/N"+B"7FKO6 	S3SWT7MN 7TSAU7S2J*I+MCS3L?O7KCU"M&J3CGL2 3C3LN M7A6JRI+ACD/PGT"M&J3DGC6 SP"1*M2I	FN	T2I^/+ECT7SOY3T7E6 SS7AWT7
Z 3A	R3A3BE*M2I
F+ECT7IB T612JZI7PSU2 ;I3I7T+P>I7S[A3E& 3TZ +OCR7LSAE7R2JZI7ESX"M&J3TSA2 3F+A/C*1>I+ICF+I
T7S* 3E?R2,& 7NSI3I3A2 	D3A?L3GWU2 GW+S
N7TR 7HKEE*M2I;S3AN L7A2J*I+MCP3SOE7RSE2IF/7SWS+MCE3SGT3NGD+RCD3FGE7TKUE7S2JC3K?LG&,3TSA. F("0&02/F"+B"2(WK+ECP3S;I* B&7COO")*M2I7J3S2 3O/OU7P6JNI+ZCA3CGL"M&J7JCM2 C3K	SN*M2I7J3SN 3H;AG	E2/	K+LCL3A3L6 E3T;E3DSE6 WF7NSC3I;OS*M6INI3IGN+D7D"1*M2IGT+D" .5^3*7
I7SSE2 GV3RGI3BWL2 ?B3T?TM*M2I7J3PN 3H[K+I7L"1*M3C/H3S;I6,RI+ACD.(B2*0>I2"CB*"" 3KWE3PF +LCL3F;U3C	T7OON")*M2I7J3S2 3O/OU7P6JNI+ZCA3CGL"M&J7JCM2 C3K	FL*M2I7J3SN 3H;AG	E2/	K+LCL3L
O2,V +X3P6 SAN*M2I2I3OGG+D7D"1*M2IGT+D" .5^1*7>I3ASN2 WR7SSE2 ?B3T?TM*M2IOD3AJ 7OSTO7M2JC3K	FL&,3TSA. R("0&02/R"+B"2(	F+LCE3C7O3M;A+D	S"M&J7JOM2 ?L7OWKP*M6I+S3AN L7A2J*I+MCP3C/HS7P2J*I+MCS3CGH3NWG2I./3I3L2 	F+LCE3C7O3M;AD7S"J&I3F3I3ASD"-612JC7KCS6,RI+ACD.
B5*0>I2"CE*"" 3LGE3D;I7GN 3POA3E& 7NR 3YWP2 [[+OCR3F3I7E7S")*M2I7J3S2 3O/OU7P6JNI+ZCA3CGL"M&J7JCM2 C7KGE"M&J7JOM2 C3A
NE*M6INI3PSA/DF-2MNJ3HWKQ&,3TSA. ^("0&02/^"+B".(6	2	& 7NR 3YWP")*M2I7J3S2 3O/OU7P6JNI+NCA3CGL*I>I7R[E7EOR7EN 7EON3E> 3N: +O7N3SGT3NGD+RCD3FGE7TKUE7S2J*I+MCP3C/H3C3O"M&J7JOM2 C3A
NE*M2IVI3QSA/DF-2MNJ3HOK+O3L2IGT+D" .1B0*0>I2"CH*"" 7FKO. *	2	& 3NF +S	K"M&J7JOM2 ?L7OWKP*M2I;S3AN L7A2J*I+MCP3C/H7ACM"M&J7JOM2 C3A
NE*M2INI3OGL+D7D"1*M3C/H7ACM6,RI+ACD.(F1"0&02/&"+B"2(?F+RZ 2 ;I3SWT+ACD+OCFE6)2J*I+MCS3L?O7KCU"M&J3SGN2 3CA*M2I7J3PN 7HCKR7C2J*I+MCS3CGH3NWG"M&J2I7A3PSA/DF-2MNJ7HCK+R3C2IGT+D" .3B0*IJ/+CK2 V(3XWT3NWD7DB 3ROE3I	S+O	N"M&J7JOM2 ?L7OWKP*M6I+S3AN L7A2J*I+MCP3S
E7RSE"M&J7JOM2 C3A
NE*M2IZI3OGR+D7D"1*M2IGT+D" .-F3"M&J3DGC2 ?L7OWKP*M2IGT+D" .7^2"0*M2IOD/AF "0*M2IGT+D" 7FKO3F;I"-612JRI+CCA"1616JRI+ACD/IF "1*M2IOD3A& . B1"M&J7I+S2 ?L7OWKP*M2I7J+P: "-632JWS3CWRT&,3TSA2 ;ED*M2IOD3A2 7ASS+V>I3EGR+SCE7VKA3IKA7LOE"M&J3TSA. R(.1B0"M&J7JOM2 ?
7OWK+P>I3CWR3AWT2 T7ER 3HWR7EN 7EKC+ECT7VKA3IKA7LOE"M&J3TSA. R(.2B0"M&J7JOM2 ?L7OWKP*M2IGT+D" .4B3"0*M2I7J3S2 3O/OU7P2JNI+LCA3C3L2 7CA*M2IGT7DB T612JRI+CCA/PGT*I>I3BOA7KCU6 SP"1*M2I	FN	T6IJ/7ESS3OWR6 	S3SWT7MN 7EKC+ECT7VKA3IKAL7E2JZI7GSE2 ;I3I7TP*M6ICF+UC
7IB T612JZI7ESX"M&J3TSA2 GL7S[T"M&J3DGC2 ;ED&I2/GM+KCE3TWH7MN 7EKCE7T2J*I+MCP+I: "+61.JJI.2R1*I>I3EGR+SCE3A3L2 WTX7T"J*M3I	N7TCM6,*I3B?L+CCK*4>I3H3O3D;I3GF 3RGE2 ?F+R^ "6	"J*M2IGPG7E2J2L3O/O+U3P"I602JRI+CCA3ASD"M&J7POUH7J"J&I/GGS"M&J7I+S6 SP"1*M2IGT3D& 6 
P*1>I3POI7KV 3PZ 7IOR7TN 3I;G3I	F3C;A7T^ 3OSR"M&J7JCM* CI3L?O7KCU"M6J2JC3A
NE&,"0*M2IGT3D& 2 C3A
NE*M6IOI3ZN 3H;AG7E2JRI+CCA"1602J3C7OCO6,RI+ACD/IF "0*M2I;SA*M2I7J3P& 2 C3A
NE*M2IOD7AR "2*M2IGT3D& . B1"M&J3DGC* CIT622J*I+MCP3C?LO7P"J*M2/T3EWS6 KA7ER +HCE7LOI+TCS+TCO7PSA+CCH3FOO+ACL+TCO7YWO3RN 7USS3O	M3ZSE6 CS7EOC"M6J2J?F3RSAD&,"760.JVI"M&J.1^1"M&J.7^7"5*M.IV5"266.J^I.7J7"M&J.5J5"7*M"I67.JVI.3B1"M&J.3V7"6*M.IN5"164.JNI.7Z5"M&
.5J3"0*M.I^3"566.JZI.1N4"M&J.7^7"1*M.IJ6"767.JNI.1^4"M&J.6B4"2*M.IB3"467.JZI.5B4"M&J.3R0"3*M.I^6"366.JJI"7*M.IB7"366.JVI.2N6"M&J.7B1"5*M.IB2"467.J^I.0J7"M&J.3R0"7*M.IJ7"660.J^I.7F5"M&J"0*M2MZJ3O[R+I3N.IB1"462.JFI.0Z4"M&J.3V2"6*M.IB7"064.JFI.0V4"M&J.1R0"1*
.IR7"260.JVI.3R0"M&J.3R0"5*M.IJ1"566.JNI.0Z4"M&J.7B2"0*M.IJ1"564.J^I.0R0"M&J.3V2"4*M.IJ1"060.J^I.0R0"M&J.3B2"0*M.IJ2"565.JVI.2^6"M&J.1V2"4*M.IB3"466.JFI.2B0"M&J.3R0"5*M.IZ5"661"J*M3F3I3ASD6,BI3USB&I2/GP3TC6 WP3SKH"M&J7MWP3SGH*-.1"1636JBI3USB&16IB/3AOT7HB 
USB61.JVI.5Z7.+N1"M&J.1B2"1&I2/GP3TC2 ?C3M?G"M&J.2J7"5*M"I60"J*M3S;I3ASD.,RI"065.JJI.7V2"M&J.4Z0"M&J.2J7"5*M3L
O3ASD.,RI"062.JJI.7V2"M&J.4N0"M&J.2J7"5*M.IB4"4*M.I^2"265.JBI"M6J2J?C3LSAD&,.1F2"6*M.IN1"7&1*I^/3TSA2 3A7ISS"	*M.IJ1"1672J*I+MCS3IV 3C?HP*M"I60"J*M3SGP+D3D.IB6"0612JNI+LCA3C3L*I>I3D;O*	CT3P	R+NCT3LGE3D;I7GN 3POAE*M.IB6"0622JNI+LCA3C3L"M&J"0*M2MVJ3QSAD&,.6
0"1*M.IN1"3&5*I^/3TSA2 WPQ6	.JZI.0J0"M&J3P	R3NOT"M&J.6N1"5*M.IJ0"7&56IB/3R;I3T2 3ESA3I
N. 6	"	*M"I60"J*M7ACM3ASD.,VI.6J6"M&J.7N5"2*M.IF6"363.JJI"466.JZI.3F0"M&J.7N5"2*M"I60"J*M2IGPG7E"J2LBZ

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