Guest User

Untitled

a guest
Jul 16th, 2018
74
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.44 KB | None | 0 0
  1. // Jake Holmesby, 22nd March 2012
  2.  
  3. double dFuelPrice, dFuelCost, dCurrentOdo, dPreviousOdo, dFuelAmount, dOdoTotal, dLitresKilometres, dFuelGallons, dOdoMiles, dMilesGallons;
  4. int iFuelBar;
  5. dFuelPrice = Convert.ToDouble(FuelPriceTxtbx.Text);
  6. dFuelCost = Convert.ToDouble(FuelCostTxtbx.Text);
  7. dCurrentOdo = Convert.ToDouble(CurrentOdoTxtbx.Text);
  8. dPreviousOdo = Convert.ToDouble(PreviousOdoTxtbx.Text);
  9.  
  10. // Litres per 100 km conversion calculation
  11.  
  12. dFuelAmount = dFuelCost / dFuelPrice * 100;
  13. dOdoTotal = dCurrentOdo - dPreviousOdo;
  14. dLitresKilometres = dFuelAmount / dOdoTotal * 100;
  15. ConsumptionKmLbl.Text = "Consumption is " + Convert.ToString(dLitresKilometres) + " l/100km";
  16.  
  17. // Miles per Gallon conversion calculation
  18.  
  19. dFuelGallons = dFuelAmount * 4.546;
  20. dOdoMiles = dOdoTotal * 1.609;
  21. dMilesGallons = dOdoMiles / dFuelGallons;
  22. ConsumptionMilesLbl.Text = "or " + Convert.ToString(dMilesGallons) + " mpg";
  23.  
  24. // Fuel Consumption Bar
  25.  
  26. Graphics fuelbar = ConsumptionPicbx.CreateGraphics();
  27. SolidBrush brshBlack = new SolidBrush(Color.Black);
  28. iFuelBar = Convert.ToInt32(dLitresKilometres / 24 * 240);
  29. fuelbar.FillRectangle(brshBlack, iFuelBar, 0, 5, 44);
Add Comment
Please, Sign In to add comment