URL
https://opencores.org/ocsvn/System09/System09/trunk
[/] [System09/] [trunk/] [src/] [Flex9/] [f9-spool.asm] - Diff between revs 59 and 66
Go to most recent revision |
Only display areas with differences |
Details |
Blame |
View Log
| Rev 59 |
Rev 66 |
*
|
*
|
** PRINTER SPOOLING
|
** PRINTER SPOOLING
|
*
|
*
|
ORG $C700
|
ORG $C700
|
PRSPL1 JMP ZC721
|
PRSPL1 JMP ZC721
|
PRSPL2 JMP *
|
PRSPL2 JMP *
|
PRSPL3 JMP ZC747
|
PRSPL3 JMP ZC747
|
PRSPL4 JMP ZC785
|
PRSPL4 JMP ZC785
|
PRSPL5 JMP ZC795
|
PRSPL5 JMP ZC795
|
PRSPL6 JMP ZC71F
|
PRSPL6 JMP ZC71F
|
*
|
*
|
** SPOOLER SCRATCH AREA
|
** SPOOLER SCRATCH AREA
|
*
|
*
|
ZC712 FCB $0C,$00,$00,$00,$00,$C8,$10
|
ZC712 FCB $0C,$00,$00,$00,$00,$C8,$10
|
ZC719 FCB $C8,$10
|
ZC719 FCB $C8,$10
|
QCNT FCB $00
|
QCNT FCB $00
|
ZC71C FCB $00
|
ZC71C FCB $00
|
ZC71D FCB $00
|
ZC71D FCB $00
|
ZC71E FCB $00
|
ZC71E FCB $00
|
*
|
*
|
ZC71F RTI
|
ZC71F RTI
|
NOP
|
NOP
|
*
|
*
|
ZC721 ORCC #$10
|
ZC721 ORCC #$10
|
LDX ZCC31
|
LDX ZCC31
|
STS 2,X
|
STS 2,X
|
TST ZCC34
|
TST ZCC34
|
BNE ZC73F
|
BNE ZC73F
|
LDX #ZCCFC
|
LDX #ZCCFC
|
INC ZCC34
|
INC ZCC34
|
TST ,X
|
TST ,X
|
BEQ ZC73F
|
BEQ ZC73F
|
ZC738 STX ZCC31
|
ZC738 STX ZCC31
|
LDS $02,X
|
LDS $02,X
|
RTI
|
RTI
|
*
|
*
|
ZC73F LDX #ZCCF8
|
ZC73F LDX #ZCCF8
|
CLR ZCC34
|
CLR ZCC34
|
BRA ZC738
|
BRA ZC738
|
*
|
*
|
ZC747 ORCC #$10
|
ZC747 ORCC #$10
|
TST QCNT
|
TST QCNT
|
BEQ ZC777
|
BEQ ZC777
|
LDX ZC719
|
LDX ZC719
|
LDA ,X
|
LDA ,X
|
PSHS A
|
PSHS A
|
LDD $01,X
|
LDD $01,X
|
LDX #ZCAC0
|
LDX #ZCAC0
|
STD $40,X
|
STD $40,X
|
PULS A
|
PULS A
|
STA $03,X
|
STA $03,X
|
CLR ,X
|
CLR ,X
|
LDA #$01
|
LDA #$01
|
STA $02,X
|
STA $02,X
|
CLR $22,X
|
CLR $22,X
|
CLR $3B,X
|
CLR $3B,X
|
ZC76D TST ZC71E
|
ZC76D TST ZC71E
|
BEQ ZC79B
|
BEQ ZC79B
|
SWI3
|
SWI3
|
NOP
|
NOP
|
BRA ZC76D
|
BRA ZC76D
|
*
|
*
|
ZC777 ANDCC #$EF
|
ZC777 ANDCC #$EF
|
ZC779 JSR [TOFVEC]
|
ZC779 JSR [TOFVEC]
|
CLR ZCCFC
|
CLR ZCCFC
|
SWI3
|
SWI3
|
NOP
|
NOP
|
BRA ZC779
|
BRA ZC779
|
*
|
*
|
ZC785 ORCC #$10
|
ZC785 ORCC #$10
|
TST ZCC30
|
TST ZCC30
|
BEQ ZC791
|
BEQ ZC791
|
SWI3
|
SWI3
|
NOP
|
NOP
|
BRA ZC785
|
BRA ZC785
|
*
|
*
|
ZC791 INC ZCC30
|
ZC791 INC ZCC30
|
RTS
|
RTS
|
*
|
*
|
ZC795 CLR ZCC30
|
ZC795 CLR ZCC30
|
ANDCC #$EF
|
ANDCC #$EF
|
RTS
|
RTS
|
*
|
*
|
ZC79B TST ZC71D
|
ZC79B TST ZC71D
|
BNE ZC7C7
|
BNE ZC7C7
|
LDX #ZCAC0
|
LDX #ZCAC0
|
JSR FMS
|
JSR FMS
|
BNE ZC7C7
|
BNE ZC7C7
|
TST ZC71C
|
TST ZC71C
|
BEQ ZC7BC
|
BEQ ZC7BC
|
CLR ZC71C
|
CLR ZC71C
|
CMPA #$0A
|
CMPA #$0A
|
BEQ ZC7C3
|
BEQ ZC7C3
|
PSHS A
|
PSHS A
|
LDA #$0A
|
LDA #$0A
|
BSR ZC7F6
|
BSR ZC7F6
|
PULS A
|
PULS A
|
ZC7BC CMPA #$0D
|
ZC7BC CMPA #$0D
|
BNE ZC7C3
|
BNE ZC7C3
|
STA ZC71C
|
STA ZC71C
|
ZC7C3 BSR ZC7F6
|
ZC7C3 BSR ZC7F6
|
BRA ZC79B
|
BRA ZC79B
|
*
|
*
|
ZC7C7 LDA #$0D
|
ZC7C7 LDA #$0D
|
BSR ZC7F6
|
BSR ZC7F6
|
LDA #$0A
|
LDA #$0A
|
BSR ZC7F6
|
BSR ZC7F6
|
LDA ZC712
|
LDA ZC712
|
BSR ZC7F6
|
BSR ZC7F6
|
CLR ZC71D
|
CLR ZC71D
|
LDX ZC719
|
LDX ZC719
|
TST $03,X
|
TST $03,X
|
BEQ ZC7E3
|
BEQ ZC7E3
|
DEC $03,X
|
DEC $03,X
|
JMP ZC747
|
JMP ZC747
|
*
|
*
|
ZC7E3 LEAX $04,X
|
ZC7E3 LEAX $04,X
|
CMPX #FCB
|
CMPX #FCB
|
BNE ZC7ED
|
BNE ZC7ED
|
LDX #ZC810
|
LDX #ZC810
|
ZC7ED STX ZC719
|
ZC7ED STX ZC719
|
DEC QCNT
|
DEC QCNT
|
JMP ZC747
|
JMP ZC747
|
*
|
*
|
ZC7F6 JSR PCHK
|
ZC7F6 JSR PCHK
|
BMI ZC800
|
BMI ZC800
|
SWI3
|
SWI3
|
NOP
|
NOP
|
BRA ZC7F6
|
BRA ZC7F6
|
*
|
*
|
ZC800 JMP POUT
|
ZC800 JMP POUT
|
ZC810 EQU $C810
|
ZC810 EQU $C810
|
ZC838 EQU $C838
|
ZC838 EQU $C838
|
END
|
END
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.