style(buzbee): fixed hex style to be more conventional
This commit is contained in:
10
src/buzbee.s
10
src/buzbee.s
@@ -42,7 +42,7 @@ BBVAR tagbbvar
|
||||
BUZBEE
|
||||
lbsr NEWLINE ; Setup the new input line and handle display.
|
||||
bsr INPLOOP ; Fill input buffer.
|
||||
cmpy #$0000 ; No data?
|
||||
cmpy #0 ; No data?
|
||||
beq BUZBEE ; Try again...
|
||||
; TODO: Parse the input buffer into tokens
|
||||
lbsr RUNIF
|
||||
@@ -58,7 +58,7 @@ BUZBEE
|
||||
; offset in the input buffer of the last char read.
|
||||
INPLOOP
|
||||
jsr PINCHAR ; Try to read a char
|
||||
cmpd #$0000 ; If no char keep waitin'
|
||||
cmpd #0 ; If no char keep waitin'
|
||||
beq INPLOOP
|
||||
bitb #UARTF_LSR_DR ; Is there a char in A?
|
||||
beq NOCHAR@
|
||||
@@ -101,7 +101,7 @@ HCR@
|
||||
HESC@
|
||||
lda #'^ ; Print a char that signifies that ESC was pressed
|
||||
jsr POUTCHAR
|
||||
ldy #$0000 ; On return we cmpy #$0000 and if eq then newline.
|
||||
ldy #0 ; On return we cmpy #0 and if eq then newline
|
||||
rts
|
||||
HBACKSPC@
|
||||
clrb ; Clear last char
|
||||
@@ -118,13 +118,13 @@ NEWLINE
|
||||
PZSTR PROMPTLINE ; Print prompt line
|
||||
CLRIN ; Label to just clear input buffer without newline
|
||||
clra ; Init A and X
|
||||
ldx #$0000
|
||||
ldx #0
|
||||
NEXT@
|
||||
sta BBVAR.input,x ; Clear input buffer
|
||||
leax 1,x
|
||||
cmpx #BBIN_DEPTH
|
||||
blo NEXT@
|
||||
ldy #$0000 ; Reset buffer fill pointer
|
||||
ldy #0 ; Reset buffer fill pointer
|
||||
rts
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
Reference in New Issue
Block a user