rendered paste body ORG $1000
MOVE.L #$1000,A7
ORI.W #$0700,SR
LEA IRQ(PC),A0
MOVE.L A0,$68
CLR.B CRB
CLR.B CRA
CLR.L D5
CLR D3
MOVE.B #$8F,DDRB ; 4 UITANGEN 3 INGANGEN
MOVE.B #$FF,DDRA ; ALLES output
MOVE.B #$04,CRA
MOVE.B #$05,CRB ; b0 = 1, b1 = 0, b2 = 1
; b5 = 0, b4 = 0 , b3 = 0
; b6 = 0, b7 = 0
ANDI.W #$F9FF,SR
HOOFD MOVE.B #$00,ORA
MOVE.B #$01,ORB
JMP HOOFD
;..............................................
IRQ TST.B ORB
MOVE.B #$00,ORA ; alles aangestuurd
MOVE.B #$04,ORB ; selectielijnen : 0 = geen, 1 = eerste display (tientallen)
; 2 = tweede display, 3 = leds
RTE