FoxPro/Visual FoxPro - crear un prg para rangos

Hola

Necesito que me ayude por favor a crear un programa que me permita calcular el precio de un articulo o servicio por ejemplo una persona consume 29m de agua pero estos se deben calcular dependiendo un rango como este:
1 a 10 $0.20
11 a 20 $0.25
21 a 30 $0.30
31 a mas $0.35

los primero 10 los debo cobrar a $0.20
los otros 10 los debo cobrar a $0.25
los otros 9 los debo cobrar a $0.30
el total por haber consumido 30 es de (10*0.20)+(10*0.25)+(9*0.30)=$ 7.20
pero el rango los tengo almacenado en una tabla

me podria ayudar o dar una idea de como hacerlo

Agradeciendo su colaboracion de antemano.
AT. fide

Hola, que datos debes ingresar? El consumo? En tu ejemplo es 29m (cubicos?)
Podrías detallar la estructura de la tabla que tiene los rangos?
Si queres, podes escribirme a: [email protected]

Saludos
Javier (Jujuy-Argentina)

Puedes probar este codigo algo arcaico pero efectivo:
************************************************************
PUBLIC costo
STORE 0.00 TO costo
consumo = 35
IF BETWEEN(consumo,1,10) && primer rango
costo = consumo * 0.20
ENDIF
*---
IF BETWEEN(consumo,11,20) && segundo rango
costo1 = 10 * 0.20
consumo = consumo - 10
costo2 = consumo * 0.25
costo = costo1 + costo2
ENDIF
*---
IF BETWEEN(consumo,21,30) && tercer rango
costo1 = 10 * 0.20
costo2 = 10 * 0.25
consumo = consumo - 20
costo3 = consumo * 0.30
costo = costo1 + costo2 + costo3
ENDIF
*---
IF BETWEEN(consumo,31,300) && cuarto rango
costo1 = 10 * 0.20
costo2 = 10 * 0.25
costo3 = 10 * 0.30
consumo = consumo - 30
costo4 = consumo * 0.35
costo = costo1 + costo2 + costo3+ costo4
ENDIF