Jump to content

gui help needed


Recommended Posts

hi if anyone could make this into a gui , I'd be so happy.

MsgBox(1, "Auto-Heal", "F5 - 15 Seconds | F6 - 30 Seconds | F7 - 45 Seconds | F8 - 1 MINUTES | F9 - 1.15 MINUTES  | F10 - 1.30 MINUTES | F11 - 1.45 MINUTES  | F12 - 2 MINUTES | NUMPAD0 - STOP ALL| NUMPAD 1 - Left CLICK | NUMPAD2 - Right Click | NUMPAD3 - Auto Loot | Made By MJB Crew")

HotKeySet("{F5}", "FFFFF")
HotKeySet("{F6}", "FFFFFF")
HotKeySet("{F7}", "FFFFFFF")
HotKeySet("{F8}", "FFFFFFFF")
HotKeySet("{F9}", "FFFFFFFFF")
HotKeySet("{F10}", "FFFFFFFFFF")
HotKeySet("{F11}", "FFFFFFFFFFF")
HotKeySet("{F11}", "FFFFFFFFFFFF")
HotKeySet("{NUMPAD0}", "StopAll")
HotKeySet("{NUMPAD5)", "Terminate")


TrayTip("AFK PROGRAM", "Go to MPC Forums , for more updates.", 3, 2)

Func FFFFF ()
    While 1
        Send("Q")
        Sleep(15000)
    WEnd
EndFunc

Func FFFFFF ()
    While 1
        Send("Q")
        Sleep(30000)
    WEnd
EndFunc

Func FFFFFFF ()
    While 1
        Send("Q")
        Sleep(45000)
    WEnd
EndFunc

Func FFFFFFFF ()
    While 1
        Send("Q")
        Sleep(60000)

    WEnd
EndFunc

Func FFFFFFFFF ()
    While 1
        Send("Q")
        Sleep(75000)
    WEnd
    
EndFunc

Func FFFFFFFFFF ()
    While 1
        Send("Q")
        Sleep(90000)
    WEnd
EndFunc

Func FFFFFFFFFFF ()
    While 1
        Send("Q")
        Sleep(105000)
    WEnd
EndFunc

Func FFFFFFFFFFFF ()
    While 1
        Send("Q")
        Sleep(120000)
    WEnd
EndFunc

Func StopAll ()
    While 1
        Sleep(1)
    WEnd
EndFunc

Func Terminate ()
    Exit
EndFunc

While 1
    Sleep(1)
WEnd
Link to comment
Share on other sites

#include <guiconstants.au3>
$main = guicreate("Main", 300, 300)
$combo = guictrlcreatecombo ("Choose!", 10, 10, 100)
guictrlsetdata(-1, "15s|30s|45s|60s|75s|90s|105s|120s")
$button = guictrlcreatebutton ("Apply", 120, 10)
$stop = guictrlcreatebutton ("Stop", 120, 40)
guisetstate()

while 1
$msg = guigetmsg()
if $msg = $GUI_EVENT_CLOSE then exit
if $msg = $button then
select
case guictrlread($combo) = "15s"
FFFFF()
case guictrlread($combo) = "30s"
FFFFFF()
case guictrlread($combo) = "45s"
FFFFFFF()
case guictrlread($combo) = "60s"
FFFFFFFF()
case guictrlread($combo) = "75s"
FFFFFFFFF()
case guictrlread($combo) = "90s"
FFFFFFFFFF()
case guictrlread($combo) = "105s"
FFFFFFFFFFF()
case guictrlread($combo) = "120s"
FFFFFFFFFFFF()
endselect
endif
wend


Func FFFFF ()
    While 1
        Send("Q")
        Sleep(15000)
if $msg = $stop then exitloop
    WEnd
EndFunc

Func FFFFFF ()
    While 1
        Send("Q")
        Sleep(30000)
if $msg = $stop then exitloop
    WEnd
EndFunc

Func FFFFFFF ()
    While 1
        Send("Q")
        Sleep(45000)
if $msg = $stop then exitloop
    WEnd
EndFunc

Func FFFFFFFF ()
    While 1
        Send("Q")
        Sleep(60000)

if $msg = $stop then exitloop
    WEnd
EndFunc

Func FFFFFFFFF ()
    While 1
        Send("Q")
        Sleep(75000)
if $msg = $stop then exitloop
    WEnd
    
EndFunc

Func FFFFFFFFFF ()
    While 1
        Send("Q")
        Sleep(90000)
    WEnd
EndFunc

Func FFFFFFFFFFF ()
    While 1
        Send("Q")
        Sleep(105000)
if $msg = $stop then exitloop
    WEnd
EndFunc

Func FFFFFFFFFFFF ()
    While 1
        Send("Q")
        Sleep(120000)
if $msg = $stop then exitloop
    WEnd
EndFunc

hope thats what you need

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