HotKeySet( "[","PatientHistory") Func PatientHistory() Send("h") Send("{TAB}{END}");Opens Patient History EndFunc While 1 WEnd #cs MouseClick("left",2050,220,1) #ce