Mal  menu reaguj¡ pomoci "Ask".

  Pre zle¨en¡ n zornosti instalace "shell" a optick‚ odl¡¨en¡ je
  dobr˜ pou‘it  samovytvo©en‚ menu.Toto menu  bude opˆt vytvo©eno
  ve   forme   d vkov˜ho   souboru   a   bude   dotazovat   vstup
  u‘ivatele.Proto‘e  se co  nejv¡ce sna‘¡me  dr‘et p©edlohy  Menu
  pou‘it˜ch v Portfoliu,nemˆl by vstup pomoci prvn¡ch p¡smen menu
  sa vypisovat na obrazovku  ale b˜t pokudmo‘no potla‡en.To vylu-
  ‡uje pou‘it¡  povelu,kter˜ jsme u‘ mˆli  a to "input".Pou‘ijeme
  ov¨em nov˜ p©¡kaz "ask",kter˜ rovnˆ‘ poch zi z kn¡‘ky "200 Uti-
  lit pro PC-MS-DOS".Plne vyhovuje pou‘it¡ na Portfoliu a nach z¡
  se rovnˆ‘ na diskete pod n zvem "ASK.COM".
  Tenhle nov˜ DOS-p©¡kaz "Ask" o‡ek va na rozd¡l od "input" jen
  jedno  p¡smeno  a  tohle  po¨le  bud  na  obrazovku  anebo jin‚
  za©¡zen¡.N sledne provˆ©¡ pomoci  Erorlevel,kter‚ p¡smeno z vy-
  bran˜ch bylo stla‡eno a d vkov˜ soubor m£‘e na to p©¡slu¨ne re-
  agovat.
      Ted  vytvo©¡me  mal‚  menu  s  dvoma  polo‘kami  za  £‡elem
  demonstrace.P©i‡em prvn¡ bod bude instalace u‘ vytvo©en‚ho p©¡-
  kazu "shell" a druh˜m bude opu¨ten¡ menu.Abychom tento program
  vybavili obdobne  ako jsou menu v  Portfoliu a opticky zlep¨ili
  jeho vzhled vyu‘ijeme roz¨¡©enou znakovou sadu IBM.
  Abychom cel˜ vzhled u‡inili profesioneln¡m a ok‚nko menu nebylo
  upoutan˜ na dolnej strane obrazovky pou‘ijeme nam¡sto ECHO nov˜
  p©¡kaz DOSu "Locate".Tento p©¡kaz umo‘nuje um¡stnen¡ kurzoru na
  libovoln‚ m¡sto obrazovky.
  Na za‡ tku na¨eho d vkov‚ho souboru provedeme potla‡en¡ v˜pisu
  na obrazovku a vyp¡¨eme menu pomoci Echo a "Locate".

      locate 1,3
      echo ÚÄÄÄ Menu ÄÄÄ¿
      locate 2,3
      echo ³ Shell An ³
      locate 3,3
      echo ³ Quit... ³
      locate 4,3
      echo ÀÄÄÄÄÄÄÄÄÄÄÄÄÙ

  Parametre,kter‚ pot©ebuje nov˜ p©¡kaz "locate" je poloha teda
  sou©adnice X a Y.P©¡‡em m  lev˜ horn¡ roh sou©adnice 0/0.Prvn¡
  hodnota je v‘dy sou©adnice Y (vertik lne) a druh  sou©adnice X
  (horizontalne). Abychom mohli um¡stnit kurzor na prvn¡ p¡smeno
  menu a mohli o‡ek vat vstup pomoci "ask" provedeme tohle pomoci
  dal¨¡ho p©¡kazu locate.N sledne bude  teda pomoci ASK tak‚ o‡e-
  k van˜  vstup od  u‘ivatele.Ted mus¡me  zadat soupis  p¡smˆn na
  kter‚ m  "Ask" reagovat.Dodate‡ne se tady rozli¨uje mezi velk˜-
  mi a mal˜mi p¡smeny.Vych z¡me ale z toho,‘e si u‘ivatel u¨et©¡
  pr ci a volbu provede pomoci  mal˜ch p¡smen,na kter‚ je kl ves-
  nice p£vodne  p©epnut  (teda "s"  pro shell a  "q" pro Quit.Oba
  t to p¡smen  zarad¡me do soupisky nasledovne:

      locate 2,5
      ask sq > nul

  Proto aby u‘ivatel nevidel v˜stup p¡smen na obrazovku jsou tyto
  p©¡mo zaps ny do za©¡zen¡ "nul",teda zru¨eny.
  Ask o‡ek va  jenom tak dlouho,a‘  u©ivatel zad  cez  kl vesnici
  jedno   z    vybran˜ch   p¡smen.Vstup   je    potom   testovan˜
  prost©ednictv˜m Errorlevel.

      if errorlevel 2 goto ende

  Obsah  v  errorlevel  ud va  pozici  p¡smene v soupisce,zadanou
  u‘ivatelem.Pokud je to teda p¡smeno "s" pro volbu "shell" obd‘¡
  errorlevel hodnotu "1" proto‘e je "s" na.prvn¡m m¡ste v soupis-
  ce (sq).Na tomhle z klade je mo‘n  realizace skok£,a z vˆr sou-
  boru m£‘e byt tak˜to:

      shell
      :ende
      cls

  Pokud ted u‘ivatel vyvol  "menu" p©¡kazem :

      c> menu

  tak se stla‡en¡m "s" opou¨t¡ d vkov˜ soubor MENU.BAT a provede
  spu¨ten¡ souboru SHELL.BAT.Pokud je  zad no p¡smˆno "q" je sou-
  bor MENU.BAT rovne‘ opu¨ten a ©¡zen¡ se vr t¡ rovne‘ DOSu.
  Pro kontrolu ted uv dim cel˜ d vkov˜ soubor MENU.BAT,kter˜ se
  rovne‘ nach z¡ na diskete.

  locate 1,3
  echo ÚÄÄÄ Menu ÄÄÄÄ¿
  locate 2,3
  echo ³ Shell An ³
  locate 3,3
  echo ³ Quit... ³
  locate 4,3
  echo ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
  locate 2,5
  ask sq > nul
  if errorlevel 2 goto ende
  shell

  :ende
  cls