starred/scorch_src
1
0
Fork 0
Code Issues 37 Packages Projects Releases 10 Wiki Activity

Optimization (10b saved :) )

Browse Source
This commit is contained in:
Pecusx
2022-09-01 15:06:57 +02:00
parent c4543208bf
commit aa02b10bda
2 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
scorch.xex
BIN
View File
Binary file not shown.
textproc.asm
+6 -6
View File
@@ -789,18 +789,18 @@ Suprise ; get a random weapon
cmp #51 ; defensive weapons are less likely because they are more expensive - probability 255:51 (5:1) cmp #51 ; defensive weapons are less likely because they are more expensive - probability 255:51 (5:1)
bcc GetRandomDefensive bcc GetRandomDefensive
GetRandomOffensive GetRandomOffensive
randomize ind_Missile________ ind_Laser__________ randomize ind_Missile________ last_offensive_____
cmp #ind_Buy_me_________ cmp #ind_Buy_me_________
beq GetRandomOffensive beq GetRandomOffensive
tay tay
lda WeaponUnits,y ; check if weapon exist ; lda WeaponUnits,y ; check if weapon exist
beq GetRandomOffensive ; beq GetRandomOffensive
bne NoSuprise ; Y always <> 0 bne NoSuprise ; Y always <> 0
GetRandomDefensive GetRandomDefensive
randomize ind_Battery________ ind_Nuclear_Winter_ randomize ind_Battery________ last_defensive_____
tay tay
lda WeaponUnits,y ; check if weapon exist ; lda WeaponUnits,y ; check if weapon exist
beq GetRandomDefensive ; beq GetRandomDefensive
NoSuprise NoSuprise
lda TanksWeaponsTableL,x lda TanksWeaponsTableL,x