Yoko
http://forum.yoko.com.ua/

Удочки
http://forum.yoko.com.ua/viewtopic.php?f=20&t=1783		 Page 1 of 1
Author:  zarg [ 2004-10-30 11:12:01 ]
Post subject:  Удочки
У кого нить есть скрипт что бы выбирать сундук с логми выбирать мусорку и делать удочки?
Author:  Peace [ 2004-10-30 11:28:07 ]
Post subject: 
var backpack='0x40056534'
var sunduk='0x40270a3e'
var rune_to_home='0x4027e9d5'
var rune_to_vendor='0x40090c09'
var a=0

sub carpentry()
while not uo.dead()
if proverka()==1 then
uo.print('Что-то не так...')
else
do_fishing_pole(132)
endif
wend
endsub

sub proverka()

if uo.count(0x0DBF)>131 then #Проверяем, сколько удочек, если больше или равно 132, то реколимся к вендору, продаём и обратно.
go_to_vendor()
sell()
go_home()
end if

if uo.count(0x0EED)>0 then
uo.findtype(0x0EED,-1,backpack)
uo.moveitem('finditem',-1,sunduk)
wait(500)
end if

if uo.count(0x1030)<1 then #Проверяем инструмент
uo.print("Нету инструмента в сумке")
return 1
end if

uo.findtype(0x1BDD,-1,backpack)
if uo.findcount()<1 then #Проверяем логи в паке
uo.findtype(0x1BDD,-1,sunduk) #Проверяем логи в сундуке
if uo.findcount()>0 then
uo.grab('132','finditem')
wait(500)
do_fishing_pole(132)
else
uo.print("Не осталось больше логов в ящике")
return 1
end if
end if
a=0
endsub

sub do_fishing_pole(kolvo)
a=0
for var i=0 to kolvo
proverka()
uo.findtype(0x1BDD,-1,backpack)
if uo.getquantity('finditem')<=4 then
uo.cancelmenu()
uo.waitmenu('Weapons & Tools','fishing pole')
uo.usetype('0x1030')
uo.deletejournal()
while 1<>a
if uo.injournal("You put the fishing pole in your pack.") or uo.injournal(uo.getname()+": You fail to create the item") then
a=1
end if
wait(10)
wend
else
uo.cancelmenu()
uo.waitmenu('Carpentry','Weapons & Tools','Weapons & Tools','fishing pole')
uo.usetype('0x1030')
uo.deletejournal()
while 1<>a
if uo.injournal("You put the fishing pole in your pack.") or uo.injournal(uo.getname()+": You fail to create the item") then
a=1
end if
wait(10)
wend
end if
a=0
next
endsub

sub go_to_vendor()
var x=uo.getx()
var y=uo.gety()

uo.cast('Recall')
uo.waittargetobject(rune_to_vendor)
wait_for_recall()
wait(1500)
check_for_fade(rune_to_vendor)
var xmax=uo.getx()+10
var ymax=uo.gety()+10
var xmin=uo.getx()-10
var ymin=uo.gety()-10

if x<xmax and y<ymax and x>xmin and y>ymin then
go_home()
endif
endsub

sub sell()
for var i=0 to 4
uo.sell('sell_FP')
wait(1000)
next
endsub

sub meditation()

var tj=uo.getname()+": You lose your concentration"
uo.deletejournal()
uo.useskill('Meditation')
wait(1500)

for var i=0 to 150 #Можно было в одном цикле сделать,
if uo.journal(0)==tj then #но решил с рекурсией не шутить
meditation() #из-за глючности инжи.
return 0
end if
wait(10)
next

while uo.mana<>uo.int
if uo.injournal()==tj then
meditation()
return 0
end if
wait(100)
wend

endsub

sub check_for_fade(a)

uo.print('Проверяем количество оставшихся зарядов...')
var colvo=uo.journal(1)
while '('<>colvo[0]
uo.click(a)
wait(200)
colvo=uo.journal(1)
if '('==colvo[0] then
if val(colvo[1])<7 then
if val(colvo[1])==2 or val(colvo[1])==1 then
return 0
else
wait(3000)
uo.cast('Mark',a)
wait_for_cast()
end if
end if

end if
wend

endsub

sub go_home()
var x=uo.getx()
var y=uo.gety()

uo.cast('Recall')
uo.waittargetobject(rune_to_home)
wait_for_recall()
wait(1500)
check_for_fade(rune_to_home)
var xmax=uo.getx()+10
var ymax=uo.gety()+10
var xmin=uo.getx()-10
var ymin=uo.gety()-10

if x<xmax and y<ymax and x>xmin and y>ymin then
go_home()
endif
endsub

sub wait_for_recall()

var tj=uo.getname()+": The spell fizzles.",tj1="You lack sufficient mana for this spell"
var x=uo.getx(),y=uo.gety()
uo.print('Ждём рекола...')
for var i=0 to 200

if uo.Journal(0)==tj then
uo.print('Fuck ! Fizzle ! Repeat cast...')
uo.cast('Recall','lasttarget')
wait(3000)
wait_for_recall()
return 0
end if
if uo.Journal(0)==tj1 then
uo.print('Ooohhhh ! Shit ! Where is my mana ? Meditation - rulezzzz...')
meditation()
uo.cast('Recall','lasttarget')
wait_for_recall()
return 0
end if
wait(1)
next

wait(3000)

if uo.Journal(0)==tj or uo.Journal(1)==tj or uo.Journal(2)==tj and x==uo.getx() and y==uo.gety() then
uo.print("Oooooo =( I'm here again ! Repeat cast !")
uo.cast('Recall','lasttarget')
wait(4000)
wait_for_recall()
end if

endsub

sub wait_for_cast()

var tj=uo.getname()+": The spell fizzles.",tj1="You lack sufficient mana for this spell"
for var i=0 to 400
if uo.Journal(0)==tj then
uo.print('Fuck ! Fizzle ! Repeat cast...')
uo.cast('last','lasttarget')
wait(3000)
wait_for_cast()
return 0
end if
if uo.Journal(0)==tj1 then
uo.print('Ooohhhh ! Shit ! Where is my mana ? Meditation - rulezzzz...')
meditation()
uo.cast('Recall','lasttarget')
wait_for_cast()
return 0
end if
wait(10)
next

endsub

sub gz_mode()
var vas=uo.gethp()
while 1
if vas>uo.GetHP() then
uo.say('guards')
wait(300)
uo.say('guards')
wait(300)
uo.say('guards')
wait(300)
uo.say('guards')
wait(300)
vas=uo.gethp()
endif
vas=uo.gethp()
wait(30)
wend
end sub


sub kolvo_udoshek()
var k=uo.count(0x0DBF)
uo.textprint(k)
endsub

sub podbor()
uo.findtype(0x0EED,-1,'ground')
uo.grab(1,'finditem')
endsub
Author:  AGRS [ 2004-10-30 12:51:57 ]
Post subject: 
Ты что, с дуба рухнул?! Возьми свой на посохи и исправь менюшку.
Author:  Edred [ 2004-10-30 13:34:20 ]
Post subject:  Re: Удочки
zarg wrote:
У кого нить есть скрипт что бы выбирать сундук с логми выбирать мусорку и делать удочки?


Есть соседний раздел, зовется Scripts! Там есть именно такой скрипт, единственное только серийники сундука и мусорки тебе придется вручную вписать в переменные в начало скрипта.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/