2018-08-29 11:46:25 -04:00
|
|
|
; Apple II Megademo
|
|
|
|
|
|
|
|
; by deater (Vince Weaver) <vince@deater.net>
|
|
|
|
|
2018-08-29 17:14:43 -04:00
|
|
|
.include "zp.inc"
|
2018-08-29 11:57:54 -04:00
|
|
|
.include "hardware.inc"
|
|
|
|
|
|
|
|
|
|
|
|
;===================
|
|
|
|
; set graphics mode
|
|
|
|
;===================
|
|
|
|
jsr HOME
|
|
|
|
|
2018-09-17 00:12:51 -04:00
|
|
|
; C64 Opening Sequence
|
2018-08-29 17:14:43 -04:00
|
|
|
|
2018-09-22 23:07:59 -04:00
|
|
|
jsr c64_opener
|
2018-08-29 17:14:43 -04:00
|
|
|
|
2018-09-17 00:12:51 -04:00
|
|
|
; Falling Apple II
|
2018-08-29 17:14:43 -04:00
|
|
|
|
2018-09-17 00:12:51 -04:00
|
|
|
jsr falling_apple
|
2018-08-29 17:14:43 -04:00
|
|
|
|
2018-09-17 00:12:51 -04:00
|
|
|
; Starring Screens
|
|
|
|
|
|
|
|
; E-mail arriving
|
2018-08-29 17:14:43 -04:00
|
|
|
|
2018-09-26 14:01:14 -04:00
|
|
|
; Leaving house
|
|
|
|
|
|
|
|
; Riding bird
|
|
|
|
|
|
|
|
; Waterfall
|
|
|
|
|
|
|
|
; Enter ship
|
|
|
|
|
|
|
|
; Fly in space
|
|
|
|
|
|
|
|
; Arrive
|
|
|
|
|
|
|
|
; Fireworks
|
|
|
|
|
|
|
|
jsr fireworks
|
|
|
|
|
|
|
|
; Game over
|
|
|
|
game_over_man:
|
|
|
|
jmp game_over_man
|
2018-08-29 11:46:25 -04:00
|
|
|
|
|
|
|
;===================
|
2018-09-17 00:44:32 -04:00
|
|
|
; Loop Forever
|
2018-08-29 11:46:25 -04:00
|
|
|
;===================
|
2018-09-17 00:44:32 -04:00
|
|
|
loop_forever:
|
|
|
|
jmp loop_forever
|
2018-08-29 11:46:25 -04:00
|
|
|
|
|
|
|
|
2018-08-29 17:14:43 -04:00
|
|
|
.include "lz4_decode.s"
|
2018-09-17 00:12:51 -04:00
|
|
|
.include "c64_opener.s"
|
2018-09-17 00:44:32 -04:00
|
|
|
.include "falling_apple.s"
|
2018-09-23 13:44:03 -04:00
|
|
|
.align $100
|
2018-09-17 13:26:45 -04:00
|
|
|
.include "gr_offsets.s"
|
2018-09-17 13:51:53 -04:00
|
|
|
.include "gr_hline.s"
|
|
|
|
.include "vapor_lock.s"
|
2018-09-21 00:33:51 -04:00
|
|
|
.include "delay_a.s"
|
2018-09-22 23:07:59 -04:00
|
|
|
.include "wait_keypress.s"
|
2018-09-26 14:01:14 -04:00
|
|
|
.include "random16.s"
|
|
|
|
.align $100
|
|
|
|
.include "fireworks.s"
|
|
|
|
.include "hgr.s"
|
|
|
|
.include "move_letters.s"
|