Скрипт мининг, ТП по рунам и домой!

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Orkish
Posts: 8
Joined: 2007-10-09 20:08:53
Contact:

Скрипт мининг, ТП по рунам и домой!

Post by Orkish »

Во общем дело такое.
Телепортиться по руне, копает, проверяет клилок (типо всё выкопал), тп домой, плавит и тут возникает проблемма:
Не хочет ложить в сундук...


sub main()
uo.print("Script version 1.1. Created by ™•Orcish•")
repeat
start()
until UO.Dead()
end sub

Sub start()
check()
uo.cast('Recall',0x400B685C) #1
wait(2000)
mine(1339,2558,496,0) #0,0,0,0 узнаем точку рыться ,infotile
wait(500)
check()
dom()
check()
uo.cast('Recall',0x400B6879) #2
wait(2000)
mine(1339,2561,490,0) #0,0,0,0 узнаем точку рыться ,infotile
wait(500)
check()
dom()
end sub

end sub

Sub mine(t,x,y,z)
uo.deletejournal()
repeat
wait(1000)
uo.waittargettile(str(t),str(x),str(y),str(z))
uo.usetype('0x0F39')
until uo.injournal("cliloc# 0xAD00")
uo.Canceltarget()
end sub

sub dom()
uo.cast('Recall',0x400B6ABF) #0x000000 руна на порог дома
wait(2000)
repeat
UO.findtype('0x19B9','-1','my')
wait(600)
UO.waittargetobject('0x40070E45') #0x0000000 id плавилки
wait(500)
UO.useobject('finditem')
wait(500)
if uo.injournal("cliloc# 0xA2DE") then
uo.deletejournal()
uo.cast('Recall',0x400B6ABF) #0x000000 руна на порог дома
wait(2000)
goto a
else
a:
UO.useobject('finditem')
until uo.findcount() == 0
wait(500)
end if
repeat
UO.findtype('0x0E43','-1','2')
uo.moveitem('finditem','0','0x40069DF6') #0x000000 id ящика
wait(700)
until uo.findcount() == 0
while UO.Count(0x0F43)< 3
uo.findtype(0x0E43,-1,0x40069E5B) #0x000000 id ящика с лопатами
UO.moveitem('finditem','0','0x4000C98F') #0x000000 id бэк пака
wait (700)
wend
end sub

sub check()
while Uo.Mana <10
if UO.Mana <10 then
uo.Canceltarget()
UO.UseSkill("Meditation")
wait(7000)
end if
wend
end sub
ZeroDX
Posts: 718
Joined: 2006-12-08 10:51:50
Location: Москва
Contact:

Re: Скрипт мининг, ТП по рунам и домой!

Post by ZeroDX »

в одном месте перепутаны until и endif.
для разгрузки рекомендую следующую конструкцию

Code: Select all

While UO.Count('тип руды')
  UO.FindType('тип руды', -1, 'backpack')
  If UO.FindCount() then
    UO.MoveItem('finditem', -1, 'айди контейнера')
    Wait(700)
   else
    Return 666
  Endif
Wend
Orkish
Posts: 8
Joined: 2007-10-09 20:08:53
Contact:

Re: Скрипт мининг, ТП по рунам и домой!

Post by Orkish »

Как выполнить проверку на вес? и если превышает то выкинуть любой кусок руды на пол и тп. домой.... а лучше копать до определённого веса ?


и еще чтоб была цикличность... и почемуто не берёт лопаты с сундука=(
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: Скрипт мининг, ТП по рунам и домой!

Post by Mirage »

Не правильно работает потому что в скрипте ошибки. Моя подпись 2 строка - приведи в порядок 1 скрипт (редактировать свое сообщение по правилам постинга тем) и устрани 2 (как минимум) опечатки. Если после этого останутся проблемы - поможем.
Post Reply