Гра "Перший мільйон", Детальна інформація
Гра "Перший мільйон"
int position=1,telefon=1,fift=1,auditoria=1,pr_otv,
count_fields=0,next_player=0,auditorium;// Global variables
long summa;
AnsiString v0="",v1="",v2="",v3="",v4="";
//----------------------------------------------------------------------------
void out_text (AnsiString x0,AnsiString x1,AnsiString x2,
AnsiString x3,AnsiString x4);
//----------------------------------------------------------------------------
void restore_base1 (void);
void restore_base2 (void);
void restore_base3 (void);
void random_question (void);
//---------------------------------------------------------------------------
void level (void)
{
if (position<6)
{
if (Form1->Table4->RecordCount==0) restore_base1();
random_question ();
v0=Form1->Table4->FieldValues[("VOPROS")];
v1=Form1->Table4->FieldValues[("A")];
v2=Form1->Table4->FieldValues[("B")];
v3=Form1->Table4->FieldValues[("C")];
v4=Form1->Table4->FieldValues[("D")];
pr_otv=Form1->Table4->FieldValues[("PR_OTV")];
Form1->Table4->Delete();
}
if (position>=6 && position<11)
{
if (Form1->Table5->RecordCount==0) restore_base2();
count_fields=0,next_player=0,auditorium;// Global variables
long summa;
AnsiString v0="",v1="",v2="",v3="",v4="";
//----------------------------------------------------------------------------
void out_text (AnsiString x0,AnsiString x1,AnsiString x2,
AnsiString x3,AnsiString x4);
//----------------------------------------------------------------------------
void restore_base1 (void);
void restore_base2 (void);
void restore_base3 (void);
void random_question (void);
//---------------------------------------------------------------------------
void level (void)
{
if (position<6)
{
if (Form1->Table4->RecordCount==0) restore_base1();
random_question ();
v0=Form1->Table4->FieldValues[("VOPROS")];
v1=Form1->Table4->FieldValues[("A")];
v2=Form1->Table4->FieldValues[("B")];
v3=Form1->Table4->FieldValues[("C")];
v4=Form1->Table4->FieldValues[("D")];
pr_otv=Form1->Table4->FieldValues[("PR_OTV")];
Form1->Table4->Delete();
}
if (position>=6 && position<11)
{
if (Form1->Table5->RecordCount==0) restore_base2();
The online video editor trusted by teams to make professional video in
minutes
© Referats, Inc · All rights reserved 2021