I was trying to create something like that grass demo but for some odd reason when I create a texture from scratch it doesn't want to become transparent.
;some variables Global gb.grassblock Global grasstex ;set up Graphics3D 800,600,16,2 AutoMidHandle True SetBuffer BackBuffer() SeedRnd(MilliSecs()) AmbientLight 255,255,255 ;camera Global camera = CreateCamera() CameraClsColor camera,0,0,255 CameraRange camera,.01,1000 PositionEntity camera,0,.5,0 Type grassblock Field grass[25] ;to give the grass height Field size Field layers Field height End Type CreateGrassBlock(0,0,0,0,0,0,1,6,.0025) ;main loop While Not KeyHit(1) Cls If KeyDown(30) TurnEntity camera,0,1,0 If KeyDown(32) TurnEntity camera,0,-1,0 If KeyDown(17) TranslateEntity camera,0,.025,0 If KeyDown(31) TranslateEntity camera,0,-.025,0 If KeyDown(200) MoveEntity camera,0,0,.025 If KeyDown(208) MoveEntity camera,0,0,-.025 UpdateWorld() RenderWorld() Flip Wend Function CreateGrassBlock(x#,y#,z#,pitch#,yaw#,roll#,size,layers,height#) gb.grassblock = New grassblock gb\size = size gb\layers = layers gb\height = height# Local n ;create the transparency texture grasstex = CreateTexture(256,256,2) SetBuffer TextureBuffer(grasstex) Color 0,0,0 Rect 0,0,256,256,True Color 255,255,255 For n = 1 To 5000 Plot Rand(1,256),Rand(1,256) Next SetBuffer BackBuffer() ;create the grass If layers > 25 layers = 25 For n = 0 To layers gb\grass[n] = CreateTerrain(size) PositionEntity gb\grass[n],x#,y#,z# RotateEntity gb\grass[n],pitch#,yaw#,roll# TranslateEntity gb\grass[n],0,Float(height#*n),0 EntityTexture gb\grass[n],grasstex,0,1 Next End Function