Гра "Перший мільйон", Детальна інформація
Гра "Перший мільйон"
void update (void)
{
Form1->Panel1->Color=clBtnFace;
Form1->Panel2->Color=clBtnFace;
Form1->Panel3->Color=clBtnFace;
Form1->Panel4->Color=clBtnFace;
level();
out_text (v0,v1,v2,v3,v4);
}
//---------------------------------------------------------------------------
void out_text (AnsiString x0,AnsiString x1,AnsiString x2,
AnsiString x3,AnsiString x4)
{
Form1->Panel1->Caption=x1;
Form1->Panel2->Caption=x2;
Form1->Panel3->Caption=x3;
Form1->Panel4->Caption=x4;
Form1->Panel5->Caption=x0;
}
//---------------------------------------------------------------------------
void random_question (void)
{
int base;
if (position<=6) base=1;
if (position>=6 && position<=11) base=2;
if (position>11) base=3;
randomize();
switch (base)
{
case 1:
{
Form1->Panel1->Color=clBtnFace;
Form1->Panel2->Color=clBtnFace;
Form1->Panel3->Color=clBtnFace;
Form1->Panel4->Color=clBtnFace;
level();
out_text (v0,v1,v2,v3,v4);
}
//---------------------------------------------------------------------------
void out_text (AnsiString x0,AnsiString x1,AnsiString x2,
AnsiString x3,AnsiString x4)
{
Form1->Panel1->Caption=x1;
Form1->Panel2->Caption=x2;
Form1->Panel3->Caption=x3;
Form1->Panel4->Caption=x4;
Form1->Panel5->Caption=x0;
}
//---------------------------------------------------------------------------
void random_question (void)
{
int base;
if (position<=6) base=1;
if (position>=6 && position<=11) base=2;
if (position>11) base=3;
randomize();
switch (base)
{
case 1:
The online video editor trusted by teams to make professional video in
minutes
© Referats, Inc · All rights reserved 2021