File RESEQ.BA (BASIC source file)

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

.1B060J +ECM* B 6 J 3EWS3QJ.+AB * B . F1./R2./Z7* B * B 2 WR7SGE. CV*4CG.MFJ.0B12 WRM6 .JB1*2B03R7E2 WR7SGE* B-3P?R3GGR+M6 2 WV3R	S+OCN.:R * B-3E	D/T* " 7G.JB1*3B03R7E.MFJ.0B42 WR3M6 +ICT3BOA7KCU2-	F+LCE3USN2 WD7FWA+LCT7ESX*." 6 X7XX3XJ.+A& .MFJ.0B52 WRM*
.1Z060J +ECM3D[E3A3U7TN 7TKA+T" .1B0*02)2 WD7FWA+LCT3SWT+P" *1&0.MFJ.0B72 WRM*M.1"060J +ECM7ISN3E;R+ECR3B[U7FKE6 WF+ECR":*M.1"061J E7M.JB1*8B23R7E. V160* 3E3I+ECN+ICN*1B6K*M.1&060J E7M.JF1*0B03R7E2 WL7TSZ3EF 3ESN7EWR+NCG.:J 23:-+O7V*7B6* B 6 ^ 2." 3OKUE7N
JF1*1B03R7E.MFJ.1B22 WR+M: 3RJ 3C7OP*M.1N160J +ECM2*WR7SGE*/?K3B:/.MFJ.1B42 WR+M: +SCA7SOY2 WR7SGE.MFJ.1B52 WRM*M.1Z120R +ICM+L"$.1B5.,J72)Z,.$F(2)N,.$F(2):,.$F(*62)+M"$*1&6.MFJ.1B72 	D3M2 *2"$*7&2.,GV.$F("26).JF1*8B07LSE. GV.$6 * B"7ROE+ECQ/VR0+GJ .MFJ.1
92 	D3M: .(V1"06).JJ1*0B07LSE. GX* B=.1B5.MFJ.2B12 WL3TZ 2$N=+HSR.("2")*M.1J260B 3R;I+TJ **J*.;GV2$R;+AST*(&0*;B"**J*.MFJ.2B36 KP7ISN2 Z"3IWL* B * B . * . .".MFJ.2B42 ;I7PSU* SN.MFJ.2B52 WL7TN 2=?P3S:(*$J,*.2""16).JJ1*6B07LSE* SM*=SN*&:"+BKK.MFJ.2B72 [I* 
S*<B>60R 3H;E. J1"960.JJ1*8B07LSE* SN*=SN*&:"+BKA.MFJ.2B92 	F7L[E. N2:6 "$*M.1B320Z 3IWL. F2:: "$*M.1F320Z +OCR+YB2*=B 60R 7O" 61N 7TCE" 61.JN1*2B07ICN+UCT.*1* SL.(KY")*M.1N360B 3R;I+TN *3B:+L"$+Y&2.MFJ.3B42 [I3ESN. F2 T+ECN.1"3"0*M.1V320: 7ESX. KY.MFJ.3B
6 KP7ISN* *"2*J 3U[F+ECR3OWV3R3F+OCW**B*. ."+L"$+X&1.MFJ.3B76 SSO7P.JN1*8B03C?L+SCE"63.JN1*9B03C?L+SCE"61.JR1*0B03P	R+NCT* *"2*J 3A/C+U7P3F3I+EJ *;SM*;B"3CWR3AWT+D* "*6".JR1*1B03P	R+NCT6"SS7ASR6,SS+ECP* B:""6;.JR1*2B07ICN+UCT+S21S*M.1N460B 3R;I+TJ **B*3W	
+T* "*6".JR1*4B0+ICF/S21.>B 2 T+ECN.1Z4"0*M.1V4202 +ECT/S61.1B0"0*M.1Z420& 7FN .<B>2 T+ECN.1&4"0*M.1^4202 +ECT/SF="0*M.1"4202 +ECT+SB16=N *1. " 7S.JR1*9B07LSE. GS2=;I3TF(+BS+S&1")*M.1B5202 +ECT3S&=+NT7AOB*(	S")*M.1F5202 +ECT/TB=.MFJ.5B22 WL3T: .2B=.MFJ.5B
2 WL7T& .36 . F-.MFJ.5B42 WL3T& "=61.JV1*5B07LSE. OY* B=+YB3.+F .MFJ.5B62 [I. OY*+B16>& 62R 3H;E. ^1"360.JV1*7B07LSE. 7L3L;E*(SL.(OY")6).JV1*8B07GOO+UCB.2R4"0*M.1&520& 3F: .1B>2 T+ECN.1N6"0*M.1B660B 3R;I+TJ **B*+NCO3L;I3E: 3UKM+ECR**B*. .".MFJ.6B16 KP7ISN
 SL.(OY")*M.1J620^ 3O?T. V1"460.JZ1*3B0+ICF/N:1+NB23TWH/NF .6B7.MFJ.6B46 KP7ISN* *"2*> +UCT+OCF7SGE3U;E+CCE**B*. .".MFJ.6B56 KP7ISN* SL.(OY")*M.1Z620^ 3O?T. V1"460.JZ1*7B07LSE. KN.=GN.MFJ.6B82 WL7TR *=/T"1*M.1&6202 +ECT7NR(2):="1*M.1B720& 7FR .<GX2 T+ECN.
R5"0*M.1F760B 3R;I+TJ **B*3T?O2 GM+NCY3L;I+ECS**J*.MFJ.7B26 SSO7P.J^1*3B07LSE. OY* B="-61.J^1*4B03P	R+NCT+TJ;3L;I+EKS.MFJ.7B56 KP7ISN* *"6*B 7AOS* B13C7O3PWL+TCE**J*.MFJ.7B62 	F7L[E. J*:SN.MFJ.7B72 WL7TN .16$7SKT6$N(61N-")*M.1"760B 3R;I+TN *2B:+SR1*;B"3R7
* 2"+N2$7DSA.$B(6)Z,"16$.J^1*9B07LSE. KN.=GS.MFJ.8B02 WL7T& .36 . OY* B+"1*M.1F820& 7F& .3F+* B>+YB23TWH/NJ .1B8.MFJ.8B22 WL3T& "=61.J"1*3B07LSE. 7L3L;E*(SL.(OY")6).J"1*4B07GOO+UCB.2R4"0*M.1V8202 +ECT+LR26=SS+R"$+N&2.MFJ.8B66 KP7ISN. J2:2 .2.$.MFJ.8B72 WL
T2 6$&(.36)3S
E2$2(6$&(*32)/I^,"26).J"1*8B07LSE. KN.=KN"+7S.J"1*9B07LSE. 7F"0*M.1B9202 +ECT7DB=+OS+L"$+Y&3*,SF*,&1* C\7LSE. 7PD*M.1F920& 3FR *=B03TWH/NF .9B4.MFJ.9B22 WL3T2 .26$3S
E2$2(6$&(*32)/PF+.,J7")*M.1N9202 +ECT+L"$+Y&32=WS+G"$+L"$+Y&3*,21/PF-")*M.1R9202 +ECT7IB=+OS+L"$+Y&32,^"3O?T."F,.)R+.MFJ.9B52 [I. ;I64R 3H;E. J2"160.J&1*6B07LSE. 7I7POO*(SL.(OY*)J,+GCO+TKO*,&1"+65.J&1*7B0+ICF/IV>2 T+ECN.2F2"0*M.1"9202 +ECT7IB=+OS+L"$+Y&36
R"3H;E."F,.)R+.MFJ.9B92 [I. ;I64R 3H;E. J2"160.JB2*0B07LSE. 7I7POO*(SL.(OY*)J,7GOO+UKB*,&1"+65.JB2*1B0+ICF/IV>2 T+ECN.2F2"0*M.2J0202 +ECT7IB=+OS+L"$+Y&32,^"7ON +UKB*,&1"+66.JB2*3B0+ICF/IZ>2 T+ECN.2F2"0*M.2R020& 3FZ *=B03TWH/NJ .0B6.MJJ.0B56 KP7ISN. J*:SF"
*M.2Z060B 3R;I+TN 222:6$&(.3.).MJJ.0B72 WL3TZ *=/F"1*M.2"020& 3FR *>B03TWH/NJ .1B1.MJJ.0B96 KP7ISN. J":*M.2B120^ 3O?T. "1"060.JF2*1B07LSE. 7D7POO.(KL2$Z,.$F,6)2 2 WL7TB "=7D.JF2*2B0+ICF/DB>2 T+ECN.2V1"0*M.2N1202 +ECT+L"$+Y&3.=KL"$*M.2R120^ 3O?T. &1"460.JF
*5B07LSE* SL.(OY6)N=+ESG.(KL.$F,*,7P"16).JF2*6B07LSE. KL6$N=+ESG.(KL6$B,*+21*7&2.MJJ.1B72 ?G+TCO.1R9"0*M.2"160B 3R;I+TJ **B*7POA/SJ 2 ?C3M3P3EWT* **""*M.2&120N 7LOO+EN "2*M.2B260N 7TCO.MJJ.2B12 WL3T2 2=WL3N2(6$&(*3&).MJJ.2B22 ?G3SKU. N2"860.JJ2*3B0+ICF/CN
62R 3H;E. J2"260.JJ2*4B0+ICF/CB<2 T+ECN.2V3"0*M.2V2202 +ECT3I&="-61.JJ2*6B07LSE. 7PI*M.2^220^ 7OWS/BJ .4B4.MJJ.2B82 [I. GN*=B03TWH/NJ .3B5.MJJ.2B92 ?F3R* *=B1+TCOT*M.2B320& 3F: .1:<3N*(6)R 3H;E. N2"460.JN2*1B07LSE* SQ6=SS+R"$7JN**-/S+S&1.MJJ.3B22 WL3T2 6$
(.36)3S
E2$2(6$&(*32)61B,*-&1*&SQ.MJJ.3B32 ?G+TCO.2R0"0*M.2R320: 7ESX" 7J.JN2*5B03P	R+NCT*"**2 GB7DJ 3EWF3R;E+CCE**B*. .".MJJ.3B66 KP7ISN* SL.(OY")*M.2^320^ 3O?T. B2"460.JN2*8B0+ICF/I6<7LR 3H;E. R2"160.JN2*9B07LSE. 7C"-61.JR2*0B07RSE3U;R.MJJ.4B12 WL3TN 6=OA7CN(+E
G*(SL.(OY2)&,*,	I")*M.2J4202 +ECT3I&="+61.JR2*3B07RSE3U;R.MJJ.4B42 WL3T: .1B=.MJJ.4B52 ?G3SKU. N2"860.JR2*6B0+ICF/CR<68R 3H;E. V2"060.JR2*7B0+ICF/CV>67R 3H;E. V2"060.JR2*8B07LSE. GN.=GN.*B1*+7C"468.JR2*9B07GSO/OJ .4B5.MJJ.5B02 [I. 3C60R 3H;E. V2"260.JV2*1
07LSE. 7I/IF-.MJJ.5B22 WR7TKUN*M.2N520V N7D&J*L

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