dos33fsprogs/mode7/scroll_demo.s

50 lines
906 B
ArmAsm
Raw Normal View History

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
;=======================
; decompress scroll text
;=======================
2017-12-18 06:13:03 +00:00
lda #10
sta CV
scroll_forever:
lda #>deater_scroll
sta INH
lda #<deater_scroll
sta INL
2017-12-18 06:13:03 +00:00
jsr gr_scroll
2017-12-18 06:13:03 +00:00
jmp scroll_forever
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"