| |
JSilver
������������
������: Moscow �����������: ���� 2007
�����: 20 ���������
|
������ ���� � ������ metarule3(106) aka "tile_get_next_critter". ������� �������: ��� �������� ������� ��������� ������ ������ ����� ��� � �������� � ��� ���������. ���� ������ ���������� ������������� ����� ������ "������ � ��� ����, �������� �� ���� ������", ������� �������� ����� ���� �� �������, � � ����� ��������� ��� ������ ��������, �������� �� ���� ����� ���������� ����������������, � ������� ��� ��� ������ ������ ��������� �������� �� ��������. ��� ������� ������������ ������� ����� �������, �������� ��������� ��������, � ��� ���������� ������ ������ �� ������� � ����� �� ������� �������, �.�. ��� ����� ������ �� ����� ����� �� ��� � ������ � ���� � �� �� �������, �.�. ������ ��������, � ������� ��� ����������� ������������� �� ����� �������� ����� ������ ������� - ���� ����, ����������, ������ � ��� �������. �� ��������, ������ �������� ��� 106-� ����� ��������� ��������� (tile, elevation, LastCritter) ������ NextCritter'�. �������: found:=metarule3((106),tile_num(xxxxx),elevation(dude_obj),0); ��� ��� ������� ������� �������� ���������� FirstCritter'� �� ������ �����, �������� ������� ��������� ������� � �������. �������� �������� ��� ������� ���������� ������ � NextCritter'�. ����� ������� �������� ��� ������� �������, �� ����, ��� � ������ � ���� ����, ���� ���������: ����� ������� ��������, ������ �� ���� �������, ���������, ���� �� � ����� ��� �����, ���� ���� - ���������� found'�. ��� � ������� ���� ��������� ������ ����� ������� ������ �� ���� ����/���� ����� � �� �������, � ���������� �������� ��������� �������� ������ �� ��������� ��������. ��! ��� ���������: next:=metarule3((106),tile_num(found),elevation(dude_obj),found); ���������, ��� next == found. �.�. �������� ���������� ������ � NextCritter'�, ���� �������� ��� �������� ��� ����� �� � ���������� - ��� ������� �����������. ����� ������� ��������� ��������!! ================================== � ������������� �������� ����� ���������� �� ������� get_critter_stat � �.�., ������� ������ � ��� ������� �����, �������, ������������� � �.�. �������������, ������� - ��� ��������� ������ �������, �� ������� 0-� - ��� �������, 35-� - ��� ������� ���� � �.�. � �� �������� �� 106-� ���� �������� �������� ���� ���������, ��� � ��������, �� ����������� �� �����, ��������������� "��� ����� � ���� ������", ��� � �������� ���� "������� ����� �������� � ����� ��������", � ������������ �������� (�� �������, �� ���������� ��������� ��� ��� � ������, ���� � ��������� ����� ������������� ���� � next � found), ��� � �������� - ��� ������ �����-�� �����, � � ����� ��� ����� ��������� �� ������ ������ ������, ������ ��� � ����� ����� ����� ���� �������� ����� ���� ������� �������. � ������: ��� ���������� � ������ ����� � ��� �����������? "�����������" � ������ ��� get_critter_stat(self_obj,35) ������ ������� ���� ��������, ��� ��� proto_data(3,14) ������ ���� �����-�����, ��� ������� � ����� tile_data(xxxxx,1) - �������� �� ��������� �� ������ ������ ���������, � ���� ����� ��������������. ������, ��������, ����� � ����������� ������ ������: ����� ����� � ������ � ������, ��� ����������� ���� ������������, ��������������, �������������� �������� � �.�. �������� ������ ����� ���-��������. � ���� ��� ���, �� ������ ������ �������� ����� ������������� �������, ���� ���, ��� � ������� ������� ���� (tile_data(xxxxx,1) - ������ ������ ���������, tile_data(xxxxx,0) - ������ ������ ���������, � �.�.), ������ ���������, �������, ��-������, �������������� (������ �� �������� �������� �����, � �� �������� - ���), �, ��-������, ��� � ������������ �������� �� ������ ������� ����������, ���������� � define.h �� ������� ��� ��� ��������, ����������� �� ����������������, �� �� ����� �������!
|
����������: 15:41 - 22 ����, 2007
|
|
Ray
���������
������: ������,������� �����������: ���. 2004
�����: 746 ���������
|
������: � ���� ��� ���, �� ������ ������ �������� ����� ������������� �������, ���� ���, ��� � ������� ������� ���� ...
���� � ���, ��� ��� �� ������� �� ������, ��� ��� ����� �������������� �������. ���������� � ������� �������� �-�� �� ���������, � ��������� �� ������. � �� ��� ��� ����� ��������� ����� ��������. ��������������, ���� �������� ������������� �-�� ����� ������� ����. � ��� ��� ���������� �� � ���� ��� �� � ������ ������. ���� �� ��������� - � �� ��� � �������������
----- �� ������ ����������� ����� � ������ ���� �������.
|
����������: 0:48 - 23 ����, 2007
|
|
JSilver
������������
������: Moscow �����������: ���� 2007
�����: 20 ���������
|
�������. �� ������ �������, ��� ���� �������, ����� ���� ������ � ��� ���������, ���������� � ����� ���������� �� ��� ����� ���� ���� array1[x,y].field1 � array2[z].field555, � �������� ��������� "�����������" �������, � ������� ��� x,y � z ���� ������ ��������?? � ���� � ������-������ ���� ���� ������� ����� ������� ������� ����������, �� �� � ������ ������� ������ ����� ������������, � � ������-������ ������� - �� ����������, �� ���� ������������ � ���� ������, ������� ���������� hex-editor, �� � �� ����� ����� ������� ��������� �������� ��� ������� � �� � ���. ======= �� ����� ��������: � ���� ����� �� ����? 106-� ���� ������������� �� ��������? ������ ��������, �� �� ���������.
|
����������: 11:06 - 23 ����, 2007
|
|
Tehnokrat
���������
������: ����������� �����������: ���. 2003
�����: 489 ���������
|
������: � ���� � ������-������ ���� ���� ������� ����� ������� ������� ����������, �� �� � ������ ������� ������ ����� ������������, � � ������-������ ������� - �� ����������, �� ���� ������������ � ���� ������, ������� ���������� hex-editor, �� � �� ����� ����� ������� ��������� �������� ��� ������� � �� � ���.
��� ������. ������� �� ������� ������� ��������� � �����, ������� �������� ���� ��� ���������� �������. ����� ���������� ���������, ��������������� ������� ������ � ����������� �� ������� ��������� �������. � ������ ����� ���������� ���������, ���������� �� ������ ��������. ����� �������� ������������ ���������� �������, ������������ ����� ���� ����� ���������, �� ������� ��������� ���������, ��� ����������� � ���� ����� �� �����.
������: �� ����� ��������: � ���� ����� �� ����? 106-� ���� ������������� �� ��������? ������ ��������, �� �� ���������.
�����������. ��� �������� �� ��������� ������ �� ���� ������������ � �� ���������� ��������� �� ���������� �������� �� ��������� �� �����������. ������������, ��� ���� ��������������� - ��������� ����������� ������� �� �������� ���� � ��� ������� "found:=metarule3((106),tile_num(xxxxx),elevation(dude_obj),0);" ���� ������� �� ��������.
----- ������� ����� ������, �� ������ ��������. ������� ����� ��������, �� ������ ������.
|
����������: 23:33 - 23 ����, 2007
|
|
JSilver
������������
������: Moscow �����������: ���� 2007
�����: 20 ���������
|
����, ��� ����� � ���������� (�������: JSilver; ������������: Ray, Tehnokrat): metarule3(106, tile, elev, lastcritter) ����� ������������ ������ ��� ���������� ������ ������� �������� � �����, �.�. ������� metarule3(106, tile, elev, 0), � �������� �� ��� �������� ������. � ����� ���� �� ��� ���� ����� ������������, ��� ��� ������� � ����������, ���� �� ��� ����, ����� ������������� ������������ move_to ��� destroy_object, ������� ���� ���� �����������. �������� ������������� ���� ����������� �������� ��������� ������ ��������� ������ ����� ��� � ������� � ��� ���������. ���������� �� ����� ������� ������, ��� ����� ����� ������� ����� ������ � ���� ��������� �� ������ ����, ��� "�� ����� �����, ��� � ���� �������� ���� ����� ��� ������� ����, �� ��� �� ��� ����� ��� �������� ������ � ��� ����� � ����� ��� ����� �������� � ���� � ��� �� ����, ������� �������� �������", �������� �� ����� ������ ��������, ���������/���������� ����������� ����������� � ������, ���������� �� �����, ��������� ��� 5 �����, �� ����������� ���������. ��������� ����������� �� �������� ��� ����, ��� �� �����-�� �������� �������, ������� � ������� �������� ��� "���������� ���� �������� ������ ������ ����� � ����� ���� "������" �� ����� �� ���", ����, ������ ������������� �� ������ ���������, ������������ �� ������ �� �� �� ����� ����� ��� ������� �����, � ����-����� ���� ���� � ����� �������. ��������������, ��� ��������� ����������� �� ����� ������� ����� ��� �� ���������� ����, ������� ��� ���� ����� ����� �����������. ����� ������� ��������� 100% ����� �� 100% ������ ���������� �� � 100% �������. ��, ��� �� �����, ��������� ��� ��������� ��� �� ��������� �������� ������ �����, ��� �� ������ ����� ������� ����� ��� ��� ����������� ���� ����� ����� ���� �� ������, � ���������� ��� ��� ������� - ������� ��� ��� ������ ���� ��������� � ������ "����� �����", �� � ����� ���������� ��������. ���� ����-�� ���� - ���� �������� ��������������� ����� ����, ������� ������ ���� ������ - ���� ��, � ������� �� ��� ��� ����.
|
����������: 11:08 - 24 ����, 2007
|
|
Jordan 63
������������
������: ������, ������ �����������: ���� 2007
�����: 228 ���������
|
JSilver ���� ����-�� ���� - ���� �������� ��������������� ����� ����, ������� ������ ���� ������ - ���� ��, � ������� �� ��� ��� ����. ���� ����������.
|
����������: 12:37 - 24 ����, 2007
|
|
JSilver
������������
������: Moscow �����������: ���� 2007
�����: 20 ���������
|
procedure loot_critter (variable R, variable stage) begin variable elev; variable tile; variable next; �elev:=elevation(dude_obj); �if (stage==0) then � �begin � � �FoundObj:=find_critter(R,dude_tile,elev); � � � �if (FoundObj>0) then � � � � �begin � � � � � �set_looting(1); � � � � � �if (tile_distance(self_tile,tile_num(FoundObj)) < 7) � � � � � � �then animate_move_to_tile(tile_num(FoundObj)); � � � � � � �else animate_run_to_tile(tile_num(FoundObj)); � � � � �end � �end �else if (stage==1) then � �begin � � �tile:=tile_num(FoundObj); � � �if (tile_distance(self_tile,tile)<=2) � � � �then � � � � �begin � � � � � �tile:=tile_num(FoundObj); � � � � � �move_obj_inven_to_obj(FoundObj,self_obj); � � � � � �move_to(FoundObj,0,elev); � � � � � �next:=metarule3((106),tile,elev,0); � � � � � �if (next>0) � � � � � � �then � � � � � � � �begin � � � � � � � � �if ( (obj_type(next)==1) and (critter_state(next) == CRITTER_IS_DEAD) ) � � � � � � � � � �then � � � � � � � � � � �begin � � � � � � � � � � � �destroy_object(FoundObj); � � � � � � � � � � � �FoundObj:=next; � � � � � � � � � � �end � � � � � � � � � �else � � � � � � � � � � �begin � � � � � � � � � � � �move_to(FoundObj,tile,elev); � � � � � � � � � � � �set_looting(2); � � � � � � � � � � � �FoundObj:=0; � � � � � � � � � � �end � � � � � � � �end � � � � � � �else � � � � � � � �begin � � � � � � � � �move_to(FoundObj,tile,elev); � � � � � � � � �set_looting(2); � � � � � � � � �FoundObj:=0; � � � � � � � �end � � � � �end � �end end procedure find_critter (variable R, variable base, variable elev) begin variable begin found:=0; ok:=0; i;j;d;tile; end �i:=R+1; �while ((i>-r) and (ok==0)) do � �begin � � �i:=i-1; � � �d:=(r-i)*2; � � �if i>0 then d:=d+1; � � �j:=d+1; � � �while ((j>-d) and (ok==0)) do � � � �begin � � � � �j:=j-1; � � � � �tile:=base+200*i+j; � � � � �if (tile_distance(tile,base)<=r) then � � � � � �begin � � � � � � �found:=metarule3((106),tile,elev,0); � � � � � � �if (found>0) then � � � � � � � �if ((found != dude_obj) and (found != self_obj)) then � � � � � � � � �if (critter_state(found) == CRITTER_IS_DEAD) then � � � � � � � � � �if (inven_count(found)>0) � � � � � � � � � � �then ok:=1; � � � � � �end � � � �end � �end �return found; end
|
����������: 18:01 - 29 ����, 2007
|
|
Wasteland Ghost
��������� ���� ����������
������: ������, ������ �����������: ���. 2002
�����: 2251 ���������
|
������: ���������� �� ����� ������� ������, ��� ����� ����� ������� ����� ������ � ���� ��������� �� ������ ����, ��� "�� ����� �����, ��� � ���� �������� ���� ����� ��� ������� ����, �� ��� �� ��� ����� ��� �������� ������ � ��� ����� � ����� ��� ����� �������� � ���� � ��� �� ����, ������� �������� �������"
�� ��������� ��� ��������� ����� � ��������� ������� �������� �� �������?
|
����������: 12:08 - 2 ���., 2007
|
|
JSilver
������������
������: Moscow �����������: ���� 2007
�����: 20 ���������
|
������: �� ��������� ��� ��������� ����� � ��������� ������� �������� �� �������?
����, ������ �� ������.... ���� ������������� �� ������� ��. �, ��������, ��������� ����� ��������� ���������� �����, � � ��� ��� ��� ��������� �� �����, ��� ����� � �������������� ����� ��� ���������� - � ������ �� ������� �������� �� ��� ��������. ��! ��� ����������! � ������, ��� ������ �� ���� ���������� ��� 106 �������� � ������ ��������, ������ ������ ���, ��� �����������������, �.�. ������ ���������� ��������, � �� ������ �������. ��� ���� ����� ������� � ������ ����� �������, � ������ ������� (�� ��������, ��������) ���� - �� ��� ��������, ��� ��� ������ ��� ��� � ���������. � ����?
|
����������: 3:02 - 5 ���., 2007
|
|
Ray
���������
������: ������,������� �����������: ���. 2004
�����: 746 ���������
|
������: � ����?
���, �� ����. ����� �� ���������� ������� ����� ��� �� ������� �� ����������. ����� ��� � �� ���������, �� � ������ ��������� � ����� �� �������. ��������� ���� �-�� �������������� metarule ����� ������ �� ����������.
----- �� ������ ����������� ����� � ������ ���� �������.
|
����������: 11:48 - 5 ���., 2007
|
|
| |
|