Code: Select all
target target_key lasttile/object/ground [type graphic X Y Z]
where type=0 object, type=1 xyzIncorrect User wrote:Кстати неплохо было бы иметь нормальную команду таргет. Иногда возникала в ней потребность. Может переделаете эту? И чтобы прицел в клиенте не оставался. Но суть не в этом, у меня копал чар на их сервере с этой командой. Правда я задержку не ставил как вы говорили но он рыл, так же как с waittargettile.
Incorrect User wrote:Кого рубит?) Ну раз копает так копай на стелсе. У нас программистов дефицит, чтобы из инжекта сделать прелесть
Incorrect User wrote:Найди любой мининг на стелс я переделаю под твой шард.
Incorrect User wrote:Ну что копает?
Code: Select all
program Mining;
const
allmsg = 'слишком далеко|too far away|не осталось руды|no ore here|mining in rock|loosen some rocks|Ore in your pack|Ores in your pack'
endmsg = 'слишком далеко|too far away|не осталось руды|no ore here|mining in rock'
var
mx, my, mz, i, j:integer;
starttime : tdatetime;
Begin
mx:=GetX(self);
my:=GetY(self);
mz:=GetZ(self);
for i:=mx-3 to mx+3 do
for j:=my-3 to my+3 do
repeat
starttime:=Now;
Waittargettile('1341',i,j,mz);
Usetype($0E85);
WaitJournalLine(starttime,allmsg,10000);
until injournalbetweentimes(endmsg,starttime,now);
end.
Incorrect User wrote:Зачем мне пихать все скрипты подряд? Нужно было тот которым ты собираешься пользоваться, а там один для скал, другой для шахт... С этим не ко мне.Вот тебе, бери копайCode: Select all
program Mining;
const
allmsg = 'слишком далеко|too far away|не осталось руды|no ore here|mining in rock|loosen some rocks|Ore in your pack|Ores in your pack'
endmsg = 'слишком далеко|too far away|не осталось руды|no ore here|mining in rock'
var
mx, my, mz, i, j:integer;
starttime : tdatetime;
Begin
mx:=GetX(self);
my:=GetY(self);
mz:=GetZ(self);
for i:=mx-3 to mx+3 do
for j:=my-3 to my+3 do
repeat
starttime:=Now;
Waittargettile('1341',i,j,mz);
Usetype($0E85);
WaitJournalLine(starttime,allmsg,10000);
until injournalbetweentimes(endmsg,starttime,now);
end.
Code: Select all
program Mining;
const
allmsg = 'слишком далеко|too far away|не осталось руды|no ore here|mining in rock|loosen some rocks|Ore in your pack|Ores in your pack';
endmsg = 'слишком далеко|too far away|не осталось руды|no ore here|mining in rock';
var
mx, my, mz, i, j:integer;
starttime : tdatetime;
Begin
mx:=GetX(self);
my:=GetY(self);
mz:=GetZ(self);
for i:=mx-3 to mx+3 do
for j:=my-3 to my+3 do
repeat
starttime:=Now;
Waittargettile('1341',i,j,mz);
Usetype($0E85);
WaitJournalLine(starttime,allmsg,10000);
until injournalbetweentimes(endmsg,starttime,now);
end.