• 1 Vote(s) - 5 Average
  • 1
  • 2
  • 3
  • 4
  • 5
AutoHotKey RapidFire Script
#1
http://www.autohotkey.com/
Well here's the tutorial to your rapid fire script:

1. Open up ScriptWriter, after installing and DL'ing AutoHotKey
2. Paste this :

Code:
WinWait, ,
IfWinNotActive, , , WinActivate, ,
WinWaitActive, ,
$x::
Loop
{
if not GetKeyState("x", "P")
break
sleep 1
Click
}
return

into the editor
3. Save it as (whatever).ahk
4. Open "Compile .ahk to .exe"
5. Select the file you just created + it's destination point+name
6. Compile and open up the .exe you just created.
6.1 There now should be a H icon in the bottom right corner of your screen.
7. Hold X Button down to rapid fire.
8. With X Button I mean the actual X Button on the keyboard, but you can insert any key if you want to, just replace the x in the script with the button you want and proceed as usual.
[-] The following 1 user says Thank You to d0h! for this post:
  • Yamato
  Reply
#2
Here is another Rapidfire script that allows you to turn it on and off.

Press INSERT to toggle on and off, click and hold LeftMouse to rapid fire.
by ProXimity

Code:
#SingleInstance
gActivateScript = 0

; Insert to activate the macro
~Insert::
KeyWait, Insert
GetKeyState, InsertState, Insert, T
If InsertState = D
{
    gActivateScript = 1

}
else
{
    gActivateScript = 0

}
return

; CTRL + SHIFT + LBUTTON to activate the macro
~+^LButton::
If gActivateScript = 0
{
    gActivateScript = 1

}
else
{
    gActivateScript = 0

}
return

;Also applies to burst weapons. ie click and hold will perform like a full auto firing mode
~LButton::
Goto, DoFiringLoop
Return

;When crouching and firing at the same time. Using Ctrl as crouch button
~^LButton::
Goto, DoFiringLoop
Return

DoFiringLoop:
if gActivateScript = 1
{
    Loop
    {
       ;Make sure CodMW2 window is the active window. Don't want weird mouse behaviour appearing at other window
        IfWinActive, Modern Warfare 2
{
            MouseClick, left,,, 1, 0, D
           ;delay between simu. mouse btn down and up
            Sleep, 0
            MouseClick, left,,, 1, 0, U
            GetKeyState, LButtonState, LButton, P
            If LButtonState = U
            {
               ;break the loop if physical state of mouse btn is up.
                break
            }
           ;delay between each simu. click events
            Sleep, 0
        }
        else
        {
            break
        }
    }
  
}
exit

return
[-] The following 3 users say Thank You to d0h! for this post:
  • Arteq, Cgallagher, Yamato
  Reply
#3
Nice.! Thanks for sharing
  Reply
#4
Thanks D0h Im sure the 12 year old leechers would like to know too Big Grin
  Reply
#5
Lol bloop
  Reply
#6
Not sure where I found this one, but apparently it works on Cod4,5,MW2, WaW & BO! You should totally combine it.

Crosshair, fire mode toggle, recoil compensation and animation cancelling.

I've only used firing mode on BO, personally. You need to experiment with firerates for each game, lower is better but might not fire or maybe screw with the game.

Code:
#SingleInstance
#NoEnv
;------#COD TOOLBOX#-----------------------------------------------
;Script by Zygorator        
;Original crosshair script by guest and master131
;------------------------------------------------------------------

;------------------------------------------------------------------
;Add your games window class name to this list to activate the script for that game
;------#GAMES#--------------------------------------------------

GroupAdd,gamewindow ,ahk_class CoD4            ;COD 4: MW
GroupAdd,gamewindow ,ahk_class CoD-WaW        ;COD 5: WAW
GroupAdd,gamewindow ,ahk_class IW4            ;COD 6: MW2
GroupAdd,gamewindow ,ahk_class CoDBlackOps    ;COD 7: BO

;------------------------------------------------------------------
#IfWinActive ahk_group gamewindow
;------#INFO#------------------------------------------------------

;    Remember to set your game to run in windowed mode and restart if you want to show crosshair (and alt-tab out while dead)
;    The script will automatically maximize and remove borders from the game so it works completely like fullscreen mode
;    Punkbuster seems to hate overlays

;    There are three different fire modes:
;    1) Single gun rapidfire
;    2) Akimbo/Dual Wield rapidfire
;    3) Burst fire

;------------------------------------------------------------------
;All keys behave as normal when game window is not at the front.
;------#BINDINGS#--------------------------------------------------

anim_cancel        = 4            ;Animation canceling for faster reload.

switch_mode        = Insert         ;Switch between fire modes
crosshair        = Delete        ;Toggle the crosshair

burst_down        = NumpadSub        ;Lower amount of bullets fired in burst mode (different weapons have different firerates)
burst_up        = NumpadAdd        ;Raise amount of bullets fired in burst mode (you might need to raise/lower this more than once just to add/remove one bullet in the burst)

recoil_toggle    = End            ;Toggle recoil compensation
recoil_up        = PgUP            ;Increase recoil compensation (how many pixels it moves each time it is run)
recoil_down        = PgDn            ;Decrease recoil compensation

;------------------------------------------------------------------
;Firerates in miliseconds. Lower is faster. Default should work fine, but some servers might kick when this low.
;For optimal results, set it close to the firerate of a specific gun (this will of course make it less optimal for other guns.)
;------#FIRERATES#-------------------------------------------------

firerate_1 := 25     ;Mode 1
firerate_2 := 35        ;Mode 2
firerate_3 := 45        ;Mode 3

;------------------------------------------------------------------
;Crosshair colour in base16
;------#CROSSHAIR SETTINGS#----------------------------------------

red = 00
green = FF
blue = 00

;------------------------------------------------------------------
;Don't change these unless you know what you're doing:
;------#OTHER VARIABLES#-------------------------------------------

switch_weapon = 1
window_title = ahk_group gamewindow
finalcolor = 0x00%blue%%green%%red%
fire = LButton
rcoil := 3
rcoil_on := 0
fullscreen := 0
max_burst := 20
max_recoil := 20
fire_mode := 0
looptime := 4
drawshit := 0
xpos := A_ScreenWidth/2
ypos := A_ScreenHeight/2
hDrwArea := DllCall("GetDC", "uint", Null)

;--------------------------------------------------------------
;Feel free to rage over incredible amounts of redundant code, my first script.
;--------------------------------------------------------------
Hotkey,~*%fire%,rapidfireLoop
Hotkey,~*%switch_mode%,doswitch_mode
Hotkey,~*%crosshair%,docrosshair
Hotkey,~*%burst_up%,doBurst_up
Hotkey,~*%burst_down%,doBurst_down
Hotkey,~*%recoil_down%,rcoildown
Hotkey,~*%recoil_up%,rcoilup
Hotkey,~*%recoil_toggle%,rcoiltoggle
Hotkey,~*%anim_cancel%,animcancel


lazor:
Loop
{
    WinWaitClose, %window_title%
    {
        fullscreen := 0
        fire_mode := 0
        Dontdraw()
        drawshit := 0
    }
    
    WinWait, %window_title%
    {    
        if not fullscreen = 1
        {
            WinActivate
            fullscreen := 1
            WinSet, Style, -0xC00000
            WinMove, , , 0, 0
            WinMaximize
        }
    }
sleep 10000
}
return

animcancel:
{
    SendInput {%switch_weapon%}
    sleep 10
    SendInput {%switch_weapon%}
    sleep 100
}
return

doswitch_mode:
If fire_mode < 3
{
    fire_mode += 1
    if fire_mode = 1
    {
SoundBeep, 600, 100
    }
    else if fire_mode = 2
    {
SoundBeep, 800, 100
    }
    else if fire_mode = 3
    {
SoundBeep, 1000, 100
    }
}
else
{
fire_mode := 0
SoundBeep, 200, 100
SoundBeep, 200, 100
}
return

docrosshair:
If drawshit < 1
{
    drawshit +=1
    If drawshit = 1
    {
        Draw()
    }
}
else
{
Dontdraw()
drawshit := 0
}
return

doBurst_down:
IfWinActive, %window_title%
{
    if looptime > 1
    {
        SoundBeep, 650, 100
        looptime -= 1
    }
    else
    {
        looptime = 1
        SoundBeep, 650, 100
        SoundBeep, 750, 100
    }
}
return

doBurst_up:
if looptime < %max_burst%
    {
        SoundBeep, 450, 100
        looptime += 1
    }
    else
    {
        looptime = %max_burst%
        SoundBeep, 450, 100
        SoundBeep, 550, 100
    }
return

rcoildown:
if rcoil > 1
    {
        SoundBeep, 450, 100
        rcoil -= 1
    }
    else
    {
        SoundBeep, 440, 100
        rcoil = 1
    }
return

rcoilup:
if rcoil < %max_recoil%
    {
        SoundBeep, 650, 100
        rcoil += 1
    }
    else
    {
        SoundBeep, 650, 100
        rcoil = %max_recoil%
    }
return

rcoiltoggle:
if rcoil_on = 0
    {
        SoundBeep, 1200, 100
        rcoil_on := 1
    }
    else
    {
        SoundBeep, 350, 100
        rcoil_on := 0
    }
return

recoil_reduction()
{
    global
    if rcoil_on = 1
    {
        MouseMove, 0, rcoil ,0 , r
    }
}
return

rapidfireLoop:
if not fire_mode = 0
{
    Loop
    {
        GetKeyState, LButtonState, LButton, P
        if fire_mode = 1
        {
            Click
            recoil_reduction()
            sleep, %firerate_1%
            If LButtonState = U
            {
                break
            }
        }
        else if fire_mode = 2
        {
            
            Click
            recoil_reduction()
            Sleep, %firerate_2%
            Click right
            Sleep, %firerate_2%
            If LButtonState = U
            {
                break
            }
        }
        else if fire_mode = 3
        {
            loop %looptime%
            {
                Click
                recoil_reduction()
                Sleep %firerate_3%
            }
            Sleep 20
            break
        }
        else
        {
            break
        }
    }    
}
else
{
    if rcoil_on = 1
    {
        loop
        {
            sleep 60
            recoil_reduction()
            GetKeyState, LButtonState, LButton, P
            If LButtonState = U
            {
                break
            }
        }
    }
}
return



Draw()
{
SetTimer, SetPixel, 1
}
return

Dontdraw()
{
SetTimer, SetPixel, Off
}
return


SetPixel:
IfWinActive, %window_title%
{
DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos - 2, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos + 2, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos - 3, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos + 3, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos - 2, "int", ypos, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos + 2, "int", ypos, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos - 3, "int", ypos, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos + 3, "int", ypos, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos - 4, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos + 4, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos - 4, "int", ypos, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos + 4, "int", ypos, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos - 5, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos + 5, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos - 5, "int", ypos, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos + 5, "int", ypos, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos - 6, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos + 6, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos - 6, "int", ypos, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos + 6, "int", ypos, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos - 7, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos, "int", ypos + 7, "uint", finalcolor)

DllCall("SetPixel", "uint", hDrwArea, "int", xpos - 7, "int", ypos, "uint", finalcolor)
DllCall("SetPixel", "uint", hDrwArea, "int", xpos + 7, "int", ypos, "uint", finalcolor)
}
Return

; THE END?
; (yes)
  Reply
#7
I have a RapidFire macro i want to upload but for some reason my anti virus now sees it as a trojan o.O
  Reply
#8
Hi, how can i use MButton? (wheel mouse button)
I replace "x" for that button but dont work.
  Reply


Possibly Related Threads...
Thread Author Replies Views Last Post
  Who can create this script First_Semyon 3 1,125 09-24-2013, 18:19
Last Post: First_Semyon
  [Release] Advanced timed messages with script support DePa95 0 1,551 08-07-2013, 19:35
Last Post: DePa95
  Help Run Infinity Script on Teknogods? Bandarigoda123 6 2,292 07-14-2013, 17:27
Last Post: surtek
  can't find script engine "VBScript" for script "C:\Windows\system32\slmgr.vbs" ddaavvee 6 12,918 06-18-2013, 03:46
Last Post: dylankrajewski
  Simple flyable helicopter script port, could use help! akillj 0 516 06-15-2013, 09:20
Last Post: akillj
  What script controls the "random" aspect to care packages? akillj 2 567 06-05-2013, 11:24
Last Post: akillj
  Help Server Script Compile Error when loading ExtremeBunkerMaker lolmoon 3 833 04-09-2013, 03:11
Last Post: lolmoon
  [News] BO2 uses havok script kokole 19 2,633 02-05-2013, 10:04
Last Post: Pozzuh
  Help how make game mode script gsc pap12322221112 3 862 12-11-2012, 05:27
Last Post: rotceh_dnih
  Help Maximum Parent Script Variables DidUknowiPwn 11 1,758 11-21-2012, 19:30
Last Post: DidUknowiPwn

Forum Jump:


Users browsing this thread: 1 Guest(s)