Lexcom, štrukturovaná kabeláž dect dochádzkový systém, Interiér a exteriér stolár.
sobota, 21. 12. 2024
English   Cestina   Deutsch   Slovencina

O programe
Jazyk
Screenshoty
Download
Kontakt

Verzia 2.0
Kniznica

Ak chceš nechať Karola pracovať naraz (aby príkazy nevykonával postupne), zadaj mu slovo "rychlo". Slovom pomaly ho prepneš do pôvodného módu.
{
V tomto priklade su pouzivane
vlastne prikazy a vnorene prikazy
  (prikaz preplavaj_bazen ma este
  prikaz celomvzad)
}

// prikaz postav bazen
prikaz postav_bazen;
   {*********** postavim bazen ***********}
   rychlo
   opakuj 12 krat
     kym nie je stena rob
       poloz
       krok
     *kym
     vlavo
     rychlo
   *opakuj
   pomaly
*prikaz

// prikaz zburaj bazen
prikaz zburaj_bazen;
   {zburam bazen}
   rychlo
   opakuj 12 krat
     kym nie je stena rob
       zober;
       krok;
     *kym
     vpravo;
     rychlo;
   *opakuj
   pomaly;
*prikaz

// prikaz preplavaj bazen
prikaz preplavaj_bazen;

    // lokalne prikazy
    prikaz celomvzad;
       vlavo;
       vlavo;
    *prikaz
  
  // telo prikazu
   opakuj 3 krat poloz *opakuj
   krok
   kym nie je tehla rob
     opakuj 3 krat poloz *opakuj
     krok
     celomvzad
     opakuj 3 krat zober *opakuj
     celomvzad
   *kym
   krok
   vlavo vlavo
   opakuj 3 krat zober *opakuj
   vlavo vlavo
*prikaz

// definicia hlavneho prikazu
prikaz hlavny_prikaz;

   postav_bazen;

   {prejdem do stredu}
    vlavo opakuj 2 krat krok *opakuj vpravo

   {preplavaj}
   preplavaj_bazen;

   {pridem do rohu}
   vpravo
   opakuj 2 krat krok *opakuj
   vpravo

   zburaj_bazen;

   {vratim sa na povodnu poziciu}
   kym je volno rob krok; *kym
   {natocenie v povodnom smere}
   vlavo; vlavo;
*prikaz

{ ********************************************* }
{ *************** ZACIATOK PROGRAMU *********** }
{ ********************************************* }
opakuj 4 krat

   hlavny_prikaz;
   
*opakuj
{ *********** KONIEC PROGRAMU *********** }
<<<< Vetvenie Ak Rozšírenia jazyka >>>>