Sign in to follow this  
Followers 0
Misha

Array to int problem

Started by Misha,

28 posts in this topic

#1 ·  Posted (edited)

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 by Misha

Share this post

Link to post
Share on other sites



#2 ·  Posted

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.

[center]Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.[/center]

Share this post

Link to post
Share on other sites

#3 ·  Posted

sorry sorry ^^

Share this post

Link to post
Share on other sites

#4 ·  Posted

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)
1100111 00001011101111 00011101101111 00010111100100 00001111110100 00110111110010 00101101111001 0011100i didn't make up this form of encryption, but i like it.credit to the lvl 6 challenge on arcanum.co.nz

Share this post

Link to post
Share on other sites

#5 ·  Posted

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

Share this post

Link to post
Share on other sites

#6 ·  Posted

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!

[center]Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.[/center]

Share this post

Link to post
Share on other sites

#7 ·  Posted

I did look up.

Share this post

Link to post
Share on other sites

#8 ·  Posted

I did look up.

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

[center]Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.[/center]

Share this post

Link to post
Share on other sites

#10 ·  Posted

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

1100111 00001011101111 00011101101111 00010111100100 00001111110100 00110111110010 00101101111001 0011100i didn't make up this form of encryption, but i like it.credit to the lvl 6 challenge on arcanum.co.nz

Share this post

Link to post
Share on other sites

#11 ·  Posted

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

thanks.^^

Share this post

Link to post
Share on other sites

#12 ·  Posted

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

[center]Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.[/center]

Share this post

Link to post
Share on other sites

#13 ·  Posted

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.
1100111 00001011101111 00011101101111 00010111100100 00001111110100 00110111110010 00101101111001 0011100i didn't make up this form of encryption, but i like it.credit to the lvl 6 challenge on arcanum.co.nz

Share this post

Link to post
Share on other sites

#14 ·  Posted (edited)

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

thanks anyway

Edited by Misha

Share this post

Link to post
Share on other sites

#15 ·  Posted

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)
1100111 00001011101111 00011101101111 00010111100100 00001111110100 00110111110010 00101101111001 0011100i didn't make up this form of encryption, but i like it.credit to the lvl 6 challenge on arcanum.co.nz

Share this post

Link to post
Share on other sites

#16 ·  Posted (edited)

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

thanks for asking.

Edited by Misha

Share this post

Link to post
Share on other sites

#17 ·  Posted

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?
1100111 00001011101111 00011101101111 00010111100100 00001111110100 00110111110010 00101101111001 0011100i didn't make up this form of encryption, but i like it.credit to the lvl 6 challenge on arcanum.co.nz

Share this post

Link to post
Share on other sites

#18 ·  Posted

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;

Share this post

Link to post
Share on other sites

#19 ·  Posted

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?
1100111 00001011101111 00011101101111 00010111100100 00001111110100 00110111110010 00101101111001 0011100i didn't make up this form of encryption, but i like it.credit to the lvl 6 challenge on arcanum.co.nz

Share this post

Link to post
Share on other sites

#20 ·  Posted

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

Share this post

Link to post
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
Sign in to follow this  
Followers 0
Go To Topic Listing AutoIt General Help and Support