Its test script and its doesnt work getting
Gdialog:: error grabbing text message!
, maybe problem is in other fallout files or mayme too much scripts?
/*
*** Script conwerted to Interplay format by Fallout Script Edytor (by Jargo) ***
*/
#include "C:\gry\Fallout 2 Mapper\scripts\HEADERS\define.h"
//#include "C:\gry\Fallout 2 Mapper\scripts\HEADERS\<TownMapName.h>"
#define NAME SCRIPT_JNKHARRY //Script name from scripts.h
#include "C:\gry\Fallout 2 Mapper\scripts\HEADERS\command.h"
#include "C:\gry\Fallout 2 Mapper\scripts\HEADERS\ModReact.h"
#include "C:\gry\Fallout 2 Mapper\scripts\HEADERS\partybkg.h"
procedure start;
procedure look_at_p_proc;
procedure talk_p_proc;
procedure Node998;
procedure pickup_p_proc;
procedure use_skill_on_p_proc;
procedure combat_p_proc;
procedure damage_p_proc;
procedure critter_p_proc;
procedure map_enter_p_proc;
procedure timed_event_p_proc;
procedure Node001;
procedure Node999;
/*****************************************************************
Local Variables which are saved. All Local Variables need to be
prepended by LVAR_
*****************************************************************/
#define LVAR_Herebefore (4)
#define LVAR_Hostile (5)
#define LVAR_Personal_Enemy (6)
variable Only_Once:=0;
procedure start begin
end
procedure look_at_p_proc
begin
script_overrides;
display_msg("Widzisz farmera.");
end
procedure talk_p_proc begin
start_gdialog(NAME,self_obj,4,-1,-1);
gSay_Start;
call Node001;
gSay_End;
end_dialogue;
end
procedure pickup_p_proc begin
if (source_obj == dude_obj) then begin
set_local_var(LVAR_Hostile,2);
end
end
procedure use_skill_on_p_proc begin
if (action_being_used == SKILL_STEAL) then
if (is_success(roll_vs_skill(dude_obj,action_being_used,0))) then begin
end
end
procedure Node998 begin
set_local_var(LVAR_Hostile,2);
end
procedure combat_p_proc begin
end
procedure damage_p_proc begin
/*si le joueur attaque le npc alors, Node998 est appelée, et donc le joueur est déclaré hostile , et donc dans critter_p_proc le npc attaque le joueur*/
if (source_obj == dude_obj) then begin
call Node998;
end
end
procedure critter_p_proc begin
if ((local_var(LVAR_Hostile) == 2) and self_can_see_dude) then begin
set_local_var(LVAR_Hostile,1);
attack(dude_obj);
end
end
procedure Node001 begin
Reply(100);
NOption(101,Node999,001);
end
procedure Node999 begin
end
procedure map_enter_p_proc begin
Only_Once:=0;
critter_add_trait(self_obj,TRAIT_OBJECT,OBJECT_TEAM_NUM,TEAM_BROKEN_HILLS);
critter_add_trait(self_obj,TRAIT_OBJECT,OBJECT_AI_PACKET,AI_TOUGH_CITIZEN);
if( not( is_loading_game ) ) then begin
add_timer_event( self_obj, game_ticks( random( 10, 11 ) ), 0 );
end
end
procedure timed_event_p_proc begin
if( fixed_param == 0 ) then begin
floater( random( 116, 120 ) );
add_timer_event( self_obj, game_ticks( random( 10, 11 ) ), 0 );
end
end
msg file
{100}{}{Im harry}
{101}{}{okulary}
download script and msg file click pobierz pliki green window to download
https://megawrzuta.pl/download/f046a8206e3c33b70d297e2c6f3cbd0d.html
heres headers/scripts file
https://megawrzuta.pl/download/d73bd1654d7e70c2e6b98200289ee0b9.html
maybe too much scripts 1489 ?