Yoko

All sides of Injection
It is currently 2025-12-03 17:34:29

All times are UTC+02:00




Post new topic  Reply to topic  [ 5 posts ] 
Author Message
PostPosted: 2009-10-01 12:36:25 
Offline

Joined: 2009-09-11 10:59:48
Posts: 18
Вот норм работающий скрипт! Тоесть после крафта он ложит вещь в сундук в мешок!
Но если я меняю тип вещи допестим ставлю Робу крафтить и меняю

Quote:
Var TItem='0x1EFF'

на
Quote:
Var TItem='0x1F03'

И
Quote:
uo.automenu('Shirts','fancy dress')

на
Quote:
uo.automenu('Shirts','robe')

И тд по скрипту меняю все 0x1EFF на 0x1F03
Получаеться что но у меня скрафтит 1 робу и вместо того что бы сунуть эту робу в сумку, он сует сначало все вещи которые есть у меня в паке(Причем каждую вещь в разные сумки) И после останавливается!


Quote:
Var Sunduk='0x41125C98'
Var TSKit='0x0F9D'
Var TCloth='0x175D'
Var Spools='0x0FA0'
Var TItem='0x1EFF'
Var RobBackPack= '0x41125C96'
Var Meshok1='0x405816EA'
Var Meshok2='0x40582051'
Var Meshok3='0x405826C6'
Var Meshok4='0x40592642'
Var Meshok5='0x40590D6A'
Var Meshok6='0x40598D75'
Var Meshok7='0x416430C0'
Var Meshok8='0x415948B1'
Var Meshok9='0x405DD293'
Var Meshok10='0x416CDAAA'
Var Meshok11='0x416C4EA4'
Var Meshok12='0x403FF99C'
Var Meshok13='0x40525411'
Var Meshok14='0x403D7B7D'
Var VSEmeshki='0x0E76'
sub toeat()
uo.findtype('0x103B',-1,Sunduk)
if uo.findcount() then
uo.moveitem('finditem','50','backpack')
wait(600)
uo.deletejournal()
repeat
uo.usetype('0x103B')
wait(400)
until uo.injournal('full to eat')
endif
uo.findtype('0x103B',-1,'backpack')
if uo.findcount() then
uo.moveitem('finditem',0,Sunduk)
wait(600)
endif
endsub
sub Tailoring()
var i=0
uo.cancelmenu()
uo.automenu('Cloth','Shirts')
uo.automenu('Shirts','fancy dress')
uo.useobject(Sunduk)
while (uo.skillval('Tailoring',1)<1000)
i=i+1
if i==150 then
i=0
toeat()
end if
uo.print(' i == '+str(i))
uo.print(' Кушаем когда i == 150 ')
UO.FindType(TCloth,-1,'backpack')
If UO.GetQuantity('finditem')<16 Then
If UO.GetQuantity('finditem')>0 Then
uo.moveitem('finditem',0,Sunduk)
cheklag()
wait(1000)
end if
UO.FindType(TCloth,-1,Sunduk)
If UO.GetQuantity('finditem')>=16 Then
uo.moveitem('finditem','720','backpack')
cheklag()
Wait(1000)
else
uo.closeuo()
end if
end if
UO.FindType(Spools,-1,'backpack')
If UO.GetQuantity('finditem')<16 Then
If UO.GetQuantity('finditem')>0 Then
uo.moveitem('finditem',0,Sunduk)
cheklag()
wait(1000)
end if
UO.FindType(Spools,-1,Sunduk)
If UO.GetQuantity('finditem')>=16 Then
uo.moveitem('finditem','60','backpack')
cheklag()
Wait(1000)
else
uo.closeuo()
end if
end if
cheklag()
uo.waittargettype(TCloth)
uo.usetype(TSKit)
uo.deletejournal()
waitforchange()
if uo.weight > 200 then
UO.SetReceivingContainer(Meshok1)
wait(200)
UO.FindType('0x1EFF')
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.UnSetReceivingContainer()
end if
if uo.weight > 200 then
UO.SetReceivingContainer(Meshok2)
wait(200)
UO.FindType('0x1EFF')
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok3)
wait(200)
UO.FindType('0x1EFF')
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok4)
wait(200)
UO.FindType('0x1EFF')
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok5)
wait(200)
UO.FindType('0x1EFF')
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok6)
wait(200)
UO.FindType('0x1EFF')
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok7)
wait(200)
UO.FindType('0x1EFF')
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok8)
wait(200)
UO.FindType('0x1EFF') # ??? ???????? ?????
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok9)
wait(200)
UO.FindType('0x1EFF') # ??? ???????? ?????
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.UnSetReceivingContainer()
end if
UO.SetReceivingContainer(Meshok10)
wait(200)
UO.FindType('0x1EFF') # ??? ???????? ?????
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok11)
wait(200)
UO.FindType('0x1EFF') # ??? ???????? ?????
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok12)
wait(200)
UO.FindType('0x1EFF') # ??? ???????? ?????
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok13)
wait(200)
UO.FindType('0x1EFF') # ??? ???????? ?????
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
UO.SetReceivingContainer(Meshok14)
wait(200)
UO.FindType('0x1EFF') # ??? ???????? ?????
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(200)
end if
wend
uo.closeuo()
end sub
sub waitforchange()
var n
for n=1 to 100
if uo.InJournal('You put the') or uo.InJournal('Tailoring failed.') then
return
endif
wait(200)
next
endsub
sub cheklag()
uo.deletejournal()
uo.click('backpack')
repeat
wait(10)
until uo.InJournal("backpack")
end sub


Top
   
 Post subject:
PostPosted: 2009-10-01 16:00:59 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
впиши в конце скрипта
Code:
Sub PUT(item, cont); тип предмета, куда ложить
      while UO.Count( item ) > 0
        UO.FindType( item, -1, -1 )
         UO.MoveItem( 'finditem', 0, cont )
        checklag()
      wend
end sub


в скрипте просто пишешь

PUT(Тип робы, мешок)

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.


Top
   
 Post subject:
PostPosted: 2009-10-01 17:51:19 
Offline

Joined: 2009-09-11 10:59:48
Posts: 18
Mirage wrote:
впиши в конце скрипта
Code:
Sub PUT(item, cont); тип предмета, куда ложить
      while UO.Count( item ) > 0
        UO.FindType( item, -1, -1 )
         UO.MoveItem( 'finditem', 0, cont )
        checklag()
      wend
end sub


в скрипте просто пишешь

PUT(Тип робы, мешок)


Спс помогло :)


Top
   
 Post subject:
PostPosted: 2009-10-02 11:07:34 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Code:
repeat 
wait(10)
until uo.InJournal("backpack")
Меньше 200 вайт ставить не рекомендую.


Top
   
 Post subject:
PostPosted: 2009-10-02 12:32:32 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Savage, привет! :D


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 11 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