how to create a dropdown menu in Hyperworks X using TCL commands

In Hyperworks X 2021, I would like to create a dropdown menu which looks something like this.

Instead of using XML extensions I prefer to use the hmcustomtcl file to automatically create the menu when Hyperworks X is launched