The tanks talk to each other again.
This commit is contained in:
+1
-1
@@ -15,7 +15,7 @@
|
|||||||
|
|
||||||
;---------------------------------------------------
|
;---------------------------------------------------
|
||||||
.macro build
|
.macro build
|
||||||
dta d"1.25" ; number of this build (4 bytes)
|
dta d"1.26" ; number of this build (4 bytes)
|
||||||
.endm
|
.endm
|
||||||
|
|
||||||
.macro RMTSong
|
.macro RMTSong
|
||||||
|
|||||||
BIN
Binary file not shown.
BIN
Binary file not shown.
+21
-21
@@ -1633,6 +1633,27 @@ displayloop1
|
|||||||
rts
|
rts
|
||||||
.endp
|
.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 ;
|
.proc Display4x4AboveTank ;
|
||||||
; Displays texts using PutChar4x4 above tank and mountains.
|
; Displays texts using PutChar4x4 above tank and mountains.
|
||||||
@@ -1751,27 +1772,6 @@ DOTOldLowestValue
|
|||||||
|
|
||||||
.endp
|
.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 ;
|
.proc DisplayTankNameAbove ;
|
||||||
lda tankNr
|
lda tankNr
|
||||||
|
|||||||
Reference in New Issue
Block a user