var %f = 1, %i = 1, %all = 0
while (%found [ $+ [ $iif(%f > 1,$+(.,%f)) ] ] != $null && %f < 6) {
%i = 1
while (%i < %found [ $+ [ $iif(%f > 1,$+(.,%f)) ] ]) {
/inc %all
if (%all == 6) {
.msg $nick $C(1) $+ ( $+ $C(2) $+ overflow $+ $C(1) $+ ) $+ $C(1) too many search results to display.
return
}
else if ($findfile($r.srv(Fserve.1,Root.Dir),%search,%i) != $null) {
/inc %current
.msg $nick $C(1) $+ ( $+ $C(2) $+ $+ %current $+ $+ $C(1) $+ ) file:( $+ $C(2) $+ $right($findfile($r.srv(Fserve.1,Root.Dir),%search,%i),$calc($len($findfile($r.srv(Fserve.1,Root.Dir),%search,%i)) - $len($r.srv(Fserve.1,Root.Dir)))) $+ $C(1) $+ ) size:( $+ $C(2) $+ $+ $big($findfile($r.srv(Fserve.1,Root.Dir),%search,%i)) $+ $+ $C(1) $+ ) trigger:( $+ $C(2) $+ $+ /ctcp $+ $chr(32) $+ $r.srv(Fserve.1,Trigger) $+ $+ $C(1) $+ )
}
/inc %i
}
/inc %f
}