?? 43.c
字號:
#include <serial.c> //包含串行處理模塊
bit showclocksign;
bit showblocksign;
bit showfensign;
uchar count;
uint second;
uchar paoplace;
uint zongfen;
uchar speed=32;
idata uint free[16]; //定義行首處理空間
unsigned char idata *freep; //定義指向該數組的指針
//****
gotoxy(uchar x,y)
{putbyte(0x1b);putbyte('['
);
putbyte((y%100)/10+0x30);
putbyte((y%10)+0x30);
putbyte(';');
putbyte((x%100)/10+0x30);
putbyte((x%10)+0x30);
putbyte('H');
}
//******************
clrscr()
{gotoxy(0,0); putbyte(0x1b); putstring("[J"); }
//**************
showpao()
{gotoxy(1,16); putbyte(0x1b); putstring("[K");
gotoxy(paoplace,16); putbyte('|');
gotoxy(1,17); putbyte(0x1b); putstring("[K");
gotoxy(paoplace-1,17);
putbyte('/');putbyte('H');putbyte('\\');
gotoxy(0,24);
}
//***************
uint bdata showp;
sbit outblock=showp^15;
showblock() //showblock
{uchar i,j;uint bdata p;
uint st;
gotoxy(0,0);
for(i=15;i!=0;i--)
{putbyte('|');
showp=free[i];
st=0x8000;
for(j=0;j!=16;j++)
{ if ((showp&st)!=0) putbyte('@');
else putbyte(' ');
st>>=1;
//showp=showp>>1;
}
putbyte('|');CR;
}
gotoxy(0,24);
showblocksign=0;
}
//*************
showfen()
{gotoxy(6,19);
//putstring("得分: ");
putint(zongfen,1);
showfensign=0;
//putbyte(' ');
//puthex(free[15]/256); puthex(free[15]%256);
//gotoxy(0,24);
}
//******************************************************
void main(void)
{uchar idata c,i,j;bit k;
uint temp,notype;
serial_init(); // ET0=0;
putstring("\r\nSerial ready!\r\n");
start: ET0=1;clrscr();
putstring("飛機游戲"
"\r\n
"\r\n游戲控制方法:"
"\r\n 操作者不動鍵盤10秒鐘進入演示狀態，按'a'或'4'飛機"
"\r\n 左移，按'd'或'6'右移，按's'或'0'發彈，按'-'降低難度，"
"\r\n 按'+'提高難度，按'p'立即進入演示狀態。"
"\r\n 按任何鍵開始游戲。");
while(!inbufsign);
zongfen=0;showblock();showfen();notype=1000;
gotoxy(0,19); //putstring("lever: h-hard e-easy\r\n5-left 6-right 0-shot");
putstring("得分:\r\n級別: +:高 -:低\r\n5:左移 6:右移 0:發射");
gotoxy(7,20);putchar(speed,1);
for(i=0;i!=16;i++)
{free[i]=0;
}
paoplace=9;showpao();
while(1) {
if (showblocksign) showblock();
if (showfensign) showfen();
if (free[0]!=0)
{ET0=0;notype=1000;free[0]=0;gotoxy(0,22);putstring("結束!再玩一遍?(y/n)");
while(getbyte()!='y');goto start;
}
notype--;if(notype==10){notype=1000;goto autoplay;}
delay(100);
if (notype>900) {gotoxy(0,22);putbyte(0x1b); putstring("[K");}
if (inbufsign)
{ c=getbyte();notype=1000;
switch (c)
{case '5': //left move
case 'a':
paoplace--; if (paoplace==1) paoplace=2;
showpao();
break;
case '6': //right move
case 'd':
paoplace++; if (paoplace==18) paoplace=17;
showpao();
break;
case '=':
case '+':
speed--;
if (speed==0)speed=1;
gotoxy(7,20);
putchar(speed,1);
break;
case '_':
case '-':
speed++;
if (speed==255)speed=254;
gotoxy(7,20);
putchar(speed,1);
break;
case 's':
case '0': //shot
for(i=15,j=1;i!=0;i--,j=16-i)
{gotoxy(paoplace,i); putbyte('o');delay(50);
putbyte(8);putbyte(' ');
//free[i]=0xffff;
temp=0x0001<<(17-paoplace);
if((free[j]&temp)!=0)
{free[j]&= (temp^0xffff);zongfen+=10;showfensign=1;break;}
}
break;
case 'y': goto start;
case 'p':
autoplay: gotoxy(0,22);putbyte(0x1b); putstring("[K");putstring("游戲自動演示中。");
ET0=1;speed=20;gotoxy(7,20);putchar(speed,1);
do
{
if (showblocksign) showblock();
if (showfensign) showfen();
for(i=15,j=1;i!=0;i--,j=16-i)
{gotoxy(paoplace,i); putbyte('o');delay(50);
putbyte(8);putbyte(' ');
temp=0x0001<<(17-paoplace);
if((free[j]&temp)!=0)
{free[j] &= (temp^0xffff);zongfen+=10;showfensign=1;goto again;}
}
again:
if (!(((free[5]&temp)!=0)||((free[4]&temp)!=0)))
{if (k) {paoplace--;}
else {paoplace++;}
}
if (paoplace==1){ paoplace=2; k=0;}
if (paoplace==18) {paoplace=17;k=1;}
if (free[0]!=0) //if dead?
{ET0=0;notype=1000;free[0]=0;
//while(getbyte()!='y');goto start;
break;
}
showpao();
}while(!inbufsign);
}
}
}
}
//freep=free;
//putbytes(freep,1);
//getline(freep,1);
uint code *getcode;
//******************
void timer0(void) interrupt 1
{
uchar i;
TH0=31;TL0=00;
//1/32S
count++;
if (count==speed) //11059200
{count=0; //1s
for(i=0;i<16;i++)
{free[i]=free[i+1];
}
free[15]=*getcode;
getcode++;if (getcode==1000) getcode=0;
showblocksign=1;
showclocksign=1;
second++; //1S
if (second==3600) {second=0;showclocksign=1;}
// if (iftimeover) timeovercount++;
//else timeovercount=0;
}
}
//serial.c 代碼
//串口中斷服務程序，僅需做簡單調用即可完成串口輸入輸出的處理
//出入均設有緩沖區，大小可任意設置。
//可供使用的函數名:
//char getbyte(void);從接收緩沖區取一個byte,如不想等待則在調用前檢測inbufsign是否為1。
//putbyte(char c);放入一個字節到發送緩沖區
//putbytes(unsigned char *outplace,j);放一串數據到發送緩沖區，自定義長度
//putstring(unsigned char code *puts);發送一個定義在程序存儲區的字符串到串口
//puthex(unsigned char c);發送一個字節的hex碼，分成兩個字節發。
//putchar(uchar c,uchar j);發送一個字節數據的asc碼表達方式，需要定義小數點的位置
//putint(uint ui,uchar j);發送一個整型數據的asc碼表達方式，需要定義小數點的位置
//delay(unsigned char d); 延時n x 100ns
//getline(char idata *line, unsigned char n); 獲取一行數據回車結束，必須定義最大輸入字符數
//CR;發送一個回車換行
//*************************************************************************
#include <w77e58.h>
#define uchar unsigned char
#define uint unsigned int
#define OLEN 10 //size of serial transmission buffer
idata unsigned char outbuf[OLEN]; // storage for transmission buffer
unsigned char idata *outlast=outbuf; //最后由中斷傳輸出去的字節位置
unsigned char idata *putlast=outbuf; //最后放入發送緩沖區的字節位置
#define ILEN 2 //size of serial receiving buffer
idata unsigned char inbuf[ILEN];
unsigned char idata *inlast=inbuf; //最后由中斷進入接收緩沖區的字節位置
unsigned char idata *getlast=inbuf; //最后取走的字節位置
bit outbufsign; //輸出緩沖區非空標志有=1
bit inbufsign; //接收緩沖區非空標志 有=1
bit inbufful; //輸入緩沖區滿標志 滿=1
#define CR putstring("\r\n") //CR=回車換行
unsigned char code comready[]="com is ready!";
//*****************************
//延時n x 100ns
void delay(unsigned char d) //在源程序開頭定義是否用w77e58或22。1184M晶振
{unsigned char j;
do{ d--;
//110592 & 89c52
#ifndef cpuw77e58
#ifndef xtal221184
j=21; //k=38 cpu80320 100us k=21 cpu 8052
#else
j=42;
#endif
#else
#ifndef xtal221184
j=38;
#else
j=76;
#endif
#endif
do {j--;} while(j!=0);
}while(d!=0);
}
//*****************************
//放入一個字節到發送緩沖區
putbyte(char c)
{uchar i,j;
ES=0; //暫停串行中斷，以免數據比較時出錯?
if (outlast==putlast )
{ i=(0-TH1);
do{i--;j=36; do {j--;}while(j!=0); }while(i!=0); //延時一個字節發送時間
}
*putlast=c; //放字節進入緩沖區
putlast++; //發送緩沖區指針加一
if (putlast==outbuf+OLEN) putlast=outbuf; //指針到了頂部換到底部
if (!outbufsign) {outbufsign=1;TI=1; } //緩沖區開始為空置為有，啟動發送
ES=1;
}
//******************************
//放一串數據到發送緩沖區
putbytes(unsigned char *outplace,unsigned char j)
{
int i;
for(i=0;i<j;i++)
{putbyte(*outplace);
outplace++;
}
}
//******************************
putchar(uchar c,uchar j)
{
uchar idata free[4];uchar data i;
i=0;
free[i++]=(c/100+0x30);
if (j==3) free[i++]='.';
free[i++]=(c%100)/10+0x30;
if (j==2) free[i++]='.';
if (j==2 && free[i-3]==0x30) free[i-3]=0x20;
free[i++]=(c%10)+0x30;
if (j==1 && free[i-3]==0x30) free[i-3]=0x20;
if (j==1 && free[i-3]==0x20 && free[i-2]==0x30) free[i-2]=0x20;
putbytes(free,i);
}
//******************************
putint(uint ui,uchar j)
{uchar idata free[6];
uchar data i;
i=0;
free[i++]=(ui/10000+0x30);
if (j==5) free[i++]='.';
free[i++]=((ui%10000)/1000+0x30);
if (j==4) free[i++]='.';
if (j==4 && free[i-3]==0x30) free[i-3]=0x20;
free[i++]=((ui%1000)/100+0x30);
if (j==3) free[i++]='.';
if (j==3 && free[i-4]==0x30) free[i-4]=0x20;
if (j==3 && free[i-4]==0x20 && free[i-3]==0x30) free[i-3]=0x20;
free[i++]=((ui%100)/10+0x30);
if (j==2) free[i++]='.';
if (j==2 && free[i-5]==0x30) free[i-5]=0x20;
if (j==2 && free[i-5]==0x20 && free[i-4]==0x30) free[i-4]=0x20;
if (j==2 && free[i-5]==0x20 && free[i-4]==0x20 && free[i-3]==0x30) free[i-3]=0x20;
free[i++]=(ui%10+0x30);
if (j==1 && free[i-5]==0x30) free[i-5]=0x20;
if (j==1 && free[i-5]==0x20 && free[i-4]==0x30) free[i-4]=0x20;
if (j==1 && free[i-5]==0x20 && free[i-4]==0x20 && free[i-3]==0x30) free[i-3]=0x20;
if (j==1 && free[i-5]==0x20 && free[i-4]==0x20 && free[i-3]==0x20 && free[i-2]==0x30) free[i-2]=0x20;
putbytes(free,i);
}
//***************************************
//發送一個定義在程序存儲區的字符串到串口
putstring(unsigned char *puts)
{for (;*puts!=0;puts++) //遇到停止符0結束
putbyte(*puts);
}
//*************************************
//發送一個字節的hex碼，分成兩個字節發。
unsigned char code hex_[]={"0123456789ABCDEF"};
puthex(unsigned char c)
{int ch;
ch=(c>>4)&0x0f;
putbyte(hex_[ch]);
ch=c&0x0f;
putbyte(hex_[ch]);
}
//*************************************
//從接收緩沖區取一個byte,如不想等待則在調用前檢測inbufsign是否為1。
uchar getbyte (void)
{ char idata c ;
while (!inbufsign); //緩沖區空等待
ES=0;
c= *getlast; //取數據
getlast++; //最后取走的數據位置加一
inbufful=0; //輸入緩沖區的滿標志清零
if (getlast==inbuf+ILEN) getlast=inbuf; //地址到頂部回到底部
if (getlast==inlast) inbufsign=0; //地址相等置接收緩沖區空空標志，再取數前要檢該標志
ES=1;
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -