PLTCTR: 0 ;OUTPUT BYTE COUNTER\r
\r
EXTERNAL OUT,SETACT,PLTCHN,PLTCHL,IOSET,ADVBFE,ADRERR,CPOPJ1\r
-EXTERNAL SETIOD,STOIOS,CLRACT,IULLINP,PLTSAV,IADRCK\r
+EXTERNAL SETIOD,STOIOS,CLRACT,ILLINP,PLTSAV,IADRCK\r
\r
INTERN PLTDDB,PLTINT,PLTDSP\r
\f;DISPATCH TABLE\r
PUSHJ PDP,PLTSET ;SETUP BYTE POINTER AND COUNTER\r
JRST PLTOFF ;ADDRESS ERROR RET FROM PLTSET\r
PLT2: TLZE IOS,IOW\r
- PUSHJ PDP,SETIUOD ;LET JOB START AGAIN\r
+ PUSHJ PDP,SETIOD ;LET JOB START AGAIN\r
JRST STOIOS ;EVENTUALLY DISMISS INTERRUPT. IF ADVBFE\r
;FOUND MORE DATA (IT SKIPPED), ANOTHER\r
;INTERRUPT WILL IMMEDIATELY OCCUR BUT\r
;IT WILL BE HANDLED WITHOUT GOING TO PLT1\r
\r
PLTOFF: CONO PLT,0 ;SHUT DOWN PLOTTER\r
- HLLSZ PLTINT ;REMOVE PLOTTER FROM CHAIN\r
+ HLLZS PLTINT ;REMOVE PLOTTER FROM CHAIN\r
PUSHJ PDP,CLRACT\r
TLZE IOS,PLTUP ;HAS THE "CLOSE" BEEN DONE?\r
DATAO PLT,[40] ;YES, LIFT PEN\r