; ----------------------------------------------------------------------------
;
; AutoIt-Version: v3.2.0.1
;
; Programmname:   Toolbox
; Version:        1.00
;
; Autor:          Manuel Kübler
; Mail:           mk-software@gmx.de
;
; Skript Function:
;    Systemsteuerung als Menü
;    wichtige Programme als Menü
;    Arbeitsplatz als Menü
;
; ----------------------------------------------------------------------------


; ----------------------------------------------------------------------------

; Todo:

; - Bugs
;    -> Alle Bugs entfernen
;   - Manuel Kübler

; - Arbeitsplatz als Menü
;    -> Alle Laufwerke
;   - Offen


; Done:

; - Eigene Dateien
;    -> Eigene Dateien-Link
;   - Manuel Kübler

; - Systemsteuerung als Menü
;    -> Anzeige, Automatische Updates, ...
;   - Manuel Kübler
; ----------------------------------------------------------------------------


; ============================================================================
; ----------------------------------------
; AutoIT Options
; ----------------------------------------
;Opt("GUIOnEventMode", 1)
Opt("TrayIconDebug", 0)   ; TESTING später entfernen, eigenes TrayMenü bauen
Opt("TrayMenuMode", 1)    ; Default tray menu items (Script Paused/Exit) will not be shown.
Opt("TrayOnEventMode", 1)

; ----------------------------------------
; Include
; ----------------------------------------
#Include <Constants.au3>
#Include <Process.au3>

; ----------------------------------------
; Variablen-Deklarationen
; ----------------------------------------
Global $PROGRAMM_NAME = "Toolbox"
Global $PROGRAMM_VERSION = "1.00"
Global $target_reader = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Adobe\Acrobat Reader\7.0\Installer", "Path")
; ============================================================================


; ============================================================================

; ----------------------------------------
; TrayMenu
; ----------------------------------------
$Dateien = TrayCreateItem("Eigene Dateien")
TrayItemSetOnEvent(-1, "_dateien")
TrayCreateItem("")
$Programme = TrayCreateMenu("Programme")
$Programme_Editor = TrayCreateItem("Editor", $Programme)
TrayItemSetOnEvent(-1, "_editor")
$Programme_CMD = TrayCreateItem("Eingabeaufforderung", $Programme)
TrayItemSetOnEvent(-1, "_cmd")
$Programme_Regedit = TrayCreateItem("Registrierungs-Editor", $Programme)
TrayItemSetOnEvent(-1, "_regedit")
$Programme_Restore = TrayCreateItem("Systemwiederherstellung", $Programme)
TrayItemSetOnEvent(-1, "_restore")
TrayCreateItem("", $Programme)
If FileExists(@ProgramFilesDir & "\AutoIt3") Then
	$Programme_AutoIT = TrayCreateMenu("AutoIT", $Programme)
	$Programme_AutoIT_Au3Info = TrayCreateItem("AutoIt Window Info", $Programme_AutoIT)
	TrayItemSetOnEvent(-1, "_au3info")
	$Programme_AutoIT_Aut2Exe = TrayCreateItem("Compile Script to .exe", $Programme_AutoIT)
	TrayItemSetOnEvent(-1, "_aut2exe")
	$Programme_AutoIT_AutoIt3 = TrayCreateItem("Run Script", $Programme_AutoIT)
	TrayItemSetOnEvent(-1, "_autoit3")
EndIf
If FileExists($target_reader & "\Reader\AcroRd32.exe") Then
	$Programme_Reader = TrayCreateItem("Adobe Reader", $Programme)
	TrayItemSetOnEvent(-1, "_reader")
EndIf
If FileExists(@ProgramFilesDir & "\Mozilla Firefox\firefox.exe") Then
	$Programme_Firefox = TrayCreateItem("Mozilla Firefox", $Programme)
	TrayItemSetOnEvent(-1, "_firefox")
EndIf
If FileExists(@ProgramFilesDir & "\Mozilla Thunderbird\thunderbird.exe") Then
	$Programme_Thunderbird = TrayCreateItem("Mozilla Thunderbird", $Programme)
	TrayItemSetOnEvent(-1, "_thunderbird")
EndIf
TrayCreateItem("")

; ----------------------------------------
; Systemsteuerung
; ----------------------------------------
; Systemsteuerung
$Systemsteuerung = TrayCreateMenu("Systemsteuerung")
TrayItemSetOnEvent(-1, "_open_systemsteuerung")
;  Anzeige
$Systemsteuerung_Anzeige = TrayCreateItem("Anzeige", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_anzeige")
;  Automatische Updates
$Systemsteuerung_Updates = TrayCreateItem("Automatische Updates", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_updates")
;  Benutzerkonten
$Systemsteuerung_Benutzer = TrayCreateItem("Benutzerkonten", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_benutzer")
;  Datum und Uhrzeit
$Systemsteuerung_Datum = TrayCreateItem("Datum und Uhrzeit", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_datum")
;  Drahtlosnetzwerkinstallation
$Systemsteuerung_Draht = TrayCreateItem("Drahtlosnetzwerkinstallation", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_draht")
;  Drucker und Faxgeräte
$Systemsteuerung_Drucker = TrayCreateItem("Drucker und Faxgeräte", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_drucker")
;  Eingabehilfe
$Systemsteuerung_Eingabe = TrayCreateItem("Eingabehilfe", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_eingabe")
;  Energieoptionen
$Systemsteuerung_Energie = TrayCreateItem("Energieoptionen", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_energie")
;  Gamecontroller
$Systemsteuerung_Game = TrayCreateItem("Gamecontroller", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_game")
;  Geplante Tasks
$Systemsteuerung_Tasks = TrayCreateItem("Geplante Tasks", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_tasks")
;  Hardware
$Systemsteuerung_Hardware = TrayCreateItem("Hardware", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_hardware")
;  Internetoptionen
$Systemsteuerung_Internet = TrayCreateItem("Internetoptionen", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_internet")
;  Mail
$Systemsteuerung_Mail = TrayCreateItem("Mail", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_mail")
;  Maus
$Systemsteuerung_Maus = TrayCreateItem("Maus", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_maus")
;  Netzwerkinstallations-Assistent
$Systemsteuerung_Netzwerkinstall = TrayCreateItem("Netzwerkinstallations-Assistent", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_netzwerkinstall")
;  Netzwerkverbindungen
$Systemsteuerung_Netzwerk = TrayCreateItem("Netzwerkverbindungen", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_netzwerk")
;  Ordneroptionen
$Systemsteuerung_Ordner = TrayCreateItem("Ordneroptionen", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_ordner")
;  Regions- und Sprachoptionen
$Systemsteuerung_Region = TrayCreateItem("Regions- und Sprachoptionen", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_region")
;  Scanner und Kameras
$Systemsteuerung_Scanner = TrayCreateItem("Scanner und Kameras", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_scanner")
;  Schriftarten
$Systemsteuerung_Schrift = TrayCreateItem("Schriftarten", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_schrift")
;  Sicherheitscenter
$Systemsteuerung_Sicherheit = TrayCreateItem("Sicherheitscenter", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_sicherheit")
;  Software
$Systemsteuerung_Software = TrayCreateItem("Software", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_software")
;  Sounds und Audiogeräte
$Systemsteuerung_Sound = TrayCreateItem("Sounds und Audiogeräte", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_sound")
;  Sprachein-/ausgabe
$Systemsteuerung_Sprache = TrayCreateItem("Sprachein-/ausgabe", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_sprache")
;  System
$Systemsteuerung_System = TrayCreateItem("System", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_system")
;  Taskleiste und Startmenü
$Systemsteuerung_Startmenue = TrayCreateItem("Taskleiste und Startmenü", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_startmenue")
;  Tastatur
$Systemsteuerung_Tastatur = TrayCreateItem("Tastatur", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_tastatur")
;  Telefon- und Modemoptionen
$Systemsteuerung_Telefon = TrayCreateItem("Telefon- und Modemoptionen", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_telefon")
;  Verwaltung
$Systemsteuerung_Verwaltung = TrayCreateItem("Verwaltung", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_verwaltung")
;  Windows-Firewall
$Systemsteuerung_Firewall = TrayCreateItem("Windows-Firewall", $Systemsteuerung)
TrayItemSetOnEvent(-1, "_open_firewall")
; ----------------------------------------------------------------------------

TrayCreateItem("")
$Explorer	= TrayCreateMenu("Arbeitsplatz")
TrayCreateItem("(Leer)", $Explorer)
TrayCreateItem("")
$Credits = TrayCreateItem("Credits")
TrayItemSetOnEvent(-1, "_credits")
TrayCreateItem("")
$Exit = TrayCreateItem("Beenden")
TrayItemSetOnEvent(-1, "_close")

TraySetState()

While 1
	Sleep(500)
WEnd
; ============================================================================

; ----------------------------------------
; Funktionen
; ----------------------------------------

; Eigene Dateien
Func _dateien()
	
	_RunDOS("start ::{450D8FBA-AD25-11D0-98A8-0800361B1103}")
	
EndFunc   ;==>_dateien
; ----------------------------------------------------------------------------

; ----------------------------------------
; Programme
; ----------------------------------------

; Editor
Func _editor()
	
	Run(@WindowsDir & "\NOTEPAD.EXE")
	
EndFunc   ;==>_editor

; Registrierungs-Editor
Func _regedit()
	
	Run(@WindowsDir & "\regedit.exe")
	
EndFunc   ;==>_regedit

; Systemwiederherstellung
Func _restore()
	
	Run(@SystemDir & "\Restore\rstrui.exe")
	
EndFunc   ;==>_restore

; Eingabeaufforderung
Func _cmd()
	
	Run(@SystemDir & "\cmd.exe")
	
EndFunc   ;==>_cmd

; Adobe Reader
Func _reader()
	
	Run($target_reader & "\Reader\AcroRd32.exe")
	
EndFunc   ;==>_reader

; Mozilla Firefox
Func _firefox()
	
	Run(@ProgramFilesDir & "\Mozilla Firefox\firefox.exe")
	
EndFunc   ;==>_firefox

; Mozilla Thunderbird
Func _thunderbird()
	
	Run(@ProgramFilesDir & "\Mozilla Thunderbird\thunderbird.exe")
	
EndFunc   ;==>_thunderbird

; ----------------------------------------
; AutoIT
; ----------------------------------------
; AutoIt Window Info
Func _au3info()
	
	Run(@ProgramFilesDir & "\AutoIt3\Au3Info.exe")
	
EndFunc   ;==>_au3info

; Compile Script to .exe
Func _aut2exe()
	
	Run(@ProgramFilesDir & "\AutoIt3\Aut2Exe\Aut2Exe.exe")
	
EndFunc   ;==>_aut2exe

; Run Script
Func _autoit3()
	
	Run(@ProgramFilesDir & "\AutoIt3\AutoIt3.exe")
	
EndFunc   ;==>_autoit3
; ----------------------------------------------------------------------------

; ----------------------------------------
; Systemsteuerung
; ----------------------------------------
; Systemsteuerung
Func _open_systemsteuerung()
	
	_RunDOS("start control.exe")
	
EndFunc   ;==>_systemsteuerung

;  Anzeige
Func _open_anzeige()
	
	_RunDOS("start control.exe desk.cpl")
	
EndFunc   ;==>_open_anzeige

;  Automatische Updates
Func _open_updates()
	
	_RunDOS("start control.exe wuaucpl.cpl")
	
EndFunc   ;==>_open_updates

;  Benutzerkonten
Func _open_benutzer()
	
	_RunDOS("start control.exe nusrmgr.cpl")
	
EndFunc   ;==>_open_benutzer

;  Datum und Uhrzeit
Func _open_datum()
	
	_RunDOS("start control.exe timedate.cpl")
	
EndFunc   ;==>_open_datum

;  Drahtlosnetzwerkinstallation
Func _open_draht()
	
	Run(@SystemDir & "\rundll32.exe shell32.dll,Control_RunDLL NetSetup.cpl,@0,WNSW")
	
EndFunc   ;==>_open_draht

;  Drucker und Faxgeräte
Func _open_drucker()
	
	_RunDOS("start ::{2227A280-3AEA-1069-A2DE-08002B30309D}")
	
EndFunc   ;==>_open_drucker

;  Eingabehilfe
Func _open_eingabe()
	
	_RunDOS("start control.exe access.cpl")
	
EndFunc   ;==>_open_eingabe

;  Energieoptionen
Func _open_energie()
	
	_RunDOS("start control.exe powercfg.cpl")
	
EndFunc   ;==>_open_energie

;  Gamecontroller
Func _open_game()
	
	_RunDOS("start control.exe joy.cpl")
	
EndFunc   ;==>_open_game

;  Geplante Tasks
Func _open_tasks()
	
	Run(@WindowsDir & "\explorer.exe ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}")
	
EndFunc   ;==>_open_tasks

;  Hardware
Func _open_hardware()
	
	_RunDOS("start control.exe hdwwiz.cpl")
	
EndFunc   ;==>_open_hardware

;  Internetoptionen
Func _open_internet()
	
	_RunDOS("start control.exe inetcpl.cpl")
	
EndFunc   ;==>_open_internet

;  Mail
Func _open_mail()
	
	_RunDOS("start control.exe")
	
EndFunc   ;==>_open_mail

;  Maus
Func _open_maus()
	
	_RunDOS("start control.exe main.cpl")
	
EndFunc   ;==>_open_maus

;  Netzwerkinstallations-Assistent
Func _open_netzwerkinstall()
	
	_RunDOS("start control.exe netsetup.cpl")
	
EndFunc   ;==>_open_netzwerkinstall

;  Netzwerkverbindungen
Func _open_netzwerk()
	
	_RunDOS("start control.exe ncpa.cpl")
	
EndFunc   ;==>_open_netzwerk

;  Ordneroptionen
Func _open_ordner()
	
	_RunDOS("start ::{6DFD7C5C-2451-11d3-A299-00C04F8EF6AF}")
	
EndFunc   ;==>_open_ordner

;  Regions- und Sprachoptionen
Func _open_region()
	
	_RunDOS("start control.exe intl.cpl")
	
EndFunc   ;==>_open_region

;  Scanner und Kameras
Func _open_scanner()
	
	_RunDOS("start control.exe")
	
EndFunc   ;==>_open_scanner

;  Schriftarten
Func _open_schrift()
	
	_RunDOS("start control.exe")
	
EndFunc   ;==>_open_schrift

;  Sicherheitscenter
Func _open_sicherheit()
	
	_RunDOS("start control.exe wscui.cpl")
	
EndFunc   ;==>_open_sicherheit

;  Software
Func _open_software()
	
	_RunDOS("start control.exe appwiz.cpl")
	
EndFunc   ;==>_open_software

;  Sounds und Audiogeräte
Func _open_sound()
	
	_RunDOS("start control.exe mmsys.cpl")
	
EndFunc   ;==>_open_sound

;  Sprachein-/ausgabe
Func _open_sprache()
	
	_RunDOS("start control.exe")
	
EndFunc   ;==>_open_sprache

;  System
Func _open_system()
	
	_RunDOS("start control.exe sysdm.cpl")
	
EndFunc   ;==>_open_system

;  Taskleiste und Startmenü
Func _open_startmenue()
	
	_RunDOS("start ::{48e7caab-b918-4e58-a94d-505519c795dc}")
	
EndFunc   ;==>_open_startmenue

;  Tastatur
Func _open_tastatur()
	
	_RunDOS("start control.exe")
	
EndFunc   ;==>_open_tastatur

;  Telefon- und Modemoptionen
Func _open_telefon()
	
	_RunDOS("start control.exe telephon.cpl")
	
EndFunc   ;==>_open_telefon

;  Verwaltung
Func _open_verwaltung()
	
	_RunDOS("start control.exe")
	
EndFunc   ;==>_open_verwaltung

;  Windows-Firewall
Func _open_firewall()
	
	_RunDOS("start control.exe firewall.cpl")
	
EndFunc   ;==>_open_firewall
; ----------------------------------------------------------------------------

; ----------------------------------------
; Arbeitsplatz
; ----------------------------------------








Func _credits()
	
	MsgBox(320, "Credits", "Programmname: " & $PROGRAMM_NAME & @CRLF & "Version: " & $PROGRAMM_VERSION & @CRLF & @CRLF & @CRLF & "Idee & Programmierung: Manuel Kübler")
	
EndFunc   ;==>_credits


Func _close()
	
	Exit
	
EndFunc   ;==>_close








; ----------------------------------------
; ...
; ----------------------------------------