File TTYS.PA (PAL assembler source file)

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

6/R +TCY7P
O+ECR3C;O3T?R7LR 3A/S"I&I.2J/./^7"M6J6JZI7EOR"=61"J*M2/GT+SCK7DSA3AJ 3LOOK6:"J*M2IGT/S7K6ISTY7S2JNI/U7R6IST3Y[SL7D2J&I7N
IT&="0*M"M6J"J*M*M>J6%SR6IST+YCS6-R 3EWL7TCY7EN 7TKA7TCU2 GTS7K"J6/"J6/"J6/*JV/T	W3T	H7SJ 7OSU3IWN6 OI2 GC3LWL3DJ 3Y> 3TWH7RB +QCI7TOA+KCS3WWHN*M2/6I7EOS3AWG3SF +RCE+TCO3L
O3GSE2 ;O2 T7ER 3EWL7TCY+EB.3S;IC7E"J&/3TWH2 WT7LSE3YWP2 ?D+ECS7NSO2 GW+NCT+TCO+BCE3L[E7TJ 3U;N3U
N*M>J2I3A7LR +HCE3T7I+EB,+ICT+ICS7TKU3NSE2 ;O6 	B2 T+ICS7TOA3KF S*M2/:I3ESE+E;D6 ^ 3H;E2 T3EWR6 KA3E: 3O6 3OWR2 WM3SGS7GOE2 ?T*M>J2I?L+GB,3TWH2 WT7LSE3YWP6 OI6 WT3RWN3D> +F;F*M>J*M>J6%
T2I[A7TKE6 WT3R	N+NCG+OCN3TWH2 WT7LSE3YWP6,R 7HOI2 GT+SCK7M[OE7S"J&/3TWH2 WM3SGS+GCE7TE7TR 3OF 2 ?L3C3A6 WB3FWF3RF +NCD7POA7SOE*M>J2IT3EJ 3U[F+ECR+TCO3TWH6 SR+SB87T	T2 GH3N3D+E;R6 R +HCE3C3A3L;IG*M6/RI3A/S6 OU+ECS6"ST+YKS6 E7ASC+LCY3TWH2 GS+MCE+ACS3TWH6 S
S68"J&/7T	T2 GH3N3D+E;R*M>J*M>J6%
T2IT3EZ 7IOR7T^ 3OSR2 [O2 T7ER 7ESX2 WM3SGS+GCE+ICS3CWH3CWKD*M2/ZI+OCR7AN 3POE3I3A2 ?C7NKT+OCL3CGH3ROA7TKE2.& 3FJ 7IOT* 6025> F*M6/RI+HCE7FKI+SCT7WKO3DN 7OSN3A;I3SF 6 6"*"B,7BSI/SZ .-F1*M>J6IKA3ER 3E?C3DSE6 OA6 CS3E	C+ACL3F;U3C	T7OON2 ?T2 WB2 ?DN7E"J&/3B[
3OWR2 T7ER 7ESX6 OI6 KP7ISN+E;D2 [I2 	B+TCS.0V-2 ?D2 ?NT*M2/NI7OSN3A;I* CA*"K]6,R +HCE7WKO3D& 7SB 7AOS+ECD+OCN+TCO3TWH6 STY*M2/"I3ASN7LKE2 	W+TCH3TWH2 WR+SCT+OCF3TWH2 WT+X;T*M>J*M>J6%
T2IT7EJ /TS2 OM7RR 3A/S2 ?D+ECS7NSO6 OU+EJ 7T	T+SB"3S;I+CCE3TWH*M>J2IOM3RR 7OOE2 ?N3T& 3NGI+TCE7OSU7PSU2,J +UCT3O3N7YJ 7ECS3OSNS*M6/RI3O> 7PKE3A?T3RV 7NKT+YB.2 ?T2 ?C3NWV3RWS2 	W+TCH3TWH2 OM+RB,3TWH*M>J6ICO3EGR7TKO2 GH7SR 3O6 7AWN3A3L7YR 3U;R2 ;O2 T7ER 3E
L7TCYE*M6/^I3IT2 T3E" 3ASR7WKA7EN 7WSI+C;H"M2J*M>J*M>J6%
T6IWC3RWR3N3T7YR 7HOI2 GT+SCK3C;A7NSO2 WB6 OU+ECD7FKO2 WT7LSE3YWP*M>J2I;I7PSU*.B +TCO+DCO7T	T2 ;I7PSU2,& 3T& 3S: 3EWC3SGS+RCY+TCO3C3AL*M6/RI7HOI2 GT+SCK7FKI+SCT7WSI7HN 3POE3I3A2 ?C+DCE*"J12 ?T6 WT+RCNO7N"J&/3TWH2 WT7LSE3YWP2 ?P7WKE6,R 3H;E2 GC+LCL3TWH6 ST
Y" 3ASN7LKE*M>J2I	D3ROE7T	L2 ?T2 ?D2 T3ER 3E	S3RSE2 ;I7PSU*.B 7ASF+ECR3TWH2 ;I7PSU*M>J2IGH3SJ 3E;E2 ?C3M3P3EWT+DB,3T	H7SR 3A/S6 OI2 GC3LWL7D^ 3IT*M>J6ICS3E	C+ACL3CSO+EJ *2B"3W	H+CCH3W3I7LR 3U;R2 [O7FR +HCE3T3E7E	TP7E"J&/7P
O+E;R2 : 3OWT2 T+ACT3C3A3L;I7GR 7HOI2 GT+SCK7WSI7HN 3POE3I3A*M>J2I?C7DOE. F"2"F +NCD*"J22 ;O+LCY3C;O3T?R+LCS3TWH2 WT7LSE3YWP*M>J2I?P7WKE2,: 7OR 7ESX6 OI6 KP7ISN+E;D*M>J*M>J*M>J*M>J2IT7EN 3POE3I3A6 WF7NSC3I;O3SN 7UKR7ESN+LCY3D[E3IWN3DF /R+E*M>J*M>J2I?CD	E6
WF7NSC3I;O*M>J*M>J.IF 6IWT+RCN3T3E7E	T+PCE7P
O+ECR+OCN3ASN6 E+I;T2 ?N2 WTX7T"J&/6IOI6 KP7ISN+ECD7WSI7HR 7HOI2 GC+L;L*M>J.IJ 6IWT+RCN3T3E7E	T+PCE7P
O+ECR3O[F2 ;A3DV 7XSI2.: 7OR 7ESX*M>J2I&I7SB 3R;I3TSE2 	W+TCH3T	H3SN 3A3L".*M*/BI23RI3IOS3O;N7ESC2 WM7MKO7YB/+QCI3C7O3M;U3IGC3T?I+N3S2 ;AD*M"/&I3TWH7NB 3R;I7TR +HCE7TE7TR 7HSA2 ?F3L?L+WCS3TWH2 GC+L;L*M>J*M>J*M>J*M>J*M>J2IT3E6 7EOS3AWG2 ?F3RGM3TZ +OCR7T	T3
& 3S& 3D;E3TOI+ACL+TCO3TWH" *M2/6I7EOS3AWG2 ?F3RGM3T> 7FR +HCE7T	T2 GT+S;K*M>J"M2J"/*M2I	F3ESL6 WC/RF%"0*M6IR*7TOY3LOO"M6J6JSS7ASR2,NIA7L6JJI3EWCI	V6IR/3AWK2 T3E6 7EOS3AWG2 [O7FR +HCEQ*M3MSA+D3R"I&02I^/7EOT2 SA3DWR+SCS+OCF7MOE3S
AE*M2IOD3A6I3SOGD	F2/	F3ESL2 [O6 OM3G& 3NF C*M2IOA.7^7"5*M2IGT3D6I3ASDR*M2IOD3A6I3E[VL	G2/GS+VCE7MOE3S
A3EV 3V;E3TZ 3L
A2 SA3DWRS7S2J*IM	S3C[D3M
S"M&J3TSA" 	I3MSAD	R2/	F7RSS2 ?W+RCD+OCF7MOE3S
A3E& 3SZ 3L
AS6.2JRIC	A3N3F7AOG6IN/3AWV2 T3EZ 3UON3T?I3NN 7OSN3R3O2 ?W+R;D"M&J7I+S2IGM7DKD"M&J7I+S2IGM7DKD"M&J3TSA2I[N3L
AS*M6ISRL*M2I7S3AN L	A2IJ/+ICT.1B020> 3FZ 3L
A2 ?W+RCD3ISN3IGC7TOE2 [I"M&J7JCM6ISSA&12/WM3SGS+GCE+OCR3P	O3NWT7RR 3O& 3TZ 3O3L7OOW".*M2IGT3D& 2IGM7DKD6I^/+ACS3P	O3NWT+RB,7GSE2 WR+ACL7TE3TF 7DKD7EOS".*M2IOD3A6I3ASDR*M2IGT3D: 3FGLG	S2/WR7M[O3E& 3N	D3ROE7TB 3O;I7TKE2 	BT6.2JFI+NCD.(^6*7&7"M&J3DGC2 [N3L
AS*M"L6/"J6/"J&/3SGT+RCT+UCP3TWH2 WT7LSE3YWP2 GH7R
D3AWR2 ;A3DN 3HOE3KZ O7R"J&/3SWP3CGI3LN 3OGM+NCD3CSOE7S"J6/"J6/"J*M3SGT"1&,3C[D6 WCR*M* B 2 [I3D[E6ICE3LWTS	T2<7J7PN /TKA*>>I7T	T6 OI6 CU6 SA6 CE+LF "!*M2IKD+RCO/DR"5&16/OI2 T7ER +TCY7P
O+ECR+OCN7N
O" 6?2JFI+NCD.(B0*1&0"M&J3SGZ2 3CA*M2I7J7PN /TKA6I&/+E3S2 ?G2 ;O".*M2IGT+D" *1&02I:/+OB,7TKU3N& 3T> N6.2JRI3B?S6 KD.8F5"M&J3CKL"M&J3C3A*I>I+GCO3T3E7LR +HCE3C?L+CCK7TOA7KR 3OR 3EGL7YV S*M2IWS7N
D*I>I7FKO2 KA7OSU* B13SOE3OSN".*M2I3C3O/C"M&J3C/L3M
S6MNJ/TKA2,*I+MCS3C[D3M
S6IN/+ECT3TWH2 GD+TCA3FWI+LCD+TCO3TWH2 WT+X;T"M&J3TSA* CI3MSAD	R2/WG7TR +HCE7FKI+SCT7WKO3D> 7FR +HCE7MOE3S
AE6.2JNI+DCF7CKU*I>I7DSA3AZ 3I3E3DJ 3A/C2 ?T2 WH+R;E"M&J3M3Q*I>I7S[AE*M6IGMA6I2JFI+NCD.(^7*0&02I2/3O/O6 SA2 	B+TCS.0V-".*M2IGT+D" 6-6".&^7/^B1*0B)6/OI6 SI2 T7EN 3POE3I3A2 C3AGR3CWT+RJ +]B""?*M6I+S3AN L7A2J*I+MCP3SGT*3>I+N3O2 ?G2 ;O".*M"M&J7I+S2 GM7DKD6I&/
E3S2 ;I3CWR3M;E7TR +HCE7TE7TB 3O;I7TKE".*M6IGMA&I2/WD3CSO7ER +HCE3SWP3CGI3LN 3O7M3ASN".*M2I;A+D" .0F0"7&)2/WG3T: 3UWM3ROI2 GV3LWV2 [O2 C3AGR3CWTR6.6JRI+ACD.(F-*)>I+ICS3TWH6 WF7NSC3I;O* B=*"J1" 6?6JNIZ7A2J*I+MCP..N+*I>I+N;O2 ?G2 ;O".*M6IOI3ZZ 7ASSE	X2/WY+S
,7SSE2 T3EZ 7ASS6 E+ICT3FGLG6.2J*I+MCP7EKO7P	L2I^/3OV 7XSI2 	W+TCH3TWH6 ST7YB 3OWW3R> N6.6JRI+ACD.(F-*)>I+ICS3TWH6 WF7NSC3I;O* B=*"J2" 6?6JNIN7A2J*I+MCP7EKO7P	L6I&/+E3S2 ?G6 E+ICT3ASN6 WT+RCN3O[F2 T7ER +T;Y"M&J3TSA* 6("1&)6/OI2 T3EZ 3UON3T?I/N6 . N"."> "M
J3SGZ2 3CA*M2I7J7PN /TOA2I:/+OB,+GCO+O;N"M&J3TSA2 N(3O7M*)>I7YOE6,J +UCN3TWH2 N"3O7M6"R 3A/S2 ?T2 SU7T2JNIA	L2IR/3O;W2 T3E6 3E?M+R?Y3P	Q2 KD"8*M6IWRN&I2/?C7MWM3NOI3A	T+OCN3L;IK6."J*M3SGT"3&,7JOM2 ?M7VSE+X>I+GCO7M[O7ER +HCE3UWS7RN	2 WT+XCT+TCO3TWH6 STY6.*J
L2MVJ7OCR+L3Y2ISC3FN U	R2I"/3EWR2 [I2 ?N2 ;I7PSU6 KO2 ;I7PSU2 	F7NOI3HSE"M&J3TSA6IOM3GSCF*M2IOD3A6IF*M2IGT3D6I3E[VL	G2/WG7TR +HCE3ASD7ROE3S> 7FR +HCE3EWV+NCT3FGLG6,2JNIA	L2IF/+NCD7POO7TR +HCE3S;E7DKE*	CS3EWV+NCT3FGLG*M2I?PS	T6IN/3O" 3E2	3L. 7N
O2 WW2 ?G3T" +ICS7ICN+U;T2M6JF&,"0*M"/*M"/*M6/BI3OWW3RR 3O;W2 T7ER 3EWL7TCY7E^ 3H;E6 WO7TWP3T& 3SZ 3I	N3SWHD6."J6/"J6/2JNIL7B*JB 2 & 3FWD3FVI7PSL7ESS2I*<+MCP3S?T"2&>2/?F7RJ 3U;N3I
N6 SA6 CEL*M2IGT3DZ 7ASSE	X6/OI2 T3EZ 7ASS6 E+ICT3FGL7GN +ECT"?*M6I+S3AN L7A2J*I+MCP3S?T*2>I7YOE2,N 3LGE7NV 3PF +NCD7RSE3U;R".*M2IGT7DR 3T7YS	G2/?N2,& 7SR +HCE3T3E7E	T+PCE7ASC3IWV2 ?N/W> "M&J3SGN2 3CA*M2I7J7PN /TGO2I:/+OB,+GCO+O;N"M&J3C3A*I>I7YOE6,^ 7ASI6
R	3I3L6 SI3SR 3OWN".*M2IGW3IWT"M&J7T	T3M
S6MNJ/TGO2,NI+DCF"0&I2/WS3TR 3AGT2 	F3ESL2 ?T6 E+E;C"M&J3TSA* CI6(ST7Y;S226+7SSG+B	L6 N/+ECE+ICF3A?N3TWH3R6 7EOS3AWG"M&J3C[D6 WCR&I6/OI2 GW3I	T+NCG+ICN7OKU6 WQ3EWU".*M6I+S3AN L7A2J*I+MCP3S?T*2>I7YOE2,* 7USS2 ?G2 WR3C	E+VCE+ICT7N
O".*M2IGCL&I2/?N2,^ 7OR 3E3L2 T3EN 3LOO7KR 3A/S2 ?T2 WD7L	A"M&J3S;ED&I6/OU2 ?F3RF 7BWO/TF 2 WS3C;OD6.2JNI3LOOK*M2I3C7KOMG*M2I?IF&I2/N"+AKL2 	W+LCL7ROE7TKO3E& 3NWT7RWR7POT2 ;O".*M2IGT3DN 3L7KS	G6/OI2 T3EN 3LOO3K6 7EOS3AWG6 SS3I3L"M&J3SGN2 3CA&I2/WP3N	D+NCG
?*M2I7J7PN /TGO2I:/+OB,7ROE+ECT+ICT7FKO2 T7E^ 7ASI3MJ 3E?LW6.6JRI+ACD.(B4*0.07T	TS&)2/WS7TR +HCE3C?L+CCK7MOE3S
A3EV 3V;E3TZ 3L
A"M&J3DGC2 3C7KOM+G>I3P;E3D;I7GN 3ION+EJ 3S;E+DB"3DWO3S: +O;T"M&J3C[I" &02I:/3O6 7EOS3AWG2 WY+TB,+GCO3W	A3TZ +OCR7ESI7HKE"M&J3W	AT	M6IR/+HCE3D3E+ACY+TCO3T7I3E> +UCT+OCR3A6 7EOS3AWG"M&J7EKO7MSW*I>I+TCO3C7O3E& N6.6JRI+ACD3C/L3M
S2IF/3W/A3EF 3G	A+NB,3DSI2 WW2 	T+MCE7OSU" 6?6JNI+NCA3CGL*I>I+N3O2 WL3AWV2 T7ER +TCY7P
O+ECR+O;N"M&J3TSA. F("0&)2/WY+SB,7P
O+ECR7D
O7NR +HCE7T	T".*M2IKD+CCO/DR"5616JSS+O222I?IN&I2/GB+CCK+TCO3TWH2 ;I7TKE7UCP7T^ 3O3RD6.2JNIL7B2JRI+CCA7FOA7TE2IN/3LGE7RR +HCE7FOA3TV 7XSI2 3F+A;G"M&J3DGC2 3C7KOM+G>I3CWL+ACR3TWH2 3C3O/C2 WD7L	A6 [E7ESN2 3F+A;G"M&J7JCM6ISS7ASR2I:/3N;N3N;N3N;N3N;N3N;N3N;N7ES
"!*M"L6/2JSC7FOMG&,"0*M3M
S3C[D2,"IL7T2J*I+MCP3IN 3D7FS7G"J*M7FOA7TE.,BI*I>I7FOA3TV 7XSI2 3F+A;G2M6J3E[V+L3G"I&02IF/7DKD7EOS2 [O2 ;I7PSU2 WM3SGS+GCE3EWV+NCT3FGLG*M3N3F7AOG.,BI*I>I7TE3TZ 3UON3T?I3NN 7OSN3R3O2 ?WR7D"J*M2IGPG7E*J>L*M>J*M>J2I?M+VCE3TWH2 GC3L	L+NCG7TOA7KN	2 WT+XCT+TCO3
WH6 STY*M"/*M"/*M7M[O7ET.,BI"M&J3TSA2 GM7DKD2I^/+ECT3TWH2 WM3SGS+GCE3ASD7ROE3S> 7NR 7HOI" *M2IOD7AN 3TSAD	R2/GP+G;E"M&J/AWC.7^7*I>I3R7E3OWV2 T3EN 3R2-3FF 3FWT7RR 7ESX2 	B3TF N7D2JFI+NCD3N3F7AOG6IV/3PGD+TCE3TWH6 WC3RWR+NCT3F;U3C	T+OCN7WKO7DR O*M2IGT+D" .2B
"0&)2/GS3Y: 3ON 3R2-F6.2JRI+CCA3FGLG7S2J?M+V212IGT+D" 2-KD3U3FN&)6/KT7AON7FKE2 ?L+OCP7CWO3NWTR6.2JRI+CCA7M[O7ESC"M&J3TSA2 >(7UTT&)2/WS7TV 7PR +HCE3LOO+ACL3B[U7FKE2 ?P7ISN+E;R"M&J3DGC6 WB7FSPR*M7M[O"2&,7JOM2 SC7FOM+G>I7SSE2 T3ER 3AGT2 	F3ESL2 ?F7RR +HCE7TE
6.6JRI+ACD7IN 3TSAD	R2/WG7TR +HCE7NE7T^ 3OSR2 [O2 WTX7T2J&I+SCZ3SGT7DKD"M&J3C[D6 WCR&I2/GD+TCA3FWI+LCD3BOA7KR 3O" 3EWR".*M2IOD3A& 6 WB7FSP+R>I7PSU6 SI2 ;I2 T3E2 3OGC3LJ 3U[F+E;R"M&J3TSA* CI3B[U7PKT2I^/+ECT3TWH2 WT+XCT7WKO3DJ 3A/C".*M6IOI3ZJ 7UCFT7R2JFI+NC
.(B0*7&76I^/+ACS3TWH2 WT+XCT7WKO3DF 2 WT3R	M7NSA+OCR"?*M2I;S3AN L7A2J*I+MCP7M[O*3>I7YOE6,R 7HSA*	CS3TWH2 ;E3D> 7FR +HCE7TET6.2J&I+SCZ7M[O7ESC2I:/+OB,+ICS3TWH2 ?L3C3A6 WB3FWF3RZ 3U3L" 6?2J*I+MCP7M[O*2>I+N3O2 WG3TF 7NSO7HKE2 ?W+RCD+OCF7TET6.2JNIA	L6I&/+E3S2
WS+NCD3TWH6 WB3FWF7RR 7OR +HCE7T	T".*M2IWS7N
D*I>I2(;A7D^ 7ASI6 R	+ICL+ICT3D;O+E&."M&J7T	T"M&J7T	T3M
S"M&J7JCM2 ?MV&12/?N3W^ 3O^ +ECT3S7O3E6 3OWR2 WT+X;T"M6J2J?M+V232IGT3D: 3FGLG	S2/WR7SSE2 T3EN 3R2-3FJ +I;T"M&J3DGC2 3F7AOG"M&J3C3A*I>I3S;E7DR +HCE7LOA3TJ 3U[F+ECR+TCO3TWH6 STY6.6JNI3ESN"M&J7T	T"M&J7T	T3M
S"M&J7JCM* CI7M[O7ET6IJ/7EWT+R;N"M2J"/*M3SGT7DKD.,BI*I>I3ASD7ROE3S> 7FR +HCE7TE3TZ +OCR7OSU7PSU".*M7M[O7ESC.,BI*I>I3L?O3PN 3O;U7TKE".*M3B[U7PKT.,BI*I>I3LOO+ACL3B[U7FKE2 ?P7ISN+E;R"M6J2JKD3U3FN&="6&02I2/3OGC3LJ 3U[F+ECR3L;E3GT".*M"M6J2J3C7KOMG&,3Z3B3O/C" &
6/WT+RCN+O?N3O[F2 WD7L	A2 WM3SGS+G;E"M&J"0*M"I60.JFI"2&02IF/7BWO/TF 2 WS3C;OD6."J*M7T	T3M
S6,*I3B?L+CCK*3>I3T3E7E	T+PCE7TE3T6 7EOS3AWG".*M3FGL+G3S"I60.JBI2M>J7UTT&,3Z3B3O/C2 KD3U3FN*M"I&02IJ/3U[F+ECR7TKE3M;I3A?TR6."J*M.I6$2$2=/H7N*$R="M2JBZ

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