Changed to using Doubles

1 files changed, 9 insertions, 9 deletions

diff --git a/designer.bmx b/designer.bmx
index 9040d63..9afde62 100644
--- a/designer.bmx
+++ b/designer.bmx
@@ -61,7 +61,7 @@ Type TDesObj Abstract
 		GameGFX.guifont.Draw(x+","+y,0,0)
 	End Method
 
-	Method FloatString:String(v:Double)
+	Method DoubleString:String(v:Double)
 		Local s:String=v
 		
 		If s.Find(".")<>-1
@@ -151,7 +151,7 @@ Type TDesGrav Extends TDesObj
 		If GUIDialog(Designer.mdialog,Designer.md_ok,Designer.md_cancel,GameGFX.pointer)
 			g.friendly = Designer.md_friendly.checked
 			g.repel = Designer.md_invert.checked
-			g.mass = Designer.md_mass.text.ToFloat()
+			g.mass = Designer.md_mass.text.ToDouble()
 		EndIf
 	End Method
 
@@ -160,7 +160,7 @@ Type TDesGrav Extends TDesObj
 	End Method
 
 	Method SetInfo(w:TLabel)
-		w.text="Friendly:" + BoolString(g.friendly) + "  Inverse gravity:" + BoolString(g.repel) + "  Mass: " + FloatString(g.mass)
+		w.text="Friendly:" + BoolString(g.friendly) + "  Inverse gravity:" + BoolString(g.repel) + "  Mass: " + DoubleString(g.mass)
 	End Method
 	
 	Method Snap()
@@ -316,10 +316,10 @@ Type TDesPoint Extends TDesObj
 
 		If GUIDialog(Designer.pdialog,Designer.pd_ok,Designer.pd_cancel,GameGFX.pointer)
 			l.gap = Max(1,Designer.pd_gap.text.ToInt())
-			l.v.x = Designer.pd_vx.text.ToFloat()
-			l.v.y = Designer.pd_vy.text.ToFloat()
+			l.v.x = Designer.pd_vx.text.ToDouble()
+			l.v.y = Designer.pd_vy.text.ToDouble()
 			l.circle = Designer.pd_circle.checked
-			l.circvel = Designer.pd_circvel.text.ToFloat()
+			l.circvel = Designer.pd_circvel.text.ToDouble()
 		EndIf
 	End Method
 
@@ -329,9 +329,9 @@ Type TDesPoint Extends TDesObj
 
 	Method SetInfo(w:TLabel)
 		If l.circle
-			w.text="Gap:" + l.gap + "  DX: " + FloatString(l.v.x) + "  DY: " + FloatString(l.v.y) + "  Angular velocity: " + FloatString(l.circvel)
+			w.text="Gap:" + l.gap + "  DX: " + DoubleString(l.v.x) + "  DY: " + DoubleString(l.v.y) + "  Angular velocity: " + DoubleString(l.circvel)
 		Else
-			w.text="Gap:" + l.gap + "  DX: " + FloatString(l.v.x) + "  DY: " + FloatString(l.v.y)
+			w.text="Gap:" + l.gap + "  DX: " + DoubleString(l.v.x) + "  DY: " + DoubleString(l.v.y)
 		EndIf
 	End Method
 
@@ -558,7 +558,7 @@ Type Designer
 			level.maxmass = ld_maxmass.text.ToInt()
 			level.winpercent = Max(0,Min(100,ld_winpercent.text.ToInt()))
 			level.timer = ld_timer.text.ToInt()
-			level.placemass = ld_placemass.text.ToFloat()
+			level.placemass = ld_placemass.text.ToDouble()
 		EndIf
 	End Function
 End Type