Реферат Створення комп'ютерної гри

+ l-> ochki;> Text = k;> SaveToFile (В«save game.txtВ»);

// fclose (sg);

}

void map: loadgame (TLabel * Label5h, TForm * Form1, TTimer * Timer5, TTimer * Timer1, TTimer * Timer666, liv * l) {o, l2; * list = new TStringList; -> ; Enabled = false; -> Enabled = false; -> Enabled = false;> LoadFromFile

}

//-gg: paint (map * m, TTimer * Timer3, TTimer * Timer2, TLabel * Label4, key * k, liv * l) {(left) (m-> a [ y/30] [x/30-1]! = 1) {(m-> a [y/30] [x/30-1] == 2) {m-> a [y/30] [ x/30-1] = 0; l-> ochki + +;}// star

// if ((m-> a [y/30] [x/30-1] == 3) | | (m-> a [y/30] [x/ 30-1] == 4)) {m-> a [y/30] [x/30-1] = 0; Label4-> Visible = true; Timer2-> Enabled = true; m-> ochki-;}// enemy (m-> a [y/30] [x/30-1] == 5) {m-> a [y/30] [x/30-1] = 0; k-> ky + +;}// key = 30;} (right) if (m-> a [y/30] [x/30 +1]! = 1) {(m-> a [y/ 30] [x/30 +1] == 2) {m-> a [y/30] [x/30 +1] = 0; l-> ochki + +;}// star

// if ((m-> a [y/30] [x/30 +1] == 3) | | (m-> a [y/30] [x/ 30 +1] == 4)) {m-> a [y/30] [x/30 +1] = 0; Label4-> Visible = true; Timer2-> Enabled = true; m-> ochki-;}// enemy (m-> a [y/30] [x/30 +1] == 5) {m-> a [y/30] [x/30 +1] = 0; k-> ky + +;}// key + = 30;} (up) if (m-> a [y/30-1] [x/30]! = 1) {(m-> a [y/ 30-1] [x/30] == 2) {m-> a [y/30-1] [x/30] = 0; l-> ochki + +;}// star

// if ((m-> a [y/30-1] [x/30] == 3) | | (m-> a [y/30-1] [ x/30] == 4)) {m-> a [y/30-1] [x/30] = 0; Label4-> Visible = true; Timer2-> Enabled = true; m-> ochki-;}// enemy (m-> a [y/30-1] [x/30] == 5) {m-> a [y/30-1] [x/30] = 0; k-> ky + +;}// key = 30;} (down) if (m-> a [y/30 +1] [x/30]! = 1) {(m-> a [y/ 30 +1] [x/30] == 2) {m-> a [y/30 +1] [x/30] = 0; l-> ochki + +;}// star

// if ((m-> a [y/30 +1] [x/30] == 3) | | (m-> a [y/30 +1] [ x/30] == 4)) {m-> a [y/30 +1] [x/30] = 0; Label4-> Visible = true; Timer2-> Enabled = true; m-> ochki-;}// enemy (m-> a [y/30 +1] [x/30] == 5) {m-> a [y/30 +1] [x/30] = 0; k-> ky + +;}// key + = 30;}

}

//-key: test (TForm * Form1, map * n) {(int i = 0; i <10; i + +) (int j = 0; j <10; j + +) (n -> a [i] [j] == 5) key_all + +;

}

//-gg: drawgg (TImage * Image1, TForm * Form1)

{

// Graphics: TBitmap * gg = new Graphics: TBitmap;

// gg-> LoadFromFile (ExtractFilePath (Application-> ExeName) + В«ico gg.bmpВ»);

// Form1-> Canvas-> Draw (x * 30, y * 30, gg); -> Visible = true; -> BringToFront (); -> Left = x; -> Top = y;

}

// -

map: newlevel (map * m, TForm * Form1, gg * a2, TTimer * Timer1, TTimer * Timer3, TTimer * Timer5, key * k, mine * m m)

{-> FocusCo...