alias topfunnypoint {
  var %y $var(%*funnypoints*,0)
  var %x 1
  while %x <= %y {
    var %z $var(%*funnypoints*,%x).value
    var %c $var(%*funnypoints*,%x)
    var %a $iif( %z > %b , %z , %b )
    var %b %z
    inc %x
  }
  echo -a highest funnypoints: %a %c
}