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..

Array to int problem

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members