$mods...... makes mirc freeze... i know its the while but i just dont know why it doesnt work
Code:
alias mods {
  set %i 1
  while ($read(onlinemods1.txt,%i)) {
    if (@ iswm $read(onlinemods1.txt,%i)) {
      if (%@s == $null) {
        set %@s  $read(onlinemods1.txt,%i) $+ ,
        inc %i
      }
      elseif (%@s != $null) {
        set %@s %@s $read(onlinemods1.txt,%i) $+ ,
        inc %i
      }
    }
    if ($chr(33) iswm $read(onlinemods1.txt.%i)) {
      if (%!s == $null) {
        set %!s  $read(onlinemods1.txt,%i) $+ ,
        inc %i
      }
      elseif (%!s != $null) {
        set %!s %!s $read(onlinemods1.txt,%i) $+ ,
        inc %i
      }
    }
    if ($chr(37) iswm $read(onlinemods1.txt,%i)) {
      if (%hs == $null) {
        set %hs  $read(onlinemods1.txt,%i) $+ ,
        inc %i
      }
      elseif (%hs != $null) {
        set %hs %hs $read(onlinemods1.txt,%i) $+ ,
        inc %i
      }
    }
    if ($chr(43) iswm $read(onlinemods1.txt,%i)) {
      if (%+s == $null) {
        set %+s  $read(onlinemods1.txt,%i) $+ ,
        inc %i
      }
      elseif (%+s != $null) {
        set %+s %+s $read(onlinemods1.txt,%i) $+ ,
        inc %i
      }
    }
  }
  return %!s %@s %hs %+s
  unset %!s 
  unset %@s 
  unset %hs 
  unset %+s
}

Liek OMG Yuo Stoleded my MageHurtzzzz!!!11