E.3. Interrupt-Behandlung (IRQ.S)

 

;// freitag, 23.februar 1990  19.51 uhr

;

; DATEI IRQ.S

; PROJEKT EDDI3

 

 ADRE

 GLOBAL

 

 RSEG IRQ

 

IRQA ;

 PHA

 PHX

 PHY

 LDA PMPORT

 AND #$80

        BEQ IRQB

; WIEDERGABE - V-PULS - INTERRUPT ######################################

IRQA1 ;

 STA PMIRES  IRQ RUECKSETZEN

 LDA        CCAS

 STA PMCAS  CAS SETZEN

 LDA CRAS

 STA PMRAS  RAS SETZEN

 LDA CRW1

 STA PMROW1  ROW SETZEN

        BRA IRQE  ENDE WIEDERGABE - V-PULS - INTERRUPT

IRQB ;

 LDA PMPORT

 AND #$40

 BEQ IRQC

; AUFNAHME - V-PULS - INTERRUPT ########################################

IRQA2 ;

 STA PMIRES  IRQ RUECKSETZEN

        STZ VMODE  AUFNAHME-MODUS BEENDEN

 BRA IRQE  ENDE AUFNAHME - V-PULS - INTERRUPT

IRQC ;

; ############################# UNBEKANNTER INTERRUPT ##################

 LDA        #$80

 STA IO3I  IO3-INTERRUPTS LOESCHEN

IRQE ;

 PLY

 PLX

 PLA

        RTI

 

NMIA ;

 RTI

 

; ##############################################################

 RSEG IRQZ

 RSEG IRQD

 

        END