// // Achtung: sehr primitiv und speziell! // // in buffer1: USA1-shorter.txt // im aktuellen Buffer: Liste mit Pfad e:\.... #103=BN while(! At_EoF){ if (Match("e:")==0) { EoL Search("\", REVERSE+ADVANCE) RCB(103,CP,EOL_POS) BS(1) Search(@103, BEGIN+NOERR) if (EM) { BS(#103) BoL IT("?add?") Line(1, ERRBREAK) while((Match("|W")==0) || (Match(">")==0)) { BoL IT("?add?") Line(1, ERRBREAK) } } else { BS(#103) Line(1, ERRBREAK) } } else { Line(1, ERRBREAK) } }