//--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include #include #include #include #include #include #include #include "cvc/vector.h" #include "cvc/matrix.h" #include #include #include #include #include "perfgrap.h" #include #include #include //--------------------------------------------------------------------------- int LeftMovement, TopMovement, PrevX, PrevY, Lives = 3; TShiftState PrevShift; int GameOver = 0; TShape *Shot[100]; TShape *Shot2[100]; Graphics::TBitmap *memBMP; int Fading = 1; unsigned long TotalEnemiesKilled = 0, Score = 0; int Multiplier = 1; int alive = 0, dead = 0, alive2 = 0, dead2 = 0; TShape *Enemy[1000000]; long alivenme = 0, deadnme = 0; matrix MovmentAdd(200, 200); vector Life(100,0); vector Life2(100,0); TTimer *ShotTimer; int NoKillsSoFar = 0, Achievement = 0; TImage *Planets[14]; matrix PixelStars1(100,2); matrix PixelStars2(100,2); int FlameNum = 0; int Bombs = 3; double FlamePosX[50], FlamePosY[50]; int NumberShot = 0, NumberEnemy = 0; double radius, MidY, MidX, YLen, XLen, TheRatio, TopPos, LeftPos, SmallCircRadius; // double Sinvar = 90, Cosvar = 0; //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TShape *Shape1; TShape *Shape2; TTimer *Timer1; TTimer *TimerShotMaker; TTimer *MakeEnemy; TTimer *CollisionTest; TTimer *EnemyMove; TTimer *GraveDigger; TMediaPlayer *PlayShots; TMediaPlayer *EnemySpawn; TMediaPlayer *SoundEffects; TMediaPlayer *EnemyDeaths; TTimer *ComeToLife; TMediaPlayer *BgMusic; TTimer *Flames; TShape *shpWall; TImage *bg01; TImage *bg02; TImage *bg03; TImage *bg04; TImage *bg05; TImage *bg06; TImage *bg07; TImage *bg08; TImage *bg09; TImage *bg10; TImage *bg11; TImage *bg12; TImage *bg13; TImage *bg14; TTimer *MovePlanets; TTimer *NoKillTimer; void __fastcall FormOnMouseMove(TObject *Sender, TShiftState Shift, int X, int Y); void __fastcall Timer1Timer(TObject *Sender); void __fastcall FormOnKeyDown(TObject *Sender, WORD &Key, TShiftState Shift); void __fastcall FormKeyUp(TObject *Sender, WORD &Key, TShiftState Shift); void __fastcall MakeShots(TObject *Sender); void __fastcall FormOnMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall FormOnMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall MakeNewEnemy(TObject *Sender); void __fastcall TimerCollisionTest(TObject *Sender); void __fastcall TimerEnemyMove(TObject *Sender); void __fastcall GraveDiggerTimer(TObject *Sender); void __fastcall ComeToLifeTimer(TObject *Sender); void __fastcall FlamesTimer(TObject *Sender); void __fastcall FormOnClick(TObject *Sender); void __fastcall MovePlanetsTimer(TObject *Sender); void __fastcall NoKillTimerTimer(TObject *Sender); private: // User declarations public: // User declarations void __fastcall ShotTimerTimer(TObject *Sender); void __fastcall ShotFCNMaker(TShape *&ShotVar, int &alivevar); void __fastcall CollisionCheck(TShape *&ShotCheck, TShape *&EnemyCheck); void __fastcall EnemyCollisionCheck(TShape *&Ship, TShape *&EnemyCheck); __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif