home *** CD-ROM | disk | FTP | other *** search
/ c't freeware shareware 2001 January / CT_SW0101.ISO / mac / software / kommunik / misc / zoc400wg.exe / setup.fil / script / RXSAMPLE / MANUAL / ZOCRESU.ZRX < prev   
Text File  |  1996-08-26  |  311b  |  16 lines
  1. /* REXX */
  2.  
  3. answer= ZocRequest("Sind Sie sicher?", "Ja", "Nein")
  4.  
  5. IF answer=="Ja" THEN DO 
  6.    SAY "Der Benutzer ist sich sicher!"
  7. END
  8.  
  9. IF answer=="Nein" THEN DO
  10.    SAY "Der Benutzer ist sich nicht sicher!"
  11. END
  12.  
  13. IF answer=="##CANCEL##" THEN DO
  14.    SAY "Der Benutzer hat die ESC-Taste gedrÅckt"
  15. END
  16.