File VDSK.PA (PAL assembler source file)

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

*/**********2 	V7RWT+ACL7DOI3K" 3ASN7LKE* ***********M>J7LOA3TV 7DSI.:J 236-+R7T*7262 3E+C" 3D/S60J 3E?M3VSE6,J 3EGN3MSE2 /R/B603D/S"06)2J2/7ASS2 SE/I+T. V 6-WA7GOU/T^-*5B,J7V2JN/3RGE3TSE.:J 27*-7U	L.-V72,* V*M*M>J3T	H3S" 3ASN7LKE2 7I3PWL3M;E+TCS68Z 7ISR3
3A2 	D7SOK6.R 7HOE3EF R7E2JZ/3IWL+SB,3W	H+CCH3AWR6 OU+ECD+ACS3F3I7EN-7TWR7CWT3RSE2 WD3VOI+E;S*M>J*M>J3TWH2 	F7LOE6 WM+SCT+BCE+OCN7SOY2,> 3R> 3NF 2 WD3VOI7E^ 7HOO3E" 3ASN"-*M2/WL3R& 3SN 3OWR3SSI7ESN2 	W+TCH7SOY2 2(3IWK2 /R+B&02.Z 7IOR3TF *M>J3L?O7KCU6 OI2 
D+NCE+TCO3TWH2 	F+L3E2 T+ECN3TWH6 SS7ASR3I
N2 3B3O/C*M>J+OCF3TWH2 	F+LCE+ICS3ASD+ECD+TCO3TWH2 WR3QWU3SWT3DJ 3LOO3K: 3UKM+E;R*M>J3OON3EZ 3O;U+DB,3TWH6 SS7ASR3I
N2 3B3O/C6 OI2 WR3M7E7BKE+E3D2 TU7S2J:/7ON 3E?C+NCD3L?O7KCU6 OI2 WN3EWD+DB.7H
O3EWV+RB,3WWH7NR 3R;A3SWFR6-2J&/+NCG7DSA3AZ 3R7O2 ;O7EZ 7ISR3U3A2 	D+SCK+TCO3A?N3TWH+RB,7A	N2 WNW*M2/GC+LCL+TCO3T	H3S" 3ASN7LKE2 GC3UWS3SF 2 WN3W2 3O/O+UCP+TCO+BCE3D;OE6."J6/6JR/+HCE3P?R3BWL3M& +SB,3TGH7TR +HCE7FKI+SCT3C3A7LR 7OR 7HOI2 GH3N3DE7R6J^/3I3L2 
C+MCE+ICN7MOO3T> 7FR +HCE7COA+ECS3F?R3M> 7RZ +ICA7UKS".*M2/[I2 T3EN 3A3L+ECR7HOA2 GS3VSE2 ?C+RCE+TCO7GSE6 OU+RB,+WCE3C;A7NSO*M>J3UWS2 T3ER 3I/S2 
A3A;I2 ?F7RN 3A	V+NCG7HOI2 WV3R	S+OCN+OCF7UKS".*M2/T+UCS3TWH+SCE3H;A3DWL+RCS7WKO3K> 7N	L2 [I2 	B/TF 21> 7FR +HCE7J
S.0B0.0F-.1^727F +RCE7S[A+E3D2 ;A7KCU2 T3EZ 3IWL6 OD+K;N+MB8+OCN2 ;O2 /R+BB0*(CN+ICS3TWH2 WR3QWU7RSE3U;R6 KF+OCM7UKS.,F .0B0.0F-.1^727& 7S^ 7RSI3T;E2 GB+C;K*M>J+ICF3TWH2 	F+LCE+ICS7NSO2 ?F3USN6,R +HCE7EKR+OCR7RSE3U;R6 OI2 GT3K;E".*M"/*M2/T3EWS2 GH3N3D7EOR
 KP3OWV7DR 7O^ 3O/R6 KP3OWP7R	L2 ?F3R6 7OSS*M>J+O?S68Z 63B 3R
O3R7A+S" 7PCI2,SE+I3T3P3A28F,3B3S+D3R7FSO3PR,3IWR+C3T*M>J7ROE3OOR3B?O3TZ,7OSR2,GS+B3R3E>.2.& T*M7E	L2 T7RWO+GCH3TWH6 KE7RKO2 WR3R7A+SB:3A/S2 T3EF 3UT+OCR+OCF2 [O2 T3E* +SCW7M	A2 WB* CA"16."J*M7VKE3S?I/NF=6MJJ3KV8"=&12/[I2 ?N2 /R*83E2 ?D2 ?N3TR 3E	F+NCE/RK
EF *M>J7NSO7ESS*=>13D[E3IWN6 SI2,& 7F& +OCU3D;O*	CT3L/I3EF 2 WL7NSG7HR 7ESS"M6J2JR/3IWR3C	T7OON2 ?F3RN 3H;A7GOE2 ;I2 GN7MOE":*M2/	F3L;E3AWMS&:3SWE2 GL3B3E2 /D3F3IN*M*/B 2 ?N/T+E2 C+ACR236 7USS2 WB2 ."*"B,3CGH/RR 2 ;A2 OO3T3A2 	D7GSI" 6!2JR/3E	V+CCE3N7A/E+
2IWS3E: 7ESX2 GP+GCE2(GP+GCE7ZKE+OB)+OCR7WSI7HR H7E"J&/6IWB3ISL2 ?C3MGM+NCD2$GN6 OD/K61*.:.*M>J7D[E3IWC2 /R/B*02IWS3E2 3AWB3LR 7K[D+N3R2 ;A7DB 7R[E2.2 3OGCT6."J&L"*60*J6I"7&I*/B77D[E3IWC2 GH3N3D7EOR"M6J2JRI3E	V+CCE7VOD+K>I3G?R+UCP3N7A3E& 7SZ 3D/S6 Z(7ISR3
3A"M&J7D[E3IWC6 ODK&12/	D+S	K"M&J.4F5"0&I2/	F+LOE7SKT7USC3UWR+DB,7D[E* B"5612JRI/SGK*I>I7ESN7RCY3O;I3T> 7FOFE7T6J*I3B?L+CCK"2*M"M&J7D[E3IWC2 SVS7K2JRI3E	V+CCE3D/S"2*M.IV4"2602JRI/SKK"M&J3Z3B3O/C" 62"J*M2IWD3VOI7EZ 3D/S"M&J7D[E3IWC6 ODK63.JRI.5B3"M&J3D/S"3
M2IKZ3LOO/KJ "M6J2JRI3E	V+CCE7VODK*M2IWD3VOI3ER /SSK"M&J.4R5"0*M6IODK646J*I3B?L+CCK"2*M"M&J7D[E3IWC2 SVS7K2JRI3E	V+CCE3D/S"5*M.IV4"5602JRI/SWK"M&J3Z3B3O/C" 62"J&L7D[E3IWC2 SVS7K2JRI3E	V+CCE3D/S"6*M.IV4"6602JRI/S[K"M&J3Z3B3O/C" 62"J*M2IWD3VOI7EZ 3D/S"M&J7D
E3IWC6 ODK67.JRI.5B7"M&J3D/S"7*M2IKZ3LOO/KJ "M6J"J*M2/WW2 GM+KCE3UWS2 [O2 T3EZ 7ASC6,R 7HSA2 T7EN 3E?C+NCD*1627BSI*M>J7WKO3D> 3FZ 3IWL3N7A3ER +SOK..M6 OI6 GE3U3A2 ?T. N12 GT3DR +SOK2,& 3FR /SGK6 OI6 SA3U	N/T6 * B-2(GT3DR +SOK.)6 * B-"0&I2/?H7LOD2 WR7TKU3N
 7DKD7EOS6 SEC6.6JOD+K226IOI3ZR 3K;UI7T6JOD+K236IOI3ZR 3K;UI7T6JOD+K246IOI3ZR 3K;UI7T6JOD+K256IOI3ZR 3K;UI7T6JOD+K266IOI3ZR 3K;UI7T6JOD+K276IOI3ZR 3K;UI7T2JNI+LCA3C3L"M&J3TSA2 /D3U	NT*M3D+K+M3P2I7J3PR 7KSSR7T*J*L.2B02MRJ7KOJW&,7J
S*I>I7MOU3TJ 3EF /TJ *0B02(?F3RR /KZ3*0&02M*J/S7W.7R7*6>I6IR-+A7D3D/S*7>I.6F4*16=.1Z3"7*M2IOD3AR 3KGTD*M2IGT+D" 2-GT3DR-+XCT3C3AL6.2JRI+CCA7DWK7NSI"M&J3DR 3KGTD*M2IOD3AR 3KODA*M7DSK+A3D*IB 7HSL*I>I3TSA6 ODK62JRI+CCA3D/S*0>I3D/S60^ 3I3L2 ?P7ISN2 ?T6 SDV*M2
GT+D" 7I+S2 /D3U	NT*M3DSK+C3A*IB 7HSL*I>I7ROE+ECT3D/S2Z +OCR7NE3TN 3A3L".*M2IGT3D& 6 ODK602J&I+SCZ3D/S"0*M2IOD3AR 7KWFN	C6/KT7AON7FKE6 SD7VR 7OR 7HOI2 GPG7E6JRI+ACD3IR /SCK"M&J7I+S6 ODK602JRI+CCA3DGK7DKD6IR/7HSA*	CS"2*M2IGT3D& 6 ODK602J&I+SCZ3D/S*0>I3P	O7
OT2 ?T6 KE7RKO2 WR7TKUN*M2IOD3AR 3K3BC	K2/T+A
T/SN "M&J3R[D"M&J3TSA2 /D.6B2*3>I3PWR7PKA7EJ 7EWTR7N2JRI+CCA3DWK7XSI"M&J3C[D. B1"M&J3TSA* CI.(^7"0&0./^1.7B02 GM3Y" 3OSL6 CS3E	C+ACL3CSOE6.2J/D.6B2"3&,3C[D2 	C/FB "M&J3DGC2 /D3T7E2MRJ3KWT3MR=3KODA*M2IGT3DR 3KGT+D>I2"GT3DR +SOK."6 . N1*6.0.6 * J +KJ"M&J3CG
"M&J3TSA2 /D3F3I/NF+2I^/+ECT7LOA3TZ 3IWL2 WW2 ?L3OWK7DV P*M2I;S3AN L	A2I&/3S& 7TR +HCE3S7A3E> +NCE"?*M"I&I2/Z(7IOR7TR +RCY7MOU3TF 3LGW+YCS3F	AL6)*JBI7JCM2 /D3SOE+N>I7YOE6,R 7HSA*	CS7EOA+Y" +NCO3L?O7KCU")*M2IGT3D& 2 /D7J
S2I*/+OCB3SGT7TOU2 ?WR7D2JNI+LCL7RKA*I>I7BSI. F12 ?T2 	LN7K6JNIN7L*JBI7JCM2 /D3EWR+X>I3T	H3S& 7SR +OCO3D;A7GKE7OOU"M&J3C3L2 GRL&I2/WS3TJ 3A/C2 	W+TCH7BSI. F12 WZR7O2J/D.3B6"0&,3DGC* CI3D+KS	W2/?S2 T+ACT7UKS2 	W+LCL7S[A3EN 3OWR"M&J3TSA2 /D3TSA"M&J3DGC2 /D3
3I/NF+6IR/+HCE3B
I2 WDA7L2J*I+MCS7DOK7ECT6IB/+UCT3TWH2 WR+ACL3ASD7ROE3S> F*M"I&I2/	F7LSP3R& 7NN 7ECT+T;R6 J(3E?L7CSA".6)2J/D3F3IN&,3F3I3EGN2 GN7MOE2 ?L3OWK7DV P*M2L/D7SSE+TCH3RGE3LF 7DKD7EOS2M&J3FWD7FJ .7B7"0*M*IB . B1*I>I7UKS+I3N2 ?L3ASN2 GH3N3D+ECR+TCO.7B6*7" 7SOY":6)2J
I+CCA3DK3ASN"M&J3CGL2 GIC&I2/WS3TR +ECV6R /OF "M&J3DGC2 /D3D;V/R:I2MRJ7KSR+R3Y2IGT3DR 3KWST	P2/GT+D" 3D[K3I;L"M&J3DGC2 /D3F3BK*M3ISF+ECF/RK/E2 "M&J3TSA2 /D3D;V+R>I7FKO2 /R.8+E6 KT7YN /Y+S2 ;A7DJ /KCB":*M2I	C/FF "0*M2I7J3S& . J("0&06/OU3R& 3S& 2IZ/+OCR3N;O
-/R*8CE+I
T3SV 3A	S+YCS7HOA2 WD3VOI+EN " 612JNI+ICF3SF N7D2J*I+MCS+I" .7B7*0>I7ROE*IB " &22I2/3O/OU7P2J/D3F3BK&,* B 3D[K3I;L2I>/7VKE7L	A+ECD+BCY3SGT3R	T+NCG3B?LC7K2J/D3F3IG&,* B "0&I6/[O3E3R3AWY3DJ 3Y6 7IWN3S2 3E
N+T;H2M&J3FWD7FJ 3KV8" 6<*JBI7JCM2 /D3RKK*0>I7T	R2 /R/B*06 KO2 	G+VCE7EKR+OCR">*M3I;F3D[E2 /R*8CE"<*M2I* +MCP3DWK7RSS2I:/+OCT7FWO/N+D6 KE7RKO..: "M&J7JOM2 /D3RWST*M7DOK3E;C",*M3I;F3D[E2 ?N7TOE/T2 *I>I7TOE3T6 +ACY+BCE3O	M3TWT3DJ 3YR E6-6JRI+ACD3D[K3UON2IZ/
I	N+NCG7NSO7ESS" 6>6JRI+ACD.(^7"0602JFI+NCD/DOK.6B0"M&J3C3L6 SRL&I2/	F7RSS2 WG+TN 2 [O2 3B3O/CS*M6ISRL*M6ISRL&I2/;O3EJ 3LOO7KR +OCO7F
E2,2 3I/N"=606JRI+ACD3DKK3L/C"M&J3TSA2 /D3F3IG*M6I+S3LN L	A6IV/+SCE+ICT+ACS3C;O3SGT+NCT"!*M2I* +MCP3DWK7RE2IR/+O
N3T^ 3O> 7UOT3IWD2 	F+LCE">*M2IGT3DR 3K3BC7K6JRI+ACD3D[K3B/L2IF/+DCD3SGT3R	T+NCG3B?L+CCK+OCF3F3IE*M2IOD3AR 3K3BC7K2J*I+MCS3IR 3KGHN	D6/	S3SWT3M" 3ASN7LKE*," +OCR3RKK*0&:2MRJ7KWF+N3C*IB " &02I"/3EWR2 T3EN 3A3L3I
N2 WS3QWU3NWC2MRJ3KSA+D3R*IB " &02I&/3SN 3O	P+E;D2MRJ3K3B+C3K*IB " &06IR/+HCE3B?L+CCK6N 3POE3I	F+ECD6+R H7E"J&I6IN/7TKA+TB.3B?L+CCK2> 7FR +HCE3F3IE6.*JBI7JCM2 /D3EWR+X>I7EKR+OCR+OCN7SOY3T7E2 WD3VOI+EF "!*M6IOI3ZR /SCK2MRJ7KE+I3T*IB 7HSL*I>I7RSE3U;R2,N +DC
3C[I2 GC+L;L2 3FD6.2J*I+MCP3IR /SCK"M2J3ISF+ECF/RK/E2 2MRJ3K/R+B206ISSA*M2IGT3DR 7K[DN	R6/OI2 T+ICS3TWH2 	F7RSS6 KT/Y> "M&J3SGZ2 3CA*M2I* +MCP3DWK7RSS2IJ/3OT6 	S+SB:3ASN2 /R/B*02 GF3T. 7N
O2 T3E& 3NWT3RGNL*M2I7J+B:0"M&J* B "1&22I&/7NWQ3IWR*M>J.0N0"-&16/OD/K*06 J(3EGN+MCE3RKK3OWV3RGL3YSE6 	B2 WD3VOI3E: 3UKME7R2J/D3H;AD&,* B .7B6"7&I6/[O3E3R3AWY3DJ /Y^ .6F22 ?F7RJ /KCB"M&J2 7J3PR 7KKES	T2//R/B*02 ?N3TZ 3O;U+DB,7EKR+OCR7RSE3U;R"M&J7JCM2 /D7RK
+Y>I7N
O2 /R3B:03R6 7USS2 WB2 ?N3NWZ+RCO">*M2MRJ7KKE+S3T7JOM2 /D3RWS+T>I7EKR+OCR3WWH3NR 3AGT2 WN+ECD+BCE7ROEE7T2JRI+CCA3D[K3I;L"+&12/WN+XCT3OWN6 WM+SCT3L?O7KCU2 
A3A;I"!*M3DWK7RE6,NIT7A2J*I+MCP3DWK7XSI"M6J2J/D3RWST&,"0*M3ISF+ECF/RK/E2 "M&J3C[I. B1"M&J7JOM* CI.(B2"0*M*IB . F1*I>I7UKS7OSU2,^ +ECT7CKO3EF 3G	A/N: "M&J7I+S* CI3D+KS7W6JRI+ACD7DSKE7M2JNI+DCF"1602JRI+CCA+I" .7B7*0>I3T	H3S2 3OGC3T?I3N6 +ACY3H3O3DR 3AGT"M&J
C[D" 602J*I+MCP3IR 7KORE7T2J[I3NWD7FJ 3KV8" 6<2J/D3H;AD&,.7B6"7&I">*M2M>J6=ODK&02/?D7NR	2 ?F3RWG3T2 3OGC3T?I+NCS.3B6.-^3"1*M3OR=3K7J+P>I3AWR2 3A3RGE+DCY+ICN3UWS6 OA2 ;E7T	R2 ?P7ISN+SF "M6J*JR$*$R$*$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