is there a macro that someone made to hit the stake then fb then hit agin etc etc....or will that not make it go faster...if someone has it and will post it...txtxtx
also i searched the whole co fourms and it brought nutthin up about it...i might of just not typed in the right key words
Originally posted by Fate435@Sep 8 2005, 09:10 is there a macro that someone made to hit the stake then fb then hit agin etc etc....or will that not make it go faster...if someone has it and will post it...txtxtx
also i searched the whole co fourms and it brought nutthin up about it...i might of just not typed in the right key words
GuttA
never heard that idea..then again..i jus use ND between 2
Someone posted a screenie of a player hitting a stake at ND speed, and using ScentSword at the same time.
I would assume its done by sending attack packets directly, bypassing the client delays.
If you try hitting a stake then using fb/scentsword afterwards, it will stop your normal attacking, and you get like 5 second delay before you can actually use the skill anyway/ Anyone using fb/scent and attacking constantly is using some kind of cheat, more than just a click macro.
VB. Create a standard .EXE and add 2 timers to it. Paste this in the form code
Code:
Private Declare Function Hotkey Lib "user32" Alias "GetAsyncKeyState" (ByVal key As Long) As Integer
Private Declare Sub mouse_event Lib "user32.dll" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Private Const MOUSEEVENTF_LEFTDOWN = &H2
Private Const MOUSEEVENTF_LEFTUP = &H4
Private Const MOUSEEVENTF_RIGHTDOWN = &H8
Private Const MOUSEEVENTF_RIGHTUP = &H10
Sub Form_Load()
Timer1.Enabled = False
Timer2.Enabled = True
Timer1.Interval = 500
Timer2.Interval = 1
Me.Visible = False
End Sub
Sub Timer1_Timer()
mouse_event MOUSEEVENTF_RIGHTDOWN Or MOUSEEVENTF_RIGHTUP, 0&, 0&, 0&, 0&
mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0&, 0&, 0&, 0&
End Sub
Sub Timer2_Timer()
If Hotkey(vbKeyNumpad0) Then
Timer1.Enabled = False
ElseIf Hotkey(vbKeyNumpad1) Then
Timer1.Enabled = True
ElseIf Hotkey(vbKeyNumpad2) Then
End
End If
End Sub
Set ScentSword/FB as your skill, and hover your mouse over the stake's shadow.
Numberpad 1 to start the macro, Numberpad 0 to stop, Numberpad 2 to exit the macro.
I created a script in that does the same thing AND uses Cyclone.
How to Use this Script:
1. Place Cyclone on the F1 key.
2. Select Fast Blade or Scent Sword as your current skill.
3. Run the script.
4. Hover mouse over the shadow at the stake you want to hit.
5. Press the Pause key to start the script.
If you want to pause the script, just press the Pause key. If you want to exit the script, just press the Esc key.
I've noticed that I'm almost in perpetual Cyclone (it lasts longer than usual) awhile using this script.
TG Macro1.au3
Code:
; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author: BitVector
; ElitePvPers Edition
;
; Script Function:
; Scent Sword/Fast Blade + Stake Hit + Cyclone
;
; ----------------------------------------------------------------------------
Global $Paused
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
Call("TogglePause")
While 1=1
If WinActive("[Conquer]") then
MouseClick("left")
Sleep(Random(100,200))
MouseClick("right")
Sleep(Random(100,200))
Send("{F1}")
Send("{F1}")
Sleep(Random(10,20))
Else
Sleep(100)
EndIf
WEnd
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script is Paused. Press Pause to Start/Continue.',0,0)
WEnd
ToolTip("")
EndFunc
Func Terminate()
Exit 0
EndFunc
EDIT: I've added random sleep timers to, hopefully, keep me from being jailed for using a macro. Also added second F1 key press, because sometimes the Cyclone didn't activate.
EDIT x2: If anyone wants to put this into an exe or re-release somewhere else, I give full permissions to anyone to do so. I just hope you give credit to me and ElitePvPers, that's all.
Originally posted by Virtue@Sep 8 2005, 13:21 Is using this macro better exp than hitting 2 stakes with ND or WaterElf?
Since I don't have ND or a water tao, I'm not sure. Perhaps someone else can check it out and see which one is better?
EDIT: I'm usually 85%+ in Cyclone when using this script, and if I'm hitting 1 stake plus SS'ing 2 stakes, then I would assume that my script would be just as good or better than ND in between 2 stakes.
The script looks like its useful, but so far Im under the impression that the macro will only click wherever your mouse is pointing at the moment. So if you (unknowinly) accidentally push your mouse while youre TGing , you'll end up moving around and SS/FBing randomly.
Maybe add a function so the mouse pointer locks onto the set coordinates so even if the mouse is moved it goes back to the preset location. I don't know if its possible to add this feature, but it would help a lot.
Ok, here is a version with Mouse Lock. Once you press Pause, it will start up the script and lock on to where your mouse was last positioned. If you move the mouse, it will automatically move your mouse back to the original position.
It is quite useful if your mouse is extremely sensitive to vibrations in the room that might move it (like mine).
Code:
; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author: BitVector
; ElitePvPers Edition
;
; Script Function:
; Scent Sword + Stake Hit + Cyclone
; New Feature: Mouse Lock (requested by Virtue)
;
; ----------------------------------------------------------------------------
Global $Paused
Global $MousePos
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
Call("TogglePause")
While 1=1
If WinActive("[Conquer]") then
MouseClick("left",$MousePos[0],$MousePos[1],1,0)
Sleep(Random(50,100))
MouseClick("right",$MousePos[0],$MousePos[1],1,0)
Sleep(Random(50,100))
Send("{F1}")
Send("{F1}")
Sleep(Random(10,20))
Else
Sleep(100)
EndIf
WEnd
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script is Paused. Press Pause to Start/Continue.',0,0)
WEnd
ToolTip("")
$MousePos = MouseGetPos()
EndFunc
Func Terminate()
Exit 0
EndFunc
EDIT: I decreased the sleep timers in this version so it'll be a little faster. And as always, this script is free to use, change, and distribute to your heart's content.
Ok, this will probably be my last version of this script, since it is my best so far.
I took out the sleep timers, because in this case, faster is better. I put the F1 key presses in better locations so that Cyclone will activate every time. My trojan is level 100+, and I am in perpetual Cyclone awhile using this script. In other words, Cyclone lasts forever and does not stop. My experience gains are amazingly fast (compared to normal TG'ing).
I've included the source code as well as an .exe file for those who do not have AutoIt v3 installed.
Code:
; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author: BitVector
; ElitePvPers Edition
;
; Script Function:
; Scent Sword + Stake Hit + Cyclone
; New Feature: Mouse Lock (requested by Virtue)
;
; ----------------------------------------------------------------------------
Global $Paused
Global $MousePos
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
Call("TogglePause")
While 1=1
If WinActive("[Conquer]") then
MouseClick("left",$MousePos[0],$MousePos[1],1,0)
Send("{F1}")
MouseClick("right",$MousePos[0],$MousePos[1],1,0)
Send("{F1}")
Else
Sleep(100)
EndIf
WEnd
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script is Paused. Press Pause to Start/Continue.',0,0)
WEnd
ToolTip("")
$MousePos = MouseGetPos()
EndFunc
Func Terminate()
Exit 0
EndFunc
For those who need instructions, just check a few posts up where I posted my first version of the script. If you are not a Trojan and still want to use this trick, then all you need to do is just make sure that your F1 spot is empty.
that does the same thing AND uses Cyclone.
