interface(...)

# skip script name
shift

for xsd_file=REG_ALL

   set outfile=~replace(xsd_file,.xsd,.txt)
   msg Output file for "xsd_file" is "outfile"

   globset TAG_COUNTER=0
   output outfile
   tag_file_process(xsd_file,xmacro)
   output NUL:
   msg    processed TAG_COUNTER nodes.
endfor

exit 0