Actually figured it out smile

Code:
alias test2 {
  var %idx = 0, %b, %chr
  write -c txt.txt
  fopen a page.txt
  while (!feof) {
    if ($ferr || $feof) { fclose a | return }
    %b = $fread(a,4096,&var)
    if (%b) {
      while (%idx < %b) {
        inc %idx
        %chr = $bvar(&var,%idx)
        if ($istok(10.13,%chr,46)) { bset &new %idx %chr }
        elseif (!$istok(10.13.9,%chr,46)) { bset &new %idx %chr }
      }
      bwrite txt.txt -1 &new
      %idx = 0
      bunset &new
    }
  }
}


It's still a little slow and freezes mIRC for about 15-30 seconds, not too bad, I suppose.

Last edited by nycdiesel; 10/02/05 09:40 PM.