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

Скриптеры нид хелп!
http://forum.yoko.com.ua/viewtopic.php?f=20&t=570
Page 1 of 1

Author:  M0ke [ 2004-06-15 20:07:48 ]
Post subject:  Скриптеры нид хелп!

Нужен скрипт на мининг:
Чтобы чар копал а как руда кончалась делал шаг в перед и дальше капал.
заранее спасибо!

Author:  tmasolo [ 2004-06-16 13:26:32 ]
Post subject: 

sub main()
var i
var j
UO.DeleteJournal()
while not UO.InJournal("You have hidden")
UO.UseSkill('Hiding')
wait(5000)
wend
start:
for i = 0 to 5

UO.DeleteJournal()

; ************************ первая точка ************************
UO.Print("1111111")
while not UO.InJournal("no ore here to mine.")
Hide()
uo.exec("usetype 'pickaxe'")
wait(1000)
UO.LClick (447,252)
wait(10000)
while not (UO.Hidden())
UO.exec ("useskill 'Hiding'")
wait(7500)
wend
wend


; *****************************вторая точка ***********************
UO.Print("2222222")
UO.DeleteJournal()
while not UO.InJournal("no ore here to mine.")

Hide()
uo.exec("usetype 'pickaxe'")
wait(1000)
UO.LClick (451,281)
wait(10000)
while not (UO.Hidden())
UO.exec ("useskill 'Hiding'")
wait(7500)
wend
wend

; *****************************3 точка ***********************
UO.Print("33333333")
UO.DeleteJournal()
while not UO.InJournal("no ore here to mine.")
Hide()
uo.exec("usetype 'pickaxe'")
wait(1000)
UO.LClick (445,300)
wait(10000)
while not (UO.Hidden())
UO.exec ("useskill 'Hiding'")
wait(7500)
wend
wend

; *****************************4 точка ***********************
UO.Print("4444444")
UO.DeleteJournal()
while not UO.InJournal("no ore here to mine.")
Hide()
uo.exec("usetype 'pickaxe'")
wait(1000)
UO.LClick (417,312)
wait(10000)
while not (UO.Hidden())
UO.exec ("useskill 'Hiding'")
wait(7500)
wend
wend

UO.Press(39)
wait (500)

UO.Press(39)
wait (500)

UO.Exec("usetype eda")
UO.Print("STOP !!!!")
next
for j = 0 to 9
UO.Press(37)
wait (500)
while not (UO.Hidden())
UO.exec ("useskill 'Hiding'")
wait(7500)
wend

next

goto start

end sub

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/