Item Destroyer Thingy :3

Wassup people of this forum made this quick item destroyer

Instructions: Press Ctrl 3 to mark and item for destruction Press Ctrl 4 to destroy all marked item Press the Clear Marks On Items button to clear all marks NOTE: make sure to do that everytime you've delete some items or its gonna try and delete those things again.

Settings: change the cords to the trashcan icon and yes button under settings. I presume u can find the cords.

You can download the zip file or copy this code and also make a config.ini file with this in it and make sure they are in the same folder!

ps. sorry for the grammar and spaghetti code Enjoy!

Config.ini File:

[Cords]
TrashCan=1893, 907
YesButton=874, 375

Ahk File:

IniRead, Trashcan_Cords, Config.ini, Cords, Trashcan
IniRead, Yes_Cords, Config.ini, Cords, YesButton

Gui, Add, Tab2,, General|Settings

;SETTINGS TAB---------------------------------------------------------------------------------
Gui, Tab, Settings
Gui, Color, White
Gui, +AlwaysOnTop
Gui, font, s15,
Gui, Add, Text,, Settings
Gui, font, s7
Gui, Add, Text, x15 y78, Trash Cords:
Gui, Add, Text, x15 y95, Yes Cords:
Gui, Add, Edit, x80 y75 vTrashcan_Cords gTrash_Cords, %Trashcan_Cords%
Gui, Add, Edit, x80 y95 vYes_Cords gCords_Yes, %Yes_Cords%
Gui, Add, Button, vButtonTwo gSubmit_Cords, Submit Cords
Gui, Add, Text,, X Position Is Before The Comma.
Gui, Add, Text,, Y Position Is After The Comma.
Gui, Show, W300 H500,

;GENERAL TAB----------------------------------------------------------------------------------
Gui, Tab, General
Gui, Add, Text,, Press Ctrl 3 to mark an item.
Gui, Add, Text,, Press Ctrl 4 to delete all marked items.
Gui, Add, Text,, Press Clear Button to remove all marks from items.
Gui, Add, Button, x72 y150 vButtonOne gClear_Array, Clear Marks On Items

FUNCTION--------------------------------------------------------------------------------------

Array := {}

^3::

MouseGetPos, x, y

Array.Insert(x,y)

return

^4::

for x, y in Array
{
MouseClickDrag, Left, %x%, %y%, 1893, 907
sleep, 500
Click 874, 375
sleep, 500
}

return

Labels-----------------------------------------

Submit_Cords:
Gui, Submit, NoHide
IniWrite, %Trashcan_Cords%, Config.ini, Cords, Trashcan
IniWrite, %Yes_Cords%, Config.ini, Cords, YesButton

return

Cords_Yes:

return

Trash_Cords:

return

Clear_Array:

Array := {}

return

ESC::ExitApp

https://www.virustotal.com/es/file/2...is/1511795330/

Destroyer_mpgh.net.zip965 B · 98 downloads Clean

Download & Thanks

safe and clean

approved

you only need to make it click middle mouse button on the item and click yes, no need for it to drag it to the trash can

Hey you are right thx for the tip ill change it to do that then :3 appreciate it

I've changed your code a bit.

Changes

Changed Trashcan to middle mouse button.
Clear the array at the end of the loop(I didn't like cleaning the array with the button).
Changed Array to Push Objects to fix not sorted removals.
Removed Everything related to Trashcan.
Now the program is set to Exit on window close(removed ESC key as well

)
Now you must set the Trash button coords with ctrl+2.
The config.ini writes itself when setting the trash button.

Code:

IniRead, Trashcan_CoordX, Config.ini, Coord, TrashButtonX
IniRead, Trashcan_CoordY, Config.ini, Coord, TrashButtonY
Array := [] ;initialize array

;-----------------Start GUI
Gui, Color, White
Gui, font, s7
Gui, Show, W300 H150,
Gui, Add, Text,, Press Ctrl 1 to stop script.(PanicButton)
Gui, Add, Text,, Press Ctrl 2 to set Trash Button Coords.
Gui, Add, Text,, Press Ctrl 3 to mark an item.
Gui, Add, Text,, Press Ctrl 4 to delete all marked items.
Gui, Add, Text,, Press Ctrl 5 to clear selected items.
;-----------------End GUI

;-----------------Start PanicButton
^1::
	Array:=[]
;-----------------End PanicButton

;-----------------Start TrackTrashButton
^2::
	MouseGetPos, xpos, ypos
	Trashcan_CoordX := xpos
	Trashcan_CoordY := ypos
	IniWrite, %Trashcan_CoordX%, Config.ini, Coord, TrashButtonX
	IniWrite, %Trashcan_CoordY%, Config.ini, Coord, TrashButtonY
	return
;-----------------End TrackTrashButton

;-----------------Start Marking
^3::
	if(Trashcan_CoordX = "ERROR"){
		MsgBox Trash Button not set!
		return
	}
	MouseGetPos, x, y
	Array.Push([x, y])
	return
;-----------------End Marking

;-----------------Start Deconstruction
^4::
	if(Trashcan_CoordX = "ERROR"){
		MsgBox Trash Button not set!
		return
	}else if(Array.Length() < 1){
		MsgBox You must mark something!
		return
	}
	Loop % Array.Length()
	{
		aux := Array[A_Index]
		MouseMove, aux[1], aux[2], 0
		send {MButton}
		sleep, 100
		Click %Trashcan_CoordX%, %Trashcan_CoordY%
		sleep, 500
	}
	Array := []
	return
;-----------------End Deconstruction

;-----------------Start ClearArray
^5::
	Array:=[]
	return
;-----------------End ClearArray

GuiClose:
ExitApp

Looks pretty interesting. I should try it later.

Item Destroyer Thingy :3

Post a Reply

Similar Threads

Tags for this Thread