Fixed samples.

samples/breakout/breakout.bmx

@@ -1,11 +1,7 @@
 
 Strict
 
-?win32
-Framework SDL.d3d9sdlmax2d
-?Not win32
-Framework SDL.gl2sdlmax2d
-?
+Framework SDL.SDLRenderMax2d
 Import brl.pngloader
 Import brl.RandomDefault
 
@@ -102,7 +98,7 @@ Type Tile
           size=size*0.9
         Else
           size = 1
-          SetScale 0.95+(0.05*Cos(gTime)),0.95+(0.05*Sin(gTime))
+          SetScale Float(0.95+(0.05*Cos(gTime))),Float(0.95+(0.05*Sin(gTime)))
         EndIf
       Case 1
         SetRotation rot
@@ -110,15 +106,15 @@ Type Tile
     EndSelect
     Select typ
       Case 0
-        DrawImage tiles_img,x+offx,y+offy+(2*Sin(gtime)),0
+        DrawImage tiles_img,Float(x+offx),Float(y+offy+(2*Sin(gtime))),0
       Case 1
-        DrawImage tiles_img,x+offx,y+offy+(2*Sin(gtime)),1
+        DrawImage tiles_img,Float(x+offx),Float(y+offy+(2*Sin(gtime))),1
       Case 2
-        DrawImage tiles_img,x+offx,y+offy+(2*Sin(gtime)),2
+        DrawImage tiles_img,Float(x+offx),Float(y+offy+(2*Sin(gtime))),2
       Case 3
-        DrawImage tiles_img,x+offx,y+offy+(2*Sin(gtime)),3
+        DrawImage tiles_img,Float(x+offx),Float(y+offy+(2*Sin(gtime))),3
       Case 4
-        DrawImage tiles_img,x+offx,y+offy+(2*Sin(gtime)),4
+        DrawImage tiles_img,Float(x+offx),Float(y+offy+(2*Sin(gtime))),4
     EndSelect
 
     SetScale 1,1

samples/firepaint/firepaint.bmx

@@ -8,11 +8,7 @@ EndRem
 
 Strict
 
-?win32
-Framework SDL.d3d9sdlmax2d
-?Not win32
-Framework SDL.gl2sdlmax2d
-?
+Framework SDL.SDLRenderMax2d
 Import sdl.SDLFreeAudio
 Import brl.ramstream
 Import brl.pngloader

samples/flameduck/circlemania/cmania.bmx

@@ -6,11 +6,7 @@ End Rem
 
 Strict
 
-?win32
-Framework SDL.d3d9sdlmax2d
-?Not win32
-Framework SDL.gl2sdlmax2d
-?
+Framework SDL.SDLRenderMax2d
 Import brl.pngloader
 Import brl.RandomDefault
 
@@ -34,7 +30,7 @@ Type rasterBar
 		For Local i:Int = 0 To 736
 			Local temp:Int = i+xstart
 			If temp > 0 Or temp < 799
-				DrawImage rastaImage, temp, ycenter + Sin((i+angle)*freq)*scale
+				DrawImage rastaImage, temp, Float(ycenter + Sin((i+angle)*freq)*scale)
 			End If
 		Next
 	End Method
@@ -73,8 +69,8 @@ Type circleBob
 		x:+Cos(velocity.angle)*velocity.length
 		y:+Sin(velocity.angle)*velocity.length*yaspect
 		life:-1
-		SetAlpha life/40!
-		DrawImage cmBob, x, y
+		SetAlpha life/40
+		DrawImage cmBob, Float(x), Float(y)
 	End Method
 
 	Method isDead:Int()
@@ -222,7 +218,7 @@ While Not KeyHit(KEY_ESCAPE)
 	Local xpos:Int = 124 * Sin(angle)
 
 	For Local i:rasterBar = EachIn myRBList
-		i.drawRasterBar(xpos+32 , 28!, 28!)
+		i.drawRasterBar(xpos+32 , 28, 28)
 	Next
 
 	SetBlend ALPHABLEND

samples/flameduck/oldskool2/oldskool2.bmx

@@ -8,11 +8,7 @@ End Rem
 
 Strict
 
-?win32
-Framework SDL.d3d9sdlmax2d
-?Not win32
-Framework SDL.gl2sdlmax2d
-?
+Framework SDL.SDLRenderMax2d
 Import brl.pngloader
 Import brl.ramstream
 Import brl.oggloader

samples/simonh/fireworks/fireworks.bmx

@@ -96,7 +96,7 @@ While Not KeyHit(KEY_ESCAPE)
 
 			sp.alpha=sp.alpha-0.01
 
-			SetColor sp.r#,sp.g#,sp.b#
+			SetColor Int(sp.r),Int(sp.g),Int(sp.b)
 			SetBlend LIGHTBLEND
 			SetAlpha sp.alpha
 			SetScale 20/sp.z,20/sp.z

samples/starfieldpong/starfieldpong.bmx

@@ -1,10 +1,6 @@
 SuperStrict
 
-?win32
-Framework SDL.d3d9sdlmax2d
-?Not win32
-Framework SDL.gl2sdlmax2d
-?
+Framework SDL.SDLRenderMax2d
 Import brl.RandomDefault
 
 Const WIDTH:Int=640,HEIGHT:Int=480,DEPTH:Int=0

samples/tempest/tempest.bmx

@@ -20,11 +20,7 @@
 
 Strict
 
-?win32
-Framework SDL.d3d9sdlmax2d
-?Not win32
-Framework SDL.gl2sdlmax2d
-?
+Framework SDL.SDLRenderMax2d
 Import sdl.sdlfreeaudio
 Import brl.wavloader
 Import brl.ramstream
@@ -36,7 +32,7 @@ Import "sfx.bmx"
 SetAudioDriver("FreeAudio SDL")
 
 'Setup Graphics mode
-Graphics CWidth,CHeight,0    ',0 windowed  ',32 'fullscreen
+Graphics Int(CWidth),Int(CHeight),0    ',0 windowed  ',32 'fullscreen
 HideMouse
 SeedRnd(MilliSecs())
 
@@ -526,7 +522,7 @@ Type Player
 			For Local i = 0 To 7
 				Local rv = Rand(0,360)
 				Local sr = Rnd(4,40)*(60-deathcount)/60
-				DrawRect (x[2]+x[3])/2+Cos(rv)*sr,(y[2]+y[3])/2+Sin(rv)*sr,2,2
+				DrawRect Float((x[2]+x[3])/2+Cos(rv)*sr),Float((y[2]+y[3])/2+Sin(rv)*sr),2,2
 			Next		
 		EndIf
 		
@@ -1354,7 +1350,7 @@ Type Egg
 					EndIf
 				Case 4,5,6,7'spinner
 					If theLevel.hasspikes
-						spinner.Create( e_Index ,Rand(2.0,4.0))
+						spinner.Create( e_Index ,Rand(2,4))
 					Else
 						typ = -1
 					EndIf
@@ -1796,7 +1792,7 @@ Type Tanker Extends Baddies
 						e:+1
 					EndIf
 				EndIf				
-				Local c:flipper = flipper.Create(e,1,height)
+				Local c:flipper = flipper.Create(e,1,Int(height))
 				c.dir = -dir
 				If stillborn Then c.dietime = 8
 				dir = -dir
@@ -1823,7 +1819,7 @@ Type Tanker Extends Baddies
 						e:+1
 					EndIf
 				EndIf				
-				Local c:fuseball= fuseball.Create(e,0,height)
+				Local c:fuseball= fuseball.Create(e,0,Int(height))
 				c.dir = -dir
 				If stillborn Then c.dietime = 8				
 				dir = -dir
@@ -1850,7 +1846,7 @@ Type Tanker Extends Baddies
 						e:+1
 					EndIf
 				EndIf				
-				Local c:pulsar = pulsar.Create(e,0,height)
+				Local c:pulsar = pulsar.Create(e,0,Int(height))
 				c.dir = -dir
 				If stillborn Then c.dietime = 8								
 				dir = -dir
@@ -1873,7 +1869,7 @@ Type Tanker Extends Baddies
 				ReleaseCargo(True) ' it's cargo will die too
 				zz1 = theLevel.position + theLevel.depth - height
 				TForm(OnEdge.xx,OnEdge.yy,zz1,xx,yy)
-				Explosion.Create(xx,yy,height)				
+				Explosion.Create(Int(xx),Int(yy),Int(height))
 				BADDIE_LIST.Remove(Self)
 				enemiesleft:-1
 				Return		
@@ -1881,7 +1877,7 @@ Type Tanker Extends Baddies
 		EndIf
 		height:+2
 		If height < 380
-			If Rand(0,100) > 98 And hasbullets Then bullets.Create(e_index,height);hasbullets:-1
+			If Rand(0,100) > 98 And hasbullets Then bullets.Create(e_index,Int(height));hasbullets:-1
 		EndIf
 		If height > theLevel.depth-15
 			ReleaseCargo(False)
@@ -1898,7 +1894,7 @@ Type Tanker Extends Baddies
 				ReleaseCargo(False)
 				zz1 = theLevel.position + theLevel.depth - height
 				TForm(OnEdge.xx,OnEdge.yy,zz1,xx,yy)
-				Explosion.Create(xx,yy,height)	
+				Explosion.Create(Int(xx),Int(yy),Int(height))
 				PlaySound(tankershotsfx)			
 				BADDIE_LIST.Remove(Self)
 				enemiesleft:-1
@@ -1972,9 +1968,9 @@ Type Flipper Extends Baddies
 			TForm(OnEdge.p1.x,OnEdge.p1.y,zz2,x[0],y[0])
 			TForm(OnEdge.p2.x,OnEdge.p2.y,zz2,x[1],y[1])
 			If dir = -1 'pivot around p1 of dest edge  (current edge+1)
-				TFormR(x[1],y[1],-angle+totangle, x[0],y[0])	
+				TFormR(x[1],y[1],Int(-angle+totangle), x[0],y[0])	
 			Else
-				TFormR(x[0],y[0],-(totangle-angle), x[1],y[1])				
+				TFormR(x[0],y[0],Int(-(totangle-angle)), x[1],y[1])				
 			EndIf			
 		Case 3,7 'delaying
 			zz1 = theLevel.position+theLevel.depth
@@ -2034,7 +2030,7 @@ Type Flipper Extends Baddies
 				Local xx#,yy#,zz1#
 				zz1 = theLevel.position + theLevel.depth - height
 				TForm(OnEdge.xx,OnEdge.yy,zz1,xx,yy)
-				Explosion.Create(xx,yy,height)
+				Explosion.Create(Int(xx),Int(yy),Int(height))
 				BADDIE_LIST.Remove(Self)
 				enemiesleft:-1				
 				MainPlayer.Score = MainPlayer.Score+150
@@ -2060,7 +2056,7 @@ Type Flipper Extends Baddies
 					typ = 3
 				EndIf
 			EndIf
-			If Rand(0,100) > 98 And hasbullets Then bullets.Create(e_index,height);hasbullets:-1
+			If Rand(0,100) > 98 And hasbullets Then bullets.Create(e_index,Int(height));hasbullets:-1
 			dir = FindShortDir(e_Index, MainPlayer.e_Index)
 		Case 1,2 ' flipping
 			angle = angle + flipflipspeed
@@ -2130,7 +2126,7 @@ Type Flipper Extends Baddies
 				OnEdge = theLevel.edges[e_Index]
 				totangle = theLevel.edges[e_Index].angle'-8	
 				
-				If Rand(0,100) > 98 And hasbullets Then bullets.Create(e_index,height);hasbullets:-1
+				If Rand(0,100) > 98 And hasbullets Then bullets.Create(e_index,Int(height));hasbullets:-1
 
 				If dir = -1
 					Local ind = e_index-1
@@ -2161,9 +2157,9 @@ Type Flipper Extends Baddies
 					TForm(OnEdge.p1.x,OnEdge.p1.y,zz1,x[0],y[0])
 					TForm(OnEdge.p2.x,OnEdge.p2.y,zz1,x[1],y[1])
 					If dir = -1 'pivot around p1 of dest edge  (current edge+1)
-						TFormR(x[1],y[1],-angle+totangle, x[0],y[0])	
+						TFormR(x[1],y[1],Int(-angle+totangle), x[0],y[0])	
 					Else
-						TFormR(x[0],y[0],-(totangle-angle), x[1],y[1])				
+						TFormR(x[0],y[0],Int(-(totangle-angle)), x[1],y[1])				
 					EndIf
 					xx = (x[0]+x[1])/2
 					yy = (y[0]+y[1])/2
@@ -2172,7 +2168,7 @@ Type Flipper Extends Baddies
 					TForm(OnEdge.xx,OnEdge.yy,zz1,xx,yy)		
 				EndIf
 				PlaySound(flippershotsfx)
-				Explosion.Create(xx,yy,height)
+				Explosion.Create(Int(xx),Int(yy),Int(height))
 				BADDIE_LIST.Remove(Self)
 				MainPlayer.Score = MainPlayer.Score+150
 				enemiesleft:-1
@@ -2253,9 +2249,9 @@ Type Pulsar Extends Baddies
 			TForm(OnEdge.p1.x,OnEdge.p1.y,zz2,x[0],y[0])
 			TForm(OnEdge.p2.x,OnEdge.p2.y,zz2,x[1],y[1])
 			If dir = -1 'pivot around p1 of dest edge  (current edge+1)
-				TFormR(x[1],y[1],-angle+totangle, x[0],y[0])	
+				TFormR(x[1],y[1],Int(-angle+totangle), x[0],y[0])	
 			Else
-				TFormR(x[0],y[0],-(totangle-angle), x[1],y[1])				
+				TFormR(x[0],y[0],Int(-(totangle-angle)), x[1],y[1])				
 			EndIf			
 		Case 3,5,7 'delaying
 			zz1 = theLevel.position+theLevel.depth
@@ -2316,7 +2312,7 @@ Type Pulsar Extends Baddies
 				Local xx#,yy#,zz1#
 				zz1 = theLevel.position + theLevel.depth - height
 				TForm(OnEdge.xx,OnEdge.yy,zz1,xx,yy)
-				Explosion.Create(xx,yy,height)
+				Explosion.Create(Int(xx),Int(yy),Int(height))
 				BADDIE_LIST.Remove(Self)
 				enemiesleft:-1				
 				MainPlayer.Score = MainPlayer.Score+200
@@ -2467,9 +2463,9 @@ Type Pulsar Extends Baddies
 					TForm(OnEdge.p1.x,OnEdge.p1.y,zz1,x[0],y[0])
 					TForm(OnEdge.p2.x,OnEdge.p2.y,zz1,x[1],y[1])
 					If dir = -1 'pivot around p1 of dest edge  (current edge+1)
-						TFormR(x[1],y[1],-angle+totangle, x[0],y[0])	
+						TFormR(x[1],y[1],Int(-angle+totangle), x[0],y[0])	
 					Else
-						TFormR(x[0],y[0],-(totangle-angle), x[1],y[1])				
+						TFormR(x[0],y[0],Int(-(totangle-angle)), x[1],y[1])				
 					EndIf
 					xx = (x[0]+x[1])/2
 					yy = (y[0]+y[1])/2
@@ -2477,7 +2473,7 @@ Type Pulsar Extends Baddies
 					zz1 = theLevel.position + theLevel.depth - height
 					TForm(OnEdge.xx,OnEdge.yy,zz1,xx,yy)		
 				EndIf
-				Explosion.Create(xx,yy,height)
+				Explosion.Create(Int(xx),Int(yy),Int(height))
 				PlaySound(pulsarshotsfx)			
 				BADDIE_LIST.Remove(Self)
 				MainPlayer.Score = MainPlayer.Score+200
@@ -2603,7 +2599,7 @@ Type Fuseball Extends Baddies
 				zz1 = theLevel.position + theLevel.depth - height
 				TForm(OnEdge.xx,OnEdge.yy,zz1,xx,yy)
 				Local sc = Int((theLevel.depth-height)/100+1)*250
-				fusepoint.Create(xx,yy,height,sc)
+				fusepoint.Create(Int(xx),Int(yy),Int(height),sc)
 				MainPlayer.Score = MainPlayer.Score+sc
 				BADDIE_LIST.Remove(Self)
 				enemiesleft:-1				
@@ -2696,7 +2692,7 @@ Type Fuseball Extends Baddies
 					zz1 = theLevel.position + theLevel.depth - height
 					TForm(OnEdge.xx,OnEdge.yy,zz1,xx,yy)
 					Local sc = Int((theLevel.depth-height)/100+1)*250
-					fusepoint.Create(xx,yy,height,sc)
+					fusepoint.Create(Int(xx),Int(yy),Int(height),sc)
 					MainPlayer.Score = MainPlayer.Score+sc
 					BADDIE_LIST.Remove(Self)
 					PlaySound(fuseballshotsfx)					
@@ -2901,7 +2897,7 @@ Type Spinner Extends Baddies
 						If growth > 100
 							If Rnd(0,140) > 88
 								act = 2
-								If Rnd(0,100) > 70 Then bullets.Create(e_index,height)
+								If Rnd(0,100) > 70 Then bullets.Create(e_index,Int(height))
 							EndIf
 						EndIf
 					EndIf

samples/tempest/vectorfont.bmx

@@ -35,7 +35,7 @@ Function Test()
 	DrawString("pqrstuvwxyz{|}~~" ,400-sc*40,325+sc*15,sc)
 	Flip
 	
-	Delay 16+sc*5
+	Delay Int(16+sc*5)
 	Wend
 
 End Function
@@ -82,7 +82,7 @@ Function DrawDigit(d,xd,yd,sc#)
 End Function
 
 
-Function DrawString(st$,xd,yd,sc#)
+Function DrawString(st$,xd:Float,yd:Float,sc#)
 	Local s,d,ln,t
 	
 	ln = Len(st$)