File IST44.FC (FOCAL source file)

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

F+()BTC U/W-FOCAL:IST44NO/DA/TE?MB5BEI (DL(N)-.01)1.3;S M=-M(N)-W(2*N-1)*DL(N);I (M-S)1.06;S M=S?MCCBFS DL(N)=M;T M,"  K.NST?MC$B^S V(2*N-2)=W(2*N-2)-(M(N)-M(N-1))/O(N-1);S V(2*N-1)=W(2*N-1)?MC.B S C1(N-1)=M(N)?MDICFD 12;T "  I      QL       QR      AMAX 
   MSMAX?MD-CKF I=,N-1;D 2;T %2,I+1,%7.02,V(2*I),V(2*I+1),V(2*I)+V(2*I+1),C1(I)?MD<CZD 12.2;D 12.3;T "*",!;Q?MEFDJT !;S J1=J1+1?MEYXJI (57-J1)12.2;T !!;S J1=J1+2;R ?MEXTF C=J1,67;T !?MFMX^T "ING. - BUERO  B R A S S   8 MUENCHEN 19   ALFONSSTRASSE  9   RUF
181081"!!?MX(S J1=6;T "*"!!"BETR.:        POS.:";T :60,"SEITE"!!!!?M!?L S IST44?M?;D 6?MGB*I (V(2)-M(2))1.5?MGVB,D 2;T "AUSGLM. D. VOLLEINSPM. ERSETZT?MG%B.S M(2)=V(2);D 1.4;G 1.5?MG3B0D 26;F I=1,2,N-1;D 11?MHUB2S J=1;D 1.31;D 1.32;D *5B * :0*1B0* B .0B.*
B . N ..B5* B .5J.*5B *1B *0B *0B . B ..B0* B .5J.*5B . B .."8* B * :1*2B3* :0*0B0.0B..0B ..B0* :0*0B0BZ

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