|
Raven
������������
������: ������ �����������: ����. 2004
�����: 408 ���������
|
>>... else if ((global_var((38)) == 1)) then Static_Reaction:=S\ ... <- ��� ��� ��� S ���� �� �����, �� ������� �� �������� �����. �� �������. ��� �������. ������ ������ �������� ������� ������ (�������������) � ������ �� � ����� '\' - ������ ����������� ������. �� ��������� ����� �� ������. ������������, ��� ����������� �����-�� ������. ����������� ������ �� ����� ���������� ����������. �, ������ ������, ����� ������� �� ������������� ������������. �� ����� ������� �� ������. ��� ������ - ����� ������� ������������� ����� ���������� ������� ���������� ������� ����� � ����. �������, ��. (���������� �� 14:59 - 11 ���., 2005.) to Ray http://www.teamx.ru/fop/docs/BIS_help.html �������� ���� - ��, ����� - ��������� �������. ��� ��� say-������. � ������� ��� ������ ����� :-) http://www.teamx.ru/fop/docs/FScript-HOWTO ��� ���, �� ������ ������ :-)
|
����������: 14:55 - 11 ���., 2005
|
|
ChosenOne
������������
������: �. ����� �����������: ���� 2004
�����: 23 ���������
|
���... ��� ���������� - �������� ������������... �� �����... Borland'������ ������������ � ��� ��� � ��������... � ���� ������ ���� Borland C++(�� ������)... (��������������(�) ChosenOne - 16:26 - 11 ���., 2005)
----- ��� � ������ ����� �����, �� ����������� ��������� � �������� �����������. ������ ��� �� ��� ������, ��� �������. [PNWORLD] - Post Nuclear World! LISTEN TO BLACK SABBATH
|
����������: 16:21 - 11 ���., 2005
|
|
Raven
������������
������: ������ �����������: ����. 2004
�����: 408 ���������
|
� �� Borland C++ Command Line Tools ����. �� ����� 90��.
|
����������: 17:57 - 11 ���., 2005
|
|
Net
������������
������: Samara �����������: ���. 2004
�����: 8 ���������
|
#include "headers\define.h" #include "headers\command.h" #include "headers\newland.h" #define NAME 1309 procedure Node001; procedure Node002; procedure Node003; procedure Node004; procedure Node005; procedure Node999; procedure start begin end #define LVAR_Hostile (1) procedure look_at_p_proc begin display_msg(message_str(NAME,100)); //message_str(NAME,random(100,102)) end procedure critter_p_proc begin if (local_var(LVAR_Hostile) == 1) then begin attack(dude_obj); end end procedure talk_p_proc begin start_gdialog(NAME,self_obj,-1,-1,-1); GSay_Start; call Node001; GSay_End; End_Dialogue; end procedure Node001 begin gsay_reply(NAME,103); if get_critter_stat(dude_obj,4) >= 4 then begin gsay_option(NAME, 104, Node002,-1); gsay_option(NAME, 105, Node999,-1); end else begin gsay_option(NAME, 106, Node999,-1); end end procedure Node002 begin gsay_reply(NAME,107); gsay_option(NAME,obj_name(dude_obj),Node004,-1); gsay_option(NAME,109,Node003,-1); gsay_option(NAME,110,Node005,-1); end procedure Node003 begin gsay_reply(NAME,111); gsay_option(NAME,112,Node004,-1); gsay_option(NAME,113,Node005,-1); gsay_option(NAME,114,Node999,-1); end procedure Node005 begin set_local_var(LVAR_Hostile,1); call Node999; end procedure Node004 begin gsay_reply(NAME,115); gsay_option(NAME,116,Node999,-1); gsay_option(NAME,117,Node999,-1); end procedure Node999 begin end Raven, � ������ �������� ������, �� �� �������. � ���� �� �������� ������ � �� ���� ���� ��� ������ ��������� ������� ������ ������, ������� ������ � ��� �������� �� ����.
|
����������: 20:58 - 11 ���., 2005
|
|
Pavel
���������
������: ������ ������� �����������: ��� 2004
�����: 368 ���������
|
1) ��������� �� � ������.��� ��������� ����� � ������ ������ 0. �������� �� ������� ��� 2) #define LVAR_Hostile (1) ������� 5. ��������� #define LVAR_Hostile (5) - ��� ����� 5 ���� ���� ��������� � ���. 3) ������ Node005 ������� Node998 - ������ �����. set_local_var(LVAR_Hostile,2); 4) � critter_p_proc ������ if ((local_var(LVAR_Hostile) == 2) and (obj_can_see_obj(self_obj,dude_obj))) then begin set_local_var(LVAR_Hostile,1); attack(dude_obj);
----- � ����� ������ ���� ��������� �� 100%, ���� ������� �� ������ �����...
|
����������: 2:58 - 12 ���., 2005
|
|
ChosenOne
������������
������: �. ����� �����������: ���� 2004
�����: 23 ���������
|
��� �����, � ���������� � �����, ��� "����� ��� � ���, � ���� �� ����� ���������� � ��� ������� �� �� �������� ��������������" So it was... �� ���������� � � ����������... ������� ��� ��� �� NPC ������ ���� ��� ������(�� ������ �� ������, � ������ �� ����� ���), ������� � ������, �������� � ���� - �� �� �������, ���� �� ������(��� �� ������)... ��� ������ ����� ���������:
������:
procedure damage_p_proc begin script_overrides; if (source_obj == dude_obj) then begin set_local_var(LVAR_Personal_Enemy,1); end ----------- begin if (((local_var(LVAR_Hostile) == 2)or(local_var(LVAR_Personal_Enemy) == 1)) and (obj_can_see_obj(self_obj,dude_obj))) then begin set_local_var(LVAR_Hostile,1); Flee_From_Dude end else if ((random(0,100) == 1) and (In_Timed_Event == 0)) then begin In_Timed_Event:=1; add_timer_event(self_obj,game_ticks(random(17,37)),1); end
��������, ���� ������!
----- ��� � ������ ����� �����, �� ����������� ��������� � �������� �����������. ������ ��� �� ��� ������, ��� �������. [PNWORLD] - Post Nuclear World! LISTEN TO BLACK SABBATH
|
����������: 21:43 - 13 ���., 2005
|
|
Raven
������������
������: ������ �����������: ����. 2004
�����: 408 ���������
|
� ��, ��� ���� "--------------", � ����� ��������� �����������? �� critter_p_proc, �����? ��� �� ����� ��� �� ����������. ��� � map_update, �����. ������� ���� ����� ����� � ��� �� damage_p_proc.
|
����������: 9:08 - 14 ���., 2005
|
|
Net
������������
������: Samara �����������: ���. 2004
�����: 8 ���������
|
� ������ ������ ��������, � � ���� - ���. ��� ������? ������ �� ����
|
����������: 14:00 - 14 ���., 2005
|
|
Raven
������������
������: ������ �����������: ����. 2004
�����: 408 ���������
|
to Net ��������� (����������� ����������� newland.h). ��������� �������� ��� � ������, ��� � � ����. �������������: � �� ������ � ����, �����, �� ����� ctrl+r �������? ��� �������� ������������ �� ����������. ������: ����� �������� ������� ���������� ������ ������� � ����.
|
����������: 14:10 - 14 ���., 2005
|
|
Net
������������
������: Samara �����������: ���. 2004
�����: 8 ���������
|
To Raven. �� ����. ���� ��� CTRL+r ��� ��� ���������� ctrl+r, ��������� ����.
|
����������: 19:15 - 14 ���., 2005
|
|
|
|