Lindrian commented on a Page, $charcheck  -  Oct 28, 2008

I'd use something much more simple:

alias charcheck {
  var %a 1,%b $chr($2),%c
  tokenize 32 $1
  while $($ $+ %a,2) != $null {
    var %d $v1,%c %c $iif($left(%d,1) != %b,%b) $+ %d
    inc %a
  }
  return %c
}
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.