// Baue die HTML-Seite nach der Produktion von latex2html zu // meinem Outfit um! // Proc Main() integer handle handle = FindFirstFile('c:\temp\ghbsys\ghb\node*.html', -1) //allocate search handle //search for ALL files if handle <> -1 repeat Message(FFName()) EditFile(FFName()) Replace('','','ng') Replace('','','ng') Find('
','ng')

   Copyright © 2000-2001: HBZ Köln, Addline('') Addline('
') Addline('

   Copyright © 2000-2001:') Addline('HBZ Köln,') Replace('{200[0-9]}-{[0-1][0-9]}-{[0-9][0-9]}',' \3.\2.\1   ','ngx') Replace('^Standard$','','ngx')

Find('','ng') InsertLine('

') SaveFile() AbandonFile() until not FindNextFile(handle, -1) //get next file FindFileClose(handle) //release search handle endif end //