| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 899 人关注过本帖
标题:[休闲]制作文字菜单
只看楼主 加入收藏
田里兵蜂
Rank: 1
等 级:新手上路
威 望:2
帖 子:604
专家分:0
注 册:2007-1-29
收藏
 问题点数:0 回复次数:1 
[休闲]制作文字菜单

#include <stdlib.h>
#include <conio.h>
#include <dos.h>
#include <string.h>

/*定义各键的bioskey(0)的按键返回值*/
#define Key_DOWN 0x5000
#define Key_UP 0x4800
#define Key_A 0x1e41
#define Key_a 0x1e61
#define Key_B 0x3042
#define Key_b 0x3062
#define Key_C 0x2e43
#define Key_c 0x2e63
#define Key_E 0x1245
#define Key_e 0x1265
#define Key_ENTER 0x1c0d

/*用户选择的行,缺省为0*/
int activeline=0;
/*存储用户选择区*/
char buf[8*4*2];

/*用来激活用户选择的行*/
void modicolor(char *buf,int active)
{ int red=(WHITE+(RED<<4)); /*红底白字*/
int white=(WHITE+(BLUE<<4)); /*蓝底白字*/
int i=1;
while(i<=63)
{
if (i/16==active){
if ((i%2)!=0)
*(buf+i)=red;
}
else if((i%2)!=0)
*(buf+i)=white;
i+=2;
}
activeline=active;
puttext(9,10,16,13,buf);
}

int main()
{
int ky=0;
char ch;
textattr(WHITE+(BLACK<<4));
clrscr();

textmode(C80);
textattr(RED+(5<<4));
window(7,8,19,15); /*生成一个洋红色窗口*/
clrscr();
textattr(WHITE+(BLUE<<4));
window(8,9,18,14); /*洋红色窗口内嵌一个蓝色窗口*/
clrscr();
gotoxy(3,2);
cprintf("E:exit");
gotoxy(3,3);
cprintf("A:dir");
gotoxy(3,4);
cprintf("B:dir/p");
gotoxy(3,5);
cprintf("C:dir/w\r\n");
gettext(9,10,16,13,buf);
modicolor(buf,0);

while(ky!=Key_E && ky!=Key_e)
{
ky=bioskey(0);
switch(ky)
{
case Key_UP:

if (activeline==0){
modicolor(buf,3);
break;
}
if (activeline!=0){
modicolor(buf,--activeline);
break;
}
case Key_DOWN:
if (activeline==3){
modicolor(buf,0);
break;
}
if (activeline!=3){
modicolor(buf,++activeline);
break;
}
case Key_ENTER:
if (activeline==0) exit(0);
if (activeline==1) goto dir;
if (activeline==2) goto dirp;
if (activeline==3) goto dirw;
case Key_A:
case Key_a:
dir: system("dir");
getch();
modicolor(buf,activeline);
break;
case Key_B:
case Key_b:
dirp: system("dir /p");
getch();
modicolor(buf,activeline);
break;
case Key_C:
case Key_c:
dirw: system("dir /w");
getch();
modicolor(buf,activeline);
break;
}

}

}


图片附件: 游客没有浏览图片的权限,请 登录注册

搜索更多相关主题的帖子: 菜单 文字 休闲 制作 
2007-02-05 15:27
一笔苍穹
Rank: 1
等 级:新手上路
帖 子:640
专家分:0
注 册:2006-5-25
收藏
得分:0 

有意思~

2007-02-06 19:36
快速回复:[休闲]制作文字菜单
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.047922 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved