?? ship.txt
字號:
for (y=0;y<32;y++)
for (x=0;x<32;x++)
if (BOMB[y][x]) Pset(x+xx,y+yy,BOMB[y][x]);
}
void boat(int xx,int yy,int num)
{
int y,x;
for (y=0;y<32;y++)
for (x=0;x<64;x++)
if (SHIP[num][y][x]) Pset(x+xx,y+yy,SHIP[num][y][x]);
}
void torp(int xx,int yy)
{
int y,x;
for (y=0;y<16;y++)
for (x=0;x<16;x++)
if (TORP[y][x]) Pset(x+xx,y+yy,TORP[y][x]);
}
void ship(int xx,int yy,BYTE Type,BYTE Dir)
{
int x,y;
bPaint=TRUE;
PIC_SHIP=Back2;
PIC_SHIP+=(long)(Type*2+Dir)*63l;
for (y=0;y<20;y++)
{
for (x=0;x<63;x++)
if (*PIC_SHIP++) Pset(x+xx,19-y+yy,*(PIC_SHIP-1));
PIC_SHIP+=441l;
}
}
/* 物體系統，創建各個物體，刪除各個物體，畫出各個物體 */
int CreateTorp(int x,int y)
{
int i=0;
if (TorpUsed==MAXTORP) return NULL;
while (tpTorp[++i].Used);
tpTorp[i].x=x;
tpTorp[i].y=y;
tpTorp[i].Used=TRUE;
TorpUsed++;
return i;
}
void KillTorp(int *TorpID)
{
if (tpTorp[*TorpID].Used)
{
TorpUsed--;
tpTorp[*TorpID].Used=FALSE;
}
*TorpID=NULL;
}
void DrawTorp()
{
int i=0;
int ID;
while (!tpTorp[++i].Used);
if (i==MAXTORP+1) return;
bPaint=TRUE;
if (!CLS)
{
ClearScreen(2);
CLS=TRUE;
}
for (i=1;i<=MAXTORP;i++)
{
if (tpTorp[i].Used)
{
if (tpTorp[i].y<34)
{
KillTorp(&ID_Torp[i]);
/* 我方船只被炸 */
if (tpTorp[i].x-MyX>10&&tpTorp[i].x-MyX<50)
{
ID=CreateExpl(tpTorp[i].x-23,tpTorp[i].y-26);
if (ID) ID_Expl[ID]=ID;
KillSelf();
}
}
torp(tpTorp[i].x,tpTorp[i].y);
tpTorp[i].y--;
}
}
}
int CreateShip(int y,BYTE Type)
{
int i=0;
if (ShipUsed==MAXSHIP) return NULL;
while (spShip[++i].Used);
spShip[i].y=y;
spShip[i].Used=TRUE;
spShip[i].Dir=random(2);
spShip[i].Type=Type;
spShip[i].x=-64;
if (!spShip[i].Dir) spShip[i].x=320;
ShipUsed++;
return i;
}
void KillShip(int *ShipID)
{
if (spShip[*ShipID].Used)
{
ShipUsed--;
spShip[*ShipID].Used=FALSE;
}
*ShipID=NULL;
}
void DrawShip()
{
int i=0;
int ID;
while (!spShip[++i].Used);
if (i==MAXSHIP+1) return;
bPaint=TRUE;
if (!CLS)
{
ClearScreen(2);
CLS=TRUE;
}
for (i=1;i<=MAXSHIP;i++)
{
if (spShip[i].Used)
{
if (random(10)==3)
{
ID=CreateTorp(spShip[i].x+32,spShip[i].y);
if (ID) ID_Torp[ID]=ID;
}
ship(spShip[i].x,spShip[i].y,spShip[i].Type,spShip[i].Dir);
if (spShip[i].Dir)
{
spShip[i].x+=2;
if (spShip[i].x>320) KillShip(&ID_Ship[i]);
}
else
{
spShip[i].x-=2;
if (spShip[i].x<-64) KillShip(&ID_Ship[i]);
}
}
}
}
int CreateExpl(int x,int y)
{
int i=0;
if (ExplUsed==MAXEXPL) return NULL;
while (elExpl[++i].Used);
elExpl[i].x=x;
elExpl[i].y=y;
elExpl[i].Used=TRUE;
elExpl[i].Num=0;
ExplUsed++;
return i;
}
void KillExpl(int *ExplID)
{
if (elExpl[*ExplID].Used)
{
ExplUsed--;
elExpl[*ExplID].Used=FALSE;
elExpl[*ExplID].Num=0;
}
*ExplID=NULL;
}
void DrawExpl()
{
int x,y,i=0;
while (!elExpl[++i].Used);
if (i==MAXEXPL+1) return;
bPaint=TRUE;
if (!CLS)
{
ClearScreen(2);
CLS=TRUE;
}
for (i=1;i<=MAXEXPL;i++)
{
if (elExpl[i].Num==15) KillExpl(&ID_Expl[i]);
if (elExpl[i].Used)
{
bPaint=TRUE;
PIC_EXPL=Back1;
PIC_EXPL+=(long)elExpl[i].Num*62l;
elExpl[i].Num++;
for (y=0;y<64;y++)
{
if (SOUND) sound(random(2000)+500);
for (x=0;x<62;x++)
if (*PIC_EXPL++) Pset(x+elExpl[i].x,(63-y)+elExpl[i].y,*(PIC_EXPL-1));
PIC_EXPL+=870l;
}
nosound();
}
}
}
int CreateBomb(int x,int y)
{
int i=0;
if (BombUsed==MAXBOMB) return NULL;
while (bbBomb[++i].Used);
bbBomb[i].x=x;
bbBomb[i].y=y;
bbBomb[i].Used=TRUE;
BombUsed++;
return i;
}
void KillBomb(int *BombID)
{
if (bbBomb[*BombID].Used)
{
BombUsed--;
bbBomb[*BombID].Used=FALSE;
}
*BombID=NULL;
}
void DrawBomb()
{
int i=0,j;
int ID;
while (!bbBomb[++i].Used);
if (i==MAXBOMB+1) return;
bPaint=TRUE;
if (!CLS)
{
ClearScreen(2);
CLS=TRUE;
}
for (i=1;i<=MAXBOMB;i++)
{
if (bbBomb[i].Used)
{
for (j=1;j<=MAXSHIP;j++)
{
/* 敵方潛艇被炸 */
if (spShip[j].Used&&abs(spShip[j].y-bbBomb[i].y)<16&&abs(spShip[j].x-bbBomb[i].x+16)<32)
{
switch (spShip[j].Type)
{
case 0:
Score+=10;
LevelScore+=10;
break;
case 1:
Score+=20;
LevelScore+=20;
break;
case 2:
Score+=40;
LevelScore+=40;
break;
case 3:
Life++;
break;
}
KillShip(&ID_Ship[j]);
KillBomb(&ID_Bomb[i]);
ID=CreateExpl(bbBomb[i].x-20,bbBomb[i].y);
if (ID) ID_Expl[ID]=ID;
}
}
bomb(bbBomb[i].x,bbBomb[i].y);
bbBomb[i].y+=2;
if (bbBomb[i].y>170) KillBomb(&ID_Bomb[i]);
}
}
}
/* 畫出各個物體 */
void DrawObject()
{
CLS=FALSE;
DrawBomb();
DrawShip();
DrawTorp();
if (!bPaint) return;
if (!CLS) ClearScreen(2);
boat(MyX,2,Flash);
DrawExpl();
if (DISP)
{
OutString(0,0,"LIFE:",96);
itoa(Life+1,STR,10);
OutString(5,0,STR,96);
if (SOUND) OutString(7,0,"Sound",2);
itoa(MAXBOMB-BombUsed,STR,10);
OutString(13,0,"BOMB:",89);
OutString(18,0,STR,89);
itoa(Level+1,STR,10);
OutString(21,0,"LEVEL:",13);
OutString(27,0,STR,13);
OutString(30,0,"SCORE:",52);
itoa(Score,STR,10);
OutString(36,0,STR,52);
}
ReFresh();
}
/* 初始化游戲數據 */
void InitGame()
{
int i;
BombUsed=0;
ShipUsed=0;
TorpUsed=0;
ExplUsed=0;
for (i=1;i<=MAXSHIP;i++) KillShip(&ID_Ship[i]);
for (i=1;i<=MAXBOMB;i++) KillBomb(&ID_Bomb[i]);
for (i=1;i<=MAXTORP;i++) KillTorp(&ID_Torp[i]);
for (i=1;i<=MAXEXPL;i++) KillExpl(&ID_Expl[i]);
Flash=FALSE;
ALIVE=TRUE;
DONE=FALSE;
MyX=0;
MyY=0;
Life=3;
Score=25;
LevelScore=25;
Level=0;
}
/* 游戲主過程 */
void GameMain()
{
BYTE bKey;
int ShipType;
int i,ID;
bKey=ScanKey();
/* 鍵盤循環 */
while (bKey!=1&&ALIVE)
{
/* 時鐘時間處理 */
TimerEvent();
if (Life==0)
Flash=!Flash;
else
Flash=FALSE;
/* 創建敵方艦艇 */
if (random(10)==4)
{
i=random(100);
if (i<50)
ShipType=0;
else if (i>=50&&i<75)
ShipType=1;
else if (i>=75&&i<95)
ShipType=2;
else if (i>95)
ShipType=3;
ID=CreateShip(random(6)*20+70,ShipType);
if (ID) ID_Ship[ID]=ID;
}
switch (bKey)
{
case 115:
case 75:
bPaint=TRUE;
MyX-=4;
if (MyX<0) MyX=0;
break;
case 2:
Life++;
break;
case 3:
MAXBOMB++;
if (MAXBOMB>20) MAXBOMB=20;
case 77:
case 116:
bPaint=TRUE;
MyX+=4;
if (MyX>256) MyX=256;
break;
case 31:
SOUND=!SOUND;
break;
case 32:
DISP=!DISP;
break;
case 57:
if (LevelScore==0) break;
/* 發出炮彈 */
ID=CreateBomb(MyX+20,32);
if (ID)
{
Score-=5;
LevelScore-=5;
ID_Bomb[ID]=ID;
}
}
bKey=ScanKey();
if (LevelScore>=500)
{
Level++;
LevelScore=0;
if (Level<15)
OutString(15,10,"Next Level!",13);
else
{
OutString(14,10,"Very Good!!",13);
DONE=TRUE;
bKey=1;
}
ReFresh();
wait();
}
MAXSHIP=Level+3;
MAXTORP=Level+5;
MAXEXPL=Level+5;
}
}
void main()
{
BOOL QUIT=FALSE;
int nKey;
/* 申請內存 */
Video=farmalloc(64000);
if (Video==NULL)
{
printf("Not enough Memory\n");
exit(0);
}
Back1=farmalloc(59520);
if (Back1==NULL)
{
printf("Not enough Memory\n");
farfree(Video);
exit(0);
}
Back2=farmalloc(10080);
if (Back2==NULL)
{
printf("Not enough Memory\n");
farfree(Back2);
farfree(Video);
exit(0);
}
randomize();
Logo();
setmode();
SetAllPal();
readboat();
readship();
readexpl();
readbomb();
readtorp();
ClearScreen(2);
boat(0,2,0);
KillAllTimer();
CreateTimer(1,DrawObject);
ReFresh();
while (!QUIT)
{
GameMain();
bPaint=TRUE;
if (!ALIVE)
OutString(15,10,"GAME OVER",96);
OutString(14,12,"QUIT? (Y/N)",89);
ReFresh();
nKey=getch();
while (!(nKey=='Y'||nKey=='y'||nKey=='N'||nKey=='n'))
{
nKey=getch();
}
if (nKey=='Y'||nKey=='y') QUIT=TRUE;
if (!ALIVE||DONE) InitGame();
}
closemode();
KillAllTimer();
farfree(Video);
farfree(Back1);
farfree(Back2);
printf("***NOBLE STUDIO***Written By FanobleMeng--2001.12");
}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -