*****_dialog

-------------------Potap bazarit---------------------------

function bazarit()
db.actor:give_info_portion("proba_dial")
end

----------------------------------byk2--------------------

[logic]

active = walker

[walker]
on_info = {+goo2} walker@b
path_walk = byk_walk1
path_look = byk_look1
danger = danger_ignore
meet = no_meet

[walker@b]
path_walk = byk_walk2
path_look = byk_look2
on_info = {+goo3} walker@g
meet = no_meet

[danger_ignore]
ignore_distance =0

[walker@g]
path_walk = byk_walk3
path_look = byk_look3
on_actor_dist_le = 3| nil {+proba_dial} %=on_talk%
meet = meet

[meet]
victim = 3|actor
victim_wpn = 3|actor
use = true
use_wpn = true

------------------------------alife_l01_escape----------------------

[357]

; cse_abstract properties
section_name = space_restrictor
name = zvuk17
s_rp = 0
position = 30.9041881561279,5.60954523086548,411.938323974609
direction = 0, 0, 0
version = 118
script_version = 6

; cse_alife_object properties
game_vertex_id = 198
level_vertex_id = 311316
object_flags = 0xffffff3e
custom_data = <<END
[logic]
active = sr_idle

[sr_idle]
on_actor_inside = nil %=****_dialog.bazarit%
single = true
END

; cse_shape properties
shapes = shape0
shape0:type = sphere
shape0:offset = 0,0,0
shape0:radius = 4.0199890136719

; cse_alife_space_restrictor properties
restrictor_type = 0

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

--------------------------info_*******------------------------------------

<info_portion id="proba_dial"></info_portion>

------------------character desc--------------------------

<specific_character id="stalker_byk2" team_default = "1">
<name>Пот</name>
<icon>ui_npc_u_stalker_neytral_hood_uzor</icon>
<bio>stalker_mochny2_bio</bio>

<class>stalker_byk2</class>
<community>stalker</community> <terrain_sect>stalker_terrain</terrain_sect>

<rank>600</rank>
<reputation>100</reputation>
<snd_config>characters_voice\human_01\dolg\</snd_config>

<crouch_type>1</crouch_type>

<panic_treshold>0</panic_treshold>

<visual>actors\neytral\stalker_neytral_exoskeleton</visual>
<supplies>
[spawn] \n
vodka\n
wpn_groza \n
ammo_9x39_ap =10\n
medkit_army = 1 \n

</supplies>

#include "gameplay\character_criticals_4.xml"

<start_dialog>hello_dialog</start_dialog>
<actor_dialog>dm_cool_info_dialog</actor_dialog>
<actor_dialog>dm_help_wounded_medkit_dialog</actor_dialog>

</specific_character>

------------------------------log--------------------------

* MEMORY USAGE: 288325 K
! Cannot find saved game ~~~ object 'Потап': pick_section_from_condlist: function 'on_talk' is not defined in xr_effects.script
* Log file has been saved successfully!

FATAL ERROR

[error]Expression : fatal error
[error]Function : CScriptEngine::lua_error
[error]File : E:\stalker\patch_1_0004\xr_3da\xrGame\script_engine.cpp
[error]Line : 73
[error]Description : <no expression>
[error]Arguments : LUA error: ...shadow of chernobyl\gamedata\scripts\xr_logic.script:703: attempt to call local 'func' (a nil value)

stack trace:

function create_anomaly( zone_name, zone_position, zone_radius, lv, gv )
local sobj=alife():create(zone_name,zone_position, lv, gv )
local packet=net_packet()
packet:w_begin(0)
sobj:STATE_Write(packet)
packet:r_seek(2)
local game_vertex_id=packet:r_u16()
local cse_alife_object__unk1_f32=packet:r_float()
local cse_alife_object__unk2_u32=packet:r_s32()
local level_vertex_id=packet:r_s32()
local object_flags=packet:r_s32()
local custom_data=packet:r_stringZ()
local story_id=packet:r_s32()
local cse_alife_object__unk3_u32=packet:r_s32()
local shape_count=packet:r_u8()
for i=1,shape_count do
local shape_type=packet:r_u8()
if shape_type == 0 then
local center=packet:r_vec3()
local radius=packet:r_float()
else
local box=packet:r_matrix()
end
end
local restrictor_type=packet:r_u8()
local cse_alife_custom_zone__unk1_f32=packet:r_float()
local cse_alife_custom_zone__unk2_u32=packet:r_s32()
local on_off_mode_enabled_time=packet:r_s32()
local on_off_mode_disabled_time=packet:r_s32()
local on_off_mode_shift_time=packet:r_s32()
local offline_interactive_radius=packet:r_float()
local artefact_spawn_places_count=packet:r_u16()
local cse_alife_anomalous_zone__unk1_u32=packet:r_s32()
local last_spawn_time_present=packet:r_u8()
packet:w_u16(game_vertex_id)
packet:w_float(cse_alife_object__unk1_f32)
packet:w_s32(cse_alife_object__unk2_u32)
packet:w_s32(level_vertex_id)
packet:w_s32(object_flags)
packet:w_stringZ(custom_data)
packet:w_s32(story_id)
packet:w_s32(cse_alife_object__unk3_u32)
packet:w_u8(1)
packet:w_u8(0)
local sphere_center=vector()
sphere_center:set(0, 0, 0)
packet:w_vec3(sphere_center)
radius=zone_radius
packet:w_float(radius)
packet:w_u8(restrictor_type)
packet:w_float(cse_alife_custom_zone__unk1_f32)
cse_alife_custom_zone__unk2_u32=bit_not(0)
packet:w_s32(cse_alife_custom_zone__unk2_u32)
packet:w_s32(on_off_mode_enabled_time)
packet:w_s32(on_off_mode_disabled_time)
packet:w_s32(on_off_mode_shift_time)
packet:w_float(offline_interactive_radius)
packet:w_u16(artefact_spawn_places_count)
packet:w_s32(cse_alife_anomalous_zone__unk1_u32)
sobj:STATE_Read(packet, packet:w_tell()-packet:r_tell())
return sobj
end

function get_story_id_not_replay()
local ST
ST = xr_logic.pstor_retrieve(db.actor, "ScriptAnomId", 0)
if type(ST) ~= "number" or ST == nil then
ST = 9000
xr_logic.pstor_store(db.actor, "ScriptAnomId", ST)
end
if type(ST) == "number" or ST ~= nil then
ST = ST + 1
xr_logic.pstor_store(db.actor, "ScriptAnomId", ST)
end
return tonumber(ST)
end

function create_anom(name_anom, posit_anom, lvid_anom, gvid_anom, radius_anom, power_anom)
local obj = alife():create(name_anom, posit_anom, lvid_anom, gvid_anom)

-----------------------write----------------------
local packet = net_packet()
obj:STATE_Write(packet)

-----------------------load-----------------------
-- cse_alife_object
local game_vertex_id = packet:r_u16()
local distance = packet:r_float()
local direct_control = packet:r_u32()
local level_vertex_id = packet:r_u32()
local object_flags = packet:r_u32()
local custom_data = packet:r_stringZ()
local story_id = packet:r_u32()
local spawn_story_id = packet:r_u32()

-- cse_shape
local shape_count = packet:r_u8()
for i=1,shape_count do
local shape_type = packet:r_u8()
if shape_type == 0 then
-- sphere
local center = packet:r_vec3()
local radius = packet:r_float()
else
-- box
local box = packet:r_matrix()
end
end

-- cse_alife_space_restrictor
local restrictor_type = packet:r_u8()

-- cse_alife_custom_zone
local max_power = packet:r_float()
local owner_id = packet:r_u32()
local enabled_time = packet:r_u32()
local disabled_time = packet:r_u32()
local start_time_shift = packet:r_u32()

-- cse_alife_anomalous_zone
local offline_interactive_radius = packet:r_float()
local artefact_spawn_count = packet:r_u16()
local artefact_position_offset = packet:r_u32()

-- se_zone_anom
local last_spawn_time_present = packet:r_u8()

if (string.find (name_anom, 'zone_zharka_static') ~= nil
or string.find (name_anom, 'zone_witches_galantine') ~= nil
or string.find (name_anom, 'zone_mosquito_bald') ~= nil
or string.find (name_anom, 'zone_mincer') ~= nil
or string.find (name_anom, 'zone_gravi_zone') ~= nil
or string.find (name_anom, 'zone_buzz') ~= nil )
and packet:r_elapsed() ~= 0 then
abort("left=%d", left)
end

---------------------------save--------------------
-- cse_alife_object
packet:w_begin(game_vertex_id)
packet:w_float(distance)
packet:w_u32(direct_control)
packet:w_u32(level_vertex_id)
object_flags = bit_not(193)
packet:w_u32(object_flags)
packet:w_stringZ(custom_data)
packet:w_u32(get_story_id_not_replay())
packet:w_u32(get_story_id_not_replay())

-- cse_shape
packet:w_u8(1) -- количество фигур
packet:w_u8(0) -- тип фигуры: сфера
packet:w_vec3(vector():set(0, 0, 0))
if radius_anom ~= nil then
packet:w_float(radius_anom)
else
packet:w_float(1.0)
end

-- cse_alife_space_restrictor
packet:w_u8(restrictor_type)

-- cse_alife_custom_zone
if power_anom ~= nil then
packet:w_float(power_anom)
else
packet:w_float(max_power)
end
packet:w_u32(owner_id)
packet:w_u32(enabled_time)
packet:w_u32(disabled_time)
packet:w_u32(start_time_shift)

-- cse_alife_anomalous_zone
packet:w_float(offline_interactive_radius)
packet:w_u16(artefact_spawn_count)
packet:w_u32(artefact_position_offset)

-- se_zone_anom
packet:w_u8(last_spawn_time_present)

------------------------read------------------------
packet:r_seek(0)
obj:STATE_Read (packet, packet:w_tell())

end

-----------------------------------спавним аномалии-----------------------------------

function spawn_anom1()
this.create_anom('zone_zharka_static', vector():set(-30.974,0.002,693.734),178968,2618, 3, 0.7)
end

function spawn_anom2()
this.create_anom('zone_witches_galantine_strong', vector():set(-20.851,0.000,693.588),178968,2618, 5, 0.8)
end

function spawn_anom3()
this.create_anom('zone_mincer_average', vector():set(-26.064,0.000,698.637),178968,2618, 4, 1)
end

---нпс_1

[logic]

active = walker

[walker]
path_walk = byk_walk5
path_look = byk_look5
danger = danger_ignore

[danger_ignore]
ignore_distance = 1
meet = meet

[meet]
victim = 1|actor
victim_wpn = 1|actor
use = true
use_wpn = true

---нпс_2

[logic]

active = walker

[walker]
on_info = {+goo2} walker@b
path_walk = byk_walk1
path_look = byk_look1
danger = danger_ignore
meet = no_meet

[walker@b]
path_walk = byk_walk2
path_look = byk_look2
on_info = {+goo3} walker@g
meet = no_meet

[danger_ignore]
ignore_distance = 1

[walker@g]
path_walk = byk_walk3
path_look = byk_look3
meet = meet

[meet]
victim = 1|actor
victim_wpn = 1|actor
use = {=rostok_dist_to_actor_le(2.5) +proba_dial_da -proba_dial} self
use_wpn = {=rostok_dist_to_actor_le(2.5) +proba_dial_da -proba_dial} self