Array to int problem

Misha · March 12, 2007

so here I have a code and the problem is in the lines 130 through 146 there I try to get the number from wingetclientsize and devide it by the percent or so to say so'll ill get the cordiantes in any resolution so when I try to devide it tells me that arrays cant be devided by variables what do I do..

EDIT:I didnt upload the code oh shi I am sorry :whistle:

;Declatation.
#NoTrayIcon
#include <GuiConstants.au3>
Dim $SB = 3 , $OB = 2 ,$TS = 4
;options
Opt("WinTitleMatchMode", 4)
Opt("GUIOnEventMode", 1)
;Gui makeing
HotKeySet("{NUMPAD7}","RCON")
HotKeySet("{NUMPAD1}","APON")
HotKeySet("{NUMPAD9}","LCON")
HotKeySet("{NUMPAD6}","ASON")
HotKeySet("{NUMPAD4}","ADON")
HotKeySet("{NUMPAD0}","Halt")
$Parent=GUICreate("Spinny Bot Beta v0.4",400,400)
GUICtrlCreateGroup("Instructions",5,3,190,130)
GUISetFont(7)
GUICtrlCreateLabel("Right Click = 7" & @CRLF & "Auto Pick = 8" & @CRLF & "Left Click = 9" & @CRLF & "Auto Skill = 6 - Delay Increse 4 / Decrease 1" & @CRLF & "Auto Spin = 5 - Delay Increase ctrl+5 / Decrease 2" & @CRLF & "Stop = 0" ,10,20,110,110)
$SillyMenu=GuiCtrlCreateMenu("File")
$save=GUICtrlCreateMenuitem("Save",$SillyMenu)
GuiCtrlsetonevent($save,"Savetoini")
$SM=GUICtrlCreateMenuitem("Exit",$SillyMenu)
GuiCtrlSetOnEvent($SM,"LOL")
$SillyMenu2=GuiCtrlCreateMenu("Help")
$ABT=GUICtrlCreateMenuitem("About",$SillyMenu2)
GuiCtrlSetOnEvent($ABT,"ABTF")
$HLP=GuiCtrlCreatemenuitem("Help",$sillymenu2)
GuiCtrlSetOnEvent($HLP,"HLPF")
GuiCtrlCreateGroup("Clickers",200,5,195,127)
GuiCtrlCreateLabel("Right",210,20)
GUICtrlCreateLabel("Picker",210,40)
GUICtrlCreateLabel("Left",210,60)
GUICtrlCreateLabel("Drop",210,80)
GuiCtrlCreateLabel("Skill",210,100)
$RCS = GuiCtrlCreateLabel("Off",340,20)
$RCD = GuiCtrlCreateLabel("25",250,20,20)
$APS = GuiCtrlCreateLabel("Off",340,40)
$APD = GuiCtrlCreateLabel("500",250,40,20)
$LCS = GuiCtrlCreateLabel("Off",340,60)
$LCD = GuiCtrlCreateLabel("500",250,60,20)
$ADS = GuiCtrlCreateLabel("Off",340,80)
$ADD = GUICtrlCreateLabel("1000",250,80,25)
$ASS = GuiCtrlCreateLAbel("Off",340,100)
$ASD = GUICtrlCreateLabel("30000",250,100,25)
$BMR=GUICtrlCreateButton("-",280,20,15,10)
GUICtrlSetOnEvent($BMR,"DownRC")
$BPR=GUICtrlCreateButton("+",300,20,15,10)
GUICtrlSetOnEvent($BPR,"UpRC")
$BMP=GUICtrlCreateButton("-",280,40,15,10)
Guictrlsetonevent($BMP,"DownAP")
$BPP=GUICtrlCreateButton("+",300,40,15,10)
GUICtrlSetOnEvent($BPP,"UpAP")
$BML=GUICtrlCreateButton("-",280,60,15,10)
GUICtrlSetOnEvent($BML,"DownLC")
$BPL=GUICtrlCreateButton("+",300,60,15,10)
GUICtrlSetOnEvent($BPL,"UpLC")
$BMD=GUICtrlCreateButton("-",280,80,15,10)
GUICtrlSetOnEvent($BMD,"DownAD")
$BPD=GUICtrlCreateButton("+",300,80,15,10)
GUICtrlSetOnEvent($BPD,"UpAD")
$BMS=GUICtrlCreateButton("-",280,100,15,10)
GUICtrlSetOnEvent($BMS,"DownAS")
$BPS=GUICtrlCreateButton("+",300,100,15,10)
GUICtrlSetOnEvent($BPS,"UpAS")
$RI=GuiCtrlCreateInput("1",10,300,40,20)
Guictrlcreatelabel("Rows for Drop",60,305)
$RIU = GUICtrlCreateUpdown($RI)
Guictrlsetlimit($RIU,8,1)
GuictrlcreateGroup("Others",5,150,190,190)
$Vne=GUICtrlCreateInput("2",10,165,45,20)
$Updwn2=GUICtrlCreateUpdown($Vne)
GUICtrlSetLimit($Updwn2,9,1)
$Zone=GUICtrlCreateInput("3",10,193,45,20)
$Updwn1=GUICtrlCreateUpdown($Zone)
GUICtrlSetLimit($Updwn1,9,1)
$Dostupa=GUICtrlCreateInput("4",10,221,45)
$Updwn3=GuiCtrlCreateUpdown($Dostupa)
GUiCtrlSetlimit($Updwn3,9,1)
$LolCB=GUICtrlCreateCheckbox("Third Skill",95,165)
$BSB=GuiCtrlCreateButton("Set",68,165,23,50)
GUICtrlCreateLabel("Top = Main Skill" & @CRLF & "Bottom = Hp Buff",95,190,75,40)
GuiCtrlSetOnEvent($BSB,"BSBF")
GUICtrlCreateLabel("*Note: The Delay of the skill while"& @CRLF & "active is defined by the right clicker.",20,250)
GUISetState()
GUISetOnEvent($GUI_EVENT_CLOSE, "LOL")
If FileExists(@ScriptDir & "\" & "ConfigYoMama.ini") Then
    $OB = IniRead("ConfigYomama.ini","Buttons","OB","2")
    GuiCtrlSetData($Vne,$OB)
    $SB = Iniread("ConfigYoMama.ini","Buttons","SB","3")
    GuiCtrlSetData($Zone,$SB)
    $TS = IniRead("ConfigYoMama.ini","Buttons","TS","4")
    GUICtrlSetData($Dostupa,$TS)
    GuiCtrlSetData($RCD,IniRead("ConfigYoMama.ini","Delay","RCD","25"))
    GuiCtrlSetData($APD,IniRead("ConfigYoMama.ini","Delay","APD","500"))
    GuiCtrlSetData($LCD,IniRead("ConfigYoMama.ini","Delay","LCD","500"))
GuiCtrlSetData($ASD,IniRead("ConfigYoMama.ini","Delay","ASD","60000"))
GuiCtrlSetData($ADD,IniRead("ConfigYoMama.ini","Delay","ADD","60000"))
    EndIf
 Func RCON()
     if GuiCtrlRead($RCS) = "Off" Then
         GUICtrlSetData($RCS,"On")
    $TimerThingyAP= TimerInit ( )
    $TimerThingyAS=TimerInit()
    $TimerThingyAD=TimerInit()
     While 1
         MouseClick("Right")
         If GuiCtrlRead($APS) = "On" and TimerDiff($TimerThingyAP) >= GuiCtrlRead($APD) Then
             Send("{SPACE}")
             $TimerThingyAP = TimerInit()
         EndIf
         if TimerDiff($TimerThingyAS) >= GuiCtrlRead($ASD) and GuiCtrlRead($ASS) = "On" Then
             Send($SB,1)
             Sleep(1000)
             MouseClick("Right")
             Sleep(2000)
             Send($OB,1)
             Sleep(1000)
             if GuiCtrlRead($LolCB) = $GUI_CHECKED Then
                 Send($TS,1)
                 Sleep(1000)
                 MouseClick("Right")
                 Sleep(2000)
                 Send($OB,1)
                 Sleep(1000)
                 EndIf
             $TimerThingyAS = TimerInit()
         EndIf
         if GuiCtrlRead($ADS) = "On" And TimerDiff($TimerThingyAD) >= GuiCtrlRead($ADD) Then
                Send("v",1)
             $ClientSize=Wingetclientsize("MU")
             $PointOfX=$ClientSize[0] / 1.3445378 
             $PointOfY=$ClientSize[1] / 3.0188679
             int($PointOfX)
             int($PointOfY)
             $DiffranceSizeX = $ClientSize[0] / 32
             $DiffranceSizeY = $ClientSize[1] / 32
             int($DiffranceSize)
             $PotOfX=$ClientSize[0] / 5.12
             $PotOfY=$ClientSize[1] / 1.0666666
             Int($PotOfX)
             int($PotOfY)
             $PointOfX= $PointOfX - $DiffranceSize
             $PointOfY= $PointOfY + $DiffranceSize
             $HalfOfSX = $ClientSize[0] / 2
             $HalfOfSY = $ClientSize[1] / 2
             $PointOfX=$PointOfX + $DiffranceSize
             For $j= 1 to Guictrlread($RI)
                 $PointOfX=$PointOfX + $DiffranceSize
for $i=1 to 8 
    $PointOfY = $PointOfY - $Diffrance
    MouseMove($PointOfX,$PointOfY)
    MouseDown("Left")
    Sleep(50)
    MouseUp("Left")
    MouseMove($PotOfY,$PotOfX)
    MouseDown("Left")
    Sleep(50)
    MouseUp("Left")
MouseMove($HalfOfSX,$HalfOfSY)
MouseDown("Right")
Sleep(5000)
MouseUp("Right")
Next
Next
             $TimerThingyAD= TimerInit()
        EndIf
         Sleep(GuiCtrlRead($RCD))
     WEnd
 Else
     GUICtrlSetData($RCS,"Off")
     EndIf
 EndFunc
 Func APON()
     if GuiCtrlRead($RCS) = "On" Or GuiCtrlRead($LCS) = "On" Then
         GUICtrlSetData($APS,"On")
     ElseIf GuiCtrlRead($APS) = "On" Then
         GUICtrlSetData($APS,"Off")
     Else
         GUICtrlSetData($APS,"On")
         While WinActive("MU")
             Send("{SPACE}")
             Sleep(GuiCtrlRead($APD))
         Wend
     EndIf
     EndFunc
         func LCON()
             if GuiCtrlRead($LCS) = "On" Then
                 GUICtrlSetData($LCS, "Off")
             Else
                 $TimerThingyAP = TimerInit()
                 GUICtrlSetData($LCS,"On")
                 While Winactive("MU")
                     MouseClick("left")
                     If GuiCtrlRead($APS) = "On" and TimerDiff($TimerThingyAP) >= GuiCtrlread($APD) Then
             Send("{SPACE}")
             $TimerThingyAP = TimerInit()
         EndIf
         Sleep(GuiCtrlRead($LCD))
     WEnd
     EndIf
 EndFunc
 Func ASON()
         if GuiCtrlRead($ASS) = "On" Then
                 GUICtrlSetData($ASS, "Off")
             Else                
                 GUICtrlSetData($ASS,"On")
EndIf
EndFunc
Func ADON()
    if guictrlread($ADS) = "On" Then
                 GUICtrlSetData($ADS,"Off")
             Else
                 guictrlsetdata($ADS,"On")
                 EndIf
         EndFunc
         Func Halt()
            While 1
                 Sleep(100)
             WEnd
         EndFunc
While 1
    Sleep(1)
WEnd
Func HLPF()
    Msgbox(0,"Sorry, comeing soon.","Sorry help is currently unavaliable comeing soon though")
EndFunc
Func ABTF()
    MsgBox(0,"About.."," Silly Drop Bot v0.4 Beta" & @CRLF & "  CopyRight 2006-2010" & @CRLF & "Credits:Some random kid")
    EndFunc
Func LOL()
    Exit
EndFunc
func Savetoini()
    IniWrite("ConfigYoMama.ini","Buttons","OB",$OB)
    IniWrite("ConfigYoMama.ini","Buttons","SB",$SB)
    IniWrite("ConfigYoMama.ini","Buttons","TS",$TS)
    IniWrite("ConfigYoMama.ini","Delay","RCD",GuiCtrlRead($RCD))
    Iniwrite("ConfigYoMama.ini","Delay","APD",GuiCtrlRead($APD))
    Iniwrite("ConfigYoMama.ini","Delay","LCD",GuiCtrlRead($LCD))
Iniwrite("ConfigYoMama.ini","Delay","ASD",GuiCtrlRead($ASD))
Iniwrite("ConfigYoMama.ini","Delay","ADD",GuiCtrlRead($ADD))
EndFunc
Func BSBF()
    $OB = GUICtrlRead($Vne)
    $SB = GuiCtrlRead($Zone)
    $TS = GuiCtrlRead($Dostupa)
EndFunc
Func UPRC()
    $UpRc = GuiCtrlRead($RCD) + 50
    GUICtrlSetData($RCD,$UpRc)
EndFunc
Func DownRC() 
    $DownRC = GuiCtrlRead($RCD) - 50
    GuiCtrlSetData($RCD,$DownRC)
EndFunc
func UpAP()
    $UpAP = GuiCtrlread($APD) + 50
    GuiCtrlSetData($APD,$UpAP)
EndFunc
Func DownAP()
    $DownAP = GuiCtrlRead($APD) - 50
    GUICtrlSetData($APD,$DownAP)
EndFunc
Func UpLC()
    $UpLC = GuiCtrlRead($LCD) + 50
GUICtrlSetData($LCD,$UpLC)
EndFunc
Func DownLC()
    $DownLC = GuiCtrlRead($LCD) - 50
    GUICtrlSetData($LCD,$DownLC)
EndFunc
Func UpAS()
    $UpAS = GuiCtrlRead($ASD) + 500
    GUICtrlSetData($ASD,$UpAS)
EndFunc
Func DownAS()
    $DownAS = GUICtrlRead($ASD) - 500
    GUICtrlSetData($ASD,$DownAS)
EndFunc
Func UPAD()
    $UPAD= GUICtrlRead($ADD) + 500
    GUICtrlSetData($ADD,$UPAD)
EndFunc
Func DownAD()
    $DOWNAD = GuiCtrlRead($ADD) - 500
    GUICtrlSetData($ADD,$DOWNAD)
    EndFunc

Edited March 12, 2007 by Misha

SmOke_N · March 12, 2007

so here I have a code and the problem is in the lines 130 through 146 there I try to get the number from wingetclientsize and devide it by the percent or so to say so'll ill get the cordiantes in any resolution so when I try to devide it tells me that arrays cant be devided by variables what do I do..

Fix line 137.

Misha · March 12, 2007

sorry sorry ^^

seandisanti · March 12, 2007

code definitely helps, what exactly is the error that you're getting (copy and paste or screenshot would be helpful).

also:

$PointOfX=$ClientSize[0] / 1.3445378 
             $PointOfY=$ClientSize[1] / 3.0188679
             int($PointOfX)
             int($PointOfY)
oÝ÷ ÙÚ²z-²Ú+zØ^{^êïj[²)íëÚ®&ë-¯)bë(jëh×6
             $PointOfX=int($ClientSize[0] / 1.3445378)
             $PointOfY=int($ClientSize[1] / 3.0188679)

Misha · March 12, 2007

I copy pasted what you said still same error:

D:\Improved Drop Bots\Ae.au3 (131) : ==> Subscript used with non-Array variable.: 
$PointOfX=int($ClientSize[0] / 1.3445378) 
$PointOfX=int($ClientSize^ ERROR
>Exit code: 0   Time: 3.449

SmOke_N · March 12, 2007

I copy pasted what you said still same error:

D:\Improved Drop Bots\Ae.au3 (131) : ==> Subscript used with non-Array variable.: 
$PointOfX=int($ClientSize[0] / 1.3445378) 
$PointOfX=int($ClientSize^ ERROR
>Exit code: 0   Time: 3.449

Then post your code!!! Jesus, I'd think my smart ass comment in post 2 would have gotten you to realize you were asking a stupid ass question that has no relevance unless it's backed up by the code that is failing!

Misha · March 12, 2007

I did look up.

SmOke_N · March 12, 2007

I did look up.

Post your code, not the freaking snippet... can we run that by itself?

Misha · March 12, 2007

yes,its the whole code.

http://www.autoitscript.com/forum/index.ph...id=316235&# <- I noticed I forgot to add the code to my first post after 10 min..

Edited March 12, 2007 by Misha

seandisanti · March 12, 2007

Post your code, not the freaking snippet... can we run that by itself?

she(?) posted the code right after your smartass comment...

@op It looks like your $ClientSize=Wingetclientsize("MU") may not be successful, you should check @error after that line, and we'll go from there

Misha · March 12, 2007

seems the window name was wrong..such a silly mistake, you were correct on your wingetclientsize error comment..

thanks.^^

SmOke_N · March 12, 2007

yes,its the whole code.

ok..

I didn't notice you edited! My apologies...

1. When you do an Au3Check from SciTe

: WARNING: $DiffranceSize: possibly used before declaration.
int($DiffranceSize)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\test.au3(150,39) : WARNING: $Diffrance: possibly used before declaration.
$PointOfY = $PointOfY - $Diffrance
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\test.au3(137,32) : ERROR: $DiffranceSize: undeclared global variable.
int($DiffranceSize)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\test.au3 - 1 error(s), 2 warning(s)

There already errors.

Check out the comments:

_linenums:0'>

;Declatation.
#NoTrayIcon
#include <GuiConstants.au3>
Dim $SB = 3, $OB = 2, $TS = 4,$DiffranceSize,$Diffrance ;################### Had to add the two variables because they aren't defined anywhere
;options
Opt("WinTitleMatchMode", 4)
Opt("GUIOnEventMode", 1)
;Gui makeing
HotKeySet("{NUMPAD7}", "RCON")
HotKeySet("{NUMPAD1}", "APON")
HotKeySet("{NUMPAD9}", "LCON")
HotKeySet("{NUMPAD6}", "ASON")
HotKeySet("{NUMPAD4}", "ADON")
HotKeySet("{NUMPAD0}", "Halt")
$Parent = GUICreate("Spinny Bot Beta v0.4", 400, 400)
GUICtrlCreateGroup("Instructions", 5, 3, 190, 130)
GUISetFont(7)
GUICtrlCreateLabel("Right Click = 7" & @CRLF & "Auto Pick = 8" & @CRLF & "Left Click = 9" & @CRLF & "Auto Skill = 6 - Delay Increse 4 / Decrease 1" & @CRLF & "Auto Spin = 5 - Delay Increase ctrl+5 / Decrease 2" & @CRLF & "Stop = 0", 10, 20, 110, 110)
$SillyMenu = GUICtrlCreateMenu("File")
$save = GUICtrlCreateMenuitem("Save", $SillyMenu)
GUICtrlSetOnEvent($save, "Savetoini")
$SM = GUICtrlCreateMenuitem("Exit", $SillyMenu)
GUICtrlSetOnEvent($SM, "LOL")
$SillyMenu2 = GUICtrlCreateMenu("Help")
$ABT = GUICtrlCreateMenuitem("About", $SillyMenu2)
GUICtrlSetOnEvent($ABT, "ABTF")
$HLP = GUICtrlCreateMenuitem("Help", $SillyMenu2)
GUICtrlSetOnEvent($HLP, "HLPF")
GUICtrlCreateGroup("Clickers", 200, 5, 195, 127)
GUICtrlCreateLabel("Right", 210, 20)
GUICtrlCreateLabel("Picker", 210, 40)
GUICtrlCreateLabel("Left", 210, 60)
GUICtrlCreateLabel("Drop", 210, 80)
GUICtrlCreateLabel("Skill", 210, 100)
$RCS = GUICtrlCreateLabel("Off", 340, 20)
$RCD = GUICtrlCreateLabel("25", 250, 20, 20)
$APS = GUICtrlCreateLabel("Off", 340, 40)
$APD = GUICtrlCreateLabel("500", 250, 40, 20)
$LCS = GUICtrlCreateLabel("Off", 340, 60)
$LCD = GUICtrlCreateLabel("500", 250, 60, 20)
$ADS = GUICtrlCreateLabel("Off", 340, 80)
$ADD = GUICtrlCreateLabel("1000", 250, 80, 25)
$ASS = GUICtrlCreateLabel("Off", 340, 100)
$ASD = GUICtrlCreateLabel("30000", 250, 100, 25)
$BMR = GUICtrlCreateButton("-", 280, 20, 15, 10)
GUICtrlSetOnEvent($BMR, "DownRC")
$BPR = GUICtrlCreateButton("+", 300, 20, 15, 10)
GUICtrlSetOnEvent($BPR, "UpRC")
$BMP = GUICtrlCreateButton("-", 280, 40, 15, 10)
GUICtrlSetOnEvent($BMP, "DownAP")
$BPP = GUICtrlCreateButton("+", 300, 40, 15, 10)
GUICtrlSetOnEvent($BPP, "UpAP")
$BML = GUICtrlCreateButton("-", 280, 60, 15, 10)
GUICtrlSetOnEvent($BML, "DownLC")
$BPL = GUICtrlCreateButton("+", 300, 60, 15, 10)
GUICtrlSetOnEvent($BPL, "UpLC")
$BMD = GUICtrlCreateButton("-", 280, 80, 15, 10)
GUICtrlSetOnEvent($BMD, "DownAD")
$BPD = GUICtrlCreateButton("+", 300, 80, 15, 10)
GUICtrlSetOnEvent($BPD, "UpAD")
$BMS = GUICtrlCreateButton("-", 280, 100, 15, 10)
GUICtrlSetOnEvent($BMS, "DownAS")
$BPS = GUICtrlCreateButton("+", 300, 100, 15, 10)
GUICtrlSetOnEvent($BPS, "UpAS")
$RI = GUICtrlCreateInput("1", 10, 300, 40, 20)
GUICtrlCreateLabel("Rows for Drop", 60, 305)
$RIU = GUICtrlCreateUpdown($RI)
GUICtrlSetLimit($RIU, 8, 1)
GUICtrlCreateGroup("Others", 5, 150, 190, 190)
$Vne = GUICtrlCreateInput("2", 10, 165, 45, 20)
$Updwn2 = GUICtrlCreateUpdown($Vne)
GUICtrlSetLimit($Updwn2, 9, 1)
$Zone = GUICtrlCreateInput("3", 10, 193, 45, 20)
$Updwn1 = GUICtrlCreateUpdown($Zone)
GUICtrlSetLimit($Updwn1, 9, 1)
$Dostupa = GUICtrlCreateInput("4", 10, 221, 45)
$Updwn3 = GUICtrlCreateUpdown($Dostupa)
GUICtrlSetLimit($Updwn3, 9, 1)
$LolCB = GUICtrlCreateCheckbox("Third Skill", 95, 165)
$BSB = GUICtrlCreateButton("Set", 68, 165, 23, 50)
GUICtrlCreateLabel("Top = Main Skill" & @CRLF & "Bottom = Hp Buff", 95, 190, 75, 40)
GUICtrlSetOnEvent($BSB, "BSBF")
GUICtrlCreateLabel("*Note: The Delay of the skill while" & @CRLF & "active is defined by the right clicker.", 20, 250)
GUISetState()
GUISetOnEvent($GUI_EVENT_CLOSE, "LOL")
If FileExists(@ScriptDir & "\" & "ConfigYoMama.ini") Then
    $OB = IniRead("ConfigYomama.ini", "Buttons", "OB", "2")
    GUICtrlSetData($Vne, $OB)
    $SB = IniRead("ConfigYoMama.ini", "Buttons", "SB", "3")
    GUICtrlSetData($Zone, $SB)
    $TS = IniRead("ConfigYoMama.ini", "Buttons", "TS", "4")
    GUICtrlSetData($Dostupa, $TS)
    GUICtrlSetData($RCD, IniRead("ConfigYoMama.ini", "Delay", "RCD", "25"))
    GUICtrlSetData($APD, IniRead("ConfigYoMama.ini", "Delay", "APD", "500"))
    GUICtrlSetData($LCD, IniRead("ConfigYoMama.ini", "Delay", "LCD", "500"))
    GUICtrlSetData($ASD, IniRead("ConfigYoMama.ini", "Delay", "ASD", "60000"))
    GUICtrlSetData($ADD, IniRead("ConfigYoMama.ini", "Delay", "ADD", "60000"))
EndIf
Func RCON()
    If GUICtrlRead($RCS) = "Off" Then
        GUICtrlSetData($RCS, "On")
        $TimerThingyAP = TimerInit()
        $TimerThingyAS = TimerInit()
        $TimerThingyAD = TimerInit()
        While 1
            MouseClick("Right")
            If GUICtrlRead($APS) = "On" And TimerDiff($TimerThingyAP) >= GUICtrlRead($APD) Then
                Send("{SPACE}")
                $TimerThingyAP = TimerInit()
            EndIf
            If TimerDiff($TimerThingyAS) >= GUICtrlRead($ASD) And GUICtrlRead($ASS) = "On" Then
                Send($SB, 1)
                Sleep(1000)
                MouseClick("Right")
                Sleep(2000)
                Send($OB, 1)
                Sleep(1000)
                If GUICtrlRead($LolCB) = $GUI_CHECKED Then
                    Send($TS, 1)
                    Sleep(1000)
                    MouseClick("Right")
                    Sleep(2000)
                    Send($OB, 1)
                    Sleep(1000)
                EndIf
                $TimerThingyAS = TimerInit()
            EndIf
            If GUICtrlRead($ADS) = "On" And TimerDiff($TimerThingyAD) >= GUICtrlRead($ADD) Then
                Send("v", 1)
                WinWait('MU')
                $ClientSize = WinGetClientSize("MU")
                If IsArray($ClientSize) Then
                    $PointOfX = $ClientSize[0] / 1.3445378
                    $PointOfY = $ClientSize[1] / 3.0188679
                    Int($PointOfX)
                    Int($PointOfY)
                    $DiffranceSizeX = $ClientSize[0] / 32
                    $DiffranceSizeY = $ClientSize[1] / 32
                    Int($DiffranceSize);######################################### What is this?? ######################################### 
                    $PotOfX = $ClientSize[0] / 5.12
                    $PotOfY = $ClientSize[1] / 1.0666666
                    Int($PotOfX)
                    Int($PotOfY)
                    $PointOfX = $PointOfX - $DiffranceSize
                    $PointOfY = $PointOfY + $DiffranceSize
                    $HalfOfSX = $ClientSize[0] / 2
                    $HalfOfSY = $ClientSize[1] / 2
                    $PointOfX = $PointOfX + $DiffranceSize
                    For $j = 1 To GUICtrlRead($RI)
                        $PointOfX = $PointOfX + $DiffranceSize
                        For $i = 1 To 8
                            $PointOfY = $PointOfY - $Diffrance;######################################### What is this?? ######################################### 
                            MouseMove($PointOfX, $PointOfY)
                            MouseDown("Left")
                            Sleep(50)
                            MouseUp("Left")
                            MouseMove($PotOfY, $PotOfX)
                            MouseDown("Left")
                            Sleep(50)
                            MouseUp("Left")
                            MouseMove($HalfOfSX, $HalfOfSY)
                            MouseDown("Right")
                            Sleep(5000)
                            MouseUp("Right")
                        Next
                    Next
                    $TimerThingyAD = TimerInit()
                Else
                    MsgBox(16, 'Error', 'Error in getting window client size, make sure the window exist.')
                EndIf
            EndIf
            Sleep(GUICtrlRead($RCD))
        WEnd
    Else
        GUICtrlSetData($RCS, "Off")
    EndIf
EndFunc   ;==>RCON
Func APON()
    If GUICtrlRead($RCS) = "On" Or GUICtrlRead($LCS) = "On" Then
        GUICtrlSetData($APS, "On")
    ElseIf GUICtrlRead($APS) = "On" Then
        GUICtrlSetData($APS, "Off")
    Else
        GUICtrlSetData($APS, "On")
        While WinActive("MU")
            Send("{SPACE}")
            Sleep(GUICtrlRead($APD))
        WEnd
    EndIf
EndFunc   ;==>APON
Func LCON ()
    If GUICtrlRead($LCS) = "On" Then
        GUICtrlSetData($LCS, "Off")
    Else
        $TimerThingyAP = TimerInit()
        GUICtrlSetData($LCS, "On")
        While WinActive("MU")
            MouseClick("left")
            If GUICtrlRead($APS) = "On" And TimerDiff($TimerThingyAP) >= GUICtrlRead($APD) Then
                Send("{SPACE}")
                $TimerThingyAP = TimerInit()
            EndIf
            Sleep(GUICtrlRead($LCD))
        WEnd
    EndIf
EndFunc   ;==>LCON
Func ASON()
    If GUICtrlRead($ASS) = "On" Then
        GUICtrlSetData($ASS, "Off")
    Else
        GUICtrlSetData($ASS, "On")
    EndIf
EndFunc   ;==>ASON
Func ADON()
    If GUICtrlRead($ADS) = "On" Then
        GUICtrlSetData($ADS, "Off")
    Else
        GUICtrlSetData($ADS, "On")
    EndIf
EndFunc   ;==>ADON
Func Halt ()
    While 1
        Sleep(100)
    WEnd
EndFunc   ;==>Halt
While 1
    Sleep(1)
WEnd
Func HLPF()
    MsgBox(0, "Sorry, comeing soon.", "Sorry help is currently unavaliable comeing soon though")
EndFunc   ;==>HLPF
Func ABTF()
    MsgBox(0, "About..", " Silly Drop Bot v0.4 Beta" & @CRLF & "  CopyRight 2006-2010" & @CRLF & "Credits:Some random kid")
EndFunc   ;==>ABTF
Func LOL()
    Exit
EndFunc   ;==>LOL
Func Savetoini()
    IniWrite("ConfigYoMama.ini", "Buttons", "OB", $OB)
    IniWrite("ConfigYoMama.ini", "Buttons", "SB", $SB)
    IniWrite("ConfigYoMama.ini", "Buttons", "TS", $TS)
    IniWrite("ConfigYoMama.ini", "Delay", "RCD", GUICtrlRead($RCD))
    IniWrite("ConfigYoMama.ini", "Delay", "APD", GUICtrlRead($APD))
    IniWrite("ConfigYoMama.ini", "Delay", "LCD", GUICtrlRead($LCD))
    IniWrite("ConfigYoMama.ini", "Delay", "ASD", GUICtrlRead($ASD))
    IniWrite("ConfigYoMama.ini", "Delay", "ADD", GUICtrlRead($ADD))
EndFunc   ;==>Savetoini
Func BSBF()
    $OB = GUICtrlRead($Vne)
    $SB = GUICtrlRead($Zone)
    $TS = GUICtrlRead($Dostupa)
EndFunc   ;==>BSBF
Func UPRC()
    $UpRc = GUICtrlRead($RCD) + 50
    GUICtrlSetData($RCD, $UpRc)
EndFunc   ;==>UPRC
Func DownRC()
    $DownRC = GUICtrlRead($RCD) - 50
    GUICtrlSetData($RCD, $DownRC)
EndFunc   ;==>DownRC
Func UpAP()
    $UpAP = GUICtrlRead($APD) + 50
    GUICtrlSetData($APD, $UpAP)
EndFunc   ;==>UpAP
Func DownAP()
    $DownAP = GUICtrlRead($APD) - 50
    GUICtrlSetData($APD, $DownAP)
EndFunc   ;==>DownAP
Func UpLC()
    $UpLC = GUICtrlRead($LCD) + 50
    GUICtrlSetData($LCD, $UpLC)
EndFunc   ;==>UpLC
Func DownLC()
    $DownLC = GUICtrlRead($LCD) - 50
    GUICtrlSetData($LCD, $DownLC)
EndFunc   ;==>DownLC
Func UpAS()
    $UpAS = GUICtrlRead($ASD) + 500
    GUICtrlSetData($ASD, $UpAS)
EndFunc   ;==>UpAS
Func DownAS()
    $DownAS = GUICtrlRead($ASD) - 500
    GUICtrlSetData($ASD, $DownAS)
EndFunc   ;==>DownAS
Func UPAD()
    $UPAD = GUICtrlRead($ADD) + 500
    GUICtrlSetData($ADD, $UPAD)
EndFunc   ;==>UPAD
Func DownAD()
    $DOWNAD = GUICtrlRead($ADD) - 500
    GUICtrlSetData($ADD, $DOWNAD)
EndFunc   ;==>DownAD

seandisanti · March 12, 2007

seems the window name was wrong..such a silly mistake, you were correct on your wingetclientsize error comment..
thanks.^^

np, glad to help. and no worries, i'm sure everyone here has typo'd a window name or two.

Misha · March 12, 2007

yea smoke n those are typos I fixed them right after my function could continue and I saw them.

thanks anyway

Edited March 12, 2007 by Misha

seandisanti · March 12, 2007

yea smoke n those are typos I fixed them right after my function could continue and I saw them.
thanks anyway

it's working correctly for you now though right? (just making sure)

Misha · March 12, 2007

It didnt..after 1 hour+ of fixing I am done ^^

thanks for asking.

Edited March 12, 2007 by Misha

seandisanti · March 12, 2007

It didnt..after 1 hour+ of fixing I am done ^^
thanks for asking.

oh, i thought after fixing the window name in that line it was working, not sure why i assumed that, but what's it giving you now? how is it not working now?

Misha · March 12, 2007

ok all fixed etc.........

but now I have a diffrent kind of question the game I use the bot on hides the color I am wondering if to get it from the memory or video card memory...directx etc and how..? please assist;

seandisanti · March 12, 2007

ok all fixed etc.........
but now I have a diffrent kind of question the game I use the bot on hides the color I am wondering if to get it from the memory or video card memory...directx etc and how..? please assist;

not really sure on that one, have you tried adding a tooltip that shows the color?

Misha · March 12, 2007

well I used au3info and went in freezed it and repeated several times..all was black, I guess I must I get some dll calls..

Sign In

Array to int problem

Recommended Posts

Misha

SmOke_N

Misha

seandisanti

Misha

SmOke_N

Misha

SmOke_N

Misha

seandisanti

Misha

SmOke_N

seandisanti

Misha

seandisanti

Misha

seandisanti

Misha

seandisanti

Misha

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Browse

AutoIt Resources

Release

Beta