COPIES - Vervielfachen

REXX Built-In Funktionen
Manipulation der Zeichenkette

Syntax:                                 
COPIES(info,zahl)

/* REXX COPIES Copyright YCOS Yves Colliard Software 1990-2009 */
/* TRACE ?R  */
  /* einschalten des interaktiven Trace Modus */
  /* */
tx1 = "REXX"
tx2 = "KURS "
tx3 = "Yves Colliard Software"
  /* */
SAY COPIES(tx1,3)               /* Ausgabe: REXXREXXREXX           */
SAY COPIES(tx2,2)               /* Ausgabe: KURS KURS              */
SAY COPIES("-",9)               /* Ausgabe: ---------              */
SAY COPIES(tx3,0)               /* Ausgabe:                        */