Kerry , I change the option 3 code but i have this problem
for 1200 < Area < = 2000 D = 150 + ((Area - 1200) / 16) and K = Area * 0.10
but
for 2000 < Area < 40000 D = 0 and K =0I dont know how to write it
Please check all the functions
if Area = 4000 sqm then D = 200 sqm and K = Area * 0.10
if 4000 sqm < Area =<8000 sqm then D = 200 + (Area - 4000)*0.02 and K = Area * 0.10
if Area > 8000 sqm then D = 280 + (Area - 8000)*0.01 and K = Area * 0.10
if 750 sqm =< Area <1200 sqm then D = 100 + ((Area - 750) / 9) and K = Area * 0.10
if 1200 sqm =< Area =<2000 sqm then D = 150 + ((Area - 1200) / 16) and K = Area * 0.10
skarea (* area 0.1)
)
)
((> area 4000)
(setq sdarea
(+ 200 ( * 0.02 (- area
4000))) skarea (* area 0.1)
)
)
((<= area 8000)
(setq sdarea
(+ 200 ( * 0.02 (- area
4000))) skarea (* area 0.1)
)
)
((> area 8000)
(setq sdarea
(+ 280 ( * 0.01 (- area
8000))) skarea (* area 0.1)
)
)
((>= area 750)
(setq sdarea
(+ 100 ( / (- area
750) 9)) skarea (* area 0.1)
)
)
((<= area 1200)
(setq sdarea
(+ 100 ( / (- area
750) 9)) skarea (* area 0.1)
)
)
((> area 1200)
(setq sdarea
(+ 150 ( / (- area
1200) 16)) skarea (* area 0.1)
)
)
((<= area 2000)
(setq sdarea
(+ 150 ( / (- area
1200) 16)) skarea (* area 0.1)
)
)
((> area 2000)
skarea 0
)
)
((< area 4000)
skarea 0
)
)
)
)
thanks