| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 905 人关注过本帖
标题:求助!初级者不必看了!
取消只看楼主 加入收藏
梦想中国
Rank: 2
等 级:新手上路
威 望:5
帖 子:539
专家分:0
注 册:2006-2-26
收藏
 问题点数:0 回复次数:3 
求助!初级者不必看了!

高人好:请我帮看看,下面的程序到底怎么回事,无错误啊!怎么一运行就出致命错误。
#include<conio.h>
#include<stdio.h>
#include<string.h>
#include<stdlib.h>
#include<math.h>
#include<dos.h>
#define HEX 0 /*hexadecimal*/
#define DEC 1 /*decimal*/
#define OCT 2 /*octal*/
#define BIN 3 /*binary*/
int index=0,choice=0; /*external variable*/
int button,mousex,mousey;
void set_screen(void);
void init_mouse(void);
void show_mouse(void);
void comment(void);
void display(int x,int y,char text[50]);
void process_program(void);
unsigned long convert_to_decimal(char *_num,int radix);
void get_mouse(void);
int getnum(char character);
int main(void)
{
clrscr(); /*clear screen*/
set_screen(); /*set screen CYAN*/
init_mouse();
show_mouse();
process_program();
getch();
return 0;
}
void set_screen(void)
{
textbackground(CYAN);
clrscr();
}
void init_mouse(void)
{
_AX=0;
geninterrupt(0x33);
}
void show_mouse(void)
{
_AX=1;
geninterrupt(0x33);
}
void comment(void)
{
textcolor(0); /*set text BLACK*/
display(10,5,"Hexadecimal:-"); /*output*/
display(10,7,"Decimal:-");
display(10,9,"Octal:-");
display(10,11,"Binary:-");
textbackground(LIGHTBLUE); /*set backcolor*/
display(23,5," ");
display(23,7," ");
display(23,9," ");
display(23,11," ");
if(choice==HEX) /*mouse position*/
gotoxy(24,5);
else if(choice==DEC)
gotoxy(24,7);
else if(choice==OCT)
gotoxy(24,9);
else if(choice==BIN)
gotoxy(24,11);
}
void display(int x,int y,char text[50])
{
gotoxy(x,y);
cprintf(text);
}
void process_program(void)
{
char ch,string[80]={"\0"},buffer[80];
int x,y;
unsigned long deci;
comment();
while(1)
{
if(kbhit())
{
ch=getch();
if(ch==27) /*input ESC exit program*/
break;
if(ch=='\b' && wherex()>=24) /*input is '\b'*/
{
cprintf("\b"); /*delete current input '\b'*/
cprintf("%c",255);
cprintf("\b"); /*delete privious character*/
if(index!=0)
index--; /*array_length -1*/
string[index]=NULL;
}
else if(wherex()>=24 && ch>='0' && ch<='f') /*input is not '\b'*/
{
cprintf("%c",ch);
string[index]=ch;
string[index+1]=NULL;
index++;
}
x=wherex(),y=wherey();
switch(choice)
{
case HEX:
deci=convert_to_decimal(string,16);
gotoxy(24,7);
printf("%ld ",deci);
gotoxy(24,9);
printf("%s ",ltoa(deci,buffer,8));
gotoxy(24,11);
printf("%s ",ltoa(deci,buffer,2));
break;
case DEC:
deci=atol(string);
gotoxy(24,5);
printf("%s ",ltoa(deci,buffer,16));
gotoxy(24,9);
printf("%s ",ltoa(deci,buffer,8));
gotoxy(24,11);
printf("%s ",ltoa(deci,buffer,2));
break;
case OCT:
deci=convert_to_decimal(string,8);
gotoxy(24,5);
printf("%s ",ltoa(deci,buffer,16));
gotoxy(24,7);
printf("%ld ",deci);
gotoxy(24,11);
printf("%s ",ltoa(deci,buffer,8));
case BIN:
deci=convert_to_decimal(string,2);
gotoxy(24,5);
printf("%s ",ltoa(deci,buffer,16));
gotoxy(24,7);
printf("%ld ",deci);
gotoxy(24,9);
printf("%s ",ltoa(deci,buffer,8));
} /*switch*/
gotoxy(x,y);
} /*if*/
get_mouse();
mousex++,mousey++; /*attentio*/
if(mousex/8>23 && mousex/8<50 &&mousey/16==2 && button&1==1)
{
choice=HEX;
process_program();
}
else if(mousex/8>23 && mousex/8<50 && mousey/16==3 && button&1==1)
{
choice=DEC;
process_program();
}
else if(mousex/8>23 && mousex/8<50 && mousey/16==4 && button&1==1)
{
choice=OCT;
process_program();
}
else if(mousex/8>23 && mousex/8<50 && mousey/16==5 && button&1==1)
{
choice=BIN;
process_program();
}
}
}
unsigned long convert_to_decimal(char *_num,int radix)
{
int i,len;
unsigned long deci=0;
len=strlen(_num);
len--;
for(i=0;i!=_num[i];i++)
{
deci+=(getnum(_num[i])*pow(radix,len));
len--;
}
return deci;
}
int getnum(char character)
{
char string[36]={"0123456789abcdefghijklmnopqrstuvwxyz"};
int i;
for(i=0;i<=35;i++)
{
if(string[i]==character)
break;
}
return i;
}
void get_mouse(void)
{
_AX=3;
_BX=0;
geninterrupt(0x33);
button=_BL;
mousex=_CX;
mousey=_DX;
}
这个程序是将16,10,8,2进制之间的转换。

搜索更多相关主题的帖子: 初级 
2006-03-02 16:07
梦想中国
Rank: 2
等 级:新手上路
威 望:5
帖 子:539
专家分:0
注 册:2006-2-26
收藏
得分:0 
我用TC2.0也注解不了汉字啊

2006-03-02 16:21
梦想中国
Rank: 2
等 级:新手上路
威 望:5
帖 子:539
专家分:0
注 册:2006-2-26
收藏
得分:0 
我们是来学习的,不是和你来做口舌之争来了,understand?

2006-03-02 21:43
梦想中国
Rank: 2
等 级:新手上路
威 望:5
帖 子:539
专家分:0
注 册:2006-2-26
收藏
得分:0 
不正确吗?

2006-03-04 21:37
快速回复:求助!初级者不必看了!
数据加载中...
 
   



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

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