>>#define MAXBUFFER 65536 >>lhIn = FOPEN(lcFileIn) >>lhOut = FCREATE(lcFileOut) >>DO WHILE NOT FEOF(m.lhIn ) >> fwrite(m.lhOut,strtran(fread(m.lhIn, MAXBUFFER),'AD00','BR77'),MAXBUFFER) >>ENDDO >>FCLOSE(m.lhIn) >>FCLOSE(m.lhOut) >>