To take from that post, I modified his code just a bit so the hotkey is the left mouse button and the graphic is now a bullseye.
The graphic can be any wingding character. again this is an AHK script.
;
; AutoHotkey Version: 1.x
; Language: English
; Platform: Win9x/NT
; Author: A.N.Other <
[email protected]>
;
; Script Function:
;
Template script (you can customize this template by editing "ShellNew\Template.ahk" in your Windows folder)
;
#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
#SingleInstance,Force
SetWinDelay,0
DetectHiddenWindows,On
CoordMode,Mouse,Screen
Gosub,INI
Gosub,TRAYMENU
Return
DOWN:
down=1
Loop,2
{
MouseGetPos,x,y
size:=size%A_Index%
width:=size%A_Index%*1.4
height:=size%A_Index%*1.4
color:=color%A_Index%
boldness:=boldness%A_Index%
Gui,%A_Index%:Destroy
Gui,%A_Index%:+Owner +AlwaysOnTop -Resize -SysMenu -MinimizeBox -MaximizeBox -Disabled -Caption -Border -ToolWindow
Gui,%A_Index%:Margin,0,0
Gui,%A_Index%:Color,123456
Gui,%A_Index%:Font,C%color% S%size% W%boldness%,Wingdings
Gui,%A_Index%:Add,Text,,ยค
Gui,%A_Index%:Show,X-%width% Y-%height% W%width% H%height% NoActivate,MouseMark%A_Index%
WinSet,TransColor,123456,MouseMark%A_Index%
}
Loop
{
Loop,2
{
MouseGetPos,x,y
WinMove,MouseMark%A_Index%,,% x-size%A_Index%/1.7,% y-size%A_Index%/1.4
WinShow,MouseMark%A_Index%
Sleep,%delay%
WinHide,MouseMark%A_Index%
Sleep,%delay%
If down=0
Return
}
}
Return
UP:
down=0
Loop,2
{
Gui,%A_Index%:Destroy
}
Return
TRAYMENU:
Menu,Tray,NoStandard
Menu,Tray,DeleteAll
Menu,Tray,Add,MouseMark,ABOUT
Menu,Tray,Add,
Menu,Tray,Add,&Settings...,SETTINGS
Menu,Tray,Add,&About...,ABOUT
Menu,Tray,Add,E&xit,EXIT
Menu,Tray,Default,MouseMark
Menu,Tray,Tip,MouseMark
Return
SETTINGS:
HotKey,%hotkey%,Off
HotKey,%hotkey% Up,Off
Gui,Destroy
Gui,Add,GroupBox,xm ym w400 h70,&Hotkey
Gui,Add,Hotkey,xp+10 yp+20 w380 vshotkey
StringReplace,current,hotkey,+,Shift +%A_Space%
StringReplace,current,current,^,Ctrl +%A_Space%
StringReplace,current,current,!,Alt +%A_Space%
Gui,Add,Text,,Current hotkey: %current%
Gui,Add,GroupBox,xm y+20 w400 h50,&Delay
Gui,Add,Edit,xp+10 yp+20 w380 vsdelay,%delay%
Gui,Add,GroupBox,xm y+20 w400 h110,Mark &1
Gui,Add,Text,xp+10 yp+20,&Size1:
Gui,Add,Edit,xm+100 yp w290 vssize1,%size1%
Gui,Add,Text,xm+10 y+10,Colo&r1:
Gui,Add,Edit,xm+100 yp w290 vscolor1,%color1%
Gui,Add,Text,xm+10 y+10,&Boldness1:
Gui,Add,Edit,xm+100 yp w290 vsboldness1,%boldness1%
Gui,Add,GroupBox,xm y+20 w400 h110,Mark &2
Gui,Add,Text,xp+10 yp+20,S&ize2:
Gui,Add,Edit,xm+100 yp w290 vssize2,%size2%
Gui,Add,Text,xm+10 y+10,Co&lor2:
Gui,Add,Edit,xm+100 yp w290 vscolor2,%color2%
Gui,Add,Text,xm+10 y+10,Bol&dness2:
Gui,Add,Edit,xm+100 yp w290 vsboldness2,%boldness2%
Gui,Add,Button,xm y+10 w75 GSETTINGSOK,&OK
Gui,Add,Button,x+5 w75 GSETTINGSCANCEL,&Cancel
Gui,Show,,MouseMark Settings
Return
SETTINGSOK:
Gui,Submit
If shotkey<>
{
hotkey:=shotkey
HotKey,%hotkey%,DOWN
HotKey,%hotkey% Up,UP
}
HotKey,%hotkey%,On
HotKey,%hotkey% Up,On
If sdelay<>
delay:=sdelay
If ssize1<>
size1:=ssize1
If ssize2<>
size2:=ssize2
If scolor1<>
color1:=scolor1
If scolor2<>
color2:=scolor2
If sboldness1<>
boldness1:=sboldness1
If sboldness2<>
boldness2:=sboldness2
IniWrite,%hotkey%,MouseMark.ini,Settings,hotkey
IniWrite,%delay%,MouseMark.ini,Settings,delay
IniWrite,%size1%,MouseMark.ini,Settings,size1
IniWrite,%size2%,MouseMark.ini,Settings,size2
IniWrite,%color1%,MouseMark.ini,Settings,color1
IniWrite,%color2%,MouseMark.ini,Settings,color2
IniWrite,%boldness1%,MouseMark.ini,Settings,boldness1
IniWrite,%boldness2%,MouseMark.ini,Settings,boldness2
Return
SETTINGSCANCEL:
HotKey,%hotkey%,DOWN,On
HotKey,%hotkey% Up,UP,On
HotKey,%hotkey%,On
HotKey,%hotkey% Up,On
Gui,Destroy
Return
INI:
IfNotExist,MouseMark.ini
{
IniWrite,~LButton,MouseMark.ini,Settings,hotkey
IniWrite,200,MouseMark.ini,Settings,delay
IniWrite,50,MouseMark.ini,Settings,size1
IniWrite,150,MouseMark.ini,Settings,size2
IniWrite,FF0000,MouseMark.ini,Settings,color1
IniWrite,0000FF,MouseMark.ini,Settings,color2
IniWrite,1,MouseMark.ini,Settings,boldness1
IniWrite,2,MouseMark.ini,Settings,boldness2
}
IniRead,hotkey,MouseMark.ini,Settings,hotkey
IniRead,delay,MouseMark.ini,Settings,delay
IniRead,size1,MouseMark.ini,Settings,size1
IniRead,size2,MouseMark.ini,Settings,size2
IniRead,color1,MouseMark.ini,Settings,color1
IniRead,color2,MouseMark.ini,Settings,color2
IniRead,boldness1,MouseMark.ini,Settings,boldness1
IniRead,boldness2,MouseMark.ini,Settings,boldness2
HotKey,%hotkey%,DOWN
HotKey,%hotkey% Up,UP
Return
ABOUT:
Gui,Destroy
Gui,Add,Picture,Icon1,MouseMark.exe
Gui,Font,Bold
Gui,Add,Text,x+10 yp+10,MouseMark v1.0
Gui,Font
Gui,Add,Text,xm,Press Ctrl+M to locate the mouse.
Gui,Add,Text,xm,To change the settings, choose Settings in the tray menu.
Gui,Add,Text,xm y+15,Made using AutoHotkey -
Gui,Font,CBlue Underline
Gui,Add,Text,x+5 GAUTOHOTKEY,http://www.autohotkey.com
Gui,Font
Gui,Add,Text,xm,`t
Gui,Add,Picture,Icon2,MouseMark.exe
Gui,Font,Bold
Gui,Add,Text,x+10 yp+10,1 Hour Software by Skrommel
Gui,Font
Gui,Add,Text,xm,For more tools and information, please stop by at
Gui,Font,CBlue Underline
Gui,Add,Text,xm GWWW,https://www.donationcoder.com/Software/Skrommel
Gui,Font
Gui,Add,Button,GABOUTOK Default xm+220 y+20 w75,&OK
Gui,Show,,ShiftOff About
about=
Return
AUTOHOTKEY:
Run,http://www.autohotkey.com,,UseErrorLevel
Return
WWW:
Run,https://www.donationcoder.com/Software/Skrommel,,UseErrorLevel
Return
ABOUTOK:
Gui,Destroy
Return
EXIT:
ExitApp
Show Posts
MouseMark - Press Ctrl+M to locate the mouse.
