поизонинг

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
lpushech
Posts: 33
Joined: 2007-09-02 19:16:55

поизонинг

Post by lpushech »

Code: Select all

var cont='0x40477AE9'
var ns='0x0F88'
var bottle='0x0F0E'
var colorpoison='0x0998'
var dagger='0x401116E1'

sub main()
uo.cancelmenu()
uo.automenu('What sort of potion do you want to','(last)')
uo.useobject(cont)
wait(500)
while not uo.dead()
 checkns()
 checkbottles()
 alchemypoison()
 poisondagger()
wend
endsub

Sub checkns()
uo.findtype(ns,'-1','backpack')
if uo.getquantity('finditem')<=10 then
 uo.findtype(ns,'-1',cont)
 if uo.findcount() then
  uo.moveitem('finditem','100','backpack')
  wait(500)
 endif
endif
endsub

Sub checkbottles()
uo.findtype(bottle,'0x0000','backpack')
if uo.getquantity('finditem')<=10 then
 uo.findtype(bottle,'-1',cont)
 if uo.findcount() then
  uo.moveitem('finditem','100','backpack')
  wait(500)
 endif
endif
endsub

Sub alchemypoison()
uo.deletejournal()
uo.usetype(ns)
repeat
 Wait(50)
until UO.InJournal("You put the") OR UO.InJournal("You toss the failed")
endsub

Sub poisondagger()
UO.FindType(bottle,colorpoison,'backpack')
if uo.findcount() then
 uo.deletejournal()
 uo.waittargetobject(dagger,'finditem')
 uo.useskill('Poisoning')
 repeat
  wait(50)
 until UO.InJournal("You fail to apply") OR UO.InJournal("You apply the poison")
endif
endsub


подправьте пожалуйста чтобы он делал не дедли поизоны а лезер поизоны
TwiN
Posts: 34
Joined: 2008-08-13 01:04:10
Location: Krd
Contact:

Post by TwiN »

uo.automenu('What sort of potion do you want to','(last)')

Вместо (last) впиши тот потион который тебе нужен. Имя указывай точно такое же как и в крафтменюшке которая появляется когда мешаеш вручную. Вроде так, хотя трудно говорить о каких то изменениях не зная как работает алхимия на твоём чудошарде...

Важно чтобы цвет лиссер бутылок был таким же как и дедлов. Иначе ещё нужно будет поменять цифири в переменной colorpoison='0x0998'.
0x0998 - это цвет дедлов...
Если у лиссеров цвет такой же - менять, ессно, не надо...
Post Reply