const Fuel_D = 10
const Fuel_G = 11
const FWater_D = 12
const FWater_G = 13
dim Fuel
dim FWater
dim i

cls
Font 2
GUI displaybox Fuel_D,0,0,190,58,RGB(white),RGB(60,60,60)
CtrlVal(Fuel_D) = "E 1/2 F~"
GUI BARGAUGE Fuel_G,0,30,190,20,RGB(white),RGB(black),0,100,RGB(red),5,RGB(0,180,0)
GUI GAUGE FWater_G,120,220,100,RGB(white),RGB(black),0,100,,"Litres",RGB(red),20,RGB(green)
'Note GUI Gauge FWater_G etc. etc. should all be on one line
do
Fuel = 1
FWater = 1
for i = 1 to 100 step 5
ctrlval(Fuel_G) = Fuel + i
ctrlval(FWater_G) = FWater + i
pause 300
next i
loop