Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
- ; #Warn ; Enable warnings to assist with detecting common errors.
- SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
- SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
- ;CustomColor := "EEAA99" ; Can be any RGB color (it will be made transparent below).
- CustomColor := "000000" ; Can be any RGB color (it will be made transparent below). ; 000000 = black background
- ;Gui +LastFound +AlwaysOnTop -Caption +Border +ToolWindow ; +ToolWindow avoids a taskbar button and an alt-tab menu item.
- Gui +LastFound +AlwaysOnTop +Border +ToolWindow ; +ToolWindow avoids a taskbar button and an alt-tab menu item. ; I modified copied the ablove line then (removed) (-Caption) from it, this revelas the Title Bar and allws the GUI to be draggable.
- Gui, Color, %CustomColor%
- ;Gui, Font, s12 ; Set font size (12-point).
- Gui, Font, s10 ; Set font size (10-point).
- ;Gui, Add, Text, Center vMyText cLime, 105 YYYYY ; XX & YY serve to auto-size the window.
- Gui, Add, Text, Center vMyText cLime, XXXXXX YYYYYY ; XX & YY serve to auto-size the window.
- ; Make all pixels of this color transparent and make the text itself translucent (150):
- ;WinSet, TransColor, %CustomColor% 255 ;0-255 sets the transparancy level
- SetTimer, UpdateOSD, 200
- Gosub, UpdateOSD ; Make the first update immediate rather than waiting for the timer.
- ;Gui, Show, x1700 y1000 NoActivate ; NoActivate avoids deactivating the currently active window.
- Gui, Show, NoActivate ; NoActivate avoids deactivating the currently active window.
- return
- GuiSize:
- GuiControl, MoveDraw, WinText, x0 w%A_GuiWidth%
- UpdateOSD:
- MouseGetPos, MouseX, MouseY
- GuiControl,, MyText,X: %MouseX% | Y: %MouseY%
- return
- GuiClose: ; User closed the window.
- ExitApp
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement