mirror of
https://github.com/cc65/cc65.git
synced 2026-02-11 09:22:01 +00:00
19 lines
271 B
ArmAsm
19 lines
271 B
ArmAsm
;
|
|
; Oleg A. Odintsov, Moscow, 2024
|
|
;
|
|
; void __fastcall__ cclear (unsigned char length);
|
|
;
|
|
|
|
.export _cclear
|
|
.import COUT
|
|
.include "zeropage.inc"
|
|
|
|
_cclear:
|
|
sta ptr1
|
|
lda #$A0
|
|
next:
|
|
jsr COUT
|
|
dec ptr1
|
|
bne next
|
|
rts
|