Try my new website:
www.urcho.com
- the new SIMPLE social network
Sign up
|
357
members |
125
snippets
Search for:
ALL
POPULAR
File Controls
Multiplayer Code
2D Effects
3D Effects
Oldskool demos
Basic Functions
Maths/Physics
Sound
Tutorials
Misc
Username:
Password:
Sign up
Furry ball effect by Beaker
[
back
]
Author:
Archive
| Viewed:
625
times | Language:
BlitzBasic 3D
| Category:
3D Effects
;MasterBeakers Hairy Balls 2003 ;credit is always nice. :) Graphics3D 640,480 SetBuffer BackBuffer() cam = CreateCamera () MoveEntity cam,0,0,-5 ball = CreateMesh() EntityFX ball,32+2 ball2 = CreateSphere(5) ScaleMesh ball2,3,3,3 EntityFX ball2,32+2 ClearTextureFilters tex = LoadTexture ("fur3.bmp",2+1) EntityTexture ball,tex surf = GetSurface(ball2,1) For f# = 0 To -0.02 Step -0.001 ScaleMesh ball2,1.008,1.008,1.008 RotateMesh ball2,0,-(f*20.0),0 n# = 1-(-(f)*100.0/2.0) For vert = 0 to CountVertices(surf)-1 VertexColor surf,vert,255,255,255,n Next AddMesh ball2,ball Next FreeEntity ball2 While Not KeyDown(1) Flip False RenderWorld TurnEntity ball,0.03,0.12,0.03 Wend End
Author Comments:
Creates the effect of fur on nearly any mesh. Be warned: its not particularly fast (when compared with doing it with vertex shaders - nVidia Wolfman). Although not essential, the demo uses vertex alpha to enhance the effect. (Create a splattered/stippled high-contrast image to use as the texture. Experiment!)
Login or
create an account
to comment on this snippet
