O16-DPT9 rev A

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

1868 03626 14 1227 DP55 OCP PLSW SOUTH WEST - DRUM DOWN, CARRIAGE LEFT 1869 03627 34 0127 DP56 SKS PLNB SKIP IF PLOTTER NOT BUSY 1870 03630 0 10 03655 JST INTD 1871 03631 0 10 04150 JST ERRR ERROR ROUTINE 1872 03632 -0 01 03625 JMP* MISW EXIT FROM SUBROUTINE 1873 03633 147302 BCI 2,NBSW P NOT BUSY IMMEDIATELY AFTER MOVING S-WEST 03634 151727 1874 * 1875 * MOVE PEN DOWN (WITH INTERRUPT) 1876 03635 0 000000 MIDN DAC ** MOVE PEN DOWN (WITH INT) 1877 03636 14 1427 DP57 OCP PEND PEN DOWN 1878 03637 34 0127 DP58 SKS PLNB SKIP IF PLOTTER NOT BUSY 1879 03640 0 10 03730 JST INTZ 1880 03641 0 10 04150 JST ERRR ERROR ROUTINE 1881 03642 -0 01 03635 JMP* MIDN EXIT FROM SUBROUTINE 1882 03643 147302 BCI 2,NBDN PEN NOT BUSY IMMEDIATELY AFTER MOVING DOWN 03644 142316 1883 * 1884 * MOVE PEN UP (WITH INTERRUPT) 1885 03645 0 000000 MIUP DAC ** MOVE PEN UP (WITH INT) 1886 03646 14 1627 DP59 OCP PENU PEN UP 1887 03647 34 0127 DP60 SKS PLNB SKIP IF PLOTTER NOT BUSY 1888 03650 0 10 03730 JST INTZ 1889 03651 0 10 04150 JST ERRR ERROR ROUTINE 1890 03652 -0 01 03645 JMP* MIUP EXIT FROM SUBROUTINE 1891 03653 147302 BCI 2,NBUP PEN NOT BUSY IMMEDIATELY AFTER MOVING UP 03654 152720 1892 * 1893 * WAIT FOR INTERRUPT (DIRECTIONAL) 1894 03655 0 000000 INTD DAC ** WAIT FOR INTERRUPT (DIRECTIONAL) 1895 03656 0 02 04310 LDA AIED ADDRESS OF INTERRUPT ENTRY POINT 1896 03657 -0 04 04331 STA* INTL INTERRUPT LOCATION 1897 03660 0 02 01560 LDA SMKI SMK '0X20 INSTRUCTION 1898 03661 0 04 03663 STA *+2 1899 03662 0 02 04337 LDA MSKB MASK BIT FOR INTERRUPT 1900 03663 0 00 00000 *** ** PERFORM SMK '0X20 INSTRUCTION 1901 03664 000401 ENB ENABLE INTERRUPT 1902 03665 0 02 04332 LDA INTR INTERRUPT TIMER 4(4.2) MILLI-SECONDS 1903 03666 0 12 04320 DIN1 IRS CNTA INCREMENT COUNT A 1904 03667 0 01 03674 JMP DIN2 1905 03670 0 12 04321 IRS CNTB INCREMENT COUNT B [CNTB = CNTA*(2**16)] 1906 03671 0 01 03677 JMP DIN3 1907 03672 0 12 04322 IRS CNTC INCREMENT COUNT C [CNTC = CNTB*(2**16)] 1908 03673 0 01 03702 JMP DIN4 1909 03674 101000 DIN2 NOP OBEYS WHEN CNTA IS NON-ZERO 1910 03675 101000 NOP 1911 03676 101000 NOP 1912 03677 101000 DIN3 NOP OBEYS WHEN CNTB IS NON-ZERO, BUT CNTA ZERO 1913 03700 101000 NOP 1914 03701 101000 NOP