» 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 ] ��� ��������

 
Aman
������������

������: ����
�����������: ���. 2005

�����: 208 ���������

��-����� ���-���� 1 ���=0,1 ���, 10 ����� = �������.

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

����������: 18:44 - 26 ���., 2006
Wasteland Ghost
��������� ���� ����������

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

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

������:

2) ������� ��� = 10 ��. �.�. 100 ����� = 1 �.


�������. � ������� 10 �����.

����������: 18:45 - 26 ���., 2006
Keha
������������

�����������: ���. 2006

�����: 31 ���������

������� �������.
--------------------------------
������� ������������ � ������ ������
������ critter_p_proc - ���� ����� ���� ��������� ��������� ������������ ���� ������, �� ��� ���� ��� ������� �� ��:

variable st;
variable q;

procedure combat_p_proc begin
� if st == 0 then begin
� � � �st:=1; � �
� � � �add_timer_event(self_obj,5,44); ������ ���� ����� ������ ���������� ������ ��� ������ ������ ��� ��� ����� st ����� ����� 1 � ���� �������� �������� �� �����
� �end �
end

procedure timed_event_p_proc begin
� �if (fixed_param == 44) then begin
� � � q:=q+1; ��� � ��������� ������� ������� ��� �������� �������� ���� ����� � ������ ��� ���
� � � display_msg("n="+q);
� � � add_timer_event(self_obj,5,44); - ������������ ���������� �� ���� ����� ������ 5 �����
� � � *���� ������* ��� � ������� ���� ������ ���� ����� �� ������� �� ��� �� ����� ������ ����� ���������� ���������� � ������������ � add_timer_event(self_obj,������,44) ��������, �� �� �������� ����������� ������ ���.
� �end
end

procedure critter_p_proc begin
� � � � rm_fixed_timer_event(self_obj,44); �_�_� ���������� ��� ������ ������ ����������� � ������ ��� ��������� ������ ������������ �� ��������� ������������ ���� ������ ����� ����������� ������, ������ ��� �� ����� ���������� st
� � � � st:=0;
end

������ � ���� �� �������� ���� ����� � ������? ��� ���� ��� ������� � �� �������� �����, � �� ����� ����� ��� �� ������? � ������ ������ �� ������ ����� ���������?

� �� � ���� q �������� ��� ��� � ��������� ������ ��������. �

����������: 19:11 - 26 ���., 2006 | ����������: Keha - 21:45 - 26 ���., 2006
Wasteland Ghost
��������� ���� ����������

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

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

� ��� �������� ������ combat_p_proc, �����.

����������: 10:35 - 27 ���., 2006
Keha
������������

�����������: ���. 2006

�����: 31 ���������

void AddButtonProc(string btn_name, procedure button_on, procedure button_off, procedure button_press, procedure button_release) - ��������� � ������� btn_name ��������� ��� ��������� �������
���������:
btn_name - ��� ������, ��������, "test_btn"
button_on, button_off, button_press, button_release - ����� �������� ��� ��������� ���������, ��������, ������� � ���������� ����


����� �� AddButtonProc ��������� � ������������ ������������ �������?

���� �����, �� ����� ���������� ��������(btn_name) ���� ������:
1) ����� ������� ������ - �������� �������� ����.
2) ������ "�����" � �������� ��������� - ������� ��������� ���� ���������.

����������: 15:49 - 27 ���., 2006 | ����������: Keha - 15:53 - 27 ���., 2006
Wasteland Ghost
��������� ���� ����������

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

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

���.

����������: 16:19 - 27 ���., 2006
Mynah
���������

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

�����: 469 ���������

>>� ��� �������� ������ combat_p_proc, �����.
����:) ������ ������ ������� ����. ������ ������� ���-��.

-----
Scio me nihil scire

����������: 22:01 - 27 ���., 2006
Dar
������������

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

�����: 289 ���������

>>������ ������� ���-��

���, ��� ������ �����������, � ��������� ���������������� �� fixed_param(������� ��� combat_p_proc ).  ��� ���(timer_event) "����������������" � ��������.

����������: 0:06 - 28 ���., 2006
Keha
������������

�����������: ���. 2006

�����: 31 ���������

���� ����� � �������� ��������, ��������� �� ����������� ���� �������, ������ �������� ������ �� ���, ��� �������� ��.  ��� � ����� ���� �������� ������������ ������� ����� ������ ������ ��� ������� �������� ����. �� ��� - ��� ������ ������� �����, ������� � ������ �������� ������ ����������, � � ��� ������ ��������(���������) ������ � �������� �������� ����. ���� *����� ����* �� ����� ������� ����� �������� � ���� �� ������.

���� �� ��� �������, ���� �� ����� ��������� ����� ���� ��������� � ������ � ����� ����������� ����� �������. �� � ��������� ����� ����� �������, �� ������� ����� �� ������, � ������ *����� ����*.
������ ����� ������ *����� ����* ��������� ���������� � �������� ������� ������������ ����� �����. ���� ����� ��� ����� � �������� ����� ���������� �������� ����������������.

� �� �� ���� ��� ����� � ����� �������� ���������, �������� ���� ��� �������� � *����� ������* ������� �� 10 �����, �� �������������� ��������� ���� ��������� ������� �� ����� ������� �������� � �������, � ����������� ������ ���� �� ��� �� ������ ����.

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

����������: 15:18 - 28 ���., 2006
Keha
������������

�����������: ���. 2006

�����: 31 ���������

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

���� �� ����� �������� �� ��������� ������� ������ ������ �� ������������� ����, �� ������������ � ��� ��� proto_data ���������� ��� ������ � ���� ����� ����������� �������. � � �������� ������� ������ ���������� (������ PRO-������ Fallout2), ���� ������������ � ���� ����� ������������������ �������. ������ ����� ����� - ����� ����������������� ������ ����������� ����� ��������� ������(������).

��� ������ ��� �� ����������� � ������� proto_data ����������� �����
�������� ��� ��� ����������������� ������(�����) �� �����������:

dec:= proto_data(int pid, int data_member)

flag1:=dec-(dec/16)*16; // ��������� ���� ������������������ dec
flag2:=dec/16-((dec/16)/16)*16; �// ������������� ���� ������������������ dec
flag3:=(dec/16)/16-(((dec/16)/16)/16)*16; //������ � ����� ����
flag4:=((dec/16)/16)/16-((((dec/16)/16)/16)/16)*16; //��������� � ����� ����
��� �� ��� ��������.

(������ ������� �������� ��������� ��������� ���� ��� � �������� ssl �������� / (�������) �������� �������������)

�������� �� ����� pid �����, � ����� �������� �� 7�� ���� ���-����� �����, ��� ����� ����� �����(�� ������ PRO-������ Fallout2):

dec:= proto_data(pid �����, 7)

flag1:=dec-(dec/16)*16; // Primary Attack Type
flag2:=dec/16-((dec/16)/16)*16; // Secondary Attack Type

� ����� flag1 ������ ������ 4��, ���, ���� �������� � ������ ������ PRO-������, ������������� ����� thrust (������); flag2 ������ ������ 5�� ��������������� ����� throw(�������).

������ ����� �������, �� ������� ����� ��������� ����������������� ������ (��������� � obj_dude_ssl):
-----------------------------------------------------------------------
procedure Check_wip;
procedure Check_wipon;
procedure dec_to_hex;

variable wip;

// ��������� critter_p_proc � obj_dude_ssl ��� ����������, ��� ��������� �������� � ���
//������ call Check_wipon; �


procedure critter_p_proc begin
� call Check_wipon; �
end

procedure Check_wipon begin // �������� �� ��������� ���������� �������� ����
variable wip1;
wip1:=wip;
call Check_wip; �
� if not(wip == wip1) then begin � � � � � � �
� � �display_msg("you ekipirovalis "+proto_data(obj_pid(wip),1)); �
� � �call dec_to_hex;
� end �
end

procedure Check_wip begin // ����������� ��������� �� ������� � �������� ����
�wip:=critter_inven_obj(self_obj,1);
� �if wip == 0 then begin
� � � wip:=critter_inven_obj(self_obj,2);
� �end �
end

procedure dec_to_hex begin

� �variable dec;
� �variable at1;
� �variable at2;

� �dec:=proto_data(obj_pid(wip),7);

� �at1:=dec-(dec/16)*16; // ������������� ������ ��� ����� ������� ���� �����
� �at2:=dec/16-((dec/16)/16)*16; //��� ����� ������� ���� �����

� �if at1 == 0 then begin
� �display_msg("attack type1 �= �none");
� �end else if at1 == 1 then begin
� �display_msg("attack type1 �= �punch");
� �end else if at1 == 2 then begin
� �display_msg("attack type1 �= �kick leg");
� �end else if at1 == 3 then begin
� �display_msg("attack type1 �= �swing");
� �end else if at1 == 4 then begin
� �display_msg("attack type1 �= �thrust");
� �end else if at1 == 5 then begin
� �display_msg("attack type1 �= �throw ");
� �end else if at1 == 6 then begin
� �display_msg("attack type1 �= fire single");
� �end else if at1 == 7 then begin
� �display_msg("attack type1 �= �fire burst");
� �end else if at1 == 8 then begin
� �display_msg("attack type1 �= �fire continuous");
� �end

� �if at2 == 0 then begin
� �display_msg("attack type2 �= �none");
� �end else if at2 == 1 then begin
� �display_msg("attack type2 �= �punch");
� �end else if at2 == 2 then begin
� �display_msg("attack type2 �= �kick leg");
� �end else if at2 == 3 then begin
� �display_msg("attack type2 �= �swing");
� �end else if at2 == 4 then begin
� �display_msg("attack type2 �= �thrust");
� �end else if at2 == 5 then begin
� �display_msg("attack type2 �= �throw ");
� �end else if at2 == 6 then begin
� �display_msg("attack type2 �= fire single");
� �end else if at2 == 7 then begin
� �display_msg("attack type2 �= �fire burst");
� �end else if at2 == 8 then begin
� �display_msg("attack type2 �= �fire continuous");
� �end

end
-----------------------------------------------------------------------
����������� ����� ������� � ������ ������ ����� critter_p_proc � ���������� �� ��� Check_wipon ��������� ��������� �������� ���� �� ������� ��������� ����������.( �� ���� �� ����� �������� � �������� ����, ���� �� ����� ����� �������� ����). � ������ ��������� ���������� �������� ���� ����������� ����� ������� ������� ��� ���������: �

*�� ������������� +(�������� ��������)
*attack type1 �= (��� ������ ����� �������������� ��������) �
*attack type2 �= (��� ������ ����� �������������� ��������) �

���� ���������� ��������� ��� ���������� ������� ��� flag1, flag2, flag3,... ,
� ��� ��� ����� ���������.

����������: 11:23 - 2 �����, 2006 | ����������: Keha - 11:48 - 2 �����, 2006
 

������� �� �����
<< ����. ����. >>
�������� ���� ���� [ 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