下载此文档

控制台程序——图形菜单.doc


文档分类:IT计算机 | 页数:约4页 举报非法文档有奖
1/4
下载提示
  • 1.该资料是网友上传的,本站提供全文预览,预览什么样,下载就什么样。
  • 2.下载该文档所得收入归上传者、原创者。
  • 3.下载的文档,不会出现我们的网址水印。
1/4 下载此文档
文档列表 文档介绍
#include<>#include<>#include<>#define Key_DOWN80#define Key_UP 72#define Key_A 30#defineKey_B 48#define Key_C 46#define Key_Q 16#define Key_ENTER28main(){intky,y=10;intkey();voidupbar(int);voiddownbar(int);textbackground(0);textcolor(WHITE);clrscr();textbackground(10);textcolor(RED);window(7,8,19,15);clrscr();textbackground(1);textcolor(RED);window(8,9,18,14);clrscr();gotoxy(3,2);cprintf("Q:quit");gotoxy(3,3);cprintf("A:dir");gotoxy(3,4);cprintf("B:dir/p");gotoxy(3,5);cprintf("C:dir/w");printf("\n\n");do{ky=key();switch(ky){ caseKey_A:y=11; ky=Key_ENTER; break; caseKey_B:y=12; ky=Key_ENTER; break; caseKey_C:y=13; ky=Key_ENTER; break; caseKey_Q:y=10; ky=Key_ENTER; break; caseKey_DOWN:if(y<13) downbar(y++); break; caseKey_UP:if(y>10) upbar(y--); break; caseKey_ENTER:break;}}while(ky!=Key_ENTER);switch(y){case10:exit(0); break;case11:system("dir"); getch(); break;case12:system("dir/p"); getch(); break;case13:system("dir/w"); getch(); break;}return0;}intkey(){unionREGSrg;=0;int86(0x16,&rg,&rg);;}voidupbar(inty){inti;typedefstructtexel_struct{unsignedcharch;unsignedcharattr;}texel;texelt;for(i=9;i<=17;i++){gettext(i,y,i,y,&t);=0x14;puttext(i,y,i,y,&t);gettext(i,y-1,i,y-1,&t);=0xcf;puttext(i,y-1,i,y-1,&t);}gotoxy(3,y-1);return;}voiddownbar(inty){inti;typedefstructtexel_struct{unsignedcharch;unsignedcharattr;}texel;texelt;for(i=9;i<=

控制台程序——图形菜单 来自淘豆网www.taodocs.com转载请标明出处.

非法内容举报中心
文档信息
  • 页数4
  • 收藏数0 收藏
  • 顶次数0
  • 上传人cx545616
  • 文件大小22 KB
  • 时间2019-09-21