compressed code, improved some logic
This commit is contained in:
parent
b4637072a2
commit
c7d3567790
251
D3K.ahk
251
D3K.ahk
@ -62,153 +62,134 @@ ger := ini_get(ini, "Language", "German")
|
|||||||
If (glovar = 1)
|
If (glovar = 1)
|
||||||
{
|
{
|
||||||
glovarini := A_MyDocuments "\GloVar.ini" ; Location of the ini that the user modifies
|
glovarini := A_MyDocuments "\GloVar.ini" ; Location of the ini that the user modifies
|
||||||
|
|
||||||
glovarstart := "#SingleInstance force`n`n:*:$dorg::`n:*:$dus::`n:*:$dnm::`n:*:$dem::`n:*:$xid::`n"
|
glovarstart := "#SingleInstance force`n`n:*:$dorg::`n:*:$dus::`n:*:$dnm::`n:*:$dem::`n:*:$xid::`n"
|
||||||
|
|
||||||
SetTimer, GloVar, 2000 ; Check every 2 seconds
|
SetTimer, GloVar, 2000 ; Check every 2 seconds
|
||||||
|
|
||||||
GloVar:
|
GloVar:
|
||||||
WinWaitNotActive, GloVar.ini ; So that we don't get any problems with the file on disk being out of date. I use VSCode with the "Save on lose focus" option on, YMMV
|
WinWaitNotActive, GloVar.ini ; So that we don't get any problems with the file on disk being out of date. I use VSCode with the "Save on lose focus" option on, YMMV
|
||||||
|
FileGetTime, gvModNew, %glovarini%
|
||||||
|
if !(gvModNew = gvMod) ; Those two lines mean the rest of this only executes if there were changes to the ini.
|
||||||
{
|
{
|
||||||
FileGetTime, gvModNew, %glovarini%
|
gvMod := gvModNew
|
||||||
if !(gvModNew = gvMod) ; Those two lines mean the rest of this only executes if there were changes to the ini.
|
FileDelete, glovar.ahk ; Start with a clean slate
|
||||||
|
FileAppend, %glovarstart%, glovar.ahk ; makes sure we only have one instance of the script running at a time
|
||||||
|
RESection := "" ; Make sure that its clear
|
||||||
|
file := FileOpen(glovarini, "r")
|
||||||
|
Loop ; Read one line at a time
|
||||||
{
|
{
|
||||||
gvMod := gvModNew
|
Line := file.ReadLine()
|
||||||
FileDelete, glovar.ahk ; Start with a clean slate
|
RegExMatch(Line, "(?<=\[).*(?=\])", RESection) ; explained above
|
||||||
FileAppend, %glovarstart%, glovar.ahk ; makes sure we only have one instance of the script running at a time
|
RegExMatch(Line, "^(?<Key>.*)=(?<Value>.*)", RE) ; Key = REKey, Value = REValue
|
||||||
|
|
||||||
RESection := "" ; Make sure that its clear
|
If (RESection && InStr(StoredSection := RESection, "clear")) ; Found a clear section
|
||||||
file := FileOpen(glovarini, "r")
|
|
||||||
Loop ; Read one line at a time
|
|
||||||
{
|
{
|
||||||
Line := file.ReadLine()
|
; Will clear the ini and save its and the documentation file's contents to a log
|
||||||
RegExMatch(Line, "(?<=\[).*(?=\])", RESection) ; explained above
|
FileRead, doctemp, %docfile% ; Read documentation file, set in settings
|
||||||
RegExMatch(Line, "^(?<Key>.*)=(?<Value>.*)", RE) ; Key = REKey, Value = REValue
|
FileRead, initemp, %glovarini% ; Read the ini
|
||||||
|
initemp := RegExReplace(initemp, "(?<=\[)clear(?=\])", "Info") ; Replace the "clear" section we set with Info
|
||||||
If !(RESection) ; If the RegEx doesn't find antything, its empty
|
CurrTime := GetDateTime("en") ; get the current date and time as "YYYY-MM-DD at HH:MM GMT"
|
||||||
|
writethis := "Case on " . CurrTime . "`n" . doctemp . "`n`n" . initemp ; Save the current time, what was in the doc file, and glovarini to a variable
|
||||||
|
FileAppend, % "`n`n`n`n" writethis "`n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~", %A_MyDocuments%/D3KLog.txt ; Write a few new lines , the content, and a line underneath
|
||||||
|
FileAppend,, temptemp
|
||||||
|
FileCopy, glovarsource, %glovarini%, 1 ; Copies and replaces any text in glovar.ini with the template
|
||||||
|
FileCopy, temptemp, %docfile%, 1 ; These two this close together makes it look like they get cleared at the same time
|
||||||
|
FileDelete, temptemp
|
||||||
|
fileread, gvMod, %glovarini% ; Make sure that this script knows what the ini was changed to so it doesn't constantly run through the above code
|
||||||
|
FileDelete, glovar.ahk ; THE CLEAN SLATE
|
||||||
|
FileAppend, %glovarstart%, glovar.ahk
|
||||||
|
Sleep, 500
|
||||||
|
FileGetTime, gvMod, %glovarini% ; Make sure that this script knows what the ini was changed to so it doesn't constantly run through the above code
|
||||||
|
If FileExist("glovar.ahk")
|
||||||
{
|
{
|
||||||
If !(REValue) ; If there is no value for the key, skip it (Continue the loop at the next line)
|
Run glovar.ahk
|
||||||
{
|
|
||||||
Continue
|
|
||||||
}
|
|
||||||
If InStr(StoredSection, "Serial Numbers") ; If the section is "Serial Numbers", make everything uppercase
|
|
||||||
{
|
|
||||||
StringUpper, REValue, REValue ; Makes it uppercase
|
|
||||||
WinWaitNotActive, GloVar.ini ; Just to make sure
|
|
||||||
{
|
|
||||||
ini_write(glovarini, REKey, REValue)
|
|
||||||
FileGetTime, gvMod, %glovarini%
|
|
||||||
}
|
|
||||||
}
|
|
||||||
If InStr(StoredSection, "Operations Center") ; If the section is "Operations Center" and the Key "un", make it uppercase
|
|
||||||
{
|
|
||||||
If InStr(REKey, "usr")
|
|
||||||
{
|
|
||||||
StringUpper, REValue, REValue ; Makes it uppercase
|
|
||||||
WinWaitNotActive, GloVar.ini
|
|
||||||
{
|
|
||||||
ini_write(glovarini, REKey, REValue) ; Writes the properly formatted case number to glovar.ini
|
|
||||||
FileGetTime, gvMod, %glovarini%
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
If InStr(REKey, "case") ; If a key contains "case". Case numbers are all in the format "LETTERS-NUMBERS".
|
|
||||||
{
|
|
||||||
StringUpper, REValue, REValue ; Makes it uppercase
|
|
||||||
RegExMatch(REValue, "(?<=\().*(?=\))", REMatch) ; Match everything but the parenthesis. When the case numbers are shown they have parenthesis, and those are annoying.
|
|
||||||
If (REMatch) ; If there's anything there
|
|
||||||
{
|
|
||||||
WinWaitNotActive, GloVar.ini
|
|
||||||
{
|
|
||||||
ini_write(glovarini, REKey, REMatch) ; Writes the properly formatted case number to glovar.ini
|
|
||||||
FileGetTime, gvMod, %glovarini%
|
|
||||||
}
|
|
||||||
REValue := REMatch
|
|
||||||
} Else {
|
|
||||||
WinWaitNotActive, GloVar.ini
|
|
||||||
{
|
|
||||||
ini_write(glovarini, REKey, REValue) ; Writes the properly formatted case number to glovar.ini
|
|
||||||
FileGetTime, gvMod, %glovarini%
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
If InStr(REKey, "xid") ; If an xID is entered. Unique identifier for people
|
|
||||||
{
|
|
||||||
dealinfo := GetInfo(REValue) ; Gets information, see function for details
|
|
||||||
StringUpper, REValue, REValue ; Makes xID uppercase
|
|
||||||
|
|
||||||
if !(REValue = dealinfo.xid)
|
|
||||||
{
|
|
||||||
run addemail.ahk
|
|
||||||
Continue
|
|
||||||
}
|
|
||||||
|
|
||||||
; Replace the data in glovar.ahk with the data from the ini
|
|
||||||
FileRead, tempglovar, glovar.ahk
|
|
||||||
tempglovar := RegExReplace(tempglovar, "(?<=\$xid::).*", dealinfo.xid)
|
|
||||||
tempglovar := RegExReplace(tempglovar, "(?<=\$dem::).*", dealinfo.email)
|
|
||||||
tempglovar := RegExReplace(tempglovar, "(?<=\$dnm::).*", dealinfo.name)
|
|
||||||
tempglovar := RegExReplace(tempglovar, "(?<=\$dus::).*", dealinfo.user)
|
|
||||||
tempglovar := RegExReplace(tempglovar, "(?<=\$dorg::).*", dealinfo.org)
|
|
||||||
FileAppend, %tempglovar%, tempglovar
|
|
||||||
FileCopy, tempglovar, glovar.ahk,1
|
|
||||||
FileDelete, tempglovar
|
|
||||||
|
|
||||||
WinWaitNotActive, GloVar.ini
|
|
||||||
{
|
|
||||||
ini_write(glovarini, "xID", dealinfo.xid) ; Writes the xID
|
|
||||||
ini_write(glovarini, "dem", dealinfo.email) ; Writes email address (incredibly useful)
|
|
||||||
ini_write(glovarini, "dnm", dealinfo.name) ; Writes Name (useful for when referring to that person)
|
|
||||||
ini_write(glovarini, "dus", dealinfo.user) ; Writes demo account name (somewhat useful)
|
|
||||||
ini_write(glovarini, "dorg", dealinfo.org)
|
|
||||||
}
|
|
||||||
FileGetTime, gvMod, %glovarini% ; Make sure that this script knows what the ini was changed to so it doesn't constantly run through the above code
|
|
||||||
Continue
|
|
||||||
}
|
|
||||||
If (InStr(REKey, "dem") or InStr(REKey, "dnm") or InStr(REKey, "dus"))
|
|
||||||
{
|
|
||||||
; Do not process xID related info, that is done above
|
|
||||||
Continue
|
|
||||||
}
|
|
||||||
writethis := ":*:$" REKey "::" REValue "`n" ; Save the hotstring to a variable
|
|
||||||
FileAppend, %writethis%, glovar.ahk ; Write the variable to glovar.ahk
|
|
||||||
}
|
}
|
||||||
If (RESection) ; If we have a section
|
Return
|
||||||
{
|
} else if (RESection) { ; found a different section
|
||||||
StoredSection := RESection
|
StoredSection := RESection
|
||||||
If InStr(RESection, "clear") ; Will clear the ini and save its and the documentation file's contents to a log
|
continue
|
||||||
{
|
|
||||||
FileRead, doctemp, %docfile% ; Read documentation file, set in settings
|
|
||||||
FileRead, initemp, %glovarini% ; Read the ini
|
|
||||||
initemp := RegExReplace(initemp, "(?<=\[)clear(?=\])", "Info") ; Replace the "clear" section we set with Info
|
|
||||||
CurrTime := GetDateTime("en") ; get the current date and time as "YYYY-MM-DD at HH:MM GMT"
|
|
||||||
|
|
||||||
writethis := "Case on " . CurrTime . "`n" . doctemp . "`n`n" . initemp ; Save the current time, what was in the doc file, and glovarini to a variable
|
|
||||||
FileAppend, % "`n`n`n`n" writethis "`n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~", %A_MyDocuments%/D3KLog.txt ; Write a few new lines , the content, and a line underneath
|
|
||||||
FileAppend,, temptemp
|
|
||||||
FileCopy, glovarsource, %glovarini%, 1 ; Copies and replaces any text in glovar.ini with the template
|
|
||||||
FileCopy, temptemp, %docfile%, 1 ; These two this close together makes it look like they get cleared at the same time
|
|
||||||
FileDelete, temptemp
|
|
||||||
fileread, gvMod, %glovarini% ; Make sure that this script knows what the ini was changed to so it doesn't constantly run through the above code
|
|
||||||
FileDelete, glovar.ahk ; THE CLEAN SLATE
|
|
||||||
FileAppend, %glovarstart%, glovar.ahk
|
|
||||||
|
|
||||||
Sleep, 500
|
|
||||||
FileGetTime, gvMod, %glovarini% ; Make sure that this script knows what the ini was changed to so it doesn't constantly run through the above code
|
|
||||||
If FileExist("glovar.ahk")
|
|
||||||
{
|
|
||||||
Run glovar.ahk
|
|
||||||
}
|
|
||||||
Return
|
|
||||||
}
|
|
||||||
}
|
|
||||||
} Until (file.AtEOF)
|
|
||||||
file.Close()
|
|
||||||
FileGetTime, gvMod, %glovarini% ; Make sure that this script knows what the ini was changed to so it doesn't constantly run through the above code
|
|
||||||
If FileExist("glovar.ahk")
|
|
||||||
{
|
|
||||||
Run glovar.ahk
|
|
||||||
}
|
}
|
||||||
|
If !(RESection) ; If the RegEx doesn't find antything, its empty
|
||||||
|
{
|
||||||
|
If !(REValue) ; If there is no value for the key, skip it (Continue the loop at the next line)
|
||||||
|
{
|
||||||
|
Continue
|
||||||
|
}
|
||||||
|
If InStr(StoredSection, "Serial Numbers") ; If the section is "Serial Numbers", make everything uppercase
|
||||||
|
{
|
||||||
|
StringUpper, REValue, REValue ; Makes it uppercase
|
||||||
|
WinWaitNotActive, GloVar.ini ; Just to make sure
|
||||||
|
ini_write(glovarini, REKey, REValue)
|
||||||
|
FileGetTime, gvMod, %glovarini%
|
||||||
|
MsgBox, test
|
||||||
|
}
|
||||||
|
If InStr(StoredSection, "Operations Center") ; If the section is "Operations Center" and the Key "un", make it uppercase
|
||||||
|
{
|
||||||
|
If InStr(REKey, "usr")
|
||||||
|
{
|
||||||
|
StringUpper, REValue, REValue ; Makes it uppercase
|
||||||
|
WinWaitNotActive, GloVar.ini
|
||||||
|
ini_write(glovarini, REKey, REValue) ; Writes the properly formatted case number to glovar.ini
|
||||||
|
FileGetTime, gvMod, %glovarini%
|
||||||
|
}
|
||||||
|
}
|
||||||
|
If InStr(REKey, "case") ; If a key contains "case". Case numbers are all in the format "LETTERS-NUMBERS".
|
||||||
|
{
|
||||||
|
StringUpper, REValue, REValue ; Makes it uppercase
|
||||||
|
RegExMatch(REValue, "(?<=\().*(?=\))", REMatch) ; Match everything but the parenthesis. When the case numbers are shown they have parenthesis, and those are annoying.
|
||||||
|
If (REMatch) ; If there's anything there
|
||||||
|
{
|
||||||
|
WinWaitNotActive, GloVar.ini
|
||||||
|
ini_write(glovarini, REKey, REMatch) ; Writes the properly formatted case number to glovar.ini
|
||||||
|
FileGetTime, gvMod, %glovarini%
|
||||||
|
REValue := REMatch
|
||||||
|
} Else {
|
||||||
|
WinWaitNotActive, GloVar.ini
|
||||||
|
ini_write(glovarini, REKey, REValue) ; Writes the properly formatted case number to glovar.ini
|
||||||
|
FileGetTime, gvMod, %glovarini%
|
||||||
|
}
|
||||||
|
}
|
||||||
|
If InStr(REKey, "xid") ; If an xID is entered. Unique identifier for people
|
||||||
|
{
|
||||||
|
dealinfo := GetInfo(REValue) ; Gets information, see function for details
|
||||||
|
StringUpper, REValue, REValue ; Makes xID uppercase
|
||||||
|
if !(REValue = dealinfo.xid)
|
||||||
|
{
|
||||||
|
run addemail.ahk
|
||||||
|
Continue
|
||||||
|
}
|
||||||
|
; Replace the data in glovar.ahk with the data from the ini
|
||||||
|
FileRead, tempglovar, glovar.ahk
|
||||||
|
tempglovar := RegExReplace(tempglovar, "(?<=\$xid::).*", dealinfo.xid)
|
||||||
|
tempglovar := RegExReplace(tempglovar, "(?<=\$dem::).*", dealinfo.email)
|
||||||
|
tempglovar := RegExReplace(tempglovar, "(?<=\$dnm::).*", dealinfo.name)
|
||||||
|
tempglovar := RegExReplace(tempglovar, "(?<=\$dus::).*", dealinfo.user)
|
||||||
|
tempglovar := RegExReplace(tempglovar, "(?<=\$dorg::).*", dealinfo.org)
|
||||||
|
FileAppend, %tempglovar%, tempglovar
|
||||||
|
FileCopy, tempglovar, glovar.ahk,1
|
||||||
|
FileDelete, tempglovar
|
||||||
|
WinWaitNotActive, GloVar.ini
|
||||||
|
ini_write(glovarini, "xID", dealinfo.xid) ; Writes the xID
|
||||||
|
ini_write(glovarini, "dem", dealinfo.email) ; Writes email address (incredibly useful)
|
||||||
|
ini_write(glovarini, "dnm", dealinfo.name) ; Writes Name (useful for when referring to that person)
|
||||||
|
ini_write(glovarini, "dus", dealinfo.user) ; Writes demo account name (somewhat useful)
|
||||||
|
ini_write(glovarini, "dorg", dealinfo.org)
|
||||||
|
FileGetTime, gvMod, %glovarini% ; Make sure that this script knows what the ini was changed to so it doesn't constantly run through the above code
|
||||||
|
Continue
|
||||||
|
}
|
||||||
|
If (InStr(REKey, "dem") or InStr(REKey, "dnm") or InStr(REKey, "dus"))
|
||||||
|
{
|
||||||
|
; Do not process xID related info, that is done above
|
||||||
|
Continue
|
||||||
|
}
|
||||||
|
writethis := ":*:$" REKey "::" REValue "`n" ; Save the hotstring to a variable
|
||||||
|
FileAppend, %writethis%, glovar.ahk ; Write the variable to glovar.ahk
|
||||||
|
}
|
||||||
|
} Until (file.AtEOF)
|
||||||
|
file.Close()
|
||||||
|
FileGetTime, gvMod, %glovarini% ; Make sure that this script knows what the ini was changed to so it doesn't constantly run through the above code
|
||||||
|
If FileExist("glovar.ahk")
|
||||||
|
{
|
||||||
|
Run glovar.ahk
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
Return
|
Return
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user