fixed a few things, compiles again :)

This commit is contained in:
mrdudz
2017-06-17 03:01:31 +02:00
parent dd2972d699
commit b523f070f3
9 changed files with 33 additions and 85 deletions

View File

@@ -1,39 +0,0 @@
.export _cpeekchar
.export _cpeekcharxy
.import _gotoxy
.include "cbm/cbm.inc"
.segment "CODE"
_cpeekcharxy:
jsr _gotoxy ; Set cursor
_cpeekchar:
ldy CURS_X
lda (SCREEN_PTR),y ; get char
ldx #0
and #$7f
; 0 - $1f +$40
; $20 - $3f
; $40 - $7e +$80
cmp #$1f
bcs @sk1
;; clc
adc #$40
rts
@sk1:
cmp #$40
bcc @end
clc
adc #$80
@end:
rts

View File

@@ -1,21 +0,0 @@
.export _cpeekcol
.export _cpeekcolxy
.import _gotoxy
.include "cc65/conio.inc"
.segment "CODE"
_cpeekcolxy:
jsr _gotoxy ; Set cursor
_cpeekcol:
ldy CURS_X
lda (CRAM_PTR),y ; get color
and #$0f
ldx #0
rts