; To change the I-Beam when over EmEditor's Edit control 
; Date: 19/09/2007  ;Last Updated: 19/09/2007
; Refer: http://www.donationcoder.com/Forums/bb/index.php?topic=9939.0
; Requires: NoMousy (http://www.apps4apps.filetap.com/nomousy.html)

#SingleInstance force
#Persistent
DetectHiddenWindows On
SetTitleMatchMode 2

appname=NoMousy Helper Script  ; to get a better name
vernum=1.0
appdesc=Hides the I-Beam when in EmEditor.
emEditMain=EmEditorMainFrame3 ;main program
Menu, tray, NoStandard 
Menu, tray, DeleteAll 
Menu, tray, Icon, %A_ScriptDir%\nomousy.exe, 0 ; NoMousy icon
Menu, tray, Tip, %appname% v%vernum%` - `n%appdesc%
Menu, tray, Add, Discuss about this program at DonationCoder.com, DC-Forum
Menu, tray, Add, Quit, ExitSub

OnExit, ExitSub
GoSub, Timer
Return

DC-Forum:
;Discuss about this program at DonationCoder.com
Run, http://www.donationcoder.com/Forums/bb/index.php?topic=9939.new#new
Return

Timer:
Sleep, 2000
SetTimer, CheckCursor, 1500
Return

CheckCursor:
MouseGetPos, , , id, control
WinGetClass, class, ahk_id %id%
IfInString, emEditMain, %class%
{
    Run, %A_ScriptDir%\nomousy.exe -ib ;hide I-Beam
    SetTimer, CheckCursor, Off  
    GoSub, Timer
}
Else
{
    Run, %A_ScriptDir%\nomousy.exe     ;restore
    SetTimer, CheckCursor, Off  
    GoSub, Timer
}
Return

ExitSub:
;OnExit restore cursor
Run, %A_ScriptDir%\nomousy.exe     ;restore
ExitApp