Yoko

All sides of Injection
It is currently 2026-01-18 18:27:34

All times are UTC+02:00




Post new topic  Reply to topic  [ 4 posts ] 
Author Message
PostPosted: 2005-04-25 07:16:06 
Offline
User avatar

Joined: 2005-04-23 07:50:53
Posts: 15
Скриптери доделаиет пожалусто скрипт ВТЕРА
мне после реконекта он просит вибрат лапату и рунебоок и стаит на месте , а нада штоб он без базара вибрал ..
точнеэ штоб он непрасил а просто через ид виберал сам ...
позалусто напишите как ето пишетса ...
зараниэ спасибо.


Code:
sub maning() 
#BETEP™#
var mx, my, mz, i, j, jor, ser, noto
Uo.exec("set norbcheck 1"); для рекола
uo.exec("set norbcalc 1"); тоже

uo.print('!!Выбери Лопату!! ')
uo.exec('addobject Shovel')
while uo.targeting()
wait(100)
wend
 
uo.print('!!Выбери Рунбук!! ')
uo.exec('addobject Runebook')
while uo.targeting()
wait(100)
wend

na4alo:
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
UO.DeleteJournal()
for i = mx-4 to mx+4
for j = my -4 to my+4
while not UO.Hidden()
UO.Warmode("0")
uo.print("Прячемся...")
UO.UseSkill("Hiding")
wait(4000)
wend
UO.Print("Копаем в координатах: "+str(mx-i)+" "+str(my-j))
while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") and not UO.InJournal("Iron Ore") and not UO.InJournal("Copper") and not UO.InJournal("Rusty Ore")
UO.DeleteJournal()
if uo.waiting() then
uo.canceltarget()
endif
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Useobject("Shovel")
while not UO.InJournal("You put") and not UO.InJournal("heavy") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in rock")
wait (500)
if uo.injournal("heavy") or uo.dead() then
pwav()                   
Pause()
endif
for jor = 0 to 9   
ser = uo.journalserial(jor)
noto = uo.getnotoriety(ser)
if noto <> 1 and noto <> 0 and not uo.injournal("elemental") then
if uo.waiting() then
uo.canceltarget()
endif
Save()
pwavw()
wait(180000) ; время в секундах при ожидании пока уйдет ПК
loot()
wait(3000)
goto reccal
endif
next   
wend
if uo.weight > 625 then  ; Максимальный вес при котором домой с рудой
goto end
endif
wend
UO.DeleteJournal()
next
next
goto na4alo
end:
if uo.waiting() then
uo.canceltarget()
endif
uo.exec("recall Runebook 21") ; домой ( в рунбуке слот 1 )
wait(10000)
loot()
wait(3000)
reccal:
uo.deletejournal()
if uo.waiting() then
uo.canceltarget()
endif
uo.exec("recall Runebook 94") ; в шахту ( в рунбуке слот 8 )
mx = UO.GetX("self")
my = UO.GetY("self")
wait(10000)
if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then
goto reccal
endif
goto na4alo
end sub

[Для кого придуманны теги? I'm]


Top
   
 Post subject:
PostPosted: 2005-04-25 12:30:27 
Offline
Expert!
User avatar

Joined: 2005-04-23 10:19:43
Posts: 388
Вот твой скрипт разбитый на 2 скрипта. Если поменял кирку или рунбуку запускай первый. Если с текущей киркой первый уже сапускал запускай второй и он будет просто копать.

Конечно можно было сделать лучше, но лень :)

sub select_objects()
Uo.exec("set norbcheck 1"); для рекола
uo.exec("set norbcalc 1"); тоже

uo.print('!!Выбери Лопату!! ')
uo.exec('addobject Shovel')
while uo.targeting()
wait(100)
wend

uo.print('!!Выбери Рунбук!! ')
uo.exec('addobject Runebook')
while uo.targeting()
wait(100)
wend
end sub

sub maning()
#BETEP™#
var mx, my, mz, i, j, jor, ser, noto
Uo.exec("set norbcheck 1"); для рекола
uo.exec("set norbcalc 1"); тоже

na4alo:
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
UO.DeleteJournal()
for i = mx-4 to mx+4
for j = my -4 to my+4
while not UO.Hidden()
UO.Warmode("0")
uo.print("Прячемся...")
UO.UseSkill("Hiding")
wait(4000)
wend
UO.Print("Копаем в координатах: "+str(mx-i)+" "+str(my-j))
while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") and not UO.InJournal("Iron Ore") and not UO.InJournal("Copper") and not UO.InJournal("Rusty Ore")
UO.DeleteJournal()
if uo.waiting() then
uo.canceltarget()
endif
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Useobject("Shovel")
while not UO.InJournal("You put") and not UO.InJournal("heavy") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in rock")
wait (500)
if uo.injournal("heavy") or uo.dead() then
pwav()
Pause()
endif
for jor = 0 to 9
ser = uo.journalserial(jor)
noto = uo.getnotoriety(ser)
if noto <> 1 and noto <> 0 and not uo.injournal("elemental") then
if uo.waiting() then
uo.canceltarget()
endif
Save()
pwavw()
wait(180000) ; время в секундах при ожидании пока уйдет ПК
loot()
wait(3000)
goto reccal
endif
next
wend
if uo.weight > 625 then ; Максимальный вес при котором домой с рудой
goto end
endif
wend
UO.DeleteJournal()
next
next
goto na4alo
end:
if uo.waiting() then
uo.canceltarget()
endif
uo.exec("recall Runebook 21") ; домой ( в рунбуке слот 1 )
wait(10000)
loot()
wait(3000)
reccal:
uo.deletejournal()
if uo.waiting() then
uo.canceltarget()
endif
uo.exec("recall Runebook 94") ; в шахту ( в рунбуке слот 8 )
mx = UO.GetX("self")
my = UO.GetY("self")
wait(10000)
if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then
goto reccal
endif
goto na4alo
end sub


Top
   
 Post subject:
PostPosted: 2005-04-25 14:46:23 
Offline

Joined: 2004-09-19 06:19:12
Posts: 20
Вот вариант по интереснее:
1) если находимся в пещере: ищет кирку в бекпаке и подсумках по типу если находит начинает копать.
если не находит - телепортится в дом
2) если в доме: ищет кирку в бекпаке, подсумках и в сундуке, по типу если находит - ,берёт ее и телепортится в пещеру.


Code:
 
var m1x, m1y, m1z ; координаты в доме
var m2x, m2y, m2z ;координаты в пещере
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")

castle:
if mx == m1x and my == m1y and mz == m1z then
UO.findtype(0x0e85,-1,2)
if UO.findcount() <> 0 then
uo.addobject('Shovel','finditem')
wait (100)
else
UO.findtype(0x0e85,-1,'айди сундука')
if UO.findcount() <> 0 then
UO.Grab(1,'finditem')
uo.addobject('Shovel','finditem')   
wait (1000)
endif
endif         
endif
               
uo.addobject('Runebook','Сюда айди рунбука')
wait (100)
if mx == m2x and my == m2y and mz == m2z then
UO.findtype(0x0e85,-1,2)
if UO.findcount() <> 0 then
uo.addobject('Shovel','finditem')
else
uo.exec("recall Runebook 21")
goto castle
endif
else
uo.exec("recall Runebook 94");
wait (20000)
endif                  

na4alo:


вставить в скрипт за место этого

Code:
                        uo.print('!!Click on Shovel!! ') 
                        uo.exec('addobject Shovel')
                        while uo.targeting()
                        wait(100)
                        wend
                         
                        uo.print('!!Click on Runebook!! ')
                        uo.exec('addobject Runebook')
                        while uo.targeting()
                        wait(100)
                        wend


Top
   
 Post subject:
PostPosted: 2005-04-25 15:44:12 
Offline
Expert!
User avatar

Joined: 2005-04-23 10:19:43
Posts: 388
Говорил же что можно лучше но лень :)


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 4 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 2 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited