Locked Home » Forums » Legacy & Archived » Archived Content » Star Wars Galaxies » SWG Premium Discussions

AFK looting with delete and better loot : SWG Premium Discussions

Posted: August 27th, 2008
Total Posts:12 Joined:2008
A lot of us do not have good area attack, and also. Very often
do corpse lay around unlooted if not 'mouseovered'

So why not do just that....A combat special has a timer anyway,
so this can be done during that period.

What I use for loot-macro is:
/loot;
/pause 0.2;
/loot corpse; (or loot all;)
/pause 0.2;
/macro loot (if that's what U call it)

And here the script:

Code: Register to unlock hidden link

#cs ---------------------------------------------------------------------------- 

AutoIt Version: 3.2.8.1 
Author: 

Script Function: 
Template AutoIt script. 

#ce ---------------------------------------------------------------------------- 

; Script Start - Add your code below here 
Global $Paused 
HotKeySet("{ESC}", "Terminate") 
Opt("MouseClickDragDelay", 100) 
#Include <Misc> 
Sleep (5000) 

While 1
If MsgBox( 4096 + 262144 + 1, "SWG WINDOWS WARNING","YOU MUST RUN SWG IN BORDERLESS WINDOWS MODE." & @CRLF & "SET CORRECT TOOLBARPANE." & @CRLF & "HAVE FIELD OF VIEW TO MAXIMUM (looking down).") = 2 Then Exit
ExitLoop
WEnd

Sleep (1000)

SplashTextOn ( "Setup", "Leftclick on the Main Spot where U want deletion to start", 400, 100, 400, 400, 1, "Ariel", 14 ) 
   While 1 
      Sleep ( 100 ) 
      If _IsPressed ( "01" ) Then 
         $pos = MouseGetPos() 
      ExitLoop 
      EndIf 
   WEnd 

   SplashOff() 
   $var3 = $pos[0] 
   $var4 = $pos[1] 
   Sleep (1000) 
   
SplashTextOn ( "Setup", "Leftclick on your head", 400, 100, 400, 400, 1, "Ariel", 14 ) 
   While 1 
      Sleep ( 100 ) 
      If _IsPressed ( "01" ) Then 
         $pos = MouseGetPos() 
      ExitLoop 
      EndIf 
   WEnd 

   SplashOff() 
   $var5 = $pos[0] 
   $var6 = $pos[1] 
   Sleep (1000) 
      

	
While 1  
$j = 0
   $i = 0	   
;fighting   
   While $i < 9
	 $k = 0
	 $var7 = $var5 - 200
	 $var8 = $var6 - 150
	  MouseMove ( $var5, $var6, 1)
	  send("s")          ;target self
      send("{TAB}")      ;Change this to your hotkey to cycle target outward 
	  MouseDown("left")  ;Mousedown or the key that fires your weapon (insted of auto attack)
      send("4")          ;Change this to your Kill macro 
	  Sleep (4000)       ;Change this accordingly to make sure your abilities cycle
	  send("6")          ;Heal
	  Sleep (1000)
	  send("4")          ;Change this to your Kill macro 
	  While $k < 5
		$var8  = $var8 +(33)
		MouseMove ( $var7, $var8, 1)
		$var7  = $var7 + (400)
		MouseMove ( $var7, $var8, 35)
		$var8 = $var8 + (33)
		MouseMove ( $var7, $var8, 1)  ;sweeps mouse over the area.
		$var7  = $var7 - (400)        ;It will also substitute the Sleep afer combat-command
		MouseMove ( $var7, $var8, 35)
		send("s")          ;target self
		Send("{TAB}") ;Change this to your hotkey to cycle target outward
	    MouseUp("left") 
        MouseDown("left") ;Mousedown or the key that fires your weapon (instead of auto attack)	 
		$k = $k + 1
	WEnd
	send("6")
      MouseMove ( $var5, $var6, 1)
	  MouseUp("left") 
	$i = $i + 1
WEnd

;select item to be deleted:
While $j < 2
	MouseMove ( $var3, $var4, 1 )
	Sleep (100) 
MouseClick ( "right" , $var3, $var4, 1 ) ;X and Y coordinates of item to be deleted 
Sleep(1000) 
send("{3}") 
Sleep(200) 
MouseClick ( "right" , $var3, $var4, 1 ) ;X and Y coordinates of item to be deleted 
Sleep(1000) 
send("{4}") 
Sleep("200") 
MouseClick ( "right" , $var3, $var4, 1 ) ;X and Y coordinates of item to be deleted 
Sleep(1000) 
send("{2}") 
Sleep (200) 

$j = $j + 1

WEnd

WEnd


;Pause Script 
Func TogglePause() 
$Paused = NOT $Paused 
While $Paused 
sleep(100) 
ToolTip('Script Paused',0,0) 
WEnd 
ToolTip("") 
EndFunc 

Func Terminate() 
Exit 0 
EndFunc
This works as a charm at least up to CL78-80

Might have been posted some similar stuff, but with a limited search function I ended up making this myselves (the sweep-over-loot)

I was wondering about putting loot automatic in backpack, but only a spy
or jedi could do that effectively due to the fact that U can't transfer items in combat
Posted: August 30th, 2008
Total Posts:12 Joined:2008
Just wanted to add....With the mouse-over, you can enter spots/areas where there's already peeps standing and still have no problem targeting the wrong corpse......
Posted: September 4th, 2008
User avatar
administrator
Total Posts:29892 Joined:2002
Can members say yay or nay to this so we may give tu bucks and/or premium. If you nay the submission remember to include as to why.
Ready to join the community? Click here and see all of the benefits!
blue large dotWho is online
Users browsing this forum: No registered users and 11 guests
Locked