O16-DPT9 rev A

* 0520-001-H002 (O16-DPT9) DRAWING NO. 41285751-001-01 PAGE 26

1150 02404 0 10 03555 JST MINT 1151 02405 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1152 02406 0 01 02404 JMP *-2 MOVE PLOTTER NEXT STEP 1153 * 1154 02407 0 10 03535 JST MIET 1155 02410 34 0227 DP09 SKS PLLR 1156 02411 100000 SKP EAST LIMIT REACHED 1157 02412 0 01 02407 JMP *-3 LIMIT NOT YET REACHED, MOVE EAST 1158 02413 0 02 04335 LDA LMIT 1159 02414 0404 77 LGR 1 1160 02415 140407 TCA 1161 02416 0 04 00000 STA 0 STEP COUNTER 1162 02417 0 10 03545 JST MIWT 1163 02420 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1164 02421 0 01 02417 JMP *-2 MOVE PLOTTER NEXT STEP 1165 * 1166 02422 0 35 04351 LDX 30NU STEP COUNTER (NO OF STEPS IN 30 UNITS) 1167 02423 0 10 03545 JST MIWT 1168 02424 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1169 02425 0 01 02423 JMP *-2 MOVE PLOTTER NEXT STEP 1170 * 1171 02426 0 02 04460 LDA =-3 NUMBER OF ROWS IN THE PATTERN 1172 02427 0 04 04344 STA ROWC 1173 02430 0 02 04460 P3NR LDA =-3 NUMBER OF FIGURES IN A ROW 1174 02431 0 04 04330 STA FGRC 1175 02432 140040 CRA 1176 02433 0 04 04320 STA CNTA 1177 02434 0 04 04321 STA CNTB 1178 02435 0 04 04322 STA CNTC 1179 * 1180 02436 0 10 03635 P3NF JST MIDN 1181 02437 0 02 04325 LDA DMTR 1182 02440 140407 TCA 1183 02441 0 04 00000 STA 0 STEP COUNTER 1184 02442 0 10 03545 JST MIWT 1185 02443 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1186 02444 0 01 02442 JMP *-2 PLOT NEXT STEP 1187 * 1188 02445 0 10 03645 JST MIUP 1189 02446 0 02 04416 LDA =1 1190 02447 0 04 04336 STA MRKR 1191 02450 0 10 04012 P302 JST CALC 1192 02451 0 11 04377 CAS ='10000 '10000 = 0.5*(2**13) 1193 02452 0 10 03575 JST MINW 1194 02453 0 01 02455 JMP *+2 1195 02454 0 10 03545 JST MIWT 1196 02455 0 12 04336 IRS MRKR INCREMENT MARKER 1197 02456 0 02 04363 LDA 92RD 1198 02457 0 11 04336 CAS MRKR TEST FOR COMPLETION OF W-NW MOVEMENT 1199 02460 0 01 02450 JMP P302 MOVE PLOTTER NEXT STEP