otomatalabs/ys2-intro
8
1
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

fixed the engrish :fir:

Browse source
This commit is contained in:
AArt1256 2025-11-21 22:59:16 +03:00
parent 5304be84b6
commit 1e67d3f98b
2 changed files with 60 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

BIN
assets/tileset_c64.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 6 KiB

71
loader/samples/minexample/minexample.s
View file

@ -593,6 +593,9 @@ intro:
ldx #<darmtower_txt ldx #<darmtower_txt
ldy #>darmtower_txt ldy #>darmtower_txt
jsr upload_text jsr upload_text
ldx #<(darmtower_txt+40)
ldy #>(darmtower_txt+40)
jsr upload_text_bottom
lda #50*5 lda #50*5
sta frame_delay sta frame_delay
@ -601,6 +604,9 @@ intro:
ldx #<empty_txt ldx #<empty_txt
ldy #>empty_txt ldy #>empty_txt
jsr upload_text jsr upload_text
ldx #<empty_txt
ldy #>empty_txt
jsr upload_text_bottom
lda #$0d lda #$0d
sta frame_until sta frame_until
@ -609,6 +615,9 @@ intro:
ldx #<adol_win ldx #<adol_win
ldy #>adol_win ldy #>adol_win
jsr upload_text jsr upload_text
ldx #<(adol_win+40)
ldy #>(adol_win+40)
jsr upload_text_bottom
lda #50*5 lda #50*5
sta frame_delay sta frame_delay
@ -617,6 +626,9 @@ intro:
ldx #<too_bad_txt ldx #<too_bad_txt
ldy #>too_bad_txt ldy #>too_bad_txt
jsr upload_text jsr upload_text
ldx #<empty_txt
ldy #>empty_txt
jsr upload_text_bottom
lda #50*5 lda #50*5
sta frame_delay sta frame_delay
@ -1107,19 +1119,29 @@ liliaheroname: .byte "lilhero", 0
darmtower_txt: darmtower_txt:
.res (40-26)/2, ' ' .res (40-32)/2, ' '
.byte "who silenced darm's tower?" .byte "darm's tower has fallen silent. "
.res (40-26)/2, ' ' .res (40-32)/2, ' '
.res (40-32)/2, ' '
.byte "what should we do? "
.res (40-32)/2, ' '
empty_txt: empty_txt:
.res 40, ' ' .res 40, ' '
.res 40, ' '
adol_win: adol_win:
.res (40-20)/2, ' ' .res (40-28)/2, ' '
.byte "adol must have won.." .byte 34, "it must be adol, let's see "
.res (40-20)/2, ' ' .res (40-28)/2, ' '
.res (40-28)/2, ' '
.byte "how far he'll get!", 34, " "
.res (40-28)/2, ' '
too_bad_txt: too_bad_txt:
.res (40-10)/2, ' ' .res (40-16)/2, ' '
.byte "too bad..." .byte "as you command. "
.res (40-10)/2, ' ' .res (40-16)/2, ' '
upload_text: upload_text:
lda #$34 lda #$34
@ -1133,7 +1155,7 @@ upload_text:
lda (text_ptr), y lda (text_ptr), y
sec sec
sbc #$20 sbc #$20
sta $d348+40, y sta $d348, y
dey dey
bne :- bne :-
@ -1143,7 +1165,34 @@ upload_text:
lda #1 lda #1
ldy #39 ldy #39
: :
sta $db48+40, y sta $db48, y
dey
bne :-
rts
upload_text_bottom:
lda #$34
sta $01
stx text_ptr
sty text_ptr+1
ldy #39
:
lda (text_ptr), y
sec
sbc #$20
sta $d348+40+40, y
dey
bne :-
lda #$35
sta $01
lda #1
ldy #39
:
sta $db48+40+40, y
dey dey
bne :- bne :-
rts rts