Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-02-05 21:34:30 +00:00
Code Issues Projects Releases Wiki Activity

vgi: put in text

Browse Source
This commit is contained in:
Vince Weaver 2021-06-21 17:15:30 -04:00
parent 3262240cfc
commit 1ad2230f58
1 changed files with 55 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

65
graphics/hgr/vgi/vgi.s
View File

@ -14,16 +14,16 @@ vgi_test:
; get pointer to image data
lda #<red_book_data
sta VGIL
lda #>red_book_data
sta VGIH
; lda #<clock_data
; lda #<red_book_data
; sta VGIL
; lda #>clock_data
; lda #>red_book_data
; sta VGIH
lda #<clock_data
sta VGIL
lda #>clock_data
sta VGIH
jsr play_vgi
jsr wait_until_keypress
@ -57,6 +57,16 @@ loopy:
bit TEXTGR
jsr CROUT1 ; print linefeed/cr
lda #<string4
sta OUTL
lda #>string4
sta OUTH
jsr fake_input
; Rocket Door
bit FULLGR
@ -72,6 +82,16 @@ loopy:
bit TEXTGR
jsr CROUT1 ; print linefeed/cr
lda #<string5
sta OUTL
lda #>string5
sta OUTH
jsr fake_input
jsr fake_input
; Red Book
bit FULLGR
@ -88,6 +108,17 @@ loopy:
bit TEXTGR
jsr CROUT1 ; print linefeed/cr
lda #<string7
sta OUTL
lda #>string7
sta OUTH
jsr fake_input
jsr fake_input
jsr fake_input
; jmp loopy
done:
@ -191,16 +222,27 @@ string4:
.byte " LEFT/RIGHT/FORWARD",13,0
string5:
.byte "THERE IS A METTALIC DOOR BLOCKING YOU",0
.byte "YOU ARE CLOSE TO THE SPACESHIP",13
.byte "YOU SEE A DOOR",13,0
; OPEN DOOR
string6:
.byte "THE DOOR IS LOCKED. ATRUS HATES YOU",0
.byte "THE DOOR IS LOCKED",13
.byte "ATRUS HATES YOU",13,0
;string7:
;.byte "SORRY, I DON'T UNDERSTAND THAT",0
string7:
.byte "SORRY, I DON'T UNDERSTAND THAT",0
.byte "YOU SEE A RED BOOK",13
.byte "NEXT TO IT IS A PAGE",13,0
string8:
.byte "WHICH PAGE?",13,0
string9:
.byte "I'D SAY IT'S MORE OF A PURPLE COLOR",13,0
; PICK UP PAGE
; WHICH PAGE?
@ -216,6 +258,9 @@ string7:
; REALLY?
; WHICH ONE (0..126)
; NOTHING HAPPENS
;=========================
; print_string