Page 1 of 1

Обклад бомбами

Posted: 2005-09-22 21:01:54
by sin-sochi

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


можно ли его переделать так, чтобы бомбы ложились не под ноги а вокруг

Posted: 2005-09-23 10:00:51
by netol
сколько именно тебе надо вокруг 2 или 3 или вообще чтоб он его обложил

Posted: 2005-09-23 15:24:02
by sin-sochi
нада чтоб он вокруг противника обкладывал 10 эксплов, тока не под ноги а вокруг

Posted: 2005-09-23 16:30:38
by netol

Code: Select all

sub eks()

var i,n,mx,my,mz

mx=uo.getx('last')
my=uo.gety('last')
mz=uo.getz('last')

for i=mx+1 to mx-1
for n=my+1 to my-1
uo.findtype('0x0F0D','0x0B99','backpack')
if uo.findcount()>0 then
uo.drop('1',str(i),str(n),str(mz),'finditem')
checklag()
else
uo.print("Net nichego!!!")
end if
next
next
uo.playwav("c:\inject\SOUND\REMINDER.wav")
UO.Print("!ЖМИ!")
end sub

Posted: 2005-09-24 09:29:18
by sin-sochi
спасибо большое

Posted: 2005-09-24 09:32:20
by sin-sochi
тока возникла одна проблема
. он бросает бомбы себе под ноги,

Posted: 2005-09-24 09:37:14
by netol
кавычки где i,n,mz поставь

Posted: 2005-09-24 14:39:04
by sin-sochi
PARSE ERROR
пеперь вопще не работает

Posted: 2005-09-24 15:03:29
by netol
а ты там их поставил? :)
все смотри я переделал

Posted: 2005-09-24 18:37:12
by sin-sochi
Скрипт НЕ РАБОТАЕТ, даже измененный

Posted: 2005-09-24 19:19:19
by netol
терь точно должен работать

Posted: 2005-09-26 19:31:59
by sin-sochi
я так думаю, что я уже надоел
НО СКРИПТ ДАЖЕ ПОСЛЕ ПЕРЕДЕЛКИ НЕ РАБОТАЕТ
:shock:

Posted: 2005-09-28 12:02:56
by -=WOLVERINE=-

Code: Select all

sub Drop() 
uo.FindType('0x0f0d', '0x0B99')
uo.Drop('1', Str(uo.GetX('laststatus')-1), Str(uo.GetY('laststatus')), Str(uo.GetZ('laststatus')), 'finditem')
wait(400)
uo.FindType('0x0f0d', '0x0B99')
uo.Drop('1', Str(uo.GetX('laststatus')+1), Str(uo.GetY('laststatus')), Str(uo.GetZ('laststatus')), 'finditem')

uo.FindType('0x0f0d', '0x0B99', '1')
uo.waittargetObject('finditem')
uo.Cast('Clumsy')
end sub


тут на два експа..надеюсь догадаешься как сделать на 10 и более...

Posted: 2005-09-29 01:25:59
by KIL
Хмм я тут попробовал ваши скрипты !! чёто они все не работают или я просто не знаю как они должны работать ))) он во всех случаях себе под ноги бросает !!

Posted: 2005-09-29 11:14:56
by -=WOLVERINE=-
дабл клик на жртву при включенном варе или просто таргет на жертву...

Posted: 2005-09-29 15:34:13
by KIL
-=WOLVERINE=- wrote:дабл клик на жртву при включенном варе или просто таргет на жертву...


чесно говоря я так делал ! и всеравно он мне под ноги швырнул !!
я их чесноговоря еле унес потом )))

Posted: 2005-09-29 22:50:01
by Sp
в инже в меню main поставь Track world items....будет под врага бросать...

Posted: 2005-09-30 14:41:17
by sin-sochi
скрипт наконец- то рабочий, тока кидает всего 2 эксплойки , а нада 10!

Posted: 2005-10-01 06:58:56
by CrasH!...
sin-sochi wrote:скрипт наконец- то рабочий, тока кидает всего 2 эксплойки , а нада 10!


тебе сказали,поставь скока надо :lol:

Posted: 2005-10-02 23:29:19
by Sp
Краш не позорься....убери аватару...ОТЕЦ БЛИН)))))))))))))))))))