mirror of
https://github.com/Pecusx/scorch_src.git
synced 2026-05-20 22:33:43 +02:00
Added option to select random mountains for each round.
This commit is contained in:
@@ -13,7 +13,7 @@ OptionsHere
|
||||
dta d"Rounds : 10 20 30 40 50 "
|
||||
dta d"Missiles : slug slow norm fast hare "
|
||||
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 "
|
||||
;; 01234567890123456789012345678901
|
||||
; dta d"Players: 2 3 4 5 6 "
|
||||
|
||||
@@ -69,6 +69,8 @@ MoreDown
|
||||
dta 93,93,93
|
||||
dta d" more "
|
||||
dta 93,93,93
|
||||
; dta d" " ; common part of text and empty line :)
|
||||
EmptyLine
|
||||
dta d" "
|
||||
WeaponsDescription
|
||||
; 0123456789012345678901234567890123456789
|
||||
@@ -105,8 +107,6 @@ ActivateDescription
|
||||
dta d"FIRE"*
|
||||
dta d": Finish "
|
||||
.ENDIF
|
||||
EmptyLine
|
||||
dta d" "
|
||||
;---------------------------------------------------
|
||||
OptionsTitle
|
||||
.IF TARGET = 800
|
||||
@@ -115,13 +115,13 @@ OptionsTitle
|
||||
dta d" scorch supersystem "*
|
||||
.ENDIF
|
||||
DifficultyTitle
|
||||
dta d" difficulty "*
|
||||
dta d" difficulty"* ; " " 3 bytes - common part of 2 texts
|
||||
GameOverTitle
|
||||
dta d" game over "*
|
||||
PurchaseTitle
|
||||
dta d"purchase weapons"
|
||||
InventoryTitle
|
||||
dta d"activate weapons"*
|
||||
GameOverTitle
|
||||
dta d" game over "*
|
||||
GameOverTitle2
|
||||
dta d" Player Points Hits Earned Money "
|
||||
;-----------------------------------------------------
|
||||
|
||||
+9
-1
@@ -68,7 +68,8 @@
|
||||
mva #0 OptionsY
|
||||
|
||||
OptionsMainLoop
|
||||
|
||||
lda RandomMountains
|
||||
sta OptionsHere+288
|
||||
lda WindChangeInRound
|
||||
sta OptionsHere+128
|
||||
lda FastSoilDown
|
||||
@@ -146,6 +147,13 @@ NotWind
|
||||
sta FastSoilDown
|
||||
rts
|
||||
NotGravity
|
||||
cmp #$07
|
||||
bne NoMountains
|
||||
lda RandomMountains
|
||||
eor #$1f ; '?' character
|
||||
sta RandomMountains
|
||||
rts
|
||||
NoMountains
|
||||
ldy GradientNr
|
||||
iny
|
||||
cpy #$03
|
||||
|
||||
@@ -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).
|
||||
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 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.
|
||||
|
||||
|
||||
@@ -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).
|
||||
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 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.
|
||||
|
||||
|
||||
@@ -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 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.
|
||||
|
||||
|
||||
|
||||
+2
-2
@@ -6,7 +6,7 @@
|
||||
dta d"YOU'RE TOAST!"^
|
||||
dta d"BANZAI!"^
|
||||
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"YOU'RE DEAD MEAT."^
|
||||
dta d"MAKE MY DAY."^
|
||||
@@ -65,7 +65,7 @@
|
||||
dta d"EEEK!"^
|
||||
dta d"AACCH!"^
|
||||
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"NOT ME!"^
|
||||
dta d"OUCH."^
|
||||
|
||||
@@ -228,6 +228,15 @@ SettingEnergies
|
||||
dex
|
||||
bpl SettingEnergies
|
||||
|
||||
; set mountain type if ...
|
||||
lda RandomMountains
|
||||
beq noRandomMountains
|
||||
@ ldy RANDOM
|
||||
cpy #5
|
||||
bcs @-
|
||||
jsr SetVariablesFromOptions.setMountainsType
|
||||
noRandomMountains
|
||||
|
||||
;generating the new landscape
|
||||
jsr PMoutofScreen ;let P/M disappear
|
||||
jsr clearscreen ;let the screen be clean
|
||||
@@ -1216,6 +1225,7 @@ SetRandomWalls
|
||||
|
||||
;8th option (how aggressive are mountains)
|
||||
ldy OptionsTable+7
|
||||
setMountainsType
|
||||
lda mountainsDeltaTableH,y
|
||||
sta mountainDeltaH
|
||||
lda mountainsDeltaTableL,y
|
||||
|
||||
+3
-2
@@ -26,7 +26,7 @@
|
||||
|
||||
;---------------------------------------------------
|
||||
.macro build
|
||||
dta d"1.32" ; number of this build (4 bytes)
|
||||
dta d"1.33" ; number of this build (4 bytes)
|
||||
.endm
|
||||
|
||||
.macro RMTSong
|
||||
@@ -38,13 +38,14 @@
|
||||
icl 'definitions.asm'
|
||||
;---------------------------------------------------
|
||||
|
||||
FirstZpageVariable = $54
|
||||
FirstZpageVariable = $53
|
||||
.zpvar DliColorBack .byte = FirstZpageVariable
|
||||
.zpvar ClearSky .byte ; $ff - Crear sky during drawmountains, 0 - no clear sky
|
||||
.zpvar PaddleState .byte ; old state 2nd button for 2 buttons joysticks
|
||||
.zpvar GradientNr .byte
|
||||
.zpvar GradientColors .word
|
||||
.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 JoystickNumber .byte
|
||||
.zpvar LazyFlag .byte ; 7 bit - run Lazy Darwin, 6 bit - run Lazy Boy or Darwin (!) after inventory, 0 - nothing
|
||||
|
||||
BIN
Binary file not shown.
BIN
Binary file not shown.
Reference in New Issue
Block a user