Added option to select random mountains for each round.

This commit is contained in:
Pecusx
2023-07-31 14:00:18 +02:00
parent 376f08fe35
commit fb29667ea2
11 changed files with 35 additions and 12 deletions
+1 -1
View File
@@ -13,7 +13,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 " dta d"Mountain : NL BE CZ CH NP "
dta d"Walls : none wrap bump boxy rand " dta d"Walls : none wrap bump boxy rand "
;; 01234567890123456789012345678901 ;; 01234567890123456789012345678901
; dta d"Players: 2 3 4 5 6 " ; dta d"Players: 2 3 4 5 6 "
+5 -5
View File
@@ -69,6 +69,8 @@ MoreDown
dta 93,93,93 dta 93,93,93
dta d" more " dta d" more "
dta 93,93,93 dta 93,93,93
; dta d" " ; common part of text and empty line :)
EmptyLine
dta d" " dta d" "
WeaponsDescription WeaponsDescription
; 0123456789012345678901234567890123456789 ; 0123456789012345678901234567890123456789
@@ -105,8 +107,6 @@ ActivateDescription
dta d"FIRE"* dta d"FIRE"*
dta d": Finish " dta d": Finish "
.ENDIF .ENDIF
EmptyLine
dta d" "
;--------------------------------------------------- ;---------------------------------------------------
OptionsTitle OptionsTitle
.IF TARGET = 800 .IF TARGET = 800
@@ -115,13 +115,13 @@ OptionsTitle
dta d" scorch supersystem "* dta d" scorch supersystem "*
.ENDIF .ENDIF
DifficultyTitle DifficultyTitle
dta d" difficulty "* dta d" difficulty"* ; " " 3 bytes - common part of 2 texts
GameOverTitle
dta d" game over "*
PurchaseTitle PurchaseTitle
dta d"purchase weapons" dta d"purchase weapons"
InventoryTitle InventoryTitle
dta d"activate weapons"* dta d"activate weapons"*
GameOverTitle
dta d" game over "*
GameOverTitle2 GameOverTitle2
dta d" Player Points Hits Earned Money " dta d" Player Points Hits Earned Money "
;----------------------------------------------------- ;-----------------------------------------------------
+9 -1
View File
@@ -68,7 +68,8 @@
mva #0 OptionsY mva #0 OptionsY
OptionsMainLoop OptionsMainLoop
lda RandomMountains
sta OptionsHere+288
lda WindChangeInRound lda WindChangeInRound
sta OptionsHere+128 sta OptionsHere+128
lda FastSoilDown lda FastSoilDown
@@ -146,6 +147,13 @@ NotWind
sta FastSoilDown sta FastSoilDown
rts rts
NotGravity NotGravity
cmp #$07
bne NoMountains
lda RandomMountains
eor #$1f ; '?' character
sta RandomMountains
rts
NoMountains
ldy GradientNr ldy GradientNr
iny iny
cpy #$03 cpy #$03
+1
View File
@@ -33,6 +33,7 @@ Select options with cursor keys or a joystick.
The [TAB], [SELECT] or second joystick button (supported Joy 2B+ standard or compatible), and on the Atari 5200 console, the [5] controller key change the color of the mountains (3 versions to choose from). The [TAB], [SELECT] or second joystick button (supported Joy 2B+ standard or compatible), and on the Atari 5200 console, the [5] controller key change the color of the mountains (3 versions to choose from).
If the cursor indicates the wind strength selection option "Wind" change the way the wind strength is drawn from "every round" to "every turn" and vice versa. Drawing every turn is indicated by the "?" sign next to the word "Wind". If the cursor indicates the wind strength selection option "Wind" change the way the wind strength is drawn from "every round" to "every turn" and vice versa. Drawing every turn is indicated by the "?" sign next to the word "Wind".
If the cursor indicates the gravity selection option "Gravity" changes the procedure of falling the ground to a less impressive but faster one, and vice versa. The selection of fast ground fall is indicated by the letter "f" next to the word "Gravity". If the cursor indicates the gravity selection option "Gravity" changes the procedure of falling the ground to a less impressive but faster one, and vice versa. The selection of fast ground fall is indicated by the letter "f" next to the word "Gravity".
If the cursor points to the option of selecting the height of the mountains "Mountain" toggles the option of changing the height of the mountains every round. Drawing every round is indicated by the "?" sign next to the word "Mountain".
The [RETURN] key or a joystick button moves to the next screen. The [RETURN] key or a joystick button moves to the next screen.
+1
View File
@@ -37,6 +37,7 @@ Select options with cursor keys or a controller.
The [TAB], [SELECT] or second controller button (supported Joy 2B+ standard or compatible) key change the color of the mountains (3 versions to choose from). The [TAB], [SELECT] or second controller button (supported Joy 2B+ standard or compatible) key change the color of the mountains (3 versions to choose from).
If the cursor indicates the wind strength selection option "Wind" change the way the wind strength is drawn from "every round" to "every turn" and vice versa. Drawing every turn is indicated by the "?" sign next to the word "Wind". If the cursor indicates the wind strength selection option "Wind" change the way the wind strength is drawn from "every round" to "every turn" and vice versa. Drawing every turn is indicated by the "?" sign next to the word "Wind".
If the cursor indicates the gravity selection option "Gravity" changes the procedure of falling the ground to a less impressive but faster one, and vice versa. The selection of fast ground fall is indicated by the letter "f" next to the word "Gravity". If the cursor indicates the gravity selection option "Gravity" changes the procedure of falling the ground to a less impressive but faster one, and vice versa. The selection of fast ground fall is indicated by the letter "f" next to the word "Gravity".
If the cursor points to the option of selecting the height of the mountains "Mountain" toggles the option of changing the height of the mountains every round. Drawing every round is indicated by the "?" sign next to the word "Mountain".
The [RETURN] key or a controller button moves to the next screen. The [RETURN] key or a controller button moves to the next screen.
+2
View File
@@ -45,6 +45,8 @@ Jeśli kursor wskazuje opcję wyboru siły wiatru "Wind" zmienia sposób losowan
Jeśli kursor wskazuje opcję wyboru siły ciążenia "Gravity" zmienia procedurę opadania ziemi na mniej efektowną, ale szybszą i odwrotnie. Wybranie szybkiego opadania ziemi sygnalizowane jest literą "f" przy słowie "Gravity". Jeśli kursor wskazuje opcję wyboru siły ciążenia "Gravity" zmienia procedurę opadania ziemi na mniej efektowną, ale szybszą i odwrotnie. Wybranie szybkiego opadania ziemi sygnalizowane jest literą "f" przy słowie "Gravity".
Jeśli kursor wskazuje opcję wyboru wysokości gór "Mountain" przełącza opcję zmiennej co rundę wysokości gór. Losowanie co rundę jest sygnalizowane znakiem "?" przy słowie "Mountain".
Klawisz [RETURN] lub przycisk joysticka przechodzi do następnego ekranu. Klawisz [RETURN] lub przycisk joysticka przechodzi do następnego ekranu.
+2 -2
View File
@@ -6,7 +6,7 @@
dta d"YOU'RE TOAST!"^ dta d"YOU'RE TOAST!"^
dta d"BANZAI!"^ dta d"BANZAI!"^
dta d"FROM HELL'S HEART I STAB AT THEE..."^ dta d"FROM HELL'S HEART I STAB AT THEE..."^
dta d"I DIDN'T DO IT. NOBODY SAW ME DO IT."^ dta d"I DIDN'T DO IT. I'M NOT HERE."^
dta d"TAKE A HIKE!"^ dta d"TAKE A HIKE!"^
dta d"YOU'RE DEAD MEAT."^ dta d"YOU'RE DEAD MEAT."^
dta d"MAKE MY DAY."^ dta d"MAKE MY DAY."^
@@ -65,7 +65,7 @@
dta d"EEEK!"^ dta d"EEEK!"^
dta d"AACCH!"^ dta d"AACCH!"^
dta d"I HATE IT WHEN THAT HAPPENS."^ dta d"I HATE IT WHEN THAT HAPPENS."^
dta d"ONE DIRECT HIT CAN RUIN YOUR WHOLE DAY."^ dta d"ONE HIT CAN RUIN YOUR WHOLE DAY."^
dta d"OH NO!"^ dta d"OH NO!"^
dta d"NOT ME!"^ dta d"NOT ME!"^
dta d"OUCH."^ dta d"OUCH."^
+10
View File
@@ -228,6 +228,15 @@ SettingEnergies
dex dex
bpl SettingEnergies bpl SettingEnergies
; set mountain type if ...
lda RandomMountains
beq noRandomMountains
@ ldy RANDOM
cpy #5
bcs @-
jsr SetVariablesFromOptions.setMountainsType
noRandomMountains
;generating the new landscape ;generating the new landscape
jsr PMoutofScreen ;let P/M disappear jsr PMoutofScreen ;let P/M disappear
jsr clearscreen ;let the screen be clean jsr clearscreen ;let the screen be clean
@@ -1216,6 +1225,7 @@ SetRandomWalls
;8th option (how aggressive are mountains) ;8th option (how aggressive are mountains)
ldy OptionsTable+7 ldy OptionsTable+7
setMountainsType
lda mountainsDeltaTableH,y lda mountainsDeltaTableH,y
sta mountainDeltaH sta mountainDeltaH
lda mountainsDeltaTableL,y lda mountainsDeltaTableL,y
+3 -2
View File
@@ -26,7 +26,7 @@
;--------------------------------------------------- ;---------------------------------------------------
.macro build .macro build
dta d"1.32" ; number of this build (4 bytes) dta d"1.33" ; number of this build (4 bytes)
.endm .endm
.macro RMTSong .macro RMTSong
@@ -38,13 +38,14 @@
icl 'definitions.asm' icl 'definitions.asm'
;--------------------------------------------------- ;---------------------------------------------------
FirstZpageVariable = $54 FirstZpageVariable = $53
.zpvar DliColorBack .byte = FirstZpageVariable .zpvar DliColorBack .byte = FirstZpageVariable
.zpvar ClearSky .byte ; $ff - Crear sky during drawmountains, 0 - no clear sky .zpvar ClearSky .byte ; $ff - Crear sky during drawmountains, 0 - no clear sky
.zpvar PaddleState .byte ; old state 2nd button for 2 buttons joysticks .zpvar PaddleState .byte ; old state 2nd button for 2 buttons joysticks
.zpvar GradientNr .byte .zpvar GradientNr .byte
.zpvar GradientColors .word .zpvar GradientColors .word
.zpvar WindChangeInRound .byte ; wind change after each turn (not round only) flag - (0 - round only, >0 - each turn) .zpvar WindChangeInRound .byte ; wind change after each turn (not round only) flag - (0 - round only, >0 - each turn)
.zpvar RandomMountains .byte ; mountains type change after each turn flag - (0 - round only, >0 - each turn)
.zpvar FastSoilDown .byte ; 0 - standard, >0 - fast .zpvar FastSoilDown .byte ; 0 - standard, >0 - fast
.zpvar JoystickNumber .byte .zpvar JoystickNumber .byte
.zpvar LazyFlag .byte ; 7 bit - run Lazy Darwin, 6 bit - run Lazy Boy or Darwin (!) after inventory, 0 - nothing .zpvar LazyFlag .byte ; 7 bit - run Lazy Darwin, 6 bit - run Lazy Boy or Darwin (!) after inventory, 0 - nothing
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.