|
DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1364 (0x554)
Types: TextFile
Names: »SIO.INT.S«
└─⟦a3edd706e⟧ Bits:30005202 8" Zilog MCZ/1 Floppy CR80FD_0028 ( TC 500 SEC. PROTOCOL BACK UP ! (V1) BB A1 820907 NCJ )
└─ ⟦this⟧ »SIO.INT.S«
└─⟦e12128f26⟧ Bits:30005200 8" Zilog MCZ/1 Floppy CR80FD_0026 ( TC 500 SEC. PROTOCOL BB V1 830407 NCJ )
└─ ⟦this⟧ »SIO.INT.S«
;****************************************************************************** ;* ;* SIO INTERRUPT MODULE ;* ;****************************************************************************** EXTERNAL TRAROU EXTERNAL RECROU EXTERNAL EXTSTA EXTERNAL ERRREC EXTERNAL CHA1TAB EXTERNAL CHA2TAB EXTERNAL CHA3TAB EXTERNAL CHA4TAB GLOBAL TRA1ROU,REC1ROU,EXT1STA,ERR1REC GLOBAL TRA2ROU,REC2ROU,EXT2STA,ERR2REC GLOBAL TRA3ROU,REC3ROU,EXT3STA,ERR3REC GLOBAL TRA4ROU,REC4ROU,EXT4STA,ERR4REC TRA1ROU CALL REG1SWAP TRA2ROU CALL REG2SWAP TRA3ROU CALL REG3SWAP TRA4ROU CALL REG4SWAP CALL TRAROU JR SWAPREG REC1ROU CALL REG1SWAP REC2ROU CALL REG2SWAP REC3ROU CALL REG3SWAP REC4ROU CALL REG4SWAP CALL RECROU JR SWAPREG EXT1STA CALL REG1SWAP EXT2STA CALL REG2SWAP EXT3STA CALL REG3SWAP EXT4STA CALL REG4SWAP CALL EXTSTA JR SWAPREG ERR1REC CALL REG1SWAP ERR2REC CALL REG2SWAP ERR3REC CALL REG3SWAP ERR4REC CALL REG4SWAP CALL ERRREC JR SWAPREG REG1SWAP EX AF,AF' EXX POP HL PUSH IY LD IY,CHA1TAB LD BC,09H ADD HL,BC PUSH HL RET REG2SWAP EX AF,AF' EXX POP HL PUSH IY LD IY,CHA2TAB LD BC,06H ADD HL,BC PUSH HL RET REG3SWAP EXX EX AF,AF' POP HL PUSH IY LD IY,CHA3TAB LD BC,03H ADD HL,BC PUSH HL RET REG4SWAP EXX EX AF,AF' POP HL PUSH IY PUSH HL LD IY,CHA4TAB RET SWAPREG POP IY EXX EX AF,AF' EI RETI END ;ECHO \f