_Scope.MouAvgY
%%%"yavg" log)(
0xFF808080 "-"
third negative
{
 rot minus tuck
 {
  third .08 lt ?
  pop2 0xFF907C50 "A"
  third .20 lt ?
  pop2 0xFFA08050 "B"
  third .45 lt ?
  pop2 0xFFB09050 "C"
  third .70 lt ?
  pop2 0xFFC4A050 "D"
  third .90 lt ?
  pop2 0xFFE8B850 "E"
  third 1.20 lt ?
  pop2 0xFFFFDC50 "F"
  true ?
 } loop
}
{
 {
  third .08 lt ?
  pop2 0xFF849070 "A"
  third .20 lt ?
  pop2 0xFF90A070 "B"
  third .45 lt ?
  pop2 0xFF98B070 "C"
  third .70 lt ?
  pop2 0xFFA4C470 "D"
  third .90 lt ?
  pop2 0xFFC8E870 "E"
  third 1.20 lt ?
  pop2 0xFFCCFF70 "F"
  true ?
 } loop
} ifelse
 exch @!SpeedY
 pop