[RSRO] Ribot Launcher

09/25/2010 17:34 sniperzik#1
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: [Only registered and activated users can see links. Click Here To Register...]
Download Ribot Launcher: [Only registered and activated users can see links. Click Here To Register...]

Screenshot: [Only registered and activated users can see links. Click Here To Register...]


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)
10/02/2010 17:22 micron#2
its not workable to me..doesnt launch ribot shortcut(clientless).. maybe its a account hack.. plss someone can report this?..
10/09/2010 20:10 sniperzik#3
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][Only registered and activated users can see links. Click Here To Register...][/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
11/06/2010 14:25 sniperzik#4
Updated to ** v1.2 **
11/06/2010 17:04 FifaPoint#5
So, say us why we should start with your ribot Launcher? I cant see reason for it. sorry
11/06/2010 18:36 sniperzik#6
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.
11/06/2010 22:38 Nova1337#7
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?
11/07/2010 09:58 Esamu#8
this is the worst and longest AutoIt code I've ever seen.
11/07/2010 13:58 theoneofgod#9
Your code could be much much shorter, and much easier to work with than copying everything 30 times. Use arrays.
11/08/2010 16:07 markram987#10
it dont launch ribot shortcuts for me...my OS is window xp ..
11/17/2010 19:36 intercsaki#11
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