Compare commits
1 Commits
master
...
52e9d99a2d
Author | SHA1 | Date | |
---|---|---|---|
52e9d99a2d |
@ -158,15 +158,15 @@ Write:
|
||||
|
||||
Else If (Act = "1") ; Warrant
|
||||
{
|
||||
FileAppend,Händler rief an für eine Garantieübertragung`nAlte SN: `nNeue SN: `nAuthentisierungscode: `n`n, %docfile%
|
||||
FileAppend,Händler rief an für Garantieübertragung`nAlte SN: `nNeue SN: `nAuthentisierungscode: `n`n, %docfile%
|
||||
}
|
||||
|
||||
Else If (Act = "2") ; Demo
|
||||
{
|
||||
FileAppend,Händler rief an für eine Demo`nSN: `nAuthentisierungscode: `n`n, %docfile%
|
||||
FileAppend,Händler rief an für Demo`nSN: `nAuthentisierungscode: `n`n, %docfile%
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
ExitApp
|
||||
}
|
||||
}
|
||||
|
403
D3K.ahk
403
D3K.ahk
@ -1,7 +1,6 @@
|
||||
#Include, func.ahk
|
||||
|
||||
Menu, Tray, Icon, shell32.dll, 283 ; Set the tray icon to a keyboard
|
||||
Menu, Tray, Add, MouseMover ; Add item to tray icon right click for mouse mover
|
||||
|
||||
;------------------------------------------------------------------------------
|
||||
; Make sure the settings file exists, if not, create it
|
||||
@ -15,7 +14,6 @@ FileAppend,
|
||||
[USpec]
|
||||
RACF=LF01234
|
||||
Email=LastnameFirstname@JohnDeere.com
|
||||
Name=Firstname
|
||||
DocFile=Select File
|
||||
[Main]
|
||||
Mansol=1
|
||||
@ -39,7 +37,6 @@ Run Settings.ahk ; Runs the GUI for changing the settings, also accessible with
|
||||
; User Specific things:
|
||||
racf := ini_get(ini, "USpec", "RACF")
|
||||
email := ini_get(ini, "USpec", "Email")
|
||||
name := ini_get(ini, "USpec", "Name")
|
||||
docfile := ini_get(ini, "USpec", "DocFile")
|
||||
|
||||
; General Settings
|
||||
@ -62,134 +59,153 @@ ger := ini_get(ini, "Language", "German")
|
||||
If (glovar = 1)
|
||||
{
|
||||
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"
|
||||
|
||||
SetTimer, GloVar, 2000 ; Check every 2 seconds
|
||||
|
||||
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
|
||||
FileGetTime, gvModNew, %glovarini%
|
||||
if !(gvModNew = gvMod) ; Those two lines mean the rest of this only executes if there were changes to the ini.
|
||||
{
|
||||
gvMod := gvModNew
|
||||
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
|
||||
FileGetTime, gvModNew, %glovarini%
|
||||
if !(gvModNew = gvMod) ; Those two lines mean the rest of this only executes if there were changes to the ini.
|
||||
{
|
||||
Line := file.ReadLine()
|
||||
RegExMatch(Line, "(?<=\[).*(?=\])", RESection) ; explained above
|
||||
RegExMatch(Line, "^(?<Key>.*)=(?<Value>.*)", RE) ; Key = REKey, Value = REValue
|
||||
gvMod := gvModNew
|
||||
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
|
||||
|
||||
If (RESection && InStr(StoredSection := RESection, "clear")) ; Found a clear section
|
||||
RESection := "" ; Make sure that its clear
|
||||
file := FileOpen(glovarini, "r")
|
||||
Loop ; Read one line at a time
|
||||
{
|
||||
; Will clear the ini and save its and the documentation file's contents to a log
|
||||
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")
|
||||
Line := file.ReadLine()
|
||||
RegExMatch(Line, "(?<=\[).*(?=\])", RESection) ; explained above
|
||||
RegExMatch(Line, "^(?<Key>.*)=(?<Value>.*)", RE) ; Key = REKey, Value = REValue
|
||||
|
||||
If !(RESection) ; If the RegEx doesn't find antything, its empty
|
||||
{
|
||||
Run glovar.ahk
|
||||
}
|
||||
Return
|
||||
} else if (RESection) { ; found a different section
|
||||
StoredSection := RESection
|
||||
continue
|
||||
}
|
||||
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")
|
||||
If !(REValue) ; If there is no value for the key, skip it (Continue the loop at the next line)
|
||||
{
|
||||
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(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 (InStr(REKey, "dem") or InStr(REKey, "dnm") or InStr(REKey, "dus"))
|
||||
If (RESection) ; If we have a section
|
||||
{
|
||||
; Do not process xID related info, that is done above
|
||||
Continue
|
||||
StoredSection := RESection
|
||||
If InStr(RESection, "clear") ; Will clear the ini and save its and the documentation file's contents to a log
|
||||
{
|
||||
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
|
||||
}
|
||||
}
|
||||
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
|
||||
}
|
||||
} 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
|
||||
@ -202,9 +218,6 @@ If (glovar = 1)
|
||||
|
||||
!+\::Run Settings.ahk ; Alt+Shift+\
|
||||
|
||||
MouseMover:
|
||||
Run, msmv.ahk
|
||||
Return
|
||||
|
||||
;------------------------------------------------------------------------------
|
||||
; DTAC Solution Opener
|
||||
@ -413,7 +426,7 @@ SetTitleMatchMode, 2
|
||||
|
||||
; Cases
|
||||
:*:]cms::
|
||||
Send Hello,{Enter 2}{Space 3}{Enter}{Home down}{Shift up}{Home up}{Enter}Thank you,{Enter}%name%{Up 3}{End}
|
||||
Send Hello,{Enter 2}{Space 3}{Enter}{Home down}{Shift up}{Home up}{Enter}Thank you,{Enter}David{Up 3}{End}
|
||||
Return
|
||||
|
||||
#If
|
||||
@ -429,7 +442,7 @@ SetTitleMatchMode, 2
|
||||
|
||||
; Case
|
||||
:*:[cms::
|
||||
Send Hallo,{Enter 2}{Space 3}{Enter}{Home down}{Shift down}{Home up}{Shift up}{Enter}Mit freundlichen Grüßen,{Enter}%name%{Up 3}{End}
|
||||
Send Hallo,{Enter 2}{Space 3}{Enter}{Home down}{Shift down}{Home up}{Shift up}{Enter}Mit freundlichen Grüßen,{Enter}David{Up 3}{End}
|
||||
Return
|
||||
|
||||
#If
|
||||
@ -480,107 +493,105 @@ SetTitleMatchMode, 2
|
||||
|
||||
; English
|
||||
:*:]at::AutoTrac
|
||||
:*:]bin::Virtual Inventory
|
||||
:*:]cc::CommandCenter
|
||||
:*:]deg::{ASC 248}
|
||||
:*:]eq::{ASC 247}
|
||||
:*:]fc::Field Connect
|
||||
:*:]sf::StarFire
|
||||
:*:]jdlw::JDLink Web
|
||||
:*:]jdld::JDLink Dashboard
|
||||
:*:]jdl2::JDLink Dashboard 2.0
|
||||
:*:]jdlc::JDLink Connect
|
||||
:*:]jdla::JDLink Access
|
||||
:*:]jdls::JDLink Subscription
|
||||
:*:]jdll::JDLink
|
||||
:*:]jdp::JDParts
|
||||
:*:]mjd::MyJohnDeere
|
||||
:*:]opsc::Operations Center
|
||||
:*:]seccon::Section Control
|
||||
:*:]gs::GreenStar
|
||||
:*:]gp::GSC-Prepared
|
||||
:*:]cc::CommandCenter
|
||||
:*:]fc::Field Connect
|
||||
:*:]rs::RowSense
|
||||
:*:]sub::subscription
|
||||
:*:]ss::Stellar Support
|
||||
:*:]tman::Technical Manual
|
||||
:*:]oman::Operator's Manual
|
||||
:*:]hl3::HarvestLab 3000
|
||||
:*:]hlo::Original HarvestLab
|
||||
:*:]jddm::John Deere Data Manager
|
||||
:*:]jdl2::JDLink Dashboard 2.0
|
||||
:*:]jdla::JDLink Access
|
||||
:*:]jdlc::JDLink Connect
|
||||
:*:]jdld::JDLink Dashboard
|
||||
:*:]jdll::JDLink
|
||||
:*:]jdls::JDLink Subscription
|
||||
:*:]jdlw::JDLink Web
|
||||
:*:]jdp::JDParts
|
||||
:*:]jdsm::John Deere Software Manager
|
||||
:*:]macrep::Machine Reports
|
||||
:*:]mjd::MyJohnDeere
|
||||
:*:]muc::Master Unlock Code
|
||||
:*:]oman::Operator's Manual
|
||||
:*:]opsc::Operations Center
|
||||
:*:]rs::RowSense
|
||||
:*:]seccon::Section Control
|
||||
:*:]serva::Service Advisor
|
||||
:*:]sf::StarFire
|
||||
:*:]ss::Stellar Support
|
||||
:*:]sub::subscription
|
||||
:*:]tcsm::Territory Customer Support Manager
|
||||
:*:]tman::Technical Manual
|
||||
:*:]tp::TouchPoint
|
||||
:*:]bin::Virtual Inventory
|
||||
:*:]warrep::Warranty Reports
|
||||
:*:]tp::TouchPoint
|
||||
:*:]tcsm::Territory Customer Support Manager
|
||||
:*:]macrep::Machine Reports
|
||||
:*:]jdsm::John Deere Software Manager
|
||||
:*:]jddm::John Deere Data Manager
|
||||
:*:]serva::Service Advisor
|
||||
:*:]muc::Master Unlock Code
|
||||
:*:]deg::{ASC 248}
|
||||
:*:]eq::{ASC 247}
|
||||
|
||||
:*:mtg::MTG
|
||||
:*:racf::RACF
|
||||
:*:vin::VIN
|
||||
::atu::ATU
|
||||
::rowsense::RowSense
|
||||
::comar::COMAR
|
||||
::mrtk::mRTK
|
||||
::rda::RDA
|
||||
::rtk::RTK
|
||||
::autotrac::AutoTrac
|
||||
::ccms::CCMS
|
||||
::comar::COMAR
|
||||
::dtac::DTAC
|
||||
::tcsm::TCSM
|
||||
::itec::iTEC Pro
|
||||
::ssu::SSU
|
||||
::atu::ATU
|
||||
:*:mtg::MTG
|
||||
::wdt::WDT
|
||||
::itc::iTC
|
||||
:*:vin::VIN
|
||||
::gs2::GS2
|
||||
::gs3::GS3
|
||||
::igrade::iGrade
|
||||
::itc::iTC
|
||||
::itec::iTEC Pro
|
||||
::mrtk::mRTK
|
||||
::pmcalc::PMCalc
|
||||
::rda::RDA
|
||||
::rowsense::RowSense
|
||||
::rtk::RTK
|
||||
::sf1::SF1
|
||||
::sf2::SF2
|
||||
::sf3::SF3
|
||||
::sf4::SF4
|
||||
::ssu::SSU
|
||||
::tcsm::TCSM
|
||||
::vat::VAT
|
||||
::wdt::WDT
|
||||
::xid::xID
|
||||
::pmcalc::PMCalc
|
||||
::vat::VAT
|
||||
:*:racf::RACF
|
||||
::igrade::iGrade
|
||||
|
||||
|
||||
; German
|
||||
#If, ger = "1"
|
||||
:*:[at::AutoTrac
|
||||
:*:[bin::Virtuellen Bestand
|
||||
:*:[cc::CommandCenter
|
||||
:*:[deg::{ASC 248}
|
||||
:*:[eq::{ASC 247}
|
||||
:*:[fc::Field Connect
|
||||
:*:[sf::StarFire
|
||||
:*:[jdlw::JDLink Web
|
||||
:*:[jdld::JDLink Dashboard
|
||||
:*:[jdl2::JDLink Dashboard 2.0
|
||||
:*:[jdlc::JDLink Connect
|
||||
:*:[jdla::JDLink Access
|
||||
:*:[jdls::JDLink Abonnement
|
||||
:*:[jdll::JDLink
|
||||
:*:[jdp::JDParts
|
||||
:*:[mjd::MyJohnDeere
|
||||
:*:[opsc::Einsatzzentrale
|
||||
:*:[seccon::Teilbreitensteuerung
|
||||
:*:[gs::GreenStar
|
||||
:*:[gp::GSC-Prepared
|
||||
:*:[cc::CommandCenter
|
||||
:*:[fc::Field Connect
|
||||
:*:[rs::RowSense
|
||||
:*:[sub::Abonnement
|
||||
:*:[ss::Stellar Support
|
||||
:*:[tman::Technische Betriebsanleitung
|
||||
:*:[oman::Betriebsanleitung
|
||||
:*:[hl3::HarvestLab 3000
|
||||
:*:[hlo::Originales HarvestLab
|
||||
:*:[jddm::John Deere Data Manager
|
||||
:*:[jdl2::JDLink Dashboard 2.0
|
||||
:*:[jdla::JDLink Access
|
||||
:*:[jdlc::JDLink Connect
|
||||
:*:[jdld::JDLink Dashboard
|
||||
:*:[jdll::JDLink
|
||||
:*:[jdls::JDLink Abonnement
|
||||
:*:[jdlw::JDLink Web
|
||||
:*:[jdp::JDParts
|
||||
:*:[jdsm::John Deere Software Manager
|
||||
:*:[macrep::Machine Reports
|
||||
:*:[mjd::MyJohnDeere
|
||||
:*:[muc::Master Unlock Code
|
||||
:*:[oman::Betriebsanleitung
|
||||
:*:[opsc::Einsatzzentrale
|
||||
:*:[rs::RowSense
|
||||
:*:[seccon::Teilbreitensteuerung
|
||||
:*:[serva::Service Advisor
|
||||
:*:[sf::StarFire
|
||||
:*:[ss::Stellar Support
|
||||
:*:[sub::Abonnement
|
||||
:*:[tcsm::Technischer Bezirksleiter
|
||||
:*:[tman::Technische Betriebsanleitung
|
||||
:*:[tp::TouchPoint
|
||||
:*:[bin::Virtuellen Bestand
|
||||
:*:[warrep::Warranty Reports
|
||||
:*:[tp::TouchPoint
|
||||
:*:[tcsm::Technischer Bezirksleiter
|
||||
:*:[macrep::Machine Reports
|
||||
:*:[jdsm::John Deere Software Manager
|
||||
:*:[jddm::John Deere Data Manager
|
||||
:*:[serva::Service Advisor
|
||||
:*:[muc::Master Unlock Code
|
||||
:*:[deg::{ASC 248}
|
||||
:*:[eq::{ASC 247}
|
||||
#If
|
||||
|
||||
|
||||
|
@ -1,33 +1,33 @@
|
||||
#SingleInstance force ; Only one instance at a time
|
||||
SendMode, Input
|
||||
FileEncoding, UTF-8 ; Makes sure the special characters don't break stuff
|
||||
|
||||
Menu, Tray, Icon, %A_MyDocuments%\D3K\icons\manual.ico
|
||||
|
||||
Gui, +AlwaysOnTop +ToolWindow
|
||||
|
||||
Gui, Add, Edit, x2 y3 w78 h20 vNumber +Left,
|
||||
Gui, Add, Button, x22 y43 w70 h20 Default vHidden, Ok
|
||||
Gui, Add, Button, x81 y3 w17 h20 gHelp +Center, ?
|
||||
Gui, Show, h28 w100, ManSol
|
||||
GuiControl, Hide, Hidden
|
||||
|
||||
Return
|
||||
|
||||
ButtonOk:
|
||||
Gui, submit ; I have no idea what the regex means any more...
|
||||
If RegExMatch(Number, "[[:alpha:]]+")
|
||||
run, % "http://serviceadvisor.deere.com/WebSA/manuals/" . Number
|
||||
Else If RegExMatch(Number, "[[:digit:]]+")
|
||||
run, % "https://serviceadvisor.deere.com/WebSA/solutions/en/" . Number
|
||||
ExitApp
|
||||
Return
|
||||
|
||||
|
||||
Help:
|
||||
MsgBox, 262176, Maual & Solution opener, Input the TM/OM SKU (easily ofund on TechPubs) or the DTAC solution number to open it in your default browser.`nTMs & OMs open in Service Advisor.
|
||||
Return
|
||||
|
||||
GuiClose:
|
||||
GuiEscape:
|
||||
#SingleInstance force ; Only one instance at a time
|
||||
SendMode, Input
|
||||
FileEncoding, UTF-8 ; Makes sure the special characters don't break stuff
|
||||
|
||||
Menu, Tray, Icon, %A_MyDocuments%\D3K\icons\manual.ico
|
||||
|
||||
Gui, +AlwaysOnTop +ToolWindow
|
||||
|
||||
Gui, Add, Edit, x2 y3 w78 h20 vNumber +Left,
|
||||
Gui, Add, Button, x22 y43 w70 h20 Default vHidden, Ok
|
||||
Gui, Add, Button, x81 y3 w17 h20 gHelp +Center, ?
|
||||
Gui, Show, h28 w100, ManSol
|
||||
GuiControl, Hide, Hidden
|
||||
|
||||
Return
|
||||
|
||||
ButtonOk:
|
||||
Gui, submit ; I have no idea what the regex means any more...
|
||||
If RegExMatch(Number, "[[:alpha:]]+")
|
||||
run, % "http://serviceadvisor.deere.com/WebSA/manuals/" . Number
|
||||
Else If RegExMatch(Number, "[[:digit:]]+")
|
||||
run, % "https://ccms.deere.com/prweb/PRServletCustomAuth/ZDate_MgiNPn1ccL6O6pyBurDs0hjFQ8*/!STANDARD?pyActivity=SolutionsSnapStart&Action=showHarness&className=Deere-Int-Solr-Docs&Purpose=SolutionDescriptionNew&SolutionID=" . Number . "&Language=Default"
|
||||
ExitApp
|
||||
Return
|
||||
|
||||
|
||||
Help:
|
||||
MsgBox, 262176, Maual & Solution opener, Input the TM/OM SKU (easily ofund on TechPubs) or the DTAC solution number to open it in your default browser.`nTMs & OMs open in Service Advisor.
|
||||
Return
|
||||
|
||||
GuiClose:
|
||||
GuiEscape:
|
||||
ExitApp
|
21
Settings.ahk
21
Settings.ahk
@ -11,7 +11,6 @@ This is the part that reads the file to see what your settings are. Variables in
|
||||
; User Specific things:
|
||||
racf := ini_get(ini, "USpec", "RACF")
|
||||
email := ini_get(ini, "USpec", "Email")
|
||||
name := ini_get(ini, "USpec", "Name")
|
||||
docfile := ini_get(ini, "USpec", "DocFile")
|
||||
|
||||
; General Settings
|
||||
@ -35,22 +34,18 @@ 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, x85 y2 w200 h37, First Name
|
||||
Gui, Add, Edit, x89 y15 w193 h20 vformName gName, %Name%
|
||||
|
||||
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 h130, 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, CheckBox, x25 y178 w75 h30 vformCFmail Checked%cfmail% gCFmail, Email option
|
||||
GuiControl, show%caseformatter%, formCFmail ; only shows the check box for emails if the Case Formatter box is checked
|
||||
Gui, Add, GroupBox, x8 y215 w277 h40 vformDocFile, Documentation File
|
||||
Gui, Add, Text, x15 y231 w260 h20 vformDocFile2 gDocFile, %docfile%
|
||||
GuiControl, show%caseformatter%, formDocFile ; only shows the documentation file field if the Case Formatter box is checked
|
||||
GuiControl, show%caseformatter%, formDocFile2
|
||||
|
||||
Gui, Add, GroupBox, x128 y83 w157 h75, Text Replacement
|
||||
Gui, Add, CheckBox, x132 y95 w150 h30 vformJdpn Checked%jdpn% gJdpn, JD Product Names
|
||||
@ -59,7 +54,7 @@ Gui, Add, CheckBox, x132 y155 w100 h30 vformGer Checked%ger% gGer, DE ([ as pref
|
||||
|
||||
Gui, Add, Link, x132 y190 w150 h23 gHelp, <a href="https://daviddaily.dev/david/d3k/wiki">Click here for help</a> (v%d3k_version%)
|
||||
|
||||
Gui, Show, h263 w295, David 3000 Settings
|
||||
Gui, Show, h225 w295, David 3000 Settings
|
||||
Return
|
||||
|
||||
;------------------------------------------------------------------------------
|
||||
@ -70,7 +65,6 @@ Default ini, sections are in []: (0 is off, 1 is on)
|
||||
[USpec]
|
||||
RACF=LF01234
|
||||
Email=LastnameFirstname@JohnDeere.com
|
||||
Name=Firstname
|
||||
DocFile=Select File
|
||||
[Main]
|
||||
Mansol=1
|
||||
@ -94,11 +88,6 @@ RACF:
|
||||
ini_write(ini, "RACF", formRACF)
|
||||
Return
|
||||
|
||||
Name:
|
||||
Gui, Submit, NoHide
|
||||
ini_write(ini, "Name", formName)
|
||||
Return
|
||||
|
||||
Email:
|
||||
Gui, Submit, NoHide
|
||||
ini_write(ini, "Email", formEmail)
|
||||
@ -128,8 +117,6 @@ Return
|
||||
CaseFormatter:
|
||||
Gui, Submit, NoHide
|
||||
GuiControl, show%formCaseFormatter%, formCFmail ; only shows the check box for emails if the Case Formatter box is checked
|
||||
GuiControl, show%formCaseFormatter%, formDocFile
|
||||
GuiControl, show%formCaseFormatter%, formDocFile2
|
||||
GuiControl,, formCFmail, 0
|
||||
ini_write(ini, "CaseFormatter", formCaseFormatter)
|
||||
ini_write(ini, "CFmail", "0") ; if you're toggling this, its either on or off, doesn't hurt to set it here
|
||||
|
@ -8,9 +8,4 @@ VIN=
|
||||
usr=
|
||||
org=
|
||||
[Info]
|
||||
case=
|
||||
dorg=
|
||||
dus=
|
||||
dnm=
|
||||
dem=
|
||||
xID=
|
||||
ccms=
|
||||
|
63
msmv.ahk
63
msmv.ahk
@ -1,63 +0,0 @@
|
||||
#SingleInstance, force
|
||||
CoordMode, Mouse, Screen
|
||||
|
||||
waittime := 180000
|
||||
|
||||
Switch A_Args[1]
|
||||
{
|
||||
Case "on":
|
||||
Menu, Tray, NoIcon
|
||||
Goto, Start
|
||||
Case "off":
|
||||
ExitApp
|
||||
}
|
||||
|
||||
Menu, Tray, Add, Hide GUI, GuiToggle ; Adds a button to toggle the gui
|
||||
Menu, Tray, Add, Exit, GuiClose ; Exit button
|
||||
Menu, Tray, NoStandard ; None of the standard tray buttons
|
||||
Gui, +AlwaysOnTop +ToolWindow
|
||||
Gui, Add, Button, x3 y3 w55 h20 gStart +Center, Start
|
||||
Gui, Add, Button, x3 y3 w55 h20 gStop +Center, Stop
|
||||
Gui, Show, h28 w60, msmv
|
||||
GuiControl, Hide, Stop ; Since we want the Start button to show first
|
||||
Return
|
||||
|
||||
Start:
|
||||
GuiControl, Hide, Start
|
||||
SetTimer, Msmv, %waittime% ; Checks if the has been input in the last 2 minutes every 30 secs, easier to stop a loop with SetTimer
|
||||
GuiControl, Show, Stop
|
||||
Return
|
||||
|
||||
Stop:
|
||||
GuiControl, Hide, Stop
|
||||
SetTimer, Msmv, off
|
||||
GuiControl, Show, Start
|
||||
Return
|
||||
|
||||
Msmv:
|
||||
If (A_TimeIdle > waittime) ; https://www.autohotkey.com/docs/Variables.htm#User_Idle_Time
|
||||
{
|
||||
Random, x,, %A_ScreenWidth%
|
||||
Random, y,, %A_ScreenHeight%
|
||||
MouseMove %x%, %y%
|
||||
}
|
||||
Return
|
||||
|
||||
GuiToggle:
|
||||
If !nogui
|
||||
{
|
||||
Gui, Hide
|
||||
Menu, Tray, Check, Hide GUI
|
||||
nogui := True
|
||||
}
|
||||
Else
|
||||
{
|
||||
Menu, Tray, uncheck, Hide GUI
|
||||
nogui := False
|
||||
Gui, Show
|
||||
}
|
||||
Return
|
||||
|
||||
GuiClose:
|
||||
GuiEscape:
|
||||
ExitApp ; Closes the app when escape or the exit button is pressed
|
@ -1,41 +1,40 @@
|
||||
#SingleInstance force
|
||||
Menu, Tray, Add, Open Manual/Solution, gui
|
||||
|
||||
; The exe this is compiled into has manual.ico set as its icon.
|
||||
|
||||
!+S::gui()
|
||||
|
||||
gui()
|
||||
{
|
||||
static Number
|
||||
static Hidden
|
||||
|
||||
Gui, +AlwaysOnTop +ToolWindow
|
||||
|
||||
Gui, Add, Edit, x2 y3 w78 h20 vNumber +Left,
|
||||
Gui, Add, Button, x22 y43 w70 h20 Default vHidden, Ok
|
||||
Gui, Add, Button, x81 y3 w17 h20 gHelp +Center, ?
|
||||
Gui, Show, h28 w100, ManSol
|
||||
GuiControl, Hide, Hidden
|
||||
|
||||
Return
|
||||
|
||||
ButtonOk:
|
||||
Gui, submit ; I have no idea what the regex means any more...
|
||||
If RegExMatch(Number, "[[:alpha:]]+")
|
||||
run, % "http://serviceadvisor.deere.com/WebSA/manuals/" . Number
|
||||
Else If RegExMatch(Number, "[[:digit:]]+")
|
||||
run, % "https://serviceadvisor.deere.com/WebSA/solutions/en/" . Number
|
||||
ExitApp
|
||||
Return
|
||||
|
||||
|
||||
Help:
|
||||
Run, https://daviddaily.dev/david/d3k/wiki/ManSol-Opener-Standalone
|
||||
Return
|
||||
|
||||
GuiClose:
|
||||
GuiEscape:
|
||||
Gui, Destroy
|
||||
Return
|
||||
}
|
||||
#SingleInstance force
|
||||
|
||||
; The exe this is compiled into has manual.ico set as its icon.
|
||||
|
||||
!+S::gui()
|
||||
|
||||
gui()
|
||||
{
|
||||
static Number
|
||||
static Hidden
|
||||
|
||||
Gui, +AlwaysOnTop +ToolWindow
|
||||
|
||||
Gui, Add, Edit, x2 y3 w78 h20 vNumber +Left,
|
||||
Gui, Add, Button, x22 y43 w70 h20 Default vHidden, Ok
|
||||
Gui, Add, Button, x81 y3 w17 h20 gHelp +Center, ?
|
||||
Gui, Show, h28 w100, ManSol
|
||||
GuiControl, Hide, Hidden
|
||||
|
||||
Return
|
||||
|
||||
ButtonOk:
|
||||
Gui, submit ; I have no idea what the regex means any more...
|
||||
If RegExMatch(Number, "[[:alpha:]]+")
|
||||
run, % "http://serviceadvisor.deere.com/WebSA/manuals/" . Number
|
||||
Else If RegExMatch(Number, "[[:digit:]]+")
|
||||
run, % "https://ccms.deere.com/prweb/PRServletCustomAuth/ZDate_MgiNPn1ccL6O6pyBurDs0hjFQ8*/!STANDARD?pyActivity=SolutionsSnapStart&Action=showHarness&className=Deere-Int-Solr-Docs&Purpose=SolutionDescriptionNew&SolutionID=" . Number . "&Language=Default"
|
||||
ExitApp
|
||||
Return
|
||||
|
||||
|
||||
Help:
|
||||
Run, https://daviddaily.dev/david/d3k/wiki/ManSol
|
||||
Return
|
||||
|
||||
GuiClose:
|
||||
GuiEscape:
|
||||
Gui, Destroy
|
||||
Return
|
||||
}
|
||||
|
Reference in New Issue
Block a user