Poison bot menu

These ads disappear when you log in.

Thread: Poison bot

Results 1 to 10 of 10
  1. #1
    Marlo's Avatar Banned
    Reputation
    84
    Join Date
    Jul 2006
    Posts
    2,622
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    Poison bot

    OK so im mega bored at the minute so i decided to have a play with AutoIt and came up with this!

    Basicly all it does is apply poisons to a rogues weapons! heres the code

    Code:
    ;This code block captures the mouse location and saves it to an ini file. 
    func setcoords()
    	MsgBox(64,"Configuration", "AutoBuff will configure your weapon positions so open WoW and your Character Window (C)")
    	MsgBox(0,"Main-hand", "Place your mouse over your mainhand weapon in your character window then press Return")
    		$main = MouseGetPos()
    	MsgBox(0,"Off-hand", "Now do the same for your Off-hand weapon")
    		$off = MouseGetPos()
    	IniWrite("autobuff-config.ini", "positions", "Main-hand X", $main[0])
    	IniWrite("autobuff-config.ini", "positions", "Main-hand Y", $main[1])
    	IniWrite("autobuff-config.ini", "positions", "Off-hand X", $off[0])
    	IniWrite("autobuff-config.ini", "positions", "Off-hand Y", $off[1])
    EndFunc
    
    ;This code block checks if the ini files exists. if not runs first codeblock.
    If Not FileExists("autobuff-config.ini") Then
    	setcoords()
    EndIf
    
    ;This block Creates the GUI, which is the "Graphical user interface"
    #include <GUIConstants.au3>
    GUICreate("AutoBuff", 220, 160)
    GUISetState (@SW_SHOW)
    
    ;Some Variables used in the script.
    $mainx = IniRead("autobuff-config.ini", "positions", "Main-hand X", "")
    $mainy = IniRead("autobuff-config.ini", "positions", "Main-hand Y", "")
    $offx = IniRead("autobuff-config.ini", "positions", "Off-hand X", "")
    $offy = IniRead("autobuff-config.ini", "positions", "Off-hand Y", "")
    $mainkey = IniRead("autobuff-config.ini", "keys", "mainhand", "")
    $offkey = IniRead("autobuff-config.ini", "keys", "offhand", "")
    	
    ;This is the script input and labels. 
    	$mainhand = GUICtrlCreateInput($mainkey,130,7,40)
    		GUICtrlCreateLabel("Poison key (Mainhand)",10,10)
    	$offhand = GUICtrlCreateInput($offkey,130,30,40)
    		GUICtrlCreateLabel("Poison key (Off-hand)",10,33)
    	$help = GUICtrlCreateButton("Help?", 175, 17)
    	
    	GUICtrlCreateLabel("Main-hand positions: ",10,70)
    	  $gotomain = GUICtrlCreateButton("x="&$mainx&"   y="&$mainy,120,65,80,20)
    	GUICtrlCreateLabel("Off-hand positions: ",10,90)
    	  $gotooff = GUICtrlCreateButton("x="&$offx&"   y="&$offy,120,85,80,20)
    		
    	$reset = GUICtrlCreateButton("Reset coords?",120,105,80,20)
    	$run = GUICtrlCreateButton("Run Script",25,130,80,20)
    	$close = GUICtrlCreateButton("Close Script",110,130,80,20)
    
    ;This is the important bit :P this is what happens when you press "run script"
    func runscript()
    	ControlFocus("World of Warcraft","","")
    	sleep(1000)
    	send("c")
    	sleep(500)
    	send(GUICtrlRead($mainhand))
    	sleep(300)
    	MouseClick("left",$mainx,$mainy)
    	sleep(3500)
    	send(GUICtrlRead($offhand))
    	sleep(300)
    	MouseClick("left",$offx,$offy)
    	sleep(300)
    	send("c")
    EndFunc
    
    ;This part processes all the input from the GUI.
    While 1
    	$msg = GUIGetMsg()
    	  
    	  Select
    		 Case $msg = $close
    			 WinClose("AutoBuff")
    			 iniwrite("autobuff-config.ini","keys","mainhand", GUICtrlRead($mainhand))
    			 iniwrite("autobuff-config.ini","keys","offhand", GUICtrlRead($offhand))
    		 Case $msg = $reset
    			 $delini = msgbox(4,"Confirm","Are you sure?")
    		     if $delini = 6 then 
    			 setcoords()
    			 MsgBox(64,"Done","Config file has been reset, now please restart AutoBuff")
    		     EndIf
    		 Case $msg = $run
    			 iniwrite("autobuff-config.ini","keys","mainhand", GUICtrlRead($mainhand))
    			 iniwrite("autobuff-config.ini","keys","offhand", GUICtrlRead($offhand))
    			 runscript()
    		 Case $msg = $help
    			 msgbox(0,"Help","The Poision keys are where abouts on your WoW interface your poisions are located")
    		 Case $msg = $gotooff
    			 MouseMove($offx,$offy)
    		 Case $msg = $gotomain
    			 MouseMove($mainx,$mainy)
    	  EndSelect	
    	
    	If $msg = $GUI_EVENT_CLOSE Then ExitLoop	
    WEnd
    im too lazy to write a description about it right now so i'll let you figure it out :P
    Last edited by Marlo; 01-24-2007 at 03:16 PM.

    These ads disappear when you log in.

  2. #2
    Baito's Avatar Master Sergeant
    Reputation
    11
    Join Date
    Nov 2006
    Posts
    76
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    Re: Poison bot

    Nice one! +rep I've always liked your work Marlo.


  3. #3
    Marlo's Avatar Banned
    Reputation
    84
    Join Date
    Jul 2006
    Posts
    2,622
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    Re: Poison bot

    thanks im still working on it. making it looks better ect.

    **EDIT**updated the code.

  4. #4
    Bloodpoisen's Avatar Active Member
    Reputation
    19
    Join Date
    Dec 2006
    Posts
    119
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    Re: Poison bot

    haha tubgirl ew

  5. #5
    Marlo's Avatar Banned
    Reputation
    84
    Join Date
    Jul 2006
    Posts
    2,622
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    Re: Poison bot

    COMPLETELY off-topic there :P

  6. #6
    Alickz's Avatar Corporal
    Reputation
    8
    Join Date
    Sep 2006
    Posts
    29
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    Re: Poison bot

    even more off topic...i was the 3167th person to get owned by marlo...
    on topic nice +rep
    its so hard to be modest when im SO DAMN GOOD

  7. #7
    Shingles's Avatar Active Member
    Reputation
    47
    Join Date
    Aug 2006
    Posts
    275
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    Re: Poison bot

    I was the 58th. Never went back for seconds.
    ||

    "It must be hard. Trying to remember the truth when it's not actually the truth. It'd be easier just to lie, eh?" - Munter.

  8. #8
    PolishMaster1's Avatar Sergeant
    Reputation
    6
    Join Date
    Jan 2007
    Posts
    42
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    Re: Poison bot

    ok....im a total newb,could someone tell me how to use this?

  9. #9
    Apocalyptic_Hunter's Avatar Corporal
    Reputation
    8
    Join Date
    Oct 2006
    Posts
    34
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    Re: Poison bot

    i was 200 something...
    "An apple a day keeps the doctor away... If you aim right..."
    -Wise man

  10. #10
    Marlo's Avatar Banned
    Reputation
    84
    Join Date
    Jul 2006
    Posts
    2,622
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    Re: Poison bot

    Originally Posted by malikadjoudi
    Ummm.... So this poisens ur weapons.. when your weapons can manually be poisened easier?
    its not meant for ease...not meant for anything really

    just wanted to see if i could do it :P

Similar Threads

  1. Rogue Poisons Field Repair bot
    By shtdp316 in forum World of Warcraft Exploits
    Replies: 12
    Last Post: 10-30-2008, 09:47 AM
  2. Rogue Poison Exploit
    By Matt in forum World of Warcraft Exploits
    Replies: 8
    Last Post: 12-18-2006, 09:18 PM
  3. WoWGlider and GALB Botting Locations
    By Matt in forum World of Warcraft Bots and Programs
    Replies: 14
    Last Post: 04-11-2006, 08:01 PM
  4. World of Warcraft Bot (GetALifeBot) 0.57 working with 1.9.4
    By Matt in forum World of Warcraft Bots and Programs
    Replies: 7
    Last Post: 03-07-2006, 09:43 PM
  5. Best Botting/Grinding Locations
    By Matt in forum World of Warcraft Exploits
    Replies: 0
    Last Post: 02-27-2006, 12:39 AM
All times are GMT -5. The time now is 05:52 PM. Powered by vBulletin® Version 4.2.3
Copyright © 2019 vBulletin Solutions, Inc. All rights reserved. Digital Point modules: Sphinx-based search