English
English
Slovensky
Slovensky
Česky
Česky
Šarišsky
Šarišsky
Kategória: Grafika
gambler.png
Autor: Martin Koleček
Program: Daytona.pasDefault.pasLoading.pasMain.pasMaingame.pasMisc.pasOvladani.pasRisk.pasRiskscr.pasRoll.pasRollproc.pasRolsetup.pasSaveload.pasScore.pasScreen.pasServis.pasSetbet.pasTestwin.pasWaitbtn.pasWinblink.pasWrivalce.pas
Súbor exe: Gambler.zip
Klasický výherní automat "Daytona Classic 750" samozřejmě s trochu odlišnou grafikou.
  • Podporuje Sound Blaster nebo PC Speaker
  • ovládání je ve hře popsáno
POZOR:
  • doporučená hodnota cycles pro DOSBox není "cycles=max" ale "cycles=5000" !!
  • než se objeví hra tak se to načítá poměrně velmi velmi dlouho takže buďte trpěliví
  • pokud nevíte co přesně děláte tak servisní nastavení raději nechte bez povšimnutí
  • reset v servisním nastavení resetuje pouze počítadlo výher a vkladů, ne nastavení hry
  • pokud už jste stačili popřehazovat servisní nastavení a hra je špatně hratelná, tak vymažte soubor GAMBLER.DAT, hra se uvede do "továrního nastavení"
Zobrazené: 1795x


Procedure Default;
Var I: Byte;
Begin
  DatRec.fpsProdleva:=20;
 
  SetPal(ColorGreenDark,0,40,0);
  SetPal(ColorGreenBright,0,63,0);
  SetPal(ColorRedDark,20,0,0);
  SetPal(ColorRedBright,63,0,0);
  SetPal(ColorBlack,0,0,0);
  SetPal(ColorWhite,63,63,63);
  SetPal(ColorYellow,63,63,0);
  SetPal(ColorTexter,19,22,63);
  SetPal(ColorCtecka,30,17,9);
 
  ButtonDelay:=20;
 
  For I:=0 to 8 do
  Begin
    Btn[I].Blinking:=False;
    Btn[I].Phase:=0;
    Btn[I].Counter:=0;
  End;
 
  Lista[0].Enable:=True;
  Lista[0].Sazka[0]:=True;
  Lista[0].Sazka[1]:=False;
  Lista[1].Enable:=False;
 
  Risk.Enable:=False;
 
  CreditShow:=True;
  VyhraShow:=False;
  VkladShow:=False;
 
  WinGamble.Enable:=False;
 
  JackPotPadl:=False;
  Credit:=0;
  Vyhra.Castka:=0;
  MultiWin:=0;
  Bonus:=0;
  Bet:=2;
  BetMulti:=0;
  BetCounter:=0;
  Nasobic:=0;
  AutoStart:=False;
  AutoStartTyp:=0;
  VkladyTMP:=0;
  VyplacenoTMP:=0;
  Obrazek:=0;
 
  Randomize;
  For I:=0 to 2 do Valec[I].SymbolCounter:=Random(25);
End;
 

[Spustiť] [Uložiť] [Tlač] [Poslať e-mailom]