Pascal programy KMP (Klub mladých programátorov)

Delphi & Pascal (česká wiki)
Přejít na: navigace, hledání
Stránky: [1-10]  [11-20]  [21-30]  [31-40]  [aktuálna]  [51-60]  [61-70]  [71-80]  [81-90]  [91-100]  [101-150]  [151-200]  [201-250]  [251-300]  [301-316]

Poradie:41
Program: Cisla_subor.pas
Súbor exe: Cisla_subor.exe

Program na čítanie/zápis čísel z/do súboru.



Poradie:42
Program: Cislo_uctu.pas

Program na zistenie či číslo bankového účtu je správne.



Poradie:43
Autor: Jojko
Program: Cmos.pas
Súbor exe: Cmos.exe

Program vie zapisovať/čítať údaje CMOS. Po spustení zálohuje obsah CMOS na disk do súboru CMOS.dat.



Poradie:44
Autor: Andrew DiE
Program: Code2.pas
Súbor exe: Code2.exe

Program po stlačení ľubovoľného klávesu napíše jeho kódovu hodnotu v tabuľke ASCII.



Poradie:45
Autor: Zdeno Sekerák (vedúci)
web: www.trsek.com/cover

Program: Cover.pas
Súbor exe: Cover.exe
Potrebné: Cover.mnuCover.zipBold.chrDascii.comDascii.datEgavga.bgiLitt.chrSans.chrTrip.chr

Tento program bol vytvorený ako obslužný SW pre výtvory amatérskej programátorskej skupiny, ktorá vznikla pri ITASe. KMP ako sme ho nazvali už funguje 5 rokov (1922-1997) každú sobotu v popoludnajších hodinách.



Poradie:46
Autor: Andrew DiE
Program: Cryptor.pas
Súbor exe: Cryptor.exe

Program kóduje klasické TXT súbory do veľkosti 62,5kB k čomu sa používa Caesarová metóda. Pre väčšiu ochranu si žiada aj číselny kód pre kódovanie/odkódovanie.



Poradie:47
Autor: Ján Benkovič
web: www.tbteacher.host.sk

Program: Cursorof.pas

Program ktorý demonštruje vypnutie kurzoru.



Poradie:48
gambler.jpgAutor: Martin Koleček
Program: Daytona.pasDefault.pasHisther.pasJackpot.pasLoading.pasMain.pasMaingame.pasMisc.pasMys.pasOvladani.pas
Súbor exe: Gambler.zip
Potrebné: Plus1000.pasPlus500.pasProdat.pasRiskscr.pasRoll.pasRollpre.pasRollproc.pasRolsetup.pasRskdolni.pasRskhorni.pas
Príklady: Saveload.pasScore.pasScreen.pasServis.pasSetbet.pasTestwin.pasUpdate5.pasWaitbtn.pasWinblink.pasWrivalce.pasZisky.pas

Výherní automat podle skutečného stroje Daytona 750. Podporuje Sound Blaster.
Rychlost hry je konfigurovatelná. Experimentálně podporuje ovládání dotykovým displayem pro Androidy.

POZOR:
  • 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í"

O dosboxu:
  • pokud nevíte a neumíte tak se zeptejte někoho kdo ví a umí nebo si najděte informace o dosboxu na internetu
  • hodnota cycles pro GAMBLERA na PC je tak 10000 až 20000
  • hodnota cycles na mobilních zařízeních (tam používejte legální dosbox turbo) je tak 7000
  • nedávejte cycles max nebo cycles auto, párkrát to zkuste a najděte si správnou přesnou hodnotu
  • hra by neměla kazit zvuk nebo cukat obraz, pokud je cycles nastaveno optimálně v‘e jede hladce
  • DAYTONA GAMBLER je podomácku vyrobený freeware takže ho bezestrachu ‘iřte a ukazujte druhým jak se to hraje
  • totéž dosbox pro PC je freeware, dosbox turbo je komerční ale stojí jen 60 korun tak nebuďte piráti


Nastavení výhernosti:
V servisní obrazovce klávesou TAB měníte switch a nahoru dolů manipupuje s výherností rozsahy jsou 0 až 65000 v‘echny switche a číslo na něm vyrábí poměr mezi dvěma stavy, obvykle to bývá jestli je výhra nebo není výhra a číslo teda dělí na poměr mezi těmito stavy, vždy "0 až číslo" je jedna část, třeba jestli se riskovani povede nebo nepovede a "číslo až 65000" je druhá část možného výsledku. Nakonec rozhodne náhodné číslo z rozsahu "0 až 65535" , ale záleží na poměru na switchi co je pravděpodobněj‘í interval.


SWITCHE:
  • 2kč výhry = šance na výhru ve dvoukorunové hře {RollSetup bet 2, čím menší tím míň výher}
  • 4kč výhry = šance na výhru ve čtyřkorunové hře {RollSetup bet 4, čím menší tím míň výher}
  • 5kč výhry = šance na výhru v pětikorunové hře {RollSetup bet 5, čím menší tím míň výher}
  • 2kč Joker A = pravděpodobnost výsměchu Jokera na dvoukorunové hře {TestWin bet 2J, čím menší tím víc výher}
  • 2kč Joker B = pravděpodobnost zdvojnásobení Jokerem na dvoukorunové hře {TestWin bet 2J, čím menší tím míň výher}
  • 4kč Joker A = pravděpodobnost výsměchu Jokera na čtyřkorunové hře {TestWin bet 4J, čím menší tím víc výher}
  • 4kč Joker B = pravděpodobnost zdvojnásobení Jokerem na čtyřkorunové hře {TestWin bet 4J, čím menší tím míň výher}
  • 5kč Joker = pravděpodobnost zdvojnásobení Jokerem na pětikorunové hře {TestWin bet 5J, čím menší tím míň výher} (na 5kč hře se joker neposmívá)
  • riskovani = šance na zdvojnásobení riskem strany mince při náhodném risku {Risking vyhernost čím menší tím míň výher} (neplatí při risku postřehem; nebo při risku autostartem tam je poměr 1:1)



Poradie:49
Autor: RaptoR
Program: Delenie.pas
Súbor exe: Delenie.exe

Program na delenie dvoch čísel.



Poradie:50
demo.pngAutor: Ľuboš Saloky
Program: Demo.pas
Súbor exe: Demo.exe
Potrebné: Demo.dat

Ukážka grafickej práce v asembleri.


Stránky: [1-10]  [11-20]  [21-30]  [31-40]  [aktuálna]  [51-60]  [61-70]  [71-80]  [81-90]  [91-100]  [101-150]  [151-200]  [201-250]  [251-300]  [301-316]