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

AFK Junk Looting : SWG Premium Discussions

Posted: January 19th, 2008
ead6
Ok, so first off, there are plenty of these things out there that require WINDOWED MODE. However, this one does NOT require windowed mode and is in fact probably the easiest one out there.

First off, under options > Misc., set "confirm object delete" to no (uncheck it).

Go to your usual afk looting spot and loot until you've gotten pretty much every stackable junk loot item.

Arrange the stackable items so that they come one after another until you reach the point where you have non-stacking items.

This is where you will leave your mouse.

Run this script:
$a = 1
while $a = 1
Sleep(5000)
MouseClick("right")
Sleep(1000)
Send("{2}")
Sleep(1000)
MouseClick("right")
Sleep(1000)
Send("{3}")
Sleep(1000)
MouseClick("right")
Sleep(1000)
Send("{4}")
Sleep(5000)
WEnd

What it will do is right click on the current mouse position (which should be the non-stacking loot), and attempt to use either menu item number 2,3, or 4. (IN case it's an item, backpack, or painting.)
Posted: January 19th, 2008
Total Posts:157 Joined:2006
Nay, copied my edited script from this post

Register to unlock hidden link
Posted: January 19th, 2008
ead6
wow, someone thinks pretty highly of themselves.

First off, I'm premium. So I'm not looking for free time.
Second, Register to unlock hidden link. It's my take on THAT script.
And third, I had tried to see if there was already something like it here but I guess I missed yours.

Oh, and two more for the record:
figuring out how to script in autoit is easy as hell
I was using this script a long time before I even had membership here.

So try again ^^

also, let's take a look at yours:

Global $Paused
HotKeySet("{ESC}", "Terminate")
Opt("MouseClickDragDelay", 100)

Sleep(5000)

While 1
Sleep(500)
MouseClick ("right", 1653, 1040, 1)
Sleep(800)
Send("3") ;guns clothes stims etc
sleep(500)
Send("2") ;posters etc
Sleep(500)
Send("4") ;backpacks
Sleep(1000)
WEnd

Func Terminate()
Exit 0
EndFunc

what you're doing is right clicking and then pressing 3. if 3 is something else, like examine, its going to open an examine window. it will then press 2 and 4, but not while in the right click menu, which will actually fire off things from the toolbar... then it recycles itself. you've also listed a specific coordinate for the mouse to be at.

Technically if you really think about it, any type of script involving right click and pressing a number will look similar. I rewrote mine from the link I listed above as I had no need for all that worthless coordinate finding and also wanted to run something that didn't require me to go into Windowed Mode.
Posted: January 20th, 2008
User avatar
administrator
Total Posts:29892 Joined:2002
Well then

Can members say yay or nay to this being moved to a confirmed section.
Posted: March 8th, 2008
Total Posts:16 Joined:2007
how about adding a way to stop the script from running even task manager removing the program doesnt stop it
Posted: March 8th, 2008
absolution
This is my way

;Inventory deletion tool

Global $Paused, $Showme
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("{F9}", "ShowMe")
Opt("MouseClickDragDelay", 130)

#include <Misc>

Sleep ( 400 )
Send ("{F9}")
Sleep (3000)

SplashTextOn('AutoDelete',"Inventory Deleter...Hit the Pause button to pause the program or ESC to end it.", 400, 100, -1, -1, 0, "Ariel", 18)
Sleep ( 5000 )
SplashOff()

SplashTextOn("AutoDelete Setup", "Please click once on the center of the spot where you want to delete from.", 400, 100, -1, -1, 0, "Ariel", 16)
While 1
Sleep ( 100 )
If _IsPressed("01") Then
$pos = MouseGetPos() ;gets x, y position of deletion spot
ExitLoop
EndIf
WEnd
SplashOff()
$delwin1x = $pos[0] ;assigns x position to the variable delwin1x
$delwin1y = $pos[1] ;assigns y position to the variable delwin1y

$i = 0
;Starts entire program.
Do
MouseClick ( "right" , $delwin1x, $delwin1y ) ;Right clicks in the spot from AutoDelete Setup
Sleep (2000)
Send ("{3}") ;Selects option number 3 "Destroy" to delete the item.
Sleep (500)
MouseClick ( "right" , $delwin1x, $delwin1y ) ;Right clicks in the spot from AutoDelete Setup
Sleep (2000)
Send ("{2}") ;Selects option number 2 "Destroy" to delete the item.
Sleep (500)
MouseClick ( "right" , $delwin1x, $delwin1y ) ;Right clicks in the spot from AutoDelete Setup
Sleep (2000)
Send ("{4}") ;Selects option number 4 "Destroy" to delete the item.
Sleep (10000)
Until $i = 1

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

Func ShowMe()
$ShowMe = Not $ShowMe
EndFunc ;==>ShowMe

Func Terminate()
Exit 0
EndFunc
Posted: March 8th, 2008
Total Posts:16 Joined:2007
ADMIN EDIT - Being hostile toward others and using profanity is not allowed
Posted: May 30th, 2008
greagniatis
Hey absolution, I was looking over your code and it will not run unless you have
#include Misc.au3

(NOTE: the misc.au3 must be in < > but when it is typed that way it does not get through on the forums. This is a large reason many newcomers have had trouble with code.) Even in copying my code below be sure to add .au3 after misc, otherwise it will not work.

not just

#include <Misc>

I know a few others have had issues with not knowing why theres did not work, may want to make that edit so others can use your code as well. Also there is no real reason for the pauses inbetween the send numbers in my opinion. Hopfully our code helps out those who were having trouble before, here is mine in case you are interested.

Code: Register to unlock hidden link

;Auto Inventory Deletions Version 1.6 for Star Wars Galaxies
;Copy and past this code into a notepad and save the file as .au3
;This is meant for junk looting and will not delete Eyes of Mesra

Global $Paused
HotKeySet("{ESC}", "Terminate")
Opt("MouseClickDragDelay", 90)
#include <Misc>

SplashTextOn('SWGautodeletes.exe',"Welcome to Auto Inventory Deletions 1.6 intended for Junk Loot 

harvesting.", 400, 100, -1, -1, 0, "Ariel", 20) 
Sleep ( 5000 )
SplashOff()
While 1
	Sleep ( 100 )
	If MsgBox(1, 'User Agreement',"This program is built to empty unwanted inventory space in Star 

Wars Galaxies.  This program assumes confirm object deletes is off.  The acceptance of this agreement 

removes the developer of this program from any and all liabilities.  The maker is not responsble for the 

ramifications of the use of this program. By selecting OK, you agree to these terms.") = 2 Then Exit
    ExitLoop
	WEnd

$i = 0
SplashTextOn("AutoDelete setup", "Please Click once on the center of the first item after the items you 

wish to keep. ", 400, 100, -1, -1, 0, "Ariel", 16)
While 1
Sleep ( 100 )
If _IsPressed("01") Then
$pos = MouseGetPos()
ExitLoop
EndIf
WEnd
SplashOff()
$itemx = $pos[0]
$itemy = $pos[1]
Sleep ( 1000 )

while 1
sleep (2000)
MouseClick ("right", $itemx, $itemy, 1)
Send ( "4" ); Deletes Backpacks
Send ( "3" ); Deletes Weapons and Clothing
Send ( "2" ); Deletes Posters
sleep (2000) 
WEnd


Func Terminate()
   Exit 0
EndFunc 
;this should work smoothly as I have addressed the problems where people mentioned it was failing for 

them.

I am hoping to get premium membership in time, this was a big catch that will fix many of the problems I was hearing, with luck it will be worth at least a couple bucks :roll:
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 17 guests
Locked