The script also contains a function called Zoom(), with the AHK version 1.1.27, it can be renamed to Scale()
Dependency:
ScreenShot:
Hotkeys:
Code: Select all
#NoEnv
#SingleInstance, Force
CoordMode, Mouse, Screen
r := 50, d := 100
Gui, +AlwaysOnTop ; always on top
Gui, -Caption ; no titlebar
Gui, +Owner ; no taskbar button
Gui, +hWndhGui ; handle
Gui, +E0x00000020 ; WS_EX_TRANSPARENT (click through)
Gui, +E0x00080000 ; WS_EX_LAYERED
Gui, Show, NA
Gdip_Startup()
hDC := CreateCompatibleDC()
hBM := CreateDIBSection(d, d)
oBM := SelectObject(hDC, hBM)
Graph := Gdip_GraphicsFromHdc(hDC)
Brush := Gdip_BrushCreateSolid(0x40FFFF00) ; (alpha) RGB
Return
;-------------------------------------------------------------------------------
F12:: ; toggle circle on/off
;-------------------------------------------------------------------------------
If Toggle := !Toggle {
Gdip_FillEllipse(Graph, Brush, 0, 0, d, d)
SetTimer, Update, 10
}
Else {
SetTimer, Update, Off
Gdip_GraphicsClear(Graph)
UpdateLayeredWindow(hGui, hDC, mX-r, mY-r, d, d)
}
Return
;-------------------------------------------------------------------------------
Update: ; update layered window
;-------------------------------------------------------------------------------
MouseGetPos, mX, mY
UpdateLayeredWindow(hGui, hDC, mX-r, mY-r, d, d)
Return
Code: Select all
Gdip_FillRectangle(pGraphics, Brush.Back, 0, 0, Width-1, Height-1)
Code: Select all
Gdip_FillRectangle(pGraphics, Brush.Back, -1, -1, Width+1, Height+1)
Code: Select all
01/18/2018 08:54 PM 1,457 Create.ahk
01/18/2018 09:53 PM 2,430 Events.ahk
01/18/2018 09:04 PM 1,930 Gdip.Helper.ahk
12/18/2017 06:29 PM 131,708 Gdip_All.ahk
01/18/2018 07:01 PM 1,946 INI.Handler.ahk
01/18/2018 09:57 PM 6,256 MainCode.ahk
Hehe, I remember thatwith the AHK version 1.1.27, it can be renamed to Scale()
Code: Select all
;-------------------------------------------------------------------------------
GuiCreate: ; create the graphical user interface
;-------------------------------------------------------------------------------
Gui, +hwndhClock -Caption
hDC_Window := GetDC(hClock)
Code: Select all
;-------------------------------------------------------------------------------
GuiCreate: ; create the graphical user interface
;-------------------------------------------------------------------------------
Gui, +hwndhClock -Caption +ToolWindow
hDC_Window := GetDC(hClock)
Return to “Gaming Scripts (v1)”
Users browsing this forum: No registered users and 38 guests