1
0
mirror of https://github.com/cc65/cc65.git synced 2024-12-25 17:29:50 +00:00
cc65/libsrc/sym1/display.s
2021-05-09 16:34:53 -05:00

155 lines
5.5 KiB
ArmAsm

; ---------------------------------------------------------------------------
; display.s
;
; for Sym-1
;
; Wayne Parham
;
; wayne@parhamdata.com
; ---------------------------------------------------------------------------
.include "sym1.inc"
.export _fdisp, _set_D0, _get_D0
.export _set_D1, _get_D1, _set_D2, _get_D2
.export _set_D3, _get_D3, _set_D4, _get_D4
.export _set_D5, _get_D5, _set_D6, _get_D6
.segment "CODE"
.proc _fdisp: near
; ---------------------------------------------------------------------------
jsr SCAND ; Flash Display
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
.endproc
.proc _set_D0: near
; ---------------------------------------------------------------------------
sta DISBUF0 ; Write Digit 0
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
.endproc
.proc _get_D0: near
; ---------------------------------------------------------------------------
lda DISBUF0 ; Read Digit 0
ldx #$00 ;
rts ; Return DISBUF0
; ---------------------------------------------------------------------------
.endproc
.proc _set_D1: near
; ---------------------------------------------------------------------------
sta DISBUF1 ; Write Digit 1
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
.endproc
.proc _get_D1: near
; ---------------------------------------------------------------------------
lda DISBUF1 ; Read Digit 1
ldx #$00 ;
rts ; Return DISBUF1
; ---------------------------------------------------------------------------
.endproc
.proc _set_D2: near
; ---------------------------------------------------------------------------
sta DISBUF2 ; Write Digit 2
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
.endproc
.proc _get_D2: near
; ---------------------------------------------------------------------------
lda DISBUF2 ; Read Digit 2
ldx #$00 ;
rts ; Return DISBUF2
; ---------------------------------------------------------------------------
.endproc
.proc _set_D3: near
; ---------------------------------------------------------------------------
sta DISBUF3 ; Write Digit 3
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
.endproc
.proc _get_D3: near
; ---------------------------------------------------------------------------
lda DISBUF3 ; Read Digit 3
ldx #$00 ;
rts ; Return DISBUF3
; ---------------------------------------------------------------------------
.endproc
.proc _set_D4: near
; ---------------------------------------------------------------------------
sta DISBUF4 ; Write Digit 4
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
.endproc
.proc _get_D4: near
; ---------------------------------------------------------------------------
lda DISBUF4 ; Read Digit 4
ldx #$00 ;
rts ; Return DISBUF4
; ---------------------------------------------------------------------------
.endproc
.proc _set_D5: near
; ---------------------------------------------------------------------------
sta DISBUF5 ; Write Digit 5
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
.endproc
.proc _get_D5: near
; ---------------------------------------------------------------------------
lda DISBUF5 ; Read Digit 5
ldx #$00 ;
rts ; Return DISBUF5
; ---------------------------------------------------------------------------
.endproc
.proc _set_D6: near
; ---------------------------------------------------------------------------
sta DISBUF6 ; Write byte to the right of display
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
.endproc
.proc _get_D6: near
; ---------------------------------------------------------------------------
lda DISBUF6 ; Read byte to the right of display
ldx #$00 ;
rts ; Return DISBUF6
; ---------------------------------------------------------------------------
.endproc