Hehe,
Your menu  need work.   I have a temporary fix  for it.   Might have to apply it to add the menu too
I had to remove the clear menu. 
sub showMainMenu
;	menu Clear
	menu Window Title Multi-Shard ToolBox
	menu Window Color BtnFace
	menu Window Size 221 287
	menu Font Transparent #true
	menu Font Align Right
	menu Font Name MS Sans Serif