Yoko

All sides of Injection
It is currently 2025-11-11 08:36:35

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 20 posts ] 
  Print view Previous topic | Next topic 
Author Message
helpmeplz1
 Post subject: english help plz
PostPosted: 2006-04-03 12:18:31 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
ok i need loot script. i will put my own type in were u need me to put it juss tell me. i ned it 2 loot 4 different types, it can loot at a good pace. sry for not knowin russian.

anyone can help plz do so. sry for no russian.
0x2006 thats the corspse type i want it to loot
someone help plz, i will put the type numbers in, juss tell me were to put um. i need 4 types looted.
Top
   
Reply with quote  
Sanch
 Post subject:
PostPosted: 2006-04-03 12:43:00 
Offline
User avatar

Joined: 2005-07-17 15:30:52
Posts: 308
Location: www.drw.ru
Write 4 types what you want to loot. Your character will loot last corspse and only this 4 items. I will try to write this skript, but I can't promise anifing.
Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-03 13:20:51 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
ok its these types, 0x143E,0x1406,0x1515,0x1BC3,0x204E, ok sry i need5 types, thx man, someone help plz thx, i juss need it to loot those types, it can loot slow or fast dont matter.
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2006-04-03 13:51:45 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
Code:
sub Loot() 
VAR i, n 
VAR w = 500  ; the waiting time after moving an item 
VAR razmer = 5 
DIM Loot[5] 
    Loot[1] = '0x143E'  
    Loot[2] = '0x1406'  
    Loot[3] = '0x1515'  
    Loot[4] = '0x1BC3' 
    Loot[5] = '0x204E'      
  
  if uo.getdistance( 'lastcorpse' ) <4 then 
    uo.deletejournal() 
    repeat 
      uo.findtype( '-1', '-1', 'lastcorpse' )  
      n = 0 
        for i = 1 to razmer 
          if uo.getgraphic( 'finditem' ) == Loot[i] then 
            uo.moveitem( 'finditem', 'all', 'my' ) 
            wait(w) 
              if uo.injournal( 'UNSP' ) then 
                wait(w*3)                 
              endif 
            n = 1 
            goto nextitem 
           endif          
        next 
          if n == 0 then 
            uo.ignore( 'finditem' ) 
          endif 
      nextitem: 
    until uo.findcount() == 0 
  else 
    uo.print( 'The corpse is too far!' ) 
  endif  
endsub


Last edited by flake on 2006-04-03 14:44:48, edited 1 time in total.

Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-03 14:24:22 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
it says variable undefined, not workin
Top
   
Reply with quote  
Sanch
 Post subject:
PostPosted: 2006-04-03 14:44:34 
Offline
User avatar

Joined: 2005-07-17 15:30:52
Posts: 308
Location: www.drw.ru
sub Loot()
DIM Item[5]
Item[0] = '0x143E'
Item[1] = '0x1406'
Item[2] = '0x1515'
Item[3] = '0x1BC3'
Item[4] = '0x204E'
VAR i
UO.UseObject( 'lastcorpse' )
wait(1000)
For i = 0 To 4
UO.FindType( Item[i], '-1', 'lastcorpse' )
While UO.FindCount() > 0
UO.MoveItem( 'finditem' )
wait( 1000 )
UO.FindType( Item[i], '-1', Cont )
Wend
Next
UO.Print( 'The loot was finished' )
end sub

It must work, but I do not test it.

Do you know how set this skript on hotkey?
Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-03 15:35:17 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
no sanch , can u plz tell me , thx alot bro
Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-03 15:41:17 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
it sayiun variable undefined, line16
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2006-04-03 15:45:30 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
Use mine, I've corrected it.
Top
   
Reply with quote  
Sanch
 Post subject:
PostPosted: 2006-04-03 15:58:34 
Offline
User avatar

Joined: 2005-07-17 15:30:52
Posts: 308
Location: www.drw.ru
Quote:
no sanch , can u plz tell me , thx alot bro


So what I can say, I am at work now. I will be at home at ten oclock pm of Moscow, I will correct and test script, write me to ICQ.

During this time you may try to use script writen by frake:

menu Hotkeys

write Command: exec Loot

write Hotkey: any you want

then press Add now hotkey, thet is all what you must to do fo using this script. Then set this hotkey in uo and if you do all correctly it will work.


Last edited by Sanch on 2006-04-03 16:07:38, edited 1 time in total.

Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-03 16:00:15 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
ok juss give me ur icq n il add u . thx alot bro.
Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-04 01:15:42 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
ur icq sanch?
Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-05 04:09:27 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
well its been 2 days noiw and i still cant gett he scriptto work. someone plz help
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2006-04-05 06:57:51 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
Have you tried mine?
Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-05 09:08:18 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
Code:
sub Lootin()
var t,l
t=500
dim LootingItem[49]
uo.Print('???????? ??????...')
### Magic Looting Items ###
DIM Loot[5]
LootingItem[1] = '0x143E' 
LootingItem[2] = '0x1406' 
LootingItem[3] = '0x1515' 
LootingItem[4] = '0x1BC3'
LootingItem[5] = '0x204E'
uo.canceltarget()
uo.Print('?????? ?????????')
uo.addobject('lootcontainer')
while uo.targeting()
   wait(100)
wend
 
for l=1 to 48
uo.FindType(LootingItem[l],"-1",'lootcontainer')
if uo.FindCount()>0 and uo.GetDistance('lootcontainer')<=2 then
uo.Grab(1,"finditem") 
uo.Print('?????? ???????: '+str(uo.findcount()))
wait(t)
end if
next
uo.Print('??? ????????.')
end sub


ok i put urs n flakes together n this wut i came wit that works, but im gettin an erro runtime line 21. anyidea wut it is? or how to fix, it works but i need the error to stop cuz it keeps spammin me. thx flake for ur help
Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-05 19:53:28 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
flake?
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2006-04-05 21:01:06 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
Just try what I've posted, don't mix anything up.
Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-06 08:03:18 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
im gettin a error at line 21 flake.

Code:
uo.FindType(LootingItem[l],"-1",'lootcontainer')



any idea wut error this is? it says runtime error 21 and thats the line were the error is ?
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2006-04-06 09:00:34 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
You just don't try mine, do you... Well, ok, I'll correct you combination then:
Code:
sub Lootin() 
var t,l 
t=500 
DIM LootingItem[5] 
LootingItem[1] = '0x143E' 
LootingItem[2] = '0x1406' 
LootingItem[3] = '0x1515' 
LootingItem[4] = '0x1BC3' 
LootingItem[5] = '0x204E' 
uo.canceltarget() 
uo.addobject('lootcontainer') 
while uo.targeting() 
   wait(100) 
wend 
  
for l=1 to 5 
  uo.FindType(LootingItem[l],"-1",'lootcontainer') 
    if uo.FindCount()>0 and uo.GetDistance('lootcontainer')<=4 then 
       uo.Grab(1,"finditem")        
       wait(t) 
   end if 
next 
end sub
Top
   
Reply with quote  
helpmeplz1
 Post subject:
PostPosted: 2006-04-06 10:35:03 
Offline

Joined: 2006-04-03 10:52:48
Posts: 15
thx alot flake. works perfect dude. i really aprreciate it.
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 20 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:  
Powered by phpBB® Forum Software © phpBB Limited