Yoko

All sides of Injection
It is currently 2025-12-17 18:31:45

All times are UTC+02:00




Post new topic  Reply to topic  [ 7 posts ] 
Author Message
PostPosted: 2006-10-16 10:46:11 
Offline

Joined: 2006-08-02 13:17:44
Posts: 17
в общем скрипт работает нормально... он выбирает мна гампе делать там что-то и чар делает 10 штук.. потом плавит и инготы в общую стопку кидает... но дело в том, что если логанет немного то чар может сделать тве вещи сразу и появится два сообщения в журнале в один момент... а скрипт естественно увидит одно и делит журнал.. в итоге когда чар делает 10 итемов с лагами, инжект ловит не все 10... как можно выкрутится в этой ситуации?

Code:
sub main() 
## Created By LeXuS
## icq 384383
var k;
uo.exec("disarm");
UO.Exec('terminate Reconnector')
UO.Exec('exec Reconnector')
Nuke_hungry()
wait(2000)
uo.set("distance","1")
var items;
while not uo.dead()
items=0;
If UO.Count ("0x1BF2") == 0 Then
wait (1000)
Nuke_hungry()
UO.Waittargetground ('0x1BF2') # copper ingots
wait (100)
UO.exec('ongump anygump 0x0402')
UO.Usetype ("0x0fb4") #Neaa? hammer
k = 0;
##wait (65000)
UO.DeleteJournal();
while ( k < 10 )
wait(200);
if UO.InJournal("You create the item") then
 k=k+1;
  items=items+1;
 UO.Print('gotovo');
endif

if UO.InJournal("You make an exceptional item") then
 k=k+1;
 UO.Print('Except! :o)');
 items=items+1;
endif
if UO.InJournal("You destroy some ingots") then
 k=k+1;
 UO.Print('Fail :o(');
endif
if UO.InJournal("your tool broke") then
 k=10;
 UO.Print('Slomalas! suka');
endif
UO.DeleteJournal();
Wend

plav(items)
wait(1000)
dropi()
#While (UO.ObjAtLayer('Bpack') == '')
#wait(10000)
wend
Nuke_hungry()
else
#aueeauaaai eiaiou ia iie
dropi()
wait (500)
endif
wend
end sub

sub plav(items)
var i=0
var j;
while i < items
j=1;
uo.waittargettype('0x1413')# cooper
uo.usefromground('0x0FB1')# a Home  forge
UO.DeleteJournal ()
while j>0
wait (500)

if UO.InJournal ("You fail, and destroy") then
j=0;
endif
if uo.InJournal("manage to get a bit of material") then
j=0;
endif
UO.DeleteJournal ()
wend
i = i+1
wend
i=0
wait(2000)
end sub

sub dropi()
UO.Exec("set finddistance 1")
var d = '0x1BF2'
drop(d)
end sub
sub drop(d)
var serial=0
var color=-1
var container = "ground"
while UO.Count(d) > 0
UO.FindType(d,-1,"my")
serial=UO.GetSerial("finditem")
color=UO.GetColor(serial)
UO.Ignore(serial)
if container=="ground" then
UO.FindType(d,color,"ground")
if UO.FindCount()>0 then
UO.MoveItem(serial,"0","finditem","0","0","0")
else
UO.DropHere(serial)
endif
else
UO.MoveItem(serial,"0",container)
endif
wait(1000)

UO.IgnoreReset()
end sub

[/code]


Top
   
 Post subject:
PostPosted: 2006-10-16 16:56:25 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Не все плавит чтоли вещи?!

плавь в цикле:
Code:
findtype
while uo.findcount()
 ...
 findtype
wend


Top
   
 Post subject:
PostPosted: 2006-10-18 15:13:56 
Offline

Joined: 2006-08-02 13:17:44
Posts: 17
да нет... он когда делает вещи, сделал 10 штук а инжект споймал что 9 сделал и тупо ждёт десятую вещь... до утра...


Top
   
 Post subject:
PostPosted: 2006-10-18 18:01:20 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Чужой скрипт,- читать трудно.
Напиши конструкцию где он что там там ждёт, зачем ждёт, и что дальше с этим делает -подумаем что можно придумать.


Top
   
 Post subject:
PostPosted: 2006-10-18 18:19:21 
Offline
Expert!
User avatar

Joined: 2006-02-25 21:48:38
Posts: 1032
Вместо того чтобы удалять весь журнал, удаляй только ненужную строчку. Тогда вторая останется...

_________________
DerMeister сейчас на нейрале!


Top
   
 Post subject:
PostPosted: 2006-10-18 23:08:15 
Offline

Joined: 2006-08-02 13:17:44
Posts: 17
DerMeister =) wrote:
Вместо того чтобы удалять весь журнал, удаляй только ненужную строчку. Тогда вторая останется...

хороший совет... буду пробовать :о)


Top
   
 Post subject:
PostPosted: 2006-10-19 13:20:56 
Offline
Expert!
User avatar

Joined: 2006-02-25 21:48:38
Posts: 1032
LeXuS™ wrote:
DerMeister =) wrote:
Вместо того чтобы удалять весь журнал, удаляй только ненужную строчку. Тогда вторая останется...

хороший совет... буду пробовать :о)

В "Наследстве от Едреда" Есть необходимая для тебя процедура... Тебе лишь осталось её там найти ;)

_________________
DerMeister сейчас на нейрале!


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

All times are UTC+02:00


Who is online

Users browsing this forum: Bing [Bot] and 5 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:  
Powered by phpBB® Forum Software © phpBB Limited