» TeamX (����� ������)«


����� TeamX » ���. ��������� » ������� (��� ������� �� ���������� - ����)

������� �� �����
<< ����. ����. >>
�������� ���� ���� [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 ] ��� ��������

 
Ray
���������

������: ������,�������
�����������: ���. 2004

�����: 746 ���������

>>���������� ��� ��� ������������� ������ ��������� �� critters.lst � �������� ��������� ����, ���� �� ����� ��������?

� �����, ��� Jager ������������ ��������� ����. �������� ��������� � ���� - ��� �����, ���, ��������� �����.... ���� ���? ������ ��� � ����? ���� ��, �� ��� �������� ��������� � ����� ���. �� ������ ����� ����� ��������, ���������� � ��� ����� ���������(������), ��������������(������) � �������� ��������.

���� ������� � ���� ������, �� ����� ��� �������.

2 Perceptron:

�� � �����, �� ����������� �� ������ ���� �� �� ���� �� ������� ����� ������� ����������� �  ����������� ����������, ���.... ������ ����� ������ �������� �������� ����� � �� ������������� �������� ������ � ��������� ���������. �� �������� ����� ���� ����� ������������. ��� ������ �������� ��� ������ ��������, ������� ������� �� ��� ������.

-----
�� ������ ����������� ����� � ������ ���� �������.

����������: 0:40 - 5 ���., 2005
Wasteland Ghost
��������� ���� ����������

������: ������, ������
�����������: ���. 2002

�����: 2251 ���������

2Ray
����� ������ ����, �� ���������� � �� ���������, ��� ��� ��������� �����������. �� ���������, �� �����, ���� �������. ��� �� �� "������������" � ����������� ;).

����������: 13:32 - 5 ���., 2005
binyan
������������

������: Israel
�����������: ���� 2005

�����: 292 ���������

��� ������� ������ ���������?��� ������ ����� ������ � ����?� ����� ������ �� �������,�.� ������� ������ �������� �������,� ��� ��� ������,� ��� �� ������������ ������.
�������,��� �������� � ������� �����.
����� ���� ����������� ����� ��� ��� ��� ������� ������������ ��� � ������� �����.
� ��������� ����� ������� ��� �����,������ � ���������.��� ��� ������,� ������� ����� �������?
������� � ������� �������..��� � ��������� ������� � �-����(� ���� ��������� �������� ��� ������),� ��� �� �����������?(� ���� ����� ���� �� ����� ������ ������.��� ��� ��� �� ���� �����)  


-----
...������� �������������, ���������� � ��������������..

����������: 21:13 - 6 ���., 2005
Perceptron
���������

������: Ivanovo
�����������: ��� 2003

�����: 502 ���������

���� - ��� ������. �� ����� �������� ��� �� �����.
��������� - ���� ��������.
� ������ ������ ������, ��� �� ����� ������ - ���������� �� ��, ��� ��� ������� � ����, ����������� �� ���������� ��������.
������.����� ���. �������� ����� .msg ������ ��������� � ��������� ����� .int � ���. ������ ��� ������������ �-��� ����� ������������� ����������� � ������������. � ������� ������� �� �������� ������������ (����� �� ������������ ����������).
������, ���� ���: Klint the Generous. ����� �� falloutsite.ru. ��� ����� ���������� ������. ���� ���������� ����� ����� � ��� ��� ��������, � �����, ����� ����� ������, ��� ������� ������ ���������.
� ��� ������ ����� ����������� ������� ���� �� ������ ���.

-----
Into The New Year - With A New Vision!
������������ �� ��������, �������� �� ��������, ������� �� ��������, FAQ �� ��������, "�������", fallmods-tutor.

����������: 3:42 - 7 ���., 2005
Pavel
���������

������: ������ �������
�����������: ��� 2004

�����: 368 ���������

��� ������ �� ���� Raven'a �� ���������� �������:


//��� �����
#define NAME 1305 // �� ������ -1 � script.lst
//�������
//�������� (�����_�������,�����_�����) �� (�����_�����)
//�.�. ����� ������� - ������� �������� � ��������� ��� ����� �������
#define Reply(x) gsay_reply(NAME,x)
//���� � ��� gsay_option
#define Option(x,y) gsay_option(NAME,x,y,-1)

procedure Node009;
procedure Node010;
procedure Node011;
procedure Node999;

//���������
procedure start begin
end

procedure talk_p_proc begin
Start_gDialog(NAME,self_obj,-1,-1,-1);
GSay_Start;
 call Node009;
GSay_End;
End_Dialogue;
end

procedure Node009 begin
Reply(1);
 Option(10,Node010);
 Option(11,Node011);
end

procedure Node010 begin
 Reply(2);
 Option(12,Node011);
 Option(13,Node999);
end

procedure Node011 begin
 Reply(3);
 Option(15,Node999);
end

procedure Node999 begin
end

����� ����� ����� � msg �����
{1}{}{Hello, Chosen One}
{10}{}{Yeah. How its going?}
{11}{}{Sorry. No time for chat}
{2}{}{Not bad. Heard you have some troubles with the Enclave?}
{12}{}{Oooh. Nothing serious, really}
{13}{}{Eee. I must be going}
{3}{}{Well, I wish you luck anyway}
{15}{}{Thanks. Bye}

-----
� ����� ������ ���� ��������� �� 100%, ���� ������� �� ������ �����...

����������: 10:21 - 7 ���., 2005
binyan
������������

������: Israel
�����������: ���� 2005

�����: 292 ���������

�������� ��� ��� � ������� �����:
/* Standard Script Procedures */
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 timed_event_p_proc;
��������� � ����� ��� ��� ��������� ������� ���������� ��� ���?� �� ����������� �������.��� ��� ���� � �������?
������
procedure Node998;                                      // This Node is Alshhays Combat
procedure Node999;                                      // This Node is Alshhays Ending
��� ���?��� �� ��������� ���,� �� ��� ������ ��������?
������
// The neht lines are added in by the Designer Tool.
// Do NOT add in any lines here.
//~~~~~~~~~~~~~~~~ DESIGNER TOOL STARTS HERE

procedure Node001;
procedure Node001a;
procedure Node002;
procedure Node003;
procedure Node004;
procedure Node004a;
procedure Node004b;
procedure Node005;
procedure Node006;
procedure Node007;
procedure Node008;
procedure Node009;
procedure Node010;
procedure Node011;
procedure Node012;
procedure Node013;
procedure Node014;
procedure Node015;
procedure Node016;
procedure Node017;
procedure Node017a;
procedure Node018;
procedure Node019;
��� ���?
������
// party member default nodes
procedure Node1001;
procedure Node1002;
procedure Node1003;
procedure Node1004;
procedure Node1005;
procedure Node1006;
procedure Node1007;
procedure Node1008;
procedure Node1009;
procedure Node1010;
procedure Node1100;
���?
������
// Cassidy dialog
procedure Node1101;
procedure Node1101a;
procedure Node1102;
procedure Node1103;
procedure Node1104;
procedure Node1105;
procedure Node1106;
procedure Node1107;
procedure Node1108;
procedure Node1109;
procedure Node1110;
procedure Node1111;
procedure Node1112;
��� ��������� � ����� ��� �������..��� ��� ���������?����������� �� ������?
// Cassidy floats
procedure Node2001;
procedure Node2002;
procedure Node2003;
procedure Node2004;
procedure Node2005;
procedure Node2006;
procedure Node2007;
procedure Node2008;
procedure Node2009;
procedure Node2010;
procedure Node2011;
procedure Node2012;
procedure Node2013;
procedure Node2014;
procedure Node2015;
procedure Node2016;
procedure Node2017;
procedure Node2018;
procedure Node2019;
procedure Node2020;
procedure Node2021;
procedure Node2022;
��� ����� ������?��� ��� ���������?
������
//~~~~~~~~~~~~~~~~ DESIGN TOOL ENDS HERE
// The Folloshhing lines are for anything that is not needed to be
// seen by the design Tool


/* Local Variables shhhich are saved. All Local Variables need to be
  prepended by LVAR_ */
#define LVAR_Herebefore                 (4)
#define LVAR_Hostile                    (5)
#define LVAR_Personal_Enemy             (6)
#define LVAR_SHHAITING                    (7)
#define LVAR_FOLLOSHH_DISTANCE            (8)
#define LVAR_TEAM                       (9)
#define LVAR_Cassidy_Offered            (10)
#define LVAR_Cassidy_Knoshhs_Plan         (11)
#define LVAR_Admonished_Cassidy         (12)
#define LVAR_Mentioned_Vault            (13)
#define LVAR_JOined_Party_Before        (14)
��� ��� �� ���������?�� ��� ��������?��� �� �������������?����� ��� ���-���� ��������� ��� ����,���� � ��������� ����?
#define check_bad_area(map, elev)         ((cur_map_indeh == map) and ((elevation(self_obj) == elev) or (elev == -1)))
#define cassidy_doesnt_like_area            ((check_bad_area(MAP_RAIDERS_CAMP2, -1)) or           \
                                          (check_bad_area(MAP_KLAMATH_TOHICCAVES, -1)) or              \
                                          (check_bad_area(MAP_KLAMATH_RATCAVES, -1)) or            \
                                          (check_bad_area(MAP_BROKEN_HILLS2, 1))
or     \
                                          (check_bad_area(MAP_SAN_FRAN_TANKER, 1)) or    \
                                          (check_bad_area(MAP_GHOST_FARM, -1)) or         \
                                          (check_bad_area(MAP_REDDING_MINE_TUNNEL, -1)) or         \
                                          (check_bad_area(MAP_SIERRA_BATTLE, -1)))      // *** finish
��� ���?�� ��� ��� ��������� ��������?�� ��� �������� � ��� ������ ����������?
����� ������� ��� ��� ���� ���� � ����� �� ��������
��� �� ((cur_map_index == map) and ((elevation(self_obj) == elev) or (elev == -1)))?
�� ��� ��� ��������?��� �� ��� ��� ���� ����� ��?
#define cassidy_is_poisoned                    (get_poison(self_obj))
#define cassidy_is_irradiated                  (get_critter_stat(self_obj, STAT_current_rad))
#define cassidy_is_crippled                    ((critter_state(self_obj) bshhand DAM_CRIP_LEG_LEFT)  or \
                                               (critter_state(self_obj) bshhand DAM_CRIP_LEG_RIGHT) or \
                                               (critter_state(self_obj) bshhand DAM_CRIP_ARM_LEFT)  or \
                                               (critter_state(self_obj) bshhand DAM_CRIP_ARM_RIGHT))
��.��� �� ����� ������..����� ����� ������� ������ ������ �� �������?� ������� ���� ����� �������?��� ��� ������?
����� get poison.�������:"int get_poison(ObjectPtr who) " - ������� ������� ���������� �������".��� ��� ������.������� ���������� �� ������� ����.��� ������� ��������� �����?int get_critter_stat�(ObjectPtr shhho, int stat) - ������� �������� ��������������.����� ��� ���?��� ��� ���������?
int critter_state(ObjectPtr who) - ������� ��������� �������.
��� ��� ���������?��� ������ ������� � ������?
bwand  DAM_CRIP_LEG_LEFT)
��� ����� bwand?��� ������ DAM_CRIP_LEG_LEFT,�� �� ����� ����,� �.�?������ ����� ���� ����� or?
#define cassidy_party_member_options      if( party_is_waiting == false ) then   \
                                            NOption(9999, Node1101, 004);       \
                                         party_member_default_options  \
��� ��� �� ���������?��� ��� ������?.��� �� ��� �����?��� ����� ������ ��� ����?
������� ���������
/* Local variables which do not need to be saved between map changes. */
variable Only_Once:=0;
variable Perform_Party_Add:=0;
variable Perform_Party_Remove:=0;
variable Perform_Critter_Float := 0;
�� ��� �������� ��� ����������?
� ��� ����� ����� �����,������������ �������� �� ��� ������� ,� ��� ����� �����.�� ���� �������=))� � �������� ������� ������ �� ����������.������� ����  �� ������ ������� ��� ��� ����,� ��� ��� �������� � ����.
������� �������.


-----
...������� �������������, ���������� � ��������������..

����������: 22:32 - 7 ���., 2005
Ray
���������

������: ������,�������
�����������: ���. 2004

�����: 746 ���������

� �� �����, �� �������� ��������. ����� ������� ����� ���� �� �������(��� ����� ���� ���� ������� ����� ����� ����������������//���������� ��//), �� ��������. ��� ������ ���� ������� - "�������"

>>procedure timed_event_p_proc;
��������� � ����� ��� ��� ��������� ������� ���������� ��� ���?� �� ����������� �������.��� ��� ���� � �������?

�� �����, ��� ������ ���� � �������. ������ - ��� ������� �� ���������� ��� ���. ���� �� ��� ����� ���������������, ������ - ���. �� ������ ����� �� ����. ����� �� ���� �������� ����� ���������� � � ������ ��������. ������ ��� ��� - ������ ��������� ������� (�� ������ � ��������, ��� �� ������� � ����������� ��� � ����!!!). ��� ����������������� ������ ����� �����. ���������� ��������� - ��� �������� �������, � ���, ��������� � �.�.

>>  procedure Node998;                                      // This Node is Alshhays Combat
procedure Node999;                                      // This Node is Alshhays Ending
��� ���?��� �� ��������� ���,� �� ��� ������ ��������?
������

��� ������� ���� �������� �� ��������. ���� ��� � �� ���. ������ ������������ ������ �������� ���������, ��� ������������� ������� ��� NodeXXX. ��� ������� ��� �������� ������� ����. � ���� ����� ���� ��� ������.
� ������ ������ 998 - ��� ������ �������� �� ���������������(����������� ����� ���. �� ����)
node999 - ������ � �������� �� ����� �������. � ����� �� ����� ������� ����� �������� ����� ���� ��� ������ ������ ����� ���������.

>>procedure Node1100;
���?
������

��� ������ ���� �������� �� ������. ���� ��� �� ���, �� ��� ���� - ��� ���������� ��������.

>>procedure Node1112;
��� ��������� � ����� ��� �������..��� ��� ���������?����������� �� ������?

��� � ��� ������, ���� ����� ���� � �� ��� �������. �� ������� �� ���� ��� �� �������� �:

procedure Node001;
.............
procedure Node001
begin
����
end

� ������ �� ����� �������, ������� ���� ������ ����.
��������� ��� ������. �� ���� ���������� �������, � ����� �� �������� ���� ����� ���(����� ��������)
�������� ���
call nodeXXX();

����� ����� ���������� ���������� ��������������� ���������.

>>��� ����� ������
�� ��-�� ����, �� ���������� �� ������� ��� ���. ������� �� ������� ��� ��������.

>>#define LVAR_JOined_Party_Before        (14)
��� ��� �� ���������?�� ��� ��������?��� �� �������������?����� ��� ���-���� ��������� ��� ����,���� � ��������� ����?

������-�� define - ��� ��������� �������������. ���������� ����������� �������� ��� ������� ��������� ��������. �� ������� ����������� ������� � �������� � �� ������ :
��������
#define Just 17

������ � ������ ��� ����� just � ������� �� 17. (������������ ���������� �� ������ ����).
��� �����, �����.... ��� ����� ��������, ��� �� ������� ����� � ��� ����. ����� �� �����.

>>��� �� ((cur_map_index == map) and ((elevation(self_obj) == elev)

cur_map_index - ������� ������������ ����� �������, ��� ��������� ����. elevation(self_obj) - ������� ������������ ����, ��� ��������� �������� �������. ���������� ��� �������� ����� � �����.

>>��.��� �� ����� ������..����� ����� ������� ������ ������ �� �������?� ������� ���� ����� �������?��� ��� ������?

� ���������, ��� ��������� ������. � ������ ��������� ����� ������������� ������ ��������. "�������" - ������� ���������� �������. �� �������� �����

>>(ObjectPtr shhho, int stat) - ������� �������� ��������������.����� ��� ���?��� ��� ���������?
int critter_state(ObjectPtr who) - ������� ��������� �������.
��� ��� ���������?��� ������ ������� � ������?

��� - ��� ���? ������ � ���� ����� ��� ��� ��� ����� ���������� � ����. ������� ��������� - ������, ��� ������� ������ �������� ��������������� ������ �������. ����� ����� ������� ��� ��������. �������� critter_state ������ �������� ����� �� �������������. ����� � ������ ���� ����� �� ���������. ������:

�������� � ���� �������� ���. = 120, �����

if (get_critter_stat(self_obj, STAT_current_rad) > 100 )
begin
.....
end

����������. ���� ���. = 90 - ���.

>>variable Perform_Critter_Float := 0;
�� ��� �������� ��� ����������?

� ��� �� �����, ���� ��������� �������� ����� ����.

�Ѩ

P.S. � ������, ���� ��� ���������� ������ ���������������� � ���������� ������ ������. ���� ����� ���� ������ 90% �������� �� �����. � ��� ��� ���� �������� ����� �� �����. � �� ��� ����� ����� ����������������. ������ ��� �����. �� � ����� ������� ������� ����� ���� �� �����.

-----
�� ������ ����������� ����� � ������ ���� �������.

����������: 23:26 - 7 ���., 2005
Perceptron
���������

������: Ivanovo
�����������: ��� 2003

�����: 502 ���������

2 binyan:
�������� �� ��������. ��������������� ����������.

-----
Into The New Year - With A New Vision!
������������ �� ��������, �������� �� ��������, ������� �� ��������, FAQ �� ��������, "�������", fallmods-tutor.

����������: 23:58 - 7 ���., 2005
Pavel
���������

������: ������ �������
�����������: ��� 2004

�����: 368 ���������

����, �� ���� ������� ���� ����������� �������� �� �������

1.�������� ��������
procedure - ���������, ������� ����� ��������������.

procedure Node998;                                      // ������ ����� �� �������
procedure Node999;                                      // ������� ����� �� �������.

���� ���������, ������� ������������ ��������� � ���������
� ������� � ���������, ��� ��� ��� ������ ������� ��� ����.
���� �������� ������� - ���� ��� ��������, ����� �������� ������
� ��� ��������� ��� �������� �����, ��� ��� ���� ��� ������ ��� ���������.

2.�������� ����������
#define LVAR_���     (�)

���� - ��������� ����������, ������������ ��� ��������� �������� �������
� ������ � �����.
���� �=5 ��, ��� �������� ������������� ����� ���������� ��� (��� �� �����
�������, �� ���� ���������� �������� ������ �������.)
����� � ����� ����� (� �������) �� �����������.

3.����� ���� ��������.
variable Perform_Party_Add:=0;
�������� �������� ������ ��� ���������� �������, ���� ������ ������� ���������, �� �������� �� �����������. �������� ���������� �� ����. ���� �������� ���, �� �� �� ����� ���� �� ����� �� �������������� ����� ����������.

4.����� ���� �������
������������, ���� �� ��������� ���������, �������� ��� ����������
������� ������� �� ����� ������� ������. �.�. �������� ������ �������
��������� ����� ������� �� ������� �������� ������ �������.
#define check_bad_area(map, elev) ......
#define cassidy_doesnt_like_area            ((check_bad_area(MAP_RAIDERS_CAMP2, -1)) or ...
������ ����� ���� ������� �������� ���������� �� ��� ��� ���� �����,
�������� ��� ����� ����������� ��� �����.
������ �������� ��� �����, ��� ��� ���, � ��������, ������ ������� ��������.

��� �� ((cur_map_index == map) and ((elevation(self_obj) == elev) or (elev == -1)))?
�� ��� ��� ��������?��� �� ��� ��� ���� ����� ��?
*
cur_map_index == ���������� ����� �����
elevation(self_obj) == ���������� ����� ������ �����
elev == -1 ����� ������� (������ ���� 0,1,2)

������� ���������� �� ������� ����.��� ������� ��������� �����?int get_critter_stat�(ObjectPtr shhho, int stat) - ������� �������� ��������������.����� ��� ���?��� ��� ���������?
*
�������� ���� �������������� �������� ������� ��� ����� ������, ����� ������� �� ������ � ��������. � ������ ������������, �������� ���� ���� ��� �� ������.

int critter_state(ObjectPtr who) - ������� ��������� �������.
��� ��� ���������?��� ������ ������� � ������?
*
����� ������� ������ Ray.

bwand  DAM_CRIP_LEG_LEFT)
��� ����� bwand?��� ������ DAM_CRIP_LEG_LEFT,�� �� ����� ����,� �.�?������ ����� ���� ����� or?
*
����, � �������, ���� �������, �� ����� ����������� ��� ������� �� ������, �� ��� ���� �������� ������_������_���� ��� ������_�����_���� (�������� �� ����� �����), ������_������_����.... (�� ��������)

� ������, ����� ������ �������� � ����. ��� ������ ������ �����������. ����� � ������� � ����������� � �������. ����� ����� ������ �������� - ����� �����. � ���������� �������������� ������.

-----
� ����� ������ ���� ��������� �� 100%, ���� ������� �� ������ �����...

����������: 14:27 - 8 ���., 2005
Jager
������������

�����������: ���� 2005

�����: 38 ���������

������:

roll_vs_skill - ������ ������, ��������� �����. ������ ����� ���� ������� � ��������. ��� ���� �����, ��� ���� ����������� ������.




� ������-������ ������� ����� ����������?
� ��� ����, ��� ���� ����� - ������� �������� ������. � ��� ��� ��������? �� ������ ����� ��� �������� �� ������...


Ray ��� ��������� �����. � �� ����� ���� ����� ����� ��� ���. ��������, � ������ ������ ������, ������� ���� � ����. ��������� �� � �����, ��� ����� ���� 500 pro ���� pro ������ � ���������������� ������?
��� ��� ���� �����-�� ����������� ��� "������ � ������� ������"? ��� �� ��� � ����������� ��������.

����������: 16:33 - 8 ���., 2005
 

������� �� �����
<< ����. ����. >>
�������� ���� ���� [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 ] ��� ��������


Powered by Ikonboard 2.1.9 RUS
Modified by RU.Board Team
© 2000 Ikonboard.com