Page 1 of 1

Плиз нужен скрипт на бросание експлоров

Posted: 2005-01-20 08:46:15
by *Oslic Padlo*
Люди помогите нужен скрипт на кидание експлоров что кидало штук 6 и сразу же меджиков аров стреляло! мне уже давали какойто но он почему-то не работал ! заранее спасибо !

Re: Плиз нужен скрипт на бросание експлоров

Posted: 2005-01-20 10:37:18
by BETEPAH
*Oslic Padlo* wrote:Люди помогите нужен скрипт на кидание експлоров что кидало штук 6 и сразу же меджиков аров стреляло! мне уже давали какойто но он почему-то не работал ! заранее спасибо !
ослик не надо оправдывать свой ник ........ НЕ ВПАДЛУ НАЖМИ СЮДА

http://yoko.netroof.net/forum/search.php

Posted: 2005-01-21 05:36:38
by *Oslic Padlo*
я что-то нечего не понял ! да и с англиским у меня туго можете поподробее что-то дать ! ветеран спасибо ! и кстати ник у меня зае...ишный :)

Posted: 2005-01-21 10:54:30
by BETEPAH
*Oslic Padlo* wrote:я что-то нечего не понял ! да и с англиским у меня туго можете поподробее что-то дать ! ветеран спасибо ! и кстати ник у меня зае...ишный :)
там была ссылка на Поиск .....просто таких скриптов выкладывали уже многовато

http://yoko.netroof.net/forum/viewtopic.php?p=9517#9517
тут мой автолоуд ...там боевые все и так далее ....

а это то что ты хотел

Code: Select all

sub Bomb() 
UO.FindType('0x0F0D','0x0B99','backpack') 
;UO.FindType('0x0F0E','0x09DA','backpack') 
If UO.GetQuantity('finditem')>0 Then 
UO.DeleteJournal() 
UO.Drop('1',STR(UO.GetX('laststatus')),STR(UO.GetY('laststatus')),STR(UO.GetZ('laststatus')),'finditem') 
Wait(500) 
UO.FindType('0x0F0D','0x0B99','backpack') 
;UO.FindType('0x0F0E','0x09DA','backpack') 
If UO.GetQuantity('finditem')>0 Then 
UO.DeleteJournal() 
UO.Drop('1',STR(UO.GetX('laststatus')),STR(UO.GetY('laststatus')),STR(UO.GetZ('laststatus')),'finditem') 
Wait(500) 
uo.playwav("c:\inject\SOUND\REMINDER.wav") 
UO.Print("!ЖМИ!") 
end sub 

sub Bomb2() 
UO.FindType('0x0F0D','0x0B99','ground') 
UO.Cast('Magic Arrow','finditem') 
end sub