Yoko

All sides of Injection
It is currently 2025-10-26 22:11:34

All times are UTC+02:00




Post new topic  Reply to topic  [ 5 posts ] 
Author Message
PostPosted: 2006-02-25 17:52:25 
Offline

Joined: 2005-08-17 15:58:05
Posts: 45
Code:
sub Looting() 
var t,l
t=500
uo.deletejournal()
uo.UseObject('lastcorpse')
dim LootingItem[4]
uo.Print('Íà÷èíàåì Ëóòàòü...')
### Magic Looting Items ###
LootingItem[1] = 0x09AA  ## - kaste
LootingItem[2] = 0x0EED  ## - naudinja
LootingItem[3] = 0x1088  ## - amulets
LootingItem[4] = 0x14ED  ## - Treashure
uo.Print('Ëóò Çàêîí÷åí.')
for l=1 to 4
uo.FindType(LootingItem[l],"-1","lastcorpse")
if uo.FindCount()>0 and uo.GetDistance("lastcorpse")<=4 then
uo.Grab(1,"finditem")
wait (t)
uo.Print('Íàéäåí ïðåäìåò: '+str(uo.findcount()))
end if
next
end sub


Как такое чудо превратить в ауто лут штоб он вкльючался кода в журнале показвает техт типо items) или штото такое , 2. вопрос как зделать так штоб он взял type1 ,type2 с коробки , зделал итем , положил type3 в коробку , 3. вопрос как зделать ,disarm далше следует uo.usetype (repair tools) а вот как зделать штоб он таргетил именно етот итем(Меч маце или што другое)?


Top
   
 Post subject:
PostPosted: 2006-02-25 22:51:12 
Offline
Expert!
User avatar

Joined: 2005-01-07 13:22:19
Posts: 766
1.
Code:
while not uo.injournal("itams")
 wait(1000)
wend
loot()
....


Top
   
 Post subject:
PostPosted: 2006-02-25 23:39:26 
Offline

Joined: 2006-02-21 17:34:28
Posts: 19
Location: Etheral Portal
а этот можно посмотреть?
Quote:
sub Loot_pvp_elf()
var bag,i=0;
var telo = '0x2006' #Тайп Трупа

dim loot[18]
loot[0]=0x1F03 #robe
loot[1]=0x1515 #cloack
loot[2]=0x13BF #chain puzo
loot[3]=0x13BE #chain nogi
loot[4]=0x13BB #chain golova
loot[5]=0x13EE #chain ple4iki
loot[6]=0x13EB #chain ruki
loot[7]=0x13B1 #heru
loot[8]=0x0EED #gold
loot[9]=0x0E76 #bag
loot[10]=0x0E75 #sold
loot[11]=0x1F58 #belt pouch
loot[12]=0x0F3F #arrows
loot[13]=0x1BFB #bolti
loot[14]=0x0f0e #inviska
loot[15]=0x0f09 #manka
loot[16]=0x0f0c #heal
loot[17]=0x0E21 #bandages

uo.deletejournal()
if uo.getdistance('lastcontainer')<=2 then
bag=uo.getserial('lastcontainer')
else
uo.findtype(telo,-1,'ground')
if uo.findcount() > 0 then
uo.waittargetobject('finditem')
bag=uo.getserial('finditem')
wait(300)
endif
endif
if UO.GetSerial('lastcontainer')<>UO.GetSerial('backpack') Then
uo.print(bag)
uo.useobject(bag)
for i=0 to 17
uo.findtype(loot[i],-1,bag)
if uo.findcount()>0 AND uo.GetDistance(bag)<=2 then
UO.MoveItem('finditem','0','backpack')
wait(500)
endif
next
endif
end sub


на строке uo.print(bag) выводит рантайм эрор почемуто :(


Top
   
 Post subject:
PostPosted: 2006-02-26 03:57:30 
Offline

Joined: 2005-08-17 15:58:05
Posts: 45
Question wrote:
1.
Code:
while not uo.injournal("itams")
 wait(1000)
wend
loot()
....


Мош я дурак но я некак немогу зделать штоб он всеремя работатл он как нехочет так нехочет соберать пожалуисто напиши в полном виде скрипт

у мя он виглядет такои ...
Code:
sub Looting() 
var t,l
t=500
uo.deletejournal()
while not uo.injournal("items") 
wend
uo.UseObject('lastcorpse')
dim LootingItem[4]
uo.Print('Íà÷èíàåì Ëóòàòü...')
### Magic Looting Items ###
LootingItem[1] = 0x09AA  ## - kaste
LootingItem[2] = 0x0EED  ## - naudinja
LootingItem[3] = 0x1088  ## - amulets
LootingItem[4] = 0x14ED  ## - Treashure
uo.Print('Ëóò Çàêîí÷åí.')
for l=1 to 4
uo.FindType(LootingItem[l],"-1","lastcorpse")
if uo.FindCount()>0 and uo.GetDistance("lastcorpse")<=4 then
uo.Grab(1,"finditem")
wait (t)
uo.Print('Íàéäåí ïðåäìåò: '+str(uo.findcount()))
end if
next
end sub


Top
   
 Post subject:
PostPosted: 2006-02-27 13:32:32 
Offline

Joined: 2005-08-17 15:58:05
Posts: 45
Всёже очень прошу помоч


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 17 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