Thanks all! The grid looks a lot better.
Although when I set the flag variable to 1 in the load image command it got all whacked up. Oh well, having it blurry isn't the end of the world.
Umm...anybody got any idea on how I keep track of a deleted object's old position?
Function MakeBlock()
If Object Exist(8001) Then Delete Object 8001
Make Object Plain 8001,5,5
XRotate Object 8001,90
Texture Object 8001, GridSel
Ghost Object On 8001,2
Position Object 8001,SelX#,-2.5,SelZ#
TrackX#=Object Position X(8001) : TrackZ#=Object Position Z(8001)
If UpKey()=1
While UpKey()=1
EndWhile
Move Object 8001,0.5 : TrackZ#=TrackZ#+5
EndIf
SelX#=TrackX# : SelZ#=TrackZ#
Position Object 8001,#,-2.5,TrackZ#
If Mouseclick()=1
Plat1=1
While Object Exist(Plat1)
Plat1=Plat1+1
EndWhile
Load Object ObjPath$+"block1.x",Plat1
Scale Object Plat1,250,250,250
XRotate Object Plat1,90
Position Object Plat1, TrackX#,0,TrackZ#
Delete Object 8001
Plat1=Plat1+1
If Plat1=>MaxPlat1 Then Plat1=Plat1-1
Delete Object 8001
EndIf
EndFunction
It should theoretically move object 8001 (the grid selector), and it briefly flashes, but then is reset to the position 0,0,0, so it does no good for creating objects.
