© serviceprofessionalgmbh

Hier können REXX-Befehle und -Funktionen direkt eingegeben werden. Das Programm führt sie interpretativ aus.

/* REXX

   Routine für Tests beliebiger REXX-Commands und -Funktionen
   noch besser ist REXXTRY  =>  Nachbildung aus OS/2
   */
DMY = msg("OFF")
parse source . TYP NAME .
say "Start" NAME
DATUM = datum()
do forever
   say;say address()"> Eingabe (ENTER = ENDE)" DATUM "/" time()
   parse external CMD
   if CMD = "" then leave
   interpret CMD
end
trace
say "Bye, bye..."
exit