Results 1 to 2 of 2

Thread: [AutoIt] Blind Rotation Bot

  
  1. #1
    Contributor Netzgeist's Avatar
    Reputation
    128
    Join Date
    Jan 2008
    Location
    Germany
    Posts
    304

    [AutoIt] Blind Rotation Bot

    What?
    A simple script that does your rotation. Eg you tell him "1,2,3,4,e,e,1,e,r" and he does. You need to tell him your lag, your rotation and some casttimes if there are some. It doesnt read or write anything to the game (because I dont know a shit about howto :P) and it properbly wont maxout your dps, but if you're eg a tank it can spare some attention for you.

    What do?
    1. Get AutoIt
    2. Edit the script below to fit your needs
    3. Compile it and run it (Win Vista/7/8: as admin)
    4. Tab to Game and hit F1 to Start/Stop anytime you want



    Whats next?
    Nothing. No updates, feature request etc blabla. No space physics, just an autoit script :P


    What script?
    Code:
    #include <WindowsConstants.au3>
    
    #cs ----------------------------------------------------------------------------
    
     AutoIt Version: 3.3.8.1
     Author:         Ownedcore :P
    
     Script Function:
        Rotates defined abillities in defined times.
    
    #ce ----------------------------------------------------------------------------
    
    ;Globals
    Global $HotkeyStartStop = "{F1}"
    Global $windowName = "Star Wars - The old Republic"
    Global $GlobalCoolDown = 1400 ;ms
    Global $averageLag = 75 ;ms
    Global $defaultSleep = $GlobalCoolDown + $averageLag
    Global $SpellsToUse = 9; Rest will be ignored
    Global $topmost = false
    
    Global $spells[20][2]
    $spells[0][0] = "4"
    $spells[0][1] = $defaultSleep
    
    $spells[1][0] = "2"
    $spells[1][1] = $defaultSleep
    
    $spells[2][0] = "3"
    $spells[2][1] = $defaultSleep
    
    $spells[3][0] = "1"
    $spells[3][1] = $defaultSleep
    
    $spells[4][0] = "e"
    $spells[4][1] = $defaultSleep
    
    $spells[5][0] = "1"
    $spells[5][1] = $defaultSleep
    
    $spells[6][0] = "2"
    $spells[6][1] = $defaultSleep
    
    $spells[7][0] = "3"
    $spells[7][1] = $defaultSleep
    
    $spells[8][0] = "r"
    $spells[8][1] = $defaultSleep + 1600 ; = 3s casttime +lag
    
    $spells[9][0] = "1"
    $spells[9][1] = $defaultSleep
    
    $spells[10][0] = "1"
    $spells[10][1] = $defaultSleep
    
    $spells[11][0] = "1"
    $spells[11][1] = $defaultSleep
    
    $spells[12][0] = "1"
    $spells[12][1] = $defaultSleep
    
    $spells[13][0] = "1"
    $spells[13][1] = $defaultSleep
    
    $spells[14][0] = "1"
    $spells[14][1] = $defaultSleep
    
    $spells[15][0] = "1"
    $spells[15][1] = $defaultSleep
    
    $spells[16][0] = "1"
    $spells[16][1] = $defaultSleep
    
    $spells[17][0] = "1"
    $spells[17][1] = $defaultSleep
    
    $spells[18][0] = "1"
    $spells[18][1] = $defaultSleep
    
    $spells[19][0] = "1"
    $spells[19][1] = $defaultSleep
    
    ;----------------------------DONT EDIT ANYTHING BELOW----------------------------
    
    Global $frontend
    if $topmost = true Then
        $frontend = GUICreate("TorBR",220,45,200,200, $WS_POPUP, $WS_EX_TOPMOST)
    Else
        $frontend = GUICreate("TorBR",220,45,200,200)
    EndIf
    WinSetOnTop($frontend,"",1)
    $status = GUICtrlCreateLabel("IDLE       ",189,5)
    $labelCount = GUICtrlCreateLabel("Count:",9,5)
    $count = GUICtrlCreateLabel("0",50,5)
    $usage = GUICtrlCreateLabel("F1: Start/Stop - F2: Reset Stats - ESC: Exit",10,25)
    
    Global $isRunning = false
    Global $iCount = GUICtrlRead($count)
    
    Func KillApp()
        Exit
    EndFunc
    
    Func StartStop()
        If $isRunning = true Then
            $isRunning = false
            GUICtrlSetData($status,"IDLE");
            GUICtrlSetPos($status,189,5);
            while 1
                ;nothing
            WEnd
        Else
            $isRunning = true
            GUICtrlSetPos($status,160,5);
            GUICtrlSetData($status,"RUNNING")
            $iCount = $iCount + 1
            GUICtrlSetData($count,$iCount);
            While 1
                PRotation()
            WEnd
        EndIf
    EndFunc
    
    Func ResetStats()
        $iCount = 0
        GUICtrlSetData($count,$iCount);
    EndFunc
    
    Func PRotation()
        for $i = 0 To $SpellsToUse - 1
            ;ConsoleWrite($spells[$i][0] & "|" & $spells[$i][1] & " -- ") ;Debug :P
            Send($spells[$i][0]);
            Sleep($spells[$i][1]);
        Next
    EndFunc
    
    
    Func StopwatchStart()
        AdlibRegister("KillApp")
    EndFunc
    
    
    HotKeySet("{Esc}","KillApp")
    HotKeySet("{F1}","StartStop")
    HotKeySet("{F2}","ResetStats")
    
    GUISetState()
    
    While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
            Case 1
                Exit
        EndSwitch
    WEnd
    I wanna thank you
    Donate to ownedcore or send me loveletters if youre female lol
    My contributions:
    http://codepad.org/8lc2Kjad

  2. #2
    Member
    Reputation
    1
    Join Date
    Jan 2012
    Posts
    6
    Kinda Hope someone will roll with this guy and help to improve this to the pq rotations quality

 

 

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
All times are GMT -4. The time now is 04:09 PM. Powered by vBulletin® Version 4.1.12
Copyright © 2012 vBulletin Solutions, Inc. All rights reserved.
Content Relevant URLs by vBSEO

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154