; ---------------------------------------------------------------------------
; menu_cm4__jk.cmm
; ---------------------------------------------------------------------------
  PMACRO.EXPLICIT

  PRIVATE &username

  &username = OS.ENV(USERNAME)

; ---------------------------------------------------------------------------
  MENU.ReProgram
  (&+
    ADD
    MENU
    (
      POPUP "HoH&5"
      (
        DELETE "Prepare CM&4,F11"
        DELETE "Prepare &All Cores"
        DELETE "&Start All Cores"

;       MENUITEM "Prepare CM&4,ALT-X"   "Intercom M0 DO prepare_cm4.cmm"
        MENUITEM "Prepare &CM4,F11"     "Intercom M0 DO prepare_cm4.cmm"
        MENUITEM "Prepare &All Cores"   "InterCom M0 DO prepare_cmx.cmm"
        MENUITEM "&Start All Cores,F12" "InterCom M0 DO start_cmx.cmm"
        SEPARATOR
        MENUITEM "User&1 - GUI and ELF,ALT-1" "DO .\&username\user1.cmm"
        MENUITEM "User&2 - GUI,ALT-2"         "DO .\&username\user2.cmm"
        MENUITEM "User&3 - ELF,ALT-3"         "DO .\&username\user3.cmm"
        MENUITEM "User&4 - empty,ALT-4"       "DO .\&username\user4.cmm"
        MENUITEM "User&5 - empty,ALT-5"       "DO .\&username\user5.cmm"
      )
    )

    ADD
    TOOLBAR
    (
      ;         <tooltip>           <icon>         <command>
;     TOOLITEM  "Sync-Cores"        "[:correlate]" "DO sync_cmx.cmm"
;     TOOLITEM  "Prepare CM4"       "[:remove]"    "Intercom M0 DO prepare_cm4.cmm"
;     TOOLITEM  "Prepare All Cores" "[:removeall]" "InterCom M0 DO prepare_cmx.cmm"
;     TOOLITEM  "Start All Cores"   "[:rightpage]" "InterCom M0 DO start_cmx.cmm"
;     SEPARATOR
;//   TOOLITEM  "Prepare-ETM"       "[:apulist]"   "DO prepare_etm.cmm"
;//   TOOLITEM  "Prepare-ITM"       "[:alist]"     "DO prepare_itm.cmm"
;     TOOLITEM  "Prepare-OS"        "[,,   XXX    XXXX,  XXXXX  XXXXXX, XX   XX XX  XX, XX   XX XX, XX   XX XX, XX   XX  XXX, XX   XX   XXX, XX   XX     XX, XX   XX     XX, XX   XX XX  XX,  XXXXX  XXXXXX,   XXX    XXXX,,]" "DO prepare_itm_os_pc.cmm"
;     TOOLITEM  "Prepare-ITM"       "[,,uuuu uuuu u    u,uuuu uuuu uu  uu, uu   uu  uuuuuu, uu   uu  uuuuuu, uu   uu  uu  uu, uu   uu  uu  uu, uu   uu  uu  uu, uu   uu  uu  uu, uu   uu  uu  uu, uu   uu  uu  uu,uuuu  uu  uu  uu,uuuu  uu  uu  uu,,]"     "DO prepare_itm.cmm"
;     TOOLITEM  "Export-ITM"        "[:camera]"    "DO export_itm_csv.cmm"
;     SEPARATOR
;     TOOLITEM  "Prepare-ETM"       "[,,pppp pppp p    p,pppp pppp pp  pp,pp    pp  pppppp,pp    pp  pppppp,pp    pp  pp  pp,pppp  pp  pp  pp,pppp  pp  pp  pp,pp    pp  pp  pp,pp    pp  pp  pp,pp    pp  pp  pp,pppp  pp  pp  pp,pppp  pp  pp  pp,,]"     "DO prepare_etm_onchip.cmm"
      SEPARATOR
	  DELETE "User1"
	  DELETE "User2"
	  DELETE "User3"
	  DELETE "User4"
	  DELETE "User5"
      TOOLITEM  "User1 - GUI and ELF"  "[,       RR,      RRR,     RRRR,     RRRR,       RR,       RR,       RR,       RR,       RR,       RR,       RR,       RR,     RRRRRR,     RRRRRR,]" "DO .\&username\user1.cmm"
      TOOLITEM  "User2 - GUI"          "[,     BBBBB,    BBBBBBB,    BB   BB,         BB,         BB,        BBB,       BBB,      BBB,     BBB,    BBB,    BB,    BB,    BBBBBBB,    BBBBBBB,]" "DO .\&username\user2.cmm"
      TOOLITEM  "User3 - ELF"          "[,     GGGGG,    GGGGGGG,    GG   GG,         GG,         GG,         GG,       GGG,       GGGG,         GG,         GG,         GG,    GG   GG,    GGGGGGG,     GGGGG,]" "DO .\&username\user3.cmm"
      TOOLITEM  "User4 - empty"        "[,         MM,        MMM,       MMM,      MMM,     MMM,    MMM,    MM  MM,    MMMMMMMM,    MMMMMMMM,        MM,        MM,        MM,     MMMMMMM,     MMMMMMM,]" "DO .\&username\user4.cmm"
      TOOLITEM  "User5 - empty"        "[,    CCCCCCC,    CCCCCCC,    CC,    CC,    CC,    CC,    CCCCC,     CCCCC,        CCC,         CC,         CC,         CC,    CCCCCC,    CCCCC,]" "DO .\&username\user5.cmm"
;     SEPARATOR
;     TOOLITEM  "Watch-Live"        "[:alistcts]"  "Var.Watch %E %SpotLight"
;     SEPARATOR
    )
  )

  ENDDO