mirror of
https://github.com/cc65/cc65.git
synced 2024-08-17 19:29:12 +00:00
23 lines
357 B
ArmAsm
23 lines
357 B
ArmAsm
;
|
|
; Ullrich von Bassewitz, 26.10.2000
|
|
;
|
|
; Screen size variables
|
|
;
|
|
|
|
.export screensize
|
|
|
|
.include "c128.inc"
|
|
|
|
.proc screensize
|
|
|
|
ldx #40 ; Assume 40 column mode
|
|
bit MODE
|
|
bpl C40 ; Jump if 40 column mode
|
|
ldx #80
|
|
C40: ldy #25
|
|
rts
|
|
|
|
.endproc
|
|
|
|
|