It's self-modifing! 8)
V1.0.1: Found a little error
/* This script shows a Calendar. If you click on a date this date is been put into the clipboard. A shift-click on a second date puts "FirstDate - SecondDate" into the clipboard. "strg-e" opens an InputBox. You may enter your prefered date-format there. You can not compile this script because it's self-modifing! There's no use to format the script with indents due to the self-modifing. All indents will be deleted after closing the Gui. Have fun! www.kapege.de */ #NoTrayIcon title=MiniCal IniRead, X, %A_ScriptFullPath%, Coord, x, 1 IniRead, Y, %A_ScriptFullPath%, Coord, y, 1 IniRead, F, %A_ScriptFullPath%, Coord, Format, 1 ; "+ToolWindow" prevents the MonthCal from appearing in the Alt-Tab list gui, +ToolWindow -MaximizeBox -LastFound -SysMenu ; +AlwaysOnTop gui, add, MonthCal, gDatum vADat Multi gui, show, x%X% y%Y% NoActivate, %title% return Datum: if A_GuiEvent=Normal { StringSplit, VonBis, ADat,- FormatTime, ADat1, %VonBis1%, %F% FormatTime, ADat2, %VonBis2%, %F% if (ADat1=ADat2) ADat=%ADat1% else ADat=%ADat1% - %ADat2% Clipboard=%ADat% } return ^e:: InputBox, Format, %title%, Enter new date format,,150,110,,,,,%F% if ErrorLevel = 0 { IniWrite, %Format%, %A_ScriptFullPath%, Coord, Format F := Format } return GUIEscape: GUIClose: WinGetPos, x, y,,,A IniWrite, %x%, %A_ScriptFullPath%, Coord, x IniWrite, %y%, %A_ScriptFullPath%, Coord, y ExitApp return ; Do not delete the next line with the /* !!! /* [Coord] x=100 y=300 Format=dd.MM.yyHave fun!