SCRIPTS.ahk

; <COMPILER: v1.1.32.00>
#NoEnv
#SingleInstance, Force
SetBatchLines, -1
#NoTrayIcon
IniRead, CMD, %A_ScriptDir%\SCRIPTS.ini, CMD
IniRead, AHK, %A_ScriptDir%\SCRIPTS.ini, AHK
IniRead, VBS, %A_ScriptDir%\SCRIPTS.ini, VBS
IniRead, BATCH, %A_ScriptDir%\SCRIPTS.ini, BATCH
IniRead, HTML, %A_ScriptDir%\SCRIPTS.ini, HTML
IniRead, HELP, %A_ScriptDir%\SCRIPTS.ini, HELP
IniRead, URLS, %A_ScriptDir%\SCRIPTS.ini, URLS

PATH=
(Ltrim Join|
SELECT PATH TO SAVE FILE|
C:\Users\%A_USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\
%A_ScriptDir%\
%A_WorkingDir%\
%A_Desktop%\
%A_Temp%\
%A_WinDir%\
%A_ProgramFiles%\
%A_AppData%\
%A_MyDocuments%\
C:\
D:\
E:\
F:\
G:\
)
;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Gui +LastFound +AlwaysOnTop -Caption +ToolWindow +Border
;Gui -Caption +ToolWindow +Resize
CustomColor = 884488
Gui, Color, %CustomColor%
Gui,Font,S14 Bold,Verdana
;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
;Gui +ToolWindow +Resize
;Gui Margin, 0, 0
;Gui, Font, s11, Calibri
Gui, Add, Text, x18 y0 w80 h10 gGuiMove 0x1
Gui, Add, Edit, vTXT W760 R21
Gui, Add, DropDownList, w560 gchoose vCMD2, %Work% ;Commands
Gui, Add, DropDownList, x600 y520 w180  vWork gDisplay, CMD||AHK|VBS|BATCH|HTML|HELP|URLS|
;Gui, Add, Edit, gselect vTXT2 x600 y520 W150
Gui, Add, DropDownList, x20 y570 w760 vPath, %PATH%
Gui, Add, Edit, x20 y615 w400 vEXTE,%EXT% ;Extension
gui, add, button, x20 y654 ,SUBMIT
gui, add, button, Default x650 y654,RUN
Gui, Show, x0 y30 w800 h710 Center, NAJEEB SCRIPT BOOK
WinSet, Region, 0-0 W800 H710 R20-20,
WinMove, 0, 0
return
GuiMove:
 PostMessage, 0xA1, 2,,, A
Return
Display:
Gui, Submit, NoHide
GuiControl,, CMD2, % %Work%

return
choose:
gui, submit, nohide
guicontrol, , TXT, %CMD2%
return
buttonRun:
gui, submit, nohide
Runwait,%comspec% /k %TXT%
return
ButtonSubmit:
    Gui, Submit, NoHide
    FileAppend, % TXT, %Path%%EXTE%
return
#R::Reload  ;<--  ~ Reload Script ~
#S::Suspend ;<--  ~ Suspend Script ~
#P::Pause   ;<--  ~ Pause Script ~
#M::WinMinimize, ;<--  ~ Minimize Script ~
ESC::ExitApp     ;<--  ~ Exit Script ~