Fix codestyle

This commit is contained in:
Konstantin
2025-06-07 12:36:49 +03:00
parent 5ff18c1ebc
commit 1a109c0b34
14 changed files with 215 additions and 219 deletions

View File

@@ -4,20 +4,19 @@
; char cgetc (void);
;
.export _cgetc
.import cursor
.include "agat.inc"
.export _cgetc
.import cursor
.include "agat.inc"
_cgetc:
lda #$DF ; _
bit cursor
bne hascur
lda #$00
hascur: sta CURSOR
jsr j1
cmp #$A0
bpl :+
and #$7F
: rts
j1: jmp (VCIN)
lda #$DF ; _
bit cursor
bne hascur
lda #$00
hascur: sta CURSOR
jsr j1
cmp #$A0
bpl :+
and #$7F
: rts
j1: jmp (VCIN)