Previous File Previous Page Single Page Next Page Next File

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

1200 02461 101000 NOP N-NW MOVEMENT OF RADIUS LENGTH COMPLETE 1201 * 1202 02462 0 02 04343 LDA RDUS 1203 02463 140407 TCA 1204 02464 0 04 00000 STA 0 STEP COUNTER 1205 02465 0 10 03535 JST MIET 1206 02466 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1207 02467 0 01 02465 JMP *-2 MOVE PLOTTER NEXT STEP 1208 * 1209 02470 0 10 03635 JST MIDN 1210 02471 0 02 04416 LDA =1 1211 02472 0 04 04336 STA MRKR 1212 02473 0 10 04012 P304 JST CALC 1213 02474 0 11 04377 CAS ='10000 '10000 = 0.5*(2**13) 1214 02475 0 10 03615 JST MISE 1215 02476 0 01 02500 JMP *+2 1216 02477 0 10 03535 JST MIET 1217 02500 0 12 04336 IRS MRKR INCREMENT MARKER 1218 02501 0 02 04362 LDA 92DM 1219 02502 0 11 04336 CAS MRKR TEST FOR COMPLETION OF E-SE MOVEMENT 1220 02503 0 01 02473 JMP P304 PLOT NEXT STEP 1221 02504 101000 NOP E-SE MOVEMENT OF DIAMETER LENGTH COMPLETE 1222 * 1223 02505 0 10 03645 JST MIUP 1224 02506 0 02 04361 LDA 707R 1225 02507 140407 TCA 1226 02510 0 04 00000 STA 0 STEP COUNTER 1227 02511 0 10 03615 JST MISE 1228 02512 0 12 00000 IRS 0 INCREMENT STEP COUNTER 1229 02513 0 01 02511 JMP *-2 MOVE PLOTTER NEXT STEP 1230 * 1231 02514 0 02 04416 LDA =1 1232 02515 0 04 04336 STA MRKR 1233 02516 0 10 04012 P306 JST CALC 1234 02517 0 11 04377 CAS ='10000 '10000 = 0.5*(2**13) 1235 02520 0 10 03575 JST MINW 1236 02521 0 01 02523 JMP *+2 1237 02522 0 10 03545 JST MIWT 1238 02523 0 12 04336 IRS MRKR INCREMENT MARKER 1239 02524 0 02 04363 LDA 92RD 1240 02525 0 11 04336 CAS MRKR TEST FOR COMPLETION OF N-NW MOVEMENT 1241 02526 0 01 02516 JMP P306 MOVE PLOTTER NEXT STEP 1242 02527 101000 NOP N-NW MOVEMENT OF RADIUS LENGTH COMPLETE 1243 * 1244 02530 0 10 03635 JST MIDN 1245 02531 0 02 04360 LDA 707D 1246 02532 140407 TCA 1247 02533 0 04 00000 STA 0 STEP COUNTER 1248 02534 0 10 03575 JST MINW 1249 02535 0 12 00000 IRS 0 INCREMENT STEP COUNTEP
Previous File Previous Page Single Page Next Page Next File