2017-12-14 05:59:34 +00:00
|
|
|
.include "zp.inc"
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;================================
|
|
|
|
|
; Clear screen and setup graphics
|
|
|
|
|
;================================
|
|
|
|
|
|
|
|
|
|
jsr clear_screens ; clear top/bottom of page 0/1
|
|
|
|
|
jsr set_gr_page0
|
|
|
|
|
|
|
|
|
|
;===============
|
|
|
|
|
; Init Variables
|
|
|
|
|
;===============
|
|
|
|
|
lda #0
|
|
|
|
|
sta DISP_PAGE
|
|
|
|
|
|
2017-12-14 20:59:54 +00:00
|
|
|
;=======================
|
|
|
|
|
; decompress scroll text
|
|
|
|
|
;=======================
|
2017-12-18 06:13:03 +00:00
|
|
|
|
|
|
|
|
lda #10
|
|
|
|
|
sta CV
|
|
|
|
|
|
|
|
|
|
scroll_forever:
|
2017-12-14 20:59:54 +00:00
|
|
|
lda #>deater_scroll
|
|
|
|
|
sta INH
|
|
|
|
|
lda #<deater_scroll
|
|
|
|
|
sta INL
|
|
|
|
|
|
|
|
|
|
|
2017-12-18 06:13:03 +00:00
|
|
|
jsr gr_scroll
|
2017-12-14 20:59:54 +00:00
|
|
|
|
2017-12-18 06:13:03 +00:00
|
|
|
jmp scroll_forever
|
2017-12-14 20:59:54 +00:00
|
|
|
|
|
|
|
|
|
2017-12-18 06:13:03 +00:00
|
|
|
;===============================================
|
|
|
|
|
; Routines
|
|
|
|
|
;===============================================
|
|
|
|
|
.include "../asm_routines/hlin_clearscreen.s"
|
|
|
|
|
.include "../asm_routines/gr_scroll.s"
|
|
|
|
|
.include "../asm_routines/pageflip.s"
|
|
|
|
|
.include "../asm_routines/gr_setpage.s"
|
2017-12-14 05:59:34 +00:00
|
|
|
|
|
|
|
|
;===============================================
|
|
|
|
|
; Variables
|
|
|
|
|
;===============================================
|
|
|
|
|
|
|
|
|
|
.include "deater_scroll.inc"
|
|
|
|
|
|
