Apple-2-SW
/
dos33fsprogs
mirror of https://github.com/deater/dos33fsprogs.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

tfv: fix opener bug only seen on real hardware 

was depending on random setting of value in zero page
This commit is contained in:
Vince Weaver 2017-11-17 16:29:33 -05:00
parent a5e9bb4982
commit efdcf2bada
2 changed files with 13 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
tfv/tfv.s
View File

@ -7,6 +7,11 @@
jsr HOME
jsr set_gr_page0
lda #0
sta DISP_PAGE ; Forgot to set initially
; real hardware and AppleWin default
; to different values
;===================================
; zero out the zero page that we use
;===================================

11
tfv/tfv_opener.s
View File

@ -25,6 +25,10 @@ shine_loop:
cmp #30
bne shine_loop
jsr page_flip
; Done, print string
lda #8
sta CH ; HTAB 9
@ -39,13 +43,14 @@ shine_loop:
jsr print_string ; print("A VMW SOFTWARE PRODUCTION");
jsr wait_until_keypressed
rts
;=================
;=====================
; display part of logo
;=================
;=====================
;
draw_segment:
lda #0