@ -1,4 +1,4 @@
, func . ahk
, func . ahk
Menu , Tray , Icon , shell32 . dll , 283 ; Set the tray icon to a keyboard
@ -14,11 +14,13 @@ FileAppend,
[ U S p e c ]
R A C F = L F 0 1 2 3 4
E m a i l = L a s t n a m e F i r s t n a m e @ J o h n D e e r e . c o m
N a m e = F i r s t n a m e
D o c F i l e = S e l e c t F i l e
[ M a i n ]
M a n s o l = 1
M J D P a s t e = 1
C a s e F o r m a t t e r = 1
C F m a i l = 0
[ R e p l a c e m e n t ]
J D P r o d u c t N a m e s = 1
G l o V a r = 0
@ -36,6 +38,7 @@ 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
@ -128,44 +131,6 @@ If (glovar = 1)
}
}
}
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
}
@ -179,8 +144,8 @@ If (glovar = 1)
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
writethis := " Case on " . CurrTime . " `n `n `n " . doctemp . " `n `n " . initemp ; Save the current time, what was in the doc file, and glovarini to a variable
FileAppend , % " `n `n " writethis " `n `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
@ -235,25 +200,6 @@ If (glovar = 1)
Pause : : Run Case_Formatter . ahk ; The Pause|Break key
#If
; These things below are for using in a pinch, or when there is no dealer.
SetTitleMatchMode , 2
#If ( WinActive = Temp . txt ) & & ( CaseFormatter = " 1 " )
: * : \case : :
CurrTime := GetDateTime ( " en " )
Send Call received on %CurrTime% { Enter } Name : { Enter } Username : { Enter }
Return
#If
;German
#If ( CaseFormatter = " 1 " ) & & ( ger = " 1 " )
: * : | case : :
CurrTime := GetDateTime ( " de " )
Send Anruf wurde am %CurrTime% entgegengenommen { Enter } Name : { Enter } Benutzername : { Enter }
Return
#If
;-------------------------------------------------------------------------------
; Special Characters
@ -334,133 +280,39 @@ SetTitleMatchMode, 2
;------------------------------------------------------------------------------
; Copypastas
;------------------------------------------------------------------------------
; Recommending case
: * : ] rec : :
Send Recommending Case , please contact us if there are any further questions .
;STWA Applied
: * : ] cms : :
Send Notes : { Space } { Enter } Explanation : { Space } { Enter } Flowdock : { Space } { Enter 2 } Thank you , { Enter } %name% { Enter 2 } Tier 2 internal steps : { Space } { CtrlDown } { Home } { CtrlUp } { End }
Return
; Escalatimg Case
: * : ] esc1 : :
Send This case was unable to be resolved and has been transferred to another team . Our Tier 2 team is investigating the issue to find a short term resolution . We will update you as soon as we have a recommendation .
Return
: * : ] esc2 : :
Send A short term resolution still has not been identified . We are requesting an immediate update on this case from our Tier 2 team . We will contact you as soon as we have a status update .
Return
; Requesting info
: * : ] req1 : :
Send A request has been made for additional information in this case . Please provide the information as soon as possible so that the case can be resolved .
Return
: * : ] req2 : :
Send A follow - up request has been made for the additional information .
Return
: * : ] req3 : :
Send The additional information required has not yet been received . This case will now be sent back to you . Please reopen the case , or contact the Global Support Center again via phone or email with the additional information and reference this case number so that it can be reopened and investigated further .
Return
; Defect / NCCA
: * : ] ncca : :
Send We will be recommending this case back to you for the time being . This issue is still being investigated and worked on via an internal product corrective action ticket . We will continue to monitor the progress of that ticket and contact you when we have a solution or a short term recommendation . The case text will be updated at that time for documentation purposes . { Enter } You may choose to close this case yourself , return it to us , or keep it open until we provide you with a corrective action recommendation . If you have questions on the status of this issue , please re - open the case or contact the Global Support Center using the contact information found in DTAC solution 82793. We will provide you with any information we are able to gather from the product team .
Return
; DTAC
: * : ] dtac : :
Send The ISG Global Support Center has determined that this case is hardware related ; therefore this case is being transferred from the GSC to the ISG DTAC group . A DTAC technician will now work this case via the CCMS system and provide a recommendation in the case text if more information is needed or if a solution has been found . Please continue to update or check on the progress of this case by using the CCMS system case text section moving forward .
Return
; German
#If , ger = " 1 "
; Recommending Case
: * : [ rec : :
Send Fall an H { U + 00E4 } ndler gewiesen , bitte melden Sie sich wenn sie weitere fragen haben .
Return
; Escalating Case
: * : [ esc1 : :
Send Der Fall konnte vom GSC nicht gelöst werden und wurde an die nächste Supportebene weitergeleitet . Das Support Team wird das Problem weiter untersuchen und versuchen eine kurzfristige Lösung bereit zu stellen . Sobald wir eine Empfehlung erhalten , werden wir Sie darüber informieren .
Return
: * : [ esc2 : :
Send Bisher steht uns keine kurzfristige Lösung zur Verfügung . Wir fordern umgehend ein Status - Update bezüglich des Falls von unserem Support Team an . { Shift down } { Enter } { Shift up } Wir werden Sie erneut kontaktieren , sobald wir ü ber den aktuellsten Stand des Falls informiert sind .
Return
; Requesting info
: * : [ req1 : :
Send Wir haben zusätzliche Informationen von Ihnen bezüglich des Falls angefordert . Bitte stellen Sie uns die Informationen so bald wie möglich zur Verfügung , damit der Fall gelöst werden kann .
Return
: * : [ req2 : :
Send Wir fordern die zusätzlichen Informationen von Ihnen erneut an .
Return
: * : [ req3 : :
Send Wir haben die benötigten zusätzlichen Informationen von Ihnen noch nicht erhalten . Dieser Fall wird jetzt zu Ihnen zurückgeschickt . Bitte setzen Sie sich mit dem GSC telefonisch oder per Email mit den zusätzlichen Informationen nochmal in Verbindung und referenzieren Sie die Fallnummer , damit der Fall erneut geöffnet und weiter untersucht werden kann .
Return
; Defect / NCCA
: * : [ ncca : :
Send Wir werden diesen Fall vorübergehend an Sie zurückweisen . Dieses Problem wird noch ü ber ein innenseitiges Produkt Korrektur Ticket bearbeitet . Wir werden weiterhin den Fortschritt dieses Tickets verfolgen und mit Ihnen Kontakt aufnehmen , wenn wir eine Lösung oder eine kurzfristige Empfehlung haben . { Enter } Sie können diesen Fall selbst schließen , an uns zurückzugeben oder offen halten , bis wir Ihnen eine Korrekturmaßnahme empfehlen . Wenn Sie Fragen zum Fall Status haben wenden Sie sich an das Global Support Center , indem Sie die Kontaktinformationen in der DTAC - Lösung 82793 abrufen . Wir werden Ihnen alle Informationen , die wir von dem Produktteam bekommen haben , zu Verfügung stellen .
Return
; DTAC
: * : [ dtac : :
Send Das ISG Global Support Center hat festgestellt , dass dieser Fall hardwarebezogen ist ; Daher wird dieser Fall vom GSC an die ISG DTAC Gruppe ü bertragen . Ein DTAC - Techniker wird nun diesen Fall ü ber das DTAC - System bearbeiten und eine Empfehlung im Fall Text geben , wenn weitere Informationen benötigt werden oder wenn eine Lösung gefunden wurde . Dementsprechend bitten wir Sie , den Fortschritt des Falls mithilfe des Falltextes zu ü berprüfen und falls nötig mit fehlenden Informationen zu ergänzen .
Return
#If
;------------------------------------------------------------------------------
; Email
;------------------------------------------------------------------------------
; Regular
: * : ] email : :
Send Hello , { Enter 2 } { Shift down } { Enter } { Shift up } Please contact us if you have any questions . { Up } { End }
Send Hello , { Enter 2 } { Space 3 }
Return
; DTAC Problem
: * : ] 97010 : :
Send Hello , { Enter 2 } As this is a hardware / compatibility related inquiry , we here at the GSC cannot assist you properly . Please contact DTAC and they will be able to assist you further .
Return
; 2 Year old COMAR
: * : ] 2 yc : :
Send Hello , { Enter 2 } You are unable to activate this product as the COMAR is over 2 years old . There is a form in the Dealer Corner that you can fill out to have it replaced as long as it falls within the criteria outlined in solution 108357. { Enter } Please contact your TCSM if you have any questions about this process .
Return
; CCMS
; Cases
: * : ] cms : :
Send Hello , { Enter 2 } { Enter } { Home down } { Shift up } { Home up } Please contact us if you have any questions . { Enter 2 } Thank you , { Enter } David { Up 4 } { End }
Send Hello , { Enter 2 } { Space 3 } { Enter } { Home down } { Shift up } { Home up } { Enter } Thank you , { Enter } %name% { Up 3 } { End }
Return
#If
; German
#If , ger = " 1 "
; Regular
: * : [ email : :
Send Hallo , { Enter 2 } { Shift down } { Enter } { Shift up } Für Rückfragen stehen wir gerne zur Verfügung . { Up } { End }
Send Hallo , { Enter 2 } { Space 3 }
Return
; DTAC Problem
: * : [ 97010 : :
Send Hallo , { Enter 2 } Da dies eine Hardware / Kompatibilität - bezogene Anfrage ist , können wir hier im GSC leider ihre Frage nicht sehr gut beantworten . Bitte wenden Sie sich an DTAC , dort können Sie bessere unterstützung für diesen typ von fragen bekommen .
Return
; 2 Year old COMAR
: * : [ 2 yc : :
Send Hallo , { Enter 2 } Sie können dieses Produkt nicht aktivieren weil die COMAR - Nummer ü ber 2 Yahre alt ist . Es gibt in Vertriebspartnerinformation ein Formular das Sie ausfüllen können , und Ihre Aktivierungen werden ersetzt so lange es innerhalb der Regeln in DTAC Lösung 108357 ist . { Enter } Bitte melden Sie sich bei Ihrem Technischen Bezirksleiter wenn Sie Fragen ü ber diesen Prozess haben .
Return
; CCMS case
; Case
: * : [ cms : :
Send Hallo , { Enter 2 } { Enter } { Home down } { Shift up } { Home up } Für Rückfragen stehen wir gerne zur Verfügung . { Enter 2 } Mit freundlichen Grüßen , { Enter } David { Up 4 } { End }
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 }
Return
#If
@ -530,7 +382,7 @@ SetTitleMatchMode, 2
: * : ] sub : : subscription
: * : ] ss : : Stellar Support
: * : ] tman : : Technical Manual
: * : ] operm : : Operator 's Manual
: * : ] oman : : Operator 's Manual
: * : ] hl3 : : HarvestLab 3000
: * : ] hlo : : Original HarvestLab
: * : ] bin : : Virtual Inventory
@ -542,8 +394,8 @@ SetTitleMatchMode, 2
: * : ] jddm : : John Deere Data Manager
: * : ] serva : : Service Advisor
: * : ] muc : : Master Unlock Code
: * : ] deg : : { ASC 248 }
: * : ] eq : : { ASC 247 }
: * : ] asmn : : Asset Manager
::rowsense:: RowSense
::comar:: COMAR
@ -560,7 +412,7 @@ SetTitleMatchMode, 2
: * : mtg : : MTG
::wdt:: WDT
::itc:: iTC
::vin: :VIN
: * : vin : VIN
::gs2:: GS2
::gs3:: GS3
::sf1:: SF1
@ -608,33 +460,46 @@ SetTitleMatchMode, 2
: * : [ jddm : : John Deere Data Manager
: * : [ serva : : Service Advisor
: * : [ muc : : Master Unlock Code
: * : [ deg : : { ASC 248 }
: * : [ eq : : { ASC 247 }
: * : [ asmn : : Asset Manager
#If
;------------------------------------------------------------------------------
; QoL Improvements
;------------------------------------------------------------------------------
#j::
Run , C : \Users \%racf% \Downloads ; Open the downloads folder on Win+J
#j:: ; Open the downloads folder on Win+J
Run , C : \Users \%racf% \Downloads
Return
/*
This part only works for my folder structure
#w::
#w:: ; Open My Documents folder on Win+W
if WinActive ( " ahk_exe Explorer.EXE " ) ; If windows explorer is focused
{
Send ! d ; Focus the address bar
Send C:\ Users\ %racf%\ Documents\Work_Docs\Cases\2020-01 - 06 ; current folder, would love to use a var instead, but Run doesn't like it
Send C : \
Send { Enter }
Return
}
Run, C:\ Users\ %racf%\ Documents\Work_Docs\Cases\2020-01 - 06 ; Open the documentation folder on Win+W
Run , C : \
Return
*/
: * : [ deg : : { ASC 248 }
: * : ] deg : : { ASC 248 }
: * : [ eq : : { ASC 247 }
: * : ] eq : : { ASC 247 }
: * : [ shrug : : ¯ \_ ( ツ ) _ / ¯
: * : ] shrug : : ¯ \_ ( ツ ) _ / ¯
: : ] yee : :
yee ( )
{
asc_yee := [ " ░░░░░░░░░░░░░▄███▄▄▄░░░░░░░ " , " ░░░░░░░░░▄▄▄██▀▀▀▀███▄░░░░░ " , " ░░░░░░░▄▀▀░░░░░░░░░░░▀█░░░░ " , " ░░░░▄▄▀░░░░░░░░░░░░░░░▀█░░░ " , " ░░░█░░░░░▀▄░░▄▀░░░░░░░░█░░░ " , " ░░░▐██▄░░▀▄▀▀▄▀░░▄██▀░▐▌░░░ " , " ░░░█▀█░▀░░░▀▀░░░▀░█▀░░▐▌░░░ " , " ░░░█░░▀▐░░░░░░░░▌▀░░░░░█░░░ " , " ░░░█░░░░░░░░░░░░░░░░░░░█░░░ " , " ░░░░█░░▀▄░░░░▄▀░░░░░░░░█░░░ " , " ░░░░█░░░░░░░░░░░▄▄░░░░█░░░░ " , " ░░░░░█▀██▀▀▀▀██▀░░░░░░█░░░░ " , " ░░░░░█░░▀████▀░░░░░░░█░░░░░ " , " ░░░░░░█░░░░░░░░░░░░▄█░░░░░░ " , " ░░░░░░░██░░░░░█▄▄▀▀░█░░░░░░ " , " ░░░░░░░░▀▀█▀▀▀▀░░░░░░█░░░░░ " , " yee ░░░░░█░░░░░░░░░░░░█░░░░ " ]
For index , value in asc_yee
{
SendInput , %value% { ShiftDown } { Enter } { ShiftUp }
}
}
