'Avaraging Demo for the GP2D120
func main()
  dim x
  dim rangavg as float
  AtoDinit(14)
loop:
  rangavg = 0

  for x = 1 to 10
    rangavg = rangavg + AtoD(0)
  next

  rangavg = rangavg / 100
  print rangavg

  goto loop

endfunc
include \lib\DiosAtoD.lib