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=,>,!= 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; J98Z; 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 J98Z; 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; J1Z; (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=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; -; J98Z; (if C=1); 2012/0: 042|221 044 015 DUP; J4=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; (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 J2Z; 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 J2Z; 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; J2Z; 2553/5: 304 000 023|056|224 045 150 SET19; +; J3Z; (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; 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; 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; xD; 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; xD; 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; xD; 5307/3: 050|161 377|304 000 057|024|004 CONT; SHA-1; SET47; FLOAT; xF; 5310/5: 304 002 304|167 351|004|012|075 SETB1304; SHC-12; xF; PERM; -F; 5312/1: 030|075|220 052 354 ABSF; -F; J36Z; 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; 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; -; J112); 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; 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; 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; 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; x; 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; -; J113LTZ; 6246/5: 047|304 000 012|061|140 340|171 242 STR; SET10; %D; M+I14; M10; 6250/2: 201 154 255 J12NEZ; 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; -; J71GEZ; 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; J14GEZ; 6260/1: 065|300 374 134|034|050|065 REV; V13M15; xD; 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; xD; 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; J15NEZ; 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; J18LEZ; 6274/1: 171 342|171 270|036|033|027 M14; C11; -; NOT; NEG; 6275/2: 042|225 054 305 DUP; J32LTZ; 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; J17LTZ; 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; 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; 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; 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; 6470/0: 304 000 216|210 320 015 SETB216; JS14P295; 6471/0: 171 244|224 055 072 43; I10; J44=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; J2Z; 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; 6745/5: 100 376|042|225 056 021 M14M15; DUP; J17=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; 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; xD; 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; xD; 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; x; SHA-7; 7143/0: 042|300 016 045|035|300 016 046|056 DUP; V3; x; 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; x; 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; 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; 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; 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; 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; 7470/1: 164 031 SHL+12; 7470/3: 042|221 057 073 103; DUP; J104Z; 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; J168Z; 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; J171Z; [ 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; 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; 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; [ 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