|
binyan
������������
������: Israel �����������: ���� 2005
�����: 292 ���������
|
���...������� �������,�����, �� ���������� �����, �� ������� ������� �� ������ ������ �� ��������.������ ������������� ���� � ������ �������.�� ����� ���� �� 1304 (� ���� �������������� ������) �� ������ ������ ��������.� � �� ����� �� ���� ��� � ������. �� ����� ������� �������,��� ����� � ��� ��������� � ��������� ����� ���������,�� ������ ���� ����������,����� �� � ��������.�� ������ ����� �� ���� ���������� ��� ��� "��� ���� ����?" � ���� ������ ���������(� �������� ��� ���� � �� ��) ���: #include "..\headers\command.h" #include "..\headers\define.h" #include "..\headers\myhead.h" #define LVAR_PARTY_MAN (0) #define LVAR_talk_pistol (1) #define LVAR_have_pistol (2) #define NAME 1304 #define Have_pistol ((obj_carrying_pid_obj(dude_obj,PID_10MM_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_LASER_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_14MM_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_PLASMA_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_ALIEN_LASER_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_223_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_NEEDLER_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_PK12_GAUSS_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_YK32_PULSE_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_MAGNETO_LASER_PISTOL))) procedure start; procedure critter_p_proc; procedure pickup_p_proc; procedure talk_p_proc; procedure destroy_p_proc; procedure look_at_p_proc; procedure description_p_proc; procedure use_skill_on_p_proc; procedure use_obj_on_p_proc; procedure damage_p_proc; procedure map_enter_p_proc; procedure push_p_proc; procedure Node001; procedure Node002; procedure Node003; procedure Node004; procedure Node005; procedure Node006; procedure Node007; procedure Node008; procedure Node009; procedure Node010; procedure Node999; procedure start begin end procedure talk_p_proc begin dialogue(self_obj,Node001); end procedure Node001 begin if (LVAR_talk_pistol==2) then call Node008; else if(LVAR_talk_pistol==3)then call Node009; else call Node010; end procedure Node002 begin rep(2); opt(20,Node003); opt(21,Node999); end procedure Node003 begin rep(3); opt(30,Node004); opt(31,Node999); end procedure Node004 begin set_local_var(LVAR_talk_pistol,2); end procedure Node005 begin rep(50); opt(5,Node007); end procedure Node006 begin rep(411); opt(412,Node999); end procedure Node007 begin critter_add_trait (self_obj, 1, 6, 0); critter_add_trait (self_obj, 1, 5, 194); party_add(self_obj); set_local_var(LVAR_talk_pistol,3); set_local_var(LVAR_PARTY_MAN,3); end procedure critter_p_proc begin if Have_pistol then set_local_var(LVAR_have_pistol,2); end procedure pickup_p_proc begin end procedure destroy_p_proc begin end procedure look_at_p_proc begin end procedure description_p_proc begin end procedure use_skill_on_p_proc begin end procedure use_obj_on_p_proc begin end procedure damage_p_proc begin end procedure map_enter_p_proc begin end procedure push_p_proc begin end procedure Node999 begin end procedure Node008 begin rep(4); if (LVAR_have_pistol==2) then begin opt(40,Node005); opt(41,Node006); end else opt(42,Node006); end procedure Node009 begin rep(6); opt(60,Node999); end procedure Node010 begin rep(1); opt(10,Node002); opt(11,Node999) ; end �� �� ����� �� ���� ���������� �� ����� ���� � ��-��. (��������������(�) binyan - 19:41 - 4 ����, 2005)
----- ...������� �������������, ���������� � ��������������..
|
����������: 19:40 - 4 ����, 2005
|
|
Pavel
���������
������: ������ ������� �����������: ��� 2004
�����: 368 ���������
|
� ��� ����� ���� �������? 1) �� ��������� ������ ���������� ��� � ������.��� 2) ������ ������� ��� ��������, � �� �����������. 3) � ������ ������ �����, ������ ����� - ����� ����������. ����� � ���� ����������. � ������, ��� �������� ���� � talk_p_proc.
----- � ����� ������ ���� ��������� �� 100%, ���� ������� �� ������ �����...
|
����������: 19:19 - 5 ����, 2005
|
|
binyan
������������
������: Israel �����������: ���� 2005
�����: 292 ���������
|
� ��� ����� ���� �������? 1) �� ��������� ������ ���������� ��� � ������.��� >> ��������� 2) ������ ������� ��� ��������, � �� �����������. >>��� �������� ����? 3) � ������ ������ �����, ������ ����� - ����� ����������. ����� � ���� ����������. >>������ �������� � ������, ��� �������� ���� � talk_p_proc. >>� critter_p_proc ����� ������ �� ������?��� ���� ����������� ������ �������,��� ��� �� �����.. (��������������(�) binyan - 14:37 - 6 ����, 2005)
----- ...������� �������������, ���������� � ��������������..
|
����������: 14:35 - 6 ����, 2005
|
|
Pavel
���������
������: ������ ������� �����������: ��� 2004
�����: 368 ���������
|
procedure Node001 begin if (LVAR_talk_pistol==2)or(variablA==2) then call Node008; ....... procedure Node004 begin set_local_var(LVAR_talk_pistol,2); variablA:=2; end �������, ����� ���������� � critter_p_proc ��� ��������, � ��� � ������� ���. ������ �� ���������: ���� � ������� ���������� �������, �� ����� critter_p_proc �� ������? ������� ����� � ������ � ���������.
----- � ����� ������ ���� ��������� �� 100%, ���� ������� �� ������ �����...
|
����������: 16:19 - 6 ����, 2005
|
|
binyan
������������
������: Israel �����������: ���� 2005
�����: 292 ���������
|
��,�������� ������,���� ��������� ��������,�� ��������� � �� � ��������� ���?� �� ��� ������ � ��������� �������� � �����.
----- ...������� �������������, ���������� � ��������������..
|
����������: 18:09 - 6 ����, 2005
|
|
Pavel
���������
������: ������ ������� �����������: ��� 2004
�����: 368 ���������
|
��, � ���� ���������� ���-�� �����: ... procedure Node009; procedure Node010; procedure Node999; ... variable variablA; ...
----- � ����� ������ ���� ��������� �� 100%, ���� ������� �� ������ �����...
|
����������: 18:47 - 6 ����, 2005
|
|
binyan
������������
������: Israel �����������: ���� 2005
�����: 292 ���������
|
��.������� ��������,������ ���� �� ���� ������,� ���� ��������� ��� ������ ���� ����������.
----- ...������� �������������, ���������� � ��������������..
|
����������: 19:56 - 6 ����, 2005
|
|
binyan
������������
������: Israel �����������: ���� 2005
�����: 292 ���������
|
�����, ���� �� ���� ��� �������� ��� ���� ������ �� �����. ����� �� ��� � ����� ������ ����� ���������������� ��� ������� ������� �� vault13.gam : GVAR_MODOC_GHOST_SEED_PIP :=0; // (631) GVAR_PARTY_MEMBERS_HIDDEN :=0; // (632) GVAR_CAR_PLACED_TILE :=0; // (633) GVAR_PARTY_MAN_talk_have_pistol :=0; // (634) GVAR_RESERVED_VAR2 :=0; // (635) GVAR_RESERVED_VAR3 :=0; // (636) GVAR_RESERVED_VAR4 :=0; // (637) �� ������� �� ����� ������ ����� ��� ���� ���� ����?� ������� ���� ������ �� ����, ����� �� ������� � ����, � ������ ��� ���, ��� �� ���� ��� ������, ��? � �� � � ������� ��� �� ���� ��� ������� ��� ������ : /* ���� ������������ � ��������� GVAR_PARTY_MAN_talk_have_pistol==1 ���� ������� � ��������� � �� � ���� GVAR_PARTY_MAN_talk_have_pistol==2 ���� ������� � ��������� � �� � ���� � �� � ������ GVAR_PARTY_MAN_talk_have_pistol==3 ���� �� ������� � ��������� GVAR_PARTY_MAN_talk_have_pistol==0 */ #include "..\headers\command.h" #include "..\headers\define.h" #include "..\headers\myhead.h" #define GVAR_PARTY_MAN_talk_have_pistol (0) #define NAME 1304 #define Have_pistol ((obj_carrying_pid_obj(dude_obj,PID_10MM_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_LASER_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_14MM_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_PLASMA_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_ALIEN_LASER_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_223_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_NEEDLER_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_PK12_GAUSS_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_YK32_PULSE_PISTOL))BWOR(obj_carrying_pid_obj(dude_obj,PID_MAGNETO_LASER_PISTOL))) procedure start; procedure critter_p_proc; procedure pickup_p_proc; procedure talk_p_proc; procedure destroy_p_proc; procedure look_at_p_proc; procedure description_p_proc; procedure use_skill_on_p_proc; procedure use_obj_on_p_proc; procedure damage_p_proc; procedure map_enter_p_proc; procedure push_p_proc; procedure Node001; procedure Node002; procedure Node003; procedure Node004; procedure Node005; procedure Node006; procedure Node007; procedure Node008; procedure Node009; procedure Node010; procedure Node999; procedure start begin end procedure talk_p_proc begin if Have_pistol then set_global_var(GVAR_PARTY_MAN_talk_have_pistol,2); dialogue(self_obj,Node001); end procedure Node001 begin if ((GVAR_PARTY_MAN_talk_have_pistol==1)BWOR(GVAR_PARTY_MAN_talk_have_pistol==2)) then call Node008; else if(GVAR_PARTY_MAN_talk_have_pistol==3)then call Node009; else call Node010; end procedure Node002 begin rep(2); opt(20,Node003); opt(21,Node999); end procedure Node003 begin rep(3); opt(30,Node004); opt(31,Node999); end procedure Node004 begin set_global_var(GVAR_PARTY_MAN_talk_have_pistol,1); end procedure Node005 begin rep(50); opt(5,Node007); end procedure Node006 begin rep(411); opt(412,Node999); end procedure Node007 begin critter_add_trait (self_obj, 1, 6, 0); critter_add_trait (self_obj, 1, 5, 194); party_add(self_obj); set_global_var(GVAR_PARTY_MAN_talk_have_pistol,3); end procedure critter_p_proc begin end procedure pickup_p_proc begin end procedure destroy_p_proc begin end procedure look_at_p_proc begin end procedure description_p_proc begin end procedure use_skill_on_p_proc begin end procedure use_obj_on_p_proc begin end procedure damage_p_proc begin end procedure map_enter_p_proc begin end procedure push_p_proc begin end procedure Node999 begin end procedure Node008 begin rep(4); if (GVAR_PARTY_MAN_talk_have_pistol==2) then begin opt(40,Node005); opt(41,Node006); end else opt(42,Node006); end procedure Node009 begin rep(6); opt(60,Node999); end procedure Node010 begin rep(1); opt(10,Node002); opt(11,Node999); end
----- ...������� �������������, ���������� � ��������������..
|
����������: 0:55 - 7 ����, 2005
|
|
FFAN
������������ �����������: ���� 2005
�����: 22 ���������
|
��������, � � ������� �������������� ������ kcsulik.int ( ����� �� ����� ������� ���� ) � ����� ���� ��� ������� ������������� - ������ ������: Undefined symbol op_party_member_obj ����� ��� ����� ���������. �������������� ������ � ������� noid_decompiler , � ������������ � ������� watcom � bis_compiler. � ��� ��������?
|
����������: 15:14 - 11 ����, 2005
|
|
Ray
���������
������: ������,������� �����������: ���. 2004
�����: 746 ���������
|
����� ������������� ���� ������� � ��������� ������. � �������: ���� - op_party_add(self_obj); BIS - party_add(self_obj); ������������/������. �� ����� ������������. ��� ���� ���� ����\������. � ���������. ��� BIS ����� � ������
----- �� ������ ����������� ����� � ������ ���� �������.
|
����������: 15:38 - 11 ����, 2005
|
|
|
|