2018-08-29 15:46:25 +00:00
|
|
|
; Apple II Megademo
|
|
|
|
|
|
|
|
|
|
; by deater (Vince Weaver) <vince@deater.net>
|
|
|
|
|
|
2018-08-29 21:14:43 +00:00
|
|
|
.include "zp.inc"
|
2018-08-29 15:57:54 +00:00
|
|
|
.include "hardware.inc"
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;===================
|
|
|
|
|
; set graphics mode
|
|
|
|
|
;===================
|
|
|
|
|
jsr HOME
|
|
|
|
|
|
|
|
|
|
|
2018-09-17 04:12:51 +00:00
|
|
|
; C64 Opening Sequence
|
2018-08-29 21:14:43 +00:00
|
|
|
|
2018-09-17 04:12:51 +00:00
|
|
|
; jsr c64_opener
|
2018-08-29 21:14:43 +00:00
|
|
|
|
2018-09-17 04:12:51 +00:00
|
|
|
; Falling Apple II
|
2018-08-29 21:14:43 +00:00
|
|
|
|
2018-09-17 04:12:51 +00:00
|
|
|
jsr falling_apple
|
2018-08-29 21:14:43 +00:00
|
|
|
|
2018-09-17 04:12:51 +00:00
|
|
|
; Starring Screens
|
|
|
|
|
|
|
|
|
|
; E-mail arriving
|
2018-08-29 21:14:43 +00:00
|
|
|
|
2018-08-29 15:46:25 +00:00
|
|
|
|
|
|
|
|
;===================
|
|
|
|
|
; do nothing
|
|
|
|
|
;===================
|
|
|
|
|
do_nothing:
|
|
|
|
|
jmp do_nothing
|
|
|
|
|
|
|
|
|
|
|
2018-08-29 21:14:43 +00:00
|
|
|
.include "lz4_decode.s"
|
2018-09-17 04:12:51 +00:00
|
|
|
.include "c64_opener.s"
|
2018-08-29 21:14:43 +00:00
|
|
|
|
