presskey(175,200);outtextxy(175+17,200+5,"7");
delay(DELAYTIME);drawkey(175,200);
outtextxy(175+17,200+5,"7");sig=1;}

 if(mx>175&&mx<215&&my>280&&my<310&&keys==0&&ams==-1||ams=='1')
 {value='1';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(175,280);outtextxy(175+17,280+5,"1");
delay(DELAYTIME);drawkey(175,280);
outtextxy(175+17,280+5,"1");sig=1;}

 if(mx>175&&mx<215&&my>320&&my<350&&keys==0&&ams==-1||ams=='0')
 {value='0';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(175,320);outtextxy(175+17,320+5,"0");
delay(DELAYTIME);drawkey(175,320);
outtextxy(175+17,320+5,"0");sig=1;}

 if(mx>275&&mx<315&&my>240&&my<270&&keys==0&&ams==-1||ams=='6')
 {value='6';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(275,240);outtextxy(275+17,240+5,"6");
delay(DELAYTIME);drawkey(275,240);
outtextxy(275+17,240+5,"6");sig=1;}

 if(mx>225&&mx<265&&my>200&&my<230&&keys==0&&ams==-1||ams=='8')
 {value='8';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(225,200);outtextxy(225+17,200+5,"8");
delay(DELAYTIME);drawkey(225,200);
outtextxy(225+17,200+5,"8");sig=1;}

 if(mx>225&&mx<265&&my>240&&my<270&&keys==0&&ams==-1||ams=='5')
 {value='5';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(225,240);outtextxy(225+17,240+5,"5");
delay(DELAYTIME);drawkey(225,240);
outtextxy(225+17,240+5,"5");sig=1;}

 if(mx>225&&mx<265&&my>280&&my<310&&keys==0&&ams==-1||ams=='2')
 {value='2';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(225,280);outtextxy(225+17,280+5,"2");
delay(DELAYTIME);drawkey(225,280);
outtextxy(225+17,280+5,"2");sig=1;}

 if(mx>275&&mx<315&&my>200&&my<230&&keys==0&&ams==-1||ams=='9')
 {value='9';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(275,200);outtextxy(275+17,200+5,"9");
delay(DELAYTIME);drawkey(275,200);
outtextxy(275+17,200+5,"9");sig=1;}

 if(mx>275&&mx<315&&my>280&&my<315&&keys==0&&ams==-1||ams=='3')
 {value='3';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(275,280);outtextxy(275+17,280+5,"3");
delay(DELAYTIME);drawkey(275,280);
outtextxy(275+17,280+5,"3");sig=1;}

 if(mx>175&&mx<215&&my>240&&my<275&&keys==0&&ams==-1||ams=='4')
 {value='4';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(175,240);outtextxy(175+17,240+5,"4");
delay(DELAYTIME);drawkey(175,240);
outtextxy(175+17,240+5,"4");sig=1;}

 if(mx>225&&mx<265&&my>320&&my<350&&keys==0&&ams==-1||ams=='.')
 {value='.';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(225,320);outtextxy(225+17,320+5,".");
delay(DELAYTIME);drawkey(225,320);
outtextxy(225+17,320+5,".");sig=1;}

 if(mx>275&&mx<315&&my>320&&my<350&&keys==0&&ams==-1||ams==13)
 {value='=';i=i+NUMDIS;presskey(275,320);outtextxy(275+17,320+5,"=");
delay(DELAYTIME);drawkey(275,320);outtextxy(275+17,320+5,"=");sig=1;}

 if(mx>325&&mx<365&&my>200&&my<230&&keys==0&&ams==-1||ams=='+')
 {value='+';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(325,200);outtextxy(325+17,200+5,"+");
delay(DELAYTIME);drawkey(325,200);
outtextxy(325+17,200+5,"+");sig=1;}

 if(mx>325&&mx<365&&my>240&&my<270&&keys==0&&ams==-1||ams=='-')
 {value='-';i=i+NUMDIS;outtextxy(175+i,142+5,&value);


presskey(325,240);outtextxy(325+17,240+5,"-");
delay(DELAYTIME);drawkey(325,240);
outtextxy(325+17,240+5,"-");sig=1;}

 if(mx>325&&mx<365&&my>280&&my<310&&keys==0&&ams==-1||ams=='*')
 {value='*';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(325,280);outtextxy(325+17,280+5,"*");
delay(DELAYTIME);drawkey(325,280);
outtextxy(325+17,280+5,"*");sig=1;}

 if(mx>325&&mx<365&&my>320&&my<350&&keys==0&&ams==-1||ams=='/')
 {value='/';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(325,320);outtextxy(325+17,320+5,"/");
delay(DELAYTIME);drawkey(325,320);
outtextxy(325+17,320+5,"/");sig=1;}

 if(mx>375&&mx<415&&my>200&&my<230&&keys==0&&ams==-1||ams=='f')
 {value='f';i=i+NUMDIS;outtextxy(175+i,142+5,"-");
presskey(375,200);outtextxy(375+7,200+5,"+/-");
delay(DELAYTIME);drawkey(375,200);
outtextxy(375+7,200+5,"+/-");sig=1;}

 if(mx>375&&mx<415&&my>240&&my<270&&keys==0&&ams==-1||ams=='s')
 {value='s';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(375,240);outtextxy(375+9,240+5,"sin");
delay(DELAYTIME);drawkey(375,240);
outtextxy(375+9,240+5,"sin");sig=1;}

 if(mx>375&&mx<415&&my>280&&my<310&&keys==0&&ams==-1||ams=='l')
 {value='l';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(375,280);outtextxy(375+13,280+5,"ln");
delay(DELAYTIME);drawkey(375,280);
outtextxy(375+13,280+5,"ln");sig=1;}

 if(mx>375&&mx<415&&my>320&&my<350&&keys==0&&ams==-1||ams=='S')
 {value='S';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(375,320);outtextxy(375+3,320+5,"sqrt");
delay(DELAYTIME);drawkey(375,320);
outtextxy(375+3,320+5,"sqrt");sig=1;}

 if(mx>425&&mx<465&&my>200&&my<230&&keys==0&&ams==-1||ams=='C') /*设置清屏*/
 {value='C';
 setfillstyle(SOLID_FILL,15);
 bar(175,142,425+40,142+20);
 setfillstyle(SOLID_FILL,0);
 bar(375,190-20,425+40,190+1);
 i=0;presskey(425,200);outtextxy(425+17,200+5,"C");
 delay(DELAYTIME);drawkey(425,200);
 outtextxy(425+17,200+5,"C");sig=1;
 }

 if(mx>425&&mx<465&&my>240&&my<270&&keys==0&&ams==-1||ams=='c')
 {value='c';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(425,240);outtextxy(425+9,240+5,"cos");
delay(DELAYTIME);drawkey(425,240);
outtextxy(425+9,240+5,"cos");sig=1;}

 if(mx>425&&mx<465&&my>280&&my<310&&keys==0&&ams==-1||ams=='L')
 {value='L';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(425,280);outtextxy(425+14,280+5,"lg");
delay(DELAYTIME);drawkey(425,280);
outtextxy(425+14,280+5,"lg");sig=1;}

 if(mx>425&&mx<465&&my>320&&my<350&&keys==0&&ams==-1||ams=='P')
 {value='P';i=i+NUMDIS;outtextxy(175+i,142+5,&value);
presskey(425,320);outtextxy(425+9,320+5,"pow");
delay(DELAYTIME);drawkey(425,320);
outtextxy(425+9,320+5,"pow");sig=1;}



 if(mx>175&&mx<315&&my>170&&my<190&&keys==0&&ams==-1||ams==' ')
 { value=' ';
 i=i+NUMDIS;
 outtextxy(175+i,142+5,&value);
 presssk();
 delay(DELAYTIME);
 setfillstyle(SOLID_FILL,9);
 bar(175,190-20,275+40,190);
 setcolor(1);
 line(175,190,275+40,190);
 line(275+40,190-20,275+40,190);
 setcolor(15);
 line(175,190-20,275+40,190-20);
 line(175,190-20,175,190);
 outtextxy(175+20,190-20,"space-key");sig=1;


}

 if(mx>454&&mx<469&&my>119&&my<134&&keys==0&&ams==-1||ams==27)
 {value=27;i=i+NUMDIS;outtextxy(175+i,142+5,&value);sig=1;}

 if(sig==1)
 {fun[j++]=value;
 fun[j]='\0';}
 else continue;
}
while(value!='='&&value!=27);
}

int m=0;
double data[MAX];

void push(double n) /*入栈操作,将得到的数字压入栈中*/
{
 if(m<MAX)
 data[m++]=n;
}

double pop() /*出栈操作*/
{
 if(m>0)
 return data[--m];
 else
 return 0;
}

int getsign() /*读入字符*/
{
 return fun[flag++];
}

int judge(char s[]) /*获取运算分量*/
{
 int j,c;
 s[0]=c=getsign();
 while(c==' '||c=='\t')
 s[0]=c=getsign();
 if(!isdigit©&&c!='.'&&c!='f')
 return c;
 j=0;
 if(c=='f') /*对负数进行判断,f表示负数*/
 {
 while(isdigit(s[j]=c=getsign()))
 j++;
 if(c=='.')
 while(isdigit(s[j+1]=c=getsign()))
 j++;
 s[j+1]='\0';
 return 'f';
 }
 if(isdigit©) /*对后面的字符进行判断，是数字则存入数组*/
 while(isdigit(s[j+1]=c=getsign()))
 j++;
 if(c=='.') /*将小数点后的数字存入数组*/
 while(isdigit(s[j+2]=c=getsign()))
 j++;
 s[j+2]='\0';
 return NUMBER;
}

int res=0;
void error()
{
 gotoxy(40+8,20-8);
 printf("error!");
 res=1;
}

void main()
{
 int sign,k;
 int shu=0;
 double t,t1;
 char s[MAX];
 int mode=VGAHI,devices=VGA;
 initgraph(&devices,&mode,"C:\\turboc2"); /*图型模式初始化*/
 face();
 showmouse();
 dianji();
 while((sign=judge(s))!=27&&value!=27) /*ESC,程序结束*/
 {
 if(fun[flag]=='\0')
 {flag=0;shu=1;}
 switch (sign)
 {
 case 'C':
 for(k=0;k<MAX;k++)
 {m=0;data[k]=0;}
 break;
 case NUMBER:
 push(atof(s));
 break;
 case '+':
 push(pop()+pop());
 break;
 case '*':
 push(pop()*pop());
 break;
 case '-':
 t=pop();
 push(pop()-t);
 break;
 case '/':
 t=pop();
 if(t!=0.0)
 push(pop()/t);
 else
 error();
 break;
 case 'f':
 push(-atof(s));
 break;
 case 'S':
 t=pop();
 if(t>=0)
 push(sqrt(t));
 else
 error();
 break;
 case 'P':
 t=pop();
 t1=pop();
 if(t1!=0)
 push(pow(t1,t));
 else
 error();
 break;
 case 's':
 t=pop();
 push(sin(t));
 break;
 case 'c':
 t=pop();
 push(cos(t));
 break;
 case 'L':
 t=pop();
 if(t>0)
 push(log10(t));
 else
 error();
 break;
 case 'l':
 t=pop();
 if(t>0)
 push(log(t));
 else
 error();
 break;
 case '=': /*回车表示此次运算结束*/
 if(res==0)
 {
 gotoxy(40+8,20-8);
 printf("%.8g\n",pop());
 }
 for(k=0;k<MAX;k++)
 {m=0;data[k]=0;}
 break;
 }
 if(sign=='=')
 res=0;
 if(shu==1)
 dianji();
 shu=0;
 }
}

备份
扫雷游戏,C语言源代码
如下

靠?还含有危险信息?邪门,改天�