stevenhowes/TheEscape
1
0
Fork 0
mirror of https://github.com/stevenhowes/TheEscape.git synced 2026-05-27 00:03:25 +01:00
Code Issues Packages Projects Releases Wiki Activity

Offset locations for phaser, targetting boxes for phasers

Browse Source
This commit is contained in:
stevenhowes
2021-02-03 22:19:44 +00:00
parent 213c8bfda5
commit 13b13832bb
2 changed files with 28 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
!TheEscape/!RunImage,ffb
BIN
View File
Binary file not shown.
!TheEscape/!RunImage,ffb.bas
+28 -3
View File
@@ -28,6 +28,12 @@ DEF PROC_main
DIM PlayerHitbox%(3) DIM PlayerHitbox%(3)
PlayerHitbox%() = 0,0,60,81 PlayerHitbox%() = 0,0,60,81
DIM PlayerPhaserOffset%(1,1)
PlayerPhaserOffset%(0,X) = 20
PlayerPhaserOffset%(0,Y) = 75
PlayerPhaserOffset%(1,X) = 40
PlayerPhaserOffset%(1,Y) = 75
LeftID% = -1 LeftID% = -1
RightID% = -1 RightID% = -1
@@ -98,6 +104,7 @@ DEF PROC_main
PROCenemy_ship_move PROCenemy_ship_move
PROCenemy_ship_collide_player PROCenemy_ship_collide_player
PROCenemy_ship_collide_npc PROCenemy_ship_collide_npc
PROCplayer_arc_calculatetarget
REM Still not sure about this bollocks, but it does seem to work now REM Still not sure about this bollocks, but it does seem to work now
SYS "OS_Byte",19 SYS "OS_Byte",19
@@ -114,7 +121,7 @@ DEF PROC_main
REM Player REM Player
PROCplayer_ship_draw PROCplayer_ship_draw
PROCplayer_arc_calculatetarget PROCplayer_target_draw
PROCenemy_ship_draw PROCenemy_ship_draw
@@ -332,6 +339,24 @@ DEF PROCinputs
ENDIF ENDIF
ENDPROC ENDPROC
DEF PROCplayer_target_draw
IF LeftID% >= 0 THEN
REM LINE PlayerLocation%(X) + PlayerPhaserOffset%(0,X), PlayerLocation%(Y) + PlayerPhaserOffset%(0,Y), EnemyLocations%(LeftID%,X), EnemyLocations%(LeftID%,Y)
RECT EnemyLocations%(LeftID%,X) + EnemyHitbox%(EnemyHitboxID%(LeftID%),X) - 10, EnemyLocations%(LeftID%,1) + EnemyHitbox%(EnemyHitboxID%(LeftID%),1) - 10, EnemyHitbox%(EnemyHitboxID%(LeftID%),2) + 20, EnemyHitbox%(EnemyHitboxID%(LeftID%),3) + 20
RECT EnemyLocations%(LeftID%,X) + EnemyHitbox%(EnemyHitboxID%(LeftID%),X) - 8, EnemyLocations%(LeftID%,1) + EnemyHitbox%(EnemyHitboxID%(LeftID%),1) - 8, EnemyHitbox%(EnemyHitboxID%(LeftID%),2) + 16, EnemyHitbox%(EnemyHitboxID%(LeftID%),3) + 16
ENDIF
IF RightID% >= 0 THEN
REM LINE PlayerLocation%(X) + PlayerPhaserOffset%(1,X), PlayerLocation%(Y) + PlayerPhaserOffset%(1,Y), EnemyLocations%(RightID%,X), EnemyLocations%(RightID%,Y)
RECT EnemyLocations%(RightID%,X) + EnemyHitbox%(EnemyHitboxID%(RightID%),X) -10, EnemyLocations%(RightID%,1) + EnemyHitbox%(EnemyHitboxID%(RightID%),1) -10, EnemyHitbox%(EnemyHitboxID%(RightID%),2) +20, EnemyHitbox%(EnemyHitboxID%(RightID%),3) +20
RECT EnemyLocations%(RightID%,X) + EnemyHitbox%(EnemyHitboxID%(RightID%),X) -8, EnemyLocations%(RightID%,1) + EnemyHitbox%(EnemyHitboxID%(RightID%),1) -8, EnemyHitbox%(EnemyHitboxID%(RightID%),2) +16, EnemyHitbox%(EnemyHitboxID%(RightID%),3) +16
ENDIF
ENDPROC
REM Debug prints REM Debug prints
DEF PROCdebugoutput DEF PROCdebugoutput
MOVE 0,500 MOVE 0,500
@@ -353,11 +378,11 @@ DEF PROCdebugoutput
RECT PlayerLocation%(X) + PlayerHitbox%(0), PlayerLocation%(Y) + PlayerHitbox%(1), PlayerHitbox%(2), PlayerHitbox%(3) RECT PlayerLocation%(X) + PlayerHitbox%(0), PlayerLocation%(Y) + PlayerHitbox%(1), PlayerHitbox%(2), PlayerHitbox%(3)
IF LeftID% >= 0 THEN IF LeftID% >= 0 THEN
LINE PlayerLocation%(X), PlayerLocation%(Y), EnemyLocations%(LeftID%,X), EnemyLocations%(LeftID%,Y) LINE PlayerLocation%(X) + PlayerPhaserOffset%(0,X), PlayerLocation%(Y) + PlayerPhaserOffset%(0,Y), EnemyLocations%(LeftID%,X), EnemyLocations%(LeftID%,Y)
ENDIF ENDIF
IF RightID% >= 0 THEN IF RightID% >= 0 THEN
LINE PlayerLocation%(X), PlayerLocation%(Y), EnemyLocations%(RightID%,X), EnemyLocations%(RightID%,Y) LINE PlayerLocation%(X) + PlayerPhaserOffset%(1,X), PlayerLocation%(Y) + PlayerPhaserOffset%(1,Y), EnemyLocations%(RightID%,X), EnemyLocations%(RightID%,Y)
ENDIF ENDIF
ENDPROC ENDPROC