Data commit

This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 7387c8f97b
commit cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions

View file

@ -0,0 +1,34 @@
queuePointerStart equ #$FD
queuePointerMinus1 equ #$FC ;make this equal whatever "queuePointerStart" is, minus 1.
pushQueue:
STA 0,x
DEX
RTS
popQueue:
STX temp
LDX #queuePointerStart
LDA 0,x ;get the item that's first in line
PHA
LDX #queuePointerMinus1
loop_popQueue:
LDA 0,X
STA 1,X
DEX
CPX temp
BNE loop_popQueue
LDX temp
INX
PLA ;return the item that just left the queue
RTS
isQueueEmpty:
LDA #1
CPX #queuePointerStart
BEQ yes ;return 1
SEC
SBC #1 ;return 0
yes:
RTS

View file

@ -0,0 +1,16 @@
define temp $00
define queueEmpty $FD
define queueAlmostEmpty $FC
LDX #queueEmpty ;set up software queue
LDA #$40
jsr pushQueue
LDA #$80
jsr pushQueue
LDA #$C0
jsr pushQueue
brk

View file

@ -0,0 +1,18 @@
define temp $00
define queueEmpty $FD
define queueAlmostEmpty $FC
LDX #queueEmpty ;set up software queue
LDA #$40
jsr pushQueue
LDA #$80
jsr pushQueue
LDA #$C0
jsr pushQueue
jsr popQueue
brk

View file

@ -0,0 +1,22 @@
define temp $00
define queueEmpty $FD
define queueAlmostEmpty $FC
LDX #queueEmpty ;set up software queue
LDA #$40
jsr pushQueue
LDA #$80
jsr pushQueue
LDA #$C0
jsr pushQueue
jsr popQueue
lda #$ff
jsr pushQueue
brk