sub mine()
UO.DeleteJournal()
var x, y, i, tmp, inside, goto_x, st, first
st=0
first=UO.GetX()
for y=-2 to 2
for x=-2 to 2
wait (500)
UO.Exec ("waittargettile "+" 1340 "+STR(UO.GEtX()+x)+" "+STR(UO.GetY()+y)+" 0")
UO.exec ("usetype 0x0E85")
#UO.Print (""+STR(x))
#UO.Print (""+STR(y))
i=0
while i< 100
if UO.InJournal("You loosen some rocks but fail to find any useable ore") then
wait (1000)
i=200
UO.DeleteJournal()
goto try
endif
if UO.InJournal("Try mining elsewhere") then
i=200
UO.DeleteJournal()
endif
if UO.InJournal("You must wait to perform another action") then
wait (1000)
i=200
UO.DeleteJournal()
goto try
endif
if UO.InJournal("There is nothing here to mine for") then
wait (1000)
i=200
UO.DeleteJournal()
endif
if UO.InJournal("You have no line of sight to that location") then
wait (1000)
i=200
UO.DeleteJournal()
endif
if uo.InJournal("Elemental") or uo.InJournal("is attacking you") or uo.Dead() then
uo.playwav("D:\Games\inj\alert.wav")
UO.exec ("usetype 0x0E85")
UO.Exec ("useskill Hiding")
wait (60000)
uo.sayu('Up')
i=200
UO.DeleteJournal()
goto try
end if
wait (500)
;UO.FindType(0x19B9, 0x06D6, 2)
;UO.Drop('0',STR(UO.GetX('self')),STR(UO.GetY('self')),STR(UO.GetZ('self')),'finditem')
i=i+1
wend
next
next
if st == 0 then
goto_x=UO.GetX()+5
while inside < 10
while UO.GetX() < goto_x
UO.Press (39, 1, 500)
inside=0
wend
while UO.GetX() > goto_x
UO.Press (37, 1, 500)
inside=0
wend
inside=inside+1
wait (300)
wend
st=1
goto start
endif
if st == 1 then
while inside < 10
while UO.GetX() < first
UO.Press (39, 1, 500)
inside=0
wend
while UO.GetX() > first
UO.Press (37, 1, 500)
inside=0
wend
inside=inside+1
wait (300)
wend
st=0
endif
goto start
end sub
Yoko wrote:лично я не занимаюсь скриптами бесплатно, да и времени у меня нет. насчёт остальных не знаю.
Огромный тебе поклон псц помог бы лучше,чем еще раз доказивать кто тут босс,а еще лучше есле бы ТЫ зделал норм учебник ро инжектион а то какуето нюбскую инструкцию по применению.
Deivil wrote:Эта тема висит уже нехнаю скока и не кто не может найти Мизерную ошибку в скрипте вобще просто атас!
Да просто такого кривого скрипта еще поискать надо. Проще написать новый, чем править этот. Поищи на форуме, здесь есть нормальные рабочие скрипты с ходилкой.
Yoko wrote:лично я не занимаюсь скриптами бесплатно, да и времени у меня нет. насчёт остальных не знаю.
Огромный тебе поклон псц помог бы лучше,чем еще раз доказивать кто тут босс,а еще лучше есле бы ТЫ зделал норм учебник ро инжектион а то какуето нюбскую инструкцию по применению.
Я бы на месте модератора рид онли поставил как минимум на недельку за такие заявления...
Ты платишь за инжект чтобы предъявлять хоть какие-то требования?
Вот взял бы и написал норм учебник (шутка конечно, вряд ли ты хоть что-то можешь написать), чем требовать то, что ты не имеешь права требовать...
I'm [color=red]Titanium [Dragon][/color] from [color=red]Nova[/color] UO Shard
Yoko wrote:лично я не занимаюсь скриптами бесплатно, да и времени у меня нет. насчёт остальных не знаю.
Огромный тебе поклон псц помог бы лучше,чем еще раз доказивать кто тут босс,а еще лучше есле бы ТЫ зделал норм учебник ро инжектион а то какуето нюбскую инструкцию по применению.
По-моему стоит сказать спасибо только за создание такого чуда как инжект.
Yoko wrote:лично я не занимаюсь скриптами бесплатно, да и времени у меня нет. насчёт остальных не знаю.
Огромный тебе поклон псц помог бы лучше,чем еще раз доказивать кто тут босс,а еще лучше есле бы ТЫ зделал норм учебник ро инжектион а то какуето нюбскую инструкцию по применению.
Только нупы его и не понимают...
З.Ы.Если ты сам не можешь разобраться не надовалить на других...
З.Ы.Ы У других ты можешь спросить только совета...