Skip to content

Commit

Permalink
streamline broken hills mine defines, see BGforgeNet/Fallout2_Restora…
Browse files Browse the repository at this point in the history
  • Loading branch information
burner1024 committed Sep 15, 2020
1 parent 75232a0 commit 3cc99dd
Showing 1 changed file with 13 additions and 16 deletions.
29 changes: 13 additions & 16 deletions scripts_src/maps/broken2.ssl
Original file line number Diff line number Diff line change
Expand Up @@ -48,14 +48,15 @@ variable manson_hex;
variable Damage_Timer_Started := 0;
variable damage;

#define wearing_protective_gear(x) ( ( obj_pid( get_armor( x) ) == PID_POWERED_ARMOR ) or \
( obj_pid( get_armor( x) ) == PID_HARDENED_POWER_ARMOR ) or \
( obj_pid( get_armor( x) ) == PID_ADVANCED_POWER_ARMOR ) or \
( obj_pid( get_armor( x) ) == PID_ADVANCED_POWER_ARMOR_MK2 ) )
#define wearing_protective_gear(x) \
(obj_pid(get_armor(x)) == PID_POWERED_ARMOR) or \
(obj_pid(get_armor(x)) == PID_HARDENED_POWER_ARMOR) or \
(obj_pid(get_armor(x)) == PID_ADVANCED_POWER_ARMOR) or \
(obj_pid(get_armor(x)) == PID_ADVANCED_POWER_ARMOR_MK2)


#define apply_radon_damage(x) damage := random( 10, 15 ); \
critter_dmg( x, damage, ( DMG_normal_dam BWOR DMG_NOANIMATE BWOR DMG_BYPASS_ARMOR ));
#define apply_radon_damage(x) \
damage := random(10, 15); \
critter_dmg(x, damage, (DMG_normal_dam bwor DMG_NOANIMATE bwor DMG_BYPASS_ARMOR));

export variable frank_obj;
export variable manson_obj;
Expand Down Expand Up @@ -95,8 +96,6 @@ procedure map_enter_p_proc begin
end

procedure map_update_p_proc begin
//set_map_var( MVAR_Came_From_Broken2, 1 ); - comment out by killap

if( dude_elevation == 0) then
Lighting;
else
Expand All @@ -111,20 +110,18 @@ procedure map_update_p_proc begin
move_to( broken_hills_cavein, 9091, 0 );

// Add new blocking hexes to prevent entry into mine.
create_object( PID_BLOCKING_HEX, 9493, 0 );
create_object( PID_BLOCKING_HEX, 9292, 0 );
create_object( PID_BLOCKING_HEX, 9491, 0 );
create_object(PID_BLOCKING_HEX, 9493, 0);
create_object(PID_BLOCKING_HEX, 9292, 0);
create_object(PID_BLOCKING_HEX, 9491, 0);

add_timer_event( self_obj, game_ticks(2), 1);
add_timer_event(self_obj, game_ticks(2), 1);
end

end

//added by killap
procedure map_exit_p_proc begin
set_global_var( GVAR_CAME_FROM_BROKEN2, 1 );
set_global_var(GVAR_CAME_FROM_BROKEN2, 1);
end
//end added

procedure timed_event_p_proc begin
if( fixed_param == 1 ) then begin
Expand Down

0 comments on commit 3cc99dd

Please sign in to comment.