TGC Codebase Backup



Pretty Texture For Old Machine by Problems

25th Jul 2008 9:22
Summary

There you have pretty texture of old machine and you could use it in your project in DarkBASIC Pro or DarkBASIC. Have fun!



Description



Code
                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    DrawDot=10000
INK RGB(53,27,0),0
BOX 0,0,640,480
REPEAT
DEC DrawDot
INK RGB(128,64,0),0
DOT RND(640),RND(480)
UNTIL DrawDot<0
GET IMAGE 1,0,0,640,480
DrawDot=-1
MAKE OBJECT BOX 1,200,100,400
SET CAMERA RANGE 0.1,10000
POSITION CAMERA -200,300,-200
DO
TEXTURE OBJECT 1,1
Ax#=CAMERA ANGLE X()
Ay#=CAMERA ANGLE Y()
Az#=CAMERA ANGLE Z()
ROTATE CAMERA 45,45,Az#
LOOP