Jump to content

Need help :( with a check au3


kookoosan
 Share

Recommended Posts

  • Replies 47
  • Created
  • Last Reply

Top Posters In This Topic

Top Posters In This Topic

Just Copy the whole script that is inside the loop and paste it below itself. then at the end of the script (inside the loop) write the code that i put before

My site for HTML Help :)[quote name='Valik' date='Oct 15 2004, 12:29 PM']Maybe nobody is an "elite uber-coder" like me because thinking is a capital offense in today's online-world?[right][snapback]36427[/snapback][/right][/quote]
Link to comment
Share on other sites

Just Copy the whole script that is inside the loop and paste it below itself. then at the end of the script (inside the loop) write the code that i put before

<{POST_SNAPBACK}>

;  /////////// JHJ RESTARTER /////////////
; ///////////// by Cascius //////////////
;//////////////// v 1.0 ////////////////


AutoItSetOption("MouseCoordMode", 0)

$counter = 0

Func CheckCount() 
         $counter = $counter + 1
    
         If $counter = 4 then 
       
         WinActivate("Create Delay") 

         


        Opt("SendKeyDelay", 1) 
        MouseClick("Left", 82, 501)
        MouseClick("Left", 583, 506)
        MouseClick("Left", 573, 178)
        Send("/join abskjdhg{enter}")
                Sleep(2000)
                Send("alsbvhs{enter}")
                Sleep(1000)
                Send("eabljshbs{enter}")

        MouseClick("Left", 726, 443)
        MouseMove(200, 560) 
        MouseClick("left", 200, 560, 10) 
        Sleep(500) 
        Send ("dsaliyrtgf") 
        Send ("{ENTER}") 
        Sleep(500) 
        Send ("hthtdeeds") 
        Send ("{ENTER}") 
        Sleep(500) 
        Send ("hi") 
        Send ("{ENTER}") 
        Sleep(5000) 
        $counter = 0

    EndIf 
EndFunc    
Do 
   
   
   $JHJNAME = IniRead("restarter.ini", "Settings", "jhjname", "NotFound")
   $RUNS = IniRead("restarter.ini", "Settings", "runs", "NotFound")
   $DELAY = IniRead("restarter.ini", "Settings", "delay1", "NotFound")
   $KILL = IniRead("restarter.ini", "Settings", "kill", "NotFound")
   $RD_DELAY = IniRead("restarter.ini", "Settings", "delay2", "NotFound")
   $MODE = IniRead("restarter.ini", "Settings", "mode", "NotFound")
   $WIN98FIX = IniRead("restarter.ini", "Settings", "win98fix", "NotFound")
   
   
   
   
   If WinExists($JHJNAME, "Create Delay") Then  
   Call("CheckCount") 
   Endif
  
;// 




   
  ;/////////////// Start the Realm Down/# of runs Detection ///////////////
   
   $RESTART = 0
   If WinExists($JHJNAME, "Realm Down") Then
      $RESTART = 1
      $WAIT = $RD_DELAY
   EndIf
   If WinExists($JHJNAME, "Total  : " & $RUNS) Then
      $RESTART = 1
      $WAIT = $DELAY
   EndIf
   If WinExists($JHJNAME, "T2     : 12:0" & $KILL) Then
      $RESTART = 1
      $WAIT = $DELAY
   EndIf
   
   
  ;/////////////// End the Realm Down/# of runs Detection ///////////////
   
   
   
   
   
  ;/////////////// Start the restart process ///////////////   
   
   If $RESTART = 1 Then
      
    ;--------------- This kills Diablo bots ---------------
      
      WinActivate($JHJNAME) 
      WinWaitActive($JHJNAME) 
      MouseClick("Left", 150, 210)
      Sleep($WAIT)
      
    ;--------------- Restart the bots ---------------
      WinActivate($JHJNAME) 
      WinWaitActive($JHJNAME)       
      If $MODE = 0 Then
         MouseClick("Left", 150, 71)
      Else
         MouseClick("Left", 75, 60)
         MouseClick("Left", 150, 110)
      EndIf
      If $WIN98FIX = 1 Then
         Sleep(5000)
         Run("Loader.exe")
      EndIf
      Sleep(5000)
      
   EndIf
   
  ;/////////////// End the restart process ///////////////      
   
   
   
   
   
  ;/////////////// Start the "Wait for Bnet" Detection ///////////////
   
   If $MODE = 1 Then
      If WinExists("PBot by JHJ - Translated By LordLardo and Fish Beans", "Wait BN") Then
         
         
        ;--------------- Switch Character and CDkey ---------------
         WinActivate($JHJNAME) 
         WinWaitActive($JHJNAME) 
         MouseClick("Left", 150, 210)
         Sleep(500)
         MouseClick("Left", 75, 60)
         MouseClick("Left", 150, 110)
         Sleep(5000)
      EndIf      
   EndIf
   
  ;/////////////// End the "Wait for Bnet" Detection ///////////////
   
   
   
   
   
   
   Sleep(1000);// This delay reduces CPU load
   
   $VARIABLE = $VARIABLE + 1 
Until $VARIABLE = 5000000000000 


; Finished!

:) Im stupid I hate myself...

Edited by kookoosan
Link to comment
Share on other sites

Guest BL@(K-R34P3R

Congratulations, you should submit that to www.blizzhackers.com I know the owner of the site, I'm sure that he would host for you. They are always looking for things like that!

Link to comment
Share on other sites

Congratulations, you should submit that to www.blizzhackers.com I know the owner of the site, I'm sure that he would host for you. They are always looking for things like that!

<{POST_SNAPBACK}>

What?? , never realmgx.com...It still isnt right :S can some1 fix this 4 me?
Link to comment
Share on other sites

I thought you already had this done... what seems to be the problem now?

JS

AutoIt Links

File-String Hash Plugin Updated! 04-02-2008 Plugins have been discontinued. I just found out.

ComputerGetInfo UDF's Updated! 11-23-2006

External Links

Vortex Revolutions Engineer / Inventor (Web, Desktop, and Mobile Applications, Hardware Gizmos, Consulting, and more)

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...