first cheap attempt mountains heights #86

This commit is contained in:
2022-07-09 22:35:12 -04:00
parent 541a7566cb
commit 51975ccfbf
7 changed files with 11 additions and 5 deletions
+1
View File
@@ -22,6 +22,7 @@ MaxWindTable .by 5,20,40,70,99
RoundsTable .by 10,20,30,40,50 RoundsTable .by 10,20,30,40,50
flyDelayTable .by 255,150,75,35,1 flyDelayTable .by 255,150,75,35,1
seppukuTable .by 255, 45,25,15,9 seppukuTable .by 255, 45,25,15,9
mountainsDeltaTableH .by 0,1,3,5,7
;------------------------------------------------ ;------------------------------------------------
LevelNameBeginL ; begins of level names LevelNameBeginL ; begins of level names
.by <NamesOfLevels,<(NamesOfLevels+10),<(NamesOfLevels+20) .by <NamesOfLevels,<(NamesOfLevels+10),<(NamesOfLevels+20)
+1 -1
View File
@@ -6,7 +6,7 @@ screenwidth = screenBytes*8 ; Max screenwidth = 512!!!
margin = 48 ;mountain drawing Y variable margin margin = 48 ;mountain drawing Y variable margin
display = $1010 ;screen takes $2K due to clearing routine display = $1010 ;screen takes $2K due to clearing routine
MaxPlayers = 6 MaxPlayers = 6
maxOptions = 7 ;number of all options maxOptions = 8 ;number of all options
PMOffset = $23 ; P/M to graphics offset PMOffset = $23 ; P/M to graphics offset
napalmRadius = 10 napalmRadius = 10
+1
View File
@@ -110,6 +110,7 @@ OptionsHere
dta d"Rounds : 10 20 30 40 50 " dta d"Rounds : 10 20 30 40 50 "
dta d"Missiles : slug slow norm fast hare " dta d"Missiles : slug slow norm fast hare "
dta d"Seppuku : nevr rare norm oftn alws " dta d"Seppuku : nevr rare norm oftn alws "
dta d"Mountains: NL BE CZ CH NP "
OptionsScreenEnd OptionsScreenEnd
;----------------------------------------------- ;-----------------------------------------------
MoreUp MoreUp
+1 -1
View File
@@ -1038,7 +1038,7 @@ NextPart
lda random lda random
sta delta ; it is after the dot (xxx.delta) sta delta ; it is after the dot (xxx.delta)
lda random lda random
and #$03 ;(max delta) and mountainDelta ;(max delta)
sta delta+1 ; before the dot (delta+1.delta) sta delta+1 ; before the dot (delta+1.delta)
lda random lda random
BIN
View File
Binary file not shown.
+5 -2
View File
@@ -124,6 +124,11 @@ OptionsFinished
lda seppukuTable,y lda seppukuTable,y
sta seppukuVal sta seppukuVal
;8th option (how aggressive are mountains)
ldy OptionsTable+7
lda mountainsDeltaTableH,y
sta mountainDelta
rts rts
;-------- ;--------
; inversing selected option (cursor) ; inversing selected option (cursor)
@@ -1514,8 +1519,6 @@ end_found
rts rts
.endp .endp
;------------------------------- ;-------------------------------
.proc TypeLine4x4 ; .proc TypeLine4x4 ;
;------------------------------- ;-------------------------------
+2 -1
View File
@@ -12,9 +12,10 @@ TanksNames ; DO NOT ZERO - ticket #24
:6 dta d" " :6 dta d" "
;---------------------------------------------------- ;----------------------------------------------------
;Options DO NOT ZERO - ticket #27 ;Options DO NOT ZERO - ticket #27
OptionsTable .by 0,1,2,2,0,1,3 OptionsTable .by 0,1,2,2,0,1,3,2
RoundsInTheGame .by 10 ;how many rounds in the current game RoundsInTheGame .by 10 ;how many rounds in the current game
seppukuVal .by 75 seppukuVal .by 75
mountainDelta .by 3
;---------------------------------------------------- ;----------------------------------------------------
skilltable ; computer controlled players' skills (1-8), 0 - human (no cleaning, ticket #30) skilltable ; computer controlled players' skills (1-8), 0 - human (no cleaning, ticket #30)
.DS [MaxPlayers] .DS [MaxPlayers]