Compare commits
No commits in common. "de5e7b88e6455a05ae1437b2661c64a2269eb922" and "d02ef808f865eaec07626e699912c87a13cbbec0" have entirely different histories.
de5e7b88e6
...
d02ef808f8
3
.gitignore
vendored
3
.gitignore
vendored
@ -1,3 +0,0 @@
|
|||||||
*.code-workspace
|
|
||||||
SmartGooey/*
|
|
||||||
Projects/*
|
|
@ -1,179 +1,5 @@
|
|||||||
#Include, func.ahk
|
#Include, func.ahk
|
||||||
|
|
||||||
; Holy crap I need to rewrite this for v3...
|
|
||||||
|
|
||||||
|
|
||||||
SetTitleMatchMode, 2
|
|
||||||
|
|
||||||
; These next 3 options make it so that it's always on top, it there are no buttons, and doesn't show up in the alt-tab or taskbar
|
|
||||||
Gui,+AlwaysOnTop
|
|
||||||
Gui, +ToolWindow
|
|
||||||
|
|
||||||
Contact := 2
|
|
||||||
|
|
||||||
CurrTimeEN := GetDateTime("en")
|
|
||||||
CurrTimeDE := GetDateTime("de")
|
|
||||||
|
|
||||||
;------------------------------------------------------------------------------
|
|
||||||
; GUI creation
|
|
||||||
;------------------------------------------------------------------------------
|
|
||||||
; The & in front of the letters lets you hold alt and press the first letter instead of having to click on it. That is why its "Mail", not "E-Mail"
|
|
||||||
|
|
||||||
Gui, Add, Radio, x12 y3 w60 h20 Group vLang Checked, &English ; First group of Radio buttons
|
|
||||||
Gui, Add, Radio, x12 y23 w60 h20, &German
|
|
||||||
|
|
||||||
Gui, Add, Radio, x82 y3 w60 h20 Group vAct, &Warrant
|
|
||||||
Gui, Add, Radio, x82 y23 w60 h20, &Demo
|
|
||||||
|
|
||||||
Gui, Add, Text, x75 y46 w150 h20 gTime, %CurrTimeEN%
|
|
||||||
|
|
||||||
Gui, Add, Button, x12 y43 w55 h20 Default vHidden, Go ; That way you don't have to have an actual button, it just happens when you press enter.
|
|
||||||
|
|
||||||
if (cfmail)
|
|
||||||
{
|
|
||||||
Gui, Add, Radio, x142 y3 w80 h20 Group vContact Checked, E-&Mail ; Second group of Radio buttons
|
|
||||||
Gui, Add, Radio, x142 y23 w80 h20 , &Call
|
|
||||||
Gui, Show, h70 w210, Contact
|
|
||||||
} Else {
|
|
||||||
Gui, Show, h70 w145, Contact
|
|
||||||
}
|
|
||||||
|
|
||||||
Return
|
|
||||||
|
|
||||||
Time:
|
|
||||||
Run, addemail.ahk
|
|
||||||
|
|
||||||
GuiClose:
|
|
||||||
GuiEscape:
|
|
||||||
ExitApp
|
|
||||||
;------------------------------------------------------------------------------
|
|
||||||
; Buttons
|
|
||||||
;------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
|
|
||||||
ButtonGo:
|
|
||||||
Gui, submit
|
|
||||||
Goto, Write
|
|
||||||
Return
|
|
||||||
|
|
||||||
/*
|
|
||||||
Contact
|
|
||||||
Mail: 1
|
|
||||||
Call: 2
|
|
||||||
|
|
||||||
Lang
|
|
||||||
English: 1
|
|
||||||
German: 2
|
|
||||||
|
|
||||||
Act
|
|
||||||
Warrant: 1
|
|
||||||
Demo: 2
|
|
||||||
*/
|
|
||||||
|
|
||||||
Write:
|
|
||||||
{
|
|
||||||
FileRead, NewLine, %docfile% ; Read the documentation file
|
|
||||||
If (NewLine != "") ; If there is something in the file, this would return a string
|
|
||||||
{
|
|
||||||
FileAppend,`n`n`n`n, %docfile% ; Inserts a new line so that it isn't just appended directly to the end
|
|
||||||
}
|
|
||||||
NewLine := "" ; Free up Memory cause this could be quite a bit of stuff
|
|
||||||
|
|
||||||
|
|
||||||
;------------------------------------------------------------------------------
|
|
||||||
; Email
|
|
||||||
;------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
If (Contact = "1")
|
|
||||||
{
|
|
||||||
If (Lang = "1") ; English
|
|
||||||
{
|
|
||||||
If (Act = "0") ; Not an activation
|
|
||||||
{
|
|
||||||
FileAppend,Dealer emailed: "", %docfile%
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
If (Act = "1") ; Warrant
|
|
||||||
{
|
|
||||||
FileAppend,Dealer emailed for warrant transfer: ""`n`nOld SN: `nNew SN: `nChallenge Code: `n`n, %docfile%
|
|
||||||
}
|
|
||||||
|
|
||||||
If (Act = "2") ; Demo
|
|
||||||
{
|
|
||||||
FileAppend,Dealer emailed for `n`nSN: `nChallenge Code: `n`n, %docfile%
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
Else If (Lang = "2") ; German
|
|
||||||
{
|
|
||||||
If (Act = "0") ; Not an activation
|
|
||||||
{
|
|
||||||
FileAppend,Händler emailte: "", %docfile%
|
|
||||||
}
|
|
||||||
|
|
||||||
Else If (Act = "1") ; Warrant
|
|
||||||
{
|
|
||||||
FileAppend,Händler emailte für Garantieübertragung`n`nAlte SN: `nNeue SN: `nAuthentisierungscode: `n`n, %docfile%
|
|
||||||
}
|
|
||||||
|
|
||||||
Else If (Act = "2") ; Demo
|
|
||||||
{
|
|
||||||
FileAppend,Händler emailte für `n`nSN: `nAuthentisierungscode: `n`n, %docfile%
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
;------------------------------------------------------------------------------
|
|
||||||
; Call
|
|
||||||
;------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
Else If (Contact = "2")
|
|
||||||
{
|
|
||||||
If (Lang = "1") ; English
|
|
||||||
{
|
|
||||||
FileAppend, Call received %CurrTimeEN%.`n`n, %docfile%
|
|
||||||
If (Act = "0") ; Not an activation
|
|
||||||
{
|
|
||||||
FileAppend,Dealer called for , %docfile%
|
|
||||||
}
|
|
||||||
|
|
||||||
Else If (Act = "1") ; Warrant
|
|
||||||
{
|
|
||||||
FileAppend,Dealer called for Warrant transfer`nOld SN: `nNew SN: `nChallenge Code: `n`n, %docfile%
|
|
||||||
}
|
|
||||||
|
|
||||||
Else If (Act = "2") ; Demo
|
|
||||||
{
|
|
||||||
FileAppend,Dealer called for Demo`nSN: `nChallenge Code: `n`n, %docfile%
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
Else If (Lang = "2") ; German
|
|
||||||
{
|
|
||||||
FileAppend, Anruf wurde %CurrTimeDE% entgegengenommen.`n`n, %docfile%
|
|
||||||
|
|
||||||
If (Act = "0") ; Not an activation
|
|
||||||
{
|
|
||||||
FileAppend,Händler rief an mit , %docfile%
|
|
||||||
}
|
|
||||||
|
|
||||||
Else If (Act = "1") ; Warrant
|
|
||||||
{
|
|
||||||
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 Demo`nSN: `nAuthentisierungscode: `n`n, %docfile%
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
ExitApp
|
|
||||||
}#Include, func.ahk
|
|
||||||
|
|
||||||
SetTitleMatchMode, 2
|
SetTitleMatchMode, 2
|
||||||
|
|
||||||
; These next 3 options make it so that it's always on top, it there are no buttons, and doesn't show up in the alt-tab or taskbar
|
; These next 3 options make it so that it's always on top, it there are no buttons, and doesn't show up in the alt-tab or taskbar
|
||||||
|
4
D3K.ahk
4
D3K.ahk
@ -404,7 +404,6 @@ Return
|
|||||||
:*:]asmn::Asset Manager
|
:*:]asmn::Asset Manager
|
||||||
:*:]bsm::Base Station Manager
|
:*:]bsm::Base Station Manager
|
||||||
|
|
||||||
:*:]sas::See & Spray
|
|
||||||
|
|
||||||
::rowsense::RowSense
|
::rowsense::RowSense
|
||||||
:*:comar::COMAR
|
:*:comar::COMAR
|
||||||
@ -509,9 +508,6 @@ Return
|
|||||||
:*:[shrug::¯\_(ツ)_/¯
|
:*:[shrug::¯\_(ツ)_/¯
|
||||||
:*:]shrug::¯\_(ツ)_/¯
|
:*:]shrug::¯\_(ツ)_/¯
|
||||||
|
|
||||||
:*:[ltd::License to Deere™
|
|
||||||
:*:]ltd::License to Deere™
|
|
||||||
|
|
||||||
|
|
||||||
docs:
|
docs:
|
||||||
run https://www.autohotkey.com/docs/AutoHotkey.htm
|
run https://www.autohotkey.com/docs/AutoHotkey.htm
|
||||||
|
@ -1,6 +1,5 @@
|
|||||||
[Serial Numbers]
|
[Serial Numbers]
|
||||||
1=
|
1=
|
||||||
cm=
|
cm=
|
||||||
v=
|
|
||||||
[Info]
|
[Info]
|
||||||
case=
|
case=
|
Loading…
x
Reference in New Issue
Block a user