fixed the engrish :fir:

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

BIN
assets/tileset_c64.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 6 KiB

View file

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