So it would be cool if you could comment on your script and tell us what might be useful or you just upload it so everybody can take a look.
Here is mine:
Spoiler:
Code: Select all
;Automatisches Reloaden beim Speichern
{
SetTimer,UPDATEDSCRIPT,1000
UPDATEDSCRIPT:
FileGetAttrib,attribs,%A_ScriptFullPath%
IfInString,attribs,A
{
FileSetAttrib,-A,%A_ScriptFullPath%
SplashTextOn,,,Script wurde aktualisiert,
Sleep,500
Reload
}
Return
}
;On Screen Display
OSD(text)
{
#Persistent
Progress, hide x1050 Y900 b1 w150 h27 zh0 FM10 cwEEEEEE ct111111,, %text%, AutoHotKeyProgressBar, Verdana BRK
WinSet, TransColor, 000000 120, AutoHotKeyProgressBar
Progress, show
SetTimer, RemoveToolTip, 1000
Return
RemoveToolTip:
SetTimer, RemoveToolTip, Off
Progress, Off
return
}
;Fenster hin und her schieben
MoveWindow(Cmd)
{
SysGet, MonitorCount, MonitorCount
if MonitorCount < 2
return
SysGet, Mon1, MonitorWorkArea, 1
SysGet, Mon2, MonitorWorkArea, 2
;MsgBox %Mon1Left% %Mon1Right% %Mon2Left% %Mon2Right%
WinGetActiveStats ,Title, Width, Height, x, y
WinGet, state, MinMax, A
if (state == 1)
WinRestore , A
if ((Cmd == "Left") and (X > Mon1Right-10)) ; 10 Pixel Toleranz
WinMove, %Title%, , %Mon1Left%, 0
else if ((Cmd == "Right") and (X < Mon2Left))
WinMove, %Title%, , %Mon2Left%, 0
if (state == 1)
WinMaximize , A
}
^,::Send {<}
^.::Send {>}
^-::Send {|}
;maus mit tastatur steuern
;*#up::MouseMove, 0, -10, 0, R ; Win + Pfeil oben => Zeiger nach oben bewegen
;*#Down::MouseMove, 0, 10, 0, R ; Win + Pfeil unten => Zeiger nach unten bewegen
;*#Left::MouseMove, -10, 0, 0, R ; Win + Pfeil links => Zeiger nach links bewegen
;*#Right::MouseMove, 10, 0, 0, R ; Win + Pfeil rechts => Zeiger nach rechts bewegen
#Break::Del
#PgUp::Home
#PgDn::End
#Del::Enter
;Für SSK
;LCtrl & d::Send {LWin Down}{d}{LWin Up}
;LCtrl & e::Send {LWin Down}{e}{LWin Up}
;Capslock zu Strg
;Capslock::Ctrl
;Nummernblock
;^h::Send ?
;^m::Send 1
;^,::Send 2
;^.::Send 3
;^j::Send 4
;^n::Send 0
;^k::Send 5
;^l::Send 6
;^u::Send 7
;^i::Send 8
;^o::Send 9
;Pfeiltasten
^j::Send {Left}
^i::Send {Up}
^k::Send {Down}
^l::Send {Right}
;Pfeiltasten mit capslock
CapsLock & j::Send {Left}
CapsLock & i::Send {Up}
CapsLock & k::Send {Down}
CapsLock & l::Send {Right}
CapsLock & u::Send {Home}
CapsLock & o::Send {End}
CapsLock & h::Send {PGUP}
CapsLock & n::Send {PGDN}
CapsLock & c::
SendInput ^c
return
CapsLock & v::
SendInput ^v
return
CapsLock & z::
SendInput ^z
return
CapsLock & s::
SendInput ^s
return
CapsLock & t::
SendInput ^t
return
CapsLock & w::
SendInput ^w
return
CapsLock & Space::
Send {BackSpace}
return
CapsLock & b::
SendInput !{F4}
return
;Für HHKB
^::BS
;& 1::Send {^}
^Space::bs
^u::Send {Home}
^o::Send {End}
;Lautstärke regeln
;^´::Send {Volume_Down 3}
;^#::Send {Volume_Up 3}
;^ß::Send {Volume_Mute}
;Textersetzungen
::mfg::Mit freundlichen Grüßen
::vg::Viele Grüße
;Taskmanager
RAlt & y::
Run taskmgr.exe
return
;Taschenrechner
RAlt & x::
Run calc.exe
return
;Edit Script
RAlt & v::Edit
;Mediatasten:
{
#F1::
Send {Media_Play_Pause}
return
#F2::
Send {Media_Stop}
return
#F3::
Send {Media_Prev}
return
#F4::
Send {Media_Next}
return
#F5::
Send {Volume_Down}
return
#F6::
Send {Volume_Up}
return
#F7::
Send {Volume_Mute}
return
}
;Rechtes Alt + ESc sendet Alt+F4
RAlt & Esc::Send !{F4}
RAlt & E::Send {€}
LAlt & j::Send {Home}
LAlt & l::Send {End}
LAlt & i::Send {PGUP}
LAlt & k::Send {PGDN}
ScrollLock::LWin
;G80-5000
{
LShift & F3::
SendInput ^c
return
LShift & F4::
SendInput ^v
return
LShift & F5::
SendInput ^x
return
LShift & F6::
SendInput ^a
return
LShift & F7::
Send, !{F4}
return
}
;Klammern usw
RAlt & u::Send ,(
return
RAlt & i::Send ,)
return
RAlt & j::Send ,{{}
return
RAlt & k::Send ,{}}
return
RAlt & m::Send ,[
return
RAlt & ,::Send ,]
return
Tell me your "tweeks".