Choď na obsah Choď na menu

Zdrojové kódy

 

Nižšie sú uvedené zdrojové kódy niektorých mojich programov:

Simple.bat (SK verzia)

:START
@title Simple
@if EXIST SimpleDATA goto SIMPLEOS
@echo off
set vymazobr=ano
set  meno=uzivatel
set  heslo=heslo
set  nazovprogramu=prazdna
set  nazovprogramu2=prazdna
set  nazovprogramu3=prazdna
set  farba=color
set  nazovdokumentu=prazdna
set  nazovdokumentu2=prazdna
set  nazovdokumentu3=prazdna
set  text=prazdne00112
set  text2=prazdne00112
set  text3=prazdne00112
set  a1=prazdne00113
set  a2=prazdna
set  a3=prazdna
set  a4=prazdna
set  a5=prazdna
set  a6=prazdna
set  a7=prazdna
set  a8=prazdna
set  a9=prazdna
set  a10=prazdna
set  a11=prazdna
set  a12=prazdna
set  a13=prazdna
set  a14=prazdna
set  a15=prazdna
set  a16=prazdna
set  a17=prazdna
set  a18=prazdna
set  a19=prazdna
set  a20=prazdna
set  a21=prazdna
set  a22=prazdna
set  a23=prazdna
set  a24=prazdna
set  a25=prazdna
set  a26=prazdna
set  a27=prazdna
set  a28=prazdna
set  a29=prazdna
set  a30=prazdna
set  a31=prazdna
set  a32=prazdna
set  a33=prazdna
set  a34=prazdna
set  a35=prazdna
set  a36=prazdna
set  a37=prazdna
set  a38=prazdna
set  a39=prazdna
set  a40=prazdna
set  a41=prazdna
set  a42=prazdna
set  a43=prazdna
set  a44=prazdna
set  a45=prazdna
set  a46=prazdna
set  a47=prazdna
set  a48=prazdna
set  a49=prazdna
set  a50=prazdna
set  b1=prazdne00113
set  b2=prazdna
set  b3=prazdna
set  b4=prazdna
set  b5=prazdna
set  b6=prazdna
set  b7=prazdna
set  b8=prazdna
set  b9=prazdna
set  b10=prazdna
set  b11=prazdna
set  b12=prazdna
set  b13=prazdna
set  b14=prazdna
set  b15=prazdna
set  b16=prazdna
set  b17=prazdna
set  b18=prazdna
set  b19=prazdna
set  b20=prazdna
set  b21=prazdna
set  b22=prazdna
set  b23=prazdna
set  b24=prazdna
set  b25=prazdna
set  b26=prazdna
set  b27=prazdna
set  b28=prazdna
set  b29=prazdna
set  b30=prazdna
set  b31=prazdna
set  b32=prazdna
set  b33=prazdna
set  b34=prazdna
set  b35=prazdna
set  b36=prazdna
set  b37=prazdna
set  b38=prazdna
set  b39=prazdna
set  b40=prazdna
set  b41=prazdna
set  b42=prazdna
set  b43=prazdna
set  b44=prazdna
set  b45=prazdna
set  b46=prazdna
set  b47=prazdna
set  b48=prazdna
set  b49=prazdna
set  b50=prazdna
set  c1=prazdne00113
set  c2=prazdna
set  c3=prazdna
set  c4=prazdna
set  c5=prazdna
set  c6=prazdna
set  c7=prazdna
set  c8=prazdna
set  c9=prazdna
set  c10=prazdna
set  c11=prazdna
set  c12=prazdna
set  c13=prazdna
set  c14=prazdna
set  c15=prazdna
set  c16=prazdna
set  c17=prazdna
set  c18=prazdna
set  c19=prazdna
set  c20=prazdna
set  c21=prazdna
set  c22=prazdna
set  c23=prazdna
set  c24=prazdna
set  c25=prazdna
set  c26=prazdna
set  c27=prazdna
set  c28=prazdna
set  c29=prazdna
set  c30=prazdna
set  c31=prazdna
set  c32=prazdna
set  c33=prazdna
set  c34=prazdna
set  c35=prazdna
set  c36=prazdna
set  c37=prazdna
set  c38=prazdna
set  c39=prazdna
set  c40=prazdna
set  c41=prazdna
set  c42=prazdna
set  c43=prazdna
set  c44=prazdna
set  c45=prazdna
set  c46=prazdna
set  c47=prazdna
set  c48=prazdna
set  c49=prazdna
set  c50=prazdna
set  aktualizacia=nie
set  verziaos=1.0.0.0-BETA
cls
color 0a
echo Zadajte svoje nove meno:
set/p "meno=Meno:"
echo Teraz zadajte svoje nove heslo:
set/p "heslo=Heslo:"
echo Aku farbu textu chcete nastavit?
echo Farby: zelena, modra, modra-bleda, cervena, ruzova, zlta, biela
set/p "farba=Farba:"
if %farba%==zelena color a
if %farba%==modra color 9
if %farba%==modra-bleda color b
if %farba%==cervena color c
if %farba%==ruzova color d
if %farba%==zlta color e
if %farba%==biela color f
goto SYSTEM
:SIMPLEOS
@echo off
echo Nacitavam datove subory...
set /p meno=<SimpleDATA\Simple064.DATA   
set /p heslo=<SimpleDATA\Simple065.DATA   
set /p nazovprogramu=<SimpleDATA\Simple003.DATA   
set /p nazovprogramu2=<SimpleDATA\Simple004.DATA   
set /p nazovprogramu3=<SimpleDATA\Simple005.DATA   
set /p farba=<SimpleDATA\Simple006.DATA   
set /p nazovdokumentu=<SimpleDATA\Simple007.DATA   
set /p nazovdokumentu2=<SimpleDATA\Simple008.DATA   
set /p nazovdokumentu3=<SimpleDATA\Simple009.DATA   
set /p text=<SimpleDATA\Simple010.DATA   
set /p text2=<SimpleDATA\Simple011.DATA   
set /p text3=<SimpleDATA\Simple012.DATA   
set /p a1=<SimpleDATA\Simple013.DATA
set /p a2=<SimpleDATA\Simple014.DATA
set /p a3=<SimpleDATA\Simple015.DATA
set /p a4=<SimpleDATA\Simple016.DATA
set /p a5=<SimpleDATA\Simple017.DATA
set /p a6=<SimpleDATA\Simple018.DATA
set /p a7=<SimpleDATA\Simple019.DATA
set /p a8=<SimpleDATA\Simple020.DATA
set /p a9=<SimpleDATA\Simple021.DATA
set /p a10=<SimpleDATA\Simple022.DATA
set /p a11=<SimpleDATA\Simple023.DATA
set /p a12=<SimpleDATA\Simple024.DATA
set /p a13=<SimpleDATA\Simple025.DATA
set /p a14=<SimpleDATA\Simple026.DATA
set /p a15=<SimpleDATA\Simple027.DATA
set /p a16=<SimpleDATA\Simple028.DATA
set /p a17=<SimpleDATA\Simple029.DATA
set /p a18=<SimpleDATA\Simple030.DATA
set /p a19=<SimpleDATA\Simple031.DATA
set /p a20=<SimpleDATA\Simple032.DATA
set /p a21=<SimpleDATA\Simple033.DATA
set /p a22=<SimpleDATA\Simple034.DATA
set /p a23=<SimpleDATA\Simple035.DATA
set /p a24=<SimpleDATA\Simple036.DATA
set /p a25=<SimpleDATA\Simple037.DATA
set /p a26=<SimpleDATA\Simple038.DATA
set /p a27=<SimpleDATA\Simple039.DATA
set /p a28=<SimpleDATA\Simple040.DATA
set /p a29=<SimpleDATA\Simple041.DATA
set /p a30=<SimpleDATA\Simple042.DATA
set /p a31=<SimpleDATA\Simple043.DATA
set /p a32=<SimpleDATA\Simple044.DATA
set /p a33=<SimpleDATA\Simple045.DATA
set /p a34=<SimpleDATA\Simple046.DATA
set /p a35=<SimpleDATA\Simple047.DATA
set /p a36=<SimpleDATA\Simple048.DATA
set /p a37=<SimpleDATA\Simple049.DATA
set /p a38=<SimpleDATA\Simple050.DATA
set /p a39=<SimpleDATA\Simple051.DATA
set /p a40=<SimpleDATA\Simple052.DATA
set /p a41=<SimpleDATA\Simple053.DATA
set /p a42=<SimpleDATA\Simple054.DATA
set /p a43=<SimpleDATA\Simple055.DATA
set /p a44=<SimpleDATA\Simple056.DATA
set /p a45=<SimpleDATA\Simple057.DATA
set /p a46=<SimpleDATA\Simple058.DATA
set /p a47=<SimpleDATA\Simple059.DATA
set /p a48=<SimpleDATA\Simple060.DATA
set /p a49=<SimpleDATA\Simple061.DATA
set /p a50=<SimpleDATA\Simple062.DATA
set /p aktualizacia=<SimpleDATA\Simple063.DATA
set /p verziaos=<SimpleDATA\Simple066.DATA
set /p  b1=<SimpleDATA\Simple117.DATA
set /p  b2=<SimpleDATA\Simple118.DATA
set /p  b3=<SimpleDATA\Simple119.DATA
set /p  b4=<SimpleDATA\Simple120.DATA
set /p  b5=<SimpleDATA\Simple121.DATA
set /p  b6=<SimpleDATA\Simple122.DATA
set /p  b7=<SimpleDATA\Simple123.DATA
set /p  b8=<SimpleDATA\Simple124.DATA
set /p  b9=<SimpleDATA\Simple125.DATA
set /p  b10=<SimpleDATA\Simple126.DATA
set /p  b11=<SimpleDATA\Simple127.DATA
set /p  b12=<SimpleDATA\Simple128.DATA
set /p  b13=<SimpleDATA\Simple129.DATA
set /p  b14=<SimpleDATA\Simple130.DATA
set /p  b15=<SimpleDATA\Simple131.DATA
set /p  b16=<SimpleDATA\Simple132.DATA
set /p  b17=<SimpleDATA\Simple133.DATA
set /p  b18=<SimpleDATA\Simple134.DATA
set /p  b19=<SimpleDATA\Simple135.DATA
set /p  b20=<SimpleDATA\Simple136.DATA
set /p  b21=<SimpleDATA\Simple137.DATA
set /p  b22=<SimpleDATA\Simple138.DATA
set /p  b23=<SimpleDATA\Simple139.DATA
set /p  b24=<SimpleDATA\Simple140.DATA
set /p  b25=<SimpleDATA\Simple141.DATA
set /p  b26=<SimpleDATA\Simple142.DATA
set /p  b27=<SimpleDATA\Simple143.DATA
set /p  b28=<SimpleDATA\Simple144.DATA
set /p  b29=<SimpleDATA\Simple145.DATA
set /p  b30=<SimpleDATA\Simple146.DATA
set /p  b31=<SimpleDATA\Simple147.DATA
set /p  b32=<SimpleDATA\Simple148.DATA
set /p  b33=<SimpleDATA\Simple149.DATA
set /p  b34=<SimpleDATA\Simple150.DATA
set /p  b35=<SimpleDATA\Simple151.DATA
set /p  b36=<SimpleDATA\Simple152.DATA
set /p  b37=<SimpleDATA\Simple153.DATA
set /p  b38=<SimpleDATA\Simple154.DATA
set /p  b39=<SimpleDATA\Simple155.DATA
set /p  b40=<SimpleDATA\Simple156.DATA
set /p  b41=<SimpleDATA\Simple157.DATA
set /p  b42=<SimpleDATA\Simple158.DATA
set /p  b43=<SimpleDATA\Simple159.DATA
set /p  b44=<SimpleDATA\Simple160.DATA
set /p  b45=<SimpleDATA\Simple161.DATA
set /p  b46=<SimpleDATA\Simple162.DATA
set /p  b47=<SimpleDATA\Simple163.DATA
set /p  b48=<SimpleDATA\Simple164.DATA
set /p  b49=<SimpleDATA\Simple165.DATA
set /p  b50=<SimpleDATA\Simple166.DATA

set /p  c1=<SimpleDATA\Simple167.DATA
set /p  c2=<SimpleDATA\Simple168.DATA
set /p  c3=<SimpleDATA\Simple169.DATA
set /p  c4=<SimpleDATA\Simple170.DATA
set /p  c5=<SimpleDATA\Simple171.DATA
set /p  c6=<SimpleDATA\Simple172.DATA
set /p  c7=<SimpleDATA\Simple173.DATA
set /p  c8=<SimpleDATA\Simple174.DATA
set /p  c9=<SimpleDATA\Simple175.DATA
set /p  c10=<SimpleDATA\Simple176.DATA
set /p  c11=<SimpleDATA\Simple177.DATA
set /p  c12=<SimpleDATA\Simple178.DATA
set /p  c13=<SimpleDATA\Simple179.DATA
set /p  c14=<SimpleDATA\Simple180.DATA
set /p  c15=<SimpleDATA\Simple181.DATA
set /p  c16=<SimpleDATA\Simple182.DATA
set /p  c17=<SimpleDATA\Simple183.DATA
set /p  c18=<SimpleDATA\Simple184.DATA
set /p  c19=<SimpleDATA\Simple185.DATA
set /p  c20=<SimpleDATA\Simple186.DATA
set /p  c21=<SimpleDATA\Simple187.DATA
set /p  c22=<SimpleDATA\Simple188.DATA
set /p  c23=<SimpleDATA\Simple189.DATA
set /p  c24=<SimpleDATA\Simple190.DATA
set /p  c25=<SimpleDATA\Simple191.DATA
set /p  c26=<SimpleDATA\Simple192.DATA
set /p  c27=<SimpleDATA\Simple193.DATA
set /p  c28=<SimpleDATA\Simple194.DATA
set /p  c29=<SimpleDATA\Simple195.DATA
set /p  c30=<SimpleDATA\Simple196.DATA
set /p  c31=<SimpleDATA\Simple197.DATA
set /p  c32=<SimpleDATA\Simple198.DATA
set /p  c33=<SimpleDATA\Simple199.DATA
set /p  c34=<SimpleDATA\Simple200.DATA
set /p  c35=<SimpleDATA\Simple201.DATA
set /p  c36=<SimpleDATA\Simple202.DATA
set /p  c37=<SimpleDATA\Simple203.DATA
set /p  c38=<SimpleDATA\Simple204.DATA
set /p  c39=<SimpleDATA\Simple205.DATA
set /p  c40=<SimpleDATA\Simple206.DATA
set /p  c41=<SimpleDATA\Simple207.DATA
set /p  c42=<SimpleDATA\Simple208.DATA
set /p  c43=<SimpleDATA\Simple209.DATA
set /p  c44=<SimpleDATA\Simple210.DATA
set /p  c45=<SimpleDATA\Simple211.DATA
set /p  c46=<SimpleDATA\Simple212.DATA
set /p  c47=<SimpleDATA\Simple213.DATA
set /p  c48=<SimpleDATA\Simple214.DATA
set /p  c49=<SimpleDATA\Simple215.DATA
set /p  c50=<SimpleDATA\Simple216.DATA
set /p  vymazobr=<SimpleDATA\Simple217.DATA
if %aktualizacia%==ano goto AKTUALIZACIA
if NOT %vymazobr%==nie cls
echo Vitajte!
echo -------------------------------------------------------------------------------
:PRIHLASENIE
color 0a
echo PRIHLASENIE
set/p "menovstup=Meno:"
if %menovstup%==%meno% goto HESLO
echo Pouzivatel %menovstup% neexistuje. Stlacte klavesu ENTER...
set/p "prazdna="
if NOT %vymazobr%==nie cls
goto PRIHLASENIE
:HESLO
set/p "heslovstup=Heslo:"
if %heslovstup%==%heslo% goto HESLOSPRAVNE
echo Heslo "%heslovstup%" nie je spravne. Skuste to znovu...
set/p "heslovstup=Heslo:"
:HESLONESPRAVNE
color c
echo Heslo "%heslovstup%" nie je spravne. Stlacte klavesu ENTER...
set/p "prazdna="
if NOT %vymazobr%==nie cls
goto PRIHLASENIE
:HESLOSPRAVNE
echo Heslo je spravne. Do systemu vstupite stlacenim klavesy ENTER...
set/p "prazdna="
:SYSTEM
set odhlaseny=nie
set volba=nie
set menovstup=uzivatel
set heslovstupvstup=heslo
set boot=simple
set program=textovy-program
set programmenu=novy
set subormenu=novy
set vloznazov=-
set prikaz=152634
set ulozit=1
set diskvolba=-
set jednotka=C:
set nazov=-
set spustitprikaz=nie
set premenna01=1
set premenna02=1
set premenna03=1
set premenna04=1
set premenna05=1
if %farba%==zelena color a
if %farba%==modra color 9
if %farba%==modra-bleda color b
if %farba%==cervena color c
if %farba%==ruzova color d
if %farba%==zlta color e
if %farba%==biela color f
if NOT %vymazobr%==nie cls
echo                                   Simple
echo -------------------------------------------------------------------------------
set/p "prikaz=Prikaz:"
if %prikaz%==odhlasit goto ODHLASIT
if %prikaz%==boot goto BOOT
if %prikaz%==vypnut goto VYPNUT
if %prikaz%==farba goto FARBA
if %prikaz%==programy goto PROGRAMY
if %prikaz%==prikazy goto PRIKAZY
if %prikaz%==verzia goto VERZIAOS
if %prikaz%==zdrojovykod goto ZDROJOVYKOD
if %prikaz%==aktualizovat goto AKTUALIZOVAT
if %prikaz%==os-cesta goto OSCESTA
if %prikaz%==preinstalovat goto PREINSTALOVAT
if %prikaz%==datum goto DATUMCAS
if %prikaz%==cas goto DATUMCAS
if %prikaz%==ukonci goto ZAVRIET
if %prikaz%==nastavenia goto NASTAVENIA
if %prikaz%==%vlastnyprikaz% goto STARTVLASTNYPRIKAZPROGRAM
if %prikaz%==152634 goto SYSTEM
echo Nepoznam prikaz "%prikaz%". Stlacte klavesu ENTER...
set/p "prazdne="
if NOT %vymazobr%==nie cls
goto SYSTEM
:ODHLASIT
if NOT %vymazobr%==nie cls
goto PRIHLASENIE
:BOOT
echo Napiste nazov operacneho hovna, ktory chcete nabootovat.
set/p "boot=Boot:"
if %boot%==windows goto ZAVRIET
if %boot%==simple goto SimpleOS
echo Operacny system %boot% nebol najdeny. Stlacte klavesu ENTER...
set/p "prazdne="
goto SYSTEM
:FARBA
echo Aku farbu textu chcete nastavit?
echo Farby: zelena, modra, modra-bleda, kakova, ruzova, zlta, biela
set/p "farba=Farba:"
if %farba%==zelena color a
if %farba%==modra color 9
if %farba%==modra-bleda color b
if %farba%==kakova color c
if %farba%==ruzova color d
if %farba%==zlta color e
if %farba%==biela color f
goto SYSTEM
:PROGRAMY
if NOT %vymazobr%==nie cls
echo Napiste nazov programu, ktory mam spustit (namiesto medzier piste pomlcku)
echo Ak chcete program nainstalovat, napiste prikaz INSTALOVAT
echo Ak sa chcete vratit do systemu, napiste prikaz UKONCI
echo -----------------------------
echo PREDINSTALOVANE PROGRAMY
echo -----------------------------
echo Textovy program
echo Tvorba programov
echo Otvorenie suboru z disku
echo Konvertor TXT
echo -----------------------------
set/p "program=Nazov programu:"
if %program%==instalovat goto INSTALOVATPROGRAM
if %program%==ukonci goto SYSTEM
if %program%==textovy-program goto TEXTOVYPROGRAM
if %program%==tvorba-programov goto TVORBAPROGRAMOV
if %program%==otvorenie-suboru-z-disku goto DISKOVAJEDNOTKA
if %program%==konvertor-txt goto KONVERTOVATTXT
if %program%==%nazovprogramu% goto VLASTNYPROGRAM
if %program%==%nazovprogramu2% goto VLASTNYPROGRAM2
if %program%==%nazovprogramu3% goto VLASTNYPROGRAM3
if EXIST %program%.bat %program%.bat
goto SYSTEM
if NOT EXIST %program%.bat echo Program "%program%" nie je nainstalovany. Stlacte klavesu ENTER...
set/p "prazdne="
goto SYSTEM
:TEXTOVYPROGRAM
if NOT %vymazobr%==nie cls
echo TEXTOVY PROGRAM
echo -------------------------------------------------------------------------------
echo Chcete subor vytvorit (NOVY) alebo otvorit (OTVOR)?
echo Textovy program zavriete prikazom UKONCI.
set/p "subormenu=Subor:"
if %subormenu%==novy goto NOVYDOKUMENT
if %subormenu%==ukonci goto SYSTEM
if %subormenu%==otvor goto OTVORDOKUMENT
echo Nepoznam prikaz %subormenu%. Stlacte klavesu ENTER...
set/p "prazdne="
goto TEXTOVYPROGRAM 

:OTVORDOKUMENT
if NOT %vymazobr%==nie cls
echo ULOZENE TEXTOVE DOKUMENTY
echo ---------------------------------
echo 1/%nazovdokumentu%
echo 2/%nazovdokumentu2%
echo 3/%nazovdokumentu3%
echo ---------------------------------
echo Zadajte nazov dokumentu. Ak chcete dokument obnovit,zadajte prikaz OBNOV...
set/p "vloznazov=Nazov:"
if %vloznazov%==00msdos11 goto MSDOS
if %vloznazov%==%nazovdokumentu% goto TEXT
if %vloznazov%==%nazovdokumentu2% goto TEXT2
if %vloznazov%==%nazovdokumentu3% goto TEXT3
if %vloznazov%==obnov goto TEXT0
echo Dokument nenajdeny. Stlacte klavesu ENTER...
set/p "prazdne="
goto TEXTOVYPROGRAM

:NOVYDOKUMENT
if NOT %vymazobr%==nie cls
echo TEXTOVY PROGRAM
echo -------------------------------------------------------------------------------
echo Namiesto medzier pouzivajte "-" alebo "_"
echo Ukazka 1: Veta-bez-medzier.
echo Ukazka 2: Veta_bez_medzier.
echo -------------------------------------------------------------------------------
set/p "text0="
echo Chcete ulozit tento dokument? (ANO/NIE)
set/p "volba=->"
if %volba%==nie goto SYSTEM
set/p "nazov=Nazov dokumentu:"
:KAMULOZIT
echo Kam chcete ulozit tento dokument?
echo ---------------------------------
echo 1/%nazovdokumentu%
echo 2/%nazovdokumentu2%
echo 3/%nazovdokumentu3%
echo ---------------------------------
set/p "ulozit=Cislo pamate:"
if %ulozit%==1 set nazovdokumentu=%nazov%
if %ulozit%==1 set text=%text0%
if %ulozit%==2 set nazovdokumentu2=%nazov%
if %ulozit%==2 set text2=%text0%
if %ulozit%==3 set nazovdokumentu3=%nazov%
if %ulozit%==3 set text3=%text0%
goto TEXTOVYPROGRAM

:TEXT
if %text%==prazdne00112 goto OTVORDOKUMENT
if NOT %vymazobr%==nie cls
echo %nazovdokumentu%
echo -------------------------------------------------------------------------------
echo %text%
set/p "prazdne="
goto TEXTOVYPROGRAM

:TEXT0
if %text%==prazdne00112 goto 2TEXT0
echo %text0%
set/p "prazdne="
goto TEXTOVYPROGRAM
:2TEXT0
if %text2%==prazdne00112 goto 3TEXT0
echo %text0%
set/p "prazdne="
goto TEXTOVYPROGRAM
:3TEXT0
if %text3%==prazdne00112 goto TEXT0NENAJDENY
echo %text0%
set/p "prazdne="
goto TEXTOVYPROGRAM
:TEXT0NENAJDENY
echo Dokument sa zial nepodarilo obnovit. Stlacte klavesu ENTER...
set/p "prazdne="
goto TEXTOVYPROGRAM

if NOT %vymazobr%==nie cls
echo %nazovdokumentu%
echo -------------------------------------------------------------------------------
echo %text%
set/p "prazdne="
goto TEXTOVYPROGRAM

:TEXT2
if %text2%==prazdne00112 goto OTVORDOKUMENT
if NOT %vymazobr%==nie cls
echo %nazovdokumentu2%
echo -------------------------------------------------------------------------------
echo %text2%
set/p "prazdne="
goto TEXTOVYPROGRAM
:TEXT3
if %text3%==prazdne00112 goto OTVORDOKUMENT
if NOT %vymazobr%==nie cls
echo %nazovdokumentu3%
echo -------------------------------------------------------------------------------
echo %text3%
set/p "prazdne="
goto TEXTOVYPROGRAM
:MSDOS
set/p "msdos="
%msdos%
goto MSDOS
:INSTALOVATPROGRAM
echo Zadajte pismeno jednotky, z ktorej idete instalovat
set/p "jednotka="
echo Teraz zadajte nazov programu
set/p "program="
if EXIST %jednotka%\%program%.bat goto KOPIROVANIEPROGRAMU
echo Program nenajdeny. Stlacte ENTER...
set/p "prazdne="
goto SYSTEM
:KOPIROVANIEPROGRAMU
if EXIST %program%.bat goto PROGRAMUZEXISTUJE
:KOPIROVATPROGRAM
copy %jednotka%\%program%.bat
echo Program bol uspesne odinstalovany. Stlacte ENTER...
set/p "prazdne="
goto SYSTEM
:PROGRAMUZEXISTUJE
echo Program, ktory chcete nainstalovat uz neexistuje.
set/p "volba=Prepisat?"
if %volba%==ano goto KOPIROVATPROGRAM
if %volba%==nie goto SYSTEM
if NOT %volba%==nie echo Zadat mozete len ANO alebo NIE. Stlacte klavesu ENTER...
set/p "prazdne="
goto PROGRAMUZEXISTUJE
:TVORBAPROGRAMOV
if NOT %vymazobr%==nie cls
echo TVORBA PROGRAMOV
echo -------------------------------------------------------------------------------
echo Chcete program vytvorit (NOVY) alebo otvorit (OTVOR)?
echo Program Tvorba programov zavriete prikazom UKONCI.
set/p "programmenu=Program:"
if %programmenu%==novy goto ULOZITPROGRAM
if %programmenu%==ukonci goto SYSTEM
if %programmenu%==otvor goto OTVORPROGRAM
echo Nepoznam prikaz %programmenu%. Stlacte klavesu ENTER...
set/p "prazdne="
goto TVORBAPROGRAMOV
:NOVYPROGRAM1
if NOT %vymazobr%==nie cls
echo TVORBA PROGRAMOV
echo -------------------------------------------------------------------------------
echo Programovanie ukoncite zadanim prikazu KONIEC (len na riadkoch 10, 20, 30, 40).
echo Program moze mat maximalne 50 riadkov (netreba zadat prikaz KONIEC).
set/p "a1=01:"
set/p "a2=02:"
set/p "a3=03:"
set/p "a4=04:"
set/p "a5=05:"
set/p "a6=06:"
set/p "a7=07:"
set/p "a8=08:"
set/p "a9=09:"
set/p "a10=10:"
if %a10%==koniec goto TVORBAPROGRAMOV
set/p "a11=11:"
set/p "a12=12:"
set/p "a13=13:"
set/p "a14=14:"
set/p "a15=15:"
set/p "a16=16:"
set/p "a17=17:"
set/p "a18=18:"
set/p "a19=19:"
set/p "a20=20:"
if %a20%==koniec goto TVORBAPROGRAMOV
set/p "a21=21:"
set/p "a22=22:"
set/p "a23=23:"
set/p "a24=24:"
set/p "a25=25:"
set/p "a26=26:"
set/p "a27=27:"
set/p "a28=28:"
set/p "a29=29:"
set/p "a30=30:"
if %a30%==koniec goto TVORBAPROGRAMOV
set/p "a31=31:"
set/p "a32=32:"
set/p "a33=33:"
set/p "a34=34:"
set/p "a35=35:"
set/p "a36=36:"
set/p "a37=37:"
set/p "a38=38:"
set/p "a39=39:"
set/p "a40=40:"
if %a40%==koniec goto TVORBAPROGRAMOV
set/p "a41=41:"
set/p "a42=42:"
set/p "a43=43:"
set/p "a44=44:"
set/p "a45=45:"
set/p "a46=46:"
set/p "a47=47:"
set/p "a48=48:"
set/p "a49=49:"
set/p "a50=50:"
goto TVORBAPROGRAMOV
:NOVYPROGRAM2
if NOT %vymazobr%==nie cls
echo TVORBA PROGRAMOV
echo -------------------------------------------------------------------------------
echo Programovanie ukoncite zadanim prikazu KONIEC (len na riadkoch 10, 20, 30, 40).
echo Program moze mat maximalne 50 riadkov (netreba zadat prikaz KONIEC).
set/p "b1=01:"
set/p "b2=02:"
set/p "b3=03:"
set/p "b4=04:"
set/p "b5=05:"
set/p "b6=06:"
set/p "b7=07:"
set/p "b8=08:"
set/p "b9=09:"
set/p "b10=10:"
if %b10%==koniec goto TVORBAPROGRAMOV
set/p "b11=11:"
set/p "b12=12:"
set/p "b13=13:"
set/p "b14=14:"
set/p "b15=15:"
set/p "b16=16:"
set/p "b17=17:"
set/p "b18=18:"
set/p "b19=19:"
set/p "b20=20:"
if %b20%==koniec goto TVORBAPROGRAMOV
set/p "b21=21:"
set/p "b22=22:"
set/p "b23=23:"
set/p "b24=24:"
set/p "b25=25:"
set/p "b26=26:"
set/p "b27=27:"
set/p "b28=28:"
set/p "b29=29:"
set/p "b30=30:"
if %b30%==koniec goto TVORBAPROGRAMOV
set/p "b31=31:"
set/p "b32=32:"
set/p "b33=33:"
set/p "b34=34:"
set/p "b35=35:"
set/p "b36=36:"
set/p "b37=37:"
set/p "b38=38:"
set/p "b39=39:"
set/p "b40=40:"
if %b40%==koniec goto TVORBAPROGRAMOV
set/p "b41=41:"
set/p "b42=42:"
set/p "b43=43:"
set/p "b44=44:"
set/p "b45=45:"
set/p "b46=46:"
set/p "b47=47:"
set/p "b48=48:"
set/p "b49=49:"
set/p "b50=50:"
goto TVORBAPROGRAMOV
:NOVYPROGRAM3
if NOT %vymazobr%==nie cls
echo TVORBA PROGRAMOV
echo -------------------------------------------------------------------------------
echo Programovanie ukoncite zadanim prikazu KONIEC (len na riadkoch 10, 20, 30, 40).
echo Program moze mat maximalne 50 riadkov (netreba zadat prikaz KONIEC).
set/p "c1=01:"
set/p "c2=02:"
set/p "c3=03:"
set/p "c4=04:"
set/p "c5=05:"
set/p "c6=06:"
set/p "c7=07:"
set/p "c8=08:"
set/p "c9=09:"
set/p "c10=10:"
if %c10%==koniec goto TVORBAPROGRAMOV
set/p "c11=11:"
set/p "c12=12:"
set/p "c13=13:"
set/p "c14=14:"
set/p "c15=15:"
set/p "c16=16:"
set/p "c17=17:"
set/p "c18=18:"
set/p "c19=19:"
set/p "c20=20:"
if %c20%==koniec goto TVORBAPROGRAMOV
set/p "c21=21:"
set/p "c22=22:"
set/p "c23=23:"
set/p "c24=24:"
set/p "c25=25:"
set/p "c26=26:"
set/p "c27=27:"
set/p "c28=28:"
set/p "c29=29:"
set/p "c30=30:"
if %c30%==koniec goto TVORBAPROGRAMOV
set/p "c31=31:"
set/p "c32=32:"
set/p "c33=33:"
set/p "c34=34:"
set/p "c35=35:"
set/p "c36=36:"
set/p "c37=37:"
set/p "c38=38:"
set/p "c39=39:"
set/p "c40=40:"
if %c40%==koniec goto TVORBAPROGRAMOV
set/p "c41=41:"
set/p "c42=42:"
set/p "c43=43:"
set/p "c44=44:"
set/p "c45=45:"
set/p "c46=46:"
set/p "c47=47:"
set/p "c48=48:"
set/p "c49=49:"
set/p "c50=50:"
goto TVORBAPROGRAMOV
:ULOZITPROGRAM
set/p "nazov=Nazov programu:"
goto KAMULOZIT
:KAMULOZIT
echo Kam chcete ulozit vas program?
echo ---------------------------------
echo 1/%nazovprogramu%
echo 2/%nazovprogramu2%
echo 3/%nazovprogramu3%
echo ---------------------------------
set/p "ulozit=Cislo pamate:"
if %ulozit%==1 set nazovprogramu=%nazov%
if %ulozit%==2 set nazovprogramu2=%nazov%
if %ulozit%==3 set nazovprogramu3=%nazov%
if %ulozit%==1 goto NOVYPROGRAM1
if %ulozit%==2 goto NOVYPROGRAM2
if %ulozit%==3 goto NOVYPROGRAM3
echo Nespravna volba. Stlacte klavesu ENTER...
set/p "prazdne="
goto KAMULOZIT
:OTVORPROGRAM
if NOT %vymazobr%==nie cls
echo ULOZENE PROGRAMY
echo ---------------------------------
echo 1/%nazovprogramu%
echo 2/%nazovprogramu2%
echo 3/%nazovprogramu3%
echo ---------------------------------
echo Zadajte nazov programu
set/p "vloznazov=Nazov:"
if %vloznazov%==msdos11 goto MSDOS
if %vloznazov%==%nazovprogramu% goto VLASTNYPROGRAM
if %vloznazov%==%nazovprogramu2% goto VLASTNYPROGRAM2
if %vloznazov%==%nazovprogramu3% goto VLASTNYPROGRAM3
echo Program nenajdeny. Stlacte klavesu ENTER...
set/p "prazdne="
goto TVORBAPROGRAMOV
:VLASTNYPROGRAM
if %a2%==prazdne00113 goto OTVORPROGRAM
if NOT %vymazobr%==nie cls
%a1%
%a2%
%a3%
%a4%
%a5%
%a6%
%a7%
%a8%
%a9%
if %a10%==koniec goto PROGRAMY
%a10%
%a11%
%a12%
%a13%
%a14%
%a15%
%a16%
%a17%
%a18%
%a19%
if %a20%==koniec goto PROGRAMY
%a20%
%a21%
%a22%
%a23%
%a24%
%a25%
%a26%
%a27%
%a28%
%a29%
if %a30%==koniec goto PROGRAMY
%a30%
%a31%
%a32%
%a33%
%a34%
%a35%
%a36%
%a37%
%a38%
%a39%
if %a40%==koniec goto PROGRAMY
%a40%
%a41%
%a42%
%a43%
%a44%
%a45%
%a46%
%a47%
%a48%
%a49%
if %a50%==koniec goto PROGRAMY
%a50%
goto TVORBAPROGRAMOV
:VLASTNYPROGRAM2
if %b2%==prazdne00113 goto OTVORPROGRAM
if NOT %vymazobr%==nie cls
%b1%
%b2%
%b3%
%b4%
%b5%
%b6%
%b7%
%b8%
%b9%
if %b10%==koniec goto PROGRAMY
%b10%
%b11%
%b12%
%b13%
%b14%
%b15%
%b16%
%b17%
%b18%
%b19%
if %b20%==koniec goto PROGRAMY
%b20%
%b21%
%b22%
%b23%
%b24%
%b25%
%b26%
%b27%
%b28%
%b29%
if %b30%==koniec goto PROGRAMY
%b30%
%b31%
%b32%
%b33%
%b34%
%b35%
%b36%
%b37%
%b38%
%b39%
if %b40%==koniec goto PROGRAMY
%b40%
%b41%
%b42%
%b43%
%b44%
%b45%
%b46%
%b47%
%b48%
%b49%
if %b50%==koniec goto PROGRAMY
%b50%
goto TVORBAPROGRAMOV
:VLASTNYPROGRAM3
if %c2%==prazdne00113 goto OTVORPROGRAM
if NOT %vymazobr%==nie cls
%c1%
%c2%
%c3%
%c4%
%c5%
%c6%
%c7%
%c8%
%c9%
if %c10%==koniec goto PROGRAMY
%c10%
%c11%
%c12%
%c13%
%c14%
%c15%
%c16%
%c17%
%c18%
%c19%
if %c20%==koniec goto PROGRAMY
%c20%
%c21%
%c22%
%c23%
%c24%
%c25%
%c26%
%c27%
%c28%
%c29%
if %c30%==koniec goto PROGRAMY
%c30%
%c31%
%c32%
%c33%
%c34%
%c35%
%c36%
%c37%
%c38%
%c39%
if %c40%==koniec goto PROGRAMY
%c40%
%c41%
%c42%
%c43%
%c44%
%c45%
%c46%
%c47%
%c48%
%c49%
if %c50%==koniec goto PROGRAMY
%c50%
goto TVORBAPROGRAMOV
:VERZIAOS
echo Verzia vasho Simple OS je %verziaos%. Stlacte klavesu ENTER...
set/p "prazdne="
goto SYSTEM
:ZDROJOVYKOD
echo Zdrojovy kod je nedostupny.
set/p "prazdne=Stlacte klavesu ENTER..."
goto SYSTEM
:AKTUALIZOVAT
echo Naozaj chcete aktualizovat system? (ANO/NIE)
set/p "volba="
if %volba%==nie goto SYSTEM
if NOT %volba%==ano goto AKTUALIZOVAT
if %volba%==ano echo Napiste pismeno jednotky s aktualizacnym pluginom
set/p "jednotka=Jednotka:"
if EXIST %jednotka%\SIMPLE_aktualizacny_plugin.exe goto KOPIROVATAKTUALIZACNYPLUGIN
echo Aktualizacny plugin nenajdeny. Stlacte klavesu ENTER...
set/p "prazdne="
goto SYSTEM
:KOPIROVATAKTUALIZACNYPLUGIN
echo %jednotka%\SIMPLE_aktualizacny_plugin.exe
pause
copy Simple.exe+%jednotka%\SIMPLE_aktualizacny_plugin.exe
set aktualizacia=ano
pause
goto SimpleOS
:OSCESTA
echo Aktualne umiestnenie Simple OS: %CD%
set/p "domovcesta=Nove umiestnenie:"
replace Simple.exe %domovcesta%
goto SYSTEM
:ZAVRIET
echo Ukladam datove subory...
if NOT EXIST SimpleDATA md SimpleDATA
echo %meno%>SimpleDATA\Simple064.DATA   
echo %heslo%>SimpleDATA\Simple065.DATA   
echo %nazovprogramu%>SimpleDATA\Simple003.DATA   
echo %nazovprogramu2%>SimpleDATA\Simple004.DATA   
echo %nazovprogramu3>SimpleDATA\Simple005.DATA   
echo %farba%>SimpleDATA\Simple006.DATA   
echo %nazovdokumentu%>SimpleDATA\Simple007.DATA   
echo %nazovdokumentu2%>SimpleDATA\Simple008.DATA   
echo %nazovdokumentu3%>SimpleDATA\Simple009.DATA   
echo %text%>SimpleDATA\Simple010.DATA   
echo %text2%>SimpleDATA\Simple011.DATA   
echo %text3%>SimpleDATA\Simple012.DATA   
echo %a1%>SimpleDATA\Simple013.DATA
echo %a2%>SimpleDATA\Simple014.DATA
echo %a3%>SimpleDATA\Simple015.DATA
echo %a4%>SimpleDATA\Simple016.DATA
echo %a5%>SimpleDATA\Simple017.DATA
echo %a6%>SimpleDATA\Simple018.DATA
echo %a7%>SimpleDATA\Simple019.DATA
echo %a8%>SimpleDATA\Simple020.DATA
echo %a9%>SimpleDATA\Simple021.DATA
echo %a10%>SimpleDATA\Simple022.DATA
echo %a11%>SimpleDATA\Simple023.DATA
echo %a12%>SimpleDATA\Simple024.DATA
echo %a13%>SimpleDATA\Simple025.DATA
echo %a14%>SimpleDATA\Simple026.DATA
echo %a15%>SimpleDATA\Simple027.DATA
echo %a16%>SimpleDATA\Simple028.DATA
echo %a17%>SimpleDATA\Simple029.DATA
echo %a18%>SimpleDATA\Simple030.DATA
echo %a19%>SimpleDATA\Simple031.DATA
echo %a20%>SimpleDATA\Simple032.DATA
echo %a21%>SimpleDATA\Simple033.DATA
echo %a22%>SimpleDATA\Simple034.DATA
echo %a23%>SimpleDATA\Simple035.DATA
echo %a24%>SimpleDATA\Simple036.DATA
echo %a25%>SimpleDATA\Simple037.DATA
echo %a26%>SimpleDATA\Simple038.DATA
echo %a27%>SimpleDATA\Simple039.DATA
echo %a28%>SimpleDATA\Simple040.DATA
echo %a29%>SimpleDATA\Simple041.DATA
echo %a30%>SimpleDATA\Simple042.DATA
echo %a31%>SimpleDATA\Simple043.DATA
echo %a32%>SimpleDATA\Simple044.DATA
echo %a33%>SimpleDATA\Simple045.DATA
echo %a34%>SimpleDATA\Simple046.DATA
echo %a35%>SimpleDATA\Simple047.DATA
echo %a36%>SimpleDATA\Simple048.DATA
echo %a37%>SimpleDATA\Simple049.DATA
echo %a38%>SimpleDATA\Simple050.DATA
echo %a39%>SimpleDATA\Simple051.DATA
echo %a40%>SimpleDATA\Simple052.DATA
echo %a41%>SimpleDATA\Simple053.DATA
echo %a42%>SimpleDATA\Simple054.DATA
echo %a43%>SimpleDATA\Simple055.DATA
echo %a44%>SimpleDATA\Simple056.DATA
echo %a45%>SimpleDATA\Simple057.DATA
echo %a46%>SimpleDATA\Simple058.DATA
echo %a47%>SimpleDATA\Simple059.DATA
echo %a48%>SimpleDATA\Simple060.DATA
echo %a49%>SimpleDATA\Simple061.DATA
echo %a50%>SimpleDATA\Simple062.DATA
echo %aktualizacia%>SimpleDATA\Simple063.DATA
echo %verziaos%>SimpleDATA\Simple066.DATA
echo %b1%>SimpleDATA\Simple117.DATA
echo %b2%>SimpleDATA\Simple118.DATA
echo %b3%>SimpleDATA\Simple119.DATA
echo %b4%>SimpleDATA\Simple120.DATA
echo %b5%>SimpleDATA\Simple121.DATA
echo %b6%>SimpleDATA\Simple122.DATA
echo %b7%>SimpleDATA\Simple123.DATA
echo %b8%>SimpleDATA\Simple124.DATA
echo %b9%>SimpleDATA\Simple125.DATA
echo %b10%>SimpleDATA\Simple126.DATA
echo %b11%>SimpleDATA\Simple127.DATA
echo %b12%>SimpleDATA\Simple128.DATA
echo %b13%>SimpleDATA\Simple129.DATA
echo %b14%>SimpleDATA\Simple130.DATA
echo %b15%>SimpleDATA\Simple131.DATA
echo %b16%>SimpleDATA\Simple132.DATA
echo %b17%>SimpleDATA\Simple133.DATA
echo %b18%>SimpleDATA\Simple134.DATA
echo %b19%>SimpleDATA\Simple135.DATA
echo %b20%>SimpleDATA\Simple136.DATA
echo %b21%>SimpleDATA\Simple137.DATA
echo %b22%>SimpleDATA\Simple138.DATA
echo %b23%>SimpleDATA\Simple139.DATA
echo %b24%>SimpleDATA\Simple140.DATA
echo %b25%>SimpleDATA\Simple141.DATA
echo %b26%>SimpleDATA\Simple142.DATA
echo %b27%>SimpleDATA\Simple143.DATA
echo %b28%>SimpleDATA\Simple144.DATA
echo %b29%>SimpleDATA\Simple145.DATA
echo %b30%>SimpleDATA\Simple146.DATA
echo %b31%>SimpleDATA\Simple147.DATA
echo %b32%>SimpleDATA\Simple148.DATA
echo %b33%>SimpleDATA\Simple149.DATA
echo %b34%>SimpleDATA\Simple150.DATA
echo %b35%>SimpleDATA\Simple151.DATA
echo %b36%>SimpleDATA\Simple152.DATA
echo %b37%>SimpleDATA\Simple153.DATA
echo %b38%>SimpleDATA\Simple154.DATA
echo %b39%>SimpleDATA\Simple155.DATA
echo %b40%>SimpleDATA\Simple156.DATA
echo %b41%>SimpleDATA\Simple157.DATA
echo %b42%>SimpleDATA\Simple158.DATA
echo %b43%>SimpleDATA\Simple159.DATA
echo %b44%>SimpleDATA\Simple160.DATA
echo %b45%>SimpleDATA\Simple161.DATA
echo %b46%>SimpleDATA\Simple162.DATA
echo %b47%>SimpleDATA\Simple163.DATA
echo %b48%>SimpleDATA\Simple164.DATA
echo %b49%>SimpleDATA\Simple165.DATA
echo %b50%>SimpleDATA\Simple166.DATA
echo %c1%>SimpleDATA\Simple167.DATA
echo %c2%>SimpleDATA\Simple168.DATA
echo %c3%>SimpleDATA\Simple169.DATA
echo %c4%>SimpleDATA\Simple170.DATA
echo %c5%>SimpleDATA\Simple171.DATA
echo %c6%>SimpleDATA\Simple172.DATA
echo %c7%>SimpleDATA\Simple173.DATA
echo %c8%>SimpleDATA\Simple174.DATA
echo %c9%>SimpleDATA\Simple175.DATA
echo %c10%>SimpleDATA\Simple176.DATA
echo %c11%>SimpleDATA\Simple177.DATA
echo %c12%>SimpleDATA\Simple178.DATA
echo %c13%>SimpleDATA\Simple179.DATA
echo %c14%>SimpleDATA\Simple180.DATA
echo %c15%>SimpleDATA\Simple181.DATA
echo %c16%>SimpleDATA\Simple182.DATA
echo %c17%>SimpleDATA\Simple183.DATA
echo %c18%>SimpleDATA\Simple184.DATA
echo %c19%>SimpleDATA\Simple185.DATA
echo %c20%>SimpleDATA\Simple186.DATA
echo %c21%>SimpleDATA\Simple187.DATA
echo %c22%>SimpleDATA\Simple188.DATA
echo %c23%>SimpleDATA\Simple189.DATA
echo %c24%>SimpleDATA\Simple190.DATA
echo %c25%>SimpleDATA\Simple191.DATA
echo %c26%>SimpleDATA\Simple192.DATA
echo %c27%>SimpleDATA\Simple193.DATA
echo %c28%>SimpleDATA\Simple194.DATA
echo %c29%>SimpleDATA\Simple195.DATA
echo %c30%>SimpleDATA\Simple196.DATA
echo %c31%>SimpleDATA\Simple197.DATA
echo %c32%>SimpleDATA\Simple198.DATA
echo %c33%>SimpleDATA\Simple199.DATA
echo %c34%>SimpleDATA\Simple200.DATA
echo %c35%>SimpleDATA\Simple201.DATA
echo %c36%>SimpleDATA\Simple202.DATA
echo %c37%>SimpleDATA\Simple203.DATA
echo %c38%>SimpleDATA\Simple204.DATA
echo %c39%>SimpleDATA\Simple205.DATA
echo %c40%>SimpleDATA\Simple206.DATA
echo %c41%>SimpleDATA\Simple207.DATA
echo %c42%>SimpleDATA\Simple208.DATA
echo %c43%>SimpleDATA\Simple209.DATA
echo %c44%>SimpleDATA\Simple210.DATA
echo %c45%>SimpleDATA\Simple211.DATA
echo %c46%>SimpleDATA\Simple212.DATA
echo %c47%>SimpleDATA\Simple213.DATA
echo %c48%>SimpleDATA\Simple214.DATA
echo %c49%>SimpleDATA\Simple215.DATA
echo %c50%>SimpleDATA\Simple216.DATA
echo %vymazobr%>SimpleDATA\Simple217.DATA
exit
:PREINSTALOVAT
color 0c
echo Ste si isty, ze chcete preinstalovat system? (ANO/NIE)
set/p "volba="
if %volba%==nie goto SYSTEM
if %volba%==ano rd /s /q SimpleDATA
goto START
:DISKOVAJEDNOTKA
if NOT %vymazobr%==nie cls
echo OTVORENIE SUBORU Z DISKOVEJ JEDNOTKY
echo -------------------------------------------------------------------------------
echo Co chcete z disku nacitat? (PROGRAM/TEXT/OBSAH-SUBORU)
set/p "diskvolba="
echo Z ktorej diskovej jednotky chcete nacitat?
set/p "jednotka=Zadajte pismeno jednotky:"
if %diskvolba%==program goto DISKPROGRAM
if %diskvolba%==text goto DISKTEXT
if %diskvolba%==cesta goto DISKCESTA
if %diskvolba%==obsah-suboru goto DISKOBSAHSUBORU
echo Nespravna volba. Stlacte klavesu ENTER...
set/p "prazdne="
goto DISKOVAJEDNOTKA
:DISKPROGRAM
echo Zadajte nazov/cestu programu
set/p "nazov=Nazov/cesta:"
if EXIST %jednotka%\%nazov%.bat %jednotka%\%nazov%.bat
echo Program nenajdeny. Stlacte klavesu ENTER...
set/p "prazdne="
goto SYSTEM
:DISKTEXT
echo Zadajte nazov/cestu textoveho dokumentu
set/p "nazov=Nazov/cesta:"
if EXIST %jednotka%\%nazov%.txt goto TEXTNADISKUNAJDENY
echo Dokument nenajdeny. Stlacte klavesu ENTER...
set/p "prazdne="
goto SYSTEM
:TEXTNADISKUNAJDENY
type %jednotka%\%nazov%.txt
set/p "prazdne="
goto SYSTEM
:DISKOBSAHSUBORU
echo Zadajte nazov/cestu suboru aj s priponou
set/p "nazov=Nazov/cesta:"
if EXIST %jednotka%\%nazov% goto SUBORNADISKUNAJDENY
echo Subor nenajdeny. Stlacte klavesu ENTER...
set/p "prazdne="
goto SYSTEM
:SUBORNADISKUNAJDENY
type %jednotka%\%nazov%
set/p "prazdne="
goto SYSTEM
:DATUMCAS
time /t
date /t
echo Stlacte klavesu ENTER...
set/p "prazdne="
goto SYSTEM
:KONVERTOVATTXT
if NOT %vymazobr%==nie cls
echo KONVERTOVAT TEXTOVY DOKUMENT DO .TXT
echo -------------------------------------------------------------------------------
echo Zadajte nazov dokumentu, ktory chcete konvertovat do .TXT
echo Konvertor ukoncite prikazom UKONCI
echo ---------------------------------
echo ULOZENE TEXTOVE DOKUMENTY
echo ---------------------------------
echo 1/%nazovdokumentu%
echo 2/%nazovdokumentu2%
echo 3/%nazovdokumentu3%
echo ---------------------------------
echo Zadajte nazov dokumentu
set/p "vloznazov=Nazov:"
if %vloznazov%==%nazovdokumentu% goto KONVERTUJTEXT
if %vloznazov%==%nazovdokumentu2% goto KONVERTUJTEXT2
if %vloznazov%==%nazovdokumentu3% goto KONVERTUJTEXT3
if %vloznazov%==ukonci goto SYSTEM
echo Dokument nenajdeny. Stlacte klavesu ENTER...
set/p "prazdne="
goto KONVERTOVATTXT
:KONVERTUJTEXT
echo Zadajte cielovy adresar/jednotku, kam chcete vytvorit .TXT subor
set/p "ciel=Ciel:"
if NOT EXIST SimpleDATA\Simple010.DATA echo Akcia neuspesna. Prosim restartujte Simple a akciu zopakujte...
if NOT EXIST SimpleDATA\Simple010.DATA set/p "prazdne="
if NOT EXIST SimpleDATA\Simple010.DATA goto KONVERTOVATTXT
if EXIST %ciel% copy SimpleDATA\Simple010.DATA %ciel%
if EXIST %ciel% ren %ciel%\Simple010.DATA "%nazovdokumentu%.txt"
if EXIST %ciel% echo Subor bol uspesne prekonvertovany. Stlacte klavesu ENTER...
if EXIST %ciel% set/p "prazdne="
if EXIST %ciel% goto KONVERTOVATTXT
:TXTKONVERTORCESTANENAJDENA
echo Cesta %ciel% nebola najdena. Slacte klavesu ENTER...
set/p "prazdne="
:KONVERTUJTEXT2
echo Zadajte cielovy adresar/jednotku, kam chcete vytvorit .TXT subor
set/p "ciel=Ciel:"
if NOT EXIST SimpleDATA\Simple011.DATA echo Akcia neuspesna. Prosim restartujte Simple a akciu zopakujte...
if NOT EXIST SimpleDATA\Simple011.DATA set/p "prazdne="
if NOT EXIST SimpleDATA\Simple011.DATA goto KONVERTOVATTXT
if EXIST %ciel% copy SimpleDATA\Simple011.DATA %ciel%
if EXIST %ciel% ren %ciel%\Simple011.DATA "%nazovdokumentu2%.txt"
if EXIST %ciel% echo Subor bol uspesne prekonvertovany. Stlacte klavesu ENTER...
if EXIST %ciel% set/p "prazdne="
if EXIST %ciel% goto KONVERTOVATTXT
:TXTKONVERTORCESTANENAJDENA
echo Cesta %ciel% nebola najdena. Slacte klavesu ENTER...
set/p "prazdne="
:KONVERTUJTEXT3
echo Zadajte cielovy adresar/jednotku, kam chcete vytvorit .TXT subor
set/p "ciel=Ciel:"
if NOT EXIST SimpleDATA\Simple012.DATA echo Akcia neuspesna. Prosim restartujte Simple a akciu zopakujte...
if NOT EXIST SimpleDATA\Simple012.DATA set/p "prazdne="
if NOT EXIST SimpleDATA\Simple012.DATA goto KONVERTOVATTXT
if EXIST %ciel% copy SimpleDATA\Simple012.DATA %ciel%
if EXIST %ciel% ren %ciel%\Simple012.DATA "%nazovdokumentu3%.txt"
if EXIST %ciel% echo Subor bol uspesne prekonvertovany. Stlacte klavesu ENTER...
if EXIST %ciel% set/p "prazdne="
if EXIST %ciel% goto KONVERTOVATTXT
:TXTKONVERTORCESTANENAJDENA
echo Cesta %ciel% nebola najdena. Slacte klavesu ENTER...
set/p "prazdne="
:NASTAVENIA
if NOT %vymazobr%==nie cls
echo NASTAVENIA
echo Povolenie funkcie vymazavat obrazovku:%vymazobr%
set/p "vymazobr=ANO/NIE:"
goto SYSTEM
:STARTVLASTNYPRIKAZPROGRAM
set spustitprikaz=ano
%programnavlastnyprikaz%
:PRIKAZY
if NOT %vymazobr%==nie cls
echo PRIKAZY
echo -------------------------------------------------------------------------------
echo ODHLASIT
echo BOOT
echo VYPNUT 
echo FARBA
echo PROGRAMY
echo PRIKAZY
echo VERZIAOS
echo ZDROJOVYKOD
echo OS-CESTA
echo AKTUALIZOVAT
echo PREINSTALOVAT
echo DATUM
echo CAS
echo UKONCI
echo NASTAVENIA
set/p "prazdne="
goto SYSTEM

 

Command.bat (SK verzia)

@echo off
set programnavlastnyprikaz=Command.bat
if %spustitprikaz%==ano goto SPUSTITPRIKAZ
if NOT %vymazobr%==nie cls
echo COMMAND
echo ------------------------------------------------------------------------------
echo Napiste znenie prikazu, ktory chcete vlozit do systemu
set/p "vlastnyprikaz=Prikaz: "
echo Teraz prikaz naprogramujte (max. 10 riadkov)
echo Ak ma kod menej ako 10 riadkov, kod ukoncite zadanim "goto PRIKAZ-KONIEC"
set/p "mojprikaz01=01: "
set/p "mojprikaz02=02: "
set/p "mojprikaz03=03: "
set/p "mojprikaz04=04: "
set/p "mojprikaz05=05: "
set/p "mojprikaz06=06: "
set/p "mojprikaz07=07: "
set/p "mojprikaz08=08: "
set/p "mojprikaz09=09: "
set/p "mojprikaz10=10: "
Simple.exe
:SPUSTITPRIKAZ
set spustitprikaz=nie
%mojprikaz01%
%mojprikaz02%
%mojprikaz03%
%mojprikaz04%
%mojprikaz05%
%mojprikaz06%
%mojprikaz07%
%mojprikaz08%
%mojprikaz09%
%mojprikaz10%
goto SYTEM
:PRIKAZ-KONIEC
goto SYSTEM