Is it possible for RF Online to Dual Login? I know this feature was removed by CCR but i think there is a way to do it. I hope it is for all the clients/servers especially in the Philippines because I came here....:)
#include <GUIConstants.au3>
#include <Misc.au3>
Opt("GUIOnEventMode", 1)
; = DllOpen("user32.dll")
= True
global = "Element Client";"abc.txt - Notepad" < < < < < < ----- CHANGE CLIENT NAME HERE
global = 0
global = 0
;---------------------------------HotKey---------------------------------
HotKeySet("{F12}", "HotKey1") ; ESC
HotKeySet("{F11}", "HotKey2") ; F11
HotKeySet("{F9}", "Add_ID") ;F9
HotKeySet("{F10}", "AltQ") ;F10
;--------------------------------Main-------------------------------------
= GUICreate("Multiboxer", 230, 60)
= GUICtrlCreateButton("Change client`s ID", 10, 10, 100, 25)
GUICtrlSetOnEvent(,"Add_ID")
= GUICtrlCreateButton("Close", 120, 10, 100, 25)
GUICtrlSetOnEvent(,"AltQ")
= GUICtrlCreateMenu("Run a client")
= GUICtrlCreateMenuItem("Change client`s ID - F9",)
GUICtrlSetOnEvent(,"Add_ID")
= GUICtrlCreateMenuItem("An Hoac Hien Cua So Game - F12",)
GUICtrlSetOnEvent(,"HotKey1")
= GUICtrlCreateMenuItem("Minimize to Taskbar - F11",)
GUICtrlSetOnEvent(,"HotKey2")
= GUICtrlCreateMenuItem("Close - F10",)
GUICtrlSetOnEvent(,"AltQ")
GUISetState(@SW_SHOW)
;--------------------------------Code----------------------------------------
While 1
= GUIGetMsg()
Switch
Case
Add_ID()
Case
HotKey1()
Case
HotKey2()
Case
Exit
Case
Exit
EndSwitch
WEnd
;---------------------------------------------function-------------------------
Func Add_ID()
;MsgBox (0, "Them ID", "Them ID")
= + 1
WinSetTitle(, "", )
EndFunc
Func HotKey1()
= HideAndShowGame(, )
EndFunc
Func HotKey2()
HideAndShowAuto()
EndFunc
Func HideAndShowGame(, )
= 1
If Then
WinSetState(, "", @SW_HIDE)
while <=
;MsgBox (0, "Hide ID", "Hide ID: " & )
WinSetState(, "", @SW_HIDE)
= + 1
WEnd
Return False
Else
WinSetState(, "", @SW_SHOW)
while <=
;MsgBox (0, "Show ID", "Show ID: " & )
WinSetState(, "", @SW_SHOW)
= + 1
WEnd
Return True
EndIf
EndFunc
Func HideAndShowAuto()
WinSetState("Change client`s ID","", @SW_RESTORE)
Sleep(3000)
WinSetState("Change client`s ID","", @SW_HIDE)
EndFunc
Func AltQ()
Exit
EndFunc
Just type the name of the program instead of Element Client and then compile it with [Only registered and activated users can see links. Click Here To Register...]. Run rf, open your exe and click Change ID. ;)Quote:
global = "Element Client";"abc.txt - Notepad" < < < < < < ----- CHANGE CLIENT NAME HERE