1 (изменено: alex16uk, 2022-05-13 12:53:03)

Тема: AHK: Не могу подгрузить информация в биндере

Я не понимаю почему бинды работают только тогда когда открыто меню с редактированием биндов. Мне нужно что бы работали бинды всегда
Я пытался подгрузить но у меня не получилось.

2

Re: AHK: Не могу подгрузить информация в биндере

#UseHook
#SingleInstance, Force
#NoEnv
#MaxHotkeysPerInterval 99000000
#HotkeyInterval 99000000
#KeyHistory 0

SetKeyDelay
SetWorkingDir %A_ScriptDir%
SplashTextoff
ListLines Off
Process, Priority, ahk_exe , H

full_command_line := DllCall("GetCommandLine", "str")
if not (A_IsAdmin or RegExMatch(full_command_line, " /restart(?!\S)"))	{
	try	{
		if A_IsCompiled
			Run *RunAs "%A_ScriptFullPath%" /restart
		else
			Run *RunAs "%A_AhkPath%" /restart "%A_ScriptFullPath%"
	}
	ExitApp
}



;======================================================================================================================Скачка файлов

IfnotExist, %A_ScriptDir%\Profiles
{
FileCreateDir, %A_ScriptDir%\Profiles
}



Gui, 2: Color, 1e2124, 
Gui, 2: Add, Button, x402 y100 w150 h30 gBind, Бинды
Gui, 2: Show, w577 h450, Binder
return


Bind:
Gui, 2: Destroy
Gui, -MaximizeBox
Gui, Show, w580 h414, Бинды
Gui, Color, c4c4c4
Gui, Font, c0x000000
mediaDir = %A_WinDir%\Media
chatwait := 0

NumMenu := 0
Gui, -SysMenu
Gui, Add, Text, x19 y36 w70 h20 +BackgroundTrans,Клавиша
Gui, Add, Text, x106 y36 w90 h20 +BackgroundTrans,Кол-во строк
Gui, Add, Text, x246 y36 w100 h20 +BackgroundTrans,Название бинда
Gui, Add, Text, x434 y36 w108 h20 +BackgroundTrans,Настройка хоткея
Gui, Add, GroupBox, x12 y24 w556 h30 cA52A2A,
loop, 1
{
	Gui, Font , norm,
	yPos := 70
	loop, 10
	{
		NumMenu++
		Gui, Add, Hotkey, x12 y%yPos% w66 h20 vHot%NumMenu%,
		Gui, Add, Edit, Center x100 y%yPos% w80 h20 cblack Number vString%NumMenu%,
		Gui, Add, Edit, Center x202 y%yPos% w180 h20 Limit30 cblack vBindName%NumMenu%,
		Gui, Add, Button, x404 y%yPos% w164 h20 gSettingBind%NumMenu%, Настройки
		yPos := yPos + 31
	}
}

Gui, Add, GroupBox, x0 y370 w260 h43 cA52A2A , Активный профиль
Gui, Add, DropDownList, x12 y386 w130 vDrop gLoad,
Gui, Add, Button, x146 y386 w100 h20 gCreateProfil, Создать новый
Gui, Add, Button, x404 y386 w164 h20 vSave gSave, Сохранить
Loop, %A_WorkingDir%\Profiles\*profile, , 1
{
	NameProfile=%A_LoopFileName%
	StringReplace, NameProfile, NameProfile, .profile,, all
	GuiControl,, Drop, %NameProfile%
}
IniRead, Profil, %A_WorkingDir%\Profiles\Settings, Main, Profile, %A_Space%
StringReplace, Profil, Profil, .profile,, all
GuiControl, ChooseString, Drop, %Profil%
Goto, Load
return

;===================================================================================

Load:
GuiControlGet, Drop
if Drop=
{
	GuiControl, Choose, Drop, 1
	GuiControlGet, Drop
	Goto, LoadProfile
}
else
{
	Goto, LoadProfile
}
return

;===================================================================================

Save:
Gui, Submit, NoHide
Goto, SaveProfile
return

;===================================================================================

LoadProfile:
loop, 11
Hotkey, % Hot%A_Index%, Off, UseErrorLevel

Index=0
pr=0
loop, 11
{
	pr++
	Hot%pr%=
	String%pr%=
	Index++
	loop, 11
	{
		%Index%Bind%A_Index%=
		%Index%BindName%A_Index%=
		%Index%EnterOn%A_Index%=0
		%Index%ShiftOn%A_Index%=0
		%Index%ScreenOn%A_Index%=0
		%Index%TimerOn%A_Index%=0
		%Index%Delay%A_Index%=
	}
}

Index=0
loop, 11
{
	Index++
	loop, 11
	{
		%Index%LoadBind%A_Index%=
		%Index%LoadBindName%A_Index%=
		%Index%LoadEnterOn%A_Index%=
		%Index%LoadShiftOn%A_Index%=
		%Index%LoadScreenOn%A_Index%=
		%Index%LoadTimerOn%A_Index%=
		%Index%LoadDelay%A_Index%=
	}
}

loop, 11
{
	IniRead, LoadHot%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, Key, HotKey%A_Index%, %A_Space%
	IniRead, LoadString%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, Key, NumberString%A_Index%, %A_Space%
	IniRead, LoadBindName%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, Key, BindName%A_Index%, %A_Space%
	GuiControl,, Hot%A_Index%, % LoadHot%A_Index%
	GuiControl,, String%A_Index%, % LoadString%A_Index%
	GuiControl,, BindName%A_Index%, % LoadBindName%A_Index%
	
}
Gosub, Settingbind11
Gui, 8:Destroy

Index=0
loop, 11
{
	Index++
	Loop, % String%A_Index%
	{
		Gui, 8:Default
		IniRead, %Index%LoadBind%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberBind%A_Index%, %A_Space%
		IniRead, %Index%LoadEnterOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberEnter%A_Index%, %A_Space%
		IniRead, %Index%LoadShiftOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberShift%A_Index%, %A_Space%
		IniRead, %Index%LoadScreenOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberScreen%A_Index%, %A_Space%
		IniRead, %Index%LoadTimerOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberTimer%A_Index%, %A_Space%
		IniRead, %Index%LoadDelay%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberDelay%A_Index%, %A_Space%
	}
}
IniWrite, %Drop%.profile, %A_WorkingDir%\Profiles\Settings, Main, Profile
Gosub, BinderActive
return

;===================================================================================

SaveProfile:
num:=0
SoundPlay, %A_ScriptDir%\res\WaitComplite.wav
loop, 11
{
	num++
	loop, % LoadString%num%
	{
		%num%Bind%A_Index%= % %num%LoadBind%A_Index%
		%num%EnterOn%A_Index%= % %num%LoadEnterOn%A_Index%
		%num%ShiftOn%A_Index%= % %num%LoadShiftOn%A_Index%
		%num%ScreenOn%A_Index%= % %num%LoadScreenOn%A_Index%
		%num%TimerOn%A_Index%= % %num%LoadTimerOn%A_Index%
		%num%Delay%A_Index%= % %num%LoadDelay%A_Index%
	}
}
loop, 11
{
	IniWrite, % Hot%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile , Key, HotKey%A_Index%
	IniWrite, % String%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile , Key, NumberString%A_Index%
	IniWrite, % BindName%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile , Key, BindName%A_Index%
}

Index=0
loop, 11
{
	Index++
	loop % String%A_Index%
	{
		IniWrite, % %Index%Bind%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberBind%A_Index%
		IniWrite, % %Index%EnterOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberEnter%A_Index%
		IniWrite, % %Index%ShiftOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberShift%A_Index%
		IniWrite, % %Index%ScreenOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberScreen%A_Index%
		IniWrite, % %Index%TimerOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberTimer%A_Index%
		IniWrite, % %Index%Delay%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberDelay%A_Index%
	}
}
reload
return

;===================================================================================

SettingBind1:

Gui, Submit, NoHide
if String1<1
{
	Tooltip, Ошибка! Вы не ввели количество строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip1, -5000
    return
    RemoveToolTip1:
    ToolTip
    return
}
else if String1>30
{
	Tooltip, Ошибка! Нельзя создавать больше 30 строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip11, -5000
    return
    RemoveToolTip11:
    ToolTip
    return
}

yPos := 30
yDelay := 60
NumMenu1 := 0
Gui, 8:Destroy
Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen


loop, %String1%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number  v1Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v1Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v1EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v1ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v1ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, center h%yPos% w770, Настройки %BindName1%
Gui, 8:Color, 1e2124
loop %String1%
{
	Gui, 8:Default
	GuiControl,, 1Bind%A_Index%, % 1LoadBind%A_Index%
	GuiControl,, 1EnterOn%A_Index%, % 1LoadEnterOn%A_Index%
	GuiControl,, 1ShiftOn%A_Index%, % 1LoadShiftOn%A_Index%
	GuiControl,, 1ScreenOn%A_Index%, % 1LoadScreenOn%A_Index%
	GuiControl,, 1TimerOn%A_Index%, % 1LoadTimerOn%A_Index%
	GuiControl,, 1Delay%A_Index%, % 1LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

SettingBind2:

Gui, Submit, NoHide
if String2<1
{
	Tooltip, Ошибка! Вы не ввели количество строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip2, -5000
    return
    RemoveToolTip2:
    ToolTip
    return
}
else if String2>30
{
	Tooltip, Ошибка! Нельзя создавать больше 30 строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip22, -5000
    return
    RemoveToolTip22:
    ToolTip
    return
}

yPos := 30
yDelay := 60
NumMenu1 := 0

Gui, 8:Destroy

Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen

loop, %String2%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number v2Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v2Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v2EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v2ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v2ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, center h%yPos% w770, Настройки %BindName2%
Gui, 8:Color, 1e2124
loop %String2%
{
	Gui, 8:Default
	GuiControl,, 2Bind%A_Index%, % 2LoadBind%A_Index%
	GuiControl,, 2EnterOn%A_Index%, % 2LoadEnterOn%A_Index%
	GuiControl,, 2ShiftOn%A_Index%, % 2LoadShiftOn%A_Index%
	GuiControl,, 2ScreenOn%A_Index%, % 2LoadScreenOn%A_Index%
	GuiControl,, 2Delay%A_Index%, % 2LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

SettingBind3:

Gui, Submit, NoHide
if String3<1
{
	Tooltip, Ошибка! Вы не ввели количество строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip3, -5000
    return
    RemoveToolTip3:
    ToolTip
    return
}
else if String3>30
{
	Tooltip, Ошибка! Нельзя создавать больше 30 строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip33, -5000
    return
    RemoveToolTip33:
    ToolTip
    return
}


yPos := 30
yDelay := 60
NumMenu1 := 0

Gui, 8:Destroy

Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen
loop, %String3%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number v3Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v3Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v3EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v3ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v3ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, center h%yPos% w770, Настройки %BindName3%
Gui, 8:Color, 1e2124
loop %String3%
{
	Gui, 8:Default
	GuiControl,, 3Bind%A_Index%, % 3LoadBind%A_Index%
	GuiControl,, 3EnterOn%A_Index%, % 3LoadEnterOn%A_Index%
	GuiControl,, 3ShiftOn%A_Index%, % 3LoadShiftOn%A_Index%
	GuiControl,, 3ScreenOn%A_Index%, % 3LoadScreenOn%A_Index%
	GuiControl,, 3Delay%A_Index%, % 3LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

SettingBind4:

Gui, Submit, NoHide
if String4<1
{
	Tooltip, Ошибка! Вы не ввели количество строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip4, -5000
    return
    RemoveToolTip4:
    ToolTip
    return
}
else if String4>30
{
	Tooltip, Ошибка! Нельзя создавать больше 30 строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip44, -5000
    return
    RemoveToolTip44:
    ToolTip
    return
}


yPos := 30
yDelay := 60
NumMenu1 := 0

Gui, 8:Destroy

Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen

loop, %String4%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number v4Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v4Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v4EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v4ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v4ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, center h%yPos% w770, Настройки %BindName4%
Gui, 8:Color, 1e2124
loop %String4%
{
	Gui, 8:Default
	GuiControl,, 4Bind%A_Index%, % 4LoadBind%A_Index%
	GuiControl,, 4EnterOn%A_Index%, % 4LoadEnterOn%A_Index%
	GuiControl,, 4ShiftOn%A_Index%, % 4LoadShiftOn%A_Index%
	GuiControl,, 4ScreenOn%A_Index%, % 4LoadScreenOn%A_Index%
	GuiControl,, 4Delay%A_Index%, % 4LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

SettingBind5:
Gui, Submit, NoHide
if String5<1
{
	Tooltip, Ошибка! Вы не ввели количество строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip5, -5000
    return
    RemoveToolTip5:
    ToolTip
    return
}
else if String5>30
{
	Tooltip, Ошибка! Нельзя создавать больше 30 строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip55, -5000
    return
    RemoveToolTip55:
    ToolTip
    return
}

yPos := 30
yDelay := 60
NumMenu1 := 0

Gui, 8:Destroy

Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen
loop, %String5%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number v5Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v5Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v5EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v5ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v5ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, center h%yPos% w770, Настройки %BindName5%
Gui, 8:Color, 1e2124
loop %String5%
{
	Gui, 8:Default
	GuiControl,, 5Bind%A_Index%, % 5LoadBind%A_Index%
	GuiControl,, 5EnterOn%A_Index%, % 5LoadEnterOn%A_Index%
	GuiControl,, 5ShiftOn%A_Index%, % 5LoadShiftOn%A_Index%
	GuiControl,, 5ScreenOn%A_Index%, % 5LoadScreenOn%A_Index%
	GuiControl,, 5Delay%A_Index%, % 5LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

SettingBind6:
Gui, Submit, NoHide
if String6<1
{
	Tooltip, Ошибка! Вы не ввели количество строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip6, -5000
    return
    RemoveToolTip6:
    ToolTip
    return
}
else if String6>30
{
	Tooltip, Ошибка! Нельзя создавать больше 30 строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip66, -5000
    return
    RemoveToolTip66:
    ToolTip
    return
}

yPos := 30
yDelay := 60
NumMenu1 := 0
Gui, 8:Destroy

Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen
loop, %String6%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number v6Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v6Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v6EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v6ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v6ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, center h%yPos% w770, Настройки %BindName6%
Gui, 8:Color, 1e2124
loop %String6%
{
	Gui, 8:Default
	GuiControl,, 6Bind%A_Index%, % 6LoadBind%A_Index%
	GuiControl,, 6EnterOn%A_Index%, % 6LoadEnterOn%A_Index%
	GuiControl,, 6ShiftOn%A_Index%, % 6LoadShiftOn%A_Index%
	GuiControl,, 6ScreenOn%A_Index%, % 6LoadScreenOn%A_Index%
	GuiControl,, 6Delay%A_Index%, % 6LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

SettingBind7:
Gui, Submit, NoHide
if String7<1
{
	Tooltip, Ошибка! Вы не ввели количество строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip7, -5000
    return
    RemoveToolTip7:
    ToolTip
    return
}
else if String7>30
{
	Tooltip, Ошибка! Нельзя создавать больше 30 строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip77, -5000
    return
    RemoveToolTip77:
    ToolTip
    return
}

yPos := 30
yDelay := 60
NumMenu1 := 0
Gui, 8:Destroy


Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen
loop, %String7%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number v7Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v7Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v7EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v7ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v7ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, center h%yPos% w770, Настройки %BindName7%
Gui, 8:Color, 1e2124
loop %String7%
{
	Gui, 8:Default
	GuiControl,, 7Bind%A_Index%, % 7LoadBind%A_Index%
	GuiControl,, 7EnterOn%A_Index%, % 7LoadEnterOn%A_Index%
	GuiControl,, 7ShiftOn%A_Index%, % 7LoadShiftOn%A_Index%
	GuiControl,, 7ScreenOn%A_Index%, % 7LoadScreenOn%A_Index%
	GuiControl,, 7Delay%A_Index%, % 7LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

SettingBind8:
Gui, Submit, NoHide
if String8<1
{
	Tooltip, Ошибка! Вы не ввели количество строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip8, -5000
    return
    RemoveToolTip8:
    ToolTip
    return
}
else if String8>30
{
	Tooltip, Ошибка! Нельзя создавать больше 30 строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip88, -5000
    return
    RemoveToolTip88:
    ToolTip
    return
}

yPos := 30
yDelay := 60
NumMenu1 := 0
Gui, 8:Destroy


Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen
loop, %String8%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number v8Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v8Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v8EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v8ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v8ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, center h%yPos% w770, Настройки %BindName8%
Gui, 8:Color, 1e2124
loop %String8%
{
	Gui, 8:Default
	GuiControl,, 8Bind%A_Index%, % 8LoadBind%A_Index%
	GuiControl,, 8EnterOn%A_Index%, % 8LoadEnterOn%A_Index%
	GuiControl,, 8ShiftOn%A_Index%, % 8LoadShiftOn%A_Index%
	GuiControl,, 8ScreenOn%A_Index%, % 8LoadScreenOn%A_Index%
	GuiControl,, 8Delay%A_Index%, % 8LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

SettingBind9:
Gui, Submit, NoHide
if String9<1
{
	Tooltip, Ошибка! Вы не ввели количество строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip9, -5000
    return
    RemoveToolTip9:
    ToolTip
    return
}
else if String9>30
{
	Tooltip, Ошибка! Нельзя создавать больше 30 строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip99, -5000
    return
    RemoveToolTip99:
    ToolTip
    return
}

yPos := 30
yDelay := 60
NumMenu1 := 0
Gui, 8:Destroy


Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen
loop, %String9%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number v9Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v9Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v9EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v9ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v9ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, center h%yPos% w770, Настройки %BindName9%
Gui, 8:Color, 1e2124
loop %String9%
{
	Gui, 8:Default
	GuiControl,, 9Bind%A_Index%, % 9LoadBind%A_Index%
	GuiControl,, 9EnterOn%A_Index%, % 9LoadEnterOn%A_Index%
	GuiControl,, 9ShiftOn%A_Index%, % 9LoadShiftOn%A_Index%
	GuiControl,, 9ScreenOn%A_Index%, % 9LoadScreenOn%A_Index%
	GuiControl,, 9Delay%A_Index%, % 9LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

SettingBind10:
Gui, Submit, NoHide
if String10<1
{
	Tooltip, Ошибка! Вы не ввели количество строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip10, -5000
    return
    RemoveToolTip10:
    ToolTip
    return
}
else if String10>30
{
	Tooltip, Ошибка! Нельзя создавать больше 30 строк!, 180, 222
	soundbeep
	SetTimer, RemoveToolTip101, -5000
    return
    RemoveToolTip101:
    ToolTip
    return
}

yPos := 30
yDelay := 60
NumMenu1 := 0
Gui, 8:Destroy


Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen
loop, %String10%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number v10Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v10Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v10EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v10ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v10ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, center h%yPos% w770, Настройки %BindName10%
Gui, 8:Color, 1e2124
loop %String10%
{
	Gui, 8:Default
	GuiControl,, 10Bind%A_Index%, % 10LoadBind%A_Index%
	GuiControl,, 10EnterOn%A_Index%, % 10LoadEnterOn%A_Index%
	GuiControl,, 10ShiftOn%A_Index%, % 10LoadShiftOn%A_Index%
	GuiControl,, 10ScreenOn%A_Index%, % 10LoadScreenOn%A_Index%
	GuiControl,, 10Delay%A_Index%, % 10LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

SettingBind11:
Gui, Submit, NoHide
;if String11<1
;{
	;TrayTip, Ошибка!, Вы не ввели количество строк!, 5, 3
;	return
;}
;else if String11>30
;{
;	TrayTip, Ошибка!, Нельзя создавать больше 30 строк! Угомонись писатель!, 5, 3
;	return
;}


yPos := 30
yDelay := 60
NumMenu1 := 0
Gui, 8:Destroy

Gui, 8:Add, Text, x15 y10 w280 h20 cwhite , Бинд (строка с текстом или командой)
Gui, 8:Add, Text, x528 y10 w120 h20 cwhite, Задержка (мс)
Gui, 8:Add, Text, x624 y10 w40 h20 cwhite, Enter
Gui, 8:Add, Text, x672 y10 w40 h20 cwhite, RShift
Gui, 8:Add, Text, x720 y10 w40 h20 cwhite, Screen

loop, %String11%
{
	NumMenu1++
	Gui, 8:Font, norm,
	Gui, 8:Add, Edit, Center x520 y%yPos% w90 h20 +Number v11Delay%NumMenu1%,
	Gui, 8:Add, Edit, x15 y%yPos% w490 h20 v11Bind%NumMenu1%,
	Gui, 8:Add, CheckBox, x630 y%yPos% w20 h20 v11EnterOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x680 y%yPos% w20 h20 v11ShiftOn%NumMenu1%,
	Gui, 8:Add, CheckBox, x730 y%yPos% w20 h20 v11ScreenOn%NumMenu1%,
	yPos := yPos + 30
}
Gui, 8:add, button, y%yPos% x15 gPrimenit, Применить
yPos+=30
Gui, 8:Show, x1000000 h0 w0, Настройки
Gui, 8:Color, 1e2124
loop %String11%
{
	Gui, 8:Default
	GuiControl,, 11Bind%A_Index%, % 11LoadBind%A_Index%
	GuiControl,, 11EnterOn%A_Index%, % 11LoadEnterOn%A_Index%
	GuiControl,, 11ShiftOn%A_Index%, % 11LoadShiftOn%A_Index%
	GuiControl,, 11ScreenOn%A_Index%, % 11LoadScreenOn%A_Index%
	GuiControl,, 11Delay%A_Index%, % 11LoadDelay%A_Index%
}
Gosub, BinderActive
return

;===================================================================================

Primenit:
SoundPlay, %A_ScriptDir%\res\WaitComplite.wav
Gui, Submit
Index=0
loop, 11
{
	Index++
	loop, 11
	{
		%Index%LoadBind%A_Index%=
		%Index%LoadEnterOn%A_Index%=
		%Index%LoadShiftOn%A_Index%=
		%Index%LoadScreenOn%A_Index%=
		%Index%LoadTimerOn%A_Index%=
		%Index%LoadDelay%A_Index%=
	}
}

num:=0
loop, 11
{
	num++
	loop % String%num%
	{
		%num%LoadBind%A_Index%=% %num%Bind%A_Index%
		%num%LoadEnterOn%A_Index%=% %num%EnterOn%A_Index%
		%num%LoadShiftOn%A_Index%=% %num%ShiftOn%A_Index%
		%num%LoadScreenOn%A_Index%=% %num%ScreenOn%A_Index%
		%num%LoadTimerOn%A_Index%=% %num%TimerOn%A_Index%
		%num%LoadDelay%A_Index%=% %num%Delay%A_Index%
	}
}

num:=0
loop, 11
{
	num++
	loop, % LoadString%num%
	{
		%num%Bind%A_Index%= % %num%LoadBind%A_Index%
		%num%EnterOn%A_Index%= % %num%LoadEnterOn%A_Index%
		%num%ShiftOn%A_Index%= % %num%LoadShiftOn%A_Index%
		%num%ScreenOn%A_Index%= % %num%LoadScreenOn%A_Index%
		%num%TimerOn%A_Index%= % %num%LoadTimerOn%A_Index%
		%num%Delay%A_Index%= % %num%LoadDelay%A_Index%
	}
}
loop, 11
{
	IniWrite, % Hot%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile , Key, HotKey%A_Index%
	IniWrite, % String%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile , Key, NumberString%A_Index%
	IniWrite, % BindName%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile , Key, BindName%A_Index%
}

Index=0
loop, 11
{
	Index++
	loop % String%A_Index%
	{
		IniWrite, % %Index%Bind%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberBind%A_Index%
		IniWrite, % %Index%EnterOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberEnter%A_Index%
		IniWrite, % %Index%ShiftOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberShift%A_Index%
		IniWrite, % %Index%ScreenOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberScreen%A_Index%
		IniWrite, % %Index%TimerOn%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberTimer%A_Index%
		IniWrite, % %Index%Delay%A_Index%, %A_WorkingDir%\Profiles\%Drop%.profile, SettingBind№%Index%, NumberDelay%A_Index%
	}
}
return

;===================================================================================

BinderActive:
num:=0
loop, 11
{
	num++
	loop, % LoadString%num%
	{
		%num%Bind%A_Index%= % %num%LoadBind%A_Index%
		%num%EnterOn%A_Index%= % %num%LoadEnterOn%A_Index%
		%num%ShiftOn%A_Index%= % %num%LoadShiftOn%A_Index%
		%num%ScreenOn%A_Index%= % %num%LoadScreenOn%A_Index%
		%num%TimerOn%A_Index%= % %num%LoadTimerOn%A_Index%
		%num%Delay%A_Index%= % %num%LoadDelay%A_Index%
	}
}
loop, 11
	Hotkey, % Hot%A_Index%, Off, UseErrorLevel
	Gui, Submit, NoHide

loop, 11
	Hotkey, % Hot%A_Index%, Activ%A_Index%, On, UseErrorLevel
	
return

;===================================================================================

Activ1:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String1%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 1Bind%A_Index%
			
		if 1EnterOn%A_Index% > 0
			Sendinput, % "{enter}"
		if 1ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 1ScreenOn%A_Index% > 0
		{
			sleep, 600			
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName1% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
		sleep % 1Delay%A_Index%

}
hotkeyinprogress := false
return

;===================================================================================

Activ2:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String2%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 2Bind%A_Index%
		if 2EnterOn%A_Index% > 0
Sendinput, % "{enter}"
		if 2ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 2ScreenOn%A_Index% > 0
		{
			sleep, 600
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName2% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
			sleep % 2Delay%A_Index%
}
hotkeyinprogress := false
return

;===================================================================================

Activ3:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String3%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 3Bind%A_Index%
		if 3EnterOn%A_Index% > 0
			Sendinput, % "{enter}"
		if 3ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 3ScreenOn%A_Index% > 0
		{
			sleep, 600				
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName3% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
			sleep % 3Delay%A_Index%
}
hotkeyinprogress := false
return

;===================================================================================

Activ4:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String4%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 4Bind%A_Index%
		if 4EnterOn%A_Index% > 0
			Sendinput, % "{enter}"
		if 4ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 4ScreenOn%A_Index% > 0
		{
			sleep, 600				
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName4% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
			sleep % 4Delay%A_Index%
}
hotkeyinprogress := false
return

;===================================================================================

Activ5:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String5%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 5Bind%A_Index%
		if 5EnterOn%A_Index% > 0
			Sendinput, % "{enter}"
		if 5ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 5ScreenOn%A_Index% > 0
		{
			sleep, 600				
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName5% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
			sleep % 5Delay%A_Index%
}
hotkeyinprogress := false
return

;===================================================================================

Activ6:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String6%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 6Bind%A_Index%
		if 6EnterOn%A_Index% > 0
			Sendinput, % "{enter}"
		if 6ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 6ScreenOn%A_Index% > 0
		{
			sleep, 600				
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName6% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
			sleep % 6Delay%A_Index%
}
hotkeyinprogress := false
return

;===================================================================================

Activ7:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String7%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 7Bind%A_Index%
		if 7EnterOn%A_Index% > 0
			Sendinput, % "{enter}"
		if 7ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 7ScreenOn%A_Index% > 0
		{
			sleep, 600				
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName7% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
			sleep % 7Delay%A_Index%
}
hotkeyinprogress := false
return

;===================================================================================

Activ8:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String8%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 8Bind%A_Index%
		if 8EnterOn%A_Index% > 0
			Sendinput, % "{enter}"
		if 8ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 8ScreenOn%A_Index% > 0
		{
			sleep, 600				
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName8% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
			sleep % 8Delay%A_Index%
}
hotkeyinprogress := false
return

;===================================================================================

Activ9:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String9%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 9Bind%A_Index%
		if 9EnterOn%A_Index% > 0
			Sendinput, % "{enter}"
		if 9ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 9ScreenOn%A_Index% > 0
		{
			sleep, 600
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName9% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
			sleep % 9Delay%A_Index%
}
hotkeyinprogress := false
return

;===================================================================================

Activ10:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String10%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 10Bind%A_Index%
		if 10EnterOn%A_Index% > 0
			Sendinput, % "{enter}"
		if 10ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 10ScreenOn%A_Index% > 0
		{
			sleep, 600
				
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName10% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
			sleep % 10Delay%A_Index%
}
hotkeyinprogress := false
return

;===================================================================================

Activ11:
if (hotkeyinprogress)	{
	;SoundBeep, 200, 200
	return
}
hotkeyinprogress := true
loop, %String11%
{
		SendMessage, 0x50,, 0x4190419,, A
		SendInput, % "{T}"
		Sleep, %chatwait%
		SendInput, % "{Text}" 11Bind%A_Index%
			
		if 11EnterOn%A_Index% > 0
		Sendinput, % "{enter}"
		if 11ShiftOn%A_Index% > 0
		{
			SendMessage, 0x50,, 0x4190419,, A
			SoundPlay, %A_WorkingDir%\Res\Wait.mp3
			Gui, wait:Destroy
			Gui, wait:+LastFound +AlwaysOnTop -Caption +ToolWindow +E0x20
			Gui, wait:Color, cRed
			Gui, wait:Font, s30 cRed, Verdana
			Gui, wait:Add, Text, , Нажмите правый Shift
			WinSet, TransColor, cRed
			Gui, wait:Show, center NoActivate
			KeyWait, RShift, D
			KeyWait, RShift
			Gui, wait:Destroy
			;SoundPlay, %A_WorkingDir%\Res\WaitComplite.mp3
		}
		if 11ScreenOn%A_Index% > 0
		{
			sleep, 600
				
			Run, "%A_WorkingDir%\Res\i_view32.exe" /capture=3 /convert=%A_WorkingDir%\Screenshots\%BindName11% $U(`%Y-`%m-`%d)\$U(`%H-`%M-`%S).jpg
			SoundPlay, %A_WorkingDir%\Res\camera.mp3
		}
			sleep % 11Delay%A_Index%
}
hotkeyinprogress := false
return

;===================================================================================

CreateProfil:
Gui, 3:Destroy
Gui, 3:Add, GroupBox, x6 y10 w230 h80 cA52A2A, Создание профиля
Gui, 3:Add, Text, x16 y30 w80 h20 cwhite, Имя профиля:
Gui, 3:Add, Edit, x96 y30 w130 h20 vNewNameProfil,
Gui, 3:Add, Button, x96 y60 w60 h20 gCreate, Создать
Gui, 3:Add, Button, x166 y60 w60 h20 gClose, Отмена
Gui, 3:Show, center h98 w243, Создать профиль
Gui, 3:Color, 1e2124
return

;===================================================================================

Create:
GuiControlGet, NewNameProfil
if NewNameProfil=
{
	CoordMode, ToolTip, Relative
	Tooltip, Ошибка! Вы не ввели Имя профиля., 16, 56
	soundbeep
	SetTimer, RemoveToolTip_1, -2000
	return
	RemoveToolTip_1:
	ToolTip
	Return
}

IfExist, %A_WorkingDir%\Profiles\%NewNameProfil%.profile
	
{
	MsgBox, 52, Внимание , Профиль %NewNameProfil% уже существует!`nСтарый профиль будет удален.`n`nВы уверены что хотите сделать это?,
	IfMsgBox, No
		return
	IfMsgBox, Yes
		FileDelete, %A_WorkingDir%\Profiles\%NewNameProfil%.profile
	fileCreateDir, %A_WorkingDir%\Profiles
	IniWrite, new, %A_WorkingDir%\Profiles\%NewNameProfil%.profile, Key, HotKey1
	MsgBox,64, Перезапись профиля, Профиль %NewNameProfil% успешно перезаписан!`nСейчас биндер будет перезапущен.
	IniWrite, %NewNameProfil%.profile, %A_WorkingDir%\Profiles\Settings, Main, Profile
	Sleep 400
	reload
}

else
	
{
	ifnotexist, %A_WorkingDir%\Profiles
	fileCreateDir, %A_WorkingDir%\Profiles
	IniWrite, new, %A_WorkingDir%\Profiles\%NewNameProfil%.profile, Key, HotKey1
	MsgBox, 64, Создание профиля, Профиль %NewNameProfil% успешно создан!`nСейчас биндер будет перезапущен.
	IniWrite, %NewNameProfil%.profile, %A_WorkingDir%\Profiles\Settings, Main, Profile
	Sleep 400
	reload
}




!R::Reload ; Перезапустить скрипт, бинд: Alt+R

3

Re: AHK: Не могу подгрузить информация в биндере

Вряд ли кто-то захочет разбираться с кодом в полторы тысячи строк (во всяком случае бесплатно). Попробуйте создать короткий код, демонстрирующий проблему, либо создайте тему в Коммерческом разделе и назначьте цену.

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder