prodos-drivers/util/quit.system.s


        .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
Add QUIT.SYSTEM 2019-10-02 04:14:34 +00:00
			`.setcpu "6502"`
			`.include "apple2.inc"`

Split out quit.system 2019-10-04 04:55:36 +00:00			`.include "../inc/apple2.inc"`
			`.include "../inc/prodos.inc"`
Add QUIT.SYSTEM 2019-10-02 04:14:34 +00:00
Split out quit.system 2019-10-04 04:55:36 +00:00			`.org SYS_ADDR`
Add QUIT.SYSTEM 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`

Split out quit.system 2019-10-04 04:55:36 +00:00			`DEFINE_QUIT_PARAMS quit_params`