[ photo 100_1588.JPG 
ST   ;  TL ;     [ Oxford University time sharing director 12/2/69
MTPR;
V28;
YD1023;
YZ8191;
RESTART; JP200; JP200;
PROGRAM;
      V5=1.048576723;
      V8=Q4/-453/0; (increment .027 msec);
      V10=1/35;
      V11=2/35;
      V12=3/35;
      V14=-1;
      V15=B0207454151546300;
      V23=B1010101010101010;
      V24=B0204777777072000;
      V25=B0204047777072000;
      V26=B0204040477072000;
      V27=B0204040404072000;
      (V28=direrctor/program marker)

      V28; J35=Z;
      ZERO; =V28; K4; Q5; =V2;
      V7; =V5; SET5; J11NTR;
      SHC-2;
11;   J12NV;
      SHC-1;
12;      =V1P104M5; DUP; SETB101; SHL+19;
      REV; SHC+1; SHL+21; J2*NEZ;
      OR; (no RFIs so insert D22,28); ZERO;
2;    NOT; AND; (remove D22,28)
      DUP; SHC+1; SHL+15; J1*NEZ;
      (jump if any RFI other then PR or LOV)
      V5; *; DUP; =V6; V5P104M5; +;
      DUP; =V5P104M5; M5; REV;
      V9M5; SHL+5; =M5; M5M0HN; SIGN;
      J4>Z; (jump if time liit exceeded)
      SET-10570; (basic SP 0.630 msec)
32;   V8;=Q5; =M5; V0P104; K5; OR; SHL-1;
$5;   SHL+6; DUP; J6*GEZ; (jump id hold-up
       digit not present); DC5; M+I5; J5C5NZS;
      (no program can be entered); =V14; (D0=1)
      ERASE; JSP1;JS10P60; (test whether a
      subprogram can be resumed); J23;
6;    =LINK; (plank dummy LINK)
      SET4; C5; -; M5; PERM; (N1= new priority,
       N2= old priority, N3= path correction)
30;   REV; =M5; K7; SHC+7; NOT; NEG; SHC-7;
      =V13P104M5; (preserve adjusted NS counters)
      DUP; =V7; =M5; (new prioity number)
      V5P104M5; +; V6; -; =V5P104M5; (run time)
      VR; V1P104M5;; SHA+1; =TR;
      V17P104M5; =K5; ERASE; (CPDAR);
[ ---- fold
      V9M5; V13P104M5;; V2; =Q5; DUP; =K3;
      DUMMY; DUMMY; DUMMY; DUMMY; DUMMY;