Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7

Скриптеры помогите:)

тут можно задать вопрос по скриптингу
Post Reply
4uk
Posts: 6
Joined: 18.12.2009 22:44

Скриптеры помогите:)

Post by 4uk »

Добрый день. Уважаемые скриптеры помоги пожалуйста.

Нужен скрипт чтобы:
1. был на авто хиле бинтов
2. я ставлю чара в опред местность и там водяться крысы.
3. он кним будет подбегать, убивать и резать.
4. лутить кожу, камни и гп ( ну я могу дописать что лутить если скажите где)
5. если крыс нету то в хайд

Очень буду признателен:)
User avatar
Vizit0r
Developer
Developer
Posts: 3958
Joined: 24.03.2005 17:05
Contact:

Post by Vizit0r »

скрипт немалый и непростой.
начинай писать сам, а я помогу
"Пишите код так, как будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете". (с) Макконнелл, "Совершенный код".
Antoska
Neophyte
Neophyte
Posts: 45
Joined: 10.07.2009 22:21
Location: Латвия, Рига

Post by Antoska »

На Бест УО это скоро не прокатит. :wink:
4uk
Posts: 6
Joined: 18.12.2009 22:44

Post by 4uk »

прокатит:) поверь... тем боле мне для кача пару скилов
4uk
Posts: 6
Joined: 18.12.2009 22:44

Post by 4uk »

Народ у кого есть скрипт простые на стелс.. режит и лутить все и хилит себя к примеру если меньше 100 хп.. не адо там не каких сбрасывания бинтов тупо себя хил до фул столба
WladL
Apprentice
Apprentice
Posts: 240
Joined: 27.07.2009 17:21
Location: DRW
Contact:

Post by WladL »

Писал на скорую руку без проверки, проверяй и правь самостоятельно.

Code: Select all

while true do begin

#ищем крысу
findDistance:=18;
while FindType(крыса)=0 do begin <-------------------------
   UseSkill('hiding');
   wait(2000);
end;

#крыс найден бежим атаковать
moveXY(GetX(finditem),GetY(findItem),false,1,true);
Warmode:=true;
Attack(finditem);
wait(kill_Time); <-------------------------

#хиляемся
while hp<MaxHP do begin
   WaitTargetSelf;
   UseType(Bandage);
   wait(4000);
end;

#режем труп
finddistance:=2;
findtype(Труп_Крыса); <-------------------------
waitTargetObject(finditem);
useType(dagger);  <-------------------------
wait(1000);

#лутаем
while findtype($FFFF,Ground) > 0 do begin
   if isMovable(finditem) then
     grab(finditem,findquantity);
   ignore(finditem);
end;

end;
"Как хочешь ты трудись;
Но приобресть не льстись
Ни благодарности, ни славы,
Коль нет в твоих трудах ни пользы, ни забавы. (с) С.Крылов."
Post Reply