#! ../mofe --f
mergeResources topLevel *background gray75

mMainWindow main topLevel

  mMenuBar menu_bar main
    mPulldownMenu mp1 menu_bar unmanaged
      mPushButton Edit mp1 \
	activateCallback "sV g editable true"
      mPushButton NoEdit mp1 \
	activateCallback "sV g editable false"
      mPushButton reOrient mp1 \
	activateCallback "sV g reorient true"
      mPushButton Quit mp1 \
	activateCallback quit
    mCascadeButton Actions menu_bar \
	subMenuId mp1

    mPulldownMenu mp2 menu_bar unmanaged
      mPushButton Help mp2 \
	activateCallback "manageChild helpbox"
      mPushButton Version mp2 \
	activateCallback "manageChild versionbox"
    mCascadeButton Help menu_bar \
	subMenuId mp2

   mGraph g main \
	autoLayoutMode false reLayout false

      mToggleButton a g  x 5 y 5 
      mToggleButton b g  x 125 y 40 
      mToggleButton c g x 20 y 90
      mToggleButton d g x 120 y 150 

      mArc a1 g arcDirection DIRECTED from a to b \
	labelString "Hi, there!" mapLabel true
      mArc a2 g arcDirection DIRECTED from b to c
      mArc a3 g arcDirection DIRECTED from c to d
      mArc a4 g arcDirection DIRECTED from d to c
      mArc a5 g arcDirection DIRECTED from d to b

mMainWindowSetAreas main menu_bar NULL NULL NULL g
sV menu_bar menuHelpWidget Help
realize

mMessageDialog versionbox mp2 unmanaged \
	dialogTitle "Motif Demo Program using XmGraph" \
	okLabelString "Close" \
	messageString "@(#)m-graphdemo Version 0.00001, Jan 15, 1993"

mMessageDialog helpbox mp2 unmanaged \
	dialogTitle "m-er Help" \
	okLabelString "Close" \
	messageString "This program is a simple demo program for XmGraph."


unmanageChild \
	versionbox.[mMessageBoxGetChild versionbox DIALOG_CANCEL_BUTTON] \
	versionbox.[mMessageBoxGetChild versionbox DIALOG_HELP_BUTTON] \
	helpbox.[mMessageBoxGetChild helpbox DIALOG_CANCEL_BUTTON] \
	helpbox.[mMessageBoxGetChild helpbox DIALOG_HELP_BUTTON] 
