Atari 400 Technical Reference Manual page 278

ERR LINE ADDR Bl B2 B3 B4 CENTRAL INPUT/OUTPUT (CIO) 2-7-79 PAGE 17
767 . PAGE
768
769
CIO JUMP VECTOR FOR USERS
770
*=CIOV
771 E456 4C C4 E4 JMP CIO
i
GO TO CIO
772
773
CIO INIT JUMP VECTOR FOR POWER UP
774
*=CIOINV
775 E46E 4C A6 E4 JMP CIOINT
i
GO TO INIT
776
777
778 ERROR ROUTINE ADDRESS EGUATE
779 ERRTNH =ERRTN/256 IIMOVED TO LINE 788
11
780 ERRTNL =-ERRTNH*256+ERRTN IIMOVED TO LINE 789
11
781
782
783
*=CIOORG
784
785
i
CIO INITIALIZATION (CALLED BY MONITOR AT POWER UP)
786 E4A6 A2 00 CIOINT: LDX 10
787 E4A8 A9 FF C 101 1: LDA IIOCFRE iSET ALL IOCB'S TO FREE
788 E4AA 9D 40 03 STA ICHID,X iBY SETTING HANDLER ID'S=$FF
789 E4AD A9 CO
LDA IERRTNL
790 E4AF
9D 46 03 STA
ICPTL, X
iPOINT PUT TO ERROR ROUTINE
791 E4B2 A9 E4
LDA
#ERRTNH
792 E4B4 9D 47 03
STA
ICPTH, X
793 E4B7
8A TXA
794 E4B8 18
CLC
795 E4B9
69 10 ADC IIOCBSZ iBUMP INDEX BY SIZE
796 E4BB
AA TAX
797 E4BC C9 80
eMP
#MAXIOC
i
DONE?
798 E4BE
90 E8 BCC
CIOIl
i
NO
799 E4CO 60 RTS
i
YES, RETURN
800
801
;
ERROR ROUTINE FOR ILLEGAL PUT
802 E4CO
ERRTN =*-1
803 00E4
ERRTNH =ERRTN/256
804 OOCO ERRTNL =(-ERRTNH)*256+ERRTN
805 E4Cl AO 85 LDY INOTOPN
i
IOCB NOT OPEN
806 E4C3 60 RTS