Whetstone Algol Controller

This assembler listing has hot links for all references to P-routines. P295’s individual entry points are dealt with individually.

You can click on the routine number in code such as JS16P295; or V0P299; and jump to the routine. When you have seen enough of it, you can use the back button to carry on where you left off.

Loaded 122361 bytes for walgolc.k3
Warning: YA0 is out of range, only 0 YA-stores specified
Warning: YA1 is out of range, only 0 YA-stores specified
Warning: YA2 is out of range, only 0 YA-stores specified
Specifying Y0 leaves gap of 0 words
Reached end of file


=============== Second pass
===========================


  11174 W0 = E4732
  11440 Y0 = E4896
  11275 YD0 = E4797
  11376 YE0 = E4862
    0/0: 200 260 010

                                                                       [ okq001.txt

                                                                       ST       ; TL99999;
                                                                       Y0=E 4896;
                                                                       V        ;  W       64;
                                                                       YD     64; YE       33;
    4/0: 201 262 273|201 262 274                                       RESTART; J 212; J 213;
                                                                       PROGRAM;

   10/0: 203 323 034                                                         JS1P5; (GET FAIL DEV NO);
   10/3: 200 260 015                                                         J252;
   11/0: 200 264 144|200 360 000                                             JP23; EXIT 1;
   12/0: 200 264 201|200 360 000                                             JP24; EXIT 1;
   13/0: 200 264 211|200 360 000                                             JP25; EXIT 1;
   14/0: 200 264 221|200 360 000                                             JP26; EXIT 1;
   15/0: 052|300 000 000|164 061|164 321|304 000 001|221 020 027       252;  ERASE;E0;SHL+24;SHL-24;SETB1;J2=;(IF SIM REQD);     [h/w if sim removed remove
   17/2: 304 000 020|225 020 022|304 000 030|225 020 022|304 000 060|225 020 022|204 260 027
                                                                             SETB20; J25=; SETB30; J25=; SETB60; J25=;J1;        [h/w if sim removed remove
   22/5: 304 000 001|311 001 044                                       25;   SET1; =V75P113;                                  [h/w if sim removed remove
   23/5: 304 000 002|042|304 000 005|200 220 000|065|164 061|011|311 000 364|204 260 027
                                                                             SET2; DUP; SET5; OUT; REV; SHL24; OR; =V27P113; J1; [h/w if sim removed remove
   27/1: 210 321 045                                                   2;    JSP113;                                             [h/w if sim removed remove
   27/4: 052|304 023 036|170 364|304 023 037|170 362                   1;    ERASE; SETAY-2; =I15; SETAY-1; =M15;
   31/3: 304 000 003|200 220 000|161 321|301 005 322|304 000 011|200 220 000|161 321|301 005 324
                                                                             SET3; OUT; SHA-24; =V6P128; SET9; OUT; SHA-24; =V8P128;
   35/1: 310 000 364|170 370|041|002                                         V27P113; =C15; ZERO; =TR;                           [h/w marked on LHS to J226
   36/2: 110 000|164 061|164 321|304 000 002|036                             M0M0N;SHL+24;SHL-24;SET2;-;(ADDR Z1);
   40/0: 100 000|167 367|201 040 046                                         M0M0;SHC-5;J225≥Z;(IF LOAD-AND-GO);
   41/1: 042|304 022 275|203 320 043                                         DUP; SET AYD0; JS224; (CLEAR WKING ST);
   42/2: 125 360|121 360                                                     PREQ15; PARQ15; (READ TITLE);
   43/0: 203 260 051                                                         J226;
   43/3: 042|170 343|036|170 350                                       224;  DUP; =RM14; -; =C14;

                                                                       [ okq002.txt

   44/3: 041|303 340 000|263 340 044                                   3;    ZERO; =E0M14Q; J3C14NZ;
   45/4: 200 360 000                                                         EXIT 1;
   46/1: 304 023 036|304 022 275|203 320 043                           225;  SETAY-2; SETAYD0; JS224; (clear below prog);
   47/4: 042|304 023 041|310 003 042|056|203 320 043                         DUP; SETAY1; Y2; +; JS224; (clear above prog);
   51/3: 042|304 000 044|036|304 023 040|036|170 030                   226;  DUP; SET36; -; SETAY0; -; =C1; (set xs);
   53/2: 042|304 000 001|056|170 362|101 360                                 DUP; SET1; +; =M15; =M0M15;
   54/5: 041|033|301 016 177|041|301 016 200                                 ZERO;NOT;=V1P295;ZERO;=V2P295; (init buffering);
   56/2: 310 003 037|310 003 036|166 321|301 000 002|301 000 003             Y-1; Y-2; SHLD-24; =E2; =E3;
   60/4: 310 000 250|200 335 333                                             V0P299; JSP293;
   61/4: 300 000 000|304 000 020|054|225 140 063                             E0; SETB20; AND; J227=Z; (if load-and-go);
   63/2: 200 325 256                                                         JSP126; (read prog);

   63/5: 310 003 042|042|027|172 030                                   227;  Y2; DUP; NEG; =+C1; (adjust xs);
   65/0: 041|311 003 036|041|311 003 037                                     ZERO; =YE32; ZERO; =YE33; (in case ruined by title);
   66/2: 304 000 012|036|042|222 100 070                                     SET10; -; DUP; J190>Z; (unl small prog);
   67/4: 052|304 000 001                                                     ERASE; SET1;
   70/2: 042|043|311 002 276|170 042|170 064                           190;  DUP; DUPD; =YD1; =M2; =I3;
   71/5: 310 003 041|056|042|311 003 041|310 003 040|056|170 022             Y1; +; DUP; =Y1; Y0; +; =M1; (set do,pp,ap);
   74/1: 304 023 043|170 062                                                 SET AY3; =M3;
   75/0: 041|170 111                                                         ZERO; =RC4;
   75/3: 146 020                                                             I1=+2;
   75/5: 041|200 323 004                                                     ZERO; JSP2; (set prog buffer);

                                                                             (main prog loop 20/2/64);
   76/3: 017|017|017|304 000 077|174 000                               *21;  SETAR21; =LINK;
   77/5: 017|203 242 300                                               *7;   J214NEN; (if guff in nest);
  100/3: 001                                                                 VR;
  100/4: 171 110|224 100 102                                                 C4; J248>Z;
  101/3: 140 100                                                             M+I4;

                                                                       [ okq003.txt

  101/5: 304 000 060|172 110                                                 SET48; =+C4;
  102/4: 304 377 370|172 110                                           248;  SET-8; =+C4;
  103/3: 110 103|100 103                                                     M3M4N; M3M4;
  104/1: 142 100|166 100|142 100                                             NC4; SHLDC4; NC4;
  105/1: 065|170 136                                                         REV; =Q5;
  105/4: 304 000 377|054                                                     SETB377; AND;
  106/2: 300 000 000|164 061|221 140 110                                     E0; SHL24; J249=Z;
  107/4: 200 325 223                                                         JSP101;
  110/1: 200 323 237                                                   249;  JSP12;

                                                                             (tree 12/7/63);
  110/4: 204 262 173|201 262 320|203 261 334|204 260 341|202 262 267|201 260 320|204 260 327|204 262 321
                                                                             J180; J228; J113; J26;  J209; J9;   J18;  J229;
  114/4: 202 260 336|204 260 310|204 262 247|204 262 245|200 260 340|201 260 317|200 260 327|201 262 323
                                                                             J23;  J4;   J202; J198; J24;  J8;   J16;  J230;
  120/4: 205 261 031|204 261 267|201 262 316|205 260 355|200 261 044|201 260 371|204 262 324|200 260 346
                                                                             J44;  J97;  J223; J31;  J46;  J35;  J231; J28;
  124/4: 200 262 057|205 261 251|201 262 240|202 260 344|201 262 326|204 261 261|204 262 327|205 261 326
                                                                             J149; J94;  J193; J27;  J232; J95;  J233; J111;
  130/4: 200 261 246|204 261 267|204 261 227|201 262 331|203 261 241|203 261 055|200 261 225|203 262 334
                                                                             J93;  J97;  J88;  J234; J92;  J50;  J86;  J235;
  134/4: 201 261 231|201 261 060|200 261 222|200 262 336|203 262 337|204 261 065|203 261 223|200 262 341
                                                                             J89;  J51;  J84;  J236; J237; J53;  J85;  J238;
  140/4: 202 261 271|204 261 267|203 261 335|200 261 176|200 261 274|203 262 342|200 262 344|203 262 345
                                                                             J101; J97;  J114; J76;  J102; J239; J240; J241;
  144/4: 201 262 347|205 262 350|201 262 310|202 262 352|200 260 100|204 261 267|204 261 267|204 261 267
                                                                             J242; J243; J219; J244; J7;   J97;  J97;  J97;
  150/4: 204 261 267|204 261 267|205 262 353|204 260 331|202 262 355|204 260 324|200 260 331|204 261 267
                                                                             J97;  J97;  J245; J22;  J246; J13;  J19;  J97;
  154/4: 204 261 267|201 260 321|204 261 267|204 261 267|204 261 267|204 260 323|204 260 325|204 261 267
                                                                             J97;  J10;  J97;  J97;  J97;  J12;  J15;  J97;
  160/4: 205 261 035|201 261 003|200 262 000|201 260 365|200 260 354|204 260 375|201 262 035|204 262 175
                                                                             J45;  J37;  J127; J33;  J30;  J36;  J141; J181;
  164/4: 203 262 077|204 261 267|204 261 267|204 261 024|205 261 017|204 261 267|204 261 267|204 262 366
                                                                             J155; J97;  J97;  J42;  J40;  J97;  J97;  J250;
  170/4: 201 262 370|201 261 125|204 261 267|204 261 267|200 261 217|202 261 117|204 261 267|204 261 267
                                                                             J251; J63;  J97;  J97;  J82;  J61;  J97;  J97;
  174/4: 205 261 207|204 261 072|204 262 306|204 261 267|203 261 215|203 261 104|204 261 267|204 262 246
                                                                             J79;  J55;  J218; J97;  J81;  J58;  J97;  J199;
  200/4: 205 261 021|204 261 267|202 262 011|201 261 201|200 261 030|204 261 267|201 262 033|204 261 267
                                                                             J41;  J97;  J131; J77;  J43;  J97;  J140; J97;
  204/4: 201 262 227|203 262 205|201 262 225|201 262 226|203 262 231|204 261 267|204 261 375|204 261 267
                                                                             J188; J184; J186; J187; J189; J97;  J126; J97;

  210/4: 204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|204 261 267
                                                                             J97;  J97;  J97;  J97;  J97;  J97;  J97;  J97;


                                                                       [ okq004.txt

  214/4: 204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|204 261 267
                                                                             J 97; J 97; J 97; J 97; J 97; J 97; J 97; J 97;
  220/4: 203 260 367|204 261 267|201 262 016|204 261 267|203 262 115|204 261 267|201 262 023|201 262 313
                                                                             J 34; J 97; J133; J 97; J161; J 97; J135; J221;
  224/4: 204 261 267|202 262 360|204 261 267|204 262 311|204 261 267|204 261 267|202 261 373|204 261 267
                                                                             J 97; J247; J 97; J220; J 97; J 97; J125; J 97;
  230/4: 203 261 167|204 261 267|204 261 267|204 261 267|205 261 160|204 261 267|204 261 267|204 261 267
                                                                             J 74; J 97; J 97; J 97; J 72; J 97; J 97; J 97;
  234/4: 204 261 132|204 261 267|201 262 305|204 261 267|201 261 147|204 261 267|201 262 303|205 262 265
                                                                             J 65; J 97; J217; J 97; J 69; J 97; J216; J208;
  240/4: 203 261 220|204 261 267|201 262 041|204 261 267|203 261 226|204 261 267|201 262 027|204 261 267
                                                                             J 83; J 97; J143; J 97; J 87; J 97; J138; J 97;
  244/4: 204 261 267|204 261 267|204 262 314|204 261 267|204 261 267|204 261 267|201 261 371|204 261 267
                                                                             J 97; J 97; J222; J 97; J 97; J 97; J124; J 97;
  250/4: 204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|204 261 267
                                                                             J 97; J 97; J 97; J 97; J 97; J 97; J 97; J 97;
  254/4: 204 261 267|204 261 267|204 261 267|201 262 235|204 261 267|204 261 267|204 261 267|204 261 267
                                                                             J 97; J 97; J 97; J191; J 97; J 97; J 97; J 97;
  260/4: 204 261 267|204 261 267|204 262 172|204 261 267|204 261 267|204 261 267|201 262 031|204 261 267
                                                                             J 97; J 97; J179; J 97; J 97; J 97; J139; J 97;
  264/4: 204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|204 261 267|200 261 364|204 261 267
                                                                             J 97; J 97; J 97; J 97; J 97; J 97; J122; J 97;
  270/4: 204 261 267|204 261 267|204 261 267|204 261 267|202 261 316|204 261 267|204 261 267|204 261 267
                                                                             J 97; J 97; J 97; J 97; J107; J 97; J 97; J 97;
  274/4: 204 261 303|204 261 267|204 261 267|204 261 267|200 261 311|204 261 267|203 262 301|204 261 267
                                                                             J105; J 97; J 97; J 97; J106; J 97; J215; J 97;
  300/4: 204 261 267|204 261 267|205 261 351|204 261 267|201 262 146|204 261 267|201 262 037|204 261 267
                                                                             J 97; J 97; J120; J 97; J172; J 97; J142; J 97;
  304/4: 204 261 267|204 261 267|202 262 264|205 262 241|205 262 100|204 262 173|203 261 345|204 261 267
                                                                             J 97; J 97; J207; J194; J156; J180; J118; J 97;

                                                                               (Take Address 12/3/63);
  310/4: 304 000 310                                                   4;    (TRA); SET B310; (r a);
  311/1: 200 323 013                                                   5;    JSP4; (p,s,t a);
  311/4: 205 140 313                                                         J6≠Z; (if p ≠ 0);
  312/1: 304 000 002|036|065|304 001 000|056                                 SET 2; -; REV; SET B400; +; ( t p a, s-2);
  313/4: 065                                                           14;    REV;
  313/5: 311 023 052                                                   6;    =Y10M1;  (S[AP]:=S);
  314/2: 311 023 053|140 020|143 020|143 020                                 =Y11M1; M+I1; DC1; DC1; (S[AP]:=t a,AP:=AP+2);
  315/5: 171 030|222 041 270                                                 C1; J98<Z; (if stack overflow);
  316/4: 200 260 100                                                         J7; (control);
  317/1: 304 000 110|201 260 311                                       8;      (TIA); SET B110; (i a); J5;
  320/1: 304 000 050|201 260 311                                       9;      (TBA); SET B50; (b a); J5;
                                                                       [ okq005.txt

                                                                               (Take Result 13/3/63);
  321/1: 304 000 300                                                   10;   (TRR); SET B300;  (rr);
  321/4: 200 323 013|052|170 362|310 363 052|205 260 313               11;   JSP4; ERASE; =M15; Y10M15; J6;
  323/4: 304 000 100|204 260 321                                       12;   (TIR); SET B100;  (ir) ; J11;
  324/4: 304 000 040|204 260 321                                       13;   (TBR); SET B40;  (br); J11;

                                                                               (Take imp const 13/3/63);
  325/4: 171 104                                                       15;   (TIC1); I4;
  326/0: 304 000 100                                                   17;   SET B100;  (ir,1);
  326/3: 204 260 313                                                         J14;
  327/0: 041|200 260 326                                               16;   (TIC0); ZERO; J17;
  327/4: 041|033                                                       18;   (TBCT); ZERO; NOT;  (true);
  330/0: 304 000 040|204 260 313                                       20;   SET B40; J14;
  331/0: 041|200 260 330                                               19;   (TBCF); ZERO; (false); J20;

                                                                               (Take label); (21/3/63);
  331/4: 304 000 020|171 136|304 000 030|200 323 010                   22;   (TL); SET B20; Q5; SET 24; JSP3;
  333/3: 041|166 041|065|164 261                                             ZERO; SHLD 16; REV; SHL -40;  (n,a,label);
  334/3: 170 362|310 362 276|164 041|056                                     =M15; YD1M15; SHL16; +; (D[n]/a,label);
  335/5: 205 260 313                                                         J6;  (Join Take Address);

                                                                               (Take Explicit Const 21/3/63);
  336/2: 304 000 300|171 136|140 100|205 260 313                       23;   (TRC); SET B300; Q5; M +I4; J6;
  340/0: 304 000 100|171 136|140 100|205 260 313                       24;   (TIC); SET B100; Q5; M + I4; J6;

                                                                               (TSA 21/3/63);
  341/4: 304 000 024|171 136|164 301|304 000 020|200 323 010|205 260 313
                                                                       26;   (TSA); SET B24; Q5; SHL -32; SET 16; JSP3; J6;

                                                                               (Jump, Reject 14/3/63);

                                                                       [ okq006.txt

  344/2: 171 136|164 301|200 323 004|200 260 100                       27;   (uj); Q5; SHL-32; JSP2; J7;
  346/0: 304 000 002|310 023 051|304 000 040|036|205 141 270           28;   (ifj); SET2; Y9M1; SETB40; -; J99≠Z; (if s[ap-1] ≠ br);
  350/1: 052|310 023 050|200 140 353                                         ERASE; Y8M1; J29≠Z; (if A[AP-2]=true);
  351/2: 171 136|164 301|200 323 004|200 260 354                             Q5; SHL-32; JSP2; J30;
  353/0: 304 000 020|200 323 010                                       29;   SET16; JSP3;
  354/0: 171 024|042|172 030                                           30;   (reject); I1; DUP; =+c1; (xs:=xs+2);
  354/5: 027|172 022|200 260 100                                             NEG; =+M1; J7;


                                                                             (call operations 26/2/63);

  355/5: 171 136|041                                                   31;   (cf); Q5; ZERO; (0,b1);
  356/2: 166 041|065|164 261                                                 SHLD16; REV; SHL-40; (m,a);
  357/1: 304 000 030|200 323 010                                             SET24; JSP3;
  360/1: 140 020                                                       32;   M+I1; (ap := ap+2);
  360/3: 143 020|143 020                                                     DC1; DC1;
  361/1: 171 030|222 041 270                                                 C1; J98<Z; (test stack overflow);
  362/0: 200 323 101                                                   39;   JSP6; (go); (q,a);
  362/3: 052|200 323 004                                                     ERASE; JSP2; (reset 1);
  363/1: 304 000 100                                                         SETAR7;
  363/4: 171 316|056                                                         Q12; +; (raa,l1);
  364/1: 311 043 054                                                         =Y12M2; (store in s[pp+2]);
  364/4: 200 260 100                                                         J7;
                                                                       33;   (cfz);
  365/1: 171 136|164 301|041                                                 Q5; SHL-32; ZERO; (0,a);
  366/0: 304 000 020|200 323 010                                             SET16; JSP3;
  367/0: 201 260 360                                                         J32; (join cf);
  367/3: 304 000 030|200 323 165                                       34;   (cbl); SET24; JSP7; (form i+3);
  370/3: 041                                                                 ZERO; (o,i+3);
  370/4: 200 260 362                                                         J39; (join cf);
                                                                       [ okq007.txt

                                                                             (entry operations 13/3/63);
  371/1: 171 136|042                                                   35;   (pe); Q5; DUP;
  371/4: 164 041|164 261                                                     SHL16; SHL-40; (m,b1);
  372/2: 304 000 030|200 323 010                                             SET24; JSP3;
  373/2: 171 070|036|304 000 003|065                                         C3; -; SET3; REV; (m-m1,3,b1);
  374/3: 205 141 270|052                                                     J99≠Z; ERASE; (b1);
  375/1: 203 261 004                                                         J38; (jump to be);
  375/4: 171 136                                                       36;   (fbe); Q5;
  376/0: 042|304 000 040|200 323 010                                         DUP; SET32; JSP3;
  377/1: 170 376|155 017                                                     =Q15; CM0TOQ15;
  377/5: 171 376                                                             Q15;
  400/1: 200 323 172                                                         JSP8;
  400/4: 056                                                                 +; (a/i,b1);
  400/5: 311 043 050                                                         =Y8M2; (s[pp-2]:=word[a,i]);
  401/2: 310 043 054                                                         Y12M2; (raa/link,b1);
  401/5: 164 341                                                             SHL-16;
  402/1: 200 323 004                                                         JSP2; (i:=h1[s[pp+2]]);
  402/4: 203 261 004                                                         J38;
  403/1: 171 136                                                       37;   (be); Q5;
  403/3: 304 000 020|200 323 010                                             SET16; JSP3;

                                                                             (ENTRY);
  404/3: 042|164 255                                                   38;   DUP; SHL-42;
  405/0: 065|164 015|164 265                                                 REV; SHL6; SHL-38; (l,n);
  405/5: 042|027                                                             DUP; NEG;
  406/1: 171 030|056|171 070|042|056|056                                     C1; +; C3; DUP; +; +;
  407/3: 042|170 030                                                         DUP; =C1; (xs:=xs-l);
  410/0: 222 041 270                                                         J98<Z; (stack overflow);
  410/3: 171 042|304 000 003|056                                             M2; SET3; +; (pp+3,l,n);

                                                                       [ okq008.txt

  411/3: 042|170 302                                                         DUP; =M12;
  412/0: 056                                                                 +;  (PP+L+3,n);
  412/1: 042|170 022                                                         DUP; =M1;
  412/4: 170 304                                                             =I12;
  413/0: 042|170 362                                                         DUP; =M15;
  413/3: 171 042|311 362 276                                                 M2; =YD1M15; (D[N]:=PP);
  414/2: 310 362 275|164 041|171 322|056                                     YD0M15; SHL 16;M13; +; (PCc/PPa,n);
  415/4: 311 043 052                                                         =Y10M2;
  416/1: 170 310                                                             =C12;
  416/3: 171 316|311 043 053                                                 Q12; =Y11M2; (S[PP]:=[N,WP,FP]);
  417/2: 200 260 100                                                         J7;  (Control);

                                                                               (Return, etc., ops 13/3/63);
  417/5: 310 023 050|311 043 050|310 023 051|311 043 051               40;   (EIS); Y8M1; =Y8M2; Y9M1; =Y9M2; (S[PP-2,1]:=S[AP-2,1]);
  421/5: 310 043 054|042|164 341                                       41;   (RETURN); Y12M2; DUP; SHL -16; (I,S[PP+2]);
  422/5: 200 323 004|174 000                                                 JSP2; =LINK;
  423/4: 200 323 177                                                         JSP9;  (LEAVE);
  424/1: 202 360 000                                                         EXIT;
  424/4: 171 136|164 301                                               42;      (FSE); Q5; SHL -32;  (A);
  425/2: 200 323 004|200 323 177                                             JSP2; JSP9;
  426/2: 141 020|304 000 002|172 030                                         M-I1; SET 2; =+C1;  (AP:=AP+2);
  427/3: 200 260 100                                                         J7;
  430/0: 310 043 054|164 341|200 323 004|200 260 100                   43;   (FR); Y12M2; SHL-16; JSP2; J7;

                                                                             (ST,STA 13/3/63);
  431/5: 200 323 204|310 003 037|304 000 012|036|220 041 035           44;   (ST); JSP10; YE33; SET 10; -; J211<Z;
  434/0: 204 324 334|200 260 100                                             JS3P31; J7;
  435/0: 052|052                                                       211;  ERASE; ERASE;
  435/2: 200 260 100                                                               J7;

                                                                       [ okq009.txt

  435/5: 200 323 204|311 023 052|042                                   45;   (sta); JSP10; =Y10M1; DUP; (s[ap-4]:=y);
  437/0: 311 023 053                                                         =Y11M1;
  437/3: 310 023 051|015|304 000 200|054|304 000 005|065                     Y9M1; NEV; SETB200; AND; SET5; REV;
  441/3: 205 141 270                                                         J99≠Z;
  442/0: 052                                                                 ERASE;
  442/1: 140 020|143 020|143 020|200 260 100                                 M+I1; DC1; DC1; J7;

                                                                             (gta 21/3/63);
  443/4: 017|017|041|310 023 050|166 341                               *46;  (gta); ZERO; Y8M1; SHLD-16;
  445/0: 042|171 042|036|225 141 052                                         DUP; M2; -; J47=Z; (if q=pp);
  446/1: 042|310 043 053|164 301|200 322 372                                 DUP; Y11M2; SHL-32; JSP1; (udd);
  447/4: 170 042|310 043 053|164 341|042|027|171 022|056|172 030|170 022|201 261 054
                                                                             =M2; Y11M2; SHL-16; DUP; NEG; M1; +; =+C1; =M1; J48;
  452/5: 052|141 020|304 000 002|172 030                               47;   ERASE; M-I1; SET2; =+C1; (ap:=ap-2);
  454/1: 164 301|200 323 004                                           48;   SHL-32; JSP2;
  455/0: 200 260 100                                                         J7;


                                                                             (take formal address 12/4/63);
  455/3: 304 000 100|200 323 013|052|200 323 247                       50;   (tfa); SETAR7; JSP4; ERASE; JSP14; (take formal);
  457/1: 200 260 100|200 260 100                                             J7; J7;
  460/1: 304 001 063|200 323 013|052|200 323 247|200 260 100           51;   (tfar); SETAR52; JSP4; ERASE; JSP14; J7;
  462/2: 017|017|017|017|310 023 051|304 000 310|036|220 140 100       *52;  Y9M1; SETB310; -; J7=Z; (if r a);
  464/4: 304 000 007|200 323 034                                             SET7; JSP5; (fail);
  465/4: 304 001 070|200 323 013|052|200 323 247|200 260 100           53;   (tfai); SETAR54; JSP4; ERASE; JSP14; J7;
  467/5: 017|310 023 051|304 000 110|036|220 140 100                   *54;  Y9M1; SETB110; -; J7=Z; (if i a);
  471/4: 304 000 010|200 323 034                                             SET8; JSP5; (fail);

                                                                             (take formal result 12/4/63);
  472/4: 304 001 075|200 323 013|052|200 323 247|200 260 100           55;   (tfr); SETAR56; JSP4; ERASE; JSP14; J7; (take formal);
  474/5: 017|200 323 262|310 023 051|304 000 100|221 021 101           *56;  JSP15; Y9M1; SETB100; J57=; (if i r);



                                                                       [ okq010.txt

  477/0: 304 000 300|036|220 140 100                                         SETB300; -; J7=Z; (if r r);
  500/1: 304 000 012|200 323 034                                             SET10; JSP5; (fail);
  501/1: 310 023 050|304 000 057|024|311 023 050|052|304 000 300|311 023 051|200 260 100
                                                                       57;   Y8M1; SET47; FLOAT; =Y8M1; ERASE; SETB300; =Y9M1; J7;
  504/3: 304 001 107|200 323 013|052|200 323 247|200 260 100           58;   (tfi); SETAR59; JSP4; ERASE; JSP14; J7;
  506/4: 017|017|200 323 262|310 023 051|304 000 300|221 021 113       *59;  JSP15; Y9M1; SETB300; J60=; (if r r);
  511/0: 304 000 100|036|220 140 100                                         SETB100; -; J7=Z; (if i r);
  512/1: 304 000 013|200 323 034                                             SET11; JSP5; (fail);
  513/1: 310 023 050|200 323 231|304 000 014|200 323 034|311 023 050|052|304 000 100|311 023 051|200 260 100
                                                                       60;   Y8M1; JSP11; SET12; JSP5; =Y8M1; ERASE; SETB100; =Y9M1; J7;
  517/2: 304 001 122|200 323 013|052|200 323 247|200 260 100           61;   (tfb); SETAR62; JSP4; ERASE; JSP14; J7;
  521/3: 017|017|017|200 323 262|310 023 051|304 000 040|036|220 140 100
                                                                       *62;  JSP15; Y9M1; SETB40; -; J7=Z; (if b r);
  524/1: 304 000 015|200 323 034                                             SET13; JSP5; (fail);
  525/1: 304 001 130|200 323 013|052|200 323 247|200 260 100           63;   (tfl); SETAR64; JSP4; ERASE; JSP14; J7;
  527/2: 017|017|017|017|310 023 051|304 000 020|036|220 140 100       *64;  Y9M1; SETB20; -; J7=Z; (if l);
  531/4: 304 000 016|200 323 034                                             SET14; JSP5; (fail);

                                                                             (check and store 12/4/63);
  532/4: 304 001 136|310 043 053|164 101|164 301|200 323 247|200 260 100
                                                                       65;   (csr); SETAR66; Y11M2; SHL32; SHL-32; JSP14; J7;
  535/2: 017|017|017|017|200 323 262|310 023 050|310 023 051|304 000 100|223 021 142
                                                                       *66;  JSP15; Y8M1; Y9M1; SETB100; J67=; (if i r);
  540/3: 304 000 300|223 021 143                                             SETB300; j68=; (if r r);
  541/3: 304 000 017|200 323 034                                             SET15; JSP5;
  542/3: 065|304 000 057|024|065                                       67;   REV; SET47; FLOAT; REV;
  543/3: 310 043 053|042|170 362|304 000 002|056|311 043 053|311 363 053|311 363 052|200 260 354
                                                                       68;   Y11M2; DUP; =M15;SET 2; +; =Y11M2; =Y11M15; =Y10M15; J30;
  547/1: 304 001 152|310 043 053|164 101|164 301|200 323 247|200 260 100
                                                                       69;   (csi); SETAR70; Y11M2; SHL32; SHL-32; JSP14; J7;
  551/5: 017|200 323 262|310 023 050|310 023 051|304 000 300|223 021 156
                                                                       *70;  JSP15; Y8M1; Y9M1; SETB300; J71=; (if r r);
  554/3: 304 000 100|223 021 143                                             SETB100; J68=; (if i r);
  555/3: 304 000 020|200 323 034                                             SET16; JSP5;
  556/3: 065|200 323 231|304 000 021|200 323 034|065|203 261 143       71;   REV; JSP11; SET 17; JSP5; REV; J68;
  560/5: 304 001 164|310 043 053|164 101|164 301|200 323 247|200 260 100
                                                                       72;   (csb); SETAR73; Y11M2; SHL32; SHL-32; JSP14; J7;
  563/3: 017|017|017|200 323 262|310 023 050|310 023 051|304 000 040|223 021 143
                                                                       *73;  JSP15; Y8M1; Y9M1; SETB40; J68=; (if b r);


                                                                       [ okq011.txt

  566/3: 304 000 022|200 323 034                                             SET 18; JSP5;
  567/3: 304 001 173|310 043 053|164 101|164 301|200 323 247|200 260 100
                                                                       74;   (CSL); SET AR75; Y11M2; SHL32; SHL-32; JSP14; J7;
  572/1: 017|017|017|017|017|310 023 050|310 023 051|304 000 020|223 021 143
                                                                       *75;  Y8M1; Y9M1; SET B20; J68=;  (if l);
  575/0: 304 000 023|200 323 034                                             SET 19; JSP5;

                                                                               (Call Formal 12/4/63);
  576/0: 200 323 013|052|171 136|164 041                               76;   (CFF); JSP4; ERASE; Q5; SHL 16;
  577/2: 164 261|304 000 010|200 323 010|200 261 202                         SHL-40; SET 8; JSP3; J78;
  601/1: 200 323 013|052|041                                           77;   (CFFZ); JSP4; ERASE; ZERO;
  602/0: 304 000 100|012|065                                           78;   SET AR7; PERM; REV;
  602/5: 170 362|041|310 363 052|166 341|065|164 301                         =M15; ZERO; Y10M15; SHLD-16; REV; SHL-32;
  604/4: 065|066|140 020                                                     REV; CAB; M+I1;
  605/2: 143 020|143 020|171 030|222 041 270                                 DC1; DC1; C1; J98<Z; (if S overflow);
  606/5: 200 323 242|200 260 100                                             JSP13; J7; (GO FORMAL);

                                                                               (Check Operations 17/4/63);
  607/5: 304 000 024|304 000 311                                       79;   (CAR); SET 20; SET B311;
  610/5: 310 043 053|042|164 101|164 301                               80;   Y11M2; DUP; SHL 32; SHL-32;
  612/1: 170 362|304 000 002|056|311 043 053                                 =M15; SET 2; +; =Y11M2;
  613/4: 310 363 053|036|205 141 270                                         Y11M15; -; J99≠Z; (if fail);
  614/5: 052|200 260 100                                                     ERASE; J7;
  615/3: 304 000 025|304 000 111|205 261 210                           81;   (CAI); SET 21; SET B111; J80;
  617/0: 304 000 026|304 000 051|205 261 210                           82;   (CAB); SET 22; SET B51; J80;
  620/3: 304 000 027|304 000 004|205 261 210                           83;   (CPR); SET 23; SET B4; J80;
  622/0: 304 000 030|304 000 304|205 261 210                           84;   (CFR); SET 24; SET B304; J80;
  623/3: 304 000 031|304 000 104|205 261 210                           85;   (CFI); SET 25; SET B104; J80;
  625/0: 304 000 032|304 000 044|205 261 210                           86;   (CFB); SET 26; SET B44; J80;
  626/3: 304 000 033|041|205 261 210                                   87;   (CST); SET 27; ZERO; J80;
  627/4: 304 000 034|304 000 021|205 261 210                           88;   (CW); SET 28; SET B21; J80;

                                                                       [ okq012.txt

  631/1: 304 000 035|310 043 053|042|164 101|164 301|170 362           89;   (CA); SET 29; Y11M2; DUP; SHL 32; SHL-32; =M15;
  633/2: 310 363 053|042|304 000 101|054|304 000 100                         Y11M15; DUP; SET B101; AND; SET B100;
  635/1: 036|223 141 237                                               90;   -; J91=Z; (if not type);
  635/5: 304 000 006|223 021 237                                             SET B6; J91=; (if not i s r);
  636/5: 066|200 323 034                                                     CAB; JSP5;
  637/3: 052|304 000 002|056|311 043 053|052|200 260 100               91;   ERASE; SET 2; +; =Y11M2; ERASE; J7;
  641/3: 304 000 036                                                   92;   (CB); SET 30;
  642/0: 310 043 053|042|164 101|164 301|170 362                             Y11M2; DUP; SHL 32; SHL-32; =M15;
  643/4: 310 363 053|042|304 000 041|054|304 000 040|201 261 235             Y11M15; DUP; SET B41; AND; SET B40; J90;
  646/0: 304 000 037                                                   93;   (CL); SET 31;
  646/3: 310 043 053|042|164 101|164 301|170 362                             Y11M2; DUP; SHL 32; SHL-32; =M15;
  650/1: 310 363 053|042|304 000 020|201 261 235                             Y11M15; DUP; SET B20; J90;

                                                                               (MSF,MOSF  8/5/63);
  651/5: 310 043 053|164 041|164 301|042                               94;   (MSF); Y11M2; SHL16; SHL-32; DUP;
  653/1: 200 323 273                                                         JSP16;
  653/4: 171 350|304 000 012|036|042|310 043 053|170 376|170 364|171 376|311 043 053
                                                                             C14; SET 10; -; DUP; Y11M2; =Q15; =I15; Q15; =Y11M2;
  656/5: 042|171 022|036|027|172 030|171 030|222 041 270                     DUP; M1; -; NEG; =+C1; C1; J98<Z; (st overflow);
  660/5: 170 022|200 260 100                                                 =M1; J7;
  661/4: 310 043 053|164 041|164 301|310 003 041                       95;   (MOSF); Y11M2; SHL 16; SHL -32; Y1;
  663/2: 200 323 273                                                         JSP16;
  663/5: 171 350|304 000 012|036|311 003 041|171 262|042|171 022|036         C14; SET 10; -; =Y1; M11; DUP; M1; -;
  666/2: 027|172 030|170 022|200 260 100                                     NEG; =+C1; =M1; J7;

  667/4: 041|205 261 270                                               97;   ZERO; J99;
  670/2: 304 000 001                                                   98;   SET 1;
  670/5: 200 323 034                                                   99;   JSP5;

                                                                               (INDA, INDR 10/5/63);

                                                                       [ okq013.txt

  671/2: 200 323 337|203 261 300                                       101;  (INDA); JSP17; J103;
  672/2: 304 000 012|036|311 023 050|200 260 100                             SET 10; -; =Y8M1; J7;
  674/0: 200 323 337|203 261 300                                       102;  (INDR); JSP17; J103;
  675/0: 170 362|310 363 040|311 023 050                                     =M15; Y0M15; =Y8M1;
  676/2: 310 023 051|304 000 010|036|311 023 051|200 260 100                 Y9M1; SET B10; -; =Y9M1; J7;
  700/3: 225 141 301|052|041|200 260 362                               103;  J104=Z; ERASE; ZERO; J39;  (Join CF);
  701/5: 304 000 100|012|041|200 323 242|200 260 100                   104;  SET AR7; PERM; ZERO; JSP13; J7;

                                                                               (CRFA, etc. 16/5/63);
  703/4: 310 043 053|042|164 101|164 301|170 342                       105;  (CRFA); Y11M2; DUP; SHL 32; SHL -32; =M14; (s in M14);
  705/2: 310 343 053|304 000 311|223 021 322                                 Y11M14; SET B311; J108=;  (if r a);
  706/5: 304 000 111|036|225 141 323                                         SET B111; -; J109=Z; (if i a);
  710/0: 304 000 050|200 323 034                                             SET 40; JSP5;
  711/0: 310 043 053|042|164 101|164 301|170 342                       106;  (CIFA); Y11M2; DUP; SHL 32; SHL -32; =M14;
  712/4: 310 343 053|304 000 111|223 021 322                                 Y11M14; SET B111; J108=;  (if i a);
  714/1: 304 000 311|036|222 141 325                                         SET B311; -; J110=Z;  (if r a);
  715/2: 304 000 051|200 323 034                                             SET 41; JSP5;
  716/2: 310 043 053|042|164 101|164 301|170 342                       107;  (CBFA); Y11M2; DUP; SHL 32; SHL -32; =M14;
  720/0: 310 343 053|304 000 051|223 021 322                                 Y11M14; SET B51; J108=;  (if b a);
  721/3: 304 000 052|200 323 034                                             SET 42; JSP5;
  722/3: 052|041|200 324 001|200 260 100                               108;  ERASE; ZERO; JSP18; J7;
  723/5: 304 000 001|200 324 001|200 260 100                           109;  SET 1; JSP18; J7;
  725/2: 304 377 377|200 324 001|200 260 100                           110;  SET -1; JSP18; J7;

                                                                               (Switch ops 29/5/63);
  726/5: 310 043 055|304 000 001|036|042|225 141 332                   111;  (DSI); Y13M2; SET 1; -; DUP; J112=Z;  (if x=0);
  730/4: 311 043 055|171 136|164 301|200 323 004|200 260 100                 =Y13M2; Q5; SHL -32; JSP2; J7;
  732/5: 052|304 000 020|200 323 010|200 260 100                       112;  ERASE; SET 16; JSP3; J7;
  734/3: 304 000 053|200 323 034                                       113;  (ESL); SET 43; JSP5;

                                                                       [ okq014.txt

                                                                               (Unary ops, % 29/5/63);
  735/3: 310 023 050|310 023 051|304 000 300|224 021 341               114;  (NEG); Y8M1; Y9M1; SET B300; J115=;  (if r);
  737/3: 304 000 100|036|220 141 343                                         SET B100; -; J116=Z;  (if i);
  740/4: 304 000 054|200 323 034                                             SET 44; JSP5;
  741/4: 052|031|304 000 055|204 261 343                               115;  ERASE; NEGF; SET 45; J117;
  743/0: 027|304 000 056                                               116;  NEG; SET 46;
  743/4: 065|311 023 050|225 201 270                                   117;  REV; =Y8M1; J99V;
  744/5: 052|200 260 100                                                     ERASE; J7;
  745/3: 310 023 051|304 000 040|036|205 141 350                       118;  (NOT); Y9M1; SET B40; -; J119≠Z; (if ≠ b);
  747/1: 310 023 050|033|311 023 050|200 260 100                             Y8M1; NOT; =Y8M1; J7;
  750/5: 304 000 057|200 323 034                                       119;  SET 47; JSP5;
  751/5: 310 023 047|310 023 051|011|304 000 100|036|221 141 355       120;  (DIV); Y7M1; Y9M1; OR; SET B100; -; J121=Z; (if i,i);
  754/1: 304 000 060|200 323 034                                             SET 48; JSP5;

  755/1: 304 000 061|310 023 046|042|026|310 023 050|042|026|066       121;  SET49; Y6M1; DUP; ABS; Y8M1; DUP; ABS; CAB;
  757/3: 037|201 101 361|052|052|041|202 261 362                             SIGN; J196≤Z; ERASE; ERASE; ZERO; J197;
  761/1: 017|017|017|017|017|044|052                                   196;  ÷I; ERASE;
  762/2: 311 023 046|225 201 270                                       197;  =Y6M1; J99V;
  763/2: 052|200 260 354                                                     ERASE; J30;

                                                                               (log ops 29/5/63);
  764/0: 310 023 046|310 023 050|054|304 000 062                       122;  (AND); Y6M1; Y8M1; AND; SET 50;
  765/4: 310 023 047|310 023 051|011|304 000 040|036|205 141 270       123;  Y7M1; Y9M1; OR; SET B40; -; J99≠Z;
  770/0: 052|311 023 046|200 260 354                                         ERASE; =Y6M1; J30;
  771/1: 310 023 046|310 023 050|011|304 000 063|204 261 365           124;  (OR); Y6M1; Y8M1; OR; SET51; J123;
  773/2: 310 023 046|033|310 023 050|011|304 000 064|204 261 365       125;  (IMP); Y6M1; NOT; Y8M1; OR; SET 52; J123;
  775/4: 310 023 046|310 023 050|015|033|304 000 065|204 261 365       126;  (EQV); Y6M1; Y8M1; NEV; NOT; SET 53; J123;

                                                                       [ okq015.txt

                                                                               ( +,-,×  29/5/63);
 1000/0: 304 000 066|310 023 046|310 023 050|310 023 047|310 023 051|200 324 032
                                                                       127;  (+); SET 54; Y6M1; Y8M1; Y7M1; Y9M1; JSP19;
 1003/0: 201 262 006                                                         J129;  (i);
 1003/3: 074                                                                 +F;
 1003/4: 065|304 000 011|056|225 201 270                               128;  REV; SET 9; +; J99V;  (if r ovfl);
 1005/0: 052|311 023 046|200 260 354                                         ERASE; =Y6M1; J30;
 1006/1: 056                                                           129;  +;
 1006/2: 042|311 023 046|161 021|052                                   130;  DUP; =Y6M1; SHA 8; ERASE;
 1007/3: 304 000 022|056|225 201 270                                         SET 18; +; J99V;  (if i ovfl);
 1010/4: 052|200 260 354                                                     ERASE; J30;
 1011/2: 304 000 067|310 023 046|310 023 050|310 023 047|310 023 051|200 324 032
                                                                       131;  (-); SET 55; Y6M1; Y8M1; Y7M1; Y9M1; JSP19;
 1014/2: 203 262 015                                                         J132;
 1014/5: 075|204 262 003                                                     -F; J128;
 1015/3: 036|202 262 006                                               132;  -; J130;
 1016/1: 304 000 070|310 023 046|310 023 050|310 023 047|310 023 051|200 324 032
                                                                       133;  (×); SET 56; Y6M1; Y8M1; Y7M1; Y9M1; JSP19;
 1021/1: 202 262 022                                                         J134;
 1021/4: 004|204 262 003                                                     ×F; J128;               [ multiplies are indistinct but the sense is multiply
 1022/2: 034|050|202 262 006                                           134;  ×D; CONT; J130;         [ ... also * over - is times.  There is no - over - and no % divide char on the printer

                                                                               (<,≤,=,≥,>,≠  29/5/63);
 1023/1: 304 000 071|200 324 045                                       135;  (<); SET 57; JSP20;
 1024/1: 225 042 025                                                         J137 < Z;
 1024/4: 041|311 023 046|200 260 354                                   136;  ZERO; =Y6M1; J30;
 1025/5: 041|033|311 023 046|200 260 354                               137;  ZERO; NOT; =Y6M1; J30;
 1027/1: 304 000 072|200 324 045                                       138;  (≤); SET 58; JSP20;
 1030/1: 205 102 025                                                         J137 ≤ Z;
 1030/4: 204 262 024                                                         J136;
 1031/1: 304 000 073|200 324 045                                       139;  (=); SET 59; JSP20;
 1032/1: 225 142 025                                                         J137 = Z;

                                                                       [ okq016.txt

 1032/4: 204 262 024                                                         J136;
 1033/1: 304 000 074|200 324 045                                       140;  (≥); SET 60; JSP20;
 1034/1: 205 042 025                                                         J137 ≥ Z;
 1034/4: 204 262 024                                                         J136;
 1035/1: 304 000 075|200 324 045                                       141;  (>); SET 61; JSP20;
 1036/1: 225 102 025                                                         J137 > Z;
 1036/4: 204 262 024                                                         J136;
 1037/1: 304 000 076|200 324 045                                       142;  (≠); SET 62; JSP20;
 1040/1: 205 142 025                                                         J137 ≠ Z;
 1040/4: 204 262 024                                                         J136;

                                                                               ( / 29/5/63);
 1041/1: 310 023 046|310 023 047|304 000 300|200 022 050               143;  (/); Y6M1; Y7M1; SET B300; J146≠;  (unless r);
 1043/1: 052|310 023 050|310 023 051|304 000 300|203 022 054           144;  ERASE; Y8M1; Y9M1; SET B300; J148≠; (unless r);
 1045/2: 052|001|062|311 023 046|304 000 113|225 201 270               145;  ERASE; VR; ÷F; =Y6M1; SET 75; J99V;
 1047/2: 052|200 260 354                                                     ERASE; J30;
 1050/0: 304 000 100|203 022 053                                       146;  SET B100; J147≠;  (unless i);
 1051/0: 052|304 000 057|024|304 000 300|311 023 047|041|201 262 043         ERASE; SET 47; FLOAT; SET B300; =Y7M1; ZERO; J144;
 1053/3: 304 000 114|205 261 270                                       147;  SET 76; J99;
 1054/3: 304 000 100|203 022 053                                       148;  SET B100; J147≠;  (unless i);
 1055/3: 052|304 000 057|024|041|202 262 045                                 ERASE; SET 47; FLOAT; ZERO; J145;

                                                                               (FOR A, LINK  11/6/63);
 1057/0: 304 002 065                                                   149;  (FOR A); SET AR 152;
 1057/3: 200 323 172|311 043 051                                       150;  JSP8; =Y9M2;
 1060/3: 310 043 050|164 041|164 301|200 323 004                       175;  Y8M2; SHL 16; SHL-32; JSP2;
 1062/1: 310 043 054|164 341|164 041                                   151;  Y12M2; SHL -16; SHL 16;
 1063/2: 056|311 043 054|200 260 100                                         +; =Y12M2; J7;
 1064/3: 017|017|017|304 002 072                                       *152; SET AR 154;

                                                                       [ okq017.txt

 1065/3: 304 000 115                                                   153;  SET 77;
 1066/0: 310 023 051|304 001 000|054|205 141 270                             Y9M1; SET B400; AND; J99≠Z;
 1067/4: 052|310 043 051|200 323 004|201 262 062                             ERASE; Y9M2; JSP2; J151;
 1071/2: 017|017|017|017|310 043 054|170 376|200 323 172               *154; Y12M2; =Q15; JSP8;
 1073/2: 170 364                                                             =I15;
 1073/4: 171 376|311 043 054                                                 Q15; =Y12M2;
 1074/3: 200 323 204|052|052                                                 JSP10; ERASE; ERASE;
 1075/2: 310 043 050|164 101|164 301|200 323 004                             Y8M2; SHL 32; SHL -32; JSP2;
 1077/0: 200 260 100                                                         J7;
 1077/3: 310 043 054|174 000                                           155;  (LINK); Y12M2; =LINK;
 1100/2: 202 360 000                                                         EXIT;

                                                                               (FOR W   11/6/63);
 1100/5: 304 002 102|203 262 057                                       156;  (FOR W); SET AR157; J150;
 1101/5: 017|304 002 103|203 262 065                                   *157; SET AR158; J153;
 1103/0: 200 323 204|052|052|304 002 105|201 262 062                   *158; JSP10; ERASE; ERASE; SET AR159; J151;
 1104/5: 017|304 000 116                                               *159; SET 78;
 1105/3: 310 023 051|304 000 040|036|205 141 270                             Y9M1; SET B40; -; J99≠Z;
 1107/1: 052|310 023 050|223 142 112                                         ERASE; Y8M1; J160=Z;
 1110/2: 310 043 050|164 101|164 301|200 323 004                       168;  Y8M2; SHL 32; SHL -32; JSP2;
 1112/0: 200 260 354                                                         J30;
 1112/3: 310 043 054|170 376|200 323 172                               160;  Y12M2; =Q15; JSP8;
 1113/5: 170 364                                                             =I15;
 1114/1: 171 376|311 043 054|200 260 354                                     Q15; =Y12M2; J30;

                                                                               (For st 1st entry  15/11/63);
 1115/3: 304 002 117|203 262 057                                       161;  (FORS1); SET AR162; J150;  (Take add of V);
 1116/3: 017|017|017|304 002 120|203 262 065                           *162; SET AR163; J153;  (Take A);
 1120/0: 200 323 204                                                   *163; JSP10;  (Store);

                                                                       [ okq018.txt

 1120/3: 311 043 055|311 043 056                                             =Y13M2; =Y14M2;
 1121/3: 310 043 054|170 376|200 323 172|170 364|171 376|311 043 054         Y12M2; =Q15; JSP8; =I15; Q15; =Y12M2;
 1124/0: 304 000 010|200 323 010                                             SET 8; JSP3;
 1125/0: 304 002 126|201 262 062                                             SET AR164; J151;  (Take B);
 1126/0: 310 023 050|311 043 057|310 023 051|311 043 060               *164; Y8M1; =Y15M2; Y9M1; =Y16M2;
 1130/0: 171 024|172 030|141 020                                             I1; =+C1; M-I1;
 1131/0: 304 002 132|201 262 062                                       165;  SET AR166; J151;  (Take C);
 1132/0: 304 000 144|310 043 055|310 023 050|310 043 056|310 023 051   *166; SET 100; Y13M2; Y8M1; Y14M2; Y9M1;
 1134/3: 140 020|200 324 343|203 262 144                                     M+I1; JSP32; J171;
 1135/5: 075|203 202 137                                                     -F; J167NV;
 1136/3: 304 000 146|200 323 034                                             SET102; JSP5;
 1137/3: 065|052|310 043 057|043|141 020|015|202 042 142               167;  REV; ERASE; Y15M2; DUP D; M-I1; NEV; J169≥Z;
 1141/3: 052|052|202 262 110                                                 ERASE; ERASE; J168;
 1142/2: 203 142 143                                                   169;  J170≠Z;
 1142/5: 052|202 262 110                                                     ERASE; J168;
 1143/3: 222 142 110                                                   170;  J168=Z;
 1144/0: 203 262 112                                                         J160;
 1144/3: 036|203 202 137                                               171;  -; J167NV;
 1145/1: 304 000 147|200 323 034                                             SET 103; JSP5;

                                                                               (For st 2nd entry  15/11/63);
 1146/1: 304 002 150|201 262 062                                       172;  (FORS2); SET AR173; J151;  (Take B);
 1147/1: 017|017|017|017|017|310 023 050|311 043 057|310 023 051|311 043 060
                                                                       *173; Y8M1; =Y15M2; Y9M1; =Y16M2;
 1152/0: 171 024|172 030|141 020                                             I1; =+C1; M-I1;
 1153/0: 304 002 154|203 262 057                                             SET AR174; J150;  (Take add of V);
 1154/0: 304 002 155|203 262 060                                       *174; SET AR176; J175;  (Take add of V);
 1155/0: 200 323 262                                                   *176; JSP15;  (Cond take);
 1155/3: 304 000 145|310 023 050|310 043 057|310 023 051|310 043 060         SET 101; Y8M1; Y15M2; Y9M1; Y16M2;
 1160/0: 140 020|200 324 343|203 262 170                                     M+I1; JSP32; J178;

                                                                       [ okq019.txt

 1161/2: 074|304 000 300|203 202 163                                         +F; SET B300; J177NV;
 1162/3: 304 000 150|200 323 034                                             SET 104; JSP5;
 1163/3: 141 020|311 023 051|311 023 050                               177;  M-I1; =Y9M1; =Y8M1;
 1164/5: 200 323 204                                                         JSP10;  (Store);
 1165/2: 311 043 055|311 043 056|052                                         =Y13M2; =Y14M2; ERASE;
 1166/3: 304 002 132|310 043 051|200 323 004|201 262 062                     SET AR166; Y9M2; JSP2; J151;  (Take C);
 1170/3: 056|304 000 100|203 202 163                                   178;  +; SET B100; J177NV;
 1171/4: 304 000 151|200 323 034                                             SET 105; JSP5;

                                                                               (^ 1/7/63);
 1172/4: 200 324 101|200 260 354                                       179;  (^); JSP22; J30;

                                                                               (End  11/11/63);
 1173/4: 211 320 221                                                   180;  (FINISH); JS160P295;  (Grand close);
 1174/1: 200 325 336                                                         JSP128;  (Finish);
 1174/4: 304 000 127|200 323 034                                             SET 87; JSP5;  (not all closed);

                                                                               (AOA  8/7/63);
 1175/4: 171 102|171 110|304 000 060|220 022 204                       181;  (AOA); M4; C4; SET 48; J183=;
 1177/2: 170 370|170 362|304 000 033|304 000 377                       182;  =C15; =M15; SET B33; SET B377;
 1201/0: 166 360|033|100 103                                                 SHLDC15; NOT; M3M4;
 1201/5: 054|056|101 103                                                     AND; +; =M3M4;
 1202/3: 304 000 020|200 323 010|200 260 100                                 SET 16; JSP3; J7;
 1204/0: 052|304 000 001|036|041|202 262 177                           183;  ERASE; SET 1; -; ZERO; J182;

                                                                               (Down  11/7/63);
 1205/3: 304 000 300                                                   184;  (RDOWN); SET B300;
 1206/0: 311 043 051|304 003 375|164 113|311 043 050                   185;  =Y9M2; SET B1775; SHL 37; =Y8M2;
Warning: YA0 is out of range, only 0 YA-stores specified
Warning: YA1 is out of range, only 0 YA-stores specified
 1207/5: 171 136|042|304 000 100|311 002 275|304 001 044|311 002 276         Q5; DUP; SET AR7; =YA0; SET AR46; =YA1;


                                                                       [ okq020.txt

 1212/2: 164 261|304 000 001|036|170 362                                     SHL -40; SET 1; -; =M15;
 1213/4: 304 016 100                                                         SET 3648;  (TEMPORARY);
 1214/1: 170 342|100 340|170 342                                             =M14; M0M14; =M14;
 1215/1: 100 376|174 000                                                     M14M15; =LINK;
 1215/5: 042|164 021|164 261|042|066                                         DUP; SHL 8; SHL -40; DUP; CAB;
 1217/0: 164 041|164 261|056|304 000 006|056                                 SHL 16; SHL -40; +; SET 6; +;
 1220/3: 042|172 022|027|172 030                                             DUP; =+M1; NEG; =+C1;
 1221/3: 171 030|222 041 270                                                 C1; J98<Z;  (if st ofl);
 1222/2: 311 023 050                                                         =Y8M1;
 1222/5: 304 000 030|200 323 010|171 116|311 023 047                         SET 24; JSP3; Q4; =Y7M1;
 1224/4: 202 360 000                                                         EXIT;
 1225/1: 304 000 100|200 262 206                                       186;  (IDOWN); SET B100; J185;
 1226/1: 304 000 040|200 262 206                                       187;  (BDOWN); SET B40; J185;

                                                                               (UP  11/7/63);
 1227/1: 200 324 231                                                   188;  (UP1); JSP27;
 1227/4: 310 023 046|174 000                                                 Y6M1; =LINK;
 1230/3: 310 023 052                                                         Y10M1;
 1231/0: 200 360 000                                                         EXIT 1;
 1231/3: 310 023 050|170 102                                           189;  (UP2); Y8M1; =M4;
 1232/2: 310 023 047|311 103 052                                             Y7M1; =Y10M4;
 1233/2: 200 324 231                                                         JSP27;
 1233/5: 310 023 046|174 000                                                 Y6M1; =LINK;
 1234/4: 200 360 000                                                         EXIT 1;

                                                                               (Simple std func  25/11/63);
 1235/1: 310 043 055|200 324 371                                       191;  (ABS); Y13M2; JSP41;
 1236/1: 311 043 050|304 000 300|311 043 051|205 261 021               192;  =Y8M2; SET B300; =Y9M2; J41;
 1240/1: 310 043 055|200 324 372|042|203 262 243                       193;  (SIGN); Y13M2; JSP42; DUP; J195;


                                                                       [ okq021.txt

 1241/5: 310 043 055|200 325 016|042|203 262 243                       194;  (ENTIER); Y13M2; JSP46; DUP; J195;;
 1243/3: 311 043 050|052|304 000 100|311 043 051|205 261 021           195;  =Y8M2; ERASE; SET B100; =Y9M2; J41;

                                                                               (Input/Output 23/8/63);
 1245/4: 200 324 265                                                   198;  (PRINT); JSP28;
 1246/1: 205 261 021                                                         J41;
 1246/4: 200 324 270                                                   199;  (READ); JSP29;
 1247/1: 201 262 236                                                         J192;

                                                                               (Trace 18/9/63);
 1247/4: 171 136|140 100                                               202;  (TRACE); Q5; M + I4;
 1250/2: 310 003 037|304 000 011|036|221 042 253                             YE33; SET 9; -; J203<Z;
 1252/0: 042|310 000 250|200 326 030                                         DUP; V0P299; JSP129; (Pch label);
 1253/1: 310 003 036|042|012                                           203;  YE32; DUP; PERM;
 1254/0: 170 362                                                             =M15;
 1254/2: 310 362 376|225 022 261                                             YE0M15; J204=;
 1255/2: 065|304 000 002|056|164 127                                         REV; SET 2; +; SHL 43;
 1256/3: 164 253|042|170 362|311 003 036                                     SHL -43; DUP; =M15; =YE32;
 1257/5: 311 362 376|304 000 001|311 362 377                                 =YE0M15; SET 1; =YE1M15;
 1261/2: 200 260 100                                                         J7;
 1261/5: 310 362 377|304 000 001|056|311 362 377                       204;  YE1M15; SET 1; +; =YE1M15;
 1263/3: 052|052|200 260 100                                                 ERASE; ERASE; J7;

                                                                               (Open, Close  10/10/63);
 1264/2: 310 043 055|200 335 333|205 261 021                           207;  (OPEN); Y13M2; JSP293; J41;
 1265/5: 310 043 055|200 335 200|205 261 021                           208;  (CLOSE); Y13M2; JSP292; J41;

                                                                               (Test 1/11/63);
 1267/2: 310 043 055|042|225 042 271                                   209;  (TEST); Y13M2; DUP; J210<Z;

                                                                       [ okq022.txt

 1270/3: 311 003 037|041|042|203 262 243                                     =YE33; ZERO; DUP; J195;
 1271/5: 052|310 003 037|042|203 262 243                               210;  ERASE; YE33; DUP; J195;

                                                                               (RESTARTS 26/1/64);
 1273/1: 304 000 132|204 262 274                                       212;  SET 90; J200; (EVEN - FOR TIME LIMIT FAIL);
 1274/1: 304 000 133                                                   213;  SET 91; (ODD - BY OPERATOR);
 1274/4: 310 000 250|200 336 247                                       200;  V0P299; JS1P295; (TEST IF FAIL DEV OPEN);
 1275/4: 205 262 276                                                         J201;
 1276/1: 052|200 323 034                                                     ERASE; JSP5;
 1276/5: 052|310 000 250|200 335 333                                   201;  ERASE; V0P299; JSP293;
 1300/0: 200 323 034                                                         JSP5;

                                                                               (Fail at guff left in nest);
 1300/3: 304 000 152|200 323 034                                       214;  SET 106; JSP5;

                                                                               (Format, wrtext 25/11/63);
 1301/3: 310 043 055|200 333 271                                       215;  (F); Y13M2; JSP284;    [ handwritten correction to JSP281 ? ]
 1302/3: 042|203 262 243                                                     DUP; J195;
 1303/1: 310 043 057|310 043 055|200 334 040                           216;  (W); Y15M2; Y13M2; JSP288;
 1304/4: 205 261 021                                                         J41;

                                                                              (Std funcs 25/11/63);
 1305/1: 310 043 055|200 325 040|201 262 236                           217;  (EXP); Y13M2; JSP47; J192;
 1306/4: 310 043 055|200 325 071|201 262 236                           218;  (LN); Y13M2; JSP48; J192;
 1310/1: 310 043 055|200 325 123|201 262 236                           219;  (SIN); Y13M2; JSP49; J192;
 1311/4: 310 043 055|200 325 150|201 262 236                           220;  (COS); Y13M2; JSP50; J192;
 1313/1: 310 043 055|200 324 357|201 262 236                           221;  (SQRT); Y13M2; JSP40; J192;
 1314/4: 310 043 055|200 325 201|201 262 236                           222;  (ARCTAN); Y13M2; JSP51; J192;


                                                                       [ okq023.txt

                                                                             [ This page heavily marked up with pencilled corrections
 1316/1: 310 043 057|310 043 055|200 333 222|205 261 021               223;  (OUTPUT); Y15M2; Y13M2; JSP265; J41;
 1320/1: 201 322 365|200 333 207|205 261 021                           228;  (WRITE BOOLEAN); JS254; JSP289; J41;
 1321/4: 201 322 365|200 331 154|205 261 021                           229;  (TAB); JS254; JSP277; J41;
 1323/1: 201 322 365|200 332 370|205 261 021                           230;  (FIND); JS254; JSP283; J41;
 1324/4: 205 322 361|200 331 327|205 261 021                           231;  (READ BINARY); JS255; JSP280; J41;
 1326/1: 205 322 361|200 332 160|205 261 021                           232;  (READ ARRAY); JS255; JSP282; J41;
 1327/4: 205 322 361|200 331 174|205 261 021                           233;  (WRITE BINARY); JS255; JSP279; J41;
 1331/1: 310 043 065|310 043 063|170 362                               234;  (WRITE ARRAY); Y21M2; Y19M2; =M15;
 1332/3: 310 363 052|204 322 364|200 332 037|205 261 021                      Y10M15; JS256; JSP281; J41;
 1334/3: 201 322 365|200 333 231|205 261 021                           235;  (GAP); JS254; JSP267; J41;
 1336/0: 204 322 364|200 333 127|205 261 021                           236;  (COPY TEXT); JS256; JSP287; J41;
 1337/3: 310 043 055|200 330 315|205 261 021                           237;  (INTERCHANGE); Y13M2; JSP269; J41;
 1341/0: 310 043 055|200 331 102|205 261 021                           238;  (REWIND); Y13M2; JSP271; J41;

                                                                       239;  (DATA SKIP);
 1342/3: 310 043 055|200 330 246|205 261 021                                 Y13M2; JSP268; J41;
 1344/0: 201 322 365|200 331 040|205 261 021                           240;  (SKIP); JS254; JSP270; J41;
 1345/3: 310 043 055|200 331 123|042|203 262 243                       241;  (CHAR IN); Y13M2; JSP273; DUP; J195;
 1347/1: 310 043 055|200 333 123|042|203 262 243                       242;  (IN BASIC SYMBOL); Y13M2; JSP286; DUP; J195;
 1350/5: 201 322 365|200 331 120|205 261 021                           243;  (CHAR OUT);  JS254; JSP272; J41;
 1352/2: 201 322 365|200 333 121|205 261 021                           244;  (OUT BASIC SYMBOL); JS254; JSP285; J41;
 1353/5: 310 043 055|200 331 137|202 262 356                           245;  (BTC); Y13M2; JSP275; J253;
 1355/2: 310 043 055|200 331 125                                       246;  (ETW); Y13M2; JSP274;
 1356/2: 311 043 050|304 000 040|311 043 051|205 261 021               253;  =Y8M2; SETB40; =Y9M2; J41;
 1360/2: 310 043 055|200 333 213|202 262 356                           247;  (READ BOOLEAN); Y13M2; JSP290; J253;
 1361/5: 310 043 061|310 043 057|170 362|310 363 052|310 043 055       255;  Y17M2; Y15M2; =M15; Y10M15; Y13M2;
 1364/1: 200 360 000                                                         EXIT1;
 1364/4: 310 043 061                                                   256;  Y17M2;
 1365/1: 310 043 057|310 043 055|200 360 000                           254;  Y15M2; Y13M2; EXIT1;
 1366/4: 201 322 365|200 331 157|205 261 021                           250;  (SPACE); JS254; JSP278; J41;

                                                                       [ okq024.txt

 1370/1: 201 322 365|200 331 151|205 261 021                           251;  (NEWLINE); JS254; JSP276; J41;

                                                                         (Update DISPLAY 13/3/63);
=== Start P1V-1; at address 762
 1372/0: 170 344|042|171 064|036|225 143 002                           P1;   =I14; DUP; I3; -; J1=Z; (if p= base of stack);
 1373/3: 042|170 362|310 363 053|164 301|170 342                             DUP; =M15; Y11M15; SHL-32; =M14;
 1375/1: 310 342 276|221 023 001                                       3;    YD1M14; J2=; (if d[k]=p);
 1376/1: 311 342 276                                                         =YD1M14;
 1376/4: 310 363 052|164 341|042|170 362                               4;    Y10M15; SHL-16; DUP; =M15;
 1400/0: 041|033|172 342|201 262 375                                         ZERO; NOT; =+M14; J3;
 1401/1: 052|171 342|171 344|036|224 102 376                           2;    ERASE; M14; I14; -; J4>Z;
 1402/4: 041                                                                 ZERO;
 1402/5: 052|200 360 000                                               1;    ERASE; EXIT 1;

                                                                               (RESET PROG COUNTER 20/2/64);
=== Start P2V-1; at address 772
 1404/0: 042                                                           P2;   DUP;
 1404/1: 304 037 377|054                                                     SET B17777; AND;
 1404/5: 170 102|164 347                                                     =M4; SHL -13;
 1405/3: 164 007|304 000 060                                                 SHL 3; SET 48;
 1406/2: 036|027|170 110|200 360 000                                         -; NEG; =C4; EXIT 1;

                                                                               (UPDATE PROG COUNTER 20/2/64);
=== Start P3V-1; at address 776
 1410/0: 042|170 370                                                   P3;   DUP; =C15;
 1410/3: 171 110|036|027                                                     C4; -; NEG;
 1411/1: 170 110                                                             =C4;
 1411/3: 171 136|164 360|170 136                                             Q5; SHLC15; =Q5;
 1412/3: 200 360 000                                                         EXIT 1;

                                                                              (Extract n,p);
=== Start P4V-1; at address 779
 1413/0: 171 136|042                                                   P4;   Q5; DUP;

                                                                       [ okq025.txt

 1413/3: 164 015|164 265                                                     SHL 6; SHL -38; (p,B1);
 1414/1: 042|066                                                             DUP; CAB;
 1414/3: 164 255|170 362                                                     SHL -42; =M15; (n in m15);
 1415/1: 310 362 276|056                                                     YD1M15; +; (D[n]+p,p);
 1415/5: 304 377 360|172 110                                                 SET -16; =+C4; (ADJUST SI);
 1416/4: 065|200 360 000                                                     REV; EXIT 1;
                                                                                (Fail routine 1/1/64);
=== Start P5V11; at address 796
V-store at 01421 = 336 211 164 317 113 356                             P5V11; V1=B6750456463645756;
V-store at 01422 = 224 010 154 236 373 000                                   V2=B4500415447575400;
V-store at 01423 = 216 373 264 312 373 000                                   V3=B4357566462575400;
V-store at 01424 = 000 000 000 000 000 000                                   V4=0;
V-store at 01425 = 317 114 245 206 337 334                                   V5=B6364624541557734;  [ handwritten comment V6=B23203775 0000 0000;
V-store at 01430 = 377 377 003 024 003 026                                   V8=Q-1/AV4/AV6;
V-store at 01431 = 004 020 101 004 242 212                                   V9=B0101010101121212;
V-store at 01432 = 000 000 003 020 003 023                                   V10=Q0/AV0/AV3;
 1434/0: 210 260 266                                                         J1P299;
 1434/3: 300 000 002|164 321|164 061|301 003 033|201 263 037           1;    E2; SHL-24; SHL+24; =V11; J4;
 1436/4: 052|052                                                       2;    ERASE; ERASE;
 1437/0: 052                                                           3;    ERASE;
                                                                       4;    (GET FAIL DEVICE NO.);
 1437/1: 041|301 003 024|300 003 030|304 000 010|200 220 000                 ZERO; =V4; V8; SET8; OUT;
 1441/2: 300 003 026|042|164 031|164 271|304 007 375|015|200 143 037         V6; DUP; SHL+12; SHL-36; SETB3775; NEV; J3≠Z;
 1443/5: 164 271|304 004 020|015|042|300 003 031|065                         SHL -36; SETB2020; NEV; DUP; V9; REV;
 1445/4: 013|042|311 000 250|213 320 141                                     TOB; DUP; =V0P299; JS30P295;
 1447/0: 204 263 036                                                         J2;
 1447/3: 052|164 365|200 360 000                                             ERASE; SHL -6; EXIT 1;


                                                                               (GO 8/3/63);
                                                                       [ okq026.txt

=== Start P6V23; at address 833
V-store at 01451 = 000 000 021 000 000 000
V-store at 01452 = 000 000 051 000 000 040
V-store at 01453 = 000 000 311 000 000 300                             P6V23; V0=B02100000000; V1=B05100000040; V2=B31100000300;
V-store at 01454 = 000 000 111 000 000 100
V-store at 01455 = 000 000 000 000 000 004
V-store at 01471 = 000 000 020 000 000 000                                   V3=B11100000100; V4=B4; V16=B02000000000;
V-store at 01472 = 000 000 050 000 000 000                                   V17=B05000000000;
V-store at 01473 = 000 000 310 000 000 000
V-store at 01474 = 000 000 110 000 000 006
V-store at 01476 = 000 000 000 000 000 044                                   V18=B31000000000; V19=B11000000006; V21=B44;
V-store at 01477 = 000 000 000 000 000 304
V-store at 01500 = 000 000 000 000 000 104                                   V22=B304; V23=B104;
 1501/0: 170 350|154 343                                                     =C14; C14TOQ3; (set m and m1);
 1501/4: 171 042|042|170 322|170 364                                         M2; DUP; =M13; =I15; (PP in M13=h2[S[Ap]],q in I15);
 1502/5: 151 022                                                             M1TOQ2; (PP := AP);
 1503/1: 200 323 172|170 305                                                 JSP8; =RI12; (i in I12=h1[S[pp+2]]);
 1504/0: 240 343 112                                                         J8C14Z; (if m=0);
 1504/3: 154 357                                                             C14TOQ15;
 1504/5: 304 000 001|172 370                                                 SET 1; =+C15; (m := m+1);
 1505/4: 171 110|304 000 040|056|042|304 000 060|036                   1;    C4; SET 32; +; DUP; SET 48; -;
 1507/3: 042|204 103 110                                                     DUP; J2≤Z;
 1510/1: 065|141 100                                                         REV; M-I4;
 1510/4: 052|170 110|143 360|264 363 105                               2;    ERASE; =C4; DC15; J1C15NZ; (if m≠0);
 1512/0: 171 350|161 003|042                                           8;    C14; SHA 1; DUP;
 1512/5: 033|027|172 022                                                     NOT; NEG; =+M1; (AP := AP+2m+1);
 1513/3: 304 000 003|056|027|172 030|171 030                                 SET 3; +; NEG; =+C1; C1; (XS := XS-3-2m);
 1515/0: 225 043 116                                                         J98<Z;
 1515/3: 265 343 117|171 364                                           3;    J4C14NZ; I15; (q);
 1516/2: 200 360 000                                                         EXIT 1;
 1516/5: 304 000 001|200 323 034                                       98;   SET 1; JSP5; (Stack overflow);
 1517/5: 171 110|225 103 121                                           4;    C4; J13>Z;
 1520/4: 140 100|304 000 060|172 110                                         M + I4; SET 48; =+C4;
 1521/5: 304 377 370|172 110|110 103|100 103|142 100|166 100|142 100   13;   SET -8; =+C4; M3M4N; M3M4; NC4; SHLDC4; NC4;
 1524/2: 065|170 136                                                         REV; =Q5;

 1524/5: 304 000 377|054|304 377 350|172 110                                 SET B377; AND; SET -24; =+C4;

                                                                       [ okq027.txt

 1526/2: 042|170 330|042                                                     DUP; =C13; DUP; (PAR,PAR);
 1527/0: 304 000 002|054|201 143 140                                         SET B2; AND; J6≠Z; (if not [n,p]);
 1530/1: 042|304 000 054|054|221 143 140                                     DUP; SET B54; AND; J6=Z;
 1531/3: 200 323 013|052                                                     JSP4; ERASE; (s,PAR);
 1532/1: 304 000 020|172 110                                                 SET16; =+C4;
 1533/0: 065|304 000 241|036|222 143 135                                     REV; SET B241; -; J5=Z; (if PF);(s);
 1534/2: 311 023 052|205 263 146                                             =Y10M1; J7;
 1535/2: 170 362                                                       5;    =M15;
 1535/4: 310 363 052|311 023 052|310 363 053|311 023 053|201 263 152         Y10M15; =Y10M1; Y11M15; =Y11M1; J9;
 1540/1: 171 136|164 301|065                                           6;    Q5; SHL -32; REV; (PAR,b);
 1541/0: 042|304 000 122|054                                                 DUP; SET B122; AND;
 1541/5: 304 000 002|036|222 143 153                                         SET B2; -; J10=Z; (if PRC,PIC,PBC);
 1543/0: 042|304 000 303|036|221 143 163                                     DUP; SET B303; -; J12=Z; (if PST);
 1544/2: 304 000 301|036|225 143 157                                         SET B301; -; J11=Z; (if PL);
 1545/3: 171 364|164 041|056|311 023 052                                     I15; SHL 16; +; =Y10M1;
 1546/5: 304 003 051|170 262|171 330|164 123|164 255|170 362           7;    SET AV0; =M11; C13; SHL 41; SHL -42; =M15;
 1551/0: 104 373|164 321|311 023 053                                         M11M15H; SHL -24; =Y11M1;
 1552/1: 141 020|143 340|203 263 115                                   9;    M-I1; DC14; J3;
 1553/2: 052|042|304 037 377|054                                       10;   ERASE;DUP; SET B17777; AND;
 1554/2: 170 262|164 347|164 007|170 270                                     =M11; SHL -13; SHL 3; =C11;
 1555/4: 110 263|100 263                                                     M3M11N; M3M11;
 1556/2: 166 260|311 023 052|052                                             SHLDC11; =Y10M1; ERASE; (Set const);
 1557/2: 205 263 146                                                         J7;
 1557/5: 171 136|164 041|164 261                                       11;   Q5; SHL 16; SHL -40;
 1560/5: 170 262|310 262 276|164 041|056                                     =M11; YD1M11; SHL 16; +; (D[n]/b);
 1562/1: 311 023 052|205 263 146                                             =Y10M1; J7;
 1563/1: 052|304 023 043|056|311 023 052|205 263 146                   12;   ERASE; SET AY3; +; =Y10M1; J7;

                                                                               (Augment and pack i 5/3/63);

                                                                       [ okq028.txt

=== Start P7V-1; at address 885
 1565/0: 171 110|027|056                                               P7;   C4; NEG; +; (8*[SI+N-6]);
 1565/4: 042|225 103 170                                                     DUP; J2>Z;
 1566/2: 304 000 060|056|041                                                 SET 48; +; ZERO;
 1567/1: 065|164 025|171 102|056|056                                   1;    REV; SHL 10; M4; +; +; (i);
 1570/2: 200 360 000                                                         EXIT 1;
 1570/5: 304 000 001|201 263 167                                       2;    SET 1; J1;

                                                                               (PACK I 24/2/64);
=== Start P8V-1; at address 890
 1572/0: 171 110|027                                                   P8;   C4; NEG;
 1572/3: 042|224 103 175                                                     DUP; J2>Z; (IF S(I) HAS SPILT);
 1573/1: 304 000 060|056|041                                                 SET 48; +; ZERO;
 1574/0: 065|164 025                                                   1;    REV; SHL 10;
 1574/3: 171 102|056|056                                                     M4; +; +;
 1575/1: 200 360 000                                                         EXIT 1;
 1575/4: 304 000 001|200 263 174                                       2;    SET 1; J1;

                                                                               (Leave 13/3/63);
=== Start P9V-1; at address 895
 1577/0: 171 022|171 042|036|172 030                                   P9;   M1; M2; -; =+C1; (XS:=XS-[PP-AP]);
 1600/1: 151 041                                                             M2TOQ1; (AP:=PP);
 1600/3: 310 043 052|170 376                                                 Y10M2; =Q15;
 1601/2: 151 362|171 042|310 023 053|164 301                                 M15TOQ2; M2; Y11M1; SHL-32; (s1[S[AP+1]],PP);
 1602/5: 200 322 372                                                         JSP1; (UDD);
 1603/2: 200 360 000                                                         EXIT 1;

                                                                               (Store 13/3/63);
=== Start P10V-1; at address 900
 1604/0: 310 023 050|310 023 051|042|304 000 037|043                   P10;  Y8M1; Y9M1; DUP; SET B37; DUPD;
 1605/5: 054|170 365                                                         AND; =RI15; (alg res error);
 1606/2: 310 023 047|042|012|054|304 000 010|015|170 370                     Y7M1; DUP; PERM; AND; SET B10; NEV; =C15; (alg add error);
 1610/2: 042|170 356|015|042                                                 DUP; =Q14; NEV; DUP;

                                                                       [ okq029.txt

 1611/1: 304 000 140|054|171 376|056                                         SET B140; AND; Q15; +;  (sum errors);
 1612/2: 304 000 004|065|204 143 227                                         SET 4; REV; J99≠Z;
 1613/3: 052|310 023 046|170 362                                             ERASE; Y6M1; =M15; (X in M15);
 1614/3: 304 000 200|054|223 143 222                                         SET B200; AND; J3=Z;
 1615/4: 304 000 300|036|223 143 220                                         SET B300; -; J1=Z;
 1616/5: 304 000 057|024|304 000 300|203 263 222                             SET 47; FLOAT; SET B300; J3;
 1620/3: 200 323 231|304 000 006|204 263 227                           1;    JSP11; SET 6; J99; (Fix);
 1622/0: 304 000 100                                                         SET B100;
 1622/3: 065|043|311 363 052                                           3;    REV; DUPD; =Y10M15; (S[X]:=Y);
 1623/2: 171 356|304 001 000|054|223 143 225                                 Q14; SET B400; AND; J4=Z;
 1624/5: 311 363 053|041                                                     =Y11M15; ZERO;
 1625/3: 052|304 000 004|042|172 030|027|172 022|200 360 000           4;    ERASE; SET 4; DUP; =+C1; NEG; =+M1; EXIT 1;

 1627/4: 200 323 034                                                   99;   JSP5;

                                                                               (Fix 10/4/63);
=== Start P11V-1; at address 921
 1631/0: 045|042|220 043 235                                           P11;  FIX; DUP; J1<Z; (if p<0);
 1631/5: 042|304 000 047|036|220 103 236                                     DUP; SET 39; -; J2>Z; (if x>2^39);
 1633/1: 304 000 057|036|170 370                                             SET 47; -; =C15;
 1634/1: 161 360|200 360 001                                                 SHAC15; EXIT3;
 1635/0: 052|052|041|200 360 001                                       1;    ERASE; ERASE; ZERO; EXIT3;
 1636/0: 200 360 000                                                   2;    EXIT1;

                                                                               (Prog switch 8/3/63);
=== Start P12V-1; at address 927
 1637/0: 167 377|042|173 000|056|174 000|222 043 241                   P12;  SHC -1; DUP; LINK; +; =LINK; J1<Z;
 1640/5: 200 360 000                                                         EXIT 1;
 1641/2: 202 360 001                                                   1;    EXIT 2;

                                                                               (GO FORMAL 18/3/63);

                                                                       [ okq030.txt

=== Start P13V-1; at address 930
 1642/0: 200 323 101                                                   P13;  JSP6; (GO);
 1642/3: 170 362|310 363 053|164 301                                         =M15; Y11M15; SHL-32;
 1643/4: 200 322 372|200 323 004                                             JSP1; (UDD); JSP2; (Reset i);
 1644/4: 171 316|056|311 043 054|200 360 000                                 Q12; +; =Y12M2; EXIT 1;

                                                                               (Take formal 18/3/63);
=== Start P14V-1; at address 935
 1647/0: 170 362                                                       P14;  =M15;
 1647/2: 140 020|143 020|143 020|171 030|225 043 260                         M+I1; DC1; DC1; C1; J3<Z; (if st overflow);
 1651/1: 310 363 053|042|304 000 004|054|205 143 255                         Y11M15; DUP; SET B4; AND; J2≠Z; (if isr or p);
 1653/0: 304 001 374|054|311 023 051                                   1;    SET B774; AND; =Y9M1; (S[AP+1]:=mask[S[S+1]]);
 1654/1: 310 363 052|311 023 050|052|202 360 001                             Y10M15; =Y8M1; ERASE; EXIT 2;
 1655/5: 052|041|310 363 052|166 341|065|164 301|065|041               2;    ERASE;ZERO; Y10M15; SHLD-16; REV; SHL-32; REV; ZERO; (o,P,a,LINK);
 1657/5: 200 323 242                                                         JSP13; (GO FORMAL);
 1660/2: 200 360 000                                                         EXIT 1;
 1660/5: 304 000 001|200 323 034                                       3;    SET 1; JSP5;

                                                                               (COND TAKE 22/4/63);
=== Start P15V-1; at address 946
 1662/0: 310 023 051|042|304 000 020|054|225 143 264                   P15;  Y9M1; DUP; SET B20; AND; J1=Z; (unless l or s);
 1663/5: 304 000 011|200 323 034                                             SET 9; JSP5;
 1664/5: 304 000 010|043|054|221 143 271                               1;    SET B10; DUPD; AND; J2=Z; (unless a a);
 1666/1: 310 023 050|170 362|310 363 052|311 023 050                         Y8M1; =M15; Y10M15; =Y8M1;
 1670/0: 036|311 023 051|200 360 000                                         -; =Y9M1; EXIT 1;
 1671/1: 052|052|200 360 000                                           2;    ERASE; ERASE; EXIT1;

                                                                                     (Make St Func 8/5/63);
=== Start P16V0; at address 955
V-store at 01672 = 000 012 000 012 000 012
 1673/0: 200 323 013|052|171 136                                       P16V0; V0=Q10/10/10; JSP4; ERASE; Q5;
 1674/0: 164 041|164 261|304 000 010|200 323 010|051                         SHL 16; SHL-40; SET 8; JSP3; REVD;
 1675/5: 042|170 323|170 264|042                                             DUP; =RM13; =I11; DUP; (0/1/y in Q13);
 1676/5: 171 022|036|027|164 375|170 270|170 262                             M1; -; NEG; SHL -2; =C11; =M11;   (N/y/w in Q11);

                                                                       [ okq031.txt

                                                                       [ page 31

 1700/3: 157 276|304 000 004|170 344                                           Q11TOQ14; SET 4; =I14;   (N/4/w IN Q14);
 1701/4: 041|170 316|304 000 001                                               ZERO; =Q12; SET 1;
 1702/4: 042|310 343 052|310 343 053|304 000 100|224 023 307           1;      DUP; Y10M14; Y11M14; SET B100; J2=;  (if i r);
 1704/5: 304 000 300|203 023 334                                               SET B300; J7≠;   (fail);
 1705/5: 052|200 323 231|304 000 042|200 323 034|041                           ERASE; JSP11; SET 34; JSP5; ZERO;
 1707/4: 052|042|310 343 054|312 343 055|304 000 100|225 023 314       2;      ERASE; DUP; Y12M14; Y13M14Q; SET B100; J3=;   (if i r);
 1712/0: 304 000 300|203 023 334                                               SET B300; J7≠;   (fail);
 1713/0: 052|200 323 231|304 000 042|200 323 034|041                           ERASE; JSP11; SET 34; JSP5; ZERO;
 1714/5: 052|065|036|042|223 043 335                                   3;      ERASE; REV; -; DUP; J8<Z;   (fail);
 1716/0: 304 000 001|056|012|034|050|172 316                                   SET 1; +; PERM; ×D; CONT; =+Q12;
 1717/3: 034|050|243 343 321                                                   ×D; CONT; J4C14Z;   (if j=N-1);
 1720/2: 042|313 323 053|204 263 302                                           DUP; =Y11M13Q; J1;
 1721/3: 042|171 270|042|152 276                                       4;      DUP; C11; DUP; I11TOQ14;    (-/y/- in Q14);
 1722/3: 171 264|042|170 362|056|042|171 316|036|170 342|170 350               I11; DUP; =M15; +; DUP; Q12; -; =M14; =C14;
 1724/5: 304 000 012|042|172 350|042|172 344|172 342                           SET10; DUP; =+C14; DUP; =+I14; =+M14;
 1726/4: 164 041|056|311 363 052                                               SHL 16; +; =Y10M15;
 1727/4: 012|170 370|170 362|145 360                                           PERM; =C15; =M15; I15= -1;
 1730/5: 042|164 101|056                                                       DUP; SHL 32; +;
 1731/3: 245 363 333|171 356|313 363 052|042|172 356|203 263 331       5;      J6C15Z; Q14; =Y10M15Q; DUP; =+Q14; J5;
 1733/5: 052|200 360 000                                               6;      ERASE; EXIT 1;
 1734/3: 304 000 040|200 323 034                                       7;      SET 32; JSP5;
 1735/3: 304 000 041|200 323 034                                       8;      SET 33; JSP5;

                                                                                  (Indexer 10/5/63);
=== Start P17V-1; at address 991
 1737/0: 041|170 351                                                   P17;    ZERO; =RC14;
 1737/3: 310 023 051|304 000 100|203 023 343                           1;      Y9M1; SET B100; J3≠;
 1741/0: 052|171 344|172 350|304 000 002|172 030|141 020|203 263 337   2;      ERASE; I14; =+C14; SET 2; =+C1; M-I1; J1;
 1743/3: 304 000 300|205 023 347                                       3;      SET B300; J4≠;
 1744/3: 052|310 023 050|200 323 231|304 000 043|200 323 034|311 023 050|041|200 263 341
                                                                               ERASE; Y8M1; JSP11; SET 35; JSP5; =Y8M1; ZERO; J2;
                                                                                   [ ^ Handwritten annotation "SETB100; =Y9M1" after ERASE; ]

                                                                       [ okq032.txt

                                                                       [ page 32

 1747/5: 042|304 000 020|054|203 143 372                               4;      DUP; SET B20; AND; J9≠Z;    (if sw:f sw);
 1751/1: 304 000 010|054|202 143 353|304 000 044|200 323 034                   SET B10; AND; J5≠Z; SET 36; JSP5;
 1753/2: 310 023 050|170 362|310 363 052|170 336|171 350|143 340       5;      Y8M1; =M15; Y10M15; =Q13; C14; DC14;
 1755/4: 144 340|171 324|170 342                                               I14=1; I13; =M14;
 1756/4: 151 037|146 360|310 343 040|041|166 101                               M1TOQ15; I15=2;Y0M14; ZERO; SHLD 32;
 1760/2: 066|036|203 143 370                                                   CAB; -; J7≠Z;  (if n≠h2[s[w]]);
 1761/1: 164 301|171 322|310 023 052|056                                       SHL -32; M13; Y10M1; +;
 1762/3: 240 343 365|312 363 054|312 343 041|034|050|056|203 263 362   6;      J10C14Z; Y12M15Q; Y1M14Q; ×D; CONT; +; J6;
 1765/0: 164 101|164 301|042|171 330|036                               10;     SHL 32; SHL -32; DUP; C13; -;
 1766/2: 066|065|042|223 043 371                                               CAB; REV; DUP; J8<Z;   (if 0≥A-W);
 1767/2: 036|203 103 371                                                       -; J8≤Z;   (if A-W≥h1[s[w]]);
 1770/0: 202 360 001                                                           EXIT 2;
 1770/3: 304 000 045|200 323 034                                       7;      SET 37; JSP5;
 1771/3: 304 000 046|200 323 034                                       8;      SET 38; JSP5;  [ Handwritten annotation to insert "M+I15; M15TOQ1"? before SET 38]
 1772/3: 171 030|304 000 004|036|220 044 000                           9;      C1; SET 4; -; J98<Z;
 1774/0: 310 023 052|311 023 055                                               Y10M1; =Y13M1;
 1775/0: 310 023 050|041|166 101|065|164 301|065                               Y8M1; ZERO; SHLD 32; REV; SHL -32; REV;
 1776/4: 066|304 000 004|054|200 360 000                                       CAB; SET B4; AND; EXIT 1;
 2000/0: 304 000 001|200 323 034                                       98;     SET 1; JSP5;

                                                                                  (Copy Array 16/5/63);
=== Start P18V-1; at address 1025
 2001/0: 310 343 052|170 322|310 323 052|170 336                       P18;    Y10M14; =M13; Y10M13; =Q13;  (W/w/b in Q13);
 2002/4: 171 324|170 302|310 303 040|164 101|164 301|042|170 271               I13; =M12; Y0M12; SHL 32; SHL -32; DUP; =RC11;
 2005/0: 310 043 053|164 041|164 301|304 000 012|056|042|170 262               Y11M2; SHL 16; SHL -32; SET 10; +; DUP; =M11;    (m/1/W1 in Q11);
 2007/2: 171 330|170 303                                                       C13; =RM12;   (0/1/W in Q12);
 2010/0: 066                                                                   CAB;
 2010/1: 242 264 017                                                   1;      J5C11Z; (if j=m);
 2010/4: 312 303 040|065|042|225 104 013                                       Y0M12Q; REV; DUP; J3>Z;  (if C=1);
 2012/0: 042|221 044 015                                                       DUP; J4<Z;  (if C=-1);

                                                                       [ okq033.txt

                                                                       [ page 33

 2012/4: 065                                                                   REV;
 2012/5: 313 263 040|201 264 010                                       2;      =Y0M11Q; J1;
 2013/5: 065|304 000 057|024|205 264 012                               3;      REV; SET 47; FLOAT; J2;
 2015/1: 065|200 323 231|304 000 047|200 323 034|205 264 012           4;      REV; JSP11; SET 39; JSP5; J2;      [h/w Last line of putative deletion
 2017/2: 052|042                                                       5;      ERASE; DUP;
 2017/4: 012|056|304 000 012|036|042|171 022|036                       6;      PERM; +; SET 10; -; DUP; M1; -;
 2021/2: 027|172 030|171 030|221 044 030                                       NEG; =+C1; C1; J98<Z;
 2022/4: 042|170 022|012                                                       DUP; =M1; PERM;
 2023/2: 042|171 330|036|172 322|170 330                                       DUP; C13; -; =+M13; =C13;  (W1/w/b+W1-W in q13);
 2024/4: 171 336|311 343 052                                                   Q13; =Y10M14;
 2025/3: 304 000 002|056|170 276|170 264|171 276|311 043 053|200 360 000
                                                                               SET 2; +; =Q11; =I11; Q11; =Y11M2; EXIT 1;
 2030/1: 304 000 001|200 323 034                                       98;     SET 1; JSP 5;

                                                                                  (Type change  29/5/63);
=== Start P19V-1; at address 1050
 2032/0: 001|043|011                                                   P19;    VR; DUP D; OR;
 2032/3: 012|054|304 000 300|065|205 024 034                                   PERM; AND; SET B300; REV; J1≠;  (unless both r);
 2034/0: 052|052|202 360 001                                                   ERASE; ERASE; EXIT 2;
 2034/5: 065|304 000 100|205 024 036                                   1;      REV; SET B100; J2≠;   (unless both i);
 2036/0: 052|052|200 360 000                                                   ERASE; ERASE; EXIT 1;
 2036/5: 221 024 040                                                   2;      J3=;  (if ≠ legal);
 2037/2: 052|066|200 323 034                                                   ERASE; CAB; JSP5;
 2040/1: 310 023 047|203 024 042                                       3;      Y7M1; J4≠;  (if X= r);
 2041/1: 052|304 000 057|024|202 360 001                                       ERASE; SET 47; FLOAT; EXIT 2;
 2042/3: 311 023 047|065|304 000 057|024|065|202 360 001               4;      =Y7M1; REV; SET 47; FLOAT; REV; EXIT 2;

                                                                                  (Relation   29/5/63);
=== Start P20V-1; at address 1061
 2045/0: 310 023 046|310 023 050|310 023 047|310 023 051|200 324 032   P20;    Y6M1; Y8M1; Y7M1; Y9M1;JSP19;
 2047/3: 203 264 052                                                           J2;   (i);
 2050/0: 075|224 204 053                                                       -F; J3V;

                                                                       [ okq034.txt

                                                                       [ page 34

 2050/4: 065|052|304 000 040|311 023 047|200 360 000                   1;      REV; ERASE; SET B40; =Y7M1; EXIT 1;
 2052/3: 036|224 204 053|204 264 050                                   2;      -; J3V; J1;
 2053/4: 052|304 000 011|056|200 323 034                               3;      ERASE; SET 9; +; JSP5;
                                                                                  (Power  1/7/63);
=== Start P21V0; at address 1070
V-store at 02055 = 100 300 000 000 000 000                             P21V0;  V0 = F1.0;
 2056/0: 001|304 000 100|036|201 144 070                                       VR; SET B100; -; J5≠Z;  (if not i);
 2057/2: 304 000 001|065|042|220 144 065                                       SET 1; REV; DUP; J3=Z;  (if Y=0);
 2060/4: 042|167 377|204 044 062                                       1;      DUP; SHC -1; J2≥Z;  (if even);
 2061/4: 012|043|052|034|050|066                                               PERM; DUPD; ERASE; ×D; CONT; CAB;
 2062/4: 164 377|042|220 144 065                                       2;      SHL -1; DUP; J3=Z;  (if Y=0);
 2063/4: 066|042|034|050|012|204 264 060                                       CAB; DUP; ×D; CONT; PERM; J1;
 2065/0: 052|065|052|042|161 021                                       3;      ERASE; REV; ERASE; DUP; SHA 8;
 2066/0: 052|204 204 067                                                       ERASE; J4NV;  (unless o fl);
 2066/4: 304 000 123|200 323 034                                               SET 83; JSP5;
 2067/4: 202 360 001                                                   4;      EXIT 2;
 2070/1: 300 004 055|065|042|223 144 075                               5;      V0; REV; DUP; J8=Z;  (if Y=0);
 2071/3: 042|167 377|202 044 073                                       6;      DUP; SHC -1; J7≥Z;  (if even);
 2072/3: 012|043|052|004|066                                                   PERM; DUPD; ERASE; ×F; CAB;
 2073/2: 164 377|042|223 144 075                                       7;      SHL -1; DUP; J8=Z;  (if Y=0);
 2074/2: 066|042|004|012|203 264 071                                           CAB; DUP; ×F; PERM; J6;
 2075/3: 052|065|052|203 204 077                                       8;      ERASE; REV; ERASE; J9NV;  (unless o fl );
 2076/3: 304 000 123|200 323 034                                               SET 83; JSP5;
 2077/3: 200 360 000                                                   9;      EXIT 1;

                                                                                   (Exponentiate  1/7/63);
=== Start P22V0; at address 1089
V-store at 02100 = 100 300 000 000 000 000                             P22V0;  V0 = F1.0;
 2101/0: 310 023 046|310 023 047|042|304 000 077|054|222 144 104               Y6M1; Y7M1; DUP; SET B77; AND; J2=Z;  (if arith);
 2103/2: 304 000 117|200 323 034                                       1;      SET 79; JSP5;
 2104/2: 310 023 051|304 000 300|200 024 121                           2;      Y9M1; SET B300; J7≠;   (unlessM2=R);

                                                                       [ okq035.txt

                                                                       [ page 35

 2105/5: 052|304 000 100|036|205 144 110                                       ERASE; SET B100; -; J3≠Z;
 2107/1: 304 000 057|024|304 000 300|311 023 047                               SET 47; FLOAT; SET B300; =Y7M1;
 2110/5: 042|205 104 114                                               3;      DUP; J4≤Z;  (unlessX>0);
 2111/3: 200 325 071|310 023 050|001|004|200 325 040|200 204 142               JSP48; Y8M1; VR; ×F; JSP47; J13NV;
 2113/5: 304 000 153|200 323 034                                               SET 107; JSP5;
 2114/5: 222 144 116                                                   4;      J5=Z;  (if X=0);
 2115/2: 304 000 120|200 323 034                                               SET 80; JSP5;
 2116/2: 310 023 050|222 104 120                                       5;      Y8M1; J6>Z;  (unless Y≤0);                     [ orignal was: 5;      Y9M1; J6>Z;  (unless Y≤0);
                                                                                                                               [ bug that was corrected in a later release
 2117/2: 304 000 121|200 323 034                                               SET 81; JSP5;
 2120/2: 041|200 264 142                                               6;      ZERO; J13;
 2121/0: 304 000 100|036|202 144 103                                   7;      SET B100; -; J1≠Z;  (unless ar);
 2122/1: 310 023 050|042|202 144 130                                           Y8M1; DUP; J10≠Z;  (unless Y=0);
 2123/2: 052|065|201 144 125                                                   ERASE; REV; J8≠Z;   (unless X=0);
 2124/1: 304 000 122|200 323 034                                               SET 82; JSP5;
 2125/1: 304 000 100|036|222 144 127                                   8;      SET B100; -; J9=Z;  (if i);
 2126/2: 300 004 100|200 264 142                                               V0; J13;
 2127/2: 304 000 001|200 264 142                                       9;      SET 1; J13;
 2130/2: 042|204 104 132                                               10;     DUP; J11≤Z;  (unless Y>0);
 2131/0: 065|200 324 056|200 264 142|200 264 142                               REV; JSP21; J13; J13;
 2132/4: 027|065|042|304 000 100|036|204 144 136                       11;     NEG; REV; DUP; SET B100; -; J12≠Z; (IF REAL);
 2134/2: 052|065|304 000 057|024|065                                           ERASE; REV; SET 47; FLOAT; REV;
 2135/3: 304 000 300|042|311 023 047                                           SET B300; DUP; =Y7M1;
 2136/4: 200 324 056|017|017|017|300 004 100|065|062|200 204 142       12;     JSP21; DUMMY; DUMMY; DUMMY; V0; REV; ÷F; J13NV;
 2141/0: 304 000 124|200 323 034                                               SET 84; JSP5;
 2142/0: 311 023 046|200 360 000                                       13;     =Y6M1; EXIT 1;

                                                                                  (Stack nests, etc.,  11/7/63);
=== Start P23V0; at address 1124
 2144/0: 301 004 143|173 000|311 023 046                               P23V0;  =V0; LINK; =Y6M1;
 2145/2: 310 023 050|170 111|151 024|145 100                                   Y8M1; =RC4; M1TOQ4; I4=-1;

                                                                       [ okq036.txt

                                                                       [ page 36

 2146/5: 243 104 165                                                           J1C4Z;
 2147/2: 171 376|313 103 043|243 104 165                                       Q15; =Y3M4Q; J1C4Z;
 2150/4: 171 356|313 103 043|243 104 165                                       Q14; =Y3M4Q; J1C4Z;
 2152/0: 171 336|313 103 043|243 104 165                                       Q13; =Y3M4Q; J1C4Z;
 2153/2: 171 316|313 103 043|243 104 165                                       Q12; =Y3M4Q; J1C4Z;
 2154/4: 171 276|313 103 043|243 104 165                                       Q11; =Y3M4Q; J1C4Z;
 2156/0: 171 256|313 103 043|243 104 165                                       Q10; =Y3M4Q; J1C4Z;
 2157/2: 171 236|313 103 043|243 104 165                                       Q 9; =Y3M4Q; J1C4Z;
 2160/4: 171 216|313 103 043|243 104 165                                       Q 8; =Y3M4Q; J1C4Z;
 2162/0: 171 176|313 103 043|243 104 165                                       Q 7; =Y3M4Q; J1C4Z;
 2163/2: 171 156|313 103 043|243 104 165                                       Q 6; =Y3M4Q; J1C4Z;
 2164/4: 171 136|313 103 043                                                   Q 5; =Y3M4Q;
 2165/3: 222 304 167|173 000|313 103 043|203 264 165                   1;      J2EJ; LINK; =Y3M4Q; J1;
 2167/2: 171 110|027|311 023 044                                       2;      C4; NEG; =Y4M1;
 2170/2: 041|170 110                                                           ZERO; =C4;
 2170/5: 222 244 172|313 103 043|205 264 170                           3;      J4EN; =Y3M4Q; J3;
 2172/2: 171 110|027|311 023 045                                       4;      C4; NEG; =Y5M1;
 2173/2: 300 004 143|310 023 047|056|170 116                                   V0; Y7M1; +; =Q4;
 2174/5: 151 117|304 000 060|171 110|036|170 370                               M4TOQ15; SET 48; C4; -; =C15;
 2176/3: 110 363|100 363|166 360|170 136|170 156                               M3M15N; M3M15; SHLDC15; =Q5; =Q6;
 2200/1: 200 260 100                                                           J7P0;

                                                                                 (Jump  call by name  16/7/63);
=== Start P24V-1; at address 1153
 2201/0: 170 116|310 023 047|172 116                                   P24;    =Q4; Y7M1; =+Q4;
 2202/1: 202 244 207|173 000                                                   J1NEN; LINK;
 2203/0: 202 304 207|174 000                                                   J1NEJ; =LINK;
 2203/5: 304 000 060|171 110|036|170 370                                       SET 48; C4; -; =C15;
 2205/1: 110 363|100 363|166 360|170 136|170 156                               M3M15N; M3M15; SHLDC15; =Q5; =Q6;
 2206/5: 200 260 100                                                           J7P0;

                                                                       [ okq037.txt

                                                                       [ page 37

 2207/2: 304 000 126|200 323 034                                       1;      SET 86; JSP5;

                                                                                  (Jump  call by value  16/7/63);
=== Start P25V-1; at address 1161
 2211/0: 140 020|143 020|143 020                                       P25;    M+I1; DC1; DC1;
 2212/0: 171 030|220 044 216                                                   C1; J1<Z;
 2212/5: 311 023 051|311 023 050                                               =Y9M1; =Y8M1;
 2213/5: 200 244 217|173 000                                                   J2NEN; LINK;
 2214/4: 200 304 217|174 000                                                   J2NEJ; =LINK;
 2215/3: 200 261 044                                                           J46P0;  (JUMP TO GTA);
 2216/0: 304 000 126|200 323 034                                       1;      SET 86; JSP5;
 2217/0: 304 000 001|200 323 034                                       2;      SET 1; JSP5;
 2220/0: 200 324 220                                                   18;     JS18;  (PUT IN TO FIND WHAT CALLS THIS LABEL);

                                                                                  (EXIT    11/7/63);
=== Start P26V-1; at address 1169
 2221/0: 220 244 222                                                   P26;    J1EN;
 2221/3: 311 043 050                                                           =Y8M2;
 2222/0: 205 244 226|173 000                                           1;      J2NEN; LINK;
 2222/5: 205 304 226|174 000                                                   J2NEJ; =LINK;
 2223/4: 310 043 054|042                                                       Y12M2; DUP;
 2224/2: 164 341|144 100                                                       SHL -16; I4=1;
 2225/0: 200 323 004                                                           JSP2;
 2225/3: 174 000                                                               =LINK;
 2225/5: 200 323 177                                                           JSP9;
 2226/2: 202 360 000                                                           EXIT;
 2226/5: 304 000 125|200 323 034                                       2;      SET 85; JSP5;

                                                                                 (Reset nests, etc.,  11/7/63);
=== Start P27V0; at address 1177
 2231/0: 171 024|172 030|141 020                                       P27V0;  I1; =+C1; M-I1;
 2232/0: 310 023 050|170 111|151 024|145 100                                   Y8M1; =RC4; M1TOQ4; I4=-1;

                                                                       [ okq038.txt

                                                                       [ page 38

 2233/3: 241 104 252                                                           J1C4Z;
 2234/0: 312 103 043|170 376|241 104 252                                       Y3M4Q; =Q15; J1C4Z;
 2235/2: 312 103 043|170 356|241 104 252                                       Y3M4Q; =Q14; J1C4Z;
 2236/4: 312 103 043|170 336|241 104 252                                       Y3M4Q; =Q13; J1C4Z;
 2240/0: 312 103 043|170 316|241 104 252                                       Y3M4Q; =Q12; J1C4Z;
 2241/2: 312 103 043|170 276|241 104 252                                       Y3M4Q; =Q11; J1C4Z;
 2242/4: 312 103 043|170 256|241 104 252                                       Y3M4Q; =Q10; J1C4Z;
 2244/0: 312 103 043|170 236|241 104 252                                       Y3M4Q; =Q 9; J1C4Z;
 2245/2: 312 103 043|170 216|241 104 252                                       Y3M4Q; =Q 8; J1C4Z;
 2246/4: 312 103 043|170 176|241 104 252                                       Y3M4Q; =Q 7; J1C4Z;
 2250/0: 312 103 043|170 156|241 104 252                                       Y3M4Q; =Q 6; J1C4Z;
 2251/2: 312 103 043|170 136                                                   Y3M4Q; =Q 5;
 2252/1: 310 023 045|170 110|171 110|027|304 000 001|056|172 102       1;      Y5M1; =C4; C4; NEG; SET 1; +; =+M4;
 2254/3: 310 023 044|027|172 102|144 100                                       Y4M1; NEG; =+M4; I4=1;
 2255/5: 242 104 257|312 103 043|205 264 255                           2;      J3C4Z; Y3M4Q; J2;
 2257/2: 310 023 044|170 110|173 000|301 004 230                       3;      Y4M1; =C4; LINK; =V0;
 2261/0: 245 104 262|312 103 043|174 000|200 264 261                   4;      J5C4Z; Y3M4Q; =LINK; J4;
 2262/5: 300 004 230|174 000                                           5;      V0; =LINK;
 2263/4: 200 360 000                                                           EXIT 1;

=== Start P28V-1; at address 1205
 2265/0: 310 043 061|310 043 057|310 043 055                           P28;    Y17M2; Y15M2; Y13M2;
 2266/3: 200 334 154|200 360 000                                               JSP291; EXIT 1;

=== Start P29V-1; at address 1208
 2270/0: 310 043 055|200 336 057|200 360 000                           P29;    Y13M2; JSP294; EXIT 1;

                                                                                  (Print char  13/9/63);
=== Start P30V0; at address 1211
 2273/0: 301 004 272                                                   P30V0;  =V0;
 2273/3: 304 004 272|042|170 362|170 370                                       SET AV0; DUP; =M15; =C15;
Warning: YA2 is out of range, only 0 YA-stores specified
 2274/5: 310 002 277|170 370                                                   YA2; =C15;

                                                                       [ okq039.txt

                                                                       [ page 39

 2275/4: 130 370                                                               PWCQ15;
 2276/0: 200 360 000                                                           EXIT 1;

                                                                                  (RET TRACE AND P-DIGIT  24/1/64);
=== Start P31V7; at address 1223
V-store at 02277 = 000 037 377 014 071 261                             P31V7;  V0=B0001777703034661;  (REAL FORMAT);
V-store at 02300 = 000 037 377 011 230 121                                     V1=B0001777702314121;  (INT FORMAT);
                                                                       [ Annotation:   0077001251    digits placed as on the listing
V-store at 02301 = 000 003 360 101 052 100                                     V2=B0000176020225100;  (COUNTER FORMAT);
V-store at 02302 = 215 215 050 235 035 032                                     V3=B4330645047216432;  ([[c]ROUTE-]);  [ using curly brackets for ...
V-store at 02303 = 040 037 020 321 235 000                                     V4=B1001742064316400;
V-store at 02304 = 215 215 002 050 235 032                                     V5=B4330640212116432;  ([[2c]OPERANDS-[c]]);  [ ... underlined square brackets
V-store at 02305 = 033 020 035 014 031 017                                     V6=B0661003503014417;
V-store at 02306 = 036 321 215 050 235 235                                     V7=B0755061512116635;
 2307/0: 304 004 302|310 000 250|200 334 040                                   SET AV3; V0P299; JSP288;
 2310/3: 310 003 036|170 122|147 120|304 000 020|170 130                       YE32; =M5; I5=-2; SET 16; =C5;
 2312/3: 310 122 377|312 122 376                                       1;      YE1M5; YE0M5Q;
 2313/3: 042|223 144 321                                                       DUP; J2=Z;  (IF NO LABEL);
 2314/1: 310 000 250|202 326 033                                               V0P299; JS1P129;  (OUTPUT IDENTIFIER);
 2315/1: 304 000 057|024|300 004 301|310 000 250|200 334 154                   SET 47; FLOAT; V2; V0P299; JSP291;
 2317/2: 171 122|164 127|164 253|170 122|263 124 312                           M5; SHL 43; SHL -43; =M5; J1C5NZ;
 2321/1: 041|042                                                               ZERO; DUP;
 2321/3: 052|052|310 043 053|164 041|164 301                           2;      ERASE; ERASE; Y11M2; SHL 16; SHL -32; (WP);
 2323/0: 042|171 042|036|200 104 333                                           DUP; M2; -; J7≤Z;
 2324/1: 042|171 022|036|200 044 333                                           DUP; M1; -; J7≥Z;  (NOTHING ON STACK);
 2325/2: 304 004 304|310 000 250|200 334 040                                   SET AV5; V0P299; JSP288;
 2326/5: 310 023 050|310 023 051|042|304 377 037|054|204 144 333       6;      Y8M1; Y9M1; DUP; SETB177437; AND; J8≠Z;  (UNL RESULT);
 2331/1: 065|204 324 334|141 020|171 022|205 024 326                           REV; JS3; M-I1; M1; J6≠;
 2333/0: 052|200 360 000                                               7;      ERASE; EXIT 1;
 2333/4: 052|052|052|200 360 000                                       8;      ERASE; ERASE; ERASE; EXIT 1;
 2334/4: 065|304 000 300|036|222 144 340                               3;      (P-DIGIT); REV; SET B300; -; J4=Z; (IF R);


                                                                       [ okq040.txt

                                                                       [ page 40

 2336/0: 161 023|161 357                                                       SHA9; SHA-9;
 2336/4: 304 000 057|024|300 004 300|205 264 340                               SET 47; FLOAT; V1; J5;
 2340/2: 300 004 277                                                   4;      V0;
 2340/5: 310 000 250|200 334 154|200 360 000                           5;      V0P299; JSP291; EXIT 1;

                                                                                 (For st type ch  14/11/63);
=== Start P32V-1; at address 1251
 2343/0: 065|042|170 376|065                                           P32;    REV; DUP; =Q15; REV;  (Type X in Q15);
 2343/5: 001|043|011                                                           VR; DUP D; OR;
 2344/2: 012|054                                                               PERM; AND;
 2344/4: 304 000 300|065                                                       SET B300; REV;
 2345/2: 204 024 346                                                           J1≠;   (unl both r);
 2345/5: 052|052|202 360 001                                                   ERASE; ERASE; EXIT 2;
 2346/4: 065|304 000 100                                               1;      REV; SET B100;
 2347/2: 204 024 350                                                           J2≠;  (unl both i);
 2347/5: 052|052|200 360 000                                                   ERASE; ERASE; EXIT 1;
 2350/4: 220 024 352                                                   2;      J3=;  (unl illeg);
 2351/1: 052|066|200 323 034                                                   ERASE; CAB; JSP5;
 2352/0: 171 376|036|201 144 354                                       3;      Q15; -; J4≠Z;  (unl X r);
 2353/0: 304 000 057|024|202 360 001                                           SET47; FLOAT; EXIT 2;
 2354/1: 065|304 000 057|024|065|202 360 001                           4;      REV; SET47; FLOAT; REV; EXIT 2;

=== Start P40V0; at address 1263
                                                                       P40V0;  (SQUARE ROOT,24.2.64);
V-store at 02356 = 016 333 166 263 273 204                                     V0=0.46429/2;
 2357/0: 042|203 104 366|045|042|166 377|170 362                               DUP; J1≤Z; FIX; DUP; SHLD-1; =M15;
 2360/4: 223 044 361|164 377                                                   J2<Z; SHL-1;
 2361/3: 161 373|042|161 003|300 004 356|056                           2;      SHA-3; DUP; SHA+1; V0; +; (X0,M);
 2363/0: 043|060|056                                                           DUPD; ÷; +; (X1,M);
 2363/3: 043|060|065|161 375|056                                               DUPD; ÷; REV; SHA-2; +; (X2,M);
 2364/3: 042|012|060|056                                                       DUP; PERM; ÷; +; (X3);

                                                                       [ okq041.txt

                                                                       [ page 41


 2365/1: 171 362|033|027|024                                                   M15; NOT; NEG; FLOAT;
 2366/0: 200 360 000                                                   3;      EXIT1;
 2366/3: 042|220 144 366|304 000 141|200 323 034                       1;      DUP; J3=Z; SET97; JSP5;

=== Start P41V-1; at address 1273
                                                                       P41;    (abs); (real argument in N1);
 2371/0: 030|200 360 000                                                       ABSF; EXIT1;
=== Start P42V-1; at address 1274
                                                                       P42;    (sign); (real argument in N1);
 2372/0: 041|077|200 360 000                                                   ZERO; SIGNF; EXIT1;

=== Start P44V-1; at address 1275
                                                                       P44;    (modulo CMW); (m in N1, x in N2);
 2373/0: 065|042|170 376|042|221 145 001                                       REV; DUP; =Q15; DUP; J1=Z;
 2374/2: 065|042|066|045|066|161 377|036|042|220 105 002                       REV; DUP; CAB; FIX; CAB; SHA-1; -; DUP; J2>Z;
 2376/2: 052|052|171 376|042|221 105 001                                       ERASE; ERASE; Q15; DUP; J1>Z;
 2377/4: 065|304 000 057|024|074|200 360 000                                   REV; SET47; FLOAT; +F; EXIT1;
 2401/1: 065|052|200 360 000                                           1;      REV; ERASE; EXIT1;

 2402/0: 066|065|170 370|161 377|065|047                               2;      CAB; REV; =C15; SHA-1; REV; STR;
 2403/2: 162 360|052|065|024|200 360 000                                       SHADC15; ERASE; REV; FLOAT; EXIT1;
=== Start P45V-1; at address 1285
                                                                       P45;    (Cheby CMW); (Q-word in N1, argument in N2);
 2405/0: 170 376|042|074|041|102 360|041                                       =Q15; DUP; +F; ZERO; M0M15Q; ZERO;
 2406/2: 052|012|042|102 360|075|051|043|004                           1;      ERASE; PERM; DUP; M0M15Q; -F; REVD; DUPD; ×F;
 2407/5: 051|012|075|012|051|065|262 365 006                                   REVD; PERM; -F; PERM; REVD; REV; J1C15NZ;
 2411/2: 075|012|052|052|304 100 100|164 101|004|200 360 000                   -F; PERM; ERASE; ERASE; SETB40100; SHL+32; ×F; EXIT1;

=== Start P46V1; at address 1294
                                                                       P46V1;  (entier, ALGOL 3.2.5); (E assumed in N1);
V-store at 02414 = 000 006 000 001 005 015
V-store at 02415 = 052 063 071 056 052 067                                     V0=Q6/1/AV1; V1=B1243147113425067; (entier);
 2416/0: 045|042|304 000 047|036|042|224 105 025                               FIX; DUP; SET39; -; DUP; J3>Z;


                                                                       [ okq042.txt

                                                                       [ page 42

 2417/4: 170 370|224 105 022                                                   =C15; J1>Z;
 2420/3: 224 045 021                                                           J2<Z;
 2421/0: 041|200 360 000                                                       ZERO; EXIT1;

 2421/4: 304 377 377|200 360 000                                       2;      SET-1; EXIT1;
 2422/4: 304 377 370|172 370|164 360|142 360|164 360|142 360|161 360|200 360 000
                                                                       1;      SET-8; =+C15; SHLC15; NC15; SHLC15; NC15; SHAC15; EXIT1;
 2425/4: 052|024|300 005 014|065|304 000 142|200 323 034               3;      ERASE; FLOAT; V0; REV; SET98; JSP5;

=== Start P47V7; at address 1312
                                                                       P47V7;  (exp ENH-FGD); (argument in N1);
V-store at 02430 = 000 003 000 001 005 036                                     V0=Q3/1/AV6;
V-store at 02431 = 134 125 035 224 256 014                                     V1=1.442695040888964/1;
V-store at 02432 = 043 166 111 037 002 054                                     V2=B1067311107601054;
V-store at 02433 = 117 254 176 167 152 123                                     V3=B2372617635665123;
V-store at 02434 = 127 162 066 342 017 101                                     V4=B2567106670407501;
V-store at 02435 = 331 126 271 240 320 035                                     V5=B6625327150150035;
V-store at 02436 = 052 075 065 000 000 000                                     V6=B12436465/23;
V-store at 02437 = 303 247 000 000 000 000                                     V7=F-89.0;
 2440/0: 042|300 005 037|075|225 045 054                                       DUP; V7; -F; J2<Z;
 2441/2: 042|045|033|027|170 370|300 005 031|035|047|001                       DUP; FIX; NOT; NEG; =C15; V1; ×; STR; VR;
 2443/2: 162 360|043|016|042|170 376|036|050                                   SHADC15; DUPD; ROUND; DUP; =Q15; -; CONT;
 2444/5: 042|042|035|161 363|042                                               DUP; DUP; ×; SHA-7; DUP;
 2445/5: 300 005 032|035|300 005 033|056|065|300 005 034|056|300 005 035|065|060|056
                                                                               V2; ×; V3; +; REV; V4; +; V5; REV; ÷; +;
 2451/0: 065|161 371|043|056|012|036|161 003|060                               REV; SHA-4; DUPD; +; PERM; -; SHA1; ÷;
 2452/4: 171 376|033|027|024|224 205 055                                       Q15; NOT; NEG; FLOAT; J1V;
 2454/0: 065|052|200 360 000                                                   REV; ERASE; EXIT1;
 2454/5: 052|041|200 360 000                                           2;      ERASE; ZERO; EXIT1;
 2455/4: 052|300 005 030|065|304 000 134|200 323 034                   1;      ERASE; V0; REV; SET92; JSP5;

                                                                       [ okq043.txt

                                                                       [ page 43

=== Start P48V8; at address 1337
                                                                       P48V8;  (In ENH-FGH); (argument in N1);
V-store at 02460 = 000 002 000 001 005 070                                     V0=Q2/1/AV8;
V-store at 02461 = 247 106 364 004 027 031                                     V1=-0.693147180559945/0;
V-store at 02462 = 055 101 074 314 376 167                                     V2=+0.353553390593274/0;
V-store at 02463 = 061 122 255 270 323 304                                     V3=+1.541342602720874/2;
V-store at 02464 = 004 345 174 167 067 263                                     V4=+0.612053805720620/4;
V-store at 02465 = 142 335 163 045 150 033                                     V5=+3.089532445011031/2;
V-store at 02466 = 341 101 352 330 367 071                                     V6=-1.921406891324693/3;
V-store at 02467 = 022 123 342 232 362 013                                     V7=+0.286369944871851/1;
V-store at 02470 = 061 063 000 000 000 000                                     V8=B30463/15;
 2471/0: 042|201 105 104                                                       DUP; J1≤Z;
 2471/4: 045|161 121|300 005 061|042|161 361|012|035|036|065|161 377           FIX; SHA40; V1; DUP; SHA-8; PERM; ×; -; REV; SHA-1;
 2474/1: 300 005 062|043|036|012|056|060|042|161 377|042|035|042               V2; DUPD; -; PERM; +; ÷; DUP; SHA-1; DUP; ×; DUP;
 2476/3: 300 005 063|036|300 005 064|065|060|300 005 065|056|036|300 005 066|065|060|300 005 067|056|035
                                                                               V3; -; V4; REV; ÷; V5; +; -; V6; REV; ÷; V7; +; ×;
 2502/3: 161 367|056|304 000 007|024|200 360 000                               SHA-5; +; SET7; FLOAT; EXIT1;
 2504/1: 300 005 060|065|304 000 135|200 323 034                       1;      V0; REV; SET93; JSP5;

=== Start P49V12; at address 1363
                                                                       P49V12;         (sin CMW); (argument in N1);
V-store at 02506 = 000 007 377 377 005 115                                     V0=Q7/-1/AV7;
V-store at 02507 = 101 121 256 215 365 006                                     V1=F+2.552557924805;
V-store at 02510 = 277 266 371 031 011 220                                     V2=F-2.8526156918110-1;
V-store at 02511 = 075 112 261 335 221 276                                     V3=F+9.11801600710-3;
V-store at 02512 = 272 070 143 210 301 060                                     V4=F-1.3658751410-4;
V-store at 02513 = 067 223 341 137 143 064                                     V5=F+1.184961910-6;
V-store at 02514 = 262 214 327 344 354 250                                     V6=F-6.70310-9;
V-store at 02515 = 057 073 137 246 023 372                                     V7=F+2.710-11;
V-store at 02516 = 100 121 174 301 267 047                                     V8=F+0.636619772368;
V-store at 02517 = 101 100 000 000 000 000                                     V9=F+2.0;
V-store at 02520 = 100 300 000 000 000 000                                     V10=F+1.0;


                                                                       [ okq044.txt

                                                                       [ page 44

V-store at 02521 = 000 003 000 001 005 122                                     V11=Q3/1/AV12;
V-store at 02522 = 070 056 063 000 000 000                                     V12=B16027063/23;
 2523/0: 042|201 145 124                                                       DUP; J4≠Z;
 2523/4: 200 360 000                                                           EXIT1;
 2524/1: 042|045|065|052|042|304 000 045|036|223 105 142               4;      DUP; FIX; REV; ERASE; DUP; SET37; -; J5>Z;
 2526/1: 304 000 023|056|205 045 127                                           SET19; +; J1≥Z;
 2527/2: 200 360 000                                                           EXIT1;
 2527/5: 300 005 116|004|042|304 000 004|200 324 373                   1;      V8; ×F; DUP; SET4; JSP44;
 2531/4: 300 005 117|075|065|304 000 002|200 324 373                           V9; -F; REV; SET2; JSP44;
 2533/3: 042|300 005 120|075|223 045 135                                       DUP; V10; -F; J2<Z;
 2534/5: 300 005 117|075                                                       V9; -F;
 2535/3: 042|043|004|042|074|300 005 120|075|300 005 106|200 325 005   2;      DUP; DUPD; ×F; DUP; +F; V10; -F; V0; JSP45;
 2540/0: 004|012|041|077|065|041|077|015|200 145 142                           ×F; PERM; ZERO; SIGNF; REV; ZERO; SIGNF; NEV; J3≠Z;
 2541/5: 031                                                                   NEGF;
 2542/0: 200 360 000                                                   3;      EXIT1;
 2542/3: 052|300 005 121|065|304 000 136|200 323 034                   5;      ERASE; V11; REV; SET94; JSP5;


=== Start P50V2; at address 1384
                                                                       P50V2;  (cos CMW using sin CMW - own failure treatment); (argument in n1);
V-store at 02545 = 000 003 000 001 005 146                                     V0=Q3/1/AV1;
V-store at 02546 = 050 064 070 000 000 000                                     V1=B12032070/23;
V-store at 02547 = 100 344 207 355 121 021                                     V2=F+1.570796326795;
 2550/0: 042|205 145 151                                                       DUP; J1≠Z;
 2550/4: 052|300 005 120|200 360 000                                   3;      ERASE; V10P49;EXIT1;
 2551/5: 042|045|065|052|042|304 000 045|036|222 105 156               1;      DUP; FIX; REV; ERASE; DUP; SET37; -; J2>Z;
 2553/5: 304 000 023|056|224 045 150                                           SET19; +; J3<Z;
 2555/0: 300 005 147|065|075|205 265 127                                       V2; REV; -F; J1P49;
 2556/2: 052|300 005 145|065|304 000 137|200 323 034                   2;      ERASE; V0; REV; SET95; JSP5;


                                                                       [ okq045.txt

                                                                       [ page 45

=== Start P51V15; at address 1409
                                                                       P51V15;         (arctan EL);
V-store at 02561 = 076 046 377 217 044 052                                     V0=F0.019042127887;
V-store at 02562 = 076 046 377 217 122 250                                     V1=F0.019042129240;
V-store at 02563 = 076 115 376 047 031 226                                     V2=F0.038082414120;
V-store at 02564 = 076 316 201 251 120 166                                     V3=F0.076666493927;
V-store at 02565 = 077 237 010 261 072 076                                     V4=F0.121226383896;
V-store at 02566 = 100 134 353 235 337 313                                     V5=F0.725940450930;
                                                                               (V6-V10 used for b);
V-store at 02574 = 000 006 000 001 000 000                                     V11=Q6/1/0;
V-store at 02575 = 000 004 000 001 000 000                                     V12=Q4/1/0;
                                                                               (V13 used for a);
V-store at 02577 = 100 300 000 000 000 000                                     V14=F1.0;
V-store at 02600 = 100 100 000 000 000 000                                     V15=F0.5;
 2601/0: 300 005 177|301 005 176                                               V14; =V13;
 2602/0: 042|042|004|300 005 177|074|200 324 357|301 005 167                   DUP; DUP; ×F; V14; +F; JSP40; =V6;
 2604/1: 300 005 175|170 336                                                   V12; =Q13;
 2605/0: 300 005 176|300 325 167|074|300 005 200|004|301 005 176       2;      V13; V6M13; +F; V15; ×F; =V13;
 2607/2: 300 005 176|302 325 167|004|200 324 357|301 325 167|260 325 205
                                                                               V13; V6M13Q; ×F; JSP40; =V6M13; J2C13NZ;
 2612/0: 300 005 174|170 336                                                   V11; =Q13;
 2612/5: 302 325 161|041|065|045|025                                           V0M13Q; ZERO; REV; FIX; FLOATD;
 2614/0: 300 325 161|302 325 166|007|260 325 214                       1;      V0M13; V5M13Q; ×+F; J1C13NZ;
 2615/4: 020|062|200 360 000                                                   ROUNDF; ÷F; EXIT1;


                                                                                (Tester 12/12/63);
=== Start P101V3; at address 1427
V-store at 02617 = 215 215 050 235 036 037                             P101V3;        V0=B4330645047217037;


                                                                       [ okq046.txt

                                                                       [ page 46

V-store at 02620 = 014 016 026 235 000 000                                     V1=B0300702647200000;  ([Q]STACK); [  Really underlined square brackets for []
 2623/0: 171 376|301 005 221|171 336|301 005 222                               Q15; =V2; Q13; =V3;
 2624/4: 300 000 000|304 002 100|054                                           E0; SET B1100; AND;
 2625/5: 042|201 145 227                                                       DUP; J1≠Z;  (unl trace or pm);
 2626/3: 052|200 360 000                                                       ERASE; EXIT 1;
 2627/1: 065|042|164 121|171 102|056                                   1;      REV; DUP; SHL 40; M4; +;
 2630/2: 304 000 060|171 110|036|164 013|056                                   SET 48; C4; -; SHL5; +;
 2631/5: 171 022|164 121|164 321|056                                           M1; SHL 40; SHL -24; +;
 2633/0: 171 042|164 121|164 341|056                                           M2; SHL 40; SHL -16; +;
 2634/1: 310 043 053|170 376|171 364                                           Y11M2; =Q15; I15;
 2635/2: 171 022|224 025 237                                                   M1; J2=;
 2636/1: 310 023 050|310 000 250|213 320 150                                   Y8M1; V0P299; JS155P295;
 2637/4: 164 121|164 361|056                                           2;      SHL 40; SHL -8; +;
 2640/3: 310 000 250|213 320 150                                               V0P299; JS155P295;
 2641/3: 065|304 002 000|220 025 245                                           REV; SET B1000; J3=;
 2642/4: 300 005 221|170 376|300 005 222|170 336                               V2; =Q15; V3; =Q13;
 2644/2: 052|200 360 000                                                       ERASE; EXIT 1;
 2645/0: 300 000 000|304 002 000|036|301 000 000                       3;      E0; SET B1000; -; =E0;
 2646/4: 304 005 217|310 000 250|200 334 040                                   SET AV0; V0P299; JSP288;
 2650/1: 171 022|171 064|036|170 030|145 020                                   M1; I3; -; =C1; I1=-1;
 2651/4: 312 023 052|310 000 250|213 320 150|264 025 251               4;      Y10M1Q; V0P299; JS155P295; J4C1NZ;
 2653/4: 304 003 347|200 323 034                                               SET 999; JSP5;

                                                                                 (Read Program 24/9/63);
=== Start P126V0; at address 1454
 2656/0: 310 000 364|170 370                                           P126V0;         V27P113; =C15;
 2656/5: 300 000 000|304 000 010|054|204 145 267                               E0; SET B10; AND; J7≠Z;
 2660/3: 304 023 040|170 364|304 023 042|170 362                               SET AY0; =I15; SET AY2; =M15;
 2662/1: 124 360|121 360|310 003 042|171 364|056|170 362|304 000 003|172 364|124 360
                                                                               PRQ15; PARQ15; Y2; I15; +; =M15; SET3; =+I15; PRQ15;
 2665/2: 121 360|201 345 267                                                   PARQ15; J6NTR;


                                                                       [ okq047.txt

                                                                       [ page 47

 2666/1: 304 000 131|200 323 034                                               SET 89; JSP5;
 2667/1: 200 360 000                                                   6;      EXIT 1;
 2667/4: 304 005 255|042|170 364|170 362                               7;      SET AV0; DUP; =I15; =M15;
 2671/0: 041|170 356|041|170 336|041|170 303                                   ZERO; =Q14; ZERO; =Q13; ZERO; =RM12;
 2672/3: 304 000 005|170 271|041|041                                           SET 5; =RC11; ZERO; ZERO;
 2673/4: 052|164 015                                                   1;      ERASE; SHL 6;
 2674/1: 042|205 145 275                                                       DUP; J2≠Z;  (if word ≠0);
 2674/5: 052|125 360|300 005 255                                               ERASE; PREQ15; V0;
 2675/5: 042|164 255|304 000 020|036                                   2;      DUP; SHL -42; SET 16; -;
 2677/0: 042|224 045 273                                                       DUP; J1<Z;   (if less than range);
 2677/4: 304 000 016|224 025 305                                               SET 14; J4=;   ( if - );
 2700/4: 304 000 055|203 025 302                                               SET 45; J3≠;  (unless EM);
 2701/4: 052|052|200 360 000                                                   ERASE; ERASE; EXIT 1;
 2702/3: 042|304 000 007|036|224 105 273                               3;      DUP; SET 7; -; J1>Z;  (if over range);
 2703/5: 171 356|164 007|056|170 356                                           Q14; SHL 3; +; =Q14;
 2705/0: 041|204 265 273                                                       ZERO; J1;
 2705/4: 171 336|164 021|171 356|056                                   4;      Q13; SHL 8; Q14; +;
 2706/5: 041|170 356|240 265 311                                               ZERO; =Q14; J5C11Z;  (if s=0 );
 2707/5: 170 336|143 260|204 265 273                                           =Q13; DC11; J1;
 2711/0: 313 303 040                                                   5;      =Y0M12Q;
 2711/3: 041|170 336                                                           ZERO; =Q13;
 2712/0: 304 000 005|170 271|204 265 273                                       SET 5; =RC11; J1;

                                                                                  (END ROUTINE  22/4/64);
=== Start P128V17; at address 1502
V-store at 02714 = 215 035 014 031 241 020                             P128V17;        V0=B4321641406320420; (^RAN/E);
V-store at 02717 = 027 241 000 000 000 030                                     V3=B0572040000000030; (L/   M);
V-store at 02720 = 000 000 036 235 000 000                                     V4=B3647200000; (  S^  );
V-store at 02721 = 010 040 202 010 040 202                                     V5 = B0202020202020202;
                                                                               (V6 = START TIME);


                                                                       [ okq048.txt

                                                                       [ page 48

V-store at 02723 = 000 000 005 321 005 321                                     V7 = Q0/AV5/AV5;
                                                                               (V8/ELAPSE TIME);
V-store at 02725 = 074 000 000 264 000 063                                     V9=B1700000055000063;
V-store at 02726 = 000 000 000 000 000 000                                     V10=0;
V-store at 02727 = 377 374 241 270 371 154                                     V11=B7777624156174554;
V-store at 02730 = 000 000 000 000 000 000
V-store at 02731 = 000 000 000 000 000 000                                     V12=0;  V13=0;  (V14/V15-RUN/ELAPSE TIMES);
V-store at 02734 = 050 242 212 050 242 212                                     V16=B1212121212121212;
V-store at 02735 = 000 000 000 001 004 020                                     V17=B202020;
 2736/0: 304 000 003|200 220 000|161 321|300 005 322|036|042|301 005 332|304 000 011|200 220 000|161 321
                                                                               SET3; OUT; SHA-24; V6; -; DUP; =V14; SET9; OUT; SHA-24;
 2742/0: 300 005 324|036|042|301 005 333|065|304 000 074|044|065|304 003 350|044
                                                                               V8; -; DUP; =V15; REV; SET60; ÷I; REV; SET1000; ÷I;
 2745/0: 065|052|201 326 017|164 021|300 005 317|011|301 005 315               REV; ERASE;(RUN TIME); JS2; SHL+8; V3; OR; =V1;
 2747/2: 201 326 017|065|304 000 074|044|065|304 003 350|044|065|052           JS2; REV; SET60; ÷I; REV; SET1000; ÷I; REV; ERASE;
 2751/5: 201 326 017|164 041|012|201 326 017|164 041|012                       (ELAPSE TIME); JS2; SHL+16; PERM; JS2; SHL+16; PERM;
 2753/5: 164 021|300 005 320|164 321|011|300 005 317|164 021|066|011           SHL+8; V4; SHL-24; OR; V3; SHL+8; CAB; OR;
 2756/2: 065|166 061|301 005 316|300 005 320|164 341|011|011|301 005 317
                                                                               REV; SHLD+24; =V2; V4; SHL-16; OR; OR; =V3;
 2761/0: 304 000 001|310 000 250|200 331 151|304 005 314|310 000 250|200 334 040
                                                                               SET1; V0P299; JSP276; SETAV0; V0P299; JSP288;
                                                                               (OUTPUT RAN/EL/   M  S/   M  S);
 2764/0: 310 000 250|204 335 222                                               V0P299; JS21P292; (CLOSE FAIL DEV);
 2765/0: 171 376|300 005 332|205 325 370|301 005 330|300 005 333|205 325 370|301 005 331|200 265 377
                                                                               Q15; V14; JS5; =V12; V15; JS5; =V13; J6;
 2770/5: 304 000 074|044|300 005 335|164 365|300 005 334|066|067|011|164 015|065
                                                                       5;      SET 60; ÷I; V17; SHL-6; V16; CAB; FRB; OR; SHL+6; REV;
 2773/5: 300 005 335|300 005 334|066|067|011|164 061|300 005 325|011|011|200 360 000
                                                                               V17; V16; CAB; FRB; OR; SHL+24; V9; OR; OR; EXIT1; (EV TIME);
 2777/0: 304 005 326|170 365|304 005 331|170 362|171 376|304 000 010|200 220 000|170 376
                                                                       6;      SETAV10; =RI15; SETAV13; =M15; Q15; SET8; OUT; =Q15;
                                                                               (OUTPUT RAN/EL/   M  S/   M  S ON MONITOR);
 3002/2: 173 000|052|173 000|052                                               LINK; ERASE; LINK; ERASE;
 3003/2: 304 000 020|300 000 000|054|204 146 016                               SET B20; E0; AND; J1≠Z;  (UNLESS LOAD-AND-GO);        [h/w LH mark to end of page
 3005/0: 310 001 044|042|221 146 013|225 106 010                               V75P113; DUP; J8=Z; J7>Z;                              [h/w ... delete ??
 3006/4: 310 000 365|304 000 017|054|304 000 006|200 220 000                   V28P113; SETB17; AND; SET6; OUT; (DE-ALL SIM O÷D);
 3010/5: 310 000 364|304 000 017|054|304 000 006|200 220 000|041       7;      V27P113; SETB17; AND; SET6; OUT; ZERO; (DE-ALL P.T.R.);
 3013/1: 052|300 006 050|300 006 047|164 061|164 321|300 003 033|011   8;      ERASE; V1P130; V0P130; SHL24; SHL-24; V11P5; OR;


                                                                       [ okq049.txt

                                                                       [ page 49

 3015/4: 304 000 001|200 220 000                                               SET1; OUT; (CALL TRANSLATER);
 3016/4: 204 260 027                                                   1;      J1P0;  (CALL NEXT OB PROG);
 3017/1: 304 000 012|044                                               2;      (INTEGER S R); SET 10; ÷I;
 3017/5: 065|304 000 012|044|042|204 146 021                                   REV; SET 10; ÷I; DUP; J3≠Z;
 3021/2: 052|041                                                               ERASE; ZERO;
 3021/4: 065|042|205 146 022                                           3;      REV; DUP; J4≠Z;
 3022/3: 052|041                                                               ERASE; ZERO;
 3022/5: 164 021|056|164 021|056|200 360 000                           4;      SHL 8; +; SHL 8; +; EXIT 1;

                                                                                  (PRINT POSN IDENT  24/1/64);
=== Start P129V2; at address 1560
 3030/0: 200 326 035                                                   P129V2;         JS2;
 3030/3: 304 000 002|215 320 006                                               SET 2; JS18P295;  (OUTPUT CRLF);
 3031/3: 041|065|213 320 145                                                   ZERO; REV; JS150P295;  (OUTPUT SPACES);
 3032/2: 214 320 065                                                           JS16P295;  (CLOSE OUTPUT STREAM);
 3032/5: 200 360 000                                                           EXIT 1;
 3033/2: 200 326 035                                                   1;      JS2;
 3033/5: 052|214 320 065                                                       ERASE; JS16P295;
 3034/3: 200 360 000                                                           EXIT 1;
 3035/0: 202 337 264                                                   2;      JS12P295;  (OPEN OUTPUT STREAM);
 3035/3: 300 016 235|164 321|171 230|036                                       V31P295; SHL -24; C9; -;  (PRESERVE FORMAT);
 3036/5: 042|223 146 040                                                       DUP; J3=Z;
 3037/3: 304 000 002|215 320 006                                               SET2; JS18P295; (OUTPUT CRLF);
 3040/3: 304 000 010|170 170|065                                       3;      SET 8; =C7; REV;
 3041/3: 041|166 015|042|220 146 046                                   4;      ZERO; SHLD +6; DUP; J6=Z;  (IF BLANK);
 3042/4: 304 000 013|056|304 000 077|054                                       SET 11; +; SETB77; AND;  (CONVERT TO KIDSGROVE CODE);
 3044/0: 210 320 015                                                           JS14P295;  (OUTPUT CHAR);
 3044/3: 143 160|263 166 041                                           5;      DC7; J4C7NZ;
 3045/2: 052|200 360 000                                                       ERASE; EXIT 1;
 3046/0: 052|203 266 044                                               6;      ERASE; J5;

                                                                       [ okq050.txt

                                                                       [ page 50

                                                                                 (TRANSLATOR IDENTIFIER);

=== Start P130V1; at address 1577
                                                                       P130V1;
V-store at 03047 = 034 053 102 256 335 320                                     V0=B0702550253556720;
V-store at 03050 = 111 004 136 173 134 065                                     V1=B2220213636656065; (KMW020100--UPU);
 3051/0: 200 360 000                                                           EXIT 1;

                                                                                 (READ CODE PROCEDURES  21/7/64);
=== Start P131V0; at address 1579
V-store at 03052 = 000 000 000 034 054 002                             P131V0;         V0 = B0000000007026002;
 3053/0: 300 000 000|304 000 040|054|202 146 055                               E0; SET B40; AND; J1≠Z;  (IF ANY CODE PROCS);
 3054/4: 052|200 360 000                                                       ERASE; EXIT 1;
 3055/2: 042|170 365|042|170 343                                       1;      DUP; =RI15; DUP; =RM14;
 3056/2: 304 000 010|056|170 362                                               SET 8; +; =M15;
 3057/2: 310 000 364|170 370                                                   V27P113; =C15;
 3060/1: 125 360|121 360                                                       PREQ15; PARQ15;  (READ A-BLOCK);
 3060/5: 100 340|164 341|300 006 052|036|203 146 070                           M0M14; SHL -16; V0; -; J3≠Z;  (UNLESS CN,CRLF,P,CRLF);
 3062/4: 124 360|121 360                                                       PRQ15; PARQ15;  (READ B-BLOCK);
 3063/2: 300 340 007|170 336                                                   E7M14; =Q13;
 3064/1: 171 342|164 367|170 350                                               M14; SHL -5; =C14;
 3065/1: 304 000 030|172 362                                                   SET 24; =+M15;
 3066/0: 124 360|121 360|143 320|260 326 066                           2;      PRQ15; PARQ15; DC13; J2C13NZ;  (SKIP GHOST CONTROL);
 3067/3: 151 337                                                               M13TOQ15;
 3067/5: 124 360|121 360                                                       PRQ15; PARQ15;  (READ CODE PROCS);
 3070/3: 304 000 310|200 323 034                                       3;      SET 200; JSP5;

=== Start P259V109; at address 1704
                                                                       P259V109;         (5 CHANNEL OUTPUT TABLE);
V-store at 03072 = 006 074 006 075 006 076                                     V0=QAV2/AV3/AV4;
V-store at 03073 = 000 004 006 201 006 101                                     V1=Q4/AV71/AV7;
V-store at 03074 = 004 020 074 000 000 000                                     V2=B0101007400000000;
V-store at 03075 = 373 320 000 000 000 000                                     V3=B7675000000000000;

                                                                       [ okq051.txt

V-store at 03076 = 203 260 000 000 000 000                                   V4=B4073000000000000;
V-store at 03077 = 202 010 073 000 000 000                                   V5=B4040407300000000;
V-store at 03100 = 202 340 000 000 020 004                                   V6=B4056000000010004;
V-store at 03101 = 203 010 041 202 050 063                                   V7=B4060404140424063;
V-store at 03102 = 202 110 065 203 150 047                                   V8=B4044406540664047;
V-store at 03103 = 202 210 071 202 310 074                                   V9=B4050407140544074;
V-store at 03104 = 206 030 142 206 070 144                                   V10=B4141414241434144;
V-store at 03105 = 206 130 146 206 170 150                                   V11=B4145414641474150;
V-store at 03106 = 206 230 152 206 270 154                                   V12=B4151415241534154;
V-store at 03107 = 206 330 156 206 370 160                                   V13=B4155415641574160;
V-store at 03110 = 207 030 162 207 070 164                                   V14=B4161416241634164;
V-store at 03111 = 207 130 166 207 170 170                                   V15=B4165416641674170;
V-store at 03112 = 207 230 172 206 030 142                                   V16=B4171417241414142;
V-store at 03113 = 206 070 144 206 130 146                                   V17=B4143414441454146;
V-store at 03114 = 206 170 150 206 230 152                                   V18=B4147415041514152;
V-store at 03115 = 206 270 154 206 330 156                                   V19=B4153415441554156;
V-store at 03116 = 206 370 160 207 030 162                                   V20=B4157416041614162;
V-store at 03117 = 207 070 164 207 130 166                                   V21=B4163416441654166;
V-store at 03120 = 207 170 170 207 230 172                                   V22=B4167417041714172;
V-store at 03121 = 000 000 143 006 260 170                                   V23=B0000014301530170;
V-store at 03123 = 010 060 000 000 000 000                                   V25=B0203000000000000;
V-store at 03125 = 010 300 000 000 000 000                                   V27=B0214000000000000;
V-store at 03127 = 011 260 000 000 000 000                                   V29=B0233000000000000;
V-store at 03137 = 000 000 245 013 000 000                                   V37=B0000024502600000;
V-store at 03141 = 013 240 025 001 240 073                                   V39=B0272002500320073;
V-store at 03142 = 202 120 305 014 260 000                                   V40=B4045030503130000;
V-store at 03143 = 015 040 112 000 000 000                                   V41=B0322011200000000;
V-store at 03144 = 005 240 122 207 340 332                                   V42=B0132012241760332;
V-store at 03145 = 000 000 020 001 320 064                                   V43=B0000002000350064;

                                                                       [ okq052.txt

                                                                       [ page 52

V-store at 03146 = 202 140 341 016 220 000                                     V44=B4046034103510000;
V-store at 03147 = 004 040 115 000 000 000                                     V45=B0102011500000000;
V-store at 03150 = 017 040 125 202 340 371                                     V46=B0362012540560371;
V-store at 03151 = 000 030 067 202 240 060                                     V47=B0001406740520060;
V-store at 03152 = 000 001 002 202 360 000                                     V48=B0000040240570000;
V-store at 03155 = 000 010 070 203 040 051                                     V51=B0000407040620051;
V-store at 03156 = 000 000 105 020 240 000                                     V52=B0000010504120000;
V-store at 03157 = 000 010 064 000 000 000                                     V53=B0000406400000000;
V-store at 03161 = 000 010 072 203 020 042                                     V55=B0000407240610042;
V-store at 03162 = 000 000 000 021 040 000                                     V56=B0000000004220000;
V-store at 03164 = 000 001 033 000 000 000                                     V58=B0000043300000000;
V-store at 03165 = 000 010 053 202 220 000                                     V59=B0000405340510000;
V-store at 03166 = 000 000 000 022 100 000                                     V60=B0000000004440000;
V-store at 03170 = 000 001 052 000 000 000                                     V62=B0000045200000000;
V-store at 03201 = 000 002 076 055 007 076                                     V71=B0000107613203476;
V-store at 03202 = 055 055 055 055 055 055                                     V72=B1322645513226455;
V-store at 03203 = 004 043 144 151 166 002                                     V73=B0102154432273002;
V-store at 03204 = 043 043 002 043 062 002                                     V74=B1062140210631002;
V-store at 03205 = 043 061 004 043 145 161                                     V75=B1063040410662561;
V-store at 03206 = 166 004 043 151 155 160                                     V76=B3540204332266560;
V-store at 03207 = 003 043 157 162 004 043                                     V77=B0062155734402043;
V-store at 03210 = 141 156 144 004 043 156                                     V78=B3026714401021556;
V-store at 03211 = 157 164 002 043 057 002                                     V79=B3367200210627402;
V-store at 03212 = 043 052 002 043 045 002                                     V80=B1062500210622402;
V-store at 03213 = 043 046 002 043 161 002                                     V81=B1062300210670402;
V-store at 03214 = 043 165 006 043 142 145                                     V82=B1067240610661145;
V-store at 03215 = 147 151 156 005 043 162                                     V83=B3166455601221562;
V-store at 03216 = 145 141 154 010 043 151                                     V84=B3126055402021551;
V-store at 03217 = 156 164 145 147 145 162                                     V85=B3347214531662562;


                                                                       [ okq053.txt

                                                                       [ Page 53 - BAW
V-store at 03220 = 010 043 142 157 157 154                                   V86=B0202154233667554;
V-store at 03221 = 145 141 156 006 043 141                                   V87=B3126055601421541;
V-store at 03222 = 162 162 141 171 012 043                                   V88=B3447114136205043;
V-store at 03223 = 160 162 157 143 145 144                                   V89=B3407115730662544;
V-store at 03224 = 165 162 145 007 043 163                                   V90=B3527114501621563;
V-store at 03225 = 167 151 164 143 150 006                                   V91=B3566456430664006;
V-store at 03226 = 043 154 141 142 145 154                                   V92=B1066614130462554;
V-store at 03227 = 007 043 163 164 162 151                                   V93=B0162156335071151;
V-store at 03230 = 156 147 010 043 143 157                                   V94=B3346341010661557;
V-store at 03231 = 155 155 145 156 164 003                                   V95=B3326654533472003;
V-store at 03232 = 043 151 146 004 043 146                                   V96=B1066454601021546;
V-store at 03233 = 157 162 005 043 147 157                                   V97=B3367100510663557;
V-store at 03234 = 164 157 004 043 157 167                                   V98=B3506740410667567;
V-store at 03235 = 156 005 043 164 150 145                                   V99=B3340244335064145;
V-store at 03236 = 156 006 043 167 150 151                                   V100=B3340304335664151;
V-store at 03237 = 154 145 004 043 145 156                                   V101=B3306240410662556;
V-store at 03240 = 144 006 043 166 141 154                                   V102=B3100304335460554;
V-store at 03241 = 165 145 005 043 145 154                                   V103=B3526240510662554;
V-store at 03242 = 163 145 005 043 163 164                                   V104=B3466240510671564;
V-store at 03243 = 145 160 006 043 165 156                                   V105=B3127000610672556;
V-store at 03244 = 164 151 154 006 043 146                                   V106=B3506455401421546;
V-store at 03245 = 141 154 163 145 003 043                                   V107=B3026616331201443;
V-store at 03246 = 144 157 005 043 164 162                                   V108=B3106740510672162;
V-store at 03247 = 165 145 000 000 000 000                                   V109=B3526240000000000;
=== Start P260V85; at address 1790
                                                                       P260V85;      (5 CHANNEL INPUT TABLE);
V-store at 03250 = 364 000 000 000 000 000                                   V0=B7500000000000000;
V-store at 03251 = 000 022 006 312 000 000                                   V1=Q18/AV34/0;
V-store at 03252 = 140 006 001 140 046 003                                   V2=B3000300130023003;
V-store at 03253 = 140 106 005 140 146 007                                   V3=B3004300530063007;
                                                                       [ okq054.txt

                                                                       [ page 54

V-store at 03254 = 140 206 011 140 246 013                                     V4=B3010301130123013;
V-store at 03255 = 140 306 015 140 346 017                                     V5=B3014301530163017;
V-store at 03256 = 141 006 021 141 046 023                                     V6=B3020302130223023;
V-store at 03257 = 141 106 025 141 146 027                                     V7=B3024302530263027;
V-store at 03260 = 141 206 031 141 246 033                                     V8=B3030303130323033;
V-store at 03261 = 141 306 035 141 346 037                                     V9=B3034303530363037;
V-store at 03262 = 020 010 001 200 052 377                                     V10=B0400400140025377;
V-store at 03263 = 200 111 204 231 110 007                                     V11=B4004460446244007;
V-store at 03264 = 200 211 322 232 051 321                                     V12=B4010472246424721;
V-store at 03265 = 200 251 240 231 351 246                                     V13=B4012 4640 4636 4646;
V-store at 03266 = 200 011 302 233 050 003                                     V14=B4000470246624003;
V-store at 03267 = 233 230 005 200 151 241                                     V15=B4671400540064641;
V-store at 03270 = 233 030 011 234 027 020                                     V16=B4661401147013420;
V-store at 03271 = 200 266 075 020 001 000                                     V17=B401330750400 0400;
V-store at 03272 = 144 006 101 144 046 103                                     V18=B3100310131023103;
V-store at 03273 = 144 106 105 144 146 107                                     V19=B3104310531063107;
V-store at 03274 = 144 206 111 144 246 113                                     V20=B3110311131123113;
V-store at 03275 = 144 306 115 144 346 117                                     V21=B3114311531163117;
V-store at 03276 = 145 006 121 145 046 123                                     V22=B3120312131223123;
V-store at 03277 = 145 106 125 145 146 127                                     V23=B3124312531263127;
V-store at 03300 = 145 206 131 145 246 133                                     V24=B3130313131323133;
V-store at 03301 = 145 306 135 145 346 137                                     V25=B3134313531363137;
V-store at 03302 = 177 010 046 202 170 050                                     V26=B3760404640474050;
V-store at 03303 = 202 230 052 202 270 054                                     V27=B4051405240534054;
V-store at 03304 = 202 330 056 202 370 060                                     V28=B4055405640574060;
V-store at 03305 = 203 030 062 203 070 064                                     V29=B4061406240634064;
V-store at 03306 = 203 130 066 203 170 070                                     V30=B4065406640674070;
V-store at 03307 = 203 230 072 203 270 074                                     V31=B4071407240734074;
V-store at 03310 = 203 330 076 203 361 000                                     V32=B4075407640770400;


                                                                       [ okq055.txt

                                                                       [ page 55

V-store at 03311 = 200 266 175 230 341 000                                     V33=B4013 3175 4616 0400;
V-store at 03312 = 000 057 363 377 300 005                                     V34=B0002776377740005;
V-store at 03313 = 010 033 054 000 200 202                                     V35=B0201545400100202;
V-store at 03314 = 302 300 013 011 052 154                                     V36=B6054001302225154;
V-store at 03315 = 000 340 230 242 300 021                                     V37=B0016023050540021;
V-store at 03316 = 013 130 114 001 100 211                                     V38=B0265411400240211;
V-store at 03317 = 224 300 027 011 223 154                                     V39=B4514002702311554;
V-store at 03320 = 001 240 215 072 320 042                                     V40=B0032021516550042;
V-store at 03321 = 011 323 061 071 022 341                                     V41=B0235146116211341;
V-store at 03322 = 061 100 306 071 220 054                                     V42=B1424030616310054;
V-store at 03323 = 067 220 313 072 022 244                                     V43=B1571031316411244;
V-store at 03324 = 015 320 000 000 000 000                                     V44=B0335000000000000;
V-store at 03325 = 053 220 067 046 220 064                                     V45=B1271006711510064;
V-store at 03326 = 061 023 201 052 100 315                                     V46=B1421160112440315;
V-store at 03327 = 064 023 164 010 142 351                                     V47=B1501156402061351;
V-store at 03330 = 004 162 274 003 300 205                                     V48=B0107127400740205;
V-store at 03331 = 062 220 100 065 100 263                                     V49=B1451010015240263;
V-store at 03332 = 063 023 221 052 022 301                                     V50=B1461162112411301;
V-store at 03333 = 052 023 164 004 042 251                                     V51=B1241156401021251;
V-store at 03334 = 005 123 071 004 322 224                                     V52=B0125147101151224;
V-store at 03335 = 011 303 151 005 023 264                                     V53=B0234155101211664;
V-store at 03336 = 014 063 021 070 022 244                                     V54=B0303142116011244;
V-store at 03337 = 012 123 211 006 203 311                                     V55=B0245161101501711;
V-store at 03340 = 005 342 341 071 022 201                                     V56=B0136134116211201;
V-store at 03341 = 055 100 130 071 022 251                                     V57=B1324013016211251;
V-store at 03342 = 006 063 124 013 143 161                                     V58=B0143152402661561;
V-store at 03343 = 056 023 061 054 100 172                                     V59=B1341146113040172;
V-store at 03344 = 051 220 160 064 300 155                                     V60=B1231016015140155;
V-store at 03345 = 015 142 341 073 100 221                                     V61=B0326134116640221;

                                                                       [ okq056.txt

                                                                       [ page 56

V-store at 03346 = 046 220 173 063 220 166                                     V62=B1151017314710166;
V-store at 03347 = 051 100 223 067 023 161                                     V63=B1224022315611561;
V-store at 03350 = 046 023 344 004 202 171                                     V64=B1141174401101171;
V-store at 03351 = 010 242 251 010 062 301                                     V65=B0212125102031301;
V-store at 03352 = 056 023 064 010 303 101                                     V66=B1341146402141501;
V-store at 03353 = 064 023 021 052 022 141                                     V67=B1501142112411141;
V-store at 03354 = 063 100 103 064 220 222                                     V68=B1464010315110222;
V-store at 03355 = 074 220 220 063 100 217                                     V69=B1711022014640217;
V-store at 03356 = 067 100 243 067 220 230                                     V70=B1564024315710230;
V-store at 03357 = 052 022 141 061 100 101                                     V71=B1241114114240101;
V-store at 03360 = 065 220 243 067 023 101                                     V72=B1531024315611501;
V-store at 03361 = 050 022 241 051 023 241                                     V73=B1201124112211641;
V-store at 03362 = 067 022 244 005 003 031                                     V74=B1561124401201431;
V-store at 03363 = 012 242 141 047 022 241                                     V75=B0252114111611241;
V-store at 03364 = 061 100 171 050 220 263                                     V76=B1424017112110263;
V-store at 03365 = 064 023 041 062 022 241                                     V77=B1501144114411241;
V-store at 03366 = 063 023 224 010 003 071                                     V78=B1461162402001471;
V-store at 03367 = 013 203 101 071 100 203                                     V79=B0270150116240203;
V-store at 03370 = 054 220 276 064 023 221                                     V80=B1311027615011621;
V-store at 03371 = 064 100 210 074 220 305                                     V81=B1504021017110305;
V-store at 03372 = 055 022 341 061 022 244                                     V82=B1321134114211244;
V-store at 03373 = 011 143 261 046 023 021                                     V83=B0226166111411421;
V-store at 03374 = 072 022 244 011 362 321                                     V84=B1641124402371321;
V-store at 03375 = 052 023 064 011 120 000                                     V85=B1241146402250000;
=== Start P261V109; at address 1900
                                                                       P261V109;       (LINE PRINTER OUTPUT TABLE);
V-store at 03376 = 007 000 007 001 007 002                                     V0=QAV2/AV3/AV4;
V-store at 03377 = 000 001 007 105 007 005                                     V1=Q1/AV71/AV7;
V-store at 03400 = 007 220 074 000 000 001                             V2=B0171007400000001;
V-store at 03401 = 010 077 100 000 000 000                                     V3=B0203750000000000;

                                                                       [ okq057.txt

                                                                       [ page 57

V-store at 03402 = 376 000 000 000 000 000                                     V4=B7740000000000000;
V-store at 03403 = 003 360 040 000 000 000                                     V5=B0077004000000000;
V-store at 03404 = 200 000 000 200 050 003                                     V6=B4000000040024003;
V-store at 03405 = 201 010 021 201 050 023                                     V7=B4020402140224023;
V-store at 03406 = 201 110 025 201 150 027                                     V8=B4024402540264027;
V-store at 03407 = 201 210 031 201 270 037                                     V9=B4030403140334037;
V-store at 03410 = 202 030 042 202 070 044                                     V10=B4041404240434044;
V-store at 03411 = 202 130 046 202 170 050                                     V11=B4045404640474050;
V-store at 03412 = 202 230 052 202 270 054                                     V12=B4051405240534054;
V-store at 03413 = 202 330 056 202 370 060                                     V13=B4055405640574060;
V-store at 03414 = 203 030 062 203 070 064                                     V14=B4061406240634064;
V-store at 03415 = 203 130 066 203 170 070                                     V15=B4065406640674070;
V-store at 03416 = 203 230 072 206 030 142                                     V16=B4071407241414142;
V-store at 03417 = 206 070 144 206 130 146                                     V17=B4143414441454146;
V-store at 03420 = 206 170 150 206 230 152                                     V18=B4147415041514152;
V-store at 03421 = 206 270 154 206 330 156                                     V19=B4153415441554156;
V-store at 03422 = 206 370 160 207 030 162                                     V20=B4157416041614162;
V-store at 03423 = 207 070 164 207 130 166                                     V21=B4163416441654166;
V-store at 03424 = 207 170 170 207 230 172                                     V22=B4167417041714172;
V-store at 03425 = 000 000 001 000 220 024                                     V23=B0000000100110024;
V-store at 03426 = 000 000 000 000 000 000                                     V24=B0000000000000000;
V-store at 03427 = 002 020 000 000 000 000                                     V25=B0041000000000000;
V-store at 03430 = 000 000 000 000 000 000                                     V26=B0000000000000000;
V-store at 03431 = 002 240 000 000 000 000                                     V27=B0052000000000000;
V-store at 03433 = 003 220 000 000 000 000                                     V29=B0071000000000000;
V-store at 03443 = 000 000 103 004 300 000                                     V37=B0000010301140000;
V-store at 03445 = 005 200 143 011 060 153                                     V39=B0130014302230153;
V-store at 03446 = 204 240 162 007 200 000                                     V40=B4112016201700000;
V-store at 03447 = 007 320 205 000 000 000                                     V41=B0175020500000000;

                                                                       [ okq058.txt

                                                                       [ page 58

V-store at 03450 = 010 240 150 200 300 231                                     V42=B0212015040140231;
V-store at 03451 = 000 000 240 012 120 253                                     V43=B0000024002450253;
V-store at 03452 = 204 260 262 013 240 000                                     V44=B4113026202720000;
V-store at 03453 = 201 300 303 000 000 000                                     V45=B4034030300000000;
V-store at 03454 = 014 200 315 200 000 322                                     V46=B0310031540000322;
V-store at 03455 = 200 050 017 204 220 333                                     V47=B4002401741110333;
V-store at 03456 = 000 000 341 200 340 000                                     V48=B0000034140160000;
V-store at 03460 = 000 000 000 200 100 000                                     V50=B0000000040040000;
V-store at 03461 = 000 010 015 016 220 355                                     V51=B0000401503510355;
V-store at 03462 = 000 000 364 017 220 000                                     V52=B0000036403710000;
V-store at 03463 = 000 010 010 000 000 000                                     V53=B0000401000000000;
V-store at 03465 = 000 010 035 020 021 005                                     V55=B0000403504010405;
V-store at 03466 = 000 000 000 020 300 000                                     V56=B0000000004140000;
V-store at 03470 = 000 001 025 000 000 000                                     V58=B0000042500000000;
V-store at 03471 = 000 010 036 022 000 000                                     V59=B0000403604400000;
V-store at 03472 = 000 000 000 022 100 000                                     V60=B0000000004440000;
V-store at 03474 = 000 001 052 000 000 000                                     V62=B0000045200000000;
V-store at 03505 = 000 005 115 162 145 141                                     V71=B0000251534462541;
V-store at 03506 = 154 010 115 151 156 164                                     V72=B3300411532267164;
V-store at 03507 = 145 147 145 162 010 115                                     V73=B3126354534404115;
V-store at 03510 = 142 157 157 154 145 141                                     V74=B3046755733062541;
V-store at 03511 = 156 006 115 141 162 162                                     V75=B3340311530271162;
V-store at 03512 = 141 171 012 115 160 162                                     V76=B3027441223270162;
V-store at 03513 = 157 143 145 144 165 162                                     V77=B3366154531072562;
V-store at 03514 = 145 007 115 163 167 151                                     V78=B3120351534673551;
V-store at 03515 = 164 143 150 006 115 154                                     V79=B3506155001446554;
V-store at 03516 = 141 142 145 154 007 115                                     V80=B3026114533003515;
V-store at 03517 = 163 164 162 151 156 147                                     V81=B3467216232267147;
V-store at 03520 = 010 115 143 157 155 155                                     V82=B0204654333666555;

                                                                       [ okq059.txt

                                                                       [ page 59

V-store at 03521 = 145 156 164 002 115 015                                     V83=B3126716400446415;
V-store at 03522 = 002 115 161 004 115 156                                     V84=B0044656101046556;
V-store at 03523 = 157 164 003 115 151 146                                     V85=B3367200323264546;
V-store at 03524 = 004 115 146 157 162 005                                     V86=B0104654633671005;
V-store at 03525 = 115 147 157 164 157 002                                     V87=B2326355735067402;
V-store at 03526 = 115 112 006 115 142 145                                     V88=B2324500623261145;
V-store at 03527 = 147 151 156 003 115 154                                     V89=B3166455600646554;
V-store at 03530 = 164 004 115 157 167 156                                     V90=B3500211533673556;
V-store at 03531 = 004 115 144 151 166 003                                     V91=B0104654432273003;
V-store at 03532 = 115 154 145 004 115 141                                     V92=B2326614501046541;
V-store at 03533 = 156 144 005 115 164 150                                     V93=B3346200523272150;
V-store at 03534 = 145 156 006 115 167 150                                     V94=B3126700623273550;
V-store at 03535 = 151 154 145 002 115 113                                     V95=B3226614500446513;
V-store at 03536 = 004 115 145 156 144 002                                     V96=B0104654533462002;
V-store at 03537 = 115 165 006 115 166 141                                     V97=B2327240623273141;
V-store at 03540 = 154 165 145 003 115 157                                     V98=B3307254500646557;
V-store at 03541 = 162 005 115 145 154 163                                     V99=B3440251531266163;
V-store at 03542 = 145 003 115 147 145 004                                     V100=B3120151531662404;
V-store at 03543 = 115 151 155 160 002 110                                     V101=B2326455534001110;
V-store at 03544 = 111 005 115 163 164 145                                     V102=B2220251534672145;
V-store at 03545 = 160 003 115 147 164 004                                     V103=B3400151531672004;
V-store at 03546 = 115 145 161 166 006 115                                     V104=B2326256135403115;
V-store at 03547 = 165 156 164 151 154 006                                     V105=B3526716432266006;
V-store at 03550 = 115 146 141 154 163 145                                     V106=B2326314133071545;
V-store at 03551 = 003 115 156 145 003 115                                     V107=B0064655631201515;
V-store at 03552 = 144 157 005 115 164 162                                     V108=B3106740523272162;
V-store at 03553 = 165 145 000 000 000 000                                     V109=B3526240000000000;
=== Start P262V86; at address 1987
                                                                       P262V86;          (LINE PRINTER INPUT TABLE);

                                                                       [ okq060.txt

                                                                       [ page 60

V-store at 03554 = 010 077 173 360 000 000                             V0=B0203757374000000;
V-store at 03555 = 000 022 007 216 000 000                                     V1=Q18/AV34/0;
V-store at 03556 = 231 346 001 332 001 000                                     V2=B4636300166400400;
V-store at 03557 = 232 346 005 140 146 007                                     V3=B4656300530063007;
V-store at 03560 = 233 226 011 140 246 013                                     V4=B4671301130123013;
V-store at 03561 = 230 351 261 232 151 241                                     V5=B4616466146464641;
V-store at 03562 = 200 010 001 200 050 003                                     V6=B4000400140024003;
V-store at 03563 = 200 110 005 200 150 007                                     V7=B4004400540064007;
V-store at 03564 = 200 210 011 141 250 012                                     V8=B4010401130324012;
V-store at 03565 = 231 211 301 235 030 013                                     V9=B4630470147214013;
V-store at 03566 = 161 010 014 200 330 016                                     V10=B3420401440154016;
V-store at 03567 = 200 370 020 201 030 022                                     V11=B4017402040214022;
V-store at 03570 = 201 070 024 201 130 026                                     V12=B4023402440254026;
V-store at 03571 = 201 170 030 201 230 032                                     V13=B4027403040314032;
V-store at 03572 = 201 270 034 201 330 036                                     V14=B4033403440354036;
V-store at 03573 = 201 370 040 202 030 042                                     V15=B4037404040414042;

V-store at 03574 = 202 070 044 202 121 000                             V16=B4043404440450400;
V-store at 03575 = 020 006 075 143 341 000                             V17=B0400307530760400;
V-store at 03576 = 231 346 101 332 001 000                                     V18=B4636310166400400;
V-store at 03577 = 232 346 105 144 146 107                                     V19=B4656310531063107;
V-store at 03600 = 357 351 242 230 111 224                                     V20=B7376464246044624;
V-store at 03601 = 144 316 377 144 346 117                                     V21=B3114737731163117;
V-store at 03602 = 145 006 121 145 046 123                                     V22=B3120312131223123;
V-store at 03603 = 145 106 125 145 146 127                                     V23=B3124312531263127;
V-store at 03604 = 145 206 131 145 246 133                                     V24=B3130313131323133;
V-store at 03605 = 145 306 135 145 346 137                                     V25=B3134313531363137;
V-store at 03606 = 020 010 046 202 170 050                                     V26=B0400404640474050;
V-store at 03607 = 202 230 052 202 270 054                                     V27=B4051405240534054;


                                                                       [ okq061.txt

V-store at 03610 = 202 330 056 202 370 060                                   V28=B4055405640574060;
V-store at 03611 = 203 030 062 203 070 064                                   V29=B4061406240634064;
V-store at 03612 = 203 130 066 203 170 070                                   V30=B4065406640674070;
V-store at 03613 = 203 230 072 203 270 074                                   V31=B4071407240734074;

V-store at 03614 = 203 330 076 203 361 000                             V32=B4075407640770400;
V-store at 03615 = 020 006 175 147 347 360                             V33=B0400317531763760;
V-store at 03616 = 000 057 352 000 132 044                                   V34=B0002775200055044;
V-store at 03617 = 013 137 363 066 300 011                                   V35=B0265776315540011;
V-store at 03620 = 010 330 114 000 300 211                                   V36=B0215411400140211;

V-store at 03621 = 224 300 017 011 233 034                             V37=B4514001702315434;
V-store at 03622 = 001 040 201 072 320 032                                   V38=B0022020116550032;
V-store at 03623 = 011 323 061 071 022 341                                   V39=B0235146116211341;
V-store at 03624 = 061 100 306 053 220 045                                   V40=B1424030612710045;
V-store at 03625 = 046 220 042 061 023 201                                   V41=B1151004214211601;
V-store at 03626 = 052 100 315 064 023 164                                   V42=B1244031515011564;
V-store at 03627 = 010 143 231 003 002 331                                   V43=B0206163100601331;
V-store at 03630 = 002 302 241 063 100 225                                   V44=B0054124114640225;

V-store at 03631 = 067 023 241 052 100 335                             V45=B1561164112440335;
V-store at 03632 = 056 220 100 053 300 065                                   V46=B1351010012740065;

V-store at 03633 = 010 123 071 003 323 221                             V47=B0205147100751621;
V-store at 03634 = 052 022 301 052 023 164                                   V48=B1241130112411564;
V-store at 03635 = 004 043 041 065 100 263                                   V49=B0102144115240263;
V-store at 03636 = 047 220 117 064 220 112                                   V50=B1171011715110112;
V-store at 03637 = 064 023 021 052 022 141                                   V51=B1501142112411141;
V-store at 03640 = 063 100 103 052 022 301                                   V52=B1464010312411301;

                                                                       [ okq062.txt

V-store at 03641 = 056 023 064 010 302 151                                   V53=B1341146402141151;
V-store at 03642 = 005 243 071 005 122 224                                   V54=B0132147101251224;
V-store at 03643 = 011 063 161 067 022 141                                   V55=B0223156115611141;
V-store at 03644 = 076 100 110 070 220 155                                   V56=B1744011016110155;
V-store at 03645 = 074 220 143 056 023 221                                   V57=B1711014313411621;
V-store at 03646 = 050 022 324 005 203 221                                   V58=B1201132401301621;
V-store at 03647 = 052 220 150 065 100 266                                   V59=B1251015015240266;
V-store at 03650 = 067 022 341 063 022 304                                   V60=B1561134114611304;
V-store at 03651 = 007 243 111 007 123 174                                   V61=B0172151101651574;
V-store at 03652 = 007 040 243 074 023 064                                   V62=B0162024317011464;
V-store at 03653 = 010 362 251 010 063 071                                   V63=B0217125102031471;
V-store at 03654 = 007 262 224 011 303 151                                   V64=B0173122402341551;
V-store at 03655 = 007 363 264 014 063 021                                   V65=B0177166403031421;
V-store at 03656 = 070 022 244 012 123 171                                   V66=B1601124402451571;
V-store at 03657 = 010 222 241 046 023 024                                   V67=B0211124111411424;
V-store at 03660 = 004 023 131 011 103 161                                   V68=B0101153102241561;
V-store at 03661 = 064 022 201 052 022 221                                   V69=B1501120112411221;
V-store at 03662 = 072 023 161 052 100 120                                   V70=B1641156112440120;
V-store at 03663 = 061 220 241 046 220 234                                   V71=B1431024111510234;
V-store at 03664 = 047 022 241 061 100 171                                   V72=B1161124114240171;
V-store at 03665 = 052 300 237 011 043 224                                   V73=B1254023702221624;
V-store at 03666 = 010 042 211 012 243 101                                   V74=B0202121102521501;
V-store at 03667 = 062 023 041 052 023 061                                   V75=B1441144112411461;
V-store at 03670 = 071 100 200 063 220 262                                   V76=B1624020014710262;
V-store at 03671 = 064 220 260 071 100 203                                   V77=B1511026016240203;
V-store at 03672 = 052 100 322 054 220 276                                   V78=B1244032213110276;
V-store at 03673 = 064 220 271 071 023 104                                   V79=B1511027116211504;
V-store at 03674 = 010 202 254 013 300 262                                   V80=B0210125402740262;
V-store at 03675 = 071 100 302 074 220 305                                   V81=B1624030217110305;

                                                                       [ okq063.txt

V-store at 03676 = 055 022 341 061 022 244                                   V82=B1321134114211244;
V-store at 03677 = 011 143 271 014 302 141                                   V83=B0226167103141141;
V-store at 03700 = 061 023 241 052 100 237                                   V84=B1421164112440237;

V-store at 03701 = 051 023 114 015 000 326                             V85=B1221151403200326;
V-store at 03702 = 056 023 264 011 020 000                                   V86=B1341166402210000;
=== Start P263V121; at address 2109
                                                                       P263V121;      (8 CHANNEL OUTPUT TABLE);
V-store at 03703 = 007 305 007 306 007 307                                   V0=QAV2/AV3/AV4;
V-store at 03704 = 000 001 010 012 007 312                                   V1=Q1/AV71/AV7;
V-store at 03705 = 007 220 074 000 000 001                                   V2=B0171007400000001;
V-store at 03706 = 364 040 300 000 000 000                                   V3=B7502030000000000;
V-store at 03707 = 030 166 234 000 000 000                                   V4=B0607323400000000;
V-store at 03710 = 000 160 006 000 000 000                                   V5=B0007000600000000;
V-store at 03711 = 200 010 004 200 050 003                                   V6=B4000400440024003;
V-store at 03712 = 201 010 021 201 050 023                                   V7=B4020402140224023;
V-store at 03713 = 201 110 025 201 150 027                                   V8=B4024402540264027;
V-store at 03714 = 201 210 031 201 270 037                                   V9=B4030403140334037;
V-store at 03715 = 202 030 042 202 070 044                                   V10=B4041404240434044;
V-store at 03716 = 202 130 046 202 170 050                                   V11=B4045404640474050;
V-store at 03717 = 202 230 052 202 270 054                                   V12=B4051405240534054;
V-store at 03720 = 202 330 056 202 370 060                                   V13=B4055405640574060;
V-store at 03721 = 203 030 062 203 070 064                                   V14=B4061406240634064;
V-store at 03722 = 203 130 066 203 170 070                                   V15=B4065406640674070;
V-store at 03723 = 203 230 072 206 030 142                                   V16=B4071407241414142;
V-store at 03724 = 206 070 144 206 130 146                                   V17=B4143414441454146;
V-store at 03725 = 206 170 150 206 230 152                                   V18=B4147415041514152;
V-store at 03726 = 206 270 154 206 330 156                                   V19=B4153415441554156;
V-store at 03727 = 206 370 160 207 030 162                                   V20=B4157416041614162;
V-store at 03730 = 207 070 164 207 130 166                                   V21=B4163416441654166;

                                                                       [ okq064.txt

V-store at 03731 = 207 170 170 207 230 172                                   V22=B4167417041714172;
V-store at 03732 = 000 000 001 000 300 041                                   V23=B0000000100140041;
V-store at 03734 = 003 100 000 000 000 000                                   V25=B0064000000000000;
V-store at 03736 = 004 060 000 000 000 000                                   V27=B0103000000000000;
V-store at 03740 = 005 300 000 000 000 000                                   V29=B0134000000000000;
V-store at 03750 = 000 000 155 007 300 000                                   V37=B0000015501740000;
V-store at 03752 = 010 330 120 205 060 242                                   V39=B0215412041230242;
V-store at 03753 = 205 200 253 013 040 000                                   V40=B4130025302620000;
V-store at 03754 = 013 270 121 000 000 000                                   V41=B0273412100000000;
V-store at 03755 = 030 040 323 205 340 330                                   V42=B0602032341360330;
V-store at 03756 = 000 010 127 016 020 344                                   V43=B0000412703410344;
V-store at 03757 = 205 220 355 017 240 000                                   V44=B4131035503720000;
V-store at 03760 = 201 310 122 000 000 000                                   V45=B4034412200000000;
V-store at 03761 = 020 221 022 200 001 025                                   V46=B0411042240000425;
V-store at 03762 = 200 050 017 205 121 044                                   V47=B4002401741250444;
V-store at 03763 = 000 001 053 205 360 000                                   V48=B0000045341370000;
V-store at 03765 = 000 000 000 200 100 000                                   V50=B0000000040040000;
V-store at 03766 = 000 010 126 023 201 073                                   V51=B0000412604700473;
V-store at 03767 = 000 001 104 024 220 000                                   V52=B0000050405110000;
V-store at 03770 = 000 010 117 000 000 000                                   V53=B0000411700000000;
V-store at 03772 = 000 010 035 205 101 124                                   V55=B0000403541240524;
V-store at 03773 = 000 000 000 025 320 000                                   V56=B0000000005350000;
V-store at 03775 = 000 001 154 000 000 000                                   V58=B0000055400000000;
V-store at 03776 = 000 010 036 205 320 000                                   V59=B0000403641350000;
V-store at 03777 = 000 000 000 027 260 000                                   V60=B0000000005730000;
V-store at 04001 = 000 000 310 000 000 000                                   V62=B0000031000000000;
V-store at 04012 = 000 010 132 162 132 145                                   V71=B0000413234455145;
V-store at 04013 = 132 141 132 154 016 132                                   V72=B2646053233007132;
V-store at 04014 = 151 132 156 132 164 132                                   V73=B3225515626472132;
                                                                       [ okq065.txt

V-store at 04015 = 145 132 147 132 145 132                                   V74=B3125514726462532;
V-store at 04016 = 162 016 132 142 132 157                                   V75=B3440713230455157;
V-store at 04017 = 132 157 132 154 132 145                                   V76=B2646753233055145;
V-store at 04020 = 132 141 132 156 012 132                                   V77=B2646053233405132;
V-store at 04021 = 141 132 162 132 162 132                                   V78=B3025516226471132;
V-store at 04022 = 141 132 171 022 132 160                                   V79=B3025517104455160;
V-store at 04023 = 132 162 132 157 132 143                                   V80=B2647113233655143;
V-store at 04024 = 132 145 132 144 132 165                                   V81=B2646253231055165;
V-store at 04025 = 132 162 132 145 014 132                                   V82=B2647113231206132;
V-store at 04026 = 163 132 167 132 151 132                                   V83=B3465516726464532;
V-store at 04027 = 164 132 143 132 150 012                                   V84=B3505514326464012;
V-store at 04030 = 132 154 132 141 132 142                                   V85=B2646613230255142;
V-store at 04031 = 132 145 132 154 014 132                                   V86=B2646253233006132;
V-store at 04032 = 163 132 164 132 162 132                                   V87=B3465516426471132;
V-store at 04033 = 151 132 156 132 147 016                                   V88=B3225515626463416;
V-store at 04034 = 132 143 132 157 132 155                                   V89=B2646153233655155;
V-store at 04035 = 132 155 132 145 132 156                                   V90=B2646653231255156;
V-store at 04036 = 132 164 006 132 156 132                                   V91=B2647200626467132;
V-store at 04037 = 157 132 164 004 132 151                                   V92=B3365516401055151;
V-store at 04040 = 132 146 006 132 146 132                                   V93=B2646300626463132;
V-store at 04041 = 157 132 162 010 132 147                                   V94=B3365516202055147;
V-store at 04042 = 132 157 132 164 132 157                                   V95=B2646753235055157;
V-store at 04043 = 010 132 164 132 162 132                                   V96=B0205516426471132;
V-store at 04044 = 165 132 145 002 132 121                                   V97=B3525514500455121;
V-store at 04045 = 006 132 157 132 167 132                                   V98=B0145515726473532;
V-store at 04046 = 156 002 132 123 006 132                                   V99=B3340113224603132;
V-store at 04047 = 141 132 156 132 144 010                                   V100=B3025515626462010;
V-store at 04050 = 132 164 132 150 132 145                                   V101=B2647213232055145;
V-store at 04051 = 132 156 012 132 167 132                                   V102=B2646701226473532;

                                                                       [ okq066.txt

V-store at 04052 = 150 132 151 132 154 132                                   V103=B3205515126466132;
V-store at 04053 = 145 006 132 145 132 156                                   V104=B3120313231255156;
V-store at 04054 = 132 144 002 132 122 012                                   V105=B2646200226451012;
V-store at 04055 = 132 166 132 141 132 154                                   V106=B2647313230255154;
V-store at 04056 = 132 165 132 145 004 132                                   V107=B2647253231202132;
V-store at 04057 = 157 132 162 010 132 145                                   V108=B3365516202055145;
V-store at 04060 = 132 154 132 163 132 145                                   V109=B2646613234655145;
V-store at 04061 = 002 132 124 006 132 151                                   V110=B0045512401455151;
V-store at 04062 = 132 155 132 160 002 117                                   V111=B2646653234001117;
V-store at 04063 = 125 010 132 163 132 164                                   V112=B2520413234655164;
V-store at 04064 = 132 145 132 160 006 132                                   V113=B2646253234003132;
V-store at 04065 = 145 132 161 132 166 012                                   V114=B3125516126473012;
V-store at 04066 = 132 165 132 156 132 164                                   V115=B2647253233455164;
V-store at 04067 = 132 151 132 154 012 132                                   V116=B2646453233005132;
V-store at 04070 = 146 132 141 132 154 132                                   V117=B3145514126466132;
V-store at 04071 = 163 132 145 004 132 144                                   V118=B3465514501055144;
V-store at 04072 = 132 157 012 132 142 132                                   V119=B2646741226461132;
V-store at 04073 = 145 132 147 132 151 132                                   V120=B3125514726464532;
V-store at 04074 = 156 000 000 000 000 000                                   V121=B3340000000000000;
=== Start P264V104; at address 2214
                                                                       P264V104;      (8 CHANNEL INPUT TABLE);
V-store at 04075 = 364 000 000 000 000 000                                   V0=B7500000000000000;
V-store at 04076 = 000 022 010 137 000 000                                   V1=Q18/AV34/0;
V-store at 04077 = 231 346 001 332 001 000                                   V2=B4636300166400400;
V-store at 04100 = 232 340 005 161 001 000                                   V3=B4656000534200400;
V-store at 04101 = 140 206 011 140 246 013                                   V4=B3010301130123013;
V-store at 04102 = 140 306 015 140 351 241                                   V5=B3014301530164641;
V-store at 04103 = 200 010 001 200 050 003                                   V6=B4000400140024003;
V-store at 04104 = 200 110 005 200 150 007                                   V7=B4004400540064007;
V-store at 04105 = 200 210 011 357 370 012                                   V8=B4010401173774012;

                                                                       [ okq067.txt

V-store at 04106 = 231 211 301 235 030 013                                   V9=B4630470147214013;
V-store at 04107 = 142 010 014 200 330 016                                   V10=B3040401440154016;
V-store at 04110 = 200 370 020 201 030 022                                   V11=B4017402040214022;
V-store at 04111 = 201 070 024 201 130 026                                   V12=B4023402440254026;
V-store at 04112 = 201 170 030 201 230 032                                   V13=B4027403040314032;
V-store at 04113 = 201 270 034 201 330 036                                   V14=B4033403440354036;
V-store at 04114 = 201 370 040 202 030 042                                   V15=B4037404040414042;
V-store at 04115 = 202 070 044 202 126 073                                   V16=B4043404440453073;
V-store at 04116 = 143 306 075 143 341 000                                   V17=B3074307530760400;
V-store at 04117 = 231 346 101 332 001 000                                   V18=B4636310166400400;
V-store at 04120 = 232 346 105 020 007 360                                   V19=B4656310504003760;
V-store at 04121 = 144 206 111 144 246 113                                   V20=B3110311131123113;
V-store at 04122 = 144 306 115 144 352 376                                   V21=B3114311531165376;
V-store at 04123 = 230 031 211 231 231 202                                   V22=B4601461146314602;
V-store at 04124 = 234 051 242 233 031 221                                   V23=B4702464246614621;
V-store at 04125 = 230 111 224 357 366 133                                   V24=B4604462473773133;
V-store at 04126 = 231 211 322 230 351 246                                   V25=B4630472246164646;
V-store at 04127 = 146 010 046 202 170 050                                   V26=B3140404640474050;
V-store at 04130 = 202 230 052 202 270 054                                   V27=B4051405240534054;
V-store at 04131 = 202 330 056 202 370 060                                   V28=B4055405640574060;
V-store at 04132 = 203 030 062 203 070 064                                   V29=B4061406240634064;
V-store at 04133 = 203 130 066 203 170 070                                   V30=B4065406640674070;
V-store at 04134 = 203 230 072 203 270 074                                   V31=B4071407240734074;
V-store at 04135 = 203 330 076 203 366 173                                   V32=B4075407640773173;
V-store at 04136 = 147 306 175 147 341 000                                   V33=B3174317531760400;
V-store at 04137 = 000 057 356 000 140 271                                   V34=B0002775600060271;
V-store at 04140 = 242 100 265 377 070 234                                   V35=B5044026577634234;
V-store at 04141 = 000 240 215 231 300 015                                   V36=B0012021546340015;
V-store at 04142 = 011 330 054 001 000 222                                   V37=B0235405400200222;

                                                                       [ okq068.txt

V-store at 04143 = 302 300 023 013 042 272                                   V38=B6054002302621272;
V-store at 04144 = 002 077 361 046 240 037                                   V39=B0043776111520037;
V-store at 04145 = 377 023 022 377 023 202                                   V40=B7761142277611602;
V-store at 04146 = 377 022 244 014 323 102                                   V41=B7761124403151502;
V-store at 04147 = 377 023 164 010 143 232                                   V42=B7761156402061632;
V-store at 04150 = 003 077 361 067 240 055                                   V43=B0063776115720055;
V-store at 04151 = 377 023 242 377 022 244                                   V44=B7761164277611244;
V-store at 04152 = 015 322 322 377 022 242                                   V45=B0335132277611242;
V-store at 04153 = 377 023 064 011 122 352                                   V46=B7761146402251352;
V-store at 04154 = 004 257 361 053 300 071                                   V47=B0112776112740071;
V-store at 04155 = 010 123 072 004 157 361                                   V48=B0205147201067761;
V-store at 04156 = 071 057 361 052 057 361                                   V49=B1622776112427761;
V-store at 04157 = 054 057 361 052 057 361                                   V50=B1302776112427761;
V-store at 04160 = 067 100 102 062 057 361                                   V51=B1564010214427761;
V-store at 04161 = 065 100 263 047 240 142                                   V52=B1524026311720142;
V-store at 04162 = 377 023 112 005 257 361                                   V53=B7761151201327761;
V-store at 04163 = 064 057 361 061 057 361                                   V54=B1502776114227761;
V-store at 04164 = 052 057 361 046 057 361                                   V55=B1242776111427761;
V-store at 04165 = 063 100 103 052 057 361                                   V56=B1464010312427761;
V-store at 04166 = 054 057 361 056 057 361                                   V57=B1302776113427761;
V-store at 04167 = 063 100 214 046 240 162                                   V58=B1464021411520162;
V-store at 04170 = 377 023 172 006 357 361                                   V59=B7761157201567761;
V-store at 04171 = 067 057 361 046 057 361                                   V60=B1562776111427761;
V-store at 04172 = 076 100 110 063 057 361                                   V61=B1744011014627761;
V-store at 04173 = 051 100 223 070 240 217                                   V62=B1224022316120217;
V-store at 04174 = 377 023 312 010 017 361                                   V63=B7761171202007761;
V-store at 04175 = 056 057 361 071 057 361                                   V64=B1342776116227761;
V-store at 04176 = 050 057 361 055 100 130                                   V65=B1202776113240130;
V-store at 04177 = 071 057 361 052 240 207                                   V66=B1622776112520207;

                                                                       [ okq069.txt

V-store at 04200 = 377 023 124 013 143 162                                   V67=B7761152402661562;
V-store at 04201 = 377 022 342 377 023 062                                   V68=B7761134277611462;
V-store at 04202 = 377 022 304 007 243 112                                   V69=B7761130401721512;
V-store at 04203 = 011 237 361 067 300 225                                   V70=B0231776115740225;
V-store at 04204 = 012 063 302 377 023 064                                   V71=B0243170277611464;
V-store at 04205 = 010 362 252 012 317 361                                   V72=B0217125202547761;
V-store at 04206 = 063 240 241 377 022 224                                   V73=B1472024177611224;
V-store at 04207 = 011 303 032 012 217 361                                   V74=B0234143202507761;
V-store at 04210 = 070 057 361 052 100 245                                   V75=B1602776112440245;
V-store at 04211 = 066 057 361 073 100 303                                   V76=B1542776116640303;
V-store at 04212 = 067 240 265 377 022 242                                   V77=B1572026577611242;
V-store at 04213 = 377 022 142 377 023 024                                   V78=B7761114277611424;
V-store at 04214 = 004 023 132 014 217 361                                   V79=B0101153203107761;
V-store at 04215 = 067 057 361 064 057 361                                   V80=B1562776115027761;
V-store at 04216 = 050 057 361 052 057 361                                   V81=B1202776112427761;
V-store at 04217 = 051 057 361 072 057 361                                   V82=B1222776116427761;
V-store at 04220 = 067 057 361 052 100 120                                   V83=B1562776112440120;
V-store at 04221 = 061 240 323 377 022 142                                   V84=B1432032377611142;
V-store at 04222 = 377 022 162 377 022 242                                   V85=B7761116277611242;
V-store at 04223 = 377 023 024 007 222 212                                   V86=B7761142401711212;
V-store at 04224 = 016 057 361 064 057 361                                   V87=B0342776115027761;
V-store at 04225 = 062 057 361 062 057 361                                   V88=B1442776114427761;
V-store at 04226 = 052 057 361 063 057 361                                   V89=B1242776114627761;
V-store at 04227 = 071 100 200 063 240 351                                   V90=B1624020014720351;
V-store at 04230 = 377 023 102 377 023 224                                   V91=B7761150277611624;
V-store at 04231 = 010 062 312 017 057 361                                   V92=B0203131203627761;
V-store at 04232 = 064 057 361 071 057 361                                   V93=B1502776116227761;
V-store at 04233 = 064 100 210 074 240 375                                   V94=B1504021017120375;
V-store at 04234 = 377 022 322 377 022 342                                   V95=B7761132277611342;


                                                                       [ okq070.txt

V-store at 04235 = 377 023 022 377 022 244                                   V96=B7761142277611244;
V-store at 04236 = 011 143 272 020 217 361                                   V97=B0226167204107761;
V-store at 04237 = 046 057 361 061 057 361                                   V98=B1142776114227761;
V-store at 04240 = 072 057 361 052 100 237                                   V99=B1642776112440237;
V-store at 04241 = 072 241 023 377 023 062                                   V100=B1652042377611462;
V-store at 04242 = 377 023 222 377 022 342                                   V101=B7761162277611342;
V-store at 04243 = 377 023 024 014 142 232                                   V102=B7761142403061232;
V-store at 04244 = 021 217 361 064 100 326                                   V103=B0430776115040326;
V-store at 04245 = 015 057 330 004 300 000                                   V104=B0322773001140000;

                                                                       [ P0;     -- no idea what this is supposed to do
=== Start P268V-1; at address 2214
                                                                       P268; (DATA SKIP);
 4246/0: 200 336 247                                                         JS1P295;
 4246/3: 202 270 305                                                         J13;
 4247/0: 170 342|100 340|170 376                                             =M14; M0M14; =Q15;
 4250/0: 171 364|171 362|222 030 260                                   16;   I15; M15; J1=;
 4251/1: 052|110 340|164 301|170 370|171 370                                 ERASE; M0M14N; SHL-32; =C15; C15;
 4252/4: 026|170 371|304 177 377|170 362                                     ABS; =RC15; SET32767; =M15;
 4254/0: 121 340|220 350 277                                           14;   PARQ14; J10TR;
 4254/5: 134 360|120 364|200 350 254                                         MFSKQ15; MLBQ15; J14NTR;
 4256/0: 304 000 001|170 362|204 270 303                                     SET1; =M15; J15;
 4257/2: 304 000 275|210 260 266                                       11;   SET189; JP299; (M AND I ≠);
 4260/2: 033|027|042                                                   1;  NOT; NEG; DUP;
 4260/5: 225 150 272                                                         J2=Z; (M AND I = -1);
 4261/2: 033|027|224 150 262                                                 NOT; NEG; J3=Z; (M AND I = -2);
 4262/1: 202 270 257                                                         J11; (M AND I ≠ -1 OR -2);
 4262/4: 110 340|164 301|170 331|146 320|140 320|134 320               3;    M0M14N; SHL-32; =RC13; I13=2; M+I13; MFSKQ13;
 4264/4: 121 320|220 350 277|120 324|223 350 267                             PARQ13; J10TR; MLBQ13; J17TR;
 4266/2: 136 320|153 017|200 270 250                                         MBSKQ13; IM0TOQ15; J16;

                                                                       [ okq071.txt

 4267/3: 041|033|042|170 364|170 362                                   17;   ZERO; NOT; DUP; =I15; =M15;
 4270/4: 136 320|110 340|164 341|164 041                                     MBSKQ13; M0M14N; SHL-16; SHL+16;
 4272/0: 111 340|200 270 250                                                 =M0M14N; J16;
 4272/5: 052                                                           2;    ERASE;
 4273/0: 110 340                                                       5;    M0M14N;
 4273/2: 171 376|101 340|042|164 301                                   12;   Q15; =M0M14; DUP; SHL-32;
 4274/3: 170 371|041|304 000 001|170 362|041                                 =RC15; ZERO; SET1; =M15; ZERO;
 4276/0: 002                                                                 =TR;
 4276/1: 121 360|200 350 300                                           8;    PARQ15; J6NTR;
 4277/0: 304 000 277|210 260 266                                       10;   SET191; JP299; (PARITY FAILURE);
 4300/0: 134 360                                                       6;    MFSKQ15;
 4300/2: 120 364|221 350 303                                                 MLBQ15; J7TR;
 4301/1: 121 360|220 350 277                                                 PARQ15; J10TR;
 4302/0: 134 360                                                             MFSKQ15;
 4302/2: 033|027|201 270 276                                                 NOT; NEG; J8;
 4303/1: 056|111 340                                                   7;    +; =M0M14N;
 4303/4: 121 360|220 350 277                                           15;   PARQ15; J10TR;
 4304/3: 136 360|200 360 000                                                 MBSKQ15; EXIT1;
 4305/2: 304 000 300|210 260 266                                       13;   SET192; JP299; (DEVICE NOT OPEN);

=== Start P269V5; at address 2253
V-store at 04310 = 377 377 377 377 377 377                             P269V5; V1=-1; (INTERCHANGE);
V-store at 04311 = 000 000 010 310 010 310                                   V2=Q0/AV1/AV1;
V-store at 04314 = 000 000 010 312 010 313                                   V5=Q0/AV3/AV4;
 4315/0: 042|301 010 307|213 320 141                                         DUP; =V0; JS30P295;
 4316/1: 205 271 030                                                         J15;
 4316/4: 167 363|205 051 031                                                 SHC-7; J16≥Z;
 4317/3: 300 010 307|200 336 247                                             V0; JS1P295;
 4320/3: 205 271 027                                                         J14;

                                                                       [ okq072.txt

 4321/0: 170 202|100 200|042|164 041|161 341                                 =M8; M0M8; DUP; SHL+16; SHA-16;
 4322/3: 033|223 150 377                                                     NOT; J7=Z;
 4323/1: 204 050 351                                                         J3≥Z;
 4323/4: 300 010 307|202 337 264                                             V0; JS12P295;
 4324/4: 240 230 330                                                         J1C9Z;
 4325/1: 300 016 235|164 321|171 230|036|220 150 330                         V31P295; SHL-24; C9; -; J1=Z;
 4327/0: 304 000 002|215 320 006                                             SET2; JS18P295;
 4330/0: 300 010 311|170 316|171 210|026|170 310                       1;    V2; =Q12; C8; ABS; =C12;
 4331/4: 203 331 025                                                         JS12;
 4332/1: 131 310|203 331 025                                                 MLWEQ12; JS12;
 4333/0: 136 310                                                             MRWDQ12;
 4333/2: 110 200|170 343|300 007 154|042|033|225 151 032                     M0M8N; =RM14; V0P262; DUP; NOT; J18=Z;
 4335/2: 103 340|304 377 376                                                 =M0M14Q; SET-2;
 4336/1: 170 371|300 012 363|170 362|171 376|103 340                         =RC15; V3P283; =M15; Q15; =M0M14Q;

 4340/0: 041|103 340|154 316                                           ZERO; =M0M14Q; C12TOQ14;
 4340/5: 171 362|170 344|171 356|111 200|304 000 001                         M15; =I14; Q14; =M0M8N; SET1;
 4342/4: 170 302|144 300|203 331 025                                         =M12; I12=1; JS12;
 4343/5: 134 300                                                             MFSKQ12;
 4344/1: 100 200|170 376|142 360|171 362|304 377 376|222 030 350       2;    M0M8; =Q15; NC15; M15; SET-2; J21=;
 4346/3: 223 150 350                                                         J20=Z;
 4347/0: 304 000 002|167 365|111 360                                         SET2; SHC-6; =M0M15N;
 4350/1: 041                                                                 ZERO;
 4350/2: 052                                                           21;   ERASE;
 4350/3: 171 376|101 200                                               20;    Q15; =M0M8;
 4351/1: 200 360 000                                                   17;   EXIT1;
 4351/4: 304 000 002|170 303|110 200|170 256|171 250                   3;    SET2; =RM12; M0M8N; =Q10; C10;
 4353/3: 026|170 310|203 331 025                                             ABS; =C12; JS12;



                                                                       [ okq073.txt

 4354/3: 136 300|203 331 025                                                 MBSKQ12; JS12;
 4355/2: 120 310|224 350 373                                                 MBTQ12; J6TR;
 4356/1: 304 177 377|170 302                                                 SET32767; =M12;
 4357/0: 134 300|203 331 025                                           4;    MFSKQ12; JS12;
 4357/5: 120 304|200 350 357                                                 MLBQ12; J4NTR;
 4360/4: 304 000 001|170 302|203 331 025                                     SET1; =M12; JS12;
 4362/0: 136 300                                                             MBSKQ12;
 4362/2: 110 200|170 356|304 377 375|172 342|300 006 377               5;    M0M8N; =Q14; SET-3; =+M14; V1P261;
 4364/2: 101 340|300 006 376|042|033|225 151 032                             =M0M14; V0P261; DUP; NOT; J18=Z;
 4366/0: 170 376|100 360|301 340 003|171 364|170 362                         =Q15; M0M15; =E3M14; I15; =M15;
 4367/5: 100 360|301 340 002|171 370|170 362|100 360                         M0M15; =E2M14; C15; =M15; M0M15;
 4371/4: 301 340 001|152 016|171 356|111 200                                 =E1M14; I0TOQ14; Q14; =M0M8N;
 4373/1: 201 270 344                                                         J2;
 4373/4: 304 000 001|170 302|203 331 025                               6;    SET1; =M12; JS12;
 4375/0: 134 300|304 002 016|170 302|203 331 025                             MFSKQ12; SET526; =M12; JS12;
 4376/4: 130 304|202 270 362                                                 MWIPEQ12; J5;
 4377/3: 110 200|170 256|171 250|026|170 310                           7;    M0M8N; =Q10; C10; ABS; =C12;
 4401/0: 042|202 051 012                                                     DUP; J9≥Z;
 4401/4: 171 310|300 010 311|170 316|170 310|203 331 025                     C12; V2; =Q12; =C12; JS12;
 4403/4: 131 310|203 331 025                                                 MLWEQ12; JS12;
 4404/3: 136 310                                                             MRWDQ12;
 4404/5: 304 000 001|170 302|203 331 025                                     SET1; =M12; JS12;
 4406/1: 134 300|041                                                         MFSKQ12; ZERO;
 4406/4: 110 200|170 376|170 362|171 376|111 200                       8;    M0M8N; =Q15; =M15; Q15; =M0M8N;
 4410/2: 047|162 037|027|162 343                                             STR; SHAD+15; NEG; SHAD-15;
 4411/2: 050|101 200|201 270 351                                             CONT; =M0M8; J17;
 4412/2: 171 310|300 010 314|170 316|170 310|171 242|304 000 001       9;    C12; V5; =Q12; =C12; M10; SET1;
 4414/4: 170 243|154 312                                                     =RM10; C12TOQ10;

                                                                       [ okq074.txt

 4415/2: 203 331 025|140 240|136 240|203 331 025|120 250|225 351 033   10;   JS12; M+I10; MBSKQ10; JS12; MBTQ10; J22TR;
 4417/5: 203 331 025|134 240|141 240|203 331 025                             JS12; MFSKQ10; M-I10; JS12;
 4421/3: 124 300|203 331 025                                                 MFRQ12; JS12;
 4422/2: 120 304|224 351 024                                                 MLBQ12; J11TR;
 4423/1: 134 240|033|027|033|027|202 271 015                                 MFSKQ10; NOT; NEG; NOT; NEG; J10;
 4424/4: 136 240|204 271 006                                           11;   MBSKQ10; J8;
 4425/3: 121 300|225 351 026                                           12;   PARQ12; J13TR;
 4426/2: 200 360 000                                                         EXIT1;
 4426/5: 304 000 246|210 260 266                                       13;   SET166; JP299;
 4427/5: 304 000 247|210 260 266                                       14;   SET167; JP299;
 4430/5: 304 000 250|210 260 266                                       15;   SET168; JP299;
 4431/5: 304 000 252|210 260 266                                       16;   SET170; JP299;
 4432/5: 304 000 251|210 260 266                                       18;   SET169;      JP299;

 4433/5: 141 240|203 331 025                                           22;   M-I10; JS12;
 4434/4: 134 240|304 002 016|170 242|203 331 025                             MFSKQ10; SET526; =M10; JS12;
 4436/2: 130 244|052|041|204 271 006                                         MWIPEQ10; ERASE; ZERO; J8;


=== Start P270V-1; at address 2336
                                                                       P270; (PROCEDURE SKIP);
 4440/0: 200 336 247                                                         JS1P295;
 4440/3: 202 271 100                                                         J6;
 4441/0: 170 342|042|204 151 042                                             =M14; DUP; J7≠Z;
 4442/0: 052|200 271 072                                                     ERASE; J1;
 4442/4: 110 340|100 340|170 376|171 370|164 243                       7;    M0M14N; M0M14; =Q15; C15; SHL-47;
 4444/2: 225 151 045                                                         J2=Z;
 4444/5: 304 000 270|210 260 266                                             SET184; JP299; (NEG. ALGOL DEV. NUMBER);
 4445/5: 171 364|171 362|220 031 050                                   2;    I15; M15; J16=;
 4447/0: 304 000 271|210 260 266                                       19;   SET185; JP299; (I AND M ≠);

                                                                       [ okq075.txt

 4450/0: 033|027|042|225 151 054                                       16;   NOT; NEG; DUP; J3=Z; (I AND M = -1);
 4451/0: 042|033|027|223 151 052                                             DUP; NOT; NEG; J4=Z; (I AND M = -2);
 4452/0: 200 271 047                                                         J19; (I AND M ≠ -1 OR -2);
 4452/3: 042|170 364|170 362|164 341                                   4;    DUP; =I15; =M15; SHL-16;
 4453/4: 164 041                                                             SHL+16; (SET POS.NUMBER TO 0);
 4454/0: 171 376|101 340|041                                                 Q15; =M0M14; ZERO;
 4454/5: 166 041|042|170 371|166 341|052                               3;    SHLD+16; DUP; =RC15; SHLD-16; ERASE;
 4456/1: 065|042|164 243|041|002                                             REV; DUP; SHL-47; ZERO; =TR;
 4457/1: 223 151 072                                                         J5=Z; (FORWARD SKIP);
 4457/4: 042|027|161 003|170 362                                             DUP; NEG; SHA+1; =M15;
 4460/4: 120 370|203 351 062                                                 MBTQ15; J10NTR;
 4461/3: 304 000 272|210 260 266                                       9;    SET186; JP299; (BACKWARD SKIP WHEN AT BTL);
 4462/3: 121 360|202 351 064                                           10;   PARQ15; J11NTR;
 4463/2: 304 000 273|210 260 266                                       17;   SET187; JP299; (PARITY FAILURE);
 4464/2: 136 360                                                       11;   MBSKQ15;
 4464/4: 120 370|223 351 061                                                 MBTQ15; J9TR;
 4465/3: 304 000 001|170 362|121 360|222 351 063                             SET1; =M15; PARQ15; J17TR;
 4467/1: 136 360                                                             MBSKQ15;
 4467/3: 120 370|223 351 061                                                 MBTQ15; J9TR;
 4470/2: 121 360|222 351 063                                                 PARQ15; J17TR;
 4471/1: 134 360                                                             MFSKQ15;
 4471/3: 056|111 340                                                   15;   +; =M0M14N; (UPDATE POS. NUMBER);
 4472/0: 200 360 000                                                   1;    EXIT1;
                                                                       5;    (FORWARD SKIP);
 4472/3: 304 000 001|170 362|042                                             SET1; =M15; DUP;
 4473/3: 121 360|222 351 063                                           14;   PARQ15; J17TR;
 4474/2: 134 360                                                             MFSKQ15;
 4474/4: 120 364|223 351 061                                                 MLBQ15; J9TR;
 4475/3: 121 360|222 351 063                                           12;   PARQ15; J17TR;

                                                                       [ okq076.txt

 4476/2: 134 360                                                             MFSKQ15;
 4476/4: 027|033|042|203 151 073                                             NEG; NOT; DUP; J14≠Z;
 4477/4: 052                                                                 ERASE;
 4477/5: 203 271 071                                                         J15;
 4500/2: 304 000 274|210 260 266                                       6;    SET188; JP299; (DEVICE NOT OPEN);
=== Start P271V-1; at address 2370
                                                                       P271;	(REWIND);
 4502/0: 200 336 247                                                         JS1P295;
 4502/3: 205 271 116                                                         J6;
 4503/0: 170 342|100 340|042|170 336|225 051 115                             =M14; M0M14; DUP; =Q13; J5<Z;
 4504/4: 171 324|033|222 151 111                                             I13; NOT; J1=Z;
 4505/4: 110 340|161 301|026|170 311|203 331 113                       2;    M0M14N; SHA-32; ABS; =RC12; JS3;
 4507/2: 136 310|203 331 113                                                 MRWDQ12; JS3;
 4510/1: 140 300|134 300|200 360 000                                         M+I12; MFSKQ12; EXIT1;
 4511/2: 110 340|170 316|151 014|171 316|111 340                       1;    M0M14N; =Q12; M0TOQ12; Q12; =M0M14N;
 4513/0: 204 271 105                                                         J2;
 4513/3: 121 300|225 351 114                                           3;    PARQ12; J4TR;
 4514/2: 200 360 000                                                         EXIT1;
 4514/5: 304 000 323|210 260 266                                       4;    SET211; JP299;
 4515/5: 304 000 324|210 260 266                                       5;    SET212; JP299;
 4516/5: 304 000 325|210 260 266                                       6;    SET213; JP299;

=== Start P272V-1; at address 2384
                                                                       P272;  (CHAR OUT);              [ hand annotation crosses this routine out
 4520/0: 202 337 264                                                         JS11P295;
 4520/3: 164 121|215 320 020                                                 SHL+40; JS116P295;
 4521/2: 214 320 065                                                         JS15P295;
 4521/5: 200 360 000                                                         EXIT1;

=== Start P273V-1; at address 2387
                                                                       P273;	(CHAR IN);              [ hand annotation crosses this routine out
 4523/0: 205 336 271                                                         JS3P295;

                                                                       [ okq077.txt

 4523/3: 201 336 324                                                         JS5P295;
 4524/0: 201 337 111                                                         JS7P295;
 4524/3: 200 360 000                                                         EXIT1;
                                                                                            [ crossing out continues to end of this routine
=== Start P274V-1; at address 2389
 4525/0: 042|213 320 141                                               P274;	DUP; JS30P295; (ETW);
 4525/4: 203 271 133                                                         J2;
 4526/1: 167 363|203 051 134                                                 SHC-7; J3≥Z;
 4527/0: 200 336 247                                                         JS1P295;
 4527/3: 203 271 135                                                         J4;
 4530/0: 170 362|110 360|170 376|171 370|026                                 =M15; M0M15N; =Q15; C15; ABS;
 4531/3: 170 370|122 360|041|200 351 133                                     =C15; METQ15; ZERO; J1NTR;
 4532/5: 033                                                                 NOT;
 4533/0: 200 360 000                                                   1;    EXIT1;
 4533/3: 304 000 320|210 260 266                                       2;    SET208; JP299;
 4534/3: 304 000 321|210 260 266                                       3;    SET209; JP299;
 4535/3: 304 000 322|210 260 266                                       4;    SET210; JP299;

=== Start P275V-1; at address 2399
                                                                       P275;	(BTC);
 4537/0: 042|213 320 141                                                     DUP; JS30P295;
 4537/4: 203 271 145                                                         J2;
 4540/1: 167 363|203 051 146                                                 SHC-7; J3≥Z;
 4541/0: 200 336 247                                                         JS1P295;
 4541/3: 203 271 147                                                         J4;
 4542/0: 170 362|110 360|170 376|171 370|026                                 =M15; M0M15N; =Q15; C15; ABS;
 4543/3: 170 370|120 370|041|200 351 145                                     =C15; MBTQ15; ZERO; J1NTR;
 4544/5: 033                                                                 NOT;
 4545/0: 200 360 000                                                   1;    EXIT1;

                                                                       [ okq078.txt

 4545/3: 304 000 315|210 260 266                                       2;    SET205; JP299;
 4546/3: 304 000 316|210 260 266                                       3;    SET206; JP299;
 4547/3: 304 000 317|210 260 266                                       4;    SET207; JP299;
                                                                                [ horizontal line drawn here

=== Start P276V-1; at address 2409
                                                                       P276;  (CRLF);
 4551/0: 202 337 264                                                         JS12P295;
 4551/3: 304 000 002|065|213 320 145                                         SET2; REV; JS150P295;
 4552/4: 214 320 065                                                         JS16P295;
 4553/1: 200 360 000                                                         EXIT1;

=== Start P277V-1; at address 2412
                                                                       P277;  (TAB);
 4554/0: 202 337 264                                                         JS12P295;
 4554/3: 304 000 001|065|213 320 145                                         SET1; REV; JS150P295;
 4555/4: 214 320 065                                                         JS16P295;
 4556/1: 200 360 000                                                         EXIT1;

=== Start P278V-1; at address 2415
                                                                       P278;  (SPACES);
 4557/0: 202 337 264                                                         JS12P295;
 4557/3: 041|065                                                             ZERO; REV;
 4557/5: 213 320 145                                                         JS150P295;
 4560/2: 214 320 065                                                         JS16P295;
 4560/5: 200 360 000                                                         EXIT1;

=== Start P279V9; at address 2428
                                                                       P279V9;   (WRITE BINARY);      [ hand annotation says P278V9;
V-store at 04566 = 000 000 011 164 011 165                                   V4=Q0/AV2/AV3;



                                                                       [ okq079.txt

V-store at 04567 = 000 000 011 170 011 172                                   V5=Q0/AV6/AV8;
 4574/0: 200 336 247                                                         JS1P295;
 4574/3: 203 271 225                                                         J3;
 4575/0: 041|301 011 173|170 242|301 011 162|301 011 163                     ZERO; =V9; =M10; =V0; =V1;
 4577/0: 100 240|170 276|110 240|170 316|171 264                             M0M10; =Q11; M0M10N; =Q12; I11;
 4600/4: 033|171 262|033|011|042                                             NOT; M11; NOT; OR; DUP;
 4601/4: 203 151 226                                                         J2≠Z;
 4602/1: 052                                                                 ERASE;
 4602/2: 300 011 163|170 343|171 256|171 276|171 316                   1;    V1; =RM14; Q10; Q11; Q12;
 4604/1: 200 333 022|301 011 164|170 316|170 276|170 256                     JS2P283; =V2; =Q12; =Q11; =Q10;
 4606/1: 171 270|201 051 232                                                 C11; J4≥Z;
 4607/0: 300 011 162|170 356|171 350|304 023 040|056                         V0; =Q14; C14; SETAY0; +;
 4610/5: 170 304|171 344|170 362|310 363 040|164 101                         =I12; I14; =M15; Y0M15; SHL+32;
 4612/4: 164 301|042|301 011 165                                             SHL-32; DUP; =V3;
 4613/4: 300 011 166|170 376|154 317|122 360|221 351 235               8;    V4; =Q15; C12TOQ15; METQ15; J7TR;
 4615/4: 205 331 306                                                         JS17;
 4616/1: 130 360|042|027|033|170 302                                         MWQ15; DUP; NEG; NOT; =M12;
 4617/2: 140 300|122 360|225 351 235                                         M+I12; METQ15; J19TR;
 4620/3: 304 013 270|036|042|204 051 266                                     SET3000; -; DUP; J11≥Z;
 4621/5: 052                                                                 ERASE;
 4622/0: 205 331 306                                                   13;   JS17;
 4622/3: 130 310|110 240|170 376|304 000 002|172 362                         MLWQ12; M0M10N; =Q15; SET2; =+M15;
 4624/2: 171 376|111 240|200 360 000                                         Q15; =M0M10N; EXIT1;
 4625/3: 304 000 253|210 260 266                                       3;    SET171; JP299;
 4626/3: 027|033|201 151 233                                           2;    NEG; NOT; J5≠Z;
 4627/2: 145 260|141 260|171 276|101 240|151 014|171 316|111 240|202 271 202
                                                                             I11=-1; M-I11; Q11; =M0M10; M0TOQ12; Q12; =M0M10N; J1;
 4632/1: 304 000 254|210 260 266                                       4;    SET172; JP299;
 4633/1: 304 000 255|210 260 266                                       5;    SET173; JP299;
 4634/1: 304 000 256|210 260 266                                       6;    SET174; JP299;


                                                                       [ okq080.txt

 4635/1: 052|204 271 237                                               7;    ERASE; J15;
 4635/5: 052                                                           19;   ERASE;
 4636/0: 304 000 001                                                   9;    SET1;
 4636/3: 170 362|205 331 306                                           10;   =M15; JS17;
 4637/2: 136 360                                                             MBSKQ15;
 4637/4: 205 331 306                                                   15;   JS17;
 4640/1: 171 370|300 010 311|170 376|170 370|130 370                         C15; V2P269; =Q15; =C15; MLWQ15;
 4642/0: 110 240|170 356|171 342|304 000 003|056                             M0M10N; =Q14; M14; SET3; +;
 4643/4: 170 362|205 331 306                                                 =M15; JS17;
 4644/3: 136 360|205 331 306                                                 MBSKQ15; JS17;
 4645/2: 120 370|205 351 305                                                 MBTQ15; J16NTR;
 4646/1: 171 370|300 011 167|170 376|170 370|124 360                         C15; V5; =Q15; =C15; MFRQ15;
 4650/0: 300 011 172|300 011 171|171 370|304 000 006|200 220 000             V8; V7; C15; SET6; OUT;
 4652/2: 041|304 000 004|200 220 000|042|170 370|154 374                     ZERO; SET4; OUT; DUP; =C15; C15TOQ12;
 4654/2: 110 240|170 356|027|170 350|151 016|171 356                         M0M10N; =Q14; NEG; =C14; M0TOQ14; Q14;
 4656/1: 111 240|205 331 306|124 360|301 011 171|033                         =M0M10N; JS17; MFRQ15; =V7; NOT;
 4660/0: 027|301 011 172|304 000 001|170 362|205 331 306                     NEG; =V8; SET1; =M15; JS17;
 4662/0: 136 360|304 011 172|170 362|205 331 306                             MBSKQ15; SETAV8; =M15; JS17;
 4663/4: 130 360|304 002 016|170 362|205 331 306                             MWQ15; SET526; =M15; JS17;
 4665/2: 130 364|300 011 165|204 271 213                                     MWIPEQ15; V3; J8;
 4666/4: 304 013 267|170 302|140 300|205 331 306                       11;   SET2999; =M12; M+I12; JS17;
 4670/2: 130 300|122 300|221 351 303                                         MWQ12; METQ12; J18TR;
 4671/3: 304 013 270|036|042|300 011 173|033                                 SET3000; -; DUP; V9; NOT;
 4673/0: 027|301 011 173|204 051 266                                         NEG; =V9; J11≥Z;
 4674/1: 205 331 306|304 013 270|056|170 302|140 300                         JS17; SET3000; +; =M12; M+I12;
 4676/0: 130 300|122 300|222 351 303                                         MWQ12; METQ12; J14TR;
 4677/1: 300 011 173|033|027|170 302|205 331 306                             V9; NOT; NEG; =M12; JS17;
 4700/5: 136 300|300 011 165|027|033|170 302                                 MBSKQ12; V3; NEG; NOT; =M12;
 4702/2: 140 300|200 271 222                                                 M+I12; J13;


                                                                       [ okq081.txt

                                                                       [ page 81

 4703/1: 052                                                           18;     ERASE;
 4703/2: 300 011 173|033|027|170 302|205 331 306                       14;     V9; NOT; NEG; =M12; JS17;
 4705/0: 136 300|200 271 236                                                   MBSKQ12; J9;
 4705/5: 304 000 257|210 260 266                                       16;     SET175; JP299;
 4706/5: 121 300|221 351 234                                           17;     PARQ12; J6TR;
 4707/4: 200 360 000                                                           EXIT1;

                                                                       [Annotation: P279]
=== Start P280V13; at address 2519
V-store at 04715 = 000 000 011 316 011 317                             P280V13;        V4=Q0/AV5/AV6; (READ BINARY);
 4727/0: 200 336 247                                                           JS1P295;
 4727/3: 205 272 017                                                           J8;
 4730/0: 170 242|301 011 311|301 011 312|100 240|170 276                       =M10; =V0; =V1; M0M10; =Q11;
 4732/0: 041|301 011 321|110 240|170 316                                       ZERO; =V8; M0M10N; =Q12;
 4733/2: 171 270|225 052 021                                                   C11; J10<Z;
 4734/1: 171 264|033|171 262|033|011                                           I11; NOT; M11; NOT; OR;
 4735/2: 042|222 151 341                                                       DUP; J1=Z;
 4736/0: 027|033|205 152 020                                                   NEG; NOT; J9≠Z;
 4736/5: 145 260|141 260|171 276|101 240|151 014|171 316|111 240|041           I11=-1; M-I11; Q11; =M0M10; M0TOQ12; Q12; =M0M10N; ZERO;
 4741/2: 052|300 011 312|170 343|171 256|171 276                       1;      ERASE; V1; =RM14; Q10; Q11;
 4743/0: 171 316|200 333 022|301 011 313|170 316|170 276                       Q12; JS2P283; =V2; =Q12; =Q11;
 4745/0: 170 256|300 011 311|170 356|171 350|304 023 040                       =Q10; V0; =Q14; C14; SETAY0;
 4747/0: 056|170 304|171 344|170 362|310 363 040                               +; =I12; I14; =M15; Y0M15;
 4750/4: 164 101|164 301|042|301 011 314|027                                   SHL+32; SHL-32; DUP; =V3; NEG;
 4752/1: 033|170 302|140 300|300 011 315|170 376                               NOT; =M12; M+I12; V4; =Q15;
 4753/5: 154 317|171 370|170 351|140 340|205 271 357                           C12TOQ15; C15; =RC14; M+I14; J3;
 4755/4: 205 332 023                                                   2;      JS16;
 4756/1: 134 340|110 240|304 000 002|056|111 240                               MFSKQ14; M0M10N; SET2; +; =M0M10N;
 4757/5: 205 332 023                                                   3;      JS16;
 4760/2: 124 360|120 364|221 351 371                                           MFRQ15; MLBQ15; J5TR;


                                                                       [ okq082.txt

 4761/3: 300 011 313|300 011 316|015|223 152 012                             V2;  V5; NEV; J6=Z;
 4763/1: 300 011 321|204 151 355                                             V8; J2≠Z;
 4764/1: 205 332 023                                                   4;    JS16;
 4764/4: 110 240|042|164 341|164 041|111 240                                 M0M10N; DUP; SHL-16; SHL+16; =M0M10N;
 4766/1: 170 342|140 340|136 340|041|033                                     =M14; M+I14; MBSKQ14; ZERO; NOT;
 4767/3: 301 011 321|151 016|140 340|205 271 357                             =V8; M0TOQ14; M+I14; J3;
 4771/1: 300 011 321|221 151 364                                       5;    V8; J4=Z;
 4772/1: 205 332 023|110 240|170 342|304 000 003|172 342                     JS16; M0M10N; =M14; SET3; =+M14;
 4774/1: 136 340|120 310|205 352 022                                         MBSKQ14; MBTQ12; J11NTR;
 4775/2: 304 011 320|170 362|205 332 023                                     SETAV7; =M15; JS16;
 4776/4: 124 360|300 011 317                                                 MFRQ15; V6;
 4777/3: 300 011 326|300 011 313|301 011 324|041|301 011 322|304 000 010|200 220 000
                                                                             V13; V2; =V11; ZERO; =V9; SET8; OUT;
 5002/4: 304 000 004|200 220 000|170 310|171 370|304 000 006|200 220 000|154 317|110 240
                                                                             SET4; OUT; =C12; C15; SET6; OUT; C12TOQ15; M0M10N;
 5006/0: 170 356|154 316|151 016|171 356|111 240                             =Q14; C12TOQ14; M0TOQ14; Q14; =M0M10N;
 5007/4: 144 340|140 340|205 332 023|134 340|304 011 317                     I14=+1; M+I14; JS16; MFSKQ14; SETAV6;
 5011/4: 170 362|205 271 357                                                 =M15; J3;
 5012/3: 300 011 314|300 011 317|015|205 152 016                       6;    V3; V6; NEV; J7≠Z;
 5014/1: 205 332 023|124 300|110 240|304 000 002|056                         JS16; MFRQ12; M0M10N; SET2; +;
 5016/0: 111 240|200 360 000                                                 =M0M10N; EXIT1;
 5016/5: 304 000 263|210 260 266                                       7;    SET179; JP299;
 5017/5: 304 000 262|210 260 266                                       8;    SET178; JP299;
 5020/5: 304 000 264|210 260 266                                       9;    SET180; JP299;
 5021/5: 304 000 265|210 260 266                                       10;   SET181; JP299;
 5022/5: 304 000 266|210 260 266                                       11;   SET182; JP299;
 5023/5: 121 300|221 352 025                                           16;   PARQ12; J12TR;
 5024/4: 200 360 000                                                         EXIT1;
 5025/1: 304 000 267|210 260 266                                       12;   SET183; JP299;
V-store at 04726 = 000 000 011 322 011 325                                   V13=Q0/AV9/AV12;
V-store at 04723 = 036 034 262 207 220 036                                   V10=B0741626241710036;

                                                                       [ okq083.txt

V-store at 04725 = 170 015 341 273 111 144                                   V12=B3600674156644544;

=== Start P281V7; at address 2591
V-store at 05035 = 000 000 077 050 252 111                             P281V7; V6=B0000007712125111; (WRITE ARRAY);
 5037/0: 301 012 033|301 012 032|301 012 031|301 012 027|301 012 030         =V4; =V3; =V2; =V0; =V1;
 5041/3: 304 000 011|300 012 032|164 371|164 011|011                         SET9; V3; SHL-4; SHL+4; OR;
 5043/2: 301 012 032|300 012 030|170 343|300 012 033|202 337 264             =V3; V1; =RM14; V4; JS12P295;
 5045/4: 154 015|203 333 050                                                 C0TOQ13; JS8P283;
 5046/3: 304 000 215|203 032 144                                             SETB215; J15≠;
 5047/3: 304 000 002|215 320 006                                             SET2; JS18P295;
 5050/3: 210 320 015                                                         JS14P295;
 5051/0: 203 333 050                                                         JS8P283;
 5051/3: 042|304 000 012|036|202 052 127                                     DUP; SET10; -; J11≥Z;
 5052/5: 203 333 050                                                         JS8P283;
 5053/2: 042|304 000 012|036|204 052 126                                     DUP; SET10; -; J10≥Z;
 5054/4: 203 333 050                                                         JS8P283;
 5055/1: 304 000 235|200 032 126                                             SETB235; J9≠;
 5056/1: 012|065|042|161 005|056                                             PERM; REV; DUP; SHA+2; +;
 5057/1: 161 003|056|201 336 270                                             SHA+1; +; JS4P295;
 5060/1: 042                                                                 DUP;
 5060/2: 052|204 336 345                                               1;    ERASE; JS6P295;
 5061/0: 202 272 060                                                         J1;
 5061/3: 304 000 215|202 032 060                                             SETB215; J1≠;
 5062/3: 052                                                           2;    ERASE;
 5062/4: 204 336 345                                                   3;    JS6P295;
 5063/1: 203 272 062                                                         J2;
 5063/4: 304 000 235|224 032 065                                             SETB235; J4=;
 5064/4: 210 320 015                                                         JS14P295;
 5065/1: 204 272 062                                                         J3;

                                                                       [ okq084.txt

 5065/4: 201 337 111                                                   4;    JS8P295;
 5066/1: 052                                                                 ERASE;
 5066/2: 210 320 015                                                   5;    JS14P295;
 5066/5: 304 000 002|215 320 006                                             SET2; JS18P295;
 5067/5: 214 320 065                                                         JS16P295;
 5070/2: 304 377 377|304 000 057|024|300 012 035|300 012 033                 SET-1; SET47; FLOAT; V6; V4;
 5072/3: 200 334 154                                                         JSP291;
 5073/0: 300 012 031|042|304 000 057|024|300 012 035                         V2; DUP; SET47; FLOAT; V6;
 5074/5: 300 012 033|200 334 154                                             V4; JSP291;
 5075/5: 300 012 027|170 356|304 000 001|301 012 030|171 344                 V0; =Q14; SET1; =V1; I14;
 5100/0: 170 363|170 370|312 363 040|164 101|164 301                         =RM15; =C15; Y0M15Q; SHL+32; SHL-32;
 5101/5: 171 350|304 023 040|056|170 343|170 350                             C14; SETAY0; +; =RM14; =C14;
 5103/3: 171 356|301 012 036|243 372 146                                     Q14; =V7; J17C15Z;
 5104/5: 312 363 040|164 101|164 301|042|301 012 027                         Y0M15Q; SHL+32; SHL-32; DUP; =V0;
 5106/4: 042|301 012 030|200 272 113                                         DUP; =V1; J7;
 5107/5: 312 363 040|164 101|164 301|042|300 012 030                   6;    Y0M15Q; SHL+32; SHL-32; DUP; V1;
 5111/4: 066|301 012 030|044|203 152 145                                     CAB; =V1; ÷I; J16≠Z;
 5113/0: 304 000 057|024|300 012 035|300 012 033|171 376               7;    SET47; FLOAT; V6; V4; Q15;
 5115/0: 301 012 031|200 334 154                                             =V2; JSP291;
 5116/0: 300 012 031|170 376|265 372 107                                     V2; =Q15; J6C15NZ;
 5117/2: 300 012 036|170 356|171 350|300 012 030|044                   8;    V7; =Q14; C14; V1; ÷I;
 5121/1: 203 152 145                                                         J16≠Z;
 5121/4: 304 000 057|024|300 012 035|304 000 003|056                         SET47; FLOAT; V6; SET3; +;
 5123/3: 300 012 033|200 334 154                                             V4; JSP291;
 5124/3: 300 012 027|301 012 030|201 272 140                                 V0; =V1; J14;
 5126/0: 066|210 320 015                                               9;    CAB; JS14P295;
 5126/4: 065|210 320 015                                               10;   REV; JS14P295;
 5127/2: 304 000 235|222 032 066                                       11;   SETB235; J5=;
 5130/2: 210 320 015                                                         JS14P295;

                                                                       [ okq085.txt

 5130/5: 203 333 050                                                         JS8P283;
 5131/2: 202 272 127                                                         J11;
 5131/5: 102 360|171 376|301 012 036|300 012 032|041                   12;   M0M15Q; Q15; =V7; V3; ZERO;
 5133/4: 300 012 030|027|033|042|203 152 136                                 V1; NEG; NOT; DUP; J13≠Z;
 5135/1: 052|033|027|033|027                                                 ERASE; NOT; NEG; NOT; NEG;
 5136/0: 300 012 027                                                         V0;
 5136/3: 301 012 030|056|300 012 033|200 334 154                       13;   =V1; +; V4; JSP291;
 5140/1: 300 012 036|170 376|265 372 131                               14;   V7; =Q15; J12C15NZ;
 5141/3: 300 012 033|202 337 264                                             V4; JS11P295;
 5142/3: 304 000 075|200 337 305                                             SETB75; JS13P295;
 5143/3: 214 320 065                                                         JS16P295;
 5144/0: 200 360 000                                                         EXIT1;
 5144/3: 304 000 313|210 260 266                                       15;   SET203; JP299;
 5145/3: 304 000 314|210 260 266                                       16;   SET204; JP299;
 5146/3: 304 000 001|301 012 030|202 272 117                           17;   SET1; =V1; J8;

=== Start P282V7; at address 2672
                                                                       P282V7;  (READ ARRAY);
 5160/0: 301 012 155|301 012 150|042|301 012 151|170 343                     =V5; =V0; DUP; =V1; =RM14;
 5162/0: 200 333 022|042|301 012 152                                         JS2P283; DUP; =V2;
 5163/1: 300 012 155|201 336 270                                       1;    V5; JS4P295;
 5164/1: 203 337 261                                                         JS19P295;
 5164/4: 041|301 016 221|304 000 002|301 016 225|300 012 361                 ZERO; =V19P295; SET2; =V23P295; V1P283;
 5166/5: 301 016 226|041|203 333 036                                         =V24P295; ZERO; JS24P283;
 5170/0: 201 032 163                                                         J1≠;
 5170/3: 052|300 012 155|200 332 335                                         ERASE; V5; JS10;
 5171/4: 200 272 343                                                         J26;
 5172/1: 042|033|220 152 174                                                 DUP; NOT; J2=Z;
 5173/0: 042|027|033|200 152 344                                             DUP; NEG; NOT; J27≠Z;

                                                                       [ okq086.txt

 5174/0: 027|301 012 154|300 012 155|200 332 335                       2;    NEG; =V4; V5; JS10;
 5175/4: 200 272 343|042                                                     J26; DUP;
 5176/2: 304 000 037|036|220 112 345                                         SET31; -; J28>Z;
 5177/3: 300 012 154|170 325|170 330|171 324|223 112 202                     V4; =RI13; =C13; I13; J3>Z;
 5201/3: 171 330|170 322|140 320                                             C13; =M13; M+I13;
 5202/3: 171 336|301 012 154|300 012 150|170 356|171 344               3;    Q13; =V4; V0; =Q14; I14;
 5204/3: 170 362|310 363 040|164 101|164 301|042                             =M15; Y0M15; SHL+32; SHL-32; DUP;
 5206/1: 301 012 153|171 350|304 023 040|056|170 343                         =V3; C14; SETAY0; +; =RM14;
 5210/0: 170 350|171 356|301 012 157|171 330|170 371                         =C14; Q14; =V7; C13; =RC15;
 5211/5: 304 000 001                                                         SET1;
 5212/2: 170 345|171 356|311 362 206|171 376|301 012 156               4;    =RI14; Q14; =W10M15; Q15; =V6;
 5214/2: 300 012 155|200 332 335                                             V5; JS10;
 5215/2: 200 272 343                                                         J26;
 5215/5: 300 012 156|170 376|310 362 206|170 356|042                         V6; =Q15; W10M15; =Q14; DUP;
 5217/4: 170 350|042|170 342|171 344|171 356                                 =C14; DUP; =M14; I14; Q14;
 5221/1: 313 362 206|034|050|042|300 012 153                                 =W10M15Q; ×D; CONT; DUP; V3;
 5222/4: 036|220 112 346                                                     -; J29>Z;
 5223/2: 262 372 212                                                         J4C15NZ;
 5223/5: 300 012 153|036|200 152 346                                         V3; -; J29≠Z;
 5225/0: 300 012 155|200 336 057                                       5;    V5; JSP294;
 5226/0: 300 012 155|201 336 270                                             V5; JS4P295;
 5227/0: 204 336 345                                                         JS6P295;
 5227/3: 200 272 347                                                         J30;
 5230/0: 201 337 111                                                         JS8P295;
 5230/3: 304 000 045|222 032 261                                             SETB45; J13=;
 5231/3: 304 000 077|222 032 261                                             SETB77; J13=;
 5232/3: 304 000 036|224 032 266                                             SETB36; J16=;
 5233/3: 304 000 070|224 032 266                                             SETB70; J16=;
 5234/3: 052                                                                 ERASE;

                                                                       [ okq087.txt

 5234/4: 203 332 313                                                         JS20;
 5235/1: 200 272 225                                                         J5;
 5235/4: 300 012 155|201 336 270|041                                   6;    V5; JS4P295; ZERO;
 5236/5: 052|204 336 345                                               7;    ERASE; JS6P295;
 5237/3: 200 272 355                                                         J37;
 5240/0: 304 000 321|222 032 243                                             SETB321; J31=;
 5241/0: 304 000 301|222 032 243                                             SETB301; J31=;
 5242/0: 042|304 000 013|036|225 112 236                                     DUP; SETB13; -; J7>Z;
 5243/2: 205 337 136                                                   31;   JS10P295;
 5243/5: 201 337 111                                                         JS8P295;
 5244/2: 300 012 155|200 336 057                                             V5; JSP294;
 5245/2: 300 012 155|201 336 270                                             V5; JS4P295;
 5246/2: 204 336 345                                                         JS6P295;
 5246/5: 200 272 347                                                         J30;
 5247/2: 304 000 022|222 032 251                                             SETB22; J8=;
 5250/2: 304 000 054|203 032 254                                             SETB54; J9≠;
 5251/2: 052|300 012 157|170 376|300 012 153|170 370                   8;    ERASE; V7; =Q15; V3; =C15;
 5253/1: 157 015|203 332 303                                                 Q0TOQ13; JS18;
 5254/0: 204 272 235                                                         J6;
 5254/3: 304 000 036|223 032 256                                       9;    SETB36; J12=;
 5255/3: 304 000 070|200 032 350                                             SETB70; J32≠;
 5256/3: 052|300 012 154|170 356|310 342 206|170 376                   12;   ERASE; V4; =Q14; W10M14; =Q15;
 5260/2: 205 332 272|204 272 235                                             JS17; J6;
 5261/2: 052|203 332 335                                               13;   ERASE; JS11;
 5262/0: 200 272 351                                                         J33;
 5262/3: 041|203 332 313                                               14;   ZERO; JS20;
 5263/1: 200 272 265                                                         J15;

 5263/4: 027|033|200 152 352                                           NEG; NOT; J34≠Z;

                                                                       [ okq088.txt

 5264/3: 204 272 235                                                         J6;
 5265/0: 027|033|042|203 152 262                                       15;   NEG; NOT; DUP; J14≠Z;
 5266/0: 052|200 272 225                                                     ERASE; J5;
 5266/4: 052|300 012 154|170 356|310 342 206|170 376                   16;   ERASE; V4; =Q14; W10M14; =Q15;
 5270/3: 171 370|171 362|036|200 152 353|205 332 272                         C15; M15; -; J35≠Z; JS17;
 5272/2: 200 272 225                                                         J5;
 5272/5: 171 362|171 364|300 012 154|170 356|202 332 331               17;   M15; I15; V4; =Q14; JS22;

 5274/5: 300 012 154|170 356|312 342 206|170 376|171 364|171 362|034|050
                                                                       V4; =Q14; W10M14Q; =Q15; I15; M15; ×D; CONT;
 5277/3: 036|310 342 206|170 376|310 002 205|056|171 364|036|170 363|170 364
                                                                             -; W10M14; =Q15; W9; +; I15; -; =RM15; =I15;
 5302/2: 170 370|300 012 157|170 336                                         =C15; V7; =Q13;
 5303/3: 171 370|041|042                                               18;   C15; ZERO; DUP;
 5304/1: 102 375|042|030|066|072                                       19;   M13M15Q; DUP; ABSF; CAB; MAXF;
 5305/1: 001|065|052|012|074                                                 VR; REV; ERASE; PERM; +F;
 5306/0: 065|261 372 304                                                     REV; J19C15NZ;
 5306/4: 066|042|027|033|034                                                 CAB; DUP; NEG; NOT; ×D;
 5307/3: 050|161 377|304 000 057|024|004                                     CONT; SHA-1; SET47; FLOAT; ×F;
 5310/5: 304 002 304|167 351|004|012|075                                     SETB1304; SHC-12; ×F; PERM; -F;
 5312/1: 030|075|220 052 354                                                 ABSF; -F; J36<Z;
 5313/0: 200 360 000                                                         EXIT1;
 5313/3: 300 012 154|170 356|041|311 002 205|202 332 331               20;   V4; =Q14; ZERO; =W9; JS22;
 5315/3: 170 362|300 012 157|170 336|101 337|143 320|171 336                 =M15; V7; =Q13; =M15M13; DC13; Q13;
 5317/4: 301 012 157|300 012 154|170 356                                     =V7; V4; =Q14;
 5321/0: 310 342 206|170 376|143 360|171 376|311 342 206               21;   W10M14; =Q15; DC15; Q15; =W10M14;
 5323/0: 263 372 342                                                         J25C15NZ;
 5323/3: 310 342 206|170 376|171 362|042|171 364|034|050|310 002 205|056|311 002 205
                                                                             W10M14; =Q15; M15; DUP; I15; ×D; CONT; W9; +; =W9;
 5326/4: 170 370|171 376                                                     =C15; Q15;
 5327/2: 313 342 206|260 352 321                                             =W10M14Q; J21C14NZ;
 5330/2: 260 332 346                                                         J29C13NZ;

                                                                       [ okq089.txt

 5330/5: 202 360 001                                                         EXIT2;
 5331/2: 041                                                           22;   ZERO;
 5331/3: 312 342 206|170 376|171 362|171 370|036                       23;   W10M14Q; =Q15; M15; C15; -;
 5333/1: 171 364|034|050|056|263 352 331                                     I15; ×D; CONT; +; J23C14NZ;
 5334/3: 200 360 000                                                         EXIT1;
 5335/0: 200 336 057                                                   10;   JSP294;
 5335/3: 045|042|223 052 341                                           11;   FIX; DUP; J24<Z;
 5336/2: 042|304 000 047|036|223 112 342                                     DUP; SET39; -; J25>Z;
 5337/4: 304 000 057|036|170 370|161 360|202 360 001                         SET47; -; =C15; SHAC15; EXIT2;
 5341/3: 052|052|041|202 360 001                                       24;   ERASE; ERASE; ZERO; EXIT2;
 5342/3: 200 360 000                                                   25;   EXIT1;
 5343/0: 304 000 301|210 260 266                                       26;   SET193; JP299;
 5344/0: 304 000 302|210 260 266                                       27;   SET194; JP299;
 5345/0: 304 000 303|210 260 266                                       28;   SET195; JP299;
 5346/0: 304 000 304|210 260 266                                       29;   SET196; JP299;
 5347/0: 304 000 305|210 260 266                                       30;   SET197; JP299;
 5350/0: 304 000 306|210 260 266                                       32;   SET198; JP299;
 5351/0: 304 000 307|210 260 266                                       33;   SET199; JP299;
 5352/0: 304 000 310|210 260 266                                       34;   SET200; JP299;
 5353/0: 304 000 311|210 260 266                                       35;   SET201; JP299;
 5354/0: 304 000 312|210 260 266                                       36;   SET202; JP299;
 5355/0: 304 377 374|220 032 347                                       37;   SET-4; J30=;
 5356/0: 052|201 337 111                                                     ERASE; JS8P295;
 5356/4: 200 360 000                                                         EXIT1;

                                                                       [annotation: P280V7
=== Start P283V7; at address 2808
                                                                       P283V7;  (FIND);
V-store at 05361 = 000 002 000 001 012 366                                   V1=Q2/1/AV6;
V-store at 05362 = 000 000 012 365 012 367                                   V2=Q0/AV5/AV7;

                                                                       [ okq090.txt

V-store at 05363 = 000 000 000 000 007 156                                   V3=Q0/0/AV2P262;
V-store at 05364 = 000 000 000 000 000 000                                   V4=0;
V-store at 05365 = 002 231 045 273 107 200                                   V5=B0051444556643600;
 5370/0: 065|041|301 012 364                                                 REV; ZERO; =V4;
 5370/5: 170 343|042|170 210|200 336 247                               1;    =RM14; DUP; =C8; JS1P295;
 5372/1: 201 272 373                                                         J32;
 5372/4: 200 273 115                                                         J21;
 5373/1: 170 316|304 377 376|042|170 202|170 204                       32;   =Q12; SET-2; DUP; =M8; =I8;
 5374/5: 171 216|101 300|200 333 022|300 012 364|200 153 117                 Q8; =M0M12; JS2; V4; J23≠Z;
 5377/0: 304 000 004|200 220 000                                             SET4; OUT;
 5400/0: 170 331|140 320|134 320|304 000 014|170 350                         =RC13; M+I13; MFSKQ13; SET12; =C14;
 5401/5: 171 330|205 336 023|170 330|300 007 154|042|033|220 153 120         C13; JS2P293; =C13; V0P262; DUP; NOT; J33=Z;
 5404/2: 103 360                                                             =M0M15Q;
 5404/4: 304 377 376|170 351|300 012 363|170 342|171 356                     SET-2; =RC14; V3; =M14; Q14;
 5406/4: 103 360|041|103 360|171 342|170 364                                 =M0M15Q; ZERO; =M0M15Q; M14; =I15;
 5410/1: 154 337|171 376|111 300|171 330|171 210                             C13TOQ15; Q15; =M0M12N; C13; C8;
 5411/5: 300 015 313|202 336 003|300 012 362|304 000 075|167 365|301 012 367
                                                                             V3P293; JS12P293; V2; SETB75; SHC-6; =V7;
 5414/4: 170 376|121 360|130 360|300 016 201|167 041                         =Q15; PARQ15; TWQ15; V3P295; SHC+16;
 5416/3: 033|027|167 341|301 016 201|300 012 366|203 153 021                 NOT; NEG; SHC-16; =V3P295; V6; J31≠Z;
 5420/4: 171 210|200 330 315                                                 C8; JSP269;
 5421/3: 200 360 000                                                   31;   EXIT1;
 5422/0: 203 337 261                                                   2;   JS19P295;
 5422/3: 041|301 016 221|304 000 002|301 016 225|300 012 361                 ZERO; =V19P295; SET2; =V23P295; V1;
 5424/4: 301 016 226|154 015|203 333 050                                     =V24P295; C0TOQ13; JS8;
 5426/0: 304 000 215|015|200 153 116                                         SETB215; NEV; J22≠Z;
 5427/1: 203 333 050                                                         JS8;
 5427/4: 042|304 000 012|036|204 053 106                                     DUP; SET10; -; J17≥Z;
 5431/0: 203 333 050                                                         JS8;
 5431/3: 042|304 000 012|036|204 053 110                                     DUP; SET10; -; J18≥Z;


                                                                       [ okq091.txt

 5432/5: 203 333 050                                                         JS8;
 5433/2: 304 000 235|205 033 112                                             SETB235; J19≠;
 5434/2: 052|065|042|161 005|056                                             ERASE; REV; DUP; SHA+2; +;

 5435/2: 161 003|056|201 336 270|041                                   SHA+1; +; JS4P295; ZERO;
 5436/3: 052                                                           24;   ERASE;
 5436/4: 204 336 345                                                   3;    JS6P295;
 5437/1: 203 273 036                                                         J24;

 5437/4: 304 000 215|015|204 153 036|041                               SETB215; NEV; J3≠Z; ZERO;
 5441/0: 052                                                           25;   ERASE;
 5441/1: 204 336 345                                                   4;    JS6P295;
 5441/4: 200 273 041                                                         J25;
 5442/1: 201 333 060                                                         JS10;
 5442/4: 201 273 041                                                         J4;
 5443/1: 205 273 045                                                         J6;
 5443/4: 204 336 345                                                   5;    JS6P295;
 5444/1: 017|017|017                                                         DUMMY; DUMMY; DUMMY;
 5444/4: 304 000 235|015|204 153 043                                         SETB235; NEV; J5≠Z;
 5445/5: 304 000 235|205 337 136                                       6;    SETB235; JS10P295;
 5446/5: 201 337 111                                                         JS8P295;
 5447/2: 300 012 366|200 360 000                                       7;    V6; EXIT1;
 5450/2: 052                                                           20;   ERASE;
 5450/3: 264 333 052                                                   8;    J9C13NZ;
 5451/0: 102 340|301 012 360|304 000 006|170 330                             M0M14Q; =V0; SET6; =C13;
 5452/4: 300 012 360|041|166 021|065|301 012 360                       9;    V0; ZERO; SHLD+8; REV; =V0;
 5454/2: 143 320|304 000 236|222 033 050                                     DC13; SETB236; J20=;
 5455/4: 304 000 240|222 033 050                                             SETB240; J20=;
 5456/4: 304 000 256|222 033 050                                             SETB256; J20=;

                                                                       [ okq092.txt

 5457/4: 200 360 000                                                         EXIT1;
 5460/1: 042|304 000 045|036|220 113 066                               10;   DUP; SETB45; -; J14>Z;
 5461/3: 300 016 221|304 000 010|036|203 053 064                       11;   V19P295; SET8; -; J13≥Z;
 5463/1: 210 320 015                                                         JS14P295;
 5463/4: 041                                                                 ZERO;
 5463/5: 052|200 360 000                                               12;   ERASE; EXIT1;
 5464/3: 052|041|033|301 012 364                                       13;   ERASE; ZERO; NOT; =V4;
 5465/3: 200 360 001                                                         EXIT 3;
 5466/0: 042|304 000 077|036|223 113 070                               14;   DUP; SETB77; -; J15>Z;
 5467/2: 304 000 032|036|203 273 061                                         SET26; -; J11;
 5470/3: 304 000 216|204 033 072                                       15;   SETB216; J26≠;
 5471/3: 304 000 020|011|203 273 061                                         SETB20; OR; J11;
 5472/4: 304 000 236|225 033 063                                       26;   SETB236; J12=;
 5473/4: 304 000 240|225 033 063                                             SETB240; J12=;
 5474/4: 304 000 256|225 033 063                                             SETB256; J12=;
 5475/4: 304 000 235|225 033 101                                             SETB235; J29=;
 5476/4: 300 016 221|304 000 010|036|200 153 117                             V19P295; SET8; -; J23≠Z;
 5500/2: 041|033|301 012 364                                           30;   ZERO; NOT; =V4;
 5501/1: 052|202 360 001                                               28;   ERASE; EXIT2;
 5501/5: 300 016 221|304 000 010|036|221 153 101                       29;   V19P295; SET8; -; J28=Z;
 5503/3: 041|300 016 225                                                     ZERO; V23P295;
 5504/1: 162 015|201 213 104                                           27;   SHAD+6; J27NV;

 5505/0: 301 012 366|052|202 273 100                                   =V6; ERASE; J30;

 5506/1: 203 333 050                                                   16;   JS8;
 5506/4: 201 333 060                                                   17;   JS10;
 5507/1: 201 273 106                                                         J16;
 5507/4: 202 273 047                                                         J7;



                                                                       [ okq093.txt

 5510/1: 202 273 047                                                         J7;
 5510/4: 065|201 333 060                                               18;   REV; JS10;
 5511/2: 204 273 106                                                         J17;
 5511/5: 202 273 047                                                         J7;
 5512/2: 202 273 047                                                         J7;
 5512/5: 066|201 333 060                                               19;   CAB; JS10;
 5513/3: 204 273 110                                                         J18;
 5514/0: 202 273 047                                                         J7;
 5514/3: 202 273 047                                                         J7;
 5515/0: 304 000 242|210 260 266                                       21;   SET162; JP299;
 5516/0: 304 000 243|210 260 266                                       22;   SET163; JP299;
 5517/0: 304 000 244|210 260 266                                       23;   SET164; JP299;
 5520/0: 304 000 245|210 260 266                                       33;   SET165; JP299;

=== Start P285V-1; at address 2897
                                                                       P285;  (out basic symbol);
 5521/0: 202 337 264                                                         JS12P295;
 5521/3: 210 320 015                                                         JS14P295;
 5522/0: 214 320 065                                                         JS16P295;
 5522/3: 200 360 000                                                         EXIT1;

=== Start P286V-1; at address 2899
                                                                       P286;  (in basic symbol);
 5523/0: 201 336 270|201 273 124                                             JS4P295; J1;
 5524/0: 052                                                           2;    ERASE;
 5524/1: 204 336 345                                                   1;    JS6P295;
 5524/4: 200 273 124                                                         J2;
 5525/1: 201 337 111                                                         JS8P295;
 5525/4: 200 360 000                                                         EXIT1;


                                                                       [ okq094.txt

=== Start P287V-1; at address 2903
                                                                       P287; (COPY TEXT);
 5527/0: 201 336 270                                                         JS4P295;
 5527/3: 202 337 264                                                         JS12P295;
 5530/0: 170 362|100 360|041|166 021                                         =M15; M0M15; ZERO; SHLD+8;
 5531/1: 304 000 215|015|200 153 152                                         SETB215; NEV; J5≠Z;
 5532/2: 041|166 021|065|164 261|304 000 235                                 ZERO; SHLD+8; REV; SHL-40; SETB235;
 5533/5: 224 033 136|065|042                                                 J2=; REV; DUP;
 5534/4: 052                                                           6;    ERASE;
 5534/5: 204 336 345                                                   1;    JS6P295;
 5535/2: 204 273 134                                                         J6;
 5535/5: 205 033 134                                                         J1≠;
 5536/2: 042                                                                 DUP;
 5536/3: 052                                                           26;   ERASE;
 5536/4: 052                                                           2;    ERASE;
 5536/5: 204 336 345                                                   3;    JS6P295;
 5537/2: 204 273 136                                                         J2;
 5537/5: 043|015|225 153 147                                                 DUPD; NEV; J4=Z;
 5540/4: 304 000 215|220 033 153                                             SETB215; J7=;
 5541/4: 304 000 216|205 033 143                                             SETB216; J27≠;
 5542/4: 304 000 020|011                                               SETB20; OR;
 5543/2: 205 273 146                                                         J25;
 5543/5: 304 000 236|224 033 136                                       27;   SETB236; J2=;
 5544/5: 304 000 240|224 033 136                                             SETB240; J2=;
 5545/5: 304 000 256|224 033 136                                             SETB256; J2=;
 5546/5: 210 320 015                                                   25;   JS14P295;
 5547/2: 205 273 136                                                         J3;
 5547/5: 205 337 136                                                   4;    JS10P295;

                                                                       [ okq095.txt

 5550/2: 052|201 337 111                                                     ERASE; JS8P295;
 5551/0: 214 320 065                                                         JS16P295;
 5551/3: 200 360 000                                                         EXIT1;
 5552/0: 304 000 260|210 260 266                                       5;    SET176; JP299;
 5553/0: 164 361|042                                                   7;    SHL-8; DUP;
 5553/3: 052                                                           8;    ERASE;
 5553/4: 204 336 345                                                   9;    JS6P295;
 5554/1: 203 273 153                                                         J8;
 5554/4: 042|304 000 012|036|223 053 170                                     DUP; SET10; -; J10<Z;
 5556/0: 304 000 050|221 033 172                                             SETB50; J11=;
 5557/0: 304 000 070|220 033 177                                             SETB70; J12=;
 5560/0: 304 000 065|224 033 177                                             SETB65; J13=;
 5561/0: 304 000 066|224 033 200                                             SETB66; J14=;
 5562/0: 304 000 072|223 033 205                                             SETB72; J15=;
 5563/0: 304 000 235|223 033 136                                             SETB235; J26=;
 5564/0: 304 000 236|223 033 153                                             SETB236; J8=;
 5565/0: 304 000 240|223 033 153                                             SETB240; J8=;
 5566/0: 304 000 256|223 033 153                                             SETB256; J8=;
 5567/0: 214 320 065                                                         JS16P295;
 5567/3: 304 000 261|210 260 266                                             SET177; JP299;
 5570/3: 065|304 000 012|034|050|056                                   10;   REV; SET10; ×D; CONT; +;
 5571/4: 204 273 153                                                         J9;
 5572/1: 304 000 002                                                   11;   SET2;
 5572/4: 066|170 350|042|215 320 006                                   17;   CAB; =C14; DUP; JS18P295;
 5573/5: 242 353 176                                                         J18C14Z;
 5574/2: 203 273 175                                                         J19;
 5574/5: 042|215 320 006                                               20;   DUP; JS18P295;
 5575/3: 143 340|265 353 174                                           19;   DC14; J20C14NZ;
 5576/2: 052|200 273 153                                               18;   ERASE; J7;


                                                                       [ okq096.txt

 5577/0: 041|204 273 172                                               12;   ZERO; J17;
 5577/4: 304 000 003|204 273 172                                       13;   SET3; J17;
 5600/4: 304 000 215                                                   14;   SETB215;
 5601/1: 066|170 350|042|210 320 015                                   21;   CAB; =C14; DUP; JS14P295;
 5602/2: 245 353 204                                                         J22C14Z;
 5602/5: 200 273 204                                                         J23;
 5603/2: 042|210 320 015                                               24;   DUP; JS14P295;
 5604/0: 143 340|262 353 203                                           23;   DC14; J24C14NZ;
 5604/5: 052|200 273 153                                               22;   ERASE; J7;
 5605/3: 304 000 235|201 273 201                                       15;   SETB235; J21;

=== Start P289V-1; at address 2951
                                                                       P289;   (write boolean);
 5607/0: 202 337 264                                                         JS12P295;;
 5607/3: 220 053 212                                                         J2<Z;
 5610/0: 304 000 315                                                         SETB315;
 5610/3: 210 320 015                                                   1;    JS14P295;
 5611/0: 214 320 065                                                         JS16P295;
 5611/3: 200 360 000                                                         EXIT1;
 5612/0: 304 000 335|203 273 210                                       2;    SETB335; J1;

=== Start P290V-1; at address 2955
                                                                       P290;   (read boolean);
 5613/0: 201 336 270                                                         JS4P295;
 5613/3: 041|204 273 215                                                     ZERO; J2;
 5614/1: 304 000 315|015|220 153 220|042                               1;    SETB315; NEV; J3=Z; DUP;
 5615/3: 052                                                           4;    ERASE;
 5615/4: 204 336 345                                                   2;    JS6P295;
 5616/1: 203 273 215                                                         J4;


                                                                       [ okq097.txt

 5616/4: 304 000 335|201 033 214                                             SETB335; J1≠;
 5617/4: 052|033                                                             ERASE; NOT;
 5620/0: 201 337 111                                                   3;    JS8P295;
 5620/3: 200 360 000                                                         EXIT1;


                                                                             	(Output 18/12/63);
=== Start P265V0; at address 2962
V-store at 05621 = 000 273 337 014 071 251                             P265V0; V0=B0013573703034651;
 5622/0: 300 013 221|065|200 274 154                                         V0; REV; JP291;

=== Start P267V4; at address 2969
V-store at 05624 = 017 377 377 377 000 000                             P267V4; V0=B0377777777600000;
V-store at 05625 = 000 000 000 000 000 000                                   V1=0;
V-store at 05626 = 000 000 000 000 000 000                                   V2=0;
V-store at 05627 = 000 000 013 225 013 226                                   V3=Q0/AV1/AV2;
V-store at 05630 = 215 054 046 065 235 000                                   V4=B4322604615316400;      [ h/w (gap)
 5631/0: 042|200 336 247                                               DUP; JS1P295;
 5631/4: 202 273 256                                                         J1;
 5632/1: 170 342|100 340|170 376|110 340|170 356                             =M14; M0M14; =Q15; M0M14N; =Q14;
 5633/5: 171 370|204 053 254                                                 C15; J2≥Z;
 5634/4: 171 350|026|301 013 225                                             C14; ABS; =V1;
 5635/4: 171 364|033|223 153 251                                             I15; NOT; J3=Z;
 5636/4: 202 337 264                                                         JS12P295;
 5637/1: 304 000 002|215 320 006                                             SET2; JS18P295;
 5640/1: 171 204|200 053 251                                                 I8; J8≥Z;
 5641/0: 171 210|164 373|304 000 001|224 033 243                             C8; SHL-3; SET1; J7=;
 5642/4: 304 000 005|202 033 244                                             SET5; J6≠;
 5643/4: 042|202 337 335                                               7;    DUP; JS171P295;
 5644/2: 052                                                           6;    ERASE;
 5644/3: 214 320 065                                                   5;    JS16P295;

                                                                       [ okq098.txt

 5645/0: 300 013 224|170 376|170 362|171 376|301 013 226                     V0; =Q15; =M15; Q15; =V2;
 5647/0: 300 013 227|304 000 010|200 220 000|200 360 000                     V3; SET8; OUT; EXIT1;
 5651/0: 214 320 065                                                   8;    JS16P295;
 5651/3: 157 017|170 362|300 013 225|170 370|121 360                   3;    Q0TOQ15; =M15; V1; =C15; PARQ15;
 5653/2: 220 353 260                                                         J4TR;
 5653/5: 130 374                                                             PGAPQ15;
 5654/1: 200 360 000                                                         EXIT1;
 5654/4: 304 013 230|065|304 000 002|210 260 266                       2;    SETAV4; REV; SET2; JP299;
 5656/2: 304 013 230|065|304 000 001|210 260 266                       1;    SETAV4; REV; SET1; JP299;
 5660/0: 304 013 230|065|304 000 003|210 260 266                       4;    SETAV4; REV; SET3; JP299;
=== Start P284V6; at address 3001
                                                                       P284V6;    (FORMAT);
V-store at 05664 = 000 273 337 014 071 271                                   V2=B0013573703034671;
V-store at 05667 = 215 024 216 021 032 035                                   V5=B4321221604215035;
V-store at 05670 = 235 000 000 000 000 000                                   V6=B4720000000000000;
 5671/0: 042|301 013 263|170 343|304 000 002|167 361                         DUP; =V1; =RM14; SET2; SHC-8;
 5672/5: 301 013 262|157 017|304 000 030|042|170 310                         =V0; Q0TOQ15; SET24; DUP; =C12;
 5674/4: 161 377|170 270|157 015|153 014|153 013                             SHA-1; =C11; Q0TOQ13; IM0TOQ12; IM0TOQ11;
 5676/2: 157 312|157 011|041|200 334 026                                     Q12TOQ10; Q0TOQ9; ZERO; JS27;
 5677/4: 304 000 215|203 034 032                                             SETB215; J32≠;
 5700/4: 052|204 273 302                                                     ERASE; J2;
 5701/2: 065|042|161 005|056|161 003                                   1;    REV; DUP; SHA+2; +; SHA+1;
 5702/3: 056                                                                 +;
 5702/4: 200 334 026                                                   2;    JS27;
 5703/1: 042|304 000 012|036|222 053 301                                     DUP; SET10; -; J1<Z;
 5704/3: 304 000 070|204 034 024                                             SETB70; (S); J26≠;
 5705/3: 052|042|164 371|204 154 032                                         ERASE; DUP; SHL-4; J33≠Z;
 5706/4: 042|221 154 016                                                     DUP; J23=Z;
 5707/2: 301 013 265|143 360                                                 =V3; DC15;
 5710/1: 041|042|033|027                                               3;    ZERO; DUP; NOT; NEG;


                                                                       [ okq099.txt

 5710/5: 200 334 026                                                   4;    JS27;
 5711/2: 245 374 014                                                         J22C15Z;
 5711/5: 304 000 070|221 033 356                                             SETB70; (S); J13=;
 5712/5: 304 000 051|220 033 353                                       5;    SETB51; (D); J11=;
 5713/5: 304 000 301|224 033 361                                             SETB301; (+); J14=;
 5714/5: 304 000 321|224 033 361                                             SETB321; (-); J14=;
 5715/5: 304 000 322|224 033 361                                             SETB322; (≠); J14=;
 5716/5: 304 000 013|222 033 372                                             SETB13; (.); J16=;
 5717/5: 042|221 153 374                                                     DUP; (ZERO); J17=Z;
 5720/3: 304 000 063|221 033 351                                             SETB63; (N); J10=;
 5721/3: 304 000 012|220 033 377                                             SETB12; (10); J18=;
 5722/3: 304 000 230|220 034 005                                             SETB230; (;); J19=;
 5723/3: 304 000 050|221 034 007                                             SETB50; (C); J20=;
 5724/3: 304 000 065|221 034 012                                             SETB65; (P); J21=;
 5725/3: 304 000 235|202 034 032                                             SETB235; (]); J31≠;   [ underlined right square bracket
 5726/3: 171 304|201 153 332                                           6;    (]); I12; J7≠Z;
 5727/2: 304 000 030|171 310|036|222 154 032                                 SET24; C12; -; J31=Z;
 5730/5: 052|011|301 013 266|201 273 336                                     ERASE; OR; =V4; J8;

 5732/1: 171 310|027|033|202 154 032                                   7;    C12; NEG; NOT; J31≠Z;

 5733/2: 171 262|222 154 032                                                 M11; J31=Z;
 5734/1: 052|052|304 000 003|042|012                                         ERASE; ERASE; SETB3; DUP; PERM;
 5735/2: 054|015|205 154 032                                                 AND; NEV; J34≠Z;
 5736/1: 041|171 242|166 373|052|171 224                               8;    ZERO; M10; SHLD-3; ERASE; I9;
 5737/3: 166 377|052|164 377                                                 SHLD-1; ERASE; SHL-1;
 5740/2: 171 244|166 377|052                                                 I10; SHLD-1; ERASE;
 5741/1: 171 324|166 377|052                                                 I13; SHLD-1; ERASE;
 5742/0: 171 262|166 375|052                                                 M11; SHLD-2; ERASE;
                                                                       [ okq100.txt

 5742/5: 304 000 014|171 270|036|166 371|052                                 SET12; C11; -; SHLD-4; ERASE;
 5744/2: 304 000 030|171 250|036|166 367|052                                 SET24; C10; -; SHLD-5; ERASE;
 5745/5: 171 264|166 375|052                                                 I11; SHLD-2; ERASE;
 5746/4: 300 013 265|166 371|052                                             V3; SHLD-4; ERASE;
 5747/4: 300 013 266|166 321|052                                             V4; SHLD-24; ERASE;
 5750/4: 200 360 000                                                   9;    EXIT1;
 5751/1: 171 270|304 000 014|036|200 153 353                           10;   (n); C11; SET12; -; J11≠Z;
 5752/4: 144 320                                                             I13=+1;
 5753/0: 262 234 032                                                   11;   J31C9NZ; (d, zero or terminator);
 5753/3: 171 304|201 153 355                                                 I12; J12≠Z; (EXM);
 5754/2: 242 274 032                                                         J31C11Z; (SFC>12);
 5754/5: 143 260                                                             DC11;
 5755/1: 012|042|012|011|065                                           12;   PERM; DUP; PERM; OR; REV;
 5756/0: 066                                                                 CAB; (insert digit in field lay out);
 5756/1: 052|164 003|143 300|243 314 032                               13;   ERASE; SHL+1; DC12; J32C12Z; (EFC>24);
 5757/3: 171 244|205 153 310                                                 I10; J4≠Z; (DPM);
 5760/2: 143 240|265 253 310                                                 DC10; J4C10NZ; (NDP);
 5761/1: 203 274 032                                                         J32;
 5761/4: 167 371|042|164 135|065                                       14;   (+-≠); SHC-4; DUP; SHL+46; REV;
 5762/4: 164 251|016                                                         SHL-44; ROUND; (1=+, 2=-, 3=≠);
 5763/1: 171 304|201 153 367                                                 I12; J15≠Z; (EXM);
 5764/0: 171 310|304 000 030|036|202 154 032                                 C12; SET24; -; J31≠Z; (SFC=0);
 5765/3: 171 264|202 154 032                                                 I11; J31≠Z; (first sign);
 5766/2: 170 264|205 273 310                                                 =I11; J4;
 5767/1: 304 000 003|171 310|036|202 154 032                           15;   (EXP SIGN); SET3; C12; -; J31≠Z;
 5770/4: 171 262|202 154 032                                                 M11; J31≠Z;
 5771/3: 170 262|205 273 310                                                 = M11; J4;
 5772/2: 171 244|202 154 032                                           16;   I10; J31≠Z; (DPM);
 5773/1: 052|144 240|205 273 310                                             ERASE; I10=+1; J4;



                                                                       [ okq101.txt

 5774/1: 261 233 355                                                   17;   (ZERO); J12C9NZ;
 5774/4: 171 270|304 000 014|036|222 154 032                                 C11; SET12; -; J31=Z;
 5776/1: 143 220|201 273 355                                                 DC9; J12;

 5777/0: 171 304|202 154 032                                           18;   (=); I12; J31≠Z;
 5777/5: 171 244|222 154 032                                                 I10; J31=Z;
 6000/4: 144 300|052|011|042|301 013 266                                     I12=+1; ERASE; OR; DUP; =V4;
 6002/0: 164 240|164 061|003|027|033|205 154 032                             SHLC10; SHL+24; BITS; NEG; NOT; J34≠Z;
 6003/4: 304 000 003|170 310|201 273 310                                     SET3; =C12; J3;
 6005/0: 171 224|202 154 032                                           19;   (;); I9; J31≠Z;
 6005/5: 144 220|143 220|052|205 273 310                                     I9=+1; DC9; ERASE; J4;
 6007/1: 171 242|164 375|202 154 032                                   20;   (C); M10; SHL-2; J31≠Z;
 6010/2: 143 220|041|033|027|172 242                                         DC9; ZERO; NOT; NEG; =+M10;
 6011/3: 052|205 273 310                                                     ERASE; J4;
 6012/1: 171 242|202 154 032                                           21;   (P); M10; J31≠Z;
 6013/0: 143 220|304 000 004|170 242|052|205 273 310                         DC9; SET4; =M10; ERASE; J4;
 6014/5: 304 000 070|201 034 022                                       22;   SETB70; (S); J24≠;
 6015/5: 052|052                                                             ERASE; ERASE;
 6016/1: 033|027|042|042|164 371                                       23;   NOT; NEG; DUP; DUP; SHL-4;
 6017/1: 225 153 310                                                         J4=Z;
 6017/4: 027|033|301 013 265|143 360|041                                     NEG; NOT; =V3; DC15; ZERO;
 6021/0: 042|033|027|066|201 273 356                                         DUP; NOT; NEG; CAB; J13;
 6022/1: 012|052                                                       24;   PERM; ERASE;
 6022/3: 301 013 265|143 360|041|042|033                               25;   =V3; DC15; ZERO; DUP; NOT;
 6023/5: 027|066|205 273 312                                                 NEG; CAB; J5;
 6024/4: 065|042|223 154 022                                           26;   REV; DUP; J25=Z;
 6025/3: 203 274 032                                                         J32;
 6026/0: 041|300 013 262                                               27;   ZERO; V0;
 6026/4: 041|166 021|012|011|042                                       28;   ZERO; SHLD+8; PERM; OR; DUP;

                                                                       [ okq102.txt

 6027/4: 221 154 031                                                         J29=Z;
 6030/1: 301 013 262|200 360 000                                             =V0; EXIT1;
 6031/1: 052|102 340|204 274 026                                       29;   ERASE; M0M14Q; J28;
 6032/1: 052                                                           30;   ERASE;
 6032/2: 052                                                           31;   ERASE;
 6032/3: 052                                                           32;   ERASE;
 6032/4: 052                                                           33;   ERASE;
 6032/5: 304 013 267|310 000 250|200 334 040|300 013 263|310 000 250   34;   SETAV5; V0P299; JSP288; V1; V0P299;
 6035/2: 200 334 040|300 013 264|204 273 350                                 JSP288; V2; J9;

=== Start P288V0; at address 3104
                                                                       P288V0;  (WRITE TEXT);
 6040/0: 202 337 264                                                         JS12P295;
 6040/3: 170 343|157 015|201 334 110                                         =RM14; Q0TOQ13; JS18;
 6041/4: 304 000 215|205 034 114                                             SETB215; J20≠;
 6042/4: 042                                                                 DUP;
 6042/5: 052                                                           1;    ERASE;
 6043/0: 052                                                           2;    ERASE;
 6043/1: 201 334 110                                                   3;    JS18;
 6043/4: 304 000 215                                                         SETB215;
 6044/1: 204 034 077                                                         J15≠;
 6044/4: 164 361|042                                                   4;    SHL-8; DUP;
 6045/1: 052                                                           5;    ERASE;
 6045/2: 201 334 110                                                   6;    JS18;
 6045/5: 042|304 000 012|036|223 054 067                                     DUP; SET10; -; J7<Z;
 6047/1: 304 000 050|221 034 071                                             SETB50; J8=;
 6050/1: 304 000 070|220 034 076                                             SETB70; J13=;
 6051/1: 304 000 065|224 034 076                                             SETB65; J14=;
 6052/1: 304 000 066|224 034 061                                             SETB66; J21=;


                                                                       [ okq103.txt

 6053/1: 304 000 072|223 034 066                                             SETB72; J26=;
 6054/1: 304 000 235|225 034 042                                             SETB235; J1=;
 6055/1: 304 000 236|221 034 045                                             SETB236; J5=;
 6056/1: 304 000 240|221 034 045                                             SETB240; J5=;
 6057/1: 304 000 256|221 034 045                                             SETB256; J5=;
 6060/1: 214 320 065|304 000 223|210 260 266                                 JS16P295; SET147; JP299;
 6061/4: 304 000 215                                                   21;   SETB215;
 6062/1: 066|170 350|042|210 320 015                                   22;   CAB; =C14; DUP; JS14P295;
 6063/2: 245 354 065                                                         J23C14Z;
 6063/5: 200 274 065                                                         J24;
 6064/2: 042|210 320 015                                               25;   DUP; JS14P295;
 6065/0: 143 340|262 354 064                                           24;   DC14; J25C14NZ;
 6065/5: 052|204 274 044                                               23;   ERASE; J4;
 6066/3: 304 000 235|201 274 062                                       26;   SETB235; J22;
 6067/3: 065|304 000 012|034|050|056                                   7;    REV; SET10; ×D; CONT; +;
 6070/4: 202 274 045                                                         J6;
 6071/1: 304 000 002                                                   8;    SET2;
 6071/4: 066|170 350|042|215 320 006                                   9;    CAB; =C14; DUP; JS18P295;
 6072/5: 242 354 075                                                         J12C14Z;
 6073/2: 203 274 074                                                         J11;
 6073/5: 042|215 320 006                                               10;   DUP; JS18P295;
 6074/3: 143 340|265 354 073                                           11;   DC14; J10C14NZ;
 6075/2: 052|204 274 044                                               12;   ERASE; J4;
 6076/0: 041|204 274 071                                               13;   ZERO; J9;
 6076/4: 304 000 003|204 274 071                                       14;   SET3; J9;
 6077/4: 304 000 235|205 034 101                                       15;   SETB235; J16≠;
 6100/4: 052|214 320 065                                                     ERASE; JS16P295;
 6101/2: 200 360 000                                                         EXIT1;
 6101/5: 304 000 216|225 034 106                                       16;   SETB216; J17=;

                                                                       [ okq104.txt

 6102/5: 304 000 236|220 034 043                                             SETB236; J2=;
 6103/5: 304 000 240|220 034 043                                             SETB240; J2=;
 6104/5: 304 000 256|220 034 043                                             SETB256; J2=;
 6105/5: 210 320 015                                                         JS14P295;
 6106/2: 201 274 043                                                         J3;
 6106/5: 164 361|215 320 006                                           17;   SHL-8; JS18P295;
 6107/4: 201 274 043                                                         J3;
 6110/1: 262 334 112                                                   18;   J19C13NZ;
 6110/4: 102 340|301 014 037|304 000 006|170 330                             M0M14Q; =V0; SET6; =C13;
 6112/2: 300 014 037|041|166 021|065|301 014 037                       19;   V0; ZERO; SHLD+8; REV; =V0;
 6114/0: 143 320|200 360 000                                                 DC13; EXIT1;
 6114/5: 214 320 065|304 000 224|210 260 266                           20;   JS16P295; SET148; JP299;

=== Start P291V28; at address 3180
                                                                       P291V28;      (PROCEDURE WRITE);
V-store at 06120 = 050 242 212 050 242 212                                   V1=B1212121212121212;
V-store at 06121 = 101 004 020 101 004 020                                   V2=B2020202020202020;
V-store at 06122 = 101 211 067 113 306 250                                   V3=B2030446722743250; (1.024 TO 1I.P.);
V-store at 06123 = 076 200 000 000 000 000                                   V4=B175/8; (1000/1024 TO 1I.P.);
V-store at 06124 = 063 063 063 063 063 063                                   V5=B1463 1463 1463 1463; (.8 TO 1I.P.);
V-store at 06125 = 120 000 000 000 000 000                                   V6=B2400 0000 0000 0000; (10/8 TO 1I.P.);
V-store at 06126 = 000 000 000 003 000 003                                   V7=Q0/3/3; (INITIAL SPACES/SIGN/EXP SIGN);
V-store at 06127 = 000 273 337 071 000 001                                   V8=B0013573716200001; (FORMAT÷DS/ZS÷DPM/APM÷;/C/NDP);
V-store at 06130 = 014 314 314 314 314 315                                   V9=B0314631463146315; (.1);
V-store at 06131 = 001 107 256 024 172 341                                   V10=B0024365605075341; (.01);
V-store at 06132 = 000 003 106 334 135 144                                   V11=B0000150667056544; (.0001);
V-store at 06133 = 000 000 000 025 171 217                                   V12=B0000000005274617; (.00000001);
V-store at 06134 = 000 000 000 000 000 012                                   V13=B12; (10);
V-store at 06135 = 000 000 000 000 000 144                                   V14=B144; (100);

                                                                       [ okq105.txt

V-store at 06136 = 000 000 000 000 047 020                                   V15=B23420; (10000);
V-store at 06137 = 000 000 005 365 341 000                                   V16=B575360400; (100000000);
V-store at 06143 = 000 014 000 013 000 001                                   V20=Q12/11/1; (S÷F/E);
V-store at 06150 = 000 000 003 377 377 375                                   V25=B0000 0003 7777 7775;
V-store at 06151 = 000 000 001 377 377 377                                   V26=B0000 0001 7777 7777;
 6154/0: 012                                                           101;  PERM;
 6154/1: 301 014 144                                                   102;  =V21;
 6154/4: 301 014 145|202 337 264|041|301 014 153                       103;  =V22; JS12P295; ZERO; =V28;
 6156/2: 300 014 144|041|166 061                                             V21; ZERO; SHLD+24;
 6157/2: 065|041|166 011|170 250|041                                         REV; ZERO; SHLD+4; =C10; ZERO;
 6160/3: 166 005|170 244|041|166 013|027                                     SHLD+2; =I10; ZERO; SHLD+5; NEG;
 6161/5: 170 170|041|166 011|170 270|041                                     =C7; ZERO; SHLD+4; =C11; ZERO;
 6163/1: 166 005|170 242|041|166 011|170 162                                 SHLD+2; =M10; ZERO; SHLD+4; =M7;
 6164/4: 167 007|170 164|042|041|065                                         SHC+3; =I7; DUP; ZERO; REV;
 6165/5: 166 160|003|027|033|170 264                                         SHLDC7; BITS; NEG; NOT; =I11;
 6167/0: 003|170 262|300 014 145                                             BITS; =M11; V22;
 6170/0: 144 320|042|200 054 223                                             I13=+1; DUP; J5≥Z;
 6171/0: 031|145 320|171 244|200 154 223                                     NEGF; I13=-1; I10; J5≠Z;
 6172/2: 304 000 207|204 335 167                                             SET135; JS100;
 6173/2: 203 335 127                                                   1;    JS80;
 6173/5: 171 162|167 375|225 055 063                                   70;   M7; SHC-2; J95<Z;
 6175/0: 171 164|041|301 014 152|203 154 210                                 I7; ZERO; =V27; J4≠Z;
 6176/3: 171 250|171 244|220 154 200                                         C10; I10; J2=Z;
 6177/4: 033|027                                                             NOT; NEG;
 6200/0: 171 242|223 154 201                                           2;    M10; J3=Z;
 6200/5: 304 000 004|056                                                     SET4; +;
 6201/3: 171 162|167 377|164 243|056                                   3;    M7; SHC-1; SHL-47; +;
 6202/4: 171 162|304 000 004|054|164 375|056                                 M7; SETB4; AND; SHL-2; +;
 6204/1: 066|042|164 057|304 000 027|024                                     CAB; DUP; SHL+23; SET23; FLOAT;

                                                                       [ okq106.txt

 6205/3: 045|065|052|066                                                     FIX; REV; ERASE; CAB;
 6206/1: 056|300 016 235|164 321|171 230|036|056                             +; V31P295; SHL-24; C9; -; +;
 6207/5: 301 014 152|065                                                     =V27; REV;
 6210/3: 171 164|033|170 330|300 016 235|164 321|171 230               4;    I7; NOT; =C13; V31P295; SHL-24; C9;
 6212/3: 036|221 154 214                                                     -; J167=Z;
 6213/1: 304 000 002|215 320 006                                             SET2; JS18P295;
 6214/1: 300 014 143|170 276|300 014 126|170 256|065                   167;  V20; =Q11; V7; =Q10; REV;
 6216/0: 052|300 014 127|041|166 061|012                                     ERASE; V8; ZERO; SHLD+24; PERM;
 6217/2: 041|166 013|170 162|041|166 007                                     ZERO; SHLD+5; =M7; ZERO; SHLD+3;
 6220/4: 170 164|164 301|170 170|304 000 013|170 322                         =I7; SHL-32; =C7; SET11; =M13;
 6222/3: 202 274 237                                                         J7;
 6223/0: 142 160|203 335 127                                           5;    NC7; JS80;
 6223/5: 171 270|027|033|170 322|171 242                                     C11; NEG; NOT; =M13; M10;
 6225/1: 202 154 237                                                         J7≠Z;
 6225/4: 171 342|171 262|036|204 055 046                                     M14; M11; -; J69≥Z;
 6227/0: 171 342|171 264|056|042|170 362                               117;  M14; I11; +; DUP; =M15;
 6230/2: 171 322|065|036|222 054 237                                         M13; REV; -; J7<Z;
 6231/3: 151 375|171 322|202 054 237                                         M15TOQ13; M13; J7≥Z;
 6232/4: 171 322|033|203 154 236                                             M13; NOT; J6≠Z;
 6233/4: 304 000 005|161 127|171 322|033|027|170 322|041                     SET5; SHA+43; M13; NOT; NEG; =M13; ZERO;
 6235/4: 033|002|200 274 245                                                 NOT; =TR; J10;
 6236/3: 052|041|201 274 255                                           6;    ERASE; ZERO; J12;
 6237/2: 304 000 004|170 371|041|033|027                               7;    SET4; =RC15; ZERO; NOT; NEG;
 6240/4: 167 375|171 322                                                     SHC-2; M13;
 6241/2: 167 377|042|202 054 243                                       8;    SHC-1; DUP; J9≥Z;
 6242/2: 065|300 374 130|035|065                                             REV; V9M15; ×; REV;
 6243/2: 140 360|143 360|262 374 241                                   9;    M+I15; DC15; J8C15NZ;
 6244/3: 052|161 371                                                         ERASE; SHA-4;
 6245/0: 056                                                           10;   +;


                                                                       [ okq107.txt

 6245/1: 042|164 253|304 000 012|036|225 054 304                       11;   DUP; SHL-43; SET10; -; J113<Z;
 6246/5: 047|304 000 012|061|140 340|171 242                                 STR; SET10; %D; M+I14; M10;
 6250/2: 201 154 255                                                         J12≠Z;
 6250/5: 171 322|033|027|171 270|015                                         M13; NOT; NEG; C11; NEV;
 6252/0: 225 154 253                                                         J110=Z;
 6252/3: 225 354 253                                                         J110TR;
 6253/0: 304 000 001|172 322                                                 SET1; =+M13;
 6253/5: 171 342|171 262|036|200 055 052                               110;  M14; M11; -; J71≥Z;
 6255/1: 041|042|002|033|027|171 322                                   12;   ZERO; DUP; =TR; NOT; NEG; M13;
 6256/2: 304 000 004|170 371                                                 SET4; =RC15;
 6257/1: 167 377|042|202 054 261                                       13;   SHC-1; DUP; J14≥Z;
 6260/1: 065|300 374 134|034|050|065                                         REV; V13M15; ×D; CONT; REV;
 6261/2: 140 360|143 360|261 374 257                                   14;   M+I15; DC15; J13C15NZ;
 6262/3: 052|034|162 011|065|052                                             ERASE; ×D; SHAD+4; REV; ERASE;
 6263/3: 042|301 014 117|205 335 153                                         DUP; =V0; JS90;
 6264/4: 301 014 146|301 014 147|171 244|027|033                             =V23; =V24; I10; NEG; NOT;
 6266/2: 164 377|203 154 270                                                 SHL-1; J15≠Z;
 6267/1: 304 000 020|171 162|011|170 162                                     SETB20; M7; OR; =M7;
 6270/3: 171 264|171 262|056|171 270|036                               15;   I11; M11; +; C11; -;
 6271/5: 041|170 363|171 264|033|027                                         ZERO; =RM15; I11; NOT; NEG;
 6273/0: 033|027|170 322|205 114 276                                         NOT; NEG; =M13; J18≤Z;
 6274/1: 171 342|171 270|036|033|027                                         M14; C11; -; NOT; NEG;
 6275/2: 042|225 054 305                                                     DUP; J32<Z;
 6276/0: 171 264|056                                                         I11; +;
 6276/3: 170 370                                                       72;   =C15;
 6276/5: 304 000 010|170 271|140 260|304 000 030|170 330               18;   SET8; =RC11; M+I11; SET24; =C13;
 6300/5: 164 061                                                             SHL+24;
 6301/1: 017|017|017|017|017|042|225 054 307                           *16;  DUP; J17<Z;
 6302/4: 164 003|143 320|177 320                                             SHL+1; DC13; J16C13NZS;


                                                                       [ okq108.txt

 6303/4: 052|304 000 210|201 275 055                                         ERASE; SET136; J74;
 6304/5: 201 354 255                                                   113;  J12NTR;
 6305/2: 203 274 236                                                         J6;
 6305/5: 171 264|056|042|203 054 276                                   32;   I11; +; DUP; J72≥Z;
 6307/0: 052|041|203 274 276                                                 ERASE; ZERO; J72;
 6307/5: 143 320|164 003|243 335 054                                   17;   DC13; SHL+1; J73C13Z;
 6311/0: 154 016|304 000 010|170 311                                         C0TOQ14; SET8; =RC12;
 6312/1: 042|223 054 325                                               19;   DUP; J21<Z;
 6312/5: 304 000 076|167 365|200 274 315                               98;   SETB76; SHC-6; J26;
 6314/1: 304 000 077|167 365                                           22;   SETB77; SHC-6;
 6315/0: 300 314 140|166 015|143 300|301 314 140|052                   26;   V17M12; SHLD+6; DC12; =V17M12; ERASE;
 6316/5: 263 314 320                                                         J24C12NZ;
 6317/2: 140 300|304 000 010|170 310                                         M+I12; SET8; =C12;
 6320/3: 143 340                                                       24;   DC14;
 6320/5: 143 320|164 003|261 334 312                                   29;   DC13; SHL+1; J19C13NZ;
 6322/0: 171 262|222 154 352                                           20;   M11; J28=Z;
 6322/5: 300 274 146|141 260|033|220 154 322                                 V23M11; M-I11; NOT; J20=Z;
 6324/2: 052|304 000 211|201 275 055                                         ERASE; SET137; J74;
 6325/3: 171 322|222 154 327                                           21;   M13; J107=Z;
 6326/2: 171 322|027|033|170 322                                             M13; NEG; NOT; =M13;
 6327/2: 242 374 332                                                   107;  J31C15Z;
 6327/5: 143 360|171 322|304 000 002|036|205 054 312                         DC15; M13; SET2; -; J98≥Z;
 6331/4: 041|200 274 315                                                     ZERO; J26;
 6332/2: 041|300 274 146|143 260|162 365|301 274 146                   31;   ZERO; V23M11; DC11; SHAD-6; =V23M11;
 6334/1: 265 274 335                                                         J25C11NZ;
 6334/4: 141 260|304 000 010|170 270                                         M-I11; SET8; =C11;
 6335/5: 164 003|171 162|304 000 010|054|205 154 341                   25;   SHL+1; M7; SETB10; AND; J27≠Z;
 6337/4: 304 000 077|164 125|200 034 315                                     SETB77; SHL+42; J26≠;
 6341/0: 052|041|200 274 315                                                 ERASE; ZERO; J26;

                                                                       [ okq109.txt

 6341/5: 304 000 077|164 125|200 034 347                               27;   SETB77; SHL+42; J30≠;
 6343/1: 171 322|225 154 344                                                 M13; J96=Z;
 6344/0: 052|041|200 274 315                                                 ERASE; ZERO; J26;
 6344/5: 052|171 162|164 371|225 154 312                               96;   ERASE; M7; SHL-4; J98=Z;
 6346/1: 140 360|205 274 320                                                 M+I15; J29;
 6347/0: 171 162|164 371|220 154 315                                   30;   M7; SHL-4; J26=Z;
 6350/1: 171 362|220 154 315                                                 M15; J26=Z;
 6351/0: 052|052|304 000 212|201 275 055                                     ERASE; ERASE; SET138; J74;
 6352/2: 052|171 362|042|172 250|027                                   28;   ERASE; M15; DUP; =+C10; NEG;
 6353/3: 172 170|171 244|224 154 361                                         =+C7; I10; J35=Z;
 6354/4: 171 324|224 054 360                                                 I13; J34<Z;
 6355/3: 171 244|167 377|224 054 357                                         I10; SHC-1; J33<Z;
 6356/4: 304 000 236|200 274 362                                             SETB236; J36;
 6357/4: 304 000 301|200 274 362                                       33;   SETB301; J36;
 6360/4: 304 000 321|200 274 362                                       34;   SETB321; J36;
 6361/4: 041|033                                                       35;   ZERO; NOT;
 6362/0: 170 244|142 340|171 350|171 170|036|171 162                   36;   =I10; NC14; C14; C7; -; M7;
 6363/5: 167 373|205 055 044                                                 SHC-3; J67≥Z;
 6364/4: 304 000 013|170 322|203 115 060                                     SETB13; =M13; J77≤Z;
 6366/0: 171 242|223 155 057                                           68;   M10; J75=Z;
 6366/5: 300 014 117|223 155 041                                             V0; J64=Z;
 6367/5: 154 015|171 342|042|204 054 371                                     C0TOQ13; M14; DUP; J37≥Z;
 6371/1: 027|143 320                                                         NEG; DC13;
 6371/4: 205 335 153                                                   37;   JS90;
 6372/1: 033|203 155 061                                                     NOT; J78≠Z;
 6372/5: 041|065|162 351|033|204 155 062                                     ZERO; REV; SHAD-12; NOT; J79≠Z;
 6374/1: 041|166 017|205 335 064                                             ZERO; SHLD+7; JS40;
 6375/1: 304 000 012|210 320 015                                             SETB12; JS14P295;
 6376/1: 304 000 077|224 035 005                                             SETB77; J51=;

                                                                       [ okq110.txt

 6377/1: 171 330|224 055 002                                                 C13; J38<Z;
 6400/0: 171 242|027|033|027|033|201 155 004                                 M10; NEG; NOT; NEG; NOT; J50≠Z;
 6401/3: 041|215 320 006                                                     ZERO; JS18P295;
 6402/1: 204 275 020                                                         J39;
 6402/4: 304 000 321|210 320 015                                       38;   SETB321; JS14P295;
 6403/4: 204 275 020                                                         J39;
 6404/1: 304 000 301|210 320 015                                       50;   SETB301; JS14P295;
 6405/1: 204 275 020                                                         J39;
 6405/4: 171 242|304 000 003|224 035 012                               51;   M10; SET3; J52=;
 6407/0: 041|215 320 006                                                     ZERO; JS18P295;
 6407/4: 171 330|224 055 016                                                 C13; J55<Z;
 6410/3: 027|033|220 155 020                                                 NEG; NOT; J56=Z;
 6411/2: 052|041|215 320 006                                           53;   ERASE; ZERO; JS18P295;
 6412/1: 201 275 021                                                         J58;
 6412/4: 052|171 330|221 055 015                                       52;   ERASE; C13; J54<Z;
 6413/4: 304 000 301|210 320 015                                             SETB301; JS14P295;
 6414/4: 202 275 011                                                         J53;
 6415/1: 304 000 321|210 320 015                                       54;   SETB321; JS14P295;
 6416/1: 202 275 011                                                         J53;
 6416/4: 052|052|304 000 321|204 275 020                               55;   ERASE; ERASE; SETB321; J39;
 6420/0: 052|304 000 301                                               56;   ERASE; SETB301;
 6420/4: 210 320 015                                                   39;   JS14P295;
 6421/1: 167 015|210 320 015                                           58;   SHC+6; JS14P295;
 6422/0: 171 162|167 377|201 055 024                                   66;   M7; SHC-1; J57≥Z;
 6423/1: 304 000 230|210 320 015                                             SETB230; JS14P295;
 6424/1: 171 164|164 375|200 155 040                                   57;   I7; SHL-2; J63≠Z;
 6425/2: 171 164|170 170|242 175 030                                         I7; =C7; J60C7Z;
 6426/3: 304 000 002|215 320 006                                       59;   SET2; JS18P295;
 6427/3: 143 160|263 175 026                                                 DC7; J59C7NZ;

                                                                       [ okq111.txt

 6430/2: 171 162|167 375|200 055 035                                   60;   M7; SHC-2; J62≥Z;
 6431/3: 300 014 152|042|170 350|220 055 035                                 V27; DUP; =C14; J62<Z;
 6433/0: 240 355 035                                                         J62C14Z;
 6433/3: 143 340|041|215 320 006                                       61;   DC14; ZERO; JS18P295;
 6434/3: 263 355 033                                                         J61C14NZ;
 6435/0: 214 320 065                                                   62;   JS16P295;
 6435/3: 300 014 153|223 155 037                                             V28; J111=Z;
 6436/3: 300 014 153|215 320 322                                             V28; JS7P299;
 6437/3: 200 360 000                                                   111;  EXIT 1;
 6440/0: 304 000 003|215 320 006                                       63;   SET3; JS18P295;
 6441/0: 202 275 030                                                         J60;
 6441/3: 205 335 064                                                   64;   JS40;
 6442/0: 304 000 004|170 350                                                 SET4; =C14;
 6442/5: 041|215 320 006                                               65;   ZERO; JS18P295;
 6443/3: 143 340|265 355 042                                                 DC14; J65C14NZ;
 6444/2: 200 275 022                                                         J66;
 6444/5: 151 015|220 154 366                                           67;   M0TOQ13; J68=Z;
 6445/4: 304 000 213|201 275 055                                             SET139; J74;
 6446/4: 042|225 155 050|304 000 214|204 335 167                       69;   DUP; J116=Z; SET140; JS100;
 6450/2: 205 274 173                                                         J70;
 6450/5: 041|033|170 342|200 274 227                                   116;  ZERO; NOT; =M14; J117;
 6452/0: 052|041|002|304 000 215|204 335 167                           71;   ERASE; ZERO; =TR; SET141; JS100;
 6453/3: 300 014 145|202 274 173                                             V22; J1;
 6454/3: 052|304 000 216                                               73;   ERASE; SET142;
 6455/1: 204 335 167                                                   74;   JS100;
 6455/4: 300 014 144|164 321|300 014 145|202 274 173                         V21; SHL-24; V22; J1;
 6457/3: 205 335 064|200 275 022                                       75;   JS40; J66;
 6460/3: 304 000 217|201 275 055                                       77;   SET143; J74;
 6461/3: 052|304 000 220|201 275 055                                   78;   ERASE; SET144; J74;
                                                                       [ okq112.txt

 6462/4: 052|304 000 221|201 275 055                                   79;   ERASE; SET145; J74;
 6463/5: 304 000 222|210 260 266                                       95;   SET146; JP299;
 6464/5: 245 255 066                                                   40;   J42C10Z;
 6465/2: 143 240|041|215 320 006                                       41;   DC10; ZERO; JS18P295;
 6466/2: 262 255 065                                                         J41C10NZ;
 6466/5: 171 162|167 375|200 055 071                                   42;   M7; SHC-2; J43≥Z;
 6470/0: 304 000 216|210 320 015                                             SETB216; JS14P295;
 6471/0: 171 244|224 055 072                                           43;   I10; J44<Z;
 6471/5: 171 244|210 320 015                                                 I10; JS14P295;
 6472/4: 304 000 010|171 310|036|170 310                               44;   SET8; C12; -; =C12;
 6474/0: 171 322|222 155 115                                                 M13; J88=Z;
 6474/5: 244 175 107                                                         J112C7Z;
 6475/2: 260 315 077                                                   46;   J45C12NZ;
 6475/5: 141 300|304 000 010|170 310                                         M-I12; SET8; =C12;
 6477/0: 041|300 314 140|166 365|301 314 140|167 015                   45;    ZERO; V17M12; SHLD-6; =V17M12; SHC+6;
 6500/5: 171 322|220 155 113                                                 M13; J93=Z;
 6501/4: 171 170|027|033|220 155 113                                         C7; NEG; NOT; J93=Z;
 6502/5: 304 000 077|224 035 111                                             SETB77; J47=;
 6503/5: 304 000 076|224 035 111                                       94;   SETB76; J47=;
 6504/5: 210 320 015                                                   97;   JS14P295;
 6505/2: 143 340|143 300|143 160|262 175 075                           48;   DC14; DC12; DC7; J46C7NZ;
 6506/5: 171 322|225 155 114                                                 M13; J49=Z;
 6507/4: 171 322|210 320 015                                           112;  M13; JS14P295;
 6510/3: 151 015|154 347|202 275 075                                         M0TOQ13; C14TOQ7; J46;
 6511/4: 052|041|215 320 006                                           47;   ERASE; ZERO; JS18P295;
 6512/3: 202 275 105                                                         J48;
 6513/0: 304 000 077|205 035 103                                       93;   SETB77; J94≠;
 6514/0: 052|041|205 275 104                                                 ERASE; ZERO; J97;
 6514/5: 200 360 000                                                   49;   EXIT1;

                                                                       [ okq113.txt

 6515/2: 260 315 117                                                   88;   J89C12NZ;
 6515/5: 141 300|304 000 010|170 310                                         M-I12; SET8; =C12;
 6517/0: 041|300 314 140|166 365|301 314 140|167 015                   89;   ZERO; V17M12; SHLD-6; =V17M12; SHC+6;
 6520/5: 304 000 076|222 035 125                                             SETB76; J99=;
 6521/5: 304 000 077|224 035 126                                             SETB77; J104=;
 6522/5: 210 320 015                                                   105;  JS14P295;

 6523/2: 143 340|143 300|143 160|262 175 115                           106;  DC14; DC12; DC7; J88C7NZ;
 6524/5: 200 360 000                                                         EXIT1;
 6525/2: 052|041|215 320 006|202 275 123                               99;   ERASE; ZERO; JS18P295; J106;
 6526/4: 052|041|205 275 122                                           104;  ERASE; ZERO; J105;
 6527/3: 042|002|030|045|042                                           80;   DUP; =TR; ABSF; FIX; DUP;
 6530/2: 164 243|170 342|026|170 350|304 014 150                             SHL-47; =M14; ABS; =C14; SETAV25;
 6532/0: 170 363|161 377|042|224 155 151                                     =RM15; SHA-1; DUP; J109=Z;
 6533/2: 304 377 366                                                         SET-10;
 6533/5: 170 344|104 357|161 321|170 364                               81;   =I14; M15M14H; SHA-24; =I15;
 6535/1: 171 350|171 344|042|012|056                                   82;   C14; I14; DUP; PERM; +;
 6536/2: 223 055 141                                                         J83<Z;
 6536/5: 172 350|171 364|172 370|300 354 122|034                             =+C14; I15; =+C15; V3M14; ×D;
 6540/3: 162 003|016|201 275 135                                             SHAD+1; ROUND; J82;
 6541/3: 161 373|221 155 144                                           83;   SHA-3; J84=Z;
 6542/2: 304 000 002|172 342|304 377 375|205 275 133                         SET2; =+M14; SET-3; J81;
 6544/1: 171 342|167 377|224 055 145                                   84;   M14; SHC-1; J85<Z;
 6545/2: 142 340                                                             NC14;
 6545/4: 143 340|142 340|047|162 340|203 275 150                       85;   DC14; NC14; STR; SHADC14; J87;
 6547/2: 052|304 000 012|034|143 360                                   86;   ERASE; SET10; ×D; DC15;
 6550/3: 042|222 155 147                                               87;   DUP; J86=Z;
 6551/1: 162 371|052                                                         SHAD-4; ERASE;
 6551/4: 171 370|170 342|144 340|202 355 153                           109;  C15; =M14; I14=+1; J108NTR;

                                                                       [ okq114.txt

 6553/1: 027                                                                 NEG;
 6553/2: 200 360 000                                                   108;	EXIT1;
 6553/5: 042|204 155 155                                               90;    DUP; J76≠Z;
 6554/3: 033|042|164 015|200 275 167                                         NOT; DUP; SHL+6; J92;
 6555/4: 300 014 137|027|043|056|222 055 160                           76;   V16; NEG; DUPD; +; J91<Z;
 6557/1: 027|044|300 014 120|065|067                                         NEG; ÷I; V1; REV; FRB;
 6560/2: 065|300 014 120|065|067|300 014 121                           91;   REV; V1; REV; FRB; V2;
 6561/5: 043|065|036|054|300 014 121                                         DUPD; REV; -; AND; V2;
 6563/0: 015|041|024|045|033                                                 NEV; ZERO; FLOAT; FIX; NOT;
 6563/5: 027|170 370|052|041|033                                             NEG; =C15; ERASE; ZERO; NOT;
 6564/5: 047|015|161 360|011|065                                             STR; NEV; SHAC15; OR; REV;
 6565/5: 042|200 055 167                                                     DUP; J92≥Z;
 6566/3: 161 313|065                                                         SHA-27; REV;
 6567/0: 065|200 360 000                                               92;   REV; EXIT1;
 6567/4: 301 014 153|200 360 000                                       100;  =V28; EXIT1;

=== Start P292V6; at address 3456
                                                                       P292V6;                             [h/w close
V-store at 06571 = 000 000 000 000 000 000                                   V0=0;
V-store at 06572 = 034 170 144 000 000 000                                   V1=B0707414400000000;
V-store at 06573 = 002 073 057 316 131 000                                   V2=B0043545763454400;
V-store at 06574 = 000 000 015 171 015 173                                   V3=Q0/AV0/AV2;
V-store at 06575 = 000 000 002 174 002 174                                   V4=Q0/AW0/AW0;
V-store at 06576 = 004 020 101 004 242 212                                   V5=B0101 0101 0112 1212;
 6600/0: 042|301 015 177|200 336 247                                   18;   DUP; =V6; JS1P295;
 6601/1: 205 275 305                                                         J17;
 6601/4: 304 016 203|225 035 224                                             SETAV5P295; J20=;                  [ M10 Address of Directory entry
 6602/4: 170 242|100 240|042|170 276|110 240                           22;   =M10; M0M10; DUP; =Q11; M0M10N; [ Q11 Algol Directory
 6604/1: 170 316|203 055 270                                                 =Q12; J12≥Z;                      [ Q12 DTR
                                                                                                                [ There is more writing, but photo is too indistinct

                                                                       [ okq115.txt

 6605/0: 171 264|033|224 155 266                                       25;   I11; NOT; J11=Z;
 6606/0: 142 260|110 300|164 061|164 271|223 155 225                         NC11; M0M12N; SHL+24; SHL-36; J35=Z;
 6607/5: 243 235 217                                                         J24C9Z;    [ hand annotation: error ca .....
 6610/2: 243 275 217                                                         J24C11Z;
 6610/5: 304 000 003|300 015 177|202 337 264|215 320 006               SET3; V6; JS12P295; JS18P295;   [ hand annotation SET2
 6612/5: 171 204|203 055 217|171 210|164 373|304 000 003|222 035 217         I8; J24≥Z; C8; SHL-3; SET3; J27=;
 6615/2: 304 000 007|222 035 217                                             SET7; J27=;
 6616/2: 202 337 335|203 275 217                                             JS171P295; J24;
 6617/2: 052                                                           27;   ERASE;
 6617/3: 171 270|213 320 141                                           24;   C11; JS30P295;
 6620/2: 205 275 306                                                         J19;
 6620/5: 167 363|202 055 226                                                 SHC-7; J1≥Z;
 6621/4: 203 335 274                                                         JS13;
 6622/1: 200 275 230                                                         J2;
 6622/4: 042|301 015 177|200 336 247                                   21;   DUP; =V6; JS1P295;
 6623/5: 205 275 305                                                         J17;
 6624/2: 204 275 202                                                         J22;
 6624/5: 052|200 360 000                                               20;   ERASE; EXIT1;
 6625/3: 171 304|220 055 230                                           35;   I12; J2<Z;
 6626/2: 171 204|224 055 243                                           1;    I8; J34<Z;
 6627/1: 153 233|205 335 276                                                 IM9TOQ11; JS14;
 6630/0: 304 000 004                                                   2;    SET4;
 6630/3: 203 335 304                                                   3;    JS16;
 6631/0: 171 302|164 367|164 013|170 302|100 300                             M12; SHL-5; SHL+5; =M12; M0M12;
 6632/4: 170 336|027|172 330|265 335 234                                     =Q13; NEG; =+C13; J4C13NZ;
 6634/0: 151 313|203 335 304                                                 M12TOQ11; JS16;
 6634/5: 171 336|101 300                                               4;    Q13; =M0M12;
 6635/3: 300 016 201|170 356|100 340|170 376                           5;    V3P295; =Q14; M0M14; =Q15;
 6637/0: 262 375 250                                                   6;    J8C15NZ;

                                                                       [ okq116.txt

 6637/3: 100 360|171 350|027|033|200 155 250                                 M0M15; C14; NEG; NOT; J7≠Z;
 6641/0: 170 356|041|033|101 360|157 357                                     =Q14; ZERO; NOT; =M0M15; Q14TOQ15;
 6642/2: 201 335 252                                                         JS9;
 6642/5: 151 353|203 275 304                                                 M14TOQ11; J16;
 6643/4: 240 275 230|240 235 230|171 210|026|042|042|164 041|011|164 041|011
                                                                       34;   J2C11Z; J2C9Z; C8; ABS; DUP; DUP; SHL16; OR; SHL16; OR;
 6646/3: 304 000 010|200 220 000|200 275 230                                 SET8; OUT; J2; (LABEL OUT8 STREAM);
 6650/0: 170 376                                                       7;    =Q15;
 6650/2: 140 360|143 360|143 340|260 355 237                           8;    M+I15; DC15; DC14; J6C14NZ;
 6651/5: 141 360                                                             M-I15;
 6652/1: 100 360|101 240|110 360|111 240|300 016 201                   9;    M0M15; =M0M10; M0M15N; =M0M10N; V3P295;
 6654/0: 167 041|027|033|167 341|301 016 201                                 SHC+16; NEG; NOT; SHC-16; =V3P295;
 6655/3: 241 275 266                                                         J23C11Z;
 6656/0: 300 015 176|171 270|026|067|042                                     V5; C11; ABS; FRB; DUP;
 6657/2: 164 351|221 155 261                                                 SHL-12; J10=Z;
 6660/1: 304 004 000|164 015|011                                             SETB2000; SHL+6; OR;
 6661/1: 304 004 020|011|164 061|300 015 172|164 321                   10;   SETB2020; OR; SHL+24; V1; SHL-24;
 6663/0: 166 061|301 015 172|052|300 015 174|041|301 015 171                 SHLD+24; =V1; ERASE; V3; ZERO; =V0;
 6665/1: 304 000 010|200 220 000                                             SET8; OUT;            [ newline inserted here for clarity
 6666/1: 200 360 000                                                   23;   EXIT1;
 6666/4: 171 310|026|170 210|203 335 274|203 275 235                   11;   C12; ABS; =C8; JS13; J5;
 6670/3: 205 335 276|240 315 205                                       12;   JS14; J25C12Z;
 6671/3: 171 262|223 055 235                                                 M11; J5<Z;
 6672/2: 171 304|027|033|170 322|100 320                                     I12; NEG; NOT; =M13; M0M13;
 6673/4: 164 301|203 275 230                                                 SHL-32; J3;
 6674/3: 041|033|311 002 174|300 015 175|170 376                       13;   ZERO; NOT; =W0; V4; =Q15;
 6676/1: 154 217|130 370                                                     C8TOQ15; MLWQ15;
 6676/5: 171 310|026|042|225 155 224                                   14;   C12; ABS; DUP; J20=Z;
 6700/0: 304 000 006|210 322 135                                             SET6; JS1P113;
 6701/0: 171 262|203 115 303                                           15;   M11; J26≤Z;
 6701/5: 300 016 177|111 260|171 262|301 016 177                             V1P295; =M0M11N; M11; =V1P295;

                                                                       [ okq117.txt

 6703/3: 171 264|170 262|152 013                                       26;   I11; =M11; I0TOQ11;
 6704/3: 171 262|220 115 301                                           16;   M11; J15>Z;
 6705/2: 200 360 000                                                         EXIT1;
 6705/5: 304 000 225|210 260 266                                       17;   SET149; JP299;
 6706/5: 304 000 226|210 260 266                                       19;   SET150; JP299;

=== Start P293V18; at address 3547
                                                                       P293V18; (PROCEDURE OPEN);
V-store at 06712 = 001 340 063 000 000 000                                   V2=B0036 0063 0000 0000; (S);
V-store at 06713 = 001 340 065 000 000 000                                   V3=B0036 0065 0000 0000; (U);
V-store at 06714 = 000 000 015 330 015 332                                   V4=Q0/AV16/AV18;
V-store at 06715 = 000 010 000 001 015 320                                   V5=Q8/1/AV8;
V-store at 06716 = 004 020 101 004 202 010                                   V6=B0101 0101 0110 1010;
V-store at 06717 = 004 020 101 004 242 212                                   V7=B0101 0101 0112 1212;
V-store at 06720 = 000 004 007 304 007 303                                   V8=Q4/AV1P263/AV0P263; (CLASS 0);
V-store at 06721 = 000 004 007 304 007 303                                   V9=Q4/AV1P263/AV0P263; (CLASS 1);
V-store at 06722 = 000 022 010 077 010 075                                   V10=Q18/AV2P264/AV0P264; (CLASS 2);
V-store at 06723 = 000 004 006 377 006 376                                   V11=Q4/AV1P261/AV0P261; (CLASS 3);
V-store at 06724 = 377 377 377 377 377 377                                   V12=-1; (CLASS 4);
V-store at 06725 = 000 004 006 073 006 072                                   V13=Q4/AV1P259/AV0P259; (CLASS 5);
V-store at 06726 = 377 377 377 377 377 377                                   V14=-1; (CLASS 6);
V-store at 06727 = 000 004 006 377 006 376                                   V15=Q4/AV1P261/AV0P261; (CLASS 7);
V-store at 06731 = 034 170 144 000 000 000                                   V17=B0707 4144 0000 0000; (AD);
V-store at 06732 = 000 000 000 000 000 000                                   V18=0;
 6733/0: 042|301 015 310                                                     DUP; =V0;
 6733/4: 042|200 336 247                                               1;    DUP; JS1P295;
 6734/2: 204 275 336                                                         J20;
 6734/5: 304 016 203|205 036 015                                       22;   SETAV5P295; J13≠;
 6735/5: 052|052|200 360 000                                                 ERASE; ERASE; EXIT1;

                                                                       [ okq118.txt

 6736/4: 170 316|042|170 270|213 320 141                               20;  =Q12; DUP; =C11; JS30P295;
 6740/0: 205 276 016                                                        J14;
 6740/3: 042|170 250|164 373|042|167 371                                    DUP; =C10; SHL-3; DUP; SHC-4;
 6741/5: 225 056 017                                                        J15<Z;
 6742/2: 042|041|166 131|162 251|052                                   21;  DUP; ZERO; SHLD+44; SHAD-44; ERASE;
 6743/3: 042|170 362|300 015 315|170 356|171 350                            DUP; =M15; V5; =Q14; C14;
 6745/1: 036                                                                -;
 6745/2: 205 056 020                                                        J16≥Z;
 6745/5: 100 376|042|225 056 021                                            M14M15; DUP; J17<Z;
 6746/5: 170 356|100 340|033|225 156 021                                    =Q14; M0M14; NOT; J17=Z;
 6750/1: 153 013|042|167 377|205 055 351                                    IM0TOQ11; DUP; SHC-1; J19≥Z;
 6751/3: 142 260                                                            NC11;
 6751/5: 171 276|101 300|205 336 023                                   19;  Q11; =M0M12; JS2;
 6753/0: 042|167 377|225 055 370                                            DUP; SHC-1; J5<Z;
 6754/0: 042|225 155 370                                                    DUP; J5=Z;
 6754/4: 304 000 005|210 322 135                                            SET5; JS1P113;
 6755/4: 170 250|100 340|103 360                                            =C10; M0M14; =M0M15Q;
 6756/4: 152 352|171 344|304 377 376|170 351|170 342                        I14TOQ10; I14; SET-2; =RC14; =M14;
 6760/3: 171 356|103 360|041|103 360|151 372                                Q14; =M0M15Q; ZERO; =M0M15Q; M15TOQ10;
 6762/0: 300 015 313                                                   4;   V3;
 6762/3: 171 250|300 015 310|042|225 155 367                           11;  C10; V0; DUP; J24=Z;
 6764/0: 066|202 336 003                                                    CAB; JS12;
 6764/4: 171 256|111 300|300 016 201|167 041|033                       26;  Q10; =M0M12N; V3P295; SHC+16; NOT;
 6766/2: 027|167 341|301 016 201|200 360 000                                NEG; SHC-16; =V3P295; EXIT1;
 6767/5: 052|052|052|204 275 364                                       24;  ERASE; ERASE; ERASE; J26;
 6770/5: 151 372|304 000 004|170 330|100 340|171 344                   5;   M15TOQ10; SET4; =C13; M0M14; I14;
 6772/4: 170 322|100 320|103 360|143 320|243 335 375                   6;   =M13; M0M13; =M0M15Q; DC13; J7C13Z;
 6774/3: 041|166 041|204 275 372                                            ZERO; SHLD+16; J6;
 6775/3: 033|065|042|164 373|225 156 001                               7;   NOT; REV; DUP; SHL-3; J8=Z;
                                                                       [ okq119.txt

 6776/5: 042|223 156 000                                                     DUP; J25=Z;
 6777/3: 304 000 005|210 322 135                                             SET5; JS1P113;
 7000/3: 170 250|033|170 244|200 275 362                               25;   =C10; NOT; =I10; J4;
 7001/5: 052|170 244|300 015 312|203 275 362                           8;    ERASE; =I10; V2; J11;
 7003/2: 301 015 332|304 067 144|170 222|300 015 317|200 336 012       12;   =V18; SETAV17L; =M9; V7; JS9;
 7005/4: 105 220|300 015 316|200 336 012                                     =M0M9H; V6; JS9;
 7007/0: 115 220|300 015 314|041|301 015 330|304 000 010|200 220 000         =M0M9HN; V4; ZERO; =V16; SET8; OUT;
 7011/3: 200 360 000                                                         EXIT1;
 7012/0: 065|067|042|164 351|222 156 014                               9;    REV; FRB; DUP; SHL-12; J10=Z;
 7013/2: 304 004 000|164 015|011                                             SETB2000; SHL+6; OR;
 7014/2: 304 004 020|011|164 061|200 360 000                           10;   SETB2020; OR; SHL+24; EXIT1;
 7015/5: 304 000 171|210 260 266                                       13;   SET121; JP299;
 7016/5: 304 000 172|210 260 266                                       14;   SET122; JP299;
 7017/5: 304 000 173|210 260 266                                       15;   SET123; JP299;
 7020/5: 304 000 174|210 260 266                                       16;   SET124; JP299;
 7021/5: 304 000 175|210 260 266                                       17;   SET125; JP299;
 7022/5: 304 000 176|210 260 266                                       18;   SET126; JP299;
 7023/5: 300 016 200|170 376                                           2;    V2P295; =Q15;
 7024/4: 171 370|171 350|036|042|205 056 033                           23;   C15; C14; -; DUP; J3≥Z;
 7026/1: 052|171 356|202 336 265                                             ERASE; Q14; JS2P295;
 7027/1: 042|170 364|033|027|170 362                                         DUP; =I15; NOT; NEG; =M15;
 7030/2: 170 356|304 000 037|170 370|171 376|042                             =Q14; SET31; =C15; Q15; DUP;
 7032/0: 171 364|170 362|101 360|170 376|204 276 024                         I15; =M15; =M0M15; =Q15; J23;
 7033/5: 170 370|171 364|170 322|100 320|170 276                       3;    =C15; I15; =M13; M0M13; =Q11;
 7035/3: 171 350|042|172 262|172 270|171 276                                 C14; DUP; =+M11; =+C11; Q11;
 7037/0: 101 320|157 375|171 350|172 322|171 336                             =M0M13; Q15TOQ13; C14; =+M13; Q13;
 7040/4: 301 016 200|144 360|200 360 000                                     =V2P295; I15=+1; EXIT1;
                                                                       [ okq120.txt

=== Start P294V12; at address 3631
                                                                       P294V12;  (READ);
V-store at 07044 = 152 115 074 045 346 215                                   V2=B3244647411363215;
V-store at 07045 = 043 166 111 037 002 054                                   V3=B1067311107601054;
V-store at 07046 = 117 254 176 167 152 123                                   V4=B2372617635665123;
V-store at 07047 = 127 162 066 342 017 101                                   V5=B2567106670407501;
V-store at 07050 = 331 126 271 240 320 035                                   V6=B6625327150150035;
V-store at 07052 = 000 000 000 003 051 141                                   V8=B624541;
V-store at 07053 = 220 000 000 000 000 000                                   V9=B4400000000000000;
V-store at 07054 = 004 020 101 004 242 212                                   V10=B0101010101121212;
V-store at 07055 = 220 000 000 001 004 020                                   V11=B4400000000202020;
V-store at 07056 = 000 002 000 001 016 052                                   V12=Q2/1/AV8;
 7057/0: 201 336 270                                                         JS4P295;
 7057/3: 156 007|156 010|304 000 012|041|203 216 061                         CI0TOQ7; CI0TOQ8; SET10; ZERO; J1NV;
 7061/2: 033                                                                 NOT;
 7061/3: 301 016 051|157 011|041|033|065                               1;    =V7; Q0TOQ9; ZERO; NOT; REV;
 7062/5: 171 344|170 162|205 276 071                                         I14; =M7; J8;
 7064/0: 143 220                                                       *2;   DC9;
 7064/2: 043|034|202 156 067                                           3;    DUPD; ×D; J5≠Z;
 7065/1: 065|052|177 220                                                     REV; ERASE; J2C9NZS;
 7065/5: 042|171 202|056|201 216 071                                   4;    DUP; M8; +; J7NV;
 7067/0: 143 220                                                             DC9;
 7067/2: 143 160|260 216 156                                           5;    DC7; J24C8NZ;
 7070/1: 304 000 001|172 230|065                                       6;    SET1; =+C9; REV;
 7071/1: 012|052|140 220                                               7;    PERM; ERASE; M+I9;
 7071/5: 204 336 345|201 276 172                                       8;    JS6P295; J34;
 7072/5: 171 162|171 344|036|205 156 172                                     M7; I14; -; J35≠Z;
 7074/1: 043|170 202|036|202 056 101                                   23;   DUPD; =M8; -; J10≥Z;
 7075/2: 065|042|261 176 070                                                 REV; DUP; J6C7NZ;
 7076/1: 145 160|265 216 077                                                 I7=-1; J9C8NZ;
                                                                       [ okq121.txt

                                                                       [ Page 121

 7077/0: 171 202|221 156 070                                                 M8; J6=Z;
 7077/5: 202 056 064                                                   9;    J3≥Z;
 7100/2: 033|154 011|205 276 065                                             NOT; C0TOQ9; J4;
 7101/2: 042|171 202|036|033|042                                       10;   DUP; M8; -; NOT; DUP;
 7102/2: 221 116 114                                                         J15>Z;
 7102/5: 145 160|263 216 162                                                 I7=-1; J25C8NZ;
 7103/4: 223 156 112                                                         J14=Z;
 7104/1: 065|042|205 056 105                                                 REV; DUP; J11≥Z;
 7105/0: 244 236 105                                                         J13C9Z;
 7105/3: 033                                                                 NOT;
 7105/4: 027                                                           13;   NEG;
 7105/5: 171 204|205 056 106                                           11;   I8; J12≥Z;
 7106/4: 027                                                                 NEG;
 7106/5: 152 010|301 016 042|171 236|301 016 043|157 011               12;   I0TOQ8; =V0; Q9; =V1; Q0TOQ9;
 7110/5: 143 200|041|033|065|154 007                                         DC8; ZERO; NOT; REV; C0TOQ7;
 7112/0: 205 276 071                                                         J8;
 7112/3: 171 224|205 156 163                                           14;   I9; J26≠Z;
 7113/2: 144 220|205 276 071                                                 I9=+1; J8;
 7114/1: 304 000 266|222 036 121                                       15;   SET182; J17=;
 7115/1: 304 000 306|204 036 122                                             SET198; J18≠;
 7116/1: 052|171 204|145 200                                                 ERASE; I8; I8=-1;
 7117/0: 200 156 165                                                   16;   J27≠Z;
 7117/3: 145 160|065|042|201 056 166                                         I7=-1; REV;DUP; J28≥Z;
 7120/4: 065|205 276 071                                                     REV; J8;
 7121/2: 052|171 204|144 200|200 276 117                               17;   ERASE; I8; I8=+1; J16;
 7122/4: 052|171 164|225 156 071                                       18;   ERASE; I7; J8=Z;
 7123/4: 171 202|304 000 236|221 036 172                                     M8; SETB236; J34=;
 7125/0: 304 000 240|221 036 172                                             SETB240; J34=;
 7126/0: 304 000 256|221 036 172                                             SETB256; J34=;

                                                                       [ okq122.txt

                                                                       [ Page 122

 7127/0: 052                                                                 ERASE;
 7127/1: 052|042|204 056 130                                           36;   ERASE;      DUP; J19≥Z;
 7130/0: 241 236 167                                                         J29C9Z;
 7130/3: 033                                                                 NOT;
 7130/4: 171 222|171 224|056|027|033                                   19;   M9; I9; +; NEG; NOT;
 7131/5: 221 156 170                                                         J30=Z;
 7132/2: 171 204|202 056 133                                                 I8; J20≥Z;
 7133/1: 027                                                                 NEG;
 7133/2: 243 216 135                                                   20;   J21C8Z;
 7133/5: 300 016 043|170 236|172 230|300 016 042                             V1; =Q9; =+C9;      V0;
 7135/3: 171 230|171 222|036|171 202|205 337 136                       21;   C9; M9; -; M8; JS10P295;
 7137/1: 201 337 111                                                         JS8P295;
 7137/4: 300 016 044|034|162 005|043|016                               22;   V2; ×D; SHAD+2; DUPD; ROUND;
 7141/0: 042|170 216|041|065|053                                             DUP; =Q8; ZERO; REV; -D;
 7142/0: 050|042|042|035|161 363                                             CONT; DUP; DUP; ×; SHA-7;
 7143/0: 042|300 016 045|035|300 016 046|056                                 DUP; V3; ×; V4; +;
 7144/3: 065|300 016 047|056|300 016 050|065                                 REV; V5; +; V6; REV;
 7146/0: 060|056|065|161 371|043                                             %; +; REV; SHA-4; DUPD;
 7147/0: 056|012|036|161 003|060                                             +; PERM; -; SHA+1; %;
 7150/0: 065|042|041|024|045                                                 REV; DUP; ZERO; FLOAT; FIX;
 7150/5: 027|170 230|052|164 220|035                                         NEG; =C9; ERASE; SHLC9; ×;
 7152/0: 171 216|304 000 060|056|171 230|036                                 Q8; SET48; +; C9; -;
 7153/3: 212 320 231|221 216 171                                             JS163P295; J33V;
 7154/3: 300 016 051|161 141|052|200 360 000                                 V7; SHA+48; ERASE; EXIT1;
 7156/0: 052|304 000 177                                               24;   ERASE; SET127;
 7156/4: 066|052                                                       31;   CAB; ERASE;
 7157/0: 300 016 056|012|300 016 054|310 043 053|067                   32;   V12; PERM; V10; Y11M2; FRB;
 7160/5: 300 016 055|011|301 016 053|210 260 266                             V11; OR; =V9; JP299;
 7162/3: 052|052|304 000 200|200 276 157                               25;   ERASE; ERASE; SET128; J32;
                                                                       [ okq123.txt

                                                                       [ page 123

 7163/5: 052|304 000 201|200 276 157                                   26;   ERASE; SET129; J32;
 7165/0: 052|304 000 202|200 276 157                                   27;   ERASE; SET130; J32;
 7166/1: 304 000 203|204 276 156                                       28;   SET131; J31;
 7167/1: 304 000 204|200 276 157                                       29;   SET132; J32;
 7170/1: 304 000 205|200 276 157                                       30;   SET133; J32;
 7171/1: 304 000 206|200 276 157                                       33;   SET134; J32;
 7172/1: 052|205 276 071                                               34;   ERASE; J8;
 7172/5: 171 162|033|027|170 344                                       35;   M7; NOT; NEG; =I14;
 7173/5: 171 164|221 156 074                                                 I7; J23=Z;
 7174/4: 170 202|201 276 127                                                 =M8; J36;

=== Start P295V40; at address 3751
V-store at 07176 = 367 337 175 367 337 175                             P295V40; V0=B7575757575757575;
V-store at 07177 = 377 377 377 377 377 377                                   V1=-1;
V-store at 07201 = 000 000 000 001 016 202                                   V3=Q0/1/AV4;
V-store at 07202 = 000 004 000 002 016 203                                   V4=Q4/2/AV5;
V-store at 07213 = 377 377 377 377 377 377                                   V13=-1;
V-store at 07233 = 000 004 000 001 002 176                                   V29=Q4/1/AW2;
V-store at 07236 = 000 001 010 012 007 312                                   V32=Q1/AV71P263/AV7P263;
V-store at 07241 = 000 000 016 242 016 242                                   V35=Q0/AV36/AV36;
V-store at 07242 = 377 377 377 377 377 377                                   V36=-1;
V-store at 07243 = 000 000 016 244 016 246                                   V37=Q0/AV38/AV40;
                                                                       1;    (FIND DEVICE P IN DIRECTORY);        [ entry 1
 7247/0: 171 356|065                                                         Q14; REV;
 7247/3: 300 016 201|170 376|100 360|170 356                                 V3; =Q15; M0M15; =Q14;
 7251/0: 245 376 256                                                   45;   J47C15Z;
 7251/3: 264 356 252                                                         J46C14NZ;
 7252/0: 100 340|170 356                                                     M0M14; =Q14;
 7252/4: 102 340|143 360|164 301|164 101|161 301                       46;   M0M14Q; DC15; SHL-32; SHL+32; SHA-32;


                                                                       [ okq124.txt

                                                                       [ page 124

 7254/2: 026|200 036 251                                                     ABS; J45≠;
 7255/0: 052|141 340|171 342|065|170 356|202 360 001                         ERASE; M-I14; M14; REV; =Q14; EXIT2;
 7256/5: 052|260 356 264                                               47;   ERASE; J48C14NZ;
 7257/3: 171 342|202 336 265                                                 M14; JS2;
 7260/2: 170 362|170 342|146 360|304 000 017|170 370                         =M15; =M14; I15=+2; SET15; =C15;
 7262/1: 171 376|101 340|041|033|301 360 036                                 Q15; =M0M14; ZERO; NOT; =E30M15;
 7263/4: 157 376                                                             Q15TOQ14;
 7264/0: 171 356|065|170 356|200 360 000                               48;   Q14; REV; =Q14; EXIT1;
                                                                       2;    (SEARCH FOR A FREE BUFFER);        [ entry 2
 7265/2: 210 260 237                                                   28;   JP297;
 7265/5: 300 016 177|042|170 342|110 340|301 016 177                   29;   V1; DUP; =M14; M0M14N; =V1;
 7267/4: 200 360 000                                                         EXIT1;
                                                                       4;    (INITIALIZE FETCH BASIC SYMBOL);        [ entry 4
 7270/1: 202 336 276                                                         JS42;
 7270/4: 041|301 016 223|200 360 000                                         ZERO; =V21; EXIT1;
                                                                       3;    (INITIALIZE FETCH NEXT CHARACTER);        [ entry 3
 7271/5: 202 336 276                                                         JS42;
 7272/2: 300 016 223|225 056 275                                       49;   V21; J43<Z;
 7273/2: 240 336 275                                                         J52C13Z;
 7273/5: 212 320 167                                                         JS200;
 7274/2: 157 015|154 016                                                     Q0TOQ13; C0TOQ14;
 7275/0: 041|033|301 016 223                                           52;   ZERO; NOT; =V21;
 7275/5: 200 360 000                                                   43;   EXIT1;
 7276/2: 200 336 247                                                   42;   JS1;
 7276/5: 211 260 165                                                         J217;
 7277/2: 170 242|100 240|042|232 040 170                                     =M10; M0M10; DUP; J202<Z;
 7300/4: 170 276|171 262|202 116 322                                         =Q11; M11; J40≤Z;
 7301/5: 110 260|304 000 002|167 365                                         M0M11N; SET2; SHC-6;
 7303/0: 221 036 322                                                         J36=;


                                                                       [ okq125.txt

                                                                       [ page 125

 7303/3: 170 376|100 360|301 016 214|140 360|171 376                         =Q15; M0M15; =V14; M+I15; Q15;
 7305/2: 301 016 215                                                         =V15;
 7305/5: 110 240|170 376|041|171 370|200 056 310                       41;   M0M10N; =Q15; ZERO; C15; J44≥Z;
 7307/3: 033|142 360                                                         NOT; NC15;
 7310/0: 301 016 223|154 372|171 364|042|301 016 222                   44;   =V21; C15TOQ10; I15; DUP; =V20;
 7311/5: 042|041|065|304 010 077|015|224 156 313|033                         DUP; ZERO; REV; SETAV2P264; NEV; J240=Z; NOT;
 7313/4: 301 016 237                                                   240;  =V33;
 7314/1: 027|033|170 342|171 362|100 340                                     NEG; NOT; =M14; M15; M0M14;
 7315/3: 164 341|164 041|011|301 016 216                                     SHL-16; SHL+16; OR; =V16;
 7316/5: 145 360|140 360|102 360|170 336|102 360|170 356                     I15=-1; M+I15;M0M15Q; =Q13; M0M15Q; =Q14;
 7320/5: 100 360|301 016 224|200 360 000                                     M0M15; =V22; EXIT1;
 7322/1: 052                                                           36;   ERASE;
 7322/2: 041|042|301 016 214|301 016 215|205 276 305                   40;   ZERO; DUP; =V14; =V15; J41;
                                                                       5;    (FETCH NEXT CHARACTER);        [ entry 5
 7324/1: 204 337 146                                                         JS57;
 7324/4: 203 276 336                                                         J216;
 7325/1: 042|167 377|042|170 362|104 376                                     DUP; SHC-1; DUP; =M15; M14M15H;
 7326/3: 065|203 056 327                                                     REV; J63≥Z;
 7327/1: 164 031                                                             SHL+12;
 7327/3: 041|166 011|042|224 156 337                                   63;   ZERO; SHLD+4; DUP; J39=Z;
 7330/4: 033|027|167 373|164 377|203 156 335                                 NOT; NEG; SHC-3; SHL-1; J66≠Z;
 7332/1: 047|162 261|050|042|172 342                                         STR; SHAD-40; CONT; DUP; =+M14;
 7333/2: 052                                                           38;   ERASE;
 7333/3: 171 342|300 016 222|036|164 005|011                           64;   M14; V20; -; SHL+2; OR;
 7335/0: 200 360 000                                                         EXIT1;
 7335/3: 052                                                           66;   ERASE;
 7335/4: 154 016|203 276 333                                           65;   C0TOQ14; J64;
 7336/3: 052|304 000 075|204 276 335                                   216;  ERASE; SETB75; J65;


                                                                       [ okq126.txt

                                                                       [ page 126

 7337/4: 052|047|162 261|050|042                                       39;   ERASE; STR; SHAD-40; CONT; DUP;
 7340/4: 033|222 156 344                                                     NOT; J37=Z;
 7341/2: 171 350|222 036 333                                                 C14; J38=;
 7342/1: 170 350|300 016 217|033|027|301 016 217                             =C14; V17; NOT; NEG; =V17;
 7343/5: 203 276 333                                                         J64;
 7344/2: 262 356 333                                                   37;   J38C14NZ;
 7344/5: 170 350|203 276 333                                                 =C14; J64;
                                                                       6;    (FETCH BASIC SYMBOL);        [ entry 6
 7345/4: 171 344|301 016 217                                                 I14; =V17;
 7346/3: 001|202 337 050                                               74;   VR; JS75;
 7347/1: 200 277 047                                                         J69;
 7347/4: 042|201 056 351                                                     DUP; J76≥Z;
 7350/2: 161 271|200 277 047                                                 SHA-36; J69;
 7351/1: 042|164 005|161 003|225 057 037                               76;   DUP; SHL+2; SHA+1; J77<Z;
 7352/3: 225 216 353                                                         J78V;
 7353/0: 171 324|224 057 040                                                 I13; J79<Z;
 7353/5: 171 322|301 016 220|171 316|301 016 240|300 016 216           78;   M13; =V18; Q12; =V34; V16;
 7356/0: 164 341|170 303|145 300|145 340|144 320                             SHL-16; =RM12; I12=-1; I14=-1; I13=+1;
 7357/4: 104 014|143 300|164 025|065|201 276 366                             M12M0H; DC12; SHL+10; REV; J80;
 7361/2: 171 310|027|167 377|042|170 362                               81;   C12; NEG; SHC-1; DUP; =M15;
 7362/4: 104 374|065|200 056 364                                             M12M15H; REV; J82≥Z;
 7363/4: 164 031                                                             SHL+12;
 7364/0: 143 300|200 360 000                                           82;   DC12; EXIT1;
 7364/5: 052                                                           123;  ERASE;
 7365/0: 052                                                           83;   ERASE;
 7365/1: 202 337 050                                                   84;   JS75;
 7365/4: 205 277 046                                                         J68;
 7366/1: 042|164 011|164 261                                           80;   DUP; SHL+4; SHL-40;
 7367/0: 304 000 236|225 036 364                                             SETB236; J123=;


                                                                       [ okq127.txt

                                                                       [ page 127

 7370/0: 304 000 240|225 036 364                                             SETB240; J123=;
 7371/0: 304 000 256|225 036 364                                             SETB256; J123=;
 7372/0: 052|171 324|167 375|203 056 374                                     ERASE; I13; SHC-2; J85≥Z;
 7373/2: 042|033|164 245|220 156 365                                         DUP; NOT; SHL-46; J83=Z;
 7374/3: 265 337 000                                                   85;   J86C13NZ;
 7375/0: 042|300 016 216|170 376|105 337|171 322                             DUP; V16; =Q15; =M15M13H; M13;
 7376/4: 033|027|042|170 322|171 370                                         NOT; NEG; DUP; =M13; C15;
 7377/5: 036|225 057 000                                                     -; J86<Z;
 7400/3: 151 015                                                             M0TOQ13;
 7400/5: 041|166 011|170 370|041|033                                   86;   ZERO; SHLD+4; =C15; ZERO; NOT;
 7402/0: 027|164 360|167 371|042|170 376                                     NEG; SHLC15; SHC-4; DUP; =Q15;
 7403/2: 066|161 375|054|223 157 025                                         CAB; SHA-2; AND; J87=Z;

 7404/3: 042|164 261|164 121|202 336 361                               88;   DUP; SHL-40; SHL+40; JS81;
 7405/5: 015|041|166 021|200 157 020                                         NEV; ZERO; SHLD+8; J89≠Z;
 7407/0: 065|052|042|202 057 010                                             REV; ERASE; DUP; J90≥Z;
 7410/0: 143 300                                                             DC12;
 7410/2: 164 003|171 370|033|164 107|167 003                           90;   SHL+1; C15; NOT; SHL+35; SHC+1;
 7411/5: 171 324|164 377|011|164 003|170 324                                 I13; SHL-1; OR; SHL+1; =I13;
 7413/2: 041|166 003|221 156 365                                             ZERO; SHLD+1; J84=Z;
 7414/2: 202 336 361                                                         JS81;
 7414/5: 164 271|170 344|171 324|042|167 375                                 SHL-36; =I14; I13; DUP; SHC-2;
 7416/2: 222 057 022                                                         J91<Z;
 7416/5: 033|027|170 324|201 276 365                                         NOT; NEG; =I13; J84;
 7420/0: 203 057 025                                                   89;   J87≥Z;
 7420/3: 202 336 361                                                         JS81;
 7421/0: 164 271|027|170 310|203 277 004                                     SHL-36; NEG; =C12; J88;
 7422/2: 152 354|052|171 322|301 016 220|042                           91;   I14TOQ12; ERASE; M13; =V18; DUP;
 7423/5: 164 245|224 157 031                                                 SHL-46; J92=Z;


                                                                       [ okq128.txt

                                                                       [ page 128

 7424/4: 152 015|201 276 365                                                 I0TOQ13; J84;
 7425/3: 171 324|304 000 001|015|171 370|164 355                       87;   I13; SET1; NEV; C15; SHL-10;
 7427/1: 011|164 133|204 157 031                                             OR; SHL+45; J92≠Z;
 7430/1: 171 322|027|033|301 016 220|152 354                                 M13; NEG; NOT; =V18; I14TOQ12;
 7431/4: 052|171 322|300 016 220|042|170 322                           92;   ERASE; M13; V18; DUP; =M13;
 7433/1: 036|042|201 057 035                                                 -; DUP; J93≥Z;
 7434/0: 300 016 216|164 301|172 330                                         V16; SHL-32; =+C13;
 7435/1: 172 330|171 304|300 016 240|170 316|042                       93;   =+C13; I12; V34; =Q12; DUP;
 7436/5: 032|222 057 043                                                     MAX; J94<Z;
 7437/3: 164 111                                                             SHL+36;
 7437/5: 152 015|204 217 042                                           77;   I0TOQ13; J95NV;
 7440/4: 300 016 217|170 344|164 011|164 261|202 360 001               79;   V17; =I14; SHL+4; SHL-40; EXIT2;
 7442/4: 052|203 276 346                                               95;   ERASE; J74;
 7443/2: 001|164 245|042|171 324|054                                   94;   VR; SHL-46; DUP; I13; AND;
 7444/3: 164 377|203 157 046                                                 SHL-1; J96≠Z;
 7445/2: 164 037|170 324|203 276 346                                         SHL+15; =I13; J74;
 7446/3: 033|042                                                       96;   NOT; DUP;
 7446/5: 052                                                           68;   ERASE;
 7447/0: 300 016 217|170 344|200 360 000                               69;   V17; =I14; EXIT1;
 7450/2: 242 337 065                                                   75;   (FETCH CASELESS CHARACTERS); J97C13Z;
 7450/5: 300 016 216|170 376|104 337|143 320|242 337 055                     V16; =Q15; M15M13H; DC13; J98C13Z;
 7452/5: 171 322|033|027|042|170 322                                         M13; NOT; NEG; DUP; =M13;
 7454/0: 171 370|036|202 117 055                                             C15; -; J98≤Z;
 7455/0: 151 015                                                             M0TOQ13;
 7455/2: 202 360 001                                                   98;   EXIT2;
 7455/5: 017|171 350|205 037 103                                       *99;  C14; J101≠;
 7456/5: 017|052|202 277 065                                           *100; ERASE; J97;
 7457/4: 017|017|017|017|017|017|017|017|017|017|017|017|017|017|017|017|017|017|017|017|017
                                                                       *;    DUMMY; *DUMMY; *DUMMY; *DUMMY;
 7463/1: 017|017|017|017|017|304 000 377|212 260 171                   *;    SETB377; J203;


                                                                       [ okq129.txt

                                                                       [ page 129

 7465/0: 172 342                                                       *;    =+M14;
 7465/2: 204 337 146                                                   97;   JS57;
 7465/5: 205 277 107                                                         J102;
 7466/2: 167 377|042|170 362|104 376|065                                     SHC-1; DUP; =M15; M14M15H; REV;
 7467/4: 203 057 070                                                         J103≥Z;
 7470/1: 164 031                                                             SHL+12;
 7470/3: 042|221 057 073                                               103;  DUP; J104<Z;
 7471/1: 041|166 011|174 000|047|162 261                                     ZERO; SHLD+4; =LINK; STR; SHAD-40;
 7472/3: 050|202 377 056                                                     CONT; EXITAR99;
 7473/1: 164 003|042|223 057 076                                       104;  SHL+1; DUP; J105<Z;
 7474/1: 263 357 075                                                         J106C14NZ;
 7474/4: 164 377|202 360 001                                                 SHL-1; EXIT2;
 7475/3: 164 267                                                       106;  SHL-37;
 7475/5: 041|204 277 100                                               109;  ZERO; J107;
 7476/3: 164 267|171 350|220 037 057                                   105;  SHL-37; C14; J100=;
 7477/4: 042|304 004 000|036|065                                             DUP; SETB2000; -; REV;
 7500/4: 171 350|033|225 157 102                                       107;  C14; NOT; J108=Z;
 7501/4: 170 350|164 111|202 360 001                                         =C14; SHL+36; EXIT2;
 7502/5: 052|170 350|210 260 200                                       108;  ERASE; =C14; J204;
 7503/5: 171 350|033|220 117 057                                       101;  C14; NOT; J100>Z;
 7504/5: 042|170 350|033|222 157 065                                         DUP; =C14; NOT; J97=Z;
 7506/0: 300 016 217|033|027|301 016 217|202 277 065                         V17; NOT; NEG; =V17; J97;
 7507/5: 042|033|205 157 075                                           102;  DUP; NOT; J109≠Z;
 7510/4: 200 360 000                                                         EXIT1;
                                                                       7; 8; (PRESERVE FETCH NEXT BASIC SYMBOL/NEXT CHARACTER);        [ entry 7            [ entry 8
 7511/1: 110 240|042|170 363|141 360|171 336                                 M0M10N; DUP; =RM15; M-I15; Q13;
 7512/4: 101 360|141 360|171 356|101 360|170 376                             =M0M15; M-I15; Q14; =M0M15; =Q15;
 7514/2: 300 016 223|204 057 115                                             V21; J67≥Z;
 7515/2: 142 360                                                             NC15;


                                                                       [ okq130.txt

                                                                       [ page 130

 7515/4: 300 016 222|170 364|171 376|111 240|300 016 215|170 376|141 360
                                                                       67;   V20; =I15; Q15; =M0M10N; V15; =Q15; M-I15;
 7520/2: 171 262|201 117 124                                           M11; J21≤Z;
 7521/1: 171 262|171 362|036|033|222 157 123                                 M11; M15; -; NOT; J35=Z;
 7522/4: 171 376|111 260                                                     Q15; =M0M11N;
 7523/2: 300 016 214|101 360                                           35;   V14; =M0M15;
 7524/1: 171 276|101 240|200 360 000                                   21;   Q11; =M0M10; EXIT1;
                                                                       9;    (RETAIN CHARACTER);                   [ entry 9
 7525/2: 164 125|041|300 016 214|166 365|066                                 SHL+42; ZERO; V14; SHLD-6; CAB;
 7526/5: 011|065|042|200 157 131                                             OR; REV; DUP; J34≠Z;
 7527/5: 052|301 016 214|200 360 000                                         ERASE; =V14; EXIT1;
 7531/0: 301 016 214|300 016 215|170 376|141 360|171 262               34;   =V14; V15; =Q15; M-I15; M11;
 7533/0: 171 362|036|033|230 140 201                                         M15; -; NOT; J205=Z;
 7534/1: 171 370|033|027|170 370|101 360                                     C15; NOT; NEG; =C15; =M0M15;
 7535/3: 171 376|301 016 215|200 360 000                                     Q15; =V15; EXIT1;
                                                                       10;   (RETAIN BASIC SYMBOL);            [ entry 10
 7536/5: 304 001 000|011|164 111|300 016 216|170 376                         SETB400; OR; SHL+36; V16; =Q15;
 7540/4: 245 337 144                                                         J33C13Z;
 7541/1: 171 370|171 330|036|210 100 202                                     C15; C13; -; J206≤Z;
 7542/3: 171 370|171 322|223 157 144                                         C15; M13; J32=Z;
 7543/4: 052|171 322|027|033                                                 ERASE; M13; NEG; NOT;
 7544/3: 170 322                                                       32;   =M13;
 7544/5: 171 330|033|027|170 330|105 337                               33;   C13; NOT; NEG; =C13; =M15M13H;
 7546/1: 200 360 000                                                         EXIT1;
                                                                       57;   (FETCH CHARACTER);
 7546/4: 041|300 016 214                                                     ZERO; V14;
 7547/2: 041|166 015|012|011|042                                       58;   ZERO; SHLD+6; PERM; OR; DUP;
 7550/2: 224 157 156                                                         J60=Z;
 7550/5: 301 016 214|300 016 224|214 320 106                                 =V14; V22; JS140;
 7552/2: 201 277 155                                                         J59;


                                                                       [ okq131.txt

                                                                       [ page 131

 7552/5: 041|042|301 016 214|301 016 215|304 000 075                         ZERO; DUP; =V14; =V15; SETB75;
 7554/4: 224 037 155                                                         J62=;
 7555/1: 202 360 001                                                   59;   EXIT2;
 7555/4: 164 365|033|200 360 000                                       62;   SHL-6;NOT; EXIT1;
 7556/4: 052|300 016 215|170 376|262 377 161                           60;   ERASE; V15; =Q15; J61C15NZ;
 7560/1: 200 337 164                                                         JS50;
 7560/4: 164 365|033|027                                                     SHL-6; NOT; NEG;
 7561/2: 102 360|171 376|301 016 215|202 277 147                       61;   M0M15Q; Q15; =V15; J58;
 7563/0: 204 337 225                                                   51;   JS70;
 7563/3: 204 337 237                                                         JS73;
 7564/0: 171 264|223 117 167                                           50;   I11; J53>Z;
 7564/5: 171 264|220 157 163                                                 I11; J51=Z;
 7565/4: 171 264|033|234 140 213                                             I11; NOT; J210=Z;
 7566/4: 152 013|200 277 163                                                 I0TOQ11; J51;
 7567/3: 171 264|170 362|100 360|170 376|171 270                       53;   I11; =M15; M0M15; =Q15; C11;
 7571/1: 042|304 000 024|036|304 000 033|066                                 DUP; SET20; -; SET27; CAB;
 7572/4: 036|011|220 057 204                                                 -; OR; J168<Z;
 7573/3: 120 370|205 357 214                                                 MBTQ15; J169NTR;                  [h/w LH mark
 7574/2: 300 016 237|220 157 204                                             V33; J168=Z;
 7575/2: 041|301 016 237|300 010 075|033|225 157 220                         ZERO; =V33; V0P264; NOT; J178=Z;
 7577/1: 304 010 077                                                         SETAV2P264;
 7577/4: 042|301 016 222|170 343|143 340|141 340                       167;  DUP; =V20; =RM14; DC14; M-I14;
 7601/2: 102 340|164 341|300 016 216|164 101|065                             M0M14Q; SHL-16; V16; SHL+32; REV;
 7603/0: 166 041|301 016 216|052                                             SHLD+16; =V16; ERASE;
 7604/0: 121 360|230 340 204                                           168;  PARQ15; J208TR;
 7604/5: 100 360                                                             M0M15;
 7605/1: 042|221 157 210                                               196;  DUP; J197=Z;
 7605/5: 041|166 015|304 000 075|015|201 157 205                             ZERO; SHLD+6; SETB75; NEV; J196≠Z;
 7607/3: 052|202 277 222                                                     ERASE; J54;

                                                                       [ okq132.txt

                                                                       [ page 132

 7610/1: 052|204 337 225                                               197;  ERASE; JS70;
 7610/5: 204 337 237                                                   55;   JS73;
 7611/2: 100 260|170 376|171 364|170 363|304 000 036                   56;   M0M11; =Q15; I15; =RM15; SET30;
 7613/1: 170 370|171 376|301 016 215|200 360 000                             =C15; Q15; =V15; EXIT1;
 7614/5: 300 016 237|200 157 204                                       169;  V33; J168≠Z;
 7615/5: 041|033|301 016 237|300 006 250|033                                 ZERO; NOT; =V33; V0P260; NOT;
 7617/2: 225 157 220                                                         J178=Z;
 7617/5: 304 006 252|204 277 177                                             SETAV2P260; J167;
 7620/5: 304 000 240|210 260 266                                       178;  SET160; JP299;
 7621/5: 052|052|052                                                   149;  ERASE; ERASE; ERASE;
 7622/2: 171 262|225 157 210                                           54;   M11; J55=Z;
 7623/1: 300 016 177|111 260|171 262|301 016 177|151 013                     V1; =M0M11N; M11; =V1; M0TOQ11;
 7625/1: 205 277 210                                                         J55;
 7625/4: 204 337 230                                                   70;   JS72;

 7626/1: 300 016 176|101 360|120 364|221 357 242|125 360               177;  V0; =M0M15; MLBQ15; J175TR; PREQ15;
 7630/1: 200 360 000                                                         EXIT1;
 7630/4: 171 262|224 117 233                                           72;   M11; J71>Z;
 7631/3: 171 336|171 356|202 336 265                                         Q13; Q14; JS2;
 7632/4: 170 262|170 356|170 336                                             =M11; =Q14; =Q13;
 7633/4: 171 262|042|304 000 002|056|170 364                           71;   M11; DUP; SET2; +; =I15;
 7635/1: 304 000 037|056|170 362|154 257|171 376                             SET31; +; =M15; C10TOQ15; Q15;
 7636/5: 101 260|200 360 000                                                 =M0M11; EXIT1;
 7637/4: 171 262|171 264|170 262|170 264|171 276                       73;   M11; I11; =M11; =I11; Q11;
 7641/2: 101 240|200 360 000                                                 =M0M10; EXIT1;
 7642/1: 171 316|154 374|211 320 140                                   175;   Q12; C15TOQ12; JS174;
 7643/2: 136 310|171 310|300 016 243|170 316|041                             MRWDQ12; C12; V37; =Q12; ZERO;
 7645/0: 301 016 246|170 310|211 320 140                                     =V40; =C12; JS174;
 7646/2: 124 300|211 320 140|300 016 246                                     MFRQ12; JS174; V40;

                                                                       [ okq133.txt

                                                                       [ page 133

 7647/4: 300 016 245|304 000 004|200 220 000                           176;  V39; SET4; OUT;
 7651/1: 171 310|304 000 006|200 220 000                                     C12; SET6; OUT;
 7652/3: 110 240|170 316|170 310|171 316|111 240                             M0M10N; =Q12; =C12; Q12; =M0M10N;
 7654/1: 154 312|211 320 140|171 310|300 016 243|170 316|170 310             C12TOQ10; JS174; C12; V37; =Q12; =C12;
 7656/3: 124 300|300 016 246|027|033|224 037 247                             MFRQ12; V40; NEG; NOT; J176=;
 7660/1: 154 317|052|170 316|201 277 226                                     C12TOQ15; ERASE; =Q12; J177;
                                                                       19;   (INITIALIZE OUTPUT BASIC SYMBOL AND CHARACTER);              [ entry 19
 7661/3: 300 016 236|301 016 232|041|042|033                                 V32; =V28; ZERO; DUP; NOT;
 7663/0: 170 230|301 016 234|200 360 000                                     =C9; =V30; EXIT1;
 7664/2: 042|200 336 247                                               12;11; DUP; JS1;              [ entry 11              [ entry 12     open output stream
 7665/0: 212 260 164                                                         J201;
 7665/3: 170 202|052|100 200|170 236|240 237 270                             =M8; ERASE; M0M8; =Q9; J154C9Z;
 7667/1: 171 230|200 057 303                                                 C9; J146≥Z;
 7670/0: 110 200|170 376|156 370|100 360|301 016 232                   154;  M0M8N; =Q15; CI15TOQ8; M0M15; =V28;
 7671/5: 110 360|041|166 031|164 031|166 031                                 M0M15N; ZERO; SHLD+12; SHL+12; SHLD+12;
 7673/2: 301 016 235|041|166 031|170 230|167 031                             =V31; ZERO; SHLD+12; =C9; SHC+12;
 7675/0: 301 016 234|300 360 002|301 016 227|300 360 003|301 016 230         =V30; E2M15; =V25; E3M15; =V26;
 7677/3: 171 222|204 117 350                                                 M9; J148≤Z;
 7700/2: 110 220|042|301 016 226|170 376|100 360                             M0M9N; DUP; =V24; =Q15; M0M15;
 7702/0: 301 016 225|200 360 000                                             =V23; EXIT1;
 7703/0: 171 222|033|230 140 203                                       146;  M9; NOT; J207=Z;
 7704/0: 304 000 241|210 260 266                                             SET161; JP299;
                                                                       13;   (OUTPUT CHARACTER);              [ entry 13
 7705/0: 300 016 227|214 320 106                                             V25; JS140;
 7706/0: 200 277 364                                                         J129;
 7706/3: 300 016 235|164 321|170 230                                         V31; SHL-24; =C9;
 7707/4: 171 204|201 057 327                                           147;  I8; J180≥Z;
 7710/3: 242 217 335                                                         J171C8Z;
 7711/0: 042                                                                 DUP;

                                                                       [ okq134.txt

                                                                       [ page 134

 7711/1: 215 320 101                                                         JS144;
 7711/4: 203 277 321                                                         J181;
 7712/1: 171 210|164 373|304 000 001|223 037 324                             C8; SHL-3; SET1; J182=;
 7713/5: 304 000 005|223 037 324|052|052                                     SET5; J182=; ERASE; ERASE;
 7715/1: 041|300 016 225|166 365|301 016 225|215 320 001                     ZERO; V23; SHLD-6; =V23; JS134;
 7717/1: 141 360|100 360|164 365|166 015|103 360                             M-I15; M0M15; SHL-6; SHLD+6; =M0M15Q;
 7720/5: 052|205 277 335                                               255;  ERASE; J135;
 7721/3: 171 210|164 373|304 000 001|223 037 324                       181;  C8; SHL-3; SET1; J182=;
 7723/1: 304 000 005|015|205 157 320                                         SET5; NEV; J255≠Z;
 7724/2: 042                                                                 DUP;
 7724/3: 052|304 000 075|015|222 157 335                               182;  ERASE; SETB75; NEV; J171=Z;
 7725/5: 300 016 226|170 376|204 277 370                                     V24; =Q15; J219;
 7727/1: 215 320 101                                                   180;  JS144;
 7727/4: 205 277 335                                                         J135;
 7730/1: 100 200|170 376|171 370|026                                         M0M8; =Q15; C15; ABS;
 7731/2: 042|304 000 062|036|304 000 071|066|036                             DUP; SET50; -; SET57; CAB; -;
 7733/0: 011|222 057 335                                                     OR; J171<Z;
 7733/4: 041|300 016 225|214 320 002                                         ZERO; V23; JS130;
 7734/5: 205 277 335                                                         J135;
 7735/2: 215 320 001                                                   171;  JS134;
 7735/5: 052|171 316|100 220|170 316|141 360                           135;  ERASE; Q12; M0M9; =Q12; M-I15;
 7737/2: 151 374|171 204|220 057 343                                         M15TOQ12; I8; J136<Z;
 7740/3: 121 300|230 340 204                                                 PARQ12; J208TR;
 7741/2: 122 300|232 340 112                                                 METQ12; J179TR;
 7742/1: 131 300|202 277 346                                                 MWEQ12; J137;
 7743/0: 171 210|111 220|171 222|033|027                               136;  C8; =M0M9N; M9; NOT; NEG;
 7744/2: 170 304|154 014|171 316|304 000 010|200 220 000                     =I12; C0TOQ12; Q12; SET8; OUT;
 7746/2: 170 316|171 224|171 222|170 224|042                           137;  =Q12; I9; M9; =I9; DUP;
 7747/5: 170 222|224 117 354                                                 =M9; J139>Z;


                                                                       [ okq135.txt

                                                                       [ page 135

 7750/4: 171 222|223 157 352                                           148;  M9; J138=Z;
 7751/3: 171 222|033|230 140 203                                             M9; NOT; J207=Z;
 7752/3: 171 336|171 356|202 336 265                                   138;  Q13; Q14; JS2;
 7753/4: 170 222|170 356|170 336                                             =M9; =Q14; =Q13;
 7754/4: 171 222|042|304 000 002|056|170 364                           139;  M9; DUP; SET2; +; =I15;
 7756/1: 304 000 037|056|170 362|154 217|171 376                             SET31; +; =M15; C8TOQ15; Q15;
 7757/5: 101 220|171 364|170 363|304 000 036|170 370                         =M0M9; I15; =RM15; SET30; =C15;
 7761/4: 171 376|301 016 226|304 000 002|301 016 225|200 360 000       132;  Q15; =V24; SET2; =V23; EXIT1;
 7764/0: 300 016 230|214 320 106                                       129;  V26; JS140;
 7765/0: 201 277 373                                                         J131;
 7765/3: 304 000 034|201 037 370                                             SETB34; J133≠;
 7766/3: 261 217 373                                                         J131C8NZ;
 7767/0: 304 000 003|011|201 277 373                                         SETB3; OR; J131;
 7770/1: 215 320 101                                                   133;  JS144;
 7770/4: 245 377 335                                                   219;  J135C15Z;
 7771/1: 052|200 360 000                                                     ERASE; EXIT1;
 7771/5: 171 210|205 157 374                                           172;  C8; J166≠Z;
 7772/4: 201 277 370                                                         J133;
 7773/1: 171 230|225 157 371                                           131;  C9; J172=Z;
 7774/0: 143 220|261 237 370                                           142;  DC9; J133C9NZ;
 7774/5: 300 016 234|300 016 231|304 000 002|215 320 006               166;  V30; V27; SET2; JS18;
 7776/5: 301 016 231|300 016 234|231 020 001                                 =V27; V30; J165=;
10000/2: 042|042|214 320 022                                                 DUP; DUP; JS122;
10001/1: 052|200 277 374                                               165;  ERASE; J142;
10001/5: 041|033|300 016 225                                           134;  ZERO; NOT; V23;
10002/4: 162 015|214 200 002                                           130;  SHAD+6; J130NV;
10003/3: 300 016 226|170 376|103 360|052|171 376                             V24; =Q15; =M0M15Q; ERASE; Q15;
10005/1: 301 016 226|200 360 000                                             =V24; EXIT1;
                                                                       17;   (OUTPUT CASE CHARACTER);              [ entry 17


                                                                       [ okq136.txt

                                                                       [ page 136

10006/1: 042|214 260 022                                                     DUP; J122;
                                                                       18;   (OUTPUT EDITING SYMBOL);              [ entry 18
10006/5: 304 000 004|036|171 230|210 040 015                                 SET4; -; C9; J14≥Z;
                                                                       110;  (OUTPUT BASIC SYMBOL);
10010/2: 041|301 016 221|304 000 002|301 016 225|300 016 233                 ZERO; =V19; SET2; =V23; V29;
10012/3: 301 016 226|210 320 015|215 320 001|300 016 221|200 360 000         =V24; JS14; JS134; V19; EXIT1;
10015/0: 042|042|304 000 377|036|230 100 205|211 320 057               14;DUP;DUP;SET255;-;J209>Z;JS124;              [ entry 14
10017/0: 210 260 205                                                         J209;
10017/3: 065|052|042|211 040 036                                             REV; ERASE; DUP; J115≥Z;
10020/3: 167 011                                                             SHC+4;
10020/5: 041|166 005|300 016 234|235 020 027                           116;  ZERO; SHLD+2; V30; J111=;              [ entry 116
10022/2: 042|033                                                             DUP; NOT;
10022/4: 301 016 234|304 000 010|036|042|211 320 057                   122;  =V30; SET8; -; DUP; JS124;
10024/3: 212 260 210                                                         J214;
10025/0: 065|052|164 015|164 255|212 260 030                                 REV; ERASE; SHL+6; SHL-42; J121;
10026/3: 300 016 234|033|301 016 234|042                               113;  V30; NOT; =V30; DUP;
10027/5: 052|164 255                                                   111;  ERASE; SHL-42;
10030/2: 171 230|231 040 033                                           121;  C9; J112<Z;
10031/1: 200 337 305                                                         JS13;
10031/4: 300 016 234|233 040 026                                       114;  V30; J113<Z;
10032/4: 200 360 000                                                         EXIT1;
10033/1: 300 016 221|033|027|301 016 221|215 320 101                   112;  V19; NOT; NEG; =V19; JS144;
10035/0: 250 360 202                                                         J206C15Z;
10035/3: 052|214 260 031                                                     ERASE; J114;
10036/1: 164 271|042|164 373|042|300 016 232                           115;  SHL-36; DUP; SHL-3; DUP; V28;
10037/4: 164 341|170 363|172 362|164 007|036                                 SHL-16; =RM15; =+M15; SHL+3; -;
10041/1: 164 007|102 360|171 376|301 016 220|065                             SHL+3; M0M15Q; Q15; =V18; REV;
10042/5: 170 370|041|166 021|166 360|304 000 377                             =C15; ZERO; SHLD+8; SHLDC15; SETB377;
10044/3: 054|301 016 231|041|033|027                                         AND; =V27; ZERO; NOT; NEG;

                                                                       [ okq137.txt

                                                                       [ page 137

10045/4: 167 360|011                                                         SHCC15; OR;
10046/1: 042|164 021|235 140 052                                       117;  DUP; SHL+8; J119=Z;
10047/1: 042|215 320 020                                                     DUP; JS116;
10047/5: 164 021                                                             SHL+8;
10050/1: 300 016 231|027|033|042|301 016 231                           120;  V27; NEG; NOT; DUP; =V27;
10051/4: 211 140 046                                                         J117≠Z;
10052/1: 052                                                                 ERASE;
10052/2: 200 360 000                                                   118;  EXIT1;
10052/5: 167 021|300 016 220|170 376|102 360|171 376                   119;  SHC+8; V18; =Q15; M0M15Q; Q15;
10054/4: 301 016 220|042|164 021|066|011                                     =V18; DUP; SHL+8; CAB; OR;
10056/0: 065|215 320 020                                                     REV; JS116;
10056/4: 211 260 050                                                         J120;
10057/1: 167 377|042|164 003|161 377|300 016 232                       124;  SHC-1; DUP; SHL+1; SHA-1; V28;
10060/5: 170 362|171 362|164 003|056|170 362                                 =M15; M15; SHL+1; +; =M15;
10062/2: 104 360|065|214 040 063                                             M0M15H; REV; J125≥Z;
10063/2: 164 031                                                             SHL+12;
10063/4: 042|164 271|231 140 065                                       125;  DUP; SHL-36; J126=Z;
10064/4: 202 360 001                                                         EXIT2;
10065/1: 200 360 000                                                   126;  EXIT1;
                                                                       15; 16;     (PRESERVE STATE OF OUTPUT CHARACTER AND BASIC SYMBOL);          [ entry 15          [ entry 16
10065/4: 100 200|164 301|211 140 071                                         M0M8; SHL-32; J153≠Z;
10066/5: 042|202 337 335                                                     DUP; JS171;

10067/3: 211 320 071|041|204 335 222|200 360 000                       173;  JS153; ZERO; JS21P292; EXIT1;
10071/1: 110 200|170 376|110 360|300 016 234|166 351                   153;  M0M8N; =Q15; M0M15N; V30; SHLD-12;
10073/0: 052|171 230|166 351|052|167 321                                     ERASE; C9; SHLD-12; ERASE; SHC-24;
10074/2: 111 360|300 016 232|101 360|300 016 226|042                         =M0M15N; V28; =M0M15; V24; DUP;
10076/1: 111 220|170 376|300 016 225|101 360|100 200                         =M0M9N; =Q15; V23; =M0M15; M0M8;
10100/0: 164 301|170 230|171 236|101 200|200 360 000                         SHL-32; =C9; Q9; =M0M8; EXIT1;


                                                                       [ okq138.txt

                                                                       [ page 138

10101/5: 001|042|167 363|300 016 225|162 015                           144;  VR; DUP; SHC-7; V23; SHAD+6;
10103/2: 301 016 225|052|215 200 111                                         =V23; ERASE; J145NV;
10104/3: 300 016 226|170 376|300 016 225|103 360|204 277 361                 V24; =Q15; V23; =M0M15Q; J132;
10106/4: 041|166 015|066|065|233 020 111                               140;  ZERO; SHLD+6; CAB; REV; J141=;
10110/0: 065|042|214 140 106                                                 REV; DUP; J140≠Z;
10110/5: 052|200 360 000                                                     ERASE; EXIT1;
10111/3: 065|052                                                       141;  REV; ERASE;
10111/5: 202 360 001                                                   145;  EXIT2;
10112/2: 131 300|211 320 140|171 310|300 016 241|170 316               179;  MWEQ12; JS174; C12; V35; =Q12;
10114/2: 170 310|130 310|211 320 140                                         =C12; MLWQ12; JS174;
10115/3: 136 310|171 310|300 016 243|170 316|041|301 016 246                 MRWDQ12; C12; V37; =Q12; ZERO; =V40;
10117/4: 170 310|211 320 140|124 300|211 320 140|300 016 245|300 016 246
                                                                             =C12; JS174; MFRQ12; JS174; V39; V40;
10122/2: 171 310|304 000 006|200 220 000                                     C12; SET6; OUT;
10123/4: 041|304 000 004|200 220 000                                         ZERO; SET4; OUT;
10124/5: 110 200|170 316|170 310|171 316                                     M0M8N; =Q12; =C12; Q12;
10126/1: 111 200|211 320 140|171 310|300 016 243|170 316                     =M0M8N; JS174; C12; V37; =Q12;
10130/1: 154 310|124 300|033|027|301 016 246|301 016 245                     C12TOQ8; MFRQ12; NOT; NEG; =V40; =V39;
10132/1: 304 000 001|170 302|211 320 140                                     SET1; =M12; JS174;
10133/3: 136 300|304 016 246|170 302|211 320 140                             MBSKQ12; SETAV40; =M12; JS174;
10135/1: 130 300                                                             MWQ12;
10135/3: 304 002 016|170 302|211 320 140                                     SET526; =M12; JS174;
10136/5: 130 304|211 320 140                                                 MWIPEQ12; JS174;
10137/4: 202 277 346                                                         J137;
10140/1: 121 300|230 340 204                                           174;  PARQ12; J208TR;
10141/0: 200 360 000                                                         EXIT1;
                                                                       30;   (DECIMAL INTEGER TO CORRESPONDING BINARY
      OCTAL REPRESENTATION);                      [ entry 30
10141/3: 300 016 176|033|042|164 005|042                                     V0; NOT; DUP; SHL+2; DUP;
10142/5: 012|011|066|067|043                                                 PERM; OR; CAB; FRB; DUPD;


                                                                       [ okq139.txt

                                                                       [ page 139

10143/4: 054|210 140 145                                                     AND; J31≠Z;
10144/2: 013|202 360 001                                                     TOB; EXIT2;
10145/0: 200 360 000                                                   31;   EXIT1;
10145/3: 170 350|255 340 147                                           150;  =C14; J152C14Z;                [ entry 150    [  output spaces
10146/2: 042|215 320 006                                               151;  DUP; JS18;
10147/0: 143 340|272 340 146                                                 DC14; J151C14NZ;
10147/5: 052|200 360 000                                               152;  ERASE; EXIT1;
10150/3: 042|202 337 264                                               155;  DUP; JS12;                     [ entry 155           [h/w from P299
10151/1: 304 000 002|215 320 006|214 320 065                                 SET2; JS18; JS16;
10152/4: 304 377 330|170 170                                           156;  SET-40; =C7;
10153/3: 042|066|042|164 160                                           157;  DUP; CAB; DUP; SHLC7;
10154/2: 214 320 215|304 000 057|024|066                                     JS212; SET47; FLOAT; CAB;
10155/4: 304 056 001|164 037|304 006 000|011|065                             SETB27001; SHL+15; SETB3000; OR; REV;
10157/2: 171 170|311 002 174|200 334 154                                     C7; =W0; JSP291;
10160/4: 310 002 174|170 170                                                 W0; =C7;
10161/3: 253 160 163                                                         J158C7Z;
10162/0: 304 000 010|172 170|065|213 260 153                                 SET8; =+C7; REV; J157;
10163/3: 052|052|200 360 000                                           158;  ERASE; ERASE; EXIT1;
10164/2: 052|042|231 140 166                                           201;  ERASE; DUP; J215=Z;
10165/1: 304 000 230|210 260 266                                       217;  SET152; JP299;
10166/1: 042|200 335 333                                               215;  DUP; JSP293;
10166/5: 202 277 264                                                         J11;
10167/2: 304 000 227|210 260 266                                       200;  SET151; JP299;
10170/2: 304 000 231|210 260 266                                       202;  SET153; JP299;
10171/2: 054|201 337 111|171 270|065|170 376                           203;  AND; JS8; C11; REV; =Q15;
10172/5: 171 344|171 176|171 216|171 236|171 376|214 320 215                 I14; Q7; Q8; Q9; Q15; JS212;
10175/0: 215 320 320|170 236|170 216|170 176                                 JS3P299; =Q9; =Q8; =Q7;
10176/3: 065|201 336 270|170 344|202 277 065                                 REV; JS4; =I14; J97;
10200/0: 304 000 232|210 260 266                                       204;  SET154; JP299;


                                                                       [ okq140.txt

                                                                       [ page 140

10201/0: 304 000 233|210 260 266                                       205;  SET155; JP299;
10202/0: 304 000 234|210 260 266                                       206;  SET156; JP299;
10203/0: 304 000 235|210 260 266                                       207;  SET157; JP299;
10204/0: 304 000 236|210 260 266                                       208;  SET158; JP299;
10205/0: 052|214 320 065|171 230|026|065                               209;  ERASE; JS16; C9; ABS; REV;
10206/2: 214 320 215|215 320 321|202 337 264|200 360 000                     JS212; JS4P299; JS12; EXIT1;
10210/2: 052|214 320 065|171 230|026|065                               214;  ERASE; JS16; C9; ABS; REV;
10211/4: 214 320 215|215 320 321|202 337 264|214 260 031                     JS212; JS4P299; JS12; J114;
10213/4: 304 000 237|210 260 266                                       210;  SET159; JP299;
10214/4: 304 000 050|210 260 266                                       211;  SET40; JP299;
10215/4: 164 121|164 261|300 016 176|033|042                           212;  SHL+40; SHL-40; V0; NOT; DUP;
10217/1: 164 005|042|012|011|012                                             SHL+2; DUP; PERM; OR; PERM;
10220/1: 065|067|013|200 360 000                                             REV; FRB; TOB; EXIT1;
10221/1: 300 016 201|170 376|255 360 230                               160;  V3; =Q15; J161C15Z;                 [ entry 160     [h/w from P299
10222/3: 171 370|027|033|235 140 230                                   162;  C15; NEG; NOT; J161=Z;
10223/4: 100 360|170 356|140 340|100 340|164 301|164 101|161 301|026   170;  M0M15; =Q14; M+I14; M0M14; SHL-32; SHL+32; SHA-32; ABS;
10226/1: 200 335 200                                                         JSP292;
10226/4: 300 016 201|170 376|143 360|274 360 223                             V3; =Q15; DC15; J170C15NZ;
10230/2: 202 360 001                                                         EXIT2;
10230/5: 200 360 000                                                   161;  EXIT1;
10231/2: 065|042|235 140 235                                           163;  REV; DUP; J164=Z;              [ entry 163
10232/1: 041|024|047|012|041                                                 ZERO; FLOAT; STR; PERM; ZERO;
10233/0: 162 021|066|056|162 361|042                                         SHAD+8; CAB; +; SHAD-8; DUP;
10234/1: 234 040 235                                                         J127<Z;
10234/4: 050|065|050                                                         CONT; REV; CONT;
10235/1: 200 360 000                                                   128;  EXIT1;
10235/4: 052                                                           127;  ERASE;
10235/5: 052|052|041|211 260 235                                       164;  ERASE; ERASE; ZERO; J128;

                                                                       [ okq141.txt

=== Start P297V-1; at address 4255
10237/0: 171 376|300 000 001|164 061|164 321|304 000 001|036|170 362   P297; Q15; E1; SHL 24; SHL -24; SET 1; -; =M15;
10241/3: 100 360|304 000 040|036|164 367|164 013                             M0M15; SET 32; -; SHL -5; SHL 5;
10243/1: 042|101 360|304 377 340|172 030|171 030                             DUP; =M0M15; SET -32; =+C1; C1;
10244/5: 232 040 246                                                         J1<Z;
10245/2: 065|170 376|200 360 000                                             REV; =Q15; EXIT 1;
10246/2: 304 000 001|200 323 034                                       1;    SET 1; JSP5;

=== Start P299V13; at address 4278
V-store at 10250 = 000 000 000 000 000 000                             P299V13; V0=0; (DEVICE NO);
V-store at 10251 = 000 000 116 000 306 100                                   V1=B0000011600143100;  (INT FORMAT);
V-store at 10252 = 000 273 337 014 071 251                                   V2=B0013573703034651;
V-store at 10253 = 215 215 050 235 021 014                                   V3=B4330645047210414;  ([[c]FAIL*]);  [  [[c]FAIL ]
V-store at 10254 = 024 027 216 235 000 000                                   V4=B0501361647200000;
V-store at 10255 = 215 215 050 235 024 216                                   V5=B4330645047212216;  ([[c]I*CH*]);
V-store at 10256 = 016 023 216 235 000 000                                   V6=B0341161647200000;
V-store at 10257 = 215 215 050 235 032 216                                   V7=B4330645047215216;  ([[c]O*CH*]);
V-store at 10260 = 016 023 216 235 000 000                                   V8=B0341161647200000;
V-store at 10261 = 215 216 216 036 044 027                                   V9=B4330721607422027;  ([**SYLL]);    [  [  SYLL]
V-store at 10262 = 027 235 000 000 000 000                                   V10=B0571640000000000;
V-store at 10263 = 000 003 376 001 060 100                                   V11=B0000177600230100;  (SYLL FORMAT);
V-store at 10264 = 000 000 000 000 000 000                                   V12=0;
V-store at 10265 = 000 171 241 246 300 000                                   V13=B0007464151540000;  (FAIL);
10266/0: 170 376|041                                                   1;    =Q15; ZERO;
10266/3: 171 030|304 000 100|036|235 040 323                                 C1; SET 64; -; J11<Z;  (IF NO BUFFER SPACE);
10270/0: 052|230 300 271                                               5;    ERASE; J6EJ;
10270/4: 173 000                                                             LINK;
10271/0: 210 240 270                                                   6;    J5NEN;
10271/3: 171 376|042|304 020 253|041|311 000 264|304 020 264|170 365         Q15; DUP; SETAV3; ZERO; =V12; SETAV12; =RI15;
                                                                       [^                     ^[    _FAIL on monitor
10274/0: 304 020 265|170 362|171 376|304 000 010|200 220 000|066|170 376
                                                                             SETAV13; =M15; Q15; SET8; OUT; CAB; =Q15;
                                                                       [^                                    ^]
                                                                       [ okq142.txt

                                                                             (PRINT FAIL ON MONITOR);
10276/4: 211 320 315                                                         JS8;
10277/1: 171 102|304 000 006|034|050|304 000 060                             M4;  SET6; ×D; CONT; SET48;
10300/5: 171 110|036|164 373|056                                             C4; -; SHL-3; +;
10301/5: 304 020 261|310 000 250|200 334 040|304 000 057|024                 SETAV9; V0; JSP288; SET47; FLOAT;
10304/0: 310 000 263|310 000 250|200 334 154                                 V11; V0; JSP291;
10305/3: 200 324 307                                                         JSP31;

10306/0: 300 000 000|304 020 000|054|231 140 313                             E0; SETB10000; AND; J9=Z;
10307/4: 171 022|171 064|036|170 030|145 020                                 M1; I3; -;=C1; I1=-1;
10311/1: 312 023 052|310 000 250|213 320 150|271 020 311               10;   Y10M1Q; V0; JS155P295; J10C1NZ;


10313/1: 211 320 221                                                   9;    JS160P295;
10313/4: 017|017|017                                                         DUMMY; DUMMY; DUMMY;
10314/1: 041|174 000                                                         ZERO; =LINK;
10314/4: 200 325 336                                                         JSP128;

10315/1: 310 000 250|200 334 040|304 000 057|024|310 000 251           8;    V0; JSP288; SET47; FLOAT; V1;

10317/2: 310 000 250|200 334 154|200 360 000                                 V0; JSP291; EXIT1;
10320/5: 304 020 255|211 260 315                                       3;    SETAV5; J8;
10321/5: 304 020 257|211 260 315                                       4;    SETAV7; J8;
10322/5: 304 020 253|211 260 315                                       7;    SETAV3; J8;
10323/5: 304 023 140|300 000 001|164 061|164 321|304 000 001|036       11;   SET AY64; E1; SHL 24; SHL -24; SET 1; -;
10326/1: 170 342|101 340|304 000 100|170 030|210 260 270                     =M14; =M0M14; SET64; =C1; J5;
=== Start P113V75; at address 4389
V-store at 10337 = 017 017 017 017 017 017                             P113V75;        V6=B360741703607417;
V-store at 10366 = 034 054 351 267 133 041                                   V29=B0702635155655441;
V-store at 10367 = 322 120 200 277 135 034                                   V30=B6445020057656434;
V-store at 10370 = 034 052 156 303 135 034                                   V31=B0702515660656434;
V-store at 10411 = 000 000 000 371 001 010                                   V48=Q0/AV32/AV47;
V-store at 10413 = 000 044 052 054 062 066                                   V50=B2205213031066;
V-store at 10414 = 001 047 053 055 061 065                                   V51=B0022345313230465;

                                                                       [ okq143.txt

V-store at 10415 = 000 000 260 230 015 100                                   V52=B0000026046006500;
V-store at 10417 = 312 315 043 364 000 000                                   V54=B6254644375000000;
V-store at 10426 = 010 171 241 246 300 021                                   V61=B0207464151540021;
                                                                                                       [h/w horizontal rule here
10445/0: 041|033|311 001 044|212 322 023                               100;  ZERO;NOT;=V75;JS12;
10446/2: 173 000|311 000 332|310 000 366|311 000 371                         LINK; =V1; V29; =V32;
10450/1: 304 140 000|215 322 001                                             SETB60000; JS4;
10451/1: 311 000 332|310 000 367|311 000 372                                 =V1; V30; =V33;
10452/4: 310 001 011|170 376|131 360|214 322 163|214 261 052           154;  V48; =Q15; TWEQ15; JS150; J154;
10454/5: 310 000 373|210 322 131|311 000 365                                 V34; JS69; =V28;
10456/2: 300 000 002|164 015|304 000 003|166 365|052                   173;  E2; SHL+6; SETB03; SHLD-6; ERASE;
10460/1: 311 000 371|300 000 003|311 000 372|300 000 007|311 000 374         =V32; E3; =V33; E7; =V35;
10462/4: 041|311 000 373|304 000 002|311 000 375|304 020 371                 ZERO; =V34; SETB02; =V36; SETAV32;
10464/5: 170 365|304 020 375|170 362|310 000 365|170 370                     =RI15; SETAV36; =M15; V28; =C15;
10466/5: 130 360|214 322 163|212 261 056                                     PWQ15; JS150; J173;
10470/1: 310 000 370|311 000 371                                             V31; =V32;
10471/1: 310 001 011                                                   153;  V48;
10471/4: 170 376|131 360|214 322 163|211 261 071|310 000 372|210 322 131
                                                                             =Q15; TWEQ15; JS150; J153; V33; JS69;
10474/2: 311 000 364                                                         =V27;
10474/5: 041|311 001 024                                               70;   ZERO; =V59;
10475/3: 041|311 001 012|211 322 102                                          ZERO; =V49; JS92;
10476/4: 041                                                           42;   ZERO;
10476/5: 052                                                           43;   ERASE;
10477/0: 212 322 054|215 261 076|210 261 101|215 261 076               158;  JS35; J43; J44; J43;
10501/0: 304 000 004|054|164 053|041                                   44;   SETB4; AND; SHL+21; ZERO;
10502/1: 041                                                           46;   ZERO;
10502/2: 052                                                           45;   ERASE;
10502/3: 212 322 054|210 261 105|211 261 112|011                       157;  JS35; J47; J49; OR;
10504/1: 164 007|213 261 102                                                 SHL+3; J157;
10505/0: 012|164 373|304 037 377|054                                   47;   PERM; SHL-3; SETB17777; AND;

                                                                       [ okq144.txt

10506/1: 011|065|304 000 017|212 021 115                                     OR; REV; SETB17; J50≠;
10507/3: 052                                                                 ERASE;
10507/4: 212 322 054|212 261 115|211 261 112|164 033|011               48;   JS35; J50; J49; SHL+13; OR;
10511/4: 214 261 107                                                         J48;
10512/1: 042|164 127|164 247                                           49;   DUP; SHL+43; SHL-45;
10513/0: 065|167 377|232 041 114                                             REV; SHC-1; J51<Z;
10514/0: 164 011                                                             SHL+4;
10514/2: 164 041|011|214 261 107                                       51;   SHL+16; OR; J48;
10515/2: 304 000 035|036|215 141 076                                   50;   SETB35; -; J43≠Z;
10516/3: 310 001 024|170 343                                                 V59; =RM14;
10517/2: 313 341 032|171 342|311 001 024|210 261 077                         =V65M14Q; M14; =V59; J158;
10521/1: 052|304 000 003|311 000 331|213 261 123                       52;   ERASE; SET3; =V0; J60;
10522/5: 017|212 321 145                                               *58;  JS59;
10523/3: 304 021 123|170 362|100 360|311 001 021                       60;   SETAR58; =M15; M0M15; =V56;
10525/1: 310 001 024|170 351                                                 V59 ; =RC14;
10526/0: 211 261 134                                                         J57;
10526/3: 041|310 341 032|042|164 101|164 301                           99;   ZERO; V65M14; DUP; SHL+32; SHL-32;
10530/0: 310 001 021|211 322 051|164 021|211 322 051|164 041                 V56; JS56; SHL+8; JS56; SHL+16;
10532/1: 211 322 051|052|052|065|164 061                                     JS56; ERASE; ERASE; REV; SHL+24;
10533/3: 011                                                                 OR;
10533/4: 313 341 032                                                         =V65M14Q;
10534/1: 273 341 126                                                   57;   J99C14NZ;
10534/4: 310 001 024|170 351|214 261 140                               73;   V59; =RC14; J72;
10536/0: 312 341 032|042|164 101|164 301|310 000 332                   71;   V65M14Q; DUP; SHL+32; SHL-32; V1;
10537/5: 015|233 141 307                                                     NEV; J76=Z;
10540/3: 052                                                                 ERASE;
10540/4: 270 341 136                                                   72;   J71C14NZ;
10541/1: 310 001 012|310 000 331|304 000 003|036|011                   91;   V49; V0; SET3; -; OR;
10543/0: 211 141 147                                                         J74≠Z;

                                                                       [ okq145.txt

10543/3: 310 000 332|174 000|211 322 037|202 360 000                         V1; =LINK; JS13; EXIT;
10545/2: 212 322 023|173 000|311 000 332                               59;   JS12; LINK; =V1;
10546/4: 214 261 134                                                         J73;
10547/1: 310 000 332|311 001 025|214 321 370                           74; 140; V1; =V60; JS141;
10550/4: 042|042|311 000 340|041|311 001 020                                 DUP; DUP; =V7; ZERO; =V55;
10552/1: 164 365|042|231 141 163                                             SHL-6; DUP; J15=Z;
10553/1: 211 322 011                                                         JS8;
10553/4: 042|213 141 172                                                     DUP; J17≠Z;
10554/2: 052|042|164 361|304 000 177|015                                     ERASE; DUP; SHL-8; SETB177; NEV;
10555/4: 212 141 163                                                         J159≠Z;
10556/1: 041|033|311 001 020|304 277 377|215 322 001                         ZERO; NOT; =V55; SETB137777; JS4;
10560/0: 164 107|164 273|311 000 335|304 061 000|056                         SHL+35; SHL-35; =V4; SETB30400; +;
10561/5: 164 021|212 321 206                                                 SHL+8; JS18;
10562/4: 065|052                                                             REV; ERASE;
10563/0: 041                                                           14;   ZERO;
10563/1: 052                                                           15;   ERASE;
10563/2: 310 000 337|065                                               159;  V6; REV;
10564/0: 166 361|041|210 021 164                                       16;   SHLD-8; ZERO; J16≠;             [ close output stream
10565/0: 052|304 021 170|170 362|042|101 360                                 ERASE; SETAR10; =M15; DUP; =M0M15;
10566/3: 101 360|211 322 037                                                 =M0M15; JS13;
10567/2: 017|017|017|017|017                                           *10;  DUMMY;
10570/1: 017|017|017|017|017|212 322 023|304 000 056|210 261 224       *11;  JS12; SETB56; J21;
10572/3: 211 322 011                                                   17;   JS8;
10573/0: 210 141 163                                                         J14≠Z;
10573/3: 041|033|311 001 020                                                 ZERO; NOT; =V55;
10574/2: 042|164 351|304 010 011|231 021 163                                 DUP; SHL-12; SETB4011; J15=;
10575/5: 304 017 177|054                                                     SETB7577; AND;
10576/3: 304 010 017|235 021 213                                             SETB4017; J19=;
10577/3: 304 010 057|235 021 213                                             SETB4057; J19=;

                                                                       [ okq146.txt

10600/3: 304 017 017|054|304 010 015|015|212 141 204                         SETB7417; AND; SETB4015; NEV; J162≠Z;
10602/2: 304 240 000|215 322 001                                             SETB120000; JS4;
10603/2: 174 000|304 140 000|015                                             =LINK; SETB60000; NEV;
10604/2: 212 321 206|065|164 301|311 000 335|212 261 163               162;  JS18; REV; SHL-32; =V4; J159;
10606/2: 041|065|166 351|167 363|166 377                               18;   ZERO; REV; SHLD-12; SHC-7;  SHLD-1;   [ output CRLF
10607/4: 167 011|166 373                                                     SHC+4; SHLD-3;
10610/2: 304 021 222|164 101|065|166 007|167 371                             SETAR9; SHL+32; REV; SHLD+3; SHC-4;
10612/0: 166 003|167 017|166 031|065|052|200 360 000                         SHLD+1; SHC+7; SHLD+12; REV; ERASE; EXIT1;
10613/5: 041|066                                                       19;   ZERO; CAB;
10614/1: 166 351|164 363|166 377|052|164 273                                 SHLD-12; SHL-7; SHLD-1; ERASE; SHL-35;
10615/4: 065|167 365|232 041 217                                             REV; SHC-6; J20<Z;
10616/4: 304 140 000|011                                                     SETB60000; OR;
10617/2: 173 000|311 000 332                                           20;   LINK; = V1;
10620/1: 215 322 001|311 000 335|213 261 222                                 JS4; =V4; J93;
10621/4: 017|017|212 322 023                                           *9;   JS12;
10622/3: 310 000 335                                                   93;   V4;
10623/0: 311 000 332|304 000 052                                             =V1; SETB52;
10624/0: 164 031|310 001 030|210 041 226                               21;   SHL+12; V63; J96≥Z;
10625/2: 304 015 000|011                                                     SETB6400; OR;
10626/0: 310 001 031|214 041 227                                       96;   V64; J97≥Z;
10627/0: 304 000 066|011                                                     SETB66; OR;
10627/4: 164 075|042|310 000 342|066|311 000 342                       97;   SHL+30; DUP; V9; CAB; =V9;
10631/2: 015|164 031                                                         NEV; SHL+12;
10631/5: 041|310 000 340                                                     ZERO; V7;
10632/3: 166 361|041|213 021 232                                       98;   SHLD-8; ZERO; J98≠;
10633/3: 052|311 000 340                                                     ERASE; =V7;
10634/1: 310 001 012|231 141 240                                             V49; J133=Z;
10635/1: 310 000 336|167 373|235 041 240                                     V5; SHC-3; J120<Z;
10636/3: 310 001 020|215 141 240                                             V55; J120≠Z;

                                                                       [ okq147.txt

10637/3: 042|215 141 240                                                     DUP; J120≠Z;
10640/1: 052|214 261 134                                               133;  ERASE; J73;
10640/5: 052|304 020 371|161 003|170 363|310 001 025|042               120;  ERASE; SETAV32; SHA+1; =RM15; V60; DUP;
10642/5: 164 107|164 375|304 000 005|210 322 014                             SHL+35; SHL-2; SET5; JS22;
10644/3: 164 031|065|164 101|164 247|304 003 320                             SHL+12; REV; SHL+32; SHL-45; SETB1720;
10646/1: 011|011|042|107 360|164 061                                         OR; OR; DUP; =M0M15QH; SHL+24;
10647/2: 107 360|041|107 360|310 000 340|042                                 =M0M15QH; ZERO; =M0M15QH; V7; DUP;
10650/5: 164 245|215 322 017                                                 SHL-46; JS24;
10651/4: 042|230 141 255                                                     DUP; J121=Z;
10652/2: 027|033|215 322 017                                                 NEG; NOT; JS24;
10653/1: 042|233 141 255                                                     DUP; J122=Z;
10653/5: 215 322 017                                                         JS24;
10654/2: 052|215 261 255                                                     ERASE; J123;
10655/0: 107 360|041                                                   121;  =M0M15QH; ZERO;
10655/3: 107 360                                                       122;  =M0M15QH;
10655/5: 052|310 000 342|107 360                                       123;  ERASE; V9; =M0M15QH;
10656/5: 310 000 343|304 000 004|043|036|235 041 260                         V10; SET4; DUPD; -; J124<Z;
10660/4: 065                                                                 REV;
10660/5: 052|170 351                                                   124;  ERASE; =RC14;
10661/2: 270 341 263                                                         J138C14NZ;
10661/5: 041|210 261 276                                               130;  ZERO; J127;
10662/3: 041|107 360                                                   125;  ZERO; =M0M15QH;
10663/0: 312 340 344|042|304 000 010|210 322 014                       138;  V11M14Q; DUP; SET8; JS22;
10664/4: 042|107 360|164 061|107 360|164 061                                 DUP; =M0M15QH; SHL+24; =M0M15QH; SHL+24;
10666/1: 304 000 010|210 322 014|042|107 360|164 061                         SET8; JS22; DUP; =M0M15QH; SHL+24;
10670/0: 107 360|273 341 262                                                 =M0M15QH; J125C14NZ;
10670/5: 171 342|304 000 004|036|215 141 261                           126;  M14; SET4; -; J130≠Z;
10672/2: 041|107 360                                                         ZERO; =M0M15QH;
10672/5: 310 000 343|304 000 012|036|042|212 041 306                   137;  V10; SET10; -; DUP; J129≥Z;

                                                                       [ okq148.txt

10674/4: 052|310 000 343|304 000 020|011                                     ERASE; V10; SETB20; OR;
10676/0: 164 031|304 000 002|011|164 061|107 360                       127;  SHL+12; SETB2; OR; SHL+24; =M0M15QH;
10677/4: 171 362|167 377|213 041 301                                         M15; SHC-1; J128≥Z;
10700/5: 041|033|107 360                                                     ZERO; NOT; =M0M15QH;
10701/3: 171 362|164 377|170 363|141 360|304 020 371                   128;  M15; SHL-1; =RM15; M-I15; SETAV32;
10703/2: 170 364|310 000 365|170 370|130 360|214 322 163                     =I15; V28; =C15; PWQ15; JS150;
10705/2: 215 261 240|214 261 134                                             J120; J73;
10706/2: 304 004 120|011|210 261 276                                   129;  SETB2120; OR; J127;
10707/3: 042|042|311 000 333                                           76;   DUP; DUP; =V2;
10710/2: 164 061|210 041 313                                                 SHL+24; J79≥Z;
10711/1: 141 340|211 322 107|304 160 264|213 261 313                         M-I14; JS78; SETB70264; J80;
10713/0: 304 160 260                                                   79;   SETB70260;
10713/3: 164 075|065|042|164 107|164 375                               80;   SHL+30; REV; DUP; SHL+35; SHL-2;
10714/5: 304 000 005|210 322 014|066|011|311 000 371                         SET5; JS22; CAB; OR; =V32;
10716/4: 042|164 101|164 247|304 003 320|011                                 DUP; SHL+32; SHL-45; SETB1720; OR;
10720/1: 164 015|065|042|164 063|164 247                                     SHL+6; REV; DUP; SHL+25; SHL-45;
10721/3: 042                                                                 DUP;
10721/4: 210 141 324                                                         J81≠Z;
10722/1: 052|052|304 000 034|011|164 075                                     ERASE; ERASE; SETB34; OR; SHL+30;
10723/3: 211 261 333                                                         J82;
10724/0: 164 007|170 370|310 001 013|164 360|164 261                   81;   SHL+3; =C15; V50; SHLC15; SHL-40;
10725/5: 066|164 015|011|065|164 073                                         CAB; SHL+6; OR; REV; SHL+29;
10727/0: 164 247|164 007|170 370|310 001 014|164 360                         SHL-45; SHL+3; =C15; V51; SHLC15;
10730/5: 164 261|065|164 015|011|164 015|304 000 075                         SHL-40; REV; SHL+6; OR; SHL+6; SETB75;
10732/4: 011|164 031                                                         OR; SHL+12;
10733/1: 311 000 372                                                   82;   =V33;
10733/4: 310 001 011|170 376|171 364|033|027|170 362                   152;  V48; =Q15; I15; NOT; NEG; =M15;
10735/3: 310 000 372|164 031|164 255|304 000 034|015|211 141 341             V33; SHL +12; SHL -42; SET B34; NEV; J174≠Z;
10737/5: 131 360                                                             TWEQ15;

                                                                       [ okq149.txt

10740/1: 214 322 163|214 261 333                                             JS150; J152;
10741/1: 310 000 365                                                   174;  V28;
10741/4: 170 370|304 000 002|310 000 372|164 365|164 015|011|311 000 372
                                                                             =C15; SETB2; V33; SHL-6; SHL+6; OR; =V33;
10744/2: 310 000 371|164 031|164 351|311 000 371|130 360|214 322 163|214 261 333|310 000 372
                                                                             V32; SHL+12; SHL-12; =V32; PWQ15; JS150; J152; V33;
10747/5: 164 335|164 111|041|166 015|065                                     SHL-18; SHL+36; ZERO; SHLD+6; REV;
10751/1: 164 255|042|167 377|214 041 352                                     SHL-42; DUP; SHC-1; J83≥Z;
10752/3: 065                                                                 REV;
10752/4: 311 000 336|042                                               83;   =V5; DUP;
10753/2: 212 142 130                                                         J84≠Z;
10753/5: 052                                                                 ERASE;
10754/0: 310 000 336|304 000 066|215 021 356                           85;   V5; SETB66; J87≠;
10755/3: 052|213 241 355|041|200 220 000                               86;   ERASE; J86NEN; ZERO; OUT;
10756/5: 304 000 054|214 021 364                                       87;   SETB54; J90≠;
10757/5: 310 001 024|170 351|213 261 363                                     V59; =RC14; J89;
10761/1: 312 341 032|042|233 141 363|141 340|211 322 107               88;   V65M14Q; DUP; J89=Z;M-I14; JS78;
10763/1: 140 340                                                             M+I14;
10763/3: 052|271 341 361                                               89;   ERASE; J88C14NZ;
10764/1: 215 261 074                                                         J70;
10764/4: 304 000 044|230 021 367                                       90;   SETB44; J134=;
10765/4: 304 000 052|230 021 367                                             SETB52; J134=;
10766/4: 052|041                                                             ERASE; ZERO;
10767/0: 311 001 012|041|311 000 331|211 261 141                       134;  =V49; ZERO; =V0; J91;
10770/4: 310 000 331|304 000 003|231 021 374                           141;  V0; SET3; J2=;
10772/1: 042|033|027|311 000 331                                             DUP; NOT; NEG; =V0;
10773/1: 304 020 333|215 261 375                                             SETAV2; J3;
10774/1: 052|310 000 332|041|166 107|065                               2;    ERASE; V1; ZERO; SHLD+35; REV;
10775/3: 164 273                                                             SHL-35;
10775/5: 170 362|164 007|170 370                                       3;    =M15; SHL+3; =C15;
10776/5: 100 360|164 360|164 261                                             M0M15; SHLC15; SHL-40;

                                                                       [ okq150.txt

10777/5: 304 040 000|215 322 001|311 000 332|200 360 000                     SETB20000; JS4; =V1; EXIT1;
11001/5: 310 000 332|056|042|041|166 107|066|304 000 006               4;    V1; +; DUP; ZERO; SHLD+35; CAB; SET6;
11003/5: 065|215 042 005                                                     REV; J5≥Z;
11004/3: 056|166 033|027|033|213 262 007                                     +; SHLD+13; NEG; NOT;J6;
11005/5: 043|036|230 042 010                                           5;    DUPD; -; J7<Z;
11006/4: 036|166 033|033|027                                                 -; SHLD+13; NOT; NEG;
11007/3: 166 347|041                                                   6;    SHLD-13; ZERO;
11010/0: 052|166 273|052                                               7;    ERASE; SHLD-35; ERASE;
11010/4: 200 360 000                                                         EXIT1;
11011/1: 214 321 370|066|164 021|011|042                               8;    JS141; CAB; SHL+8; OR; DUP;
11012/3: 311 000 340|065|027|033|200 360 000                                 =V7; REV; NEG; NOT; EXIT1;
11014/0: 170 370|041                                                   22;   =C15; ZERO;
11014/3: 017|017|017|164 007|304 000 002|011|166 007|143 360           *23;  SHL+3; SETB2; OR; SHLD+3; DC15;
11016/4: 177 360                                                             J23C15NZS;
11017/0: 065|052|200 360 000                                                 REV;  ERASE;  EXIT1;
11017/5: 065|042|164 021|065|164 377|304 000 003                       24;   REV; DUP; SHL+8; REV; SHL-1; SET3;
11021/3: 210 322 014|164 075|107 360|065                                     JS22; SHL+30; =M0M15QH; REV;
11022/5: 200 360 000                                                         EXIT1;
11023/2: 234 242 030                                                   12;   J63EN;
11023/5: 311 000 344|171 376|311 000 334|304 000 017|170 371                 =V11; Q15; =V3; SET15; =RC15;
11026/0: 233 242 027                                                   61;   J62EN;
11026/3: 313 360 345|270 362 026                                             =V12M15Q; J61C15NZ;
11027/3: 171 362|033|027|214 262 031                                   62;   M15; NOT; NEG; J64;
11030/4: 171 376|311 000 334|041                                       63;   Q15; =V3; ZERO;
11031/4: 311 000 343|171 356|311 001 027|041                           64;   =V10; Q14; =V62; ZERO;        [ | Preserve Nests
11033/1: 231 202 034|212 262 034                                             J75V; J94;                    [ |  TR, VR
11034/1: 033                                                           75;   NOT;
11034/2: 311 001 031                                                   94;   =V64; (OVERFLOW);
11034/5: 041                                                                 ZERO;

                                                                       [ okq151.txt

11035/0: 230 342 036|211 262 036                                             J95TR; J108;
11036/0: 033                                                           95;   NOT;
11036/1: 311 001 030                                                   108;  =V63; (TEST REGISTER);
11036/4: 200 360 000                                                         EXIT1;

11037/1: 310 000 343|042|233 142 043                                   13;   V10; DUP; J67=Z;
11040/2: 027|033|042|170 370|170 362                                         NEG; NOT; DUP; =C15; =M15;
11041/3: 145 360|215 262 042                                                 I15=-1; J66;
11042/2: 312 360 344                                                   65;   V11M15Q;
11042/5: 272 362 042                                                   66;   J65C15NZ;
11043/2: 041                                                                 ZERO;
11043/3: 052|310 001 027|170 356|310 000 334|170 376                   67;   ERASE; V62; =Q14; V3; =Q15;
11045/2: 310 001 030|002                                                     V63; =TR; (restore test register);
11046/0: 001|310 001 031|161 141|052                                         VR; V64; SHA+48; ERASE; (restore overflow);
11047/1: 310 000 343|234 142 050                                             V10; J68=Z;
11050/1: 310 000 344                                                         V11;
11050/4: 200 360 000                                                   68;   EXIT1;

11051/1: 164 261|212 322 116|051|012|164 021                           56;   SHL-40; JS53; REVD; PERM; SHL+8;
11052/4: 011|012|065|310 001 021|200 360 000                                 OR; PERM; REV; V56; EXIT1;
11054/1: 052                                                           41;   ERASE;
11054/2: 310 001 022|310 001 023                                       35;   V57; V58;
11055/2: 170 350|274 342 065                                                 =C14; J37C14NZ;
11056/1: 310 001 021                                                         V56;
11056/4: 170 376|272 362 063                                                 =Q15; J36C15NZ;
11057/3: 310 001 011|170 376|310 000 364|170 370|125 360|214 322 163|213 262 057
                                                                       155;  V48; =Q15; V27; =C15; PREQ15; JS150; J155;
11062/3: 304 000 020|170 371                                                 SET16; =RC15;
11063/2: 052|312 360 371|171 376|311 001 021|304 000 010               36;   ERASE; V32M15Q; Q15; =V56; SET8;
11065/2: 170 350                                                             =C14;
11065/4: 041|166 015                                                   37;   ZERO; SHLD+6;
11066/1: 143 340|171 350|311 001 023                                         DC14; C14; =V58;

                                                                       [ okq152.txt

11067/2: 065|311 001 022|304 000 017|230 022 105                             REV; =V57; SETB17; J38=;
11071/0: 042|304 000 020|036|231 042 054                                     DUP; SETB20; -; J41<Z;
11072/2: 042|304 000 032|036|230 042 106                                     DUP; SETB32; -; J40<Z;
11073/4: 042|304 000 040|036|230 042 105                                     DUP; SETB40; -; J38<Z;
11075/0: 042|304 000 041|036|231 042 054                                     DUP; SETB41; -; J41<Z;
11076/2: 042|304 000 073|036|233 042 105                                     DUP; SETB73; -; J39<Z;
11077/4: 304 000 075|211 022 054                                             SETB75; J41≠;
11100/4: 211 322 102|173 000|052|211 261 121                                 JS92; LINK; ERASE; J52;
11102/1: 310 000 364|170 371|140 360|120 361                           92;   V27; =RC15; M+I15; MANUALQ15;
11103/4: 041|311 001 023|041|311 001 021                                     ZERO; =V58; ZERO; =V56;
11105/0: 200 360 000                                                   38;   EXIT1;
11105/3: 202 360 001                                                   39;   EXIT2;
11106/0: 304 000 020|036|200 360 001                                   40;   SETB20; -; EXIT3;
11107/1: 042|164 101|164 301|065|042                                   78;   DUP; SHL+32; SHL-32; REV; DUP;
11110/2: 211 322 114|164 021|211 322 114|164 041|211 322 114                 JS77; SHL+8; JS77; SHL+16; JS77;
11112/3: 012|052|052|041                                                     PERM; ERASE; ERASE; ZERO;
11113/1: 311 341 032|200 360 000                                                     =V65M14; EXIT1;
11114/1: 164 261|066|065|212 322 116|052                               77;   SHL-40; CAB; REV; JS53; ERASE;
11115/3: 065|042|200 360 000                                                 REV; DUP; EXIT1;
11116/2: 065|042|042|164 347|304 000 005                               53;   REV; DUP; DUP; SHL-13; SET5;
11117/4: 036|215 142 121                                                     -; J54≠Z;
11120/2: 164 107|164 273|033|027|213 262 122                                 SHL+35; SHL-35; NOT; NEG; J55;
11121/5: 304 040 000|056                                               54;   SETB20000; +;
11122/3: 012|042|164 347|164 007|170 370                               55;   PERM; DUP; SHL-13; SHL+3; =C15;
11123/5: 164 107|164 273|170 362|100 360                                     SHL+35; SHL-35; =M15; M0M15;
11125/1: 167 360|041|166 021|012|065                                         SHCC15; ZERO; SHLD+8; PERM; REV;
11126/2: 166 361|052|142 360|167 360                                         SHLD-8; ERASE; NC15; SHCC15;
11127/3: 101 360|200 360 000                                                 =M0M15; EXIT1;
11130/2: 052|210 261 354                                               84;   ERASE; J85;

                                                                       [ okq153.txt

11131/0: 164 255|304 000 020|036|042|304 000 005                       69;   SHL-42; SETB20; -; DUP; SET5;
11132/4: 200 220 000|065|164 061|011|200 360 000                             OUT; REV; SHL+24; OR; EXIT1;
11134/2: 017|017|017|017|212 322 023                                   *1;   JS12;
11135/3: 041|170 343|310 000 344|304 000 005|232 022 151                     ZERO; =RM14; V11; SET5; J161=;
11137/3: 304 000 006|036|214 142 144                                         SET6; -; J163≠Z;
11140/4: 310 000 345|164 061|310 340 364|164 061|231 022 146                 V12; SHL+24; V27M14; SHL+24; J160=;
11142/5: 140 340|310 340 364|164 061|231 022 146                             M+I14; V27M14; SHL+24; J160=;
11144/3: 052                                                           172;  ERASE;
11144/4: 211 322 037                                                   163;  JS13;
11145/1: 200 220 000|200 360 000                                             OUT; EXIT1;
11146/1: 052|310 340 364|164 005|164 375|311 340 364                   160;  ERASE; V27M14; SHL+2; SHL-2; =V27M14;
11150/0: 211 322 037|052                                                     JS13; ERASE;
11150/4: 052|200 360 000                                                     ERASE; EXIT1;
11151/2: 052|310 000 345|310 340 364|164 007|164 313                   161;  ERASE; V12; V27M14; SHL+3; SHL-27;
11153/1: 234 022 155                                                         J164=;
11153/4: 140 340|310 340 364|164 007|164 313|213 022 144                     M+I14; V27M14; SHL+3; SHL-27; J172≠;
11155/4: 052|310 340 364|164 003|234 042 144                           164;  ERASE; V27M14; SHL+1; J163<Z;
11157/1: 310 340 364|041|033|027|167 375                                     V27M14; ZERO; NOT; NEG; SHC-2;
11160/3: 011|042|311 340 364|164 061|164 321                                 OR; DUP; =V27M14; SHL+24; SHL-24;
11162/0: 311 000 345|211 322 037                                             =V12; JS13;
11163/0: 052|200 360 000                                                     ERASE; EXIT1;
11163/4: 121 360|210 342 173                                           150;  PARQ15; J151NTR;
11164/3: 120 361|171 370|304 000 020|011|167 365                             MANUALQ15; C15; SETB20; OR; SHC-6;
11166/1: 310 001 015|166 031|311 001 016|052                                 V52; SHLD+12; =V53; ERASE;
11167/4: 304 021 016|170 364|304 021 017|170 362|154 017                     SETAV53; =I15; SETAV54; =M15; C0TOQ15;
11171/4: 131 360|214 322 163|200 360 000                                     TWEQ15; JS150; EXIT1;
11173/0: 202 360 001                                                   151;  EXIT2;
=== Start P-1V-1; at address 4732
11173/3: 017|017|017                                                   *139; FINISH;


Reached end of file