prodos-drivers/quit/quit.system.s
2019-10-03 21:55:36 -07:00

25 lines
468 B
ArmAsm

.setcpu "6502"
.include "apple2.inc"
.include "../inc/apple2.inc"
.include "../inc/prodos.inc"
.org SYS_ADDR
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
DEFINE_QUIT_PARAMS quit_params