alias min {
var %i $0
var %g 1
var %min $1
while (%g <= %i) {
if ($eval($ $+ %g,2) < %min) && ($eval($ $+ %g,2) isnum) {
set %min $eval($ $+ %g,2)
}
inc %g
}
return The Minimum Value Is: %min
}
have max as well grin
alias max {
var %i $0
var %g 1
var %max $1
while (%g <= %i) {
if ($eval($ $+ %g,2) > %max) && ($eval($ $+ %g,2) isnum) {
set %max $eval($ $+ %g,2)
}
inc %g
}
return The Maximum Value Is: %max
}


Last edited by pheonix; 17/08/03 07:02 AM.