Мининг на РУО

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Saruman
Posts: 27
Joined: 2005-03-04 14:09:23

Мининг на РУО

Post by Saruman »

Ну как ни пытался отредачить этот скрипт,не получалось,после первой дырки скрипт стоит
ну хелп :roll:

Code: Select all

sub mining() 
var mx, my, mz, i, j
var ismining, ixx, isheavy
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
UO.DeleteJournal()
for i = mx-2 to mx+2
for j = my -2 to my+2
UO.Print("Now Mining In: "+str(mx-i)+" "+str(my-j))
ismining = 1
while not UO.InJournal("Try mining elsewhere") and not UO.InJournal("is nothing") and not UO.InJournal("can't") and not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("can't use") and not UO.InJournal("far away") and not UO.InJournal("in rock") and ismining

wait(400)

UO.DeleteJournal()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype('0x0E85')
if UO.Weight>840 then
UO.recall('0x40023FBD','2')
Return
endif
ixx = 0
ismining=1
while not UO.InJournal("Try mining elsewhere") and not UO.InJournal("Здесь больше нечего") and not UO.InJournal("You put") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("can't use") and not UO.InJournal("far away") and not UO.InJournal("in rock") and ixx <= 100
wait (100)
ixx = ixx + 1
wend



if uo.injournal("Rusty") then
ismining = 0
endif
if uo.injournal("Old Copper") then
ismining = 0
endif
if uo.injournal("Dull Copper") then
ismining = 0
endif
if uo.injournal("the Copper") then
ismining = 0
endif
if not ismining then
uo.print("Not mining here")
endif
wend
UO.DeleteJournal()
next
next
uo.print("*** Script ended ***")
end sub
sub healing()
UO.SetArm('CWeapon')
UO.Exec("bandageself")
wait(500)
UO.Arm('CWeapon')
end sub


while not UO.InJournal("Try mining elsewhere") and not UO.InJournal("Здесь больше нечего") and not UO.InJournal("You put") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("can't use") and not UO.InJournal("far away") and not UO.InJournal("in rock") and ixx <= 100


красную строчку надо поправить,и у меня чо та не доходит на что поправить :roll: (ЗЫ там раньше стояла ("is nothing") )
помогите плз
Saruman
Posts: 27
Joined: 2005-03-04 14:09:23

Post by Saruman »

а ещё,его в соседку пихните :wink: работает на ролевых шардах типо Антареса,ВХ, и всяких других,просто в скрипте нужно поменять тип кирки,и вуаля :wink:
Saruman
Posts: 27
Joined: 2005-03-04 14:09:23

Post by Saruman »

и чо вы все игнорируете?
помогите блин! :cry:
flake
Expert!
Posts: 746
Joined: 2004-08-11 23:56:17
Location: The Citadel
Contact:

Post by flake »

Внимательно проверь сообщения на нужном шарде.
Ничего больше не могу сказать, не играл там.
Удачи!
Post Reply