Jump to content

Array to int problem


 Share

Recommended Posts

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

try having a script running while you load your game, just something like:

while 1
$pos = MouseGetPos()
Tooltip(PixelGetColor($pos[0],$pos[1]))
sleep(100)
wend

see if it will let you use tooltips like that, and if it does, you'll hopefully be able to see the colors also. If that doesn't work, there is another option we could try, but hopefully that one will do it....

Link to comment
Share on other sites

it showed 0 always, the protection of the game seems to hide the color

hmm.... then the other way i was thinking of wouldn't work either... i was hoping it was just an issue where the tooltip didn't want to display, and then i was going to suggest this script....

#include <GUIConstants.au3>
HotKeySet("!{capslock}", "OkIveWastedEnoughTimeLookingAtThisStupidThing")
$hwnd = GUICreate("Text Region", @DesktopWidth, 50, 0, 0, $WS_POPUP, BitOR($WS_EX_TOPMOST, $WS_EX_TOOLWINDOW))
GUISetBkColor(0x00FF00)

GUISetState()
While 1
$pos = MouseGetPos()
    Sleep(1000)
    $rgn = CreateTextRgn($hwnd,PixelGetColor($pos[0],$pos[1]), 50, "Arial", 1000)
    SetWindowRgn($hwnd, $rgn)
WEnd

Func SetWindowRgn($h_win, $rgn)
    DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $rgn, "int", 1)
EndFunc   ;==>SetWindowRgn


Func CreateTextRgn(ByRef $CTR_hwnd, $CTR_Text, $CTR_height, $CTR_font = "Microsoft Sans Serif", $CTR_weight = 1000)
    Local Const $ANSI_CHARSET = 0
    Local Const $OUT_CHARACTER_PRECIS = 2
    Local Const $CLIP_DEFAULT_PRECIS = 0
    Local Const $PROOF_QUALITY = 4
    Local Const $FIXED_PITCH = 1
    Local Const $RGN_XOR = 3
    Local $gdi_dll = DllOpen("gdi32.dll")
    Local $CTR_hDC = DllCall("user32.dll", "int", "GetDC", "hwnd", $CTR_hwnd)
    Local $CTR_hMyFont = DllCall($gdi_dll, "hwnd", "CreateFont", "int", $CTR_height, "int", 0, "int", 0, "int", 0, _
            "int", $CTR_weight, "int", 0, "int", 0, "int", 0, "int", $ANSI_CHARSET, "int", $OUT_CHARACTER_PRECIS, _
            "int", $CLIP_DEFAULT_PRECIS, "int", $PROOF_QUALITY, "int", $FIXED_PITCH, "str", $CTR_font)
    Local $CTR_hOldFont = DllCall($gdi_dll, "hwnd", "SelectObject", "int", $CTR_hDC[0], "hwnd", $CTR_hMyFont[0])
    DllCall($gdi_dll, "int", "BeginPath", "int", $CTR_hDC[0])
    DllCall($gdi_dll, "int", "TextOut", "int", $CTR_hDC[0], "int", 0, "int", 0, "str", $CTR_Text, "int", StringLen($CTR_Text))
    DllCall($gdi_dll, "int", "EndPath", "int", $CTR_hDC[0])
    Local $CTR_hRgn1 = DllCall($gdi_dll, "hwnd", "PathToRegion", "int", $CTR_hDC[0])
    Local $CTR_rc = DllStructCreate("int;int;int;int")
    DllCall($gdi_dll, "int", "GetRgnBox", "hwnd", $CTR_hRgn1[0], "ptr", DllStructGetPtr($CTR_rc))
    Local $CTR_hRgn2 = DllCall($gdi_dll, "hwnd", "CreateRectRgnIndirect", "ptr", DllStructGetPtr($CTR_rc))
    DllCall($gdi_dll, "int", "CombineRgn", "hwnd", $CTR_hRgn2[0], "hwnd", $CTR_hRgn2[0], "hwnd", $CTR_hRgn1[0], "int", $RGN_XOR)
    DllCall($gdi_dll, "int", "DeleteObject", "hwnd", $CTR_hRgn1[0])
    DllCall("user32.dll", "int", "ReleaseDC", "hwnd", $CTR_hwnd, "int", $CTR_hDC[0])
    DllCall($gdi_dll, "int", "SelectObject", "int", $CTR_hDC[0], "hwnd", $CTR_hOldFont[0])
    DllClose($gdi_dll)
    Return $CTR_hRgn2[0]
EndFunc   ;==>CreateTextRgn
Func tobin($number)
    $result = ""
    $power = 7
    While $number > 0
        If BitAND(2 ^ $power, $number) Then
            $result = $result & "1"
            $number = $number - 2 ^ $power
        Else
            $result = $result & "0"
        EndIf
        $power = $power - 1
    WEnd
    While StringLen($result) < 8
        If StringLen($result) < 8 Then $result = $result & "0"
    WEnd
    Return String($result)
EndFunc   ;==>tobin
Func OkIveWastedEnoughTimeLookingAtThisStupidThing()
    Exit
EndFunc   ;==>OkIveWastedEnoughTimeLookingAtThisStupidThing

but if the tooltip was displaying without info, then we'll have to figure out another approach. what game is it?

Link to comment
Share on other sites

hello my good man the function halt doesnt seem to work in my code *Line 266

More questions:

line 160 only reachs if the 156 meets the conditions wtf..

also

MouseMove($MousePos[0]+1,$MousePos[1])
         MouseClick("Right")
         MouseMove($MousePos[0]-1,$MousePos[1])

why does this moves left eventually ..

;Declatation.
;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,365)
GUICtrlCreateGroup("Instructions",5,3,190,130)
GUISetFont(7)
GUICtrlCreateLabel("Right Click = 7" & @CRLF & "Auto Pick = 1" & @CRLF & "Left Click = 9" & @CRLF & "Auto Skill = 6" & @CRLF & "Auto Drop = 4" & @CRLF & "Stop = 0" ,10,30,110,70)
$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("500",250,20,20)
guictrlcreatelabel("*MS",360,20,20)
$APS = GuiCtrlCreateLabel("Off",340,40)
$APD = GuiCtrlCreateLabel("500",250,40,20)
guictrlcreatelabel("*MS",360,40,20)
$LCS = GuiCtrlCreateLabel("Off",340,60)
$LCD = GuiCtrlCreateLabel("500",250,60,20)
guictrlcreatelabel("*MS",360,60,20)
$ADS = GuiCtrlCreateLabel("Off",340,80)
$ADD = GUICtrlCreateLabel("30",250,80,25)
guictrlcreatelabel("*MIN",360,80,20)
$ASS = GuiCtrlCreateLAbel("Off",340,100)
$ASD = GUICtrlCreateLabel("5",250,100,25)
guictrlcreatelabel("*MIN",360,100,20)
$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)
guictrlcreatelabel("I would like to thank all that helped" & @CRLF & " in making of this both, it took me alot of time" & @CRLF& "to make ithope some of you leecher folks" & @CRLF & "will enjoy it." & @CRLF & "Credits:" & @CRLF & "fark" & @CRLF & "Hazard" & @CRLF & "Some folks at www.autoitscript .com" & @CRLF & "who helped me with minor problems." & @CRLF & "Thank you to others that I forgot" & @CRLF & "and of course myself, Misha." & @CRLF & @CRLF & "Enjoy!",200,160)
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","500"))
    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"))
GUICtrlSetData($RI ,IniRead("ConfigYoMama.ini","Rows","DR","1"))
    EndIf
    Func SetWindowRgn($h_win, $rgn)
    DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $rgn, "int", 1)
EndFunc

;Func CombineRgn(ByRef $rgn1, ByRef $rgn2)
;    DllCall("gdi32.dll", "long", "CombineRgn", "long", $rgn1, "long", $rgn1, "long", $rgn2, "int", 2)
;EndFunc

Func CreateTextRgn(ByRef $CTR_hwnd,$CTR_Text,$CTR_height,$CTR_font="Microsoft Sans Serif",$CTR_weight=1000)
    Local Const $ANSI_CHARSET = 0
    Local Const $OUT_CHARACTER_PRECIS = 2
    Local Const $CLIP_DEFAULT_PRECIS = 0
    Local Const $PROOF_QUALITY = 2
    Local Const $FIXED_PITCH = 1
    Local Const $RGN_XOR = 3
    
    If $CTR_font = "" Then $CTR_font = "Microsoft Sans Serif"
    If $CTR_weight = -1 Then $CTR_weight = 1000
    Local $gdi_dll = DLLOpen("gdi32.dll")
    Local $CTR_hDC= DLLCall("user32.dll","int","GetDC","hwnd",$CTR_hwnd)
    Local $CTR_hMyFont = DLLCall($gdi_dll,"hwnd","CreateFont","int",$CTR_height,"int",0,"int",0,"int",0, _
                "int",$CTR_weight,"int",0,"int",0,"int",0,"int",$ANSI_CHARSET,"int",$OUT_CHARACTER_PRECIS, _
                "int",$CLIP_DEFAULT_PRECIS,"int",$PROOF_QUALITY,"int",$FIXED_PITCH,"str",$CTR_font )
    Local $CTR_hOldFont = DLLCall($gdi_dll,"hwnd","SelectObject","int",$CTR_hDC[0],"hwnd",$CTR_hMyFont[0])
    DLLCall($gdi_dll,"int","BeginPath","int",$CTR_hDC[0])
    DLLCall($gdi_dll,"int","TextOut","int",$CTR_hDC[0],"int",0,"int",0,"str",$CTR_Text,"int",StringLen($CTR_Text))
    DLLCall($gdi_dll,"int","EndPath","int",$CTR_hDC[0])
    Local $CTR_hRgn1 = DLLCall($gdi_dll,"hwnd","PathToRegion","int",$CTR_hDC[0])
    Local $CTR_rc = DLLStructCreate("int;int;int;int")
    DLLCall($gdi_dll,"int","GetRgnBox","hwnd",$CTR_hRgn1[0],"ptr",DllStructGetPtr($CTR_rc))
    Local $CTR_hRgn2 = DLLCall($gdi_dll,"hwnd","CreateRectRgnIndirect","ptr",DllStructGetPtr($CTR_rc))
    DLLCall($gdi_dll,"int","CombineRgn","hwnd",$CTR_hRgn2[0],"hwnd",$CTR_hRgn2[0],"hwnd",$CTR_hRgn1[0],"int",$RGN_XOR)
    DLLCall($gdi_dll,"int","DeleteObject","hwnd",$CTR_hRgn1[0])
    DLLCall("user32.dll","int","ReleaseDC","hwnd",$CTR_hwnd,"int",$CTR_hDC[0])
    DLLCall($gdi_dll,"int","SelectObject","int",$CTR_hDC[0],"hwnd",$CTR_hOldFont[0])
    DLLClose($gdi_dll)
    Return $CTR_hRgn2[0]
EndFunc
 Func RCON()
     if GuiCtrlRead($RCS) = "Off" Then
         GUICtrlSetData($RCS,"On")
    $TimerThingyAP= TimerInit ( )
    $TimerThingyAS=TimerInit()
    $TimerThingyAD=TimerInit()
     While 1
         $MousePos = MouseGetPos()
         MouseMove($MousePos[0]+1,$MousePos[1])
         MouseClick("Right")
         MouseMove($MousePos[0]-1,$MousePos[1])
         If GuiCtrlRead($APS) = "On" and TimerDiff($TimerThingyAP) >= GuiCtrlRead($APD) Then
             Send("{SPACE}")
             $TimerThingyAP = TimerInit()
         EndIf
         if TimerDiff($TimerThingyAS) >= GuiCtrlRead($ASD) * 60000 and GuiCtrlRead($ASS) = "On" Then
             Send($SB,1)
             Sleep(GuictrlRead($RCD))
             MouseClick("Right")
             Sleep(Guictrlread($RCD))
             Send($OB,1)
             Sleep(Guictrlread($RCD))
             if GuiCtrlRead($LolCB) = $GUI_CHECKED Then
                 Send($TS,1)
                 Sleep(guictrlread($RCD))
                 MouseClick("Right")
                 Sleep(guictrlread($RCD))
                 Send($OB,1)
                 Sleep(Guictrlread($RCD))
                 EndIf
             $TimerThingyAS = TimerInit()
         EndIf
         if GuiCtrlRead($ADS) = "On" And TimerDiff($TimerThingyAD) >= GuiCtrlRead($ADD) * 60000 Then
                Send("v",1)
             $ClientSize=Wingetclientsize("MU")
             $PointOfX=int($ClientSize[0] / 1.3445378)
             $PointOfY=int($ClientSize[1] / 2.2641509)
             $DiffranceSizeX = $ClientSize[0] / 32
             $DiffranceSizeY = $ClientSize[1] / 24
             $PotOfX=Int($ClientSize[0] / 5.12)
             $PotOfY=Int($ClientSize[1] / 1.0666666)
             $PointOfX= $PointOfX - $DiffranceSizeX
             $HalfOfSX = $ClientSize[0] / 2
             $HalfOfSY = $ClientSize[1] / 2
             For $j= 1 to Guictrlread($RI)
                 $PointOfX=$PointOfX + $DiffranceSizeX
                 $PointOfY=int($ClientSize[1] / 2.2641509)
                 $PointOfY=$PointOfY - $DiffranceSizeY
for $i=1 to 8 
    $PointOfY = $PointOfY + $DiffranceSizeY
    MouseMove($PointOfX,$PointOfY)
    MouseDown("Left")
    Sleep(50)
    MouseUp("Left")
    MouseMove($PotOfX,$PotOfY)
    MouseDown("Left")
    Sleep(50)
    MouseUp("Left")
    Sleep(500)
    Send("v",1)
MouseMove($HalfOfSX,$HalfOfSY)
send("{SPACE}")
MouseDown("Right")
Sleep(5000)
MouseUp("Right")
send("{SPACE}")
MouseDown("Right")
Sleep(5000)
MouseUp("Right")
send("{SPACE}")
Send("v",1)
Next
Next
send("v",1)
             $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()
             MsgBox(0,"Hai","Hello")
             GuictrlsetState($RCS,"Off")
             GuictrlsetState($APS,"Off")
             GuictrlsetState($LCS,"Off")
             GuictrlsetState($ADS,"Off")
             GUICtrlSetState($ASS,"Off")
            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))
Iniwrite("ConfigYoMama.ini","Rows","DR",Guictrlread($RI))
EndFunc
Func BSBF()
    $OB = GUICtrlRead($Vne)
    $SB = GuiCtrlRead($Zone)
    $TS = GuiCtrlRead($Dostupa)
EndFunc
Func UPRC()
    if guictrlread($RCD) <> 10000 Then
    $UpRc = GuiCtrlRead($RCD) + 25
    GUICtrlSetData($RCD,$UpRc)
    EndIf
EndFunc
Func DownRC() 
    if guictrlread($RCD) <> 25 Then
    $DownRC = GuiCtrlRead($RCD) - 25
    GuiCtrlSetData($RCD,$DownRC)
    EndIf
EndFunc
func UpAP()
    if guictrlread($APD) <> 10000 Then
    $UpAP = GuiCtrlread($APD) + 25
    GuiCtrlSetData($APD,$UpAP)
    EndIf
EndFunc
Func DownAP()
    if guictrlread($APD) <> 25 Then
    $DownAP = GuiCtrlRead($APD) - 25
    GUICtrlSetData($APD,$DownAP)
    EndIf
EndFunc
Func UpLC()
    if guictrlread($LCD) <> 10000 Then
    $UpLC = GuiCtrlRead($LCD) + 25
GUICtrlSetData($LCD,$UpLC)
EndIf
EndFunc
Func DownLC()
    if guictrlread($LCD) <> 25 Then
    $DownLC = GuiCtrlRead($LCD) - 25
    GUICtrlSetData($LCD,$DownLC)
    EndIf
EndFunc
Func UpAS()
    $UpAS = GuiCtrlRead($ASD) + 0.2
    GUICtrlSetData($ASD,$UpAS)
EndFunc
Func DownAS()
    if guictrlread($ASD) <> 0.2 Then
    $DownAS = GUICtrlRead($ASD) - 0.2
    GUICtrlSetData($ASD,$DownAS)
    EndIf
EndFunc
Func UPAD()
    $UPAD= GUICtrlRead($ADD) + 0.2
    GUICtrlSetData($ADD,$UPAD)
EndFunc
Func DownAD()
    if guictrlread($ADD) <> 0.2 Then
    $DOWNAD = GuiCtrlRead($ADD) - 0.2
    GUICtrlSetData($ADD,$DOWNAD)
    EndIf
    EndFunc
Edited by Misha
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...