Page 1 of 1

AFK looting with delete and better loot

Posted: August 27th, 2008, 12:05 pm
by ipire
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, 4:59 am
by ipire
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, 7:13 am
by Tault_admin
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.