emp1_09.cpp

该包是数据结构的实验软件,来源于合肥工业大学人工智能与数据挖掘实验室,用来实现数据结构.

//    {emp1_09}
#include"tools.h"

const int    comgrcreatedatastru=401;
const int    commodidatastru=402;
const int    comreaddatastru=403;
const int    comsavedatastru=404;
const int    comsetrange=405;
const int    comdisp=406;
const int    commove1=407;
const int    commove2=408;
mymenu     datastrumenu1;
pmenunode bmp,bb;
string	yn1;
char yn,ch;
int  n;

   void  Handle_datastru_event(pmenunode pmenu)
     {switch(pmenu->command)
       {
       case	     comgrcreatedatastru: Dispstrinwnd(20,5," Create datastrcture");  break;
       case	     commodidatastru:     Dispstrinwnd(20,5," Modify datastrcture");  break;
       case	     comreaddatastru:     Dispstrinwnd(20,5," Read datastrcture ");   break;
       case	     comsavedatastru:     Dispstrinwnd(20,5,"  Save datastrcture ");  break;
       case	     comsetrange:         Dispstrinwnd(20,5," Set datastru Range ");  break;
       case	     comdisp:             Dispstrinwnd(20,5," Display datastrcture"); break;
       case	     commove1:            Dispstrinwnd(20,5," Move1 datastrcture,clear original area"); break;
       case	     commove2:            Dispstrinwnd(20,5," Move2 datastrcture,not clear original area"); break;
      }
}
   void Handle_datastru_menu(mymenu& datastrumenu1,  boolean& selectorno,
			      pmenunode& pmenu)
    {
	 Mymenu_selectmenu( datastrumenu1,pmenu,selectorno);
	  if (selectorno)
	     if (Mymenu_issubmenuitem(datastrumenu1)  )
		     {
			Mymenu_clear_cursubmenu(datastrumenu1);
			Handle_datastru_event(pmenu);
		     }
	     else
		 return ;
	else
	      return ;
}

void  Get_datastructure()
      { do

	    Handle_datastru_menu(datastrumenu1,selectorno,pmenu);

	while(strcmp(pmenu->menuname,"返回") );//返回';
	    Mymenu_clearmainmenu(datastrumenu1);
	    Mymenu_reset_cursubmenu(datastrumenu1);
      }


   main()
   {Into_graph() ;

   setbkcolor(BLUE);
    bmp=Newmenu1(
	   Newsubmenu1("建数据结构",


	      Newmenu1(
		Newitem1("建新结构"," ",0,0,comgrcreatedatastru,
		Newitem1("修改原结构"," ",0,0,commodidatastru,
		Newitem1("读文件"," ",0,0,comreaddatastru,
		Newitem1("存盘"," ",0,0,comsavedatastru,
		nil))))),


	     Newsubmenu1("显示结构",

		 Newmenu1(
		     Newitem1("设定显示区域"," ",0,0,comsetrange,
		     Newitem1("按原定位置显示"," ",0,0,comdisp,
		     Newitem1("平移显示 并清除原位"," ",0,0,commove1,
		     Newitem1("平移显示 不清除原位"," ",0,0,commove2,
		     nil))))),

			 Newsubmenu1("返回",nil,nil)
			 )
		   )
	 );



   mymenu datastrumenu2,datastrumenu;
		  //	Mymenu_init(datastrumenu,bmp);
		   bb=Copymenu1(bmp);
		//Mymenu_init(datastrumenu2,bb);
	       //	Copyandappmenu(datastrumenu,datastrumenu2,datastrumenu1 );
		pmenunode pp=Linkmenup(bb,bmp);
		Mymenu_init(datastrumenu1,pp);

	Get_datastructure();
       Mymenu_check(datastrumenu1);
       //Mymenu_done(datastrumenu);
       //Mymenu_done(datastrumenu1);
       ///Mymenu_done(datastrumenu2);
}