Pecus/scorch_src
1
0
Fork 0
mirror of https://github.com/Pecusx/scorch_src.git synced 2026-05-21 21:34:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

Cyborgs prefer to kill humans :)

Browse Source
This commit is contained in:
Pecusx
2022-08-25 13:18:29 +02:00
parent 07a2585147
commit e70752c12d
3 changed files with 16 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
ai.asm
+14 -3
View File
@@ -324,6 +324,7 @@ NoUseDefensive
; use defensives like Tosser ; use defensives like Tosser
jsr TosserDefensives jsr TosserDefensives
; now select best target ; now select best target
mva #$00 PreferHumansFlag
jsr FindBestTarget3 jsr FindBestTarget3
sty TargetTankNr sty TargetTankNr
; aiming ; aiming
@@ -364,6 +365,7 @@ HighForce
; use defensives like Tosser ; use defensives like Tosser
jsr TosserDefensives jsr TosserDefensives
; now select best target ; now select best target
mva #$00 PreferHumansFlag
jsr FindBestTarget3 jsr FindBestTarget3
sty TargetTankNr sty TargetTankNr
; aiming ; aiming
@@ -403,6 +405,7 @@ HighForce
; use defensives like Tosser ; use defensives like Tosser
jsr TosserDefensives jsr TosserDefensives
; now select best target ; now select best target
mva #$ff PreferHumansFlag
jsr FindBestTarget3 jsr FindBestTarget3
sty TargetTankNr sty TargetTankNr
; aiming ; aiming
@@ -441,7 +444,7 @@ HighForce
; direcion of shoot in A (0 - left, >0 - right) ; direcion of shoot in A (0 - left, >0 - right)
;---------------------------------------------- ;----------------------------------------------
jsr MakeLowResDistances jsr MakeLowResDistances
lda #101 lda #202
sta temp2 ; max possible energy sta temp2 ; max possible energy
lda #0 lda #0
sta tempor2 ; direction of shoot sta tempor2 ; direction of shoot
@@ -455,8 +458,15 @@ loop01
lda eXistenZ,y lda eXistenZ,y
beq skipThisPlayer beq skipThisPlayer
;enemy on the right bit PreferHumansFlag
lda Energy,y bpl NoPreferHumans
lda skilltable,y
beq ItIsHuman
lda #100
ItIsHuman
NoPreferHumans
clc
adc Energy,y ; if robotank energy=energy+100
cmp temp2 ; lowest cmp temp2 ; lowest
bcs lowestIsLower bcs lowestIsLower
sta temp2 sta temp2
@@ -465,6 +475,7 @@ loop01
lda LowResDistances,x lda LowResDistances,x
cmp LowResDistances,y cmp LowResDistances,y
bcs EnemyOnTheLeft bcs EnemyOnTheLeft
; enemy on right
inc tempor2 ; set direction to right inc tempor2 ; set direction to right
EnemyOnTheLeft EnemyOnTheLeft
scorch.xex
BIN
View File
Binary file not shown.
variables.asm
+1
View File
@@ -206,6 +206,7 @@ EndOfTheFallFlag .DS 1 ; in case of the infinite fall
;Parachute .DS 1 ; are you insured with parachute? ;Parachute .DS 1 ; are you insured with parachute?
FloatingAlt .DS 1 ; floating tank altitude FloatingAlt .DS 1 ; floating tank altitude
FunkyWallFlag = FloatingAlt ; reuse this variable in different weapon (Funky Bomb)! FunkyWallFlag = FloatingAlt ; reuse this variable in different weapon (Funky Bomb)!
PreferHumansFlag = FloatingAlt ; second reuse in AI Aim proc
;---------------------------------------------------- ;----------------------------------------------------
;Flight ;Flight
;variables for 5 missiles (used for mirv) ;variables for 5 missiles (used for mirv)