Update 'D3K.ahk'

D3K.ahk

@@ -1,7 +1,8 @@
 #Include, func.ahk
 
 Menu, Tray, Icon, shell32.dll, 283	; Set the tray icon to a keyboard
-Menu, Tray, Add, MouseMover		; Add item to the tray to move the mouse
+Menu, Tray, Add, Mouse Mover, Mouse_Mover		; Add item to the tray to move the mouse
+Menu, Tray, Add, %A_AhkVersion%, docs
 
 ;------------------------------------------------------------------------------
 ; Make sure the settings file exists, if not, create it
@@ -228,7 +229,7 @@ If (glovar = 1)
 
 !+\::Run Settings.ahk	; Alt+Shift+\
 
-MouseMover:
+Mouse_Mover:
 	Run, msmv.ahk
 Return
 
@@ -331,7 +332,7 @@ Return
 ;------------------------------------------------------------------------------
 ;STWA Applied
 :*:]cms::
-	Send STWA applied{Enter 2}Status: Providing information{Enter 2}Comments:{Space}{Enter 2}Thank you,{Enter}%name%{Enter 2}Tier 2 internal steps:{Space}{Up 5}{End}
+	Send STWA applied{Enter 2}Status: Providing information{Enter 2}Comments:{Space}{Enter 2}Thank you,{Enter}%name%{Enter 2}Tier 2 internal steps:{Space}{Enter 2}SQL:{Enter}
 	Return
 
 ;------------------------------------------------------------------------------
@@ -343,13 +344,6 @@ Return
 	Send Hello,{Enter 2}{Space 3}
 	Return
 
-; Cases
-:*:]cms::
-	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"
@@ -358,12 +352,6 @@ Return
 :*:[email::
 	Send Hallo,{Enter 2}{Space 3}
 	Return
-
-; 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}
-	Return
-
 #If
 
 
@@ -413,11 +401,8 @@ Return
 ; English
 	:*:]at::AutoTrac
 	:*:]sf::StarFire
-	:*:]jdlw::JDLink Web
 	:*:]jdld::JDLink Dashboard
-	:*:]jdl2::JDLink Dashboard 2.0
+	:*:]jdlc::JDLink Connectivity
-	:*:]jdlc::JDLink Connect
-	:*:]jdla::JDLink Access
 	:*:]jdls::JDLink Subscription
 	:*:]jdll::JDLink
 	:*:]jdp::JDParts
@@ -436,7 +421,6 @@ Return
 	:*:]hlo::Original HarvestLab
 	:*:]bin::Virtual Inventory
 	:*:]warrep::Warranty Reports
-	:*:]tp::TouchPoint
 	:*:]tcsm::Territory Customer Support Manager
 	:*:]macrep::Machine Reports
 	:*:]jdsm::John Deere Software Manager
@@ -444,16 +428,17 @@ Return
 	:*:]serva::Service Advisor
 	:*:]muc::Master Unlock Code
 	:*:]asmn::Asset Manager
+	:*:]bsm::Base Station Manager
 
 
 	::rowsense::RowSense
-	::comar::COMAR
+	:*:comar::COMAR
 	::mrtk::mRTK
 	::rda::RDA
 	::rtk::RTK
 	::autotrac::AutoTrac
-	::ccms::CCMS
+	:*:ccms::CCMS
-	::dtac::DTAC
+	:*:dtac::DTAC
 	::tcsm::TCSM
 	::itec::iTEC Pro
 	::ssu::SSU
@@ -473,6 +458,8 @@ Return
 	::vat::VAT
 	:*:racf::RACF
 	::igrade::iGrade
+	:*:JDCP::JDCP
+	:*:ISOBUS::ISOBUS
 
 
 ; German
@@ -482,8 +469,7 @@ Return
 	:*:[jdlw::JDLink Web
 	:*:[jdld::JDLink Dashboard
 	:*:[jdl2::JDLink Dashboard 2.0
-	:*:[jdlc::JDLink Connect
+	:*:[jdlc::JDLink Connectivity
-	:*:[jdla::JDLink Access
 	:*:[jdls::JDLink Abonnement
 	:*:[jdll::JDLink
 	:*:[jdp::JDParts
@@ -510,6 +496,7 @@ Return
 	:*:[serva::Service Advisor
 	:*:[muc::Master Unlock Code
 	:*:[asmn::Asset Manager
+	:*:[bsm::Base Station Manager
 #If
 
 
@@ -522,19 +509,16 @@ Return
 Run, C:\Users\%racf%\Downloads
 Return
 
-
-
 #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
-	Send {Enter}
-	Return
-}
 Run, C:\Users\%racf%\Documents
 Return
 
+:*:[now::	; Send the current time/date in ISO8601 format
+:*:]now::
+	d_t := GetDateTime("ISO8601")
+	SendInput, %d_t%
+Return
+
 :*:[deg::{ASC 248}
 :*:]deg::{ASC 248}
 :*:[eq::{ASC 247}
@@ -557,12 +541,11 @@ asciiart(art)
 	asciiart(asc_yee)
 Return
 
-:*:]micmute::
-	mic_mute := ["░░░░░░░░░░░░░░░░░░░░░░░░░░", "░░░░░░░░█▄░▄█░█░█▀▀░░░░░░░", "░░░░░░░░█░▀░█░█░█░░░░░░░░░", "░░░░░░░░▀░░░▀░▀░▀▀▀░░░░░░░", "░░█▄░▄█░█░░█░▀█▀░█▀▀░█▀▄░░", "░░█░▀░█░█░░█░░█░░█▀▀░█░█░░", "░░▀░░░▀░▀▀▀▀░░▀░░▀▀▀░▀▀░░░", "░░░░░░░░░░░░░░░░░░░░░░░░░░"]
-	asciiart(mic_mute)
-Return
-
 :*:]sunglass::
 	sunglass := ["▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄", "█░░░░░░░░▀█▄▀▄▀██████░▀█▄▀▄▀██████░", "░░░░░░░░░░░▀█▄█▄███▀░░░▀██▄█▄███▀░"]
 	asciiart(sunglass)
 Return
+
+docs:
+	run https://www.autohotkey.com/docs/AutoHotkey.htm
+Return