145 lines
		
	
	
		
			4.0 KiB
		
	
	
	
		
			AutoHotkey
		
	
	
	
	
	
			
		
		
	
	
			145 lines
		
	
	
		
			4.0 KiB
		
	
	
	
		
			AutoHotkey
		
	
	
	
	
	
#Include, func.ahk
 | 
						|
Menu, Tray, Icon, shell32.dll, 283
 | 
						|
 | 
						|
;------------------------------------------------------------------------------
 | 
						|
; Read ini
 | 
						|
;------------------------------------------------------------------------------
 | 
						|
/*
 | 
						|
This is the part that reads the file to see what your settings are. Variables in the ini file are in CamelCase, variables here are lowercase for more distinction
 | 
						|
*/
 | 
						|
 | 
						|
;   User Specific things:
 | 
						|
racf := ini_getValue(ini, "USpec", "RACF")
 | 
						|
email := ini_getValue(ini, "USpec", "Email")
 | 
						|
docfile := ini_getValue(ini, "USpec", "DocFile")
 | 
						|
 | 
						|
;   General Settings
 | 
						|
mansol := ini_getValue(ini, "Main", "Mansol")
 | 
						|
mjdpaste := ini_getValue(ini, "Main", "MJDPaste")
 | 
						|
caseformatter := ini_getValue(ini, "Main", "CaseFormatter")
 | 
						|
 | 
						|
;   Replacement
 | 
						|
jdpn := ini_getValue(ini, "Replacement", "JDProductNames")
 | 
						|
glovar := ini_getValue(ini, "Replacement", "GloVar")
 | 
						|
 | 
						|
;   Language
 | 
						|
ger := ini_getValue(ini, "Language", "German")
 | 
						|
 | 
						|
;------------------------------------------------------------------------------
 | 
						|
; Create GUI
 | 
						|
;------------------------------------------------------------------------------
 | 
						|
Gui, -MaximizeBox -MinimizeBox	; Remove the max+min buttons
 | 
						|
 | 
						|
Gui, Add, GroupBox, x8 y2 w67 h37, RACF
 | 
						|
Gui, Add, Edit, x12 y15 w60 h20 vformRACF gRACF, %RACF%
 | 
						|
 | 
						|
Gui, Add, GroupBox, x8 y40 w207 h37, Email Address
 | 
						|
Gui, Add, Edit, x12 y53 w200 h20 vformEmail gEmail, %Email%
 | 
						|
 | 
						|
Gui, Add, GroupBox, x77 y2 w207 h37, Documentation File
 | 
						|
Gui, Add, Text, x81 y19 w200 h20 gDocFile, %docfile%
 | 
						|
 | 
						|
Gui, Add, GroupBox, x8 y83 w107 h105, Main
 | 
						|
Gui, Add, CheckBox, x12 y95 w100 h30 vformMansol Checked%mansol% gMansol, ManSol
 | 
						|
Gui, Add, CheckBox, x12 y125 w100 h30 vformMJDPaste Checked%mjdpaste% gMJDPaste, MJDPaste
 | 
						|
Gui, Add, CheckBox, x12 y155 w100 h30 vformCaseFormatter Checked%caseformatter% gCaseFormatter, Case Formatter
 | 
						|
 | 
						|
Gui, Add, GroupBox, x128 y83 w157 h75, Text Replacement
 | 
						|
Gui, Add, CheckBox, x132 y95 w150 h30 vformJdpn Checked%jdpn% gJdpn, JD Product Names
 | 
						|
Gui, Add, CheckBox, x132 y125 w150 h30 vformGlovar Checked%glovar% gGlovar, Global Variables
 | 
						|
 | 
						|
Gui, Add, CheckBox, x12 y187 w100 h30 vformGer Checked%ger% gGer, DE ([ as prefix)
 | 
						|
Gui, Add, Button, x132 y190 w150 h23 gHelp, Click here for help (v%d3k_version%)
 | 
						|
 | 
						|
Gui, Show, h225 w295, David 3000 Settings
 | 
						|
Return
 | 
						|
 | 
						|
;------------------------------------------------------------------------------
 | 
						|
; Edit ini
 | 
						|
;------------------------------------------------------------------------------
 | 
						|
/*
 | 
						|
Default ini, sections are in []:
 | 
						|
 | 
						|
[USpec]
 | 
						|
RACF=LF01234
 | 
						|
Email=LastnameFirstname@JohnDeere.com
 | 
						|
DocFile=
 | 
						|
[Main]
 | 
						|
Mansol=1
 | 
						|
MJDPaste=1
 | 
						|
CaseFormatter=1
 | 
						|
[Replacement]
 | 
						|
JDProductNames=1
 | 
						|
GloVar=0
 | 
						|
[Language]
 | 
						|
German=0
 | 
						|
[Info]
 | 
						|
Version=2.5
 | 
						|
 | 
						|
format for below:
 | 
						|
 | 
						|
Button G-label (executes when clicked):
 | 
						|
Submit the gui so that it can change and don't hide it
 | 
						|
write the state of the check box (a 0 for unchecked, 1 for checked), to the file at %ini%, section with this name, line with this name
 | 
						|
*/
 | 
						|
 | 
						|
RACF:
 | 
						|
	Gui, Submit, NoHide
 | 
						|
	ini_writeValue(ini, "RACF", formRACF)
 | 
						|
Return
 | 
						|
 | 
						|
Email:
 | 
						|
	Gui, Submit, NoHide
 | 
						|
	ini_writeValue(ini, "Email", formEmail)
 | 
						|
Return
 | 
						|
 | 
						|
DocFile:
 | 
						|
	Gui, Submit
 | 
						|
	FileSelectFile, SelectedFile, 3, , Open a file, Text Documents (*.txt; *.doc)
 | 
						|
	if SelectedFile =
 | 
						|
		MsgBox, You have not selected a file, this will break some things.
 | 
						|
	else
 | 
						|
		ini_writeValue(ini, "DocFile", SelectedFile)
 | 
						|
		docfile := ini_getValue(ini, "USpec", "DocFile")
 | 
						|
		Gui, Show, h225 w295, David 3000 Settings
 | 
						|
Return
 | 
						|
 | 
						|
Mansol:
 | 
						|
	Gui, Submit, NoHide
 | 
						|
	ini_writeValue(ini, "Mansol", formMansol)
 | 
						|
Return
 | 
						|
 | 
						|
MJDPaste:
 | 
						|
	Gui, Submit, NoHide
 | 
						|
	ini_writeValue(ini, "MJDPaste", formMJDPaste)
 | 
						|
Return
 | 
						|
 | 
						|
CaseFormatter:
 | 
						|
	Gui, Submit, NoHide
 | 
						|
	ini_writeValue(ini, "CaseFormatter", formCaseFormatter)
 | 
						|
Return
 | 
						|
 | 
						|
Jdpn:
 | 
						|
	Gui, Submit, NoHide
 | 
						|
	ini_writeValue(ini, "JDProductNames", formJdpn)
 | 
						|
Return
 | 
						|
 | 
						|
Glovar:
 | 
						|
	Gui, Submit, NoHide
 | 
						|
	ini_writeValue(ini, "GloVar", formGlovar)
 | 
						|
Return
 | 
						|
 | 
						|
Ger:
 | 
						|
	Gui, Submit, NoHide
 | 
						|
	ini_writeValue(ini, "German", formGer)
 | 
						|
Return
 | 
						|
 | 
						|
Help: 
 | 
						|
	Gui, Submit
 | 
						|
	Run, https://daviddaily.dev/david/d3k/wiki
 | 
						|
Return
 | 
						|
 | 
						|
GuiClose:
 | 
						|
GuiEscape:
 | 
						|
	Run D3K.ahk
 | 
						|
ExitApp	; Closes the app when escape or the exit button is pressed |