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 / TUTORIAL / 1_FIRST.ZRX next >
Text File  |  1996-08-26  |  492b  |  22 lines
  1. /* REXX */
  2. /* ^^^^^^ REXX beginnen immer mit /* REXX */ in der ersten Zeile */
  3.  
  4. /* Bildschirm lîschen */
  5. CALL ZocCls
  6.  
  7. /* Eine Variable setzen */
  8. WHO= "World"
  9.  
  10. /* Text und Variable per Zeichenketten-VerknÅpfung || ausgeben */
  11. CALL ZocWriteln "Hello "||WHO||"!"
  12.  
  13. /* Benutzer nach seinem Namen fragen */
  14. who= ZocAsk("Wie ist Dein Name")
  15.  
  16. /* Text auf den ZOC-Bildschirm ausgeben */
  17. /* (diesmal unter Verwendung des REXX-internen SAY-Befehls) */
  18. SAY "Hello "||WHO||"!"
  19.  
  20. EXIT
  21.  
  22.