prodos-drivers/quit/quit.system.s

25 lines
468 B
ArmAsm
Raw Normal View History

2019-10-02 04:14:34 +00:00
.setcpu "6502"
.include "apple2.inc"
2019-10-04 04:55:36 +00:00
.include "../inc/apple2.inc"
.include "../inc/prodos.inc"
2019-10-02 04:14:34 +00:00
2019-10-04 04:55:36 +00:00
.org SYS_ADDR
2019-10-02 04:14:34 +00:00
cld
bit ROMIN2
sta CLR80VID
sta CLRALTCHAR
sta CLR80COL
jsr SETVID
jsr SETKBD
jsr SETNORM
jsr INIT
jsr HOME
MLI_CALL QUIT, quit_params
brk
2019-10-04 04:55:36 +00:00
DEFINE_QUIT_PARAMS quit_params