|
Mynah
���������
������: ����� �����������: ���. 2004
�����: 469 ���������
|
2Wasteland Ghost:
������:
stored_node := "Node002"; call stored_node;
�� ���� ����������� ���������� ��������� ������� �� ����. Big thnks :) ����� ������������. 2Raven:
������:
���������� ��� "��������" ���-���, ������� �� 100-�� ������� �� ������� ����� "LABEL: Vasya", ��������.
����������� alt+f7 � totalcmd ��� ���� :)
������:
������ �� � ���� ������� ������, ������� ������ ���� ���-��� ��� ... ������.
� ��� ��� - ������� :) ������� �� ���� :) 2pal: ����, noid'������ ���������� �����... �� ����� � ������������ �������� ����. (��������������(�) Mynah - 15:24 - 17 ������, 2004)
----- Scio me nihil scire
|
����������: 13:22 - 17 ������, 2004
|
|
Wasteland Ghost
��������� ���� ����������
������: ������, ������ �����������: ���. 2002
�����: 2251 ���������
|
2pal ��� ��� ����� �����, � ��� ��� ���� �������� ��������� �� ������. ��� � �� �1 �����? ��� � �������� :). �� �������. ��� ��� ���������� ����� - ��� ������� :). �� ��� ��� � ��� say_option ����: void gSay_Option(int msg_list, int msg_num, procedure target, int reaction) - ������� ������� ������ � ������� ��� �������� ���������� ���������: msg_list - ����� ����� msg msg_num - ����� ������ � ����� msg target - ���������, � ������� �������������� ������� ��� ������ ���������������� ������ reaction - ������������� ������� (��. DEFINE.H): GOOD_REACTION (49) NEUTRAL_REACTION (50) BAD_REACTION (51) ������������ ��������: ���
|
����������: 16:03 - 17 ������, 2004
|
|
pal
������������
������: Estonia, Narva �����������: ���. 2003
�����: 42 ���������
|
To Wasteland Ghost: ������� ������� �� ������������� �����! �� ��� � �����. ������������ ������: target - ���������, � ������� �������������� ������� ��� ������ ���������������� ������ � ��� ������� ��� � ����� ���� ��� ����� �����.� ��� ������� ��������� ������� �� ��������� ������� ��� ��������� �������. ������ ������ ��� � 1 ������ ��� 0 ? To Mynah: ��� �������� ��� Noid'������ ����� ���� ��� Ipp-���� �������� ������ �� ���� , ������ �� ������������� ���������� ���� �����....
|
����������: 16:28 - 17 ������, 2004
|
|
Raven
������������
������: ������ �����������: ����. 2004
�����: 408 ���������
|
>>����������� alt+f7 � totalcmd �� ���� :) Alt+F7 , �������, �����, �� �� �� ����� ������ ����� :-) ���� � ���, ��� ����� ������� �� "��������" ������ �� ������������� ������ (������� #define NAME?). �.�. ������ ������� ��������� ������ �� ����� ��� ������� scripts.lst ��� ���������. �� ��� ���� ������ ��� ���-��� �� ����������� �������� ����� � ���������� � �����. Scripts.lst � ���� ������ �������� ���� ����� ������. >>� ��� ��� - ������� :) ������� �� ���� :) ��. �������. �� �������� ������ �������� :-) ���� ������� ���� ����.������, ��� �� ������� ������������ �� 10�� ���� :-) �������� ����, �� ������� �� �����, ������: ����� ������� Node-��������� � ���-����. ��� ��� �������� (� � ����� �������, ������ �� ������ �����). ��������� ���-��� ������ ��� �������: ------------------------------ {100}{}{NODE_START} {101}{}{������} //�������� ��� Reply {102}{}{���} //��������� �������� ��� Option {103}{}{���1} //������ �� ��� ��� ����� Option {104}{}{����} //���������� 102 {105}{}{�����} // {106}{}{NODE_END} {200}{}{NODE_���1} <...> {341}{}{NODE_�����} <...> ------------------------------- ������� �������� ����� ���: variable start_node; -------------------------------- variable start_node; procedure talk_p_proc begin call parse_node("START"); end procedure parse_node(variable str) begin variable i:=1; //str-��� ���� ��� �������� str:="NODE_"+str; //�������� � ������� �������, str="NODE_START" while mstr(i)!=str do i+=1; //���� ������ ����. � ��� i==100 Reply(i+1); //������� � Reply ���. 101 start_opt:=i+2; //start_opt = ������ ���. � ������ Option (���. 102) i:=0; while mstr(start_opt+i)!="NODE_END" do begin //�� �� ����� ���� ������ ��� Option-� if (i/2+1)==1 then Option(mstr(start_opt+i),Node001); //������ Option ������� ���������� ��������� �� Node001 else if (i/2+1)==2 then Option(mstr(start_opt+i),Node002); //������ - �� Node002 � �.�. <...> end end procedure Node001 begin call parse_node(mstr(start_node+1)); //�������� ������ �����, ��������� ��� � �������� ���. ����� ��������������� ������� Option ������ (���. 103) end procedure Node002 begin call parse_node(mstr(start_node+3)); //���. 105 end <...> -------------------------------- �����: ��� ������� ����������, �������� ����� � ��� ������. � "�����������" ����� � msg ����� ���� ������� ������. �.�. ������ ������� ���� ���, � ��� ������� ��������������� � ���. ����� ��������� �������� ��������� ������� ��� ��������������. ������� (� ����, �����������, ������) �����. ���� �� �����, ������ ���������, ������� ���������, ����������� ��������� ����������� ������ � �.�. �� �� �������������� ��� ����������� :-) ���-�� ���������������? ���� �������� 3-5 ��������, �� ����� ������ ������� �� ��� � ������������ � ������.
|
����������: 16:34 - 17 ������, 2004
|
|
Mynah
���������
������: ����� �����������: ���. 2004
�����: 469 ���������
|
������:
���� ������� ���� ����.������, ��� �� ������� ������������ �� 10�� ���� :-)
�� � ����� ������ ����, ��� �� �����-�� � ������ :))) ���� �� ������ - �����. � ��� ����� ������ � ���� ��� ��������� :) ��� ����
----- Scio me nihil scire
|
����������: 17:03 - 17 ������, 2004
|
|
Alan Killenger
������������
������: ������, ������ �����������: ���� 2004
�����: 404 ���������
|
������: ���� ������� ����� ������ ������������ ������ ������������ .
����.. ��� ���? (����� �� �� ����� �� ��������.. �� ���� �� ������ �������, ��� ��� ������� ���������� ���������� �������� ���� string, ���������� ������������� ������������� ��������� �� ��� ������? ��������� ��� ��� ������ �����, �� ����� ��� ��������� ������?) [���� �����] P.P.S. ����� �� ��������, �������� ������� �� �����.. ��� ������, ������������ �� � *.msg ����� ������� � �������� �������? (��������������(�) Alan Killenger - 20:47 - 17 ������, 2004)
----- hit me, nail me, make me god
|
����������: 19:45 - 17 ������, 2004
|
|
Wasteland Ghost
��������� ���� ����������
������: ������, ������ �����������: ���. 2002
�����: 2251 ���������
|
����� error �� ������ ��������, ����� � ������� :). ������ ��� �� ������������, ��� ������������ ������.
|
����������: 10:39 - 18 ������, 2004
|
|
Alan Killenger
������������
������: ������, ������ �����������: ���� 2004
�����: 404 ���������
|
1. ��� ����������� �������� ������ �������? �� ���� ���������� �� �����-���� ������� ���������� ����������, ��� � Pascal'e? ����, ��� ������ ����� ���.. �� � ������ �� ��� �� ��������. � �����-������ ����� �������? �, ��������, � ������ ������ critter_p_proc ������ ���������� ����������� �������� ���� ����������, ����� ��� ����� ������ �������? 2. ��� ��������� �������� ������� � ������ � ������ ����� ������� ������? ��.. ��������� ����� ���� ������ � ������� ��������� �� �������, �� �� �����. ������ ���������� �������������� ������� ��������������� �������� � ���������� ��������? ���������� ������� ����� � �����: boolean anim_busy(ObjectPtr who), sorry �� ������ ������. (��������������(�) Alan Killenger - 15:14 - 21 ������, 2004)
|
����������: 15:27 - 18 ������, 2004
|
|
pal
������������
������: Estonia, Narva �����������: ���. 2003
�����: 42 ���������
|
��� ������ ����� ������ � ���������� ��� ������ ������� : PlayerHasPresencePerk(1) ? � ���� �� ������� ���� �������? � �� ���������� � ������ � ipp � �������� � (������� �.�.) �� ����� ������� � int ������ .
|
����������: 17:13 - 18 ������, 2004
|
|
Mynah
���������
������: ����� �����������: ���. 2004
�����: 469 ���������
|
2pal:
������:
PlayerHasPresencePerk Return 1 (true) if player has the Presence trait, false (0) otherwise.
�.�. � ���� ������� �� ������ ���� ����������. � ������, ���� ����.
----- Scio me nihil scire
|
����������: 17:37 - 18 ������, 2004
|
|
|
|