O16-DPT9 rev A

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

1450 03022 0 01 03020 JMP *-2 MOVE PLOTTER NEXT STEP 1451 03023 0 01 02430 JMP P3NR PLOT NEXT ROW OF FIGURES 1452 * 1453 03024 0 02 04341 P370 LDA PALL 1454 03025 101040 SNZ TEST FOR REQUIREMENT OF PLOTTING ALL PATRNS 1455 03026 0 01 03032 JMP PAT4 PLOT PATTERN FOUR 1456 03027 0 01 01722 JMP AQTN ASK QUESTION: TEST NO? 1457 * 1458 03030 0 11 04434 P004 CAS '=264 '264 = CHARACTER FOUR 1459 03031 0 01 03205 JMP P00E INPUT CHARACTER OTHER THAN FOUR 1460 * * PLOT PATTERN FOUR (INPUT CHAR = 4) 1461 * 1462 * PATTERN FOUR (ALIGNMENT TEST - DIAMOND MESH) 1463 * 1464 03032 0 35 04347 PAT4 LDX 10NU STEP COUNTER (NO OF STEPS IN 10 UNITS) 1465 03033 0 10 03305 JST MPNT 1466 03034 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1467 03035 0 01 03033 JMP *-2 MOVE PLOTTER NEXT STEP 1468 03036 0 10 03224 JST MPCT 1469 03037 0 35 04355 LDX 60NU STEP COUNTER (NO OF STEPS IN 60 UNITS) 1470 03040 0 10 03263 JST MPWT 1471 03041 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1472 03042 0 01 03040 JMP *-2 MOVE PLOTTER NEXT STEP 1473 * 1474 03043 0 02 04410 LDA =-6 NUMBER OF ROWS IN THE PATTERN 1475 03044 0 04 04344 STA ROWC 1476 03045 0 02 04410 P4NR LDA =-6 NUMBER OF FIGURES IN A ROW 1477 03046 0 04 04330 STA FGRC 1478 03047 0 10 03461 JST MPDN 1479 * 1480 03050 0 35 04347 P4NF LDX 10NU STEP COUNTER (NO OF STEPS IN 10 UNITS) 1481 03051 0 10 03241 JST MPET 1482 03052 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1483 03053 0 01 03051 JMP *-2 PLOT NEXT STEP 1484 03054 0 35 04347 LDX 10NU STEP COUNTER (NO OF STEPS IN 10 UNITS) 1485 03055 0 10 03327 JST MPNE 1486 03056 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1487 03057 0 01 03055 JMP *-2 PLOT NEXT STEP 1488 03060 0 35 04347 LDX 10NU STEP COUNTER (NO OF STEPS IN 10 UNITS) 1489 03061 0 10 03351 JST MPNW 1490 03062 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1491 03063 0 01 03061 JMP *-2 PLOT NEXT STEP 1492 03064 0 35 04347 LDX 10NU STEP COUNTER (NO OF STEPS IN 10 UNITS) 1493 03065 0 10 03437 JST MPSW 1494 03066 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1495 03067 0 01 03065 JMP *-2 PLOT NEXT STEP 1496 03070 0 35 04347 LDX 10NU STEP COUNTER (NO OF STEPS IN 10 UNITS) 1497 03071 0 10 03415 JST MPSE 1498 03072 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1499 03073 0 01 03071 JMP *-2 PLOT NEXT STEP