Register for your free account! | Forgot your password?

You last visited: Today at 12:53

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement


Advertise with us!

[RSRO] Ribot Launcher

Discussion on [RSRO] Ribot Launcher within the SRO Hacks, Bots, Cheats & Exploits forum part of the Silkroad Online category.

Reply
 
Old   #1
 
sniperzik's Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jan 2008
Posts: 32
Received Thanks: 28
Thumbs up [RSRO] Ribot Launcher ** v1.2 ** & PhBot Launcher v1.4

Hello, i created ribot launcher and i hope it will be usefull.
New russian silkroad online ribot launcher v1.2.0 Beta with many fixes and improvements.
Launcher created with autoit3 so it's Compatible with Windows 95 / 98 / ME / NT4 / 2000 / XP / 2003 / Vista / 2008.

Quote:
About Launcher:
; - Run up to 30 bots
; - Launcher Startup delay
; - Bot Launch delay
; - Silent Run
; - Settings Saved in .ini file
; - Checks Auto Relog box
; - Tray Tips
Quote:
; # Changelog
;
; v1.2.0 Beta
; - Optimized Code
; - Optimized All Functions
; - Increased Bot Launch Count to 30
; - Added Tray Tips
; - Added When choosed shortcut then auto checks use box
; - Added and Fixed Some GUI Text
; - Fixed Checks Auto Relog box
; - Fixed SaveSettings Function
; - Fixed Bot Launch Delay Bug
;
; v1.1.0 Beta
; - Added Checks Auto Relog box
; - Added and Fixed Some GUI Text
;
; v1.0.0 Beta
; - Initial release
Virus Total Scan:
Download Ribot Launcher:

Screenshot:


Note: If you want to disable Silent Run, then in RibotLauncher.ini change SilentRun=0

Note 2: Not working if in shortcut name is russian symbols.

P.S. Now have PhBot launcher to launch all shortcuts @ once... (Tested and working with phBot Release 10.5.9)
Attached Files
File Type: zip Ribot-Launcher-v1.2-Beta.zip (420.9 KB, 99 views)
File Type: zip PhBot Launcher v1.4.3 beta.zip (404.2 KB, 11 views)
sniperzik is offline  
Old 10/02/2010, 17:22   #2
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Nov 2007
Posts: 66
Received Thanks: 0
its not workable to me..doesnt launch ribot shortcut(clientless).. maybe its a account hack.. plss someone can report this?..
micron is offline  
Old 10/09/2010, 20:10   #3
 
sniperzik's Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jan 2008
Posts: 32
Received Thanks: 28
Lol. I can show you source code if you need...
I'm nothing to hide...

... and here it goes ...
Code:
;//*****************************************************************************************
;// Information
;//*****************************************************************************************
;// Name        : Ribot Launcher
;// Version     : 1.0.0 Beta
;// Creator     : Sn^
;// E-mail      : [email][/email]
;// MyC Project : [url=http://www.M.1z.Lv/]MyC Project[/url]
;//*****************************************************************************************
;
;	Simple & Easy Ribot Startup Launcher
;
;	1. Create auto login bot shortcuts.
;	2. Browse your shortcuts and check them to use.
;	3. Check Silent Run and Save Settings.
;	4. Click Start to run.
;	5. Place ribot launcher shortcut in Start -> All Programms -> Startup Folder
;
;	Done!
;
#include <GuiConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#NoTrayIcon
GuiCreate("Ribot Launcher",345,565)
$file = @ScriptDir & "\RibotLauncher.ini"
; Use
	GuiCtrlCreateGroup("", 240, 5, 34, 460)		;group start
	$label=GuiCtrlCreateLabel("Use",247,5,20)
	GUICtrlCreateGroup ("",-99,-99,1,1)  		;close group
; <C>
	GuiCtrlCreateGroup("", 5, 525, 335, 35)		;group start
	$copyr=GuiCtrlCreateLabel("© 2010 By Sn^",20,540,80,18)
	$copyr=GuiCtrlCreateLabel("MyC Project @ www.MyC.1z.Lv",170,540,155,18)
	GUICtrlCreateGroup ("",-99,-99,1,1)  		;close group
; Delay
	GuiCtrlCreateGroup("", 5, 465, 180, 60)		;group start
	$labelSD=GuiCtrlCreateLabel("Launcher Startup Delay:",10,480,120,15)
	$StartupDelay=GuiCtrlCreateInput(IniRead($file, "GeneralSettings", "StartupDelay", "20"),130,480,20,15,1)
	$labelS1=GuiCtrlCreateLabel("Sec.",155,480,25,15)
	$labelLD=GuiCtrlCreateLabel("Bot Launch Delay:",10,500,120,15)
	$Delay=GuiCtrlCreateInput(IniRead($file, "GeneralSettings", "Delay", "5"),130,500,20,15,1)
	$labelS2=GuiCtrlCreateLabel("Sec.",155,500,25,15)
	GUICtrlCreateGroup ("",-99,-99,1,1)  		;close group
; Silent Run
	GuiCtrlCreateGroup("", 190, 465, 150, 60)		;group start
	$labelSR=GuiCtrlCreateLabel("Silent Run:",195,480,60,15)
		$SilentRunCheck=IniRead($file, "GeneralSettings", "SilentRun", "0")
		$SilentRun=GUICtrlCreateCheckbox(" ",255,477)
		If $SilentRunCheck = "1" Then
				GUICtrlSetState($SilentRun, $GUI_CHECKED)
		EndIf
; #Settings
	$SaveSettings=GuiCtrlCreateButton("Save Settings",195,500,85,20, $WS_GROUP)
	$Start=GuiCtrlCreateButton("Start",280,478,55,42)
	GUICtrlCreateGroup ("",-99,-99,1,1)  		;close group
; #1
	$label1=GuiCtrlCreateLabel("1.",5,20,15,15)
	$ShortCut1=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut1", "Browse Ribot Shortcut.lnk"),25,20,210,15,1)
		$UseShortCutCheck1=IniRead($file, "UseShortCutSettings", "UseShortCut1", "")
		$UseShortCut1=GUICtrlCreateCheckbox(" ",250,17)
		If $UseShortCutCheck1 = "1" Then
			GUICtrlSetState($UseShortCut1, $GUI_CHECKED)
		EndIf
	$button1=GuiCtrlCreateButton("Browse",280,20,60,15)
; #2
	$label2=GuiCtrlCreateLabel("2.",5,40,15,15)
	$ShortCut2=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut2", "Browse Ribot Shortcut.lnk"),25,40,210,15,1)
		$UseShortCutCheck2=IniRead($file, "UseShortCutSettings", "UseShortCut2", "")
		$UseShortCut2=GUICtrlCreateCheckbox(" ",250,37)
		If $UseShortCutCheck2 = "1" Then
			GUICtrlSetState($UseShortCut2, $GUI_CHECKED)
		EndIf
	$button2=GuiCtrlCreateButton("Browse",280,40,60,15)
; #3
	$label3=GuiCtrlCreateLabel("3.",5,60,15,15)
	$ShortCut3=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut3", "Browse Ribot Shortcut.lnk"),25,60,210,15,1)
		$UseShortCutCheck3=IniRead($file, "UseShortCutSettings", "UseShortCut3", "")
		$UseShortCut3=GUICtrlCreateCheckbox(" ",250,57)
		If $UseShortCutCheck3 = "1" Then
			GUICtrlSetState($UseShortCut3, $GUI_CHECKED)
		EndIf
	$button3=GuiCtrlCreateButton("Browse",280,60,60,15)
; #4
	$label4=GuiCtrlCreateLabel("4.",5,80,15,15)
	$ShortCut4=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut4", "Browse Ribot Shortcut.lnk"),25,80,210,15,1)
		$UseShortCutCheck4=IniRead($file, "UseShortCutSettings", "UseShortCut4", "")
		$UseShortCut4=GUICtrlCreateCheckbox(" ",250,77)
		If $UseShortCutCheck4 = "1" Then
			GUICtrlSetState($UseShortCut4, $GUI_CHECKED)
		EndIf
	$button4=GuiCtrlCreateButton("Browse",280,80,60,15)
; #5
	$label5=GuiCtrlCreateLabel("5.",5,100,15,15)
	$ShortCut5=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut5", "Browse Ribot Shortcut.lnk"),25,100,210,15,1)
		$UseShortCutCheck5=IniRead($file, "UseShortCutSettings", "UseShortCut5", "")
		$UseShortCut5=GUICtrlCreateCheckbox(" ",250,97)
		If $UseShortCutCheck5 = "1" Then
			GUICtrlSetState($UseShortCut5, $GUI_CHECKED)
		EndIf
	$button5=GuiCtrlCreateButton("Browse",280,100,60,15)
; #6
	$label6=GuiCtrlCreateLabel("6.",5,120,15,15)
	$ShortCut6=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut6", "Browse Ribot Shortcut.lnk"),25,120,210,15,1)
		$UseShortCutCheck6=IniRead($file, "UseShortCutSettings", "UseShortCut6", "")
		$UseShortCut6=GUICtrlCreateCheckbox(" ",250,117)
		If $UseShortCutCheck6 = "1" Then
			GUICtrlSetState($UseShortCut6, $GUI_CHECKED)
		EndIf
	$button6=GuiCtrlCreateButton("Browse",280,120,60,15)
; #7
	$label7=GuiCtrlCreateLabel("7.",5,140,15,15)
	$ShortCut7=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut7", "Browse Ribot Shortcut.lnk"),25,140,210,15,1)
		$UseShortCutCheck7=IniRead($file, "UseShortCutSettings", "UseShortCut7", "")
		$UseShortCut7=GUICtrlCreateCheckbox(" ",250,137)
		If $UseShortCutCheck7 = "1" Then
			GUICtrlSetState($UseShortCut7, $GUI_CHECKED)
		EndIf
	$button7=GuiCtrlCreateButton("Browse",280,140,60,15)
; #8
	$label8=GuiCtrlCreateLabel("8.",5,160,15,15)
	$ShortCut8=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut8", "Browse Ribot Shortcut.lnk"),25,160,210,15,1)
		$UseShortCutCheck8=IniRead($file, "UseShortCutSettings", "UseShortCut8", "")
		$UseShortCut8=GUICtrlCreateCheckbox(" ",250,157)
		If $UseShortCutCheck8 = "1" Then
			GUICtrlSetState($UseShortCut8, $GUI_CHECKED)
		EndIf
	$button8=GuiCtrlCreateButton("Browse",280,160,60,15)
; #9
	$label9=GuiCtrlCreateLabel("9.",5,180,15,15)
	$ShortCut9=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut9", "Browse Ribot Shortcut.lnk"),25,180,210,15,1)
		$UseShortCutCheck9=IniRead($file, "UseShortCutSettings", "UseShortCut9", "")
		$UseShortCut9=GUICtrlCreateCheckbox(" ",250,177)
		If $UseShortCutCheck9 = "1" Then
			GUICtrlSetState($UseShortCut9, $GUI_CHECKED)
		EndIf
	$button9=GuiCtrlCreateButton("Browse",280,180,60,15)
; #10
	$label10=GuiCtrlCreateLabel("10.",5,200,15,15)
	$ShortCut10=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut10", "Browse Ribot Shortcut.lnk"),25,200,210,15,1)
		$UseShortCutCheck10=IniRead($file, "UseShortCutSettings", "UseShortCut10", "")
		$UseShortCut10=GUICtrlCreateCheckbox(" ",250,197)
		If $UseShortCutCheck10 = "1" Then
			GUICtrlSetState($UseShortCut10, $GUI_CHECKED)
		EndIf
	$button10=GuiCtrlCreateButton("Browse",280,200,60,15)
; #11
	$label11=GuiCtrlCreateLabel("11.",5,220,15,15)
	$ShortCut11=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut11", "Browse Ribot Shortcut.lnk"),25,220,210,15,1)
		$UseShortCutCheck11=IniRead($file, "UseShortCutSettings", "UseShortCut11", "")
		$UseShortCut11=GUICtrlCreateCheckbox(" ",250,217)
		If $UseShortCutCheck11 = "1" Then
			GUICtrlSetState($UseShortCut11, $GUI_CHECKED)
		EndIf
	$button11=GuiCtrlCreateButton("Browse",280,220,60,15)
; #12
	$label12=GuiCtrlCreateLabel("12.",5,240,15,15)
	$ShortCut12=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut12", "Browse Ribot Shortcut.lnk"),25,240,210,15,1)
		$UseShortCutCheck12=IniRead($file, "UseShortCutSettings", "UseShortCut12", "")
		$UseShortCut12=GUICtrlCreateCheckbox(" ",250,237)
		If $UseShortCutCheck12 = "1" Then
			GUICtrlSetState($UseShortCut12, $GUI_CHECKED)
		EndIf
	$button12=GuiCtrlCreateButton("Browse",280,240,60,15)
; #13
	$label13=GuiCtrlCreateLabel("13.",5,260,15,15)
	$ShortCut13=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut13", "Browse Ribot Shortcut.lnk"),25,260,210,15,1)
		$UseShortCutCheck13=IniRead($file, "UseShortCutSettings", "UseShortCut13", "")
		$UseShortCut13=GUICtrlCreateCheckbox(" ",250,257)
		If $UseShortCutCheck13 = "1" Then
			GUICtrlSetState($UseShortCut13, $GUI_CHECKED)
		EndIf
	$button13=GuiCtrlCreateButton("Browse",280,260,60,15)
; #14
	$label14=GuiCtrlCreateLabel("14.",5,280,15,15)
	$ShortCut14=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut14", "Browse Ribot Shortcut.lnk"),25,280,210,15,1)
		$UseShortCutCheck14=IniRead($file, "UseShortCutSettings", "UseShortCut14", "")
		$UseShortCut14=GUICtrlCreateCheckbox(" ",250,277)
		If $UseShortCutCheck14 = "1" Then
			GUICtrlSetState($UseShortCut14, $GUI_CHECKED)
		EndIf
	$button14=GuiCtrlCreateButton("Browse",280,280,60,15)
; #15
	$label15=GuiCtrlCreateLabel("15.",5,280,15,15)
	$ShortCut15=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut15", "Browse Ribot Shortcut.lnk"),25,280,210,15,1)
		$UseShortCutCheck15=IniRead($file, "UseShortCutSettings", "UseShortCut15", "")
		$UseShortCut15=GUICtrlCreateCheckbox(" ",250,277)
		If $UseShortCutCheck15 = "1" Then
			GUICtrlSetState($UseShortCut15, $GUI_CHECKED)
		EndIf
	$button15=GuiCtrlCreateButton("Browse",280,280,60,15)
; #16
	$label16=GuiCtrlCreateLabel("16.",5,300,15,15)
	$ShortCut16=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut16", "Browse Ribot Shortcut.lnk"),25,300,210,15,1)
		$UseShortCutCheck16=IniRead($file, "UseShortCutSettings", "UseShortCut16", "")
		$UseShortCut16=GUICtrlCreateCheckbox(" ",250,297)
		If $UseShortCutCheck16 = "1" Then
			GUICtrlSetState($UseShortCut16, $GUI_CHECKED)
		EndIf
	$button16=GuiCtrlCreateButton("Browse",280,300,60,15)
; #17
	$label17=GuiCtrlCreateLabel("17.",5,320,15,15)
	$ShortCut17=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut17", "Browse Ribot Shortcut.lnk"),25,320,210,15,1)
		$UseShortCutCheck17=IniRead($file, "UseShortCutSettings", "UseShortCut17", "")
		$UseShortCut17=GUICtrlCreateCheckbox(" ",250,317)
		If $UseShortCutCheck17 = "1" Then
			GUICtrlSetState($UseShortCut17, $GUI_CHECKED)
		EndIf
	$button17=GuiCtrlCreateButton("Browse",280,320,60,15)
; #18
	$label18=GuiCtrlCreateLabel("18.",5,340,15,15)
	$ShortCut18=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut18", "Browse Ribot Shortcut.lnk"),25,340,210,15,1)
		$UseShortCutCheck18=IniRead($file, "UseShortCutSettings", "UseShortCut18", "")
		$UseShortCut18=GUICtrlCreateCheckbox(" ",250,337)
		If $UseShortCutCheck18 = "1" Then
			GUICtrlSetState($UseShortCut18, $GUI_CHECKED)
		EndIf
	$button18=GuiCtrlCreateButton("Browse",280,340,60,15)
; #19
	$label19=GuiCtrlCreateLabel("19.",5,360,15,15)
	$ShortCut19=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut19", "Browse Ribot Shortcut.lnk"),25,360,210,15,1)
		$UseShortCutCheck19=IniRead($file, "UseShortCutSettings", "UseShortCut19", "")
		$UseShortCut19=GUICtrlCreateCheckbox(" ",250,357)
		If $UseShortCutCheck19 = "1" Then
			GUICtrlSetState($UseShortCut19, $GUI_CHECKED)
		EndIf
	$button19=GuiCtrlCreateButton("Browse",280,360,60,15)
; #20
	$label20=GuiCtrlCreateLabel("20.",5,380,15,15)
	$ShortCut20=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut20", "Browse Ribot Shortcut.lnk"),25,380,210,15,1)
		$UseShortCutCheck20=IniRead($file, "UseShortCutSettings", "UseShortCut20", "")
		$UseShortCut20=GUICtrlCreateCheckbox(" ",250,377)
		If $UseShortCutCheck20 = "1" Then
			GUICtrlSetState($UseShortCut20, $GUI_CHECKED)
		EndIf
	$button20=GuiCtrlCreateButton("Browse",280,380,60,15)
; #21
	$label21=GuiCtrlCreateLabel("21.",5,400,15,15)
	$ShortCut21=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut21", "Browse Ribot Shortcut.lnk"),25,400,210,15,1)
		$UseShortCutCheck21=IniRead($file, "UseShortCutSettings", "UseShortCut21", "")
		$UseShortCut21=GUICtrlCreateCheckbox(" ",250,397)
		If $UseShortCutCheck21 = "1" Then
			GUICtrlSetState($UseShortCut21, $GUI_CHECKED)
		EndIf
	$button21=GuiCtrlCreateButton("Browse",280,400,60,15)
; #22
	$label22=GuiCtrlCreateLabel("22.",5,420,15,15)
	$ShortCut22=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut22", "Browse Ribot Shortcut.lnk"),25,420,210,15,1)
		$UseShortCutCheck22=IniRead($file, "UseShortCutSettings", "UseShortCut22", "")
		$UseShortCut22=GUICtrlCreateCheckbox(" ",250,417)
		If $UseShortCutCheck22 = "1" Then
			GUICtrlSetState($UseShortCut22, $GUI_CHECKED)
		EndIf
	$button22=GuiCtrlCreateButton("Browse",280,420,60,15)
; #23
	$label23=GuiCtrlCreateLabel("23.",5,440,15,15)
	$ShortCut23=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut23", "Browse Ribot Shortcut.lnk"),25,440,210,15,1)
		$UseShortCutCheck23=IniRead($file, "UseShortCutSettings", "UseShortCut23", "")
		$UseShortCut23=GUICtrlCreateCheckbox(" ",250,437)
		If $UseShortCutCheck23 = "1" Then
			GUICtrlSetState($UseShortCut23, $GUI_CHECKED)
		EndIf
	$button23=GuiCtrlCreateButton("Browse",280,440,60,15)
; #24
	$label24=GuiCtrlCreateLabel("24.",5,440,15,15)
	$ShortCut24=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut24", "Browse Ribot Shortcut.lnk"),25,440,210,15,1)
		$UseShortCutCheck24=IniRead($file, "UseShortCutSettings", "UseShortCut24", "")
		$UseShortCut24=GUICtrlCreateCheckbox(" ",250,437)
		If $UseShortCutCheck24 = "1" Then
			GUICtrlSetState($UseShortCut24, $GUI_CHECKED)
		EndIf
	$button24=GuiCtrlCreateButton("Browse",280,440,60,15)
; #25
	$label25=GuiCtrlCreateLabel("25.",5,440,15,15)
	$ShortCut25=GuiCtrlCreateInput(IniRead($file, "ShortCutSettings", "ShortCut25", "Browse Ribot Shortcut.lnk"),25,440,210,15,1)
		$UseShortCutCheck25=IniRead($file, "UseShortCutSettings", "UseShortCut25", "")
		$UseShortCut25=GUICtrlCreateCheckbox(" ",250,437)
		If $UseShortCutCheck25 = "1" Then
			GUICtrlSetState($UseShortCut25, $GUI_CHECKED)
		EndIf
	$button25=GuiCtrlCreateButton("Browse",280,440,60,15)

	; GRead
	$_StartupDelay = GUICtrlRead($StartupDelay)
	$_Delay = GUICtrlRead($Delay)
	$_SilentRun = GUICtrlRead($SilentRun)

	$_ShortCut1 = GUICtrlRead($ShortCut1)
	$_ShortCut2 = GUICtrlRead($ShortCut2)
	$_ShortCut3 = GUICtrlRead($ShortCut3)
	$_ShortCut4 = GUICtrlRead($ShortCut4)
	$_ShortCut5 = GUICtrlRead($ShortCut5)
	$_ShortCut6 = GUICtrlRead($ShortCut6)
	$_ShortCut7 = GUICtrlRead($ShortCut7)
	$_ShortCut8 = GUICtrlRead($ShortCut8)
	$_ShortCut9 = GUICtrlRead($ShortCut9)
	$_ShortCut10 = GUICtrlRead($ShortCut10)
	$_ShortCut11 = GUICtrlRead($ShortCut11)
	$_ShortCut12 = GUICtrlRead($ShortCut12)
	$_ShortCut13 = GUICtrlRead($ShortCut13)
	$_ShortCut14 = GUICtrlRead($ShortCut14)
	$_ShortCut15 = GUICtrlRead($ShortCut15)
	$_ShortCut16 = GUICtrlRead($ShortCut16)
	$_ShortCut17 = GUICtrlRead($ShortCut17)
	$_ShortCut18 = GUICtrlRead($ShortCut18)
	$_ShortCut19 = GUICtrlRead($ShortCut19)
	$_ShortCut20 = GUICtrlRead($ShortCut20)
	$_ShortCut21 = GUICtrlRead($ShortCut21)
	$_ShortCut22 = GUICtrlRead($ShortCut22)
	$_ShortCut23 = GUICtrlRead($ShortCut23)
	$_ShortCut24 = GUICtrlRead($ShortCut24)
	$_ShortCut25 = GUICtrlRead($ShortCut25)
	
	$_UseShortCut1 = GUICtrlRead($UseShortCut1)
	$_UseShortCut2 = GUICtrlRead($UseShortCut2)
	$_UseShortCut3 = GUICtrlRead($UseShortCut3)
	$_UseShortCut4 = GUICtrlRead($UseShortCut4)
	$_UseShortCut5 = GUICtrlRead($UseShortCut5)
	$_UseShortCut6 = GUICtrlRead($UseShortCut6)
	$_UseShortCut7 = GUICtrlRead($UseShortCut7)
	$_UseShortCut8 = GUICtrlRead($UseShortCut8)
	$_UseShortCut9 = GUICtrlRead($UseShortCut9)
	$_UseShortCut10 = GUICtrlRead($UseShortCut10)
	$_UseShortCut11 = GUICtrlRead($UseShortCut11)
	$_UseShortCut12 = GUICtrlRead($UseShortCut12)
	$_UseShortCut13 = GUICtrlRead($UseShortCut13)
	$_UseShortCut14 = GUICtrlRead($UseShortCut14)
	$_UseShortCut15 = GUICtrlRead($UseShortCut15)
	$_UseShortCut16 = GUICtrlRead($UseShortCut16)
	$_UseShortCut17 = GUICtrlRead($UseShortCut17)
	$_UseShortCut18 = GUICtrlRead($UseShortCut18)
	$_UseShortCut19 = GUICtrlRead($UseShortCut19)
	$_UseShortCut20 = GUICtrlRead($UseShortCut20)
	$_UseShortCut21 = GUICtrlRead($UseShortCut21)
	$_UseShortCut22 = GUICtrlRead($UseShortCut22)
	$_UseShortCut23 = GUICtrlRead($UseShortCut23)
	$_UseShortCut24 = GUICtrlRead($UseShortCut24)
	$_UseShortCut25 = GUICtrlRead($UseShortCut25)

	SilentRun()


	
; While
While 1
$msg=GuiGetMsg()
If $msg=-3 Then Exit
If $msg=$button1 Then button1()
If $msg=$button2 Then button2()
If $msg=$button3 Then button3()
If $msg=$button4 Then button4()
If $msg=$button5 Then button5()
If $msg=$button6 Then button6()
If $msg=$button7 Then button7()
If $msg=$button8 Then button8()
If $msg=$button9 Then button9()
If $msg=$button10 Then button10()
If $msg=$button11 Then button11()
If $msg=$button12 Then button12()
If $msg=$button13 Then button13()
If $msg=$button14 Then button14()
If $msg=$button15 Then button15()
If $msg=$button16 Then button16()
If $msg=$button17 Then button17()
If $msg=$button18 Then button18()
If $msg=$button19 Then button19()
If $msg=$button20 Then button20()
If $msg=$button21 Then button21()
If $msg=$button22 Then button22()
If $msg=$button23 Then button23()
If $msg=$button24 Then button24()
If $msg=$button25 Then button25()
If $msg=$SaveSettings Then SaveSettings()
If $msg=$Start Then Start()
Wend



Func button1()
	$message = "Locate your ribot shortcut"
	$ShortcutFile1 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		;MsgBox(4096,"","You chose " & $ShortcutFile1)
		GUICtrlSetData($ShortCut1, $ShortcutFile1)
	EndIf
EndFunc

Func button2()
	$message = "Locate your ribot shortcut"
	$ShortcutFile2 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut2, $ShortcutFile2)
	EndIf
EndFunc

Func button3()
	$message = "Locate your ribot shortcut"
	$ShortcutFile3 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut3, $ShortcutFile3)
	EndIf
EndFunc

Func button4()
	$message = "Locate your ribot shortcut"
	$ShortcutFile4 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut4, $ShortcutFile4)
	EndIf
EndFunc

Func button5()
	$message = "Locate your ribot shortcut"
	$ShortcutFile5 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut5, $ShortcutFile5)
	EndIf
EndFunc

Func button6()
	$message = "Locate your ribot shortcut"
	$ShortcutFile6 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut6, $ShortcutFile6)
	EndIf
EndFunc

Func button7()
	$message = "Locate your ribot shortcut"
	$ShortcutFile7 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut7, $ShortcutFile7)
	EndIf
EndFunc

Func button8()
	$message = "Locate your ribot shortcut"
	$ShortcutFile8 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut8, $ShortcutFile8)
	EndIf
EndFunc

Func button9()
	$message = "Locate your ribot shortcut"
	$ShortcutFile9 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut9, $ShortcutFile9)
	EndIf
EndFunc

Func button10()
	$message = "Locate your ribot shortcut"
	$ShortcutFile10 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut10, $ShortcutFile10)
	EndIf
EndFunc

Func button11()
	$message = "Locate your ribot shortcut"
	$ShortcutFile11 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut11, $ShortcutFile11)
	EndIf
EndFunc

Func button12()
	$message = "Locate your ribot shortcut"
	$ShortcutFile12 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut12, $ShortcutFile12)
	EndIf
EndFunc

Func button13()
	$message = "Locate your ribot shortcut"
	$ShortcutFile13 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut13, $ShortcutFile13)
	EndIf
EndFunc

Func button14()
	$message = "Locate your ribot shortcut"
	$ShortcutFile14 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut14, $ShortcutFile14)
	EndIf
EndFunc

Func button15()
	$message = "Locate your ribot shortcut"
	$ShortcutFile15 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut15, $ShortcutFile15)
	EndIf
EndFunc

Func button16()
	$message = "Locate your ribot shortcut"
	$ShortcutFile16 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut16, $ShortcutFile16)
	EndIf
EndFunc

Func button17()
	$message = "Locate your ribot shortcut"
	$ShortcutFile17 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut17, $ShortcutFile17)
	EndIf
EndFunc

Func button18()
	$message = "Locate your ribot shortcut"
	$ShortcutFile18 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut18, $ShortcutFile18)
	EndIf
EndFunc

Func button19()
	$message = "Locate your ribot shortcut"
	$ShortcutFile19 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut19, $ShortcutFile19)
	EndIf
EndFunc

Func button20()
	$message = "Locate your ribot shortcut"
	$ShortcutFile20 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut20, $ShortcutFile20)
	EndIf
EndFunc

Func button21()
	$message = "Locate your ribot shortcut"
	$ShortcutFile21 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut21, $ShortcutFile21)
	EndIf
EndFunc

Func button22()
	$message = "Locate your ribot shortcut"
	$ShortcutFile22 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut22, $ShortcutFile22)
	EndIf
EndFunc

Func button23()
	$message = "Locate your ribot shortcut"
	$ShortcutFile23 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut23, $ShortcutFile23)
	EndIf
EndFunc

Func button24()
	$message = "Locate your ribot shortcut"
	$ShortcutFile24 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut24, $ShortcutFile24)
	EndIf
EndFunc

Func button25()
	$message = "Locate your ribot shortcut"
	$ShortcutFile25 = FileOpenDialog($message, @ScriptDir & "\", "Shortcut (*.lnk)", 1)

	If @error Then
		MsgBox(4096,"","No File chosen")
	Else
		GUICtrlSetData($ShortCut25, $ShortcutFile25)
	EndIf
EndFunc

Func SaveSettings()	
	; GRead
	$_StartupDelay = GUICtrlRead($StartupDelay)
	$_Delay = GUICtrlRead($Delay)
	$_SilentRun = GUICtrlRead($SilentRun)

	$_ShortCut1 = GUICtrlRead($ShortCut1)
	$_ShortCut2 = GUICtrlRead($ShortCut2)
	$_ShortCut3 = GUICtrlRead($ShortCut3)
	$_ShortCut4 = GUICtrlRead($ShortCut4)
	$_ShortCut5 = GUICtrlRead($ShortCut5)
	$_ShortCut6 = GUICtrlRead($ShortCut6)
	$_ShortCut7 = GUICtrlRead($ShortCut7)
	$_ShortCut8 = GUICtrlRead($ShortCut8)
	$_ShortCut9 = GUICtrlRead($ShortCut9)
	$_ShortCut10 = GUICtrlRead($ShortCut10)
	$_ShortCut11 = GUICtrlRead($ShortCut11)
	$_ShortCut12 = GUICtrlRead($ShortCut12)
	$_ShortCut13 = GUICtrlRead($ShortCut13)
	$_ShortCut14 = GUICtrlRead($ShortCut14)
	$_ShortCut15 = GUICtrlRead($ShortCut15)
	$_ShortCut16 = GUICtrlRead($ShortCut16)
	$_ShortCut17 = GUICtrlRead($ShortCut17)
	$_ShortCut18 = GUICtrlRead($ShortCut18)
	$_ShortCut19 = GUICtrlRead($ShortCut19)
	$_ShortCut20 = GUICtrlRead($ShortCut20)
	$_ShortCut21 = GUICtrlRead($ShortCut21)
	$_ShortCut22 = GUICtrlRead($ShortCut22)
	$_ShortCut23 = GUICtrlRead($ShortCut23)
	$_ShortCut24 = GUICtrlRead($ShortCut24)
	$_ShortCut25 = GUICtrlRead($ShortCut25)
	
	$_UseShortCut1 = GUICtrlRead($UseShortCut1)
	$_UseShortCut2 = GUICtrlRead($UseShortCut2)
	$_UseShortCut3 = GUICtrlRead($UseShortCut3)
	$_UseShortCut4 = GUICtrlRead($UseShortCut4)
	$_UseShortCut5 = GUICtrlRead($UseShortCut5)
	$_UseShortCut6 = GUICtrlRead($UseShortCut6)
	$_UseShortCut7 = GUICtrlRead($UseShortCut7)
	$_UseShortCut8 = GUICtrlRead($UseShortCut8)
	$_UseShortCut9 = GUICtrlRead($UseShortCut9)
	$_UseShortCut10 = GUICtrlRead($UseShortCut10)
	$_UseShortCut11 = GUICtrlRead($UseShortCut11)
	$_UseShortCut12 = GUICtrlRead($UseShortCut12)
	$_UseShortCut13 = GUICtrlRead($UseShortCut13)
	$_UseShortCut14 = GUICtrlRead($UseShortCut14)
	$_UseShortCut15 = GUICtrlRead($UseShortCut15)
	$_UseShortCut16 = GUICtrlRead($UseShortCut16)
	$_UseShortCut17 = GUICtrlRead($UseShortCut17)
	$_UseShortCut18 = GUICtrlRead($UseShortCut18)
	$_UseShortCut19 = GUICtrlRead($UseShortCut19)
	$_UseShortCut20 = GUICtrlRead($UseShortCut20)
	$_UseShortCut21 = GUICtrlRead($UseShortCut21)
	$_UseShortCut22 = GUICtrlRead($UseShortCut22)
	$_UseShortCut23 = GUICtrlRead($UseShortCut23)
	$_UseShortCut24 = GUICtrlRead($UseShortCut24)
	$_UseShortCut25 = GUICtrlRead($UseShortCut25)

	; Startup Delay
	If $_StartupDelay = "0" Then
		MsgBox(4096,"","Not allowed"&@LF&"Recommended 10-30 Seconds.")
	ElseIf Number($_StartupDelay) Then
		IniWrite($file, "GeneralSettings", "StartupDelay", $_StartupDelay)
	ElseIf Number($_StartupDelay) = "0"  Then
		MsgBox(4096,"","Type number.")
	EndIf
	
	; Delay
	If $_Delay = "0" Then
		MsgBox(4096,"","Delay can't be 0 sec, because ribot will crash."&@LF&"Recommended 3 seconds.")
	ElseIf Number($_Delay) Then
		IniWrite($file, "GeneralSettings", "Delay", $_Delay)
	ElseIf Number($_Delay) = "0"  Then
		MsgBox(4096,"","Type number.")
	EndIf
	
	; Silent Run
	If $_SilentRun=$GUI_CHECKED Then 
		IniWrite($file, "GeneralSettings", "SilentRun", "1")
	Else
		IniWrite($file, "GeneralSettings", "SilentRun", "0")
	EndIf
	
	; ShortCut
	IniWrite($file, "ShortCutSettings", "ShortCut1", $_ShortCut1)
	IniWrite($file, "ShortCutSettings", "ShortCut2", $_ShortCut2)
	IniWrite($file, "ShortCutSettings", "ShortCut3", $_ShortCut3)
	IniWrite($file, "ShortCutSettings", "ShortCut4", $_ShortCut4)
	IniWrite($file, "ShortCutSettings", "ShortCut5", $_ShortCut5)
	IniWrite($file, "ShortCutSettings", "ShortCut6", $_ShortCut6)
	IniWrite($file, "ShortCutSettings", "ShortCut7", $_ShortCut7)
	IniWrite($file, "ShortCutSettings", "ShortCut8", $_ShortCut8)
	IniWrite($file, "ShortCutSettings", "ShortCut9", $_ShortCut9)
	IniWrite($file, "ShortCutSettings", "ShortCut10", $_ShortCut10)
	IniWrite($file, "ShortCutSettings", "ShortCut11", $_ShortCut11)
	IniWrite($file, "ShortCutSettings", "ShortCut12", $_ShortCut12)
	IniWrite($file, "ShortCutSettings", "ShortCut13", $_ShortCut13)
	IniWrite($file, "ShortCutSettings", "ShortCut14", $_ShortCut14)
	IniWrite($file, "ShortCutSettings", "ShortCut15", $_ShortCut15)
	IniWrite($file, "ShortCutSettings", "ShortCut16", $_ShortCut16)
	IniWrite($file, "ShortCutSettings", "ShortCut17", $_ShortCut17)
	IniWrite($file, "ShortCutSettings", "ShortCut18", $_ShortCut18)
	IniWrite($file, "ShortCutSettings", "ShortCut19", $_ShortCut19)
	IniWrite($file, "ShortCutSettings", "ShortCut20", $_ShortCut20)
	IniWrite($file, "ShortCutSettings", "ShortCut21", $_ShortCut21)
	IniWrite($file, "ShortCutSettings", "ShortCut22", $_ShortCut22)
	IniWrite($file, "ShortCutSettings", "ShortCut23", $_ShortCut23)
	IniWrite($file, "ShortCutSettings", "ShortCut24", $_ShortCut24)
	IniWrite($file, "ShortCutSettings", "ShortCut25", $_ShortCut25)
	
	; UseShortCut
	If $_UseShortCut1=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut1", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut1", "0")
	EndIf
	
	If $_UseShortCut2=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut2", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut2", "0")
	EndIf
	
	If $_UseShortCut3=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut3", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut3", "0")
	EndIf
	
	If $_UseShortCut4=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut4", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut4", "0")
	EndIf
	
	If $_UseShortCut5=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut5", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut5", "0")
	EndIf
	
	If $_UseShortCut6=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut6", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut6", "0")
	EndIf
	
	If $_UseShortCut7=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut7", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut7", "0")
	EndIf
	
	If $_UseShortCut8=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut8", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut8", "0")
	EndIf
	
	If $_UseShortCut9=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut9", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut9", "0")
	EndIf
	
	If $_UseShortCut10=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut10", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut10", "0")
	EndIf
	
	If $_UseShortCut11=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut11", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut11", "0")
	EndIf
	
	If $_UseShortCut12=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut12", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut12", "0")
	EndIf
	
	If $_UseShortCut13=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut13", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut13", "0")
	EndIf
	
	If $_UseShortCut14=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut14", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut14", "0")
	EndIf
	
	If $_UseShortCut15=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut15", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut15", "0")
	EndIf
	
	If $_UseShortCut16=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut16", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut16", "0")
	EndIf
	
	If $_UseShortCut17=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut17", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut17", "0")
	EndIf
	
	If $_UseShortCut18=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut18", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut18", "0")
	EndIf
	
	If $_UseShortCut19=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut19", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut19", "0")
	EndIf
	
	If $_UseShortCut20=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut20", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut20", "0")
	EndIf
	
	If $_UseShortCut21=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut21", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut21", "0")
	EndIf
	
	If $_UseShortCut22=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut22", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut22", "0")
	EndIf
	
	If $_UseShortCut23=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut23", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut23", "0")
	EndIf
	
	If $_UseShortCut24=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut24", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut24", "0")
	EndIf
	
	If $_UseShortCut25=$GUI_CHECKED Then 
		IniWrite($file, "UseShortCutSettings", "UseShortCut25", "1")
	Else
		IniWrite($file, "UseShortCutSettings", "UseShortCut25", "0")
	EndIf
	
EndFunc

Func Start()
	; GRead
	$_StartupDelay = GUICtrlRead($StartupDelay)
	$_Delay = GUICtrlRead($Delay)
	$_SilentRun = GUICtrlRead($SilentRun)

	$_ShortCut1 = GUICtrlRead($ShortCut1)
	$_ShortCut2 = GUICtrlRead($ShortCut2)
	$_ShortCut3 = GUICtrlRead($ShortCut3)
	$_ShortCut4 = GUICtrlRead($ShortCut4)
	$_ShortCut5 = GUICtrlRead($ShortCut5)
	$_ShortCut6 = GUICtrlRead($ShortCut6)
	$_ShortCut7 = GUICtrlRead($ShortCut7)
	$_ShortCut8 = GUICtrlRead($ShortCut8)
	$_ShortCut9 = GUICtrlRead($ShortCut9)
	$_ShortCut10 = GUICtrlRead($ShortCut10)
	$_ShortCut11 = GUICtrlRead($ShortCut11)
	$_ShortCut12 = GUICtrlRead($ShortCut12)
	$_ShortCut13 = GUICtrlRead($ShortCut13)
	$_ShortCut14 = GUICtrlRead($ShortCut14)
	$_ShortCut15 = GUICtrlRead($ShortCut15)
	$_ShortCut16 = GUICtrlRead($ShortCut16)
	$_ShortCut17 = GUICtrlRead($ShortCut17)
	$_ShortCut18 = GUICtrlRead($ShortCut18)
	$_ShortCut19 = GUICtrlRead($ShortCut19)
	$_ShortCut20 = GUICtrlRead($ShortCut20)
	$_ShortCut21 = GUICtrlRead($ShortCut21)
	$_ShortCut22 = GUICtrlRead($ShortCut22)
	$_ShortCut23 = GUICtrlRead($ShortCut23)
	$_ShortCut24 = GUICtrlRead($ShortCut24)
	$_ShortCut25 = GUICtrlRead($ShortCut25)
	
	$_UseShortCut1 = GUICtrlRead($UseShortCut1)
	$_UseShortCut2 = GUICtrlRead($UseShortCut2)
	$_UseShortCut3 = GUICtrlRead($UseShortCut3)
	$_UseShortCut4 = GUICtrlRead($UseShortCut4)
	$_UseShortCut5 = GUICtrlRead($UseShortCut5)
	$_UseShortCut6 = GUICtrlRead($UseShortCut6)
	$_UseShortCut7 = GUICtrlRead($UseShortCut7)
	$_UseShortCut8 = GUICtrlRead($UseShortCut8)
	$_UseShortCut9 = GUICtrlRead($UseShortCut9)
	$_UseShortCut10 = GUICtrlRead($UseShortCut10)
	$_UseShortCut11 = GUICtrlRead($UseShortCut11)
	$_UseShortCut12 = GUICtrlRead($UseShortCut12)
	$_UseShortCut13 = GUICtrlRead($UseShortCut13)
	$_UseShortCut14 = GUICtrlRead($UseShortCut14)
	$_UseShortCut15 = GUICtrlRead($UseShortCut15)
	$_UseShortCut16 = GUICtrlRead($UseShortCut16)
	$_UseShortCut17 = GUICtrlRead($UseShortCut17)
	$_UseShortCut18 = GUICtrlRead($UseShortCut18)
	$_UseShortCut19 = GUICtrlRead($UseShortCut19)
	$_UseShortCut20 = GUICtrlRead($UseShortCut20)
	$_UseShortCut21 = GUICtrlRead($UseShortCut21)
	$_UseShortCut22 = GUICtrlRead($UseShortCut22)
	$_UseShortCut23 = GUICtrlRead($UseShortCut23)
	$_UseShortCut24 = GUICtrlRead($UseShortCut24)
	$_UseShortCut25 = GUICtrlRead($UseShortCut25)
	
	GUISetState(@SW_HIDE)
	
	Sleep($_StartupDelay&"000")
	
	; UseShortCut	
	If $_UseShortCut1=$GUI_CHECKED and FileExists($_ShortCut1) Then 
		Run(@ComSpec & "  /c " & $_ShortCut1, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut2=$GUI_CHECKED and FileExists($_ShortCut2) Then 
		Run(@ComSpec & "  /c " & $_ShortCut2, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut3=$GUI_CHECKED and FileExists($_ShortCut3) Then 
		Run(@ComSpec & "  /c " & $_ShortCut3, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut4=$GUI_CHECKED and FileExists($_ShortCut4) Then 
		Run(@ComSpec & "  /c " & $_ShortCut4, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut5=$GUI_CHECKED and FileExists($_ShortCut5) Then 
		Run(@ComSpec & "  /c " & $_ShortCut5, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut6=$GUI_CHECKED and FileExists($_ShortCut6) Then 
		Run(@ComSpec & "  /c " & $_ShortCut6, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut7=$GUI_CHECKED and FileExists($_ShortCut7) Then 
		Run(@ComSpec & "  /c " & $_ShortCut7, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut8=$GUI_CHECKED and FileExists($_ShortCut8) Then 
		Run(@ComSpec & "  /c " & $_ShortCut8, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut9=$GUI_CHECKED and FileExists($_ShortCut9) Then 
		Run(@ComSpec & "  /c " & $_ShortCut9, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut10=$GUI_CHECKED and FileExists($_ShortCut10) Then 
		Run(@ComSpec & "  /c " & $_ShortCut10, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut11=$GUI_CHECKED and FileExists($_ShortCut11) Then 
		Run(@ComSpec & "  /c " & $_ShortCut11, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut12=$GUI_CHECKED and FileExists($_ShortCut12) Then 
		Run(@ComSpec & "  /c " & $_ShortCut12, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut13=$GUI_CHECKED and FileExists($_ShortCut13) Then 
		Run(@ComSpec & "  /c " & $_ShortCut13, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut14=$GUI_CHECKED and FileExists($_ShortCut14) Then 
		Run(@ComSpec & "  /c " & $_ShortCut14, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut15=$GUI_CHECKED and FileExists($_ShortCut15) Then 
		Run(@ComSpec & "  /c " & $_ShortCut15, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut16=$GUI_CHECKED and FileExists($_ShortCut16) Then 
		Run(@ComSpec & "  /c " & $_ShortCut16, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut17=$GUI_CHECKED and FileExists($_ShortCut17) Then 
		Run(@ComSpec & "  /c " & $_ShortCut17, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut18=$GUI_CHECKED and FileExists($_ShortCut18) Then 
		Run(@ComSpec & "  /c " & $_ShortCut18, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut19=$GUI_CHECKED and FileExists($_ShortCut19) Then 
		Run(@ComSpec & "  /c " & $_ShortCut19, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut20=$GUI_CHECKED and FileExists($_ShortCut20) Then 
		Run(@ComSpec & "  /c " & $_ShortCut20, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut21=$GUI_CHECKED and FileExists($_ShortCut21) Then 
		Run(@ComSpec & "  /c " & $_ShortCut21, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut22=$GUI_CHECKED and FileExists($_ShortCut22) Then 
		Run(@ComSpec & "  /c " & $_ShortCut22, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut23=$GUI_CHECKED and FileExists($_ShortCut23) Then 
		Run(@ComSpec & "  /c " & $_ShortCut23, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut24=$GUI_CHECKED and FileExists($_ShortCut24) Then 
		Run(@ComSpec & "  /c " & $_ShortCut24, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	If $_UseShortCut25=$GUI_CHECKED and FileExists($_ShortCut25) Then 
		Run(@ComSpec & "  /c " & $_ShortCut25, @DesktopCommonDir, @SW_HIDE)
		Sleep($_Delay&"000")
	EndIf
	
	Sleep("5000")
	Exit
EndFunc

Func SilentRun()
	; GRead
	$_StartupDelay = GUICtrlRead($StartupDelay)
	$_Delay = GUICtrlRead($Delay)
	$_SilentRun = GUICtrlRead($SilentRun)

	$_ShortCut1 = GUICtrlRead($ShortCut1)
	$_ShortCut2 = GUICtrlRead($ShortCut2)
	$_ShortCut3 = GUICtrlRead($ShortCut3)
	$_ShortCut4 = GUICtrlRead($ShortCut4)
	$_ShortCut5 = GUICtrlRead($ShortCut5)
	$_ShortCut6 = GUICtrlRead($ShortCut6)
	$_ShortCut7 = GUICtrlRead($ShortCut7)
	$_ShortCut8 = GUICtrlRead($ShortCut8)
	$_ShortCut9 = GUICtrlRead($ShortCut9)
	$_ShortCut10 = GUICtrlRead($ShortCut10)
	$_ShortCut11 = GUICtrlRead($ShortCut11)
	$_ShortCut12 = GUICtrlRead($ShortCut12)
	$_ShortCut13 = GUICtrlRead($ShortCut13)
	$_ShortCut14 = GUICtrlRead($ShortCut14)
	$_ShortCut15 = GUICtrlRead($ShortCut15)
	$_ShortCut16 = GUICtrlRead($ShortCut16)
	$_ShortCut17 = GUICtrlRead($ShortCut17)
	$_ShortCut18 = GUICtrlRead($ShortCut18)
	$_ShortCut19 = GUICtrlRead($ShortCut19)
	$_ShortCut20 = GUICtrlRead($ShortCut20)
	$_ShortCut21 = GUICtrlRead($ShortCut21)
	$_ShortCut22 = GUICtrlRead($ShortCut22)
	$_ShortCut23 = GUICtrlRead($ShortCut23)
	$_ShortCut24 = GUICtrlRead($ShortCut24)
	$_ShortCut25 = GUICtrlRead($ShortCut25)
	
	$_UseShortCut1 = GUICtrlRead($UseShortCut1)
	$_UseShortCut2 = GUICtrlRead($UseShortCut2)
	$_UseShortCut3 = GUICtrlRead($UseShortCut3)
	$_UseShortCut4 = GUICtrlRead($UseShortCut4)
	$_UseShortCut5 = GUICtrlRead($UseShortCut5)
	$_UseShortCut6 = GUICtrlRead($UseShortCut6)
	$_UseShortCut7 = GUICtrlRead($UseShortCut7)
	$_UseShortCut8 = GUICtrlRead($UseShortCut8)
	$_UseShortCut9 = GUICtrlRead($UseShortCut9)
	$_UseShortCut10 = GUICtrlRead($UseShortCut10)
	$_UseShortCut11 = GUICtrlRead($UseShortCut11)
	$_UseShortCut12 = GUICtrlRead($UseShortCut12)
	$_UseShortCut13 = GUICtrlRead($UseShortCut13)
	$_UseShortCut14 = GUICtrlRead($UseShortCut14)
	$_UseShortCut15 = GUICtrlRead($UseShortCut15)
	$_UseShortCut16 = GUICtrlRead($UseShortCut16)
	$_UseShortCut17 = GUICtrlRead($UseShortCut17)
	$_UseShortCut18 = GUICtrlRead($UseShortCut18)
	$_UseShortCut19 = GUICtrlRead($UseShortCut19)
	$_UseShortCut20 = GUICtrlRead($UseShortCut20)
	$_UseShortCut21 = GUICtrlRead($UseShortCut21)
	$_UseShortCut22 = GUICtrlRead($UseShortCut22)
	$_UseShortCut23 = GUICtrlRead($UseShortCut23)
	$_UseShortCut24 = GUICtrlRead($UseShortCut24)
	$_UseShortCut25 = GUICtrlRead($UseShortCut25)
	
	If $SilentRunCheck="1" Then 
		GUISetState(@SW_HIDE)
		Start()
	ElseIf $SilentRunCheck="0" Then
		GUISetState(@SW_SHOW)
	Else 
		IniWrite($file, "GeneralSettings", "SilentRun", "0")
		GUISetState(@SW_SHOW)
	EndIf
EndFunc
sniperzik is offline  
Thanks
1 User
Old 11/06/2010, 14:25   #4
 
sniperzik's Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jan 2008
Posts: 32
Received Thanks: 28
Updated to ** v1.2 **
sniperzik is offline  
Old 11/06/2010, 17:04   #5


 
FifaPoint's Avatar
 
elite*gold: 1029
The Black Market: 163/0/0
Join Date: Mar 2008
Posts: 2,177
Received Thanks: 373
So, say us why we should start with your ribot Launcher? I cant see reason for it. sorry
FifaPoint is offline  
Old 11/06/2010, 18:36   #6
 
sniperzik's Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jan 2008
Posts: 32
Received Thanks: 28
I created it for my needs to run many ribots with shortcut and check auto relog box, because if you put shortcut links in startup folder then when runs all bots half of them crashing. I didn't want to install some delayer so i created launcher and just posted here if someone need this too.
sniperzik is offline  
Old 11/06/2010, 22:38   #7
 
Nova1337's Avatar
 
elite*gold: 0
The Black Market: 10/0/0
Join Date: Feb 2008
Posts: 2,303
Received Thanks: 858
So mainly lets say i create 20 shortcuts and then its enough too double click the link ant it will launch bot+connect+enter id/pw+auto relog and start bot? Or only it launches?
Nova1337 is offline  
Old 11/07/2010, 09:58   #8
 
elite*gold: 0
The Black Market: 1/0/0
Join Date: Nov 2008
Posts: 429
Received Thanks: 78
this is the worst and longest AutoIt code I've ever seen.
Esamu is offline  
Old 11/07/2010, 13:58   #9
 
theoneofgod's Avatar
 
elite*gold: 20
The Black Market: 0/0/0
Join Date: Mar 2008
Posts: 3,940
Received Thanks: 2,198
Your code could be much much shorter, and much easier to work with than copying everything 30 times. Use arrays.
theoneofgod is offline  
Old 11/08/2010, 16:07   #10
 
markram987's Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Oct 2010
Posts: 84
Received Thanks: 3
it dont launch ribot shortcuts for me...my OS is window xp ..
markram987 is offline  
Old 11/17/2010, 19:36   #11
 
elite*gold: 130
The Black Market: 1/0/0
Join Date: Mar 2008
Posts: 2,485
Received Thanks: 934
Quote:
Originally Posted by RsX3 View Post
So mainly lets say i create 20 shortcuts and then its enough too double click the link ant it will launch bot+connect+enter id/pw+auto relog and start bot? Or only it launches?

If it would be the way that you say....I'd love it honestly. If I had a tool which I would doubleclick and it would do everything for me.. I want a tool like this for csro ;p
intercsaki is offline  
Reply

Tags
rsro ribot launcher

« an IBot Tweak! [How to get auto relogin!] | [Tool] nTool - The advanced Silkroad helper »

Similar Threads Similar Threads
Help me with rSro bot. (riBot)
08/22/2010 - Silkroad Online - 6 Replies
http://img227.imageshack.us/img227/1918/bepavadini mow.png This is the problem. It says : You have been disconnected from the server. (I get this problem when I trying to log in with the bot) Please Help. :)
[Rsro] Need Help in RiBot
07/13/2010 - Silkroad Online - 3 Replies
hi all i have a problem with the bot and it is the returning to the town i use the script of the Demon horse . so it work when i add kill at its end but it don't return i should return it manual So i worked on it and searched all say don't loot the hp , mp , bolts , arrows...etc . i tried to make it easy so i took some pics this is for the loop configuration :
ribot for rsro v 1.016
07/05/2010 - Silkroad Online - 12 Replies
Does anyone know a bot for rsro 1016?
[RSRO] need help with RIBOT
06/07/2010 - Silkroad Online - 12 Replies
how i can run it with vista?? just...cant install the regOCXFiles i givs this error : http://up197.siz.co.il/up1/dtnm3mylihuy.jpg help plz ^^
Rsro Ribot
04/03/2010 - Silkroad Online - 6 Replies
Anyone know why ribot get alot less updated then ibot and i know rsro is alot smaller but both of them work with the same commands and scripts :\



All times are GMT +2. The time now is 12:53.

elitepvpers - play less, get more - Top

Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2024 elitepvpers All Rights Reserved.