to be really sad example, another one:
code:
function arraycomp($1, $2, optional $m)
    dim $s,$
    for each $ in $2
        $s=$s+iif((ascan($1,$)>-1 & $m) | (ascan($1,$)=-1 & 0=$m),chr(1)+$,"")
    next
    $arraycomp=split(substr($s,2),chr(1))
endfunction


[ 25. February 2003, 16:34: Message edited by: Lonkero ]
_________________________
!

download KiXnet