%begin; !Setup
%externalroutinespec obeycommand(%string(255)s)
%string(255)s

  s = cliparam
  %unless s="" %start
    s = s.":" %unless charno(s,length(s))=':'
  %finish
  s = "@".s."setup"
  obeycommand(s)

%endofprogram