Delphi & Pascal (česká wiki)
Přejít na: navigace, hledání
{ RULE01.PAS                                    Copyright (c) Sulko }
{                                                                   }
{ Ide o znamu kasinovi hru. Minimalny vklad je 10 Korun.            }
{ Lavym tlacitkom mysi v hracom poli zvysujem stavku o 10,          }
{ pravym tlacitkom mysi v hracom poli znizujem stavku o 10.         }
{ Kredit je teoreticky nevycerpatelny, takze tipujte......          }
{                                                                   }
{ Author: Peter Sulko                                               }
{ Date  : 2003                                 http://www.trsek.com }
 
Unit RULE01;
INTERFACE
  Procedure PEGAVGA;
  Procedure PGOTH;
  Procedure PLITT;
  Procedure PSANS;
  Procedure PTRIP;
IMPLEMENTATION
  Procedure PEGAVGA;  External;  {$L EGAVGA.OBJ}
  Procedure PGOTH;    External;  {$L GOTH.OBJ}
  Procedure PLITT;    External;  {$L LITT.OBJ}
  Procedure PSANS;    External;  {$L SANS.OBJ}
  Procedure PTRIP;    External;  {$L TRIP.OBJ}
END.