GetAcad()
{
 try 
 {
  global ACAD := ComObjActive("AutoCAD.Application") ; GetObject
  TrayTip, % "Connected to Autocad. Version " ACAD.version,% "Active drawing:  "ACAD.activedocument.name, 1, 17
 }
}


; Create the popup menu by adding some items to it.
Menu, MyMenu, Add, Verbinden, MenuHandler81
Menu, MyMenu, Add, Teilen, MenuHandler103
Menu, MyMenu, Add, Umkehr, MenuHandler104

; Create another menu destined to become a submenu of the above menu.
;Menu, Submenu1, Add, Item1, MenuHandler
;Menu, Submenu1, Add, Item2, MenuHandler

; Create a submenu in the first menu (a right-arrow indicator). When the user selects it, the second menu is displayed.
;Menu, MyMenu, Add, My Submenu, :Submenu1

;Menu, MyMenu, Add  ; Add a separator line below the submenu.
;Menu, MyMenu, Add, Item3, MenuHandler  ; Add another menu item beneath the submenu.
return  ; End of script's auto-execute section.

MenuHandler81:
GetAcad() acad.activedocument.sendcommand("_join`n")
return
MenuHandler103:
GetAcad() acad.activedocument.sendcommand("_break TEMP`n")
return
MenuHandler104:
GetAcad() acad.activedocument.sendcommand("_reverse`n")
return

#IfWinActive,Auto
^MButton:: Menu, MyMenu, Show   
return