home *** CD-ROM | disk | FTP | other *** search
/ PC World 1997 November / PCWorld_1997-11_cd.bin / software / programy / FBL / TCPBATCH / DEMO / SCRIPTS / UKAZKA16.TCP < prev    next >
Encoding:
Text File  |  1997-07-13  |  1.7 KB  |  61 lines
  1. // ukßzka Φ.16 - ukßzka urΦitΘho "kouzlenφ" s definovan²mi symboly, zde ovÜem
  2. // ------------- i dφky omezenΘmu poΦtu p°φkaz∙ pro shareware-verzi pon∞kud
  3. //               nefunkΦnφ (sledujte pouze v²sledek v menu "Zobrazenφ stavu")
  4.  
  5. // Pou₧ity p°φkazy: Define, Undefine, IfDef, IfNotDef, Label, GoTo
  6.  
  7. // Pomocφ parametru "-d..." programu lze definovat symboly ROZSIRENY, SPOJENY
  8. // a HLASIT v libovoln²ch kombinacφch a na jejich zßklad∞ bude script upravovat
  9. // svoji Φinnost
  10.  
  11. Define MOD_OPAKOVAT
  12. Define MOD_VETVIT
  13. Define MOD_PODPROGRAM
  14. Define MOD_SKIPPROC
  15. // Definovßny symboly, je₧ jsou v platnosti, neupravuje-li Φinnost scriptu
  16. // ₧ßdn² ze symbol∙ uveden²ch v p°φkazovΘ °ßdce
  17.  
  18. IfNotDef ROZSIRENY GoTo NerozÜφ°en²
  19.  
  20.     // Sem se dostane program, pokud je definovßn symbol ROZSIRENY
  21.  
  22.     Undefine MOD_SKIPPROC
  23.     Define MOD_EXTPROC
  24.     Define MOD_NAVAZOVAT
  25.     // Definovßny a oddefinovßny symboly specifickΘ pro ROZSIRENY
  26.  
  27. Label NerozÜφ°en²
  28.  
  29.  
  30. IfNotDef SPOJENY GoTo Nespojen²
  31.  
  32.     // Sem se dostane program, pokud je definovßn symbol SPOJENY
  33.  
  34.     Undefine MOD_VETVIT
  35.     Define MOD_SKIPPROC
  36.     Define MOD_EXTPROC
  37.     // Definovßny a oddefinovßny symboly specifickΘ pro SPOJENY
  38.  
  39. Label Nespojen²
  40.  
  41.  
  42. IfNotDef HLASIT GoTo Nehlßsit
  43.  
  44.     // Sem se dostane program, pokud je definovßn symbol HLASIT
  45.  
  46.     Undefine MOD_EXTPROC
  47.     Undefine MOD_PODPROGRAM
  48.     Define MOD_MESSAGES
  49.     // Definovßny a oddefinovßny symboly specifickΘ pro HLASIT
  50.  
  51. Label Nehlßsit
  52.  
  53.  
  54. IfDef MOD_NAVAZOVAT // zde bude akce, kterß odpovφdß m≤du Navazovat
  55.  
  56. IfDef MOD_PODPROGRAM IfNotDef MOD_EXTPROC // zde bude akce, kterß odpovφdß
  57. // m≤du Podprogram, pokud ovÜem nebyl definovßn m≤d ExtProc
  58.  
  59. // atd.
  60. // Na v²slednΘ nastavenφ symbol∙ se podφvejte do menu "Zobrazenφ stavu"
  61.