diff --git a/scorch.asm b/scorch.asm index 9389a8a..7c5c601 100644 --- a/scorch.asm +++ b/scorch.asm @@ -15,7 +15,7 @@ ;--------------------------------------------------- .macro build - dta d"1.25" ; number of this build (4 bytes) + dta d"1.26" ; number of this build (4 bytes) .endm .macro RMTSong diff --git a/scorch.bin b/scorch.bin index 98e037c..7ddc409 100644 Binary files a/scorch.bin and b/scorch.bin differ diff --git a/scorch.xex b/scorch.xex index 9f426aa..accaf03 100644 Binary files a/scorch.xex and b/scorch.xex differ diff --git a/textproc.asm b/textproc.asm index 49128ea..99ed067 100644 --- a/textproc.asm +++ b/textproc.asm @@ -1633,6 +1633,27 @@ displayloop1 rts .endp +;-------------------------------------------------------- +.proc DisplayOffensiveTextNr ; + ldx TextNumberOff + lda talk.OffensiveTextTableL,x + sta LineAddress4x4 + lda talk.OffensiveTextTableH,x + sta LineAddress4x4+1 + inx ; the next text + lda talk.OffensiveTextTableH,x + sta temp+1 + lda talk.OffensiveTextTableL,x + sta temp ; opty possible + ; substract address of the next text from previous to get text length + sbw temp LineAddress4x4 temp2 + mva temp2 fx + + ;jsr Display4x4AboveTank + ;rts + ; POZOR !!! +.endp + ;-------------------------------------------------------- .proc Display4x4AboveTank ; ; Displays texts using PutChar4x4 above tank and mountains. @@ -1751,27 +1772,6 @@ DOTOldLowestValue .endp -;-------------------------------------------------------- -.proc DisplayOffensiveTextNr ; - ldx TextNumberOff - lda talk.OffensiveTextTableL,x - sta LineAddress4x4 - lda talk.OffensiveTextTableH,x - sta LineAddress4x4+1 - inx ; the next text - lda talk.OffensiveTextTableH,x - sta temp+1 - lda talk.OffensiveTextTableL,x - sta temp ; opty possible - ; substract address of the next text from previous to get text length - sbw temp LineAddress4x4 temp2 - mva temp2 fx - - ;jsr Display4x4AboveTank - ;rts - ; POZOR !!! -.endp - ;-------------------------------------------------------- .proc DisplayTankNameAbove ; lda tankNr