Sym-1 lib changes

This commit is contained in:
Wayne Parham
2021-06-06 21:28:03 -05:00
parent e687f2f048
commit 6c4c959141
17 changed files with 339 additions and 421 deletions

View File

@@ -1,12 +1,31 @@
; ---------------------------------------------------------------------------
; bitio.s
;
; for Sym-1
; Wayne Parham (wayne@parhamdata.com)
;
; Wayne Parham
; void set_DDR1A (int value);
; int get_DDR1A (void);
; void set_IOR1A (int value);
; int get_IOR1A (void);
; void set_DDR1B (int value);
; int get_DDR1B (void);
; void set_IOR1B (int value);
; int get_IOR1B (void);
; void set_DDR2A (int value);
; int get_DDR2A (void);
; void set_IOR2A (int value);
; int get_IOR2A (void);
; void set_DDR2B (int value);
; int get_DDR2B (void);
; void set_IOR2B (int value);
; int get_IOR2B (void);
; void set_DDR3A (int value);
; int get_DDR3A (void);
; void set_IOR3A (int value);
; int get_IOR3A (void);
; void set_DDR3B (int value);
; int get_DDR3B (void);
; void set_IOR3B (int value);
; int get_IOR3B (void);
;
; wayne@parhamdata.com
; ---------------------------------------------------------------------------
.include "sym1.inc"
@@ -20,211 +39,182 @@
.segment "CODE"
.proc _set_DDR1A: near
; ---------------------------------------------------------------------------
sta DDR1A ; Write data direction register for port 1A
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_DDR1A: near
; ---------------------------------------------------------------------------
lda DDR1A ; Read data direction register for port 1A
ldx #$00 ;
rts ; Return DDR1A
; ---------------------------------------------------------------------------
.endproc
.proc _set_IOR1A: near
; ---------------------------------------------------------------------------
sta OR1A ; Write I/O register for port 1A
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_IOR1A: near
; ---------------------------------------------------------------------------
lda OR1A ; Read I/O register for port 1A
ldx #$00 ;
rts ; Return OR1A
; ---------------------------------------------------------------------------
.endproc
.proc _set_DDR1B: near
; ---------------------------------------------------------------------------
sta DDR1B ; Write data direction register for port 1B
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_DDR1B: near
; ---------------------------------------------------------------------------
lda DDR1B ; Read data direction register for port 1B
ldx #$00 ;
rts ; Return DDR1B
; ---------------------------------------------------------------------------
.endproc
.proc _set_IOR1B: near
; ---------------------------------------------------------------------------
sta OR1B ; Write I/O register for port 1B
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_IOR1B: near
; ---------------------------------------------------------------------------
lda OR1B ; Read I/O register for port 1B
ldx #$00 ;
rts ; Return OR1B
; ---------------------------------------------------------------------------
.endproc
.proc _set_DDR2A: near
; ---------------------------------------------------------------------------
sta DDR2A ; Write data direction register for port 2A
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_DDR2A: near
; ---------------------------------------------------------------------------
lda DDR2A ; Read data direction register for port 2A
ldx #$00 ;
rts ; Return DDR2A
; ---------------------------------------------------------------------------
.endproc
.proc _set_IOR2A: near
; ---------------------------------------------------------------------------
sta OR2A ; Write I/O register for port 2A
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_IOR2A: near
; ---------------------------------------------------------------------------
lda OR2A ; Read I/O register for port 2A
ldx #$00 ;
rts ; Return OR2A
; ---------------------------------------------------------------------------
.endproc
.proc _set_DDR2B: near
; ---------------------------------------------------------------------------
sta DDR2B ; Write data direction register for port 2B
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_DDR2B: near
; ---------------------------------------------------------------------------
lda DDR2B ; Read data direction register for port 2B
ldx #$00 ;
rts ; Return DDR2B
; ---------------------------------------------------------------------------
.endproc
.proc _set_IOR2B: near
; ---------------------------------------------------------------------------
sta OR2B ; Write I/O register for port 2B
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_IOR2B: near
; ---------------------------------------------------------------------------
lda OR2B ; Read I/O register for port 2B
ldx #$00 ;
rts ; Return OR2B
; ---------------------------------------------------------------------------
.endproc
.proc _set_DDR3A: near
; ---------------------------------------------------------------------------
sta DDR3A ; Write data direction register for port 3A
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_DDR3A: near
; ---------------------------------------------------------------------------
lda DDR3A ; Read data direction register for port 3A
ldx #$00 ;
rts ; Return DDR3A
; ---------------------------------------------------------------------------
.endproc
.proc _set_IOR3A: near
; ---------------------------------------------------------------------------
sta OR3A ; Write I/O register for port 3A
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
.endproc
.proc _get_IOR3A: near
; ---------------------------------------------------------------------------
lda OR3A ; Read I/O register for port 3A
ldx #$00 ;
rts ; Return OR3A
; ---------------------------------------------------------------------------
.endproc
.proc _set_DDR3B: near
; ---------------------------------------------------------------------------
sta DDR3B ; Write data direction register for port 3B
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_DDR3B: near
; ---------------------------------------------------------------------------
lda DDR3B ; Read data direction register for port 3B
ldx #$00 ;
rts ; Return DDR3B
; ---------------------------------------------------------------------------
.endproc
.proc _set_IOR3B: near
; ---------------------------------------------------------------------------
sta OR3B ; Write I/O register for port 3B
lda #$00 ;
ldx #$00 ;
rts ; Return 0000
; ---------------------------------------------------------------------------
rts
.endproc
.proc _get_IOR3B: near
; ---------------------------------------------------------------------------
lda OR3B ; Read I/O register for port 3B
ldx #$00 ;
rts ; Return OR3B
; ---------------------------------------------------------------------------
.endproc