2016-06-06 22:42:51 +00:00
|
|
|
;
|
|
|
|
|
; Christian Groessler, June-2016
|
|
|
|
|
;
|
2020-11-17 07:53:48 +00:00
|
|
|
; unsigned char doesclrscrafterexit (void);
|
2016-06-06 22:42:51 +00:00
|
|
|
;
|
|
|
|
|
; returns 0/1 if after program termination the screen isn't/is cleared
|
|
|
|
|
;
|
|
|
|
|
|
|
|
|
|
.export _doesclrscrafterexit
|
2016-06-13 19:16:27 +00:00
|
|
|
.import __is_cmdline_dos
|
|
|
|
|
.import return1
|
2016-06-06 22:42:51 +00:00
|
|
|
|
2016-06-13 19:16:27 +00:00
|
|
|
.ifdef __ATARIXL__
|
|
|
|
|
_doesclrscrafterexit = return1 ; the c65 runtime always clears the screen at program termination
|
|
|
|
|
.else
|
2016-06-06 22:42:51 +00:00
|
|
|
_doesclrscrafterexit:
|
2016-06-13 19:16:27 +00:00
|
|
|
jsr __is_cmdline_dos ; currently (unless a DOS behaving differently is popping up)
|
|
|
|
|
eor #$01 ; we can get by with the inverse of __is_cmdline_dos
|
2016-06-06 22:42:51 +00:00
|
|
|
rts
|
2016-06-13 19:16:27 +00:00
|
|
|
.endif
|
