TheGameCreators - CodeBase

Return to the CodeBase listing

Category: Animation

Version: 1.0

Information

Uploaded: 1st Apr 2004 18:09

Modified: 1st Apr 2004 18:10

Author: Pixle Pusher

Summary

31 cubes all rotating at different speeds. Looks stunning:)

Full Description

31 cubes all rotating at different speeds. Looks stunning:)

DarkBASIC Professional Source Code

` This code was downloaded from The Game Creators

` It is reproduced here with full permission

` http://www.thegamecreators.com

REM VIVID  2

HIDE MOUSE

BACKDROP ON

COLOR BACKDROP RGB(250,150,0)

MAKE OBJECT CUBE 1,100

COLOR OBJECT 1,RGB(0,255,255)

POSITION OBJECT 1,0,25,700

MAKE OBJECT CUBE 2,100

COLOR OBJECT 2,RGB(0,255,255)

POSITION OBJECT 2,-160,+120,700

MAKE OBJECT CUBE 3,100

COLOR OBJECT 3,RGB(0,255,255)

POSITION OBJECT 3,+160,+120,700

MAKE OBJECT CUBE 4,100

COLOR OBJECT 4,RGB(0,255,255)

POSITION OBJECT 4,-160,-60,700

MAKE OBJECT CUBE 5,100

COLOR OBJECT 5,RGB(0,255,255)

POSITION OBJECT 5,+160,-60,700

MAKE OBJECT CUBE 6,100

COLOR OBJECT 6,RGB(0,255,255)

POSITION OBJECT 6,0,+225,700

MAKE OBJECT CUBE 7,100

COLOR OBJECT 7,RGB(0,255,255)

POSITION OBJECT 7,0,-175,700

MAKE OBJECT CUBE 8,100

COLOR OBJECT 8,RGB(0,255,255)

POSITION OBJECT 8,-330,+225,700

MAKE OBJECT CUBE 9,100

COLOR OBJECT 9,RGB(0,255,255)

POSITION OBJECT 9,+330,+225,700

MAKE OBJECT CUBE 10,100

COLOR OBJECT 10,RGB(0,255,255)

POSITION OBJECT 10,-330,-175,700

MAKE OBJECT CUBE 11,100

COLOR OBJECT 11,RGB(0,255,255)

POSITION OBJECT 11,-330,25,700

MAKE OBJECT CUBE 12,100

COLOR OBJECT 12,RGB(0,255,255)

POSITION OBJECT 12,+330,25,700

MAKE OBJECT CUBE 13,100

COLOR OBJECT 13,RGB(0,255,255)

POSITION OBJECT 13,+330,-175,700

MAKE OBJECT CUBE 14,100

COLOR OBJECT 14,RGB(0,255,255)

POSITION OBJECT 14,+330,+430,700

MAKE OBJECT CUBE 15,100

COLOR OBJECT 15,RGB(0,255,255)

POSITION OBJECT 15,+330,-370,700

MAKE OBJECT CUBE 16,100

COLOR OBJECT 16,RGB(0,255,255)

POSITION OBJECT 16,+160,+310,700

MAKE OBJECT CUBE 17,100

COLOR OBJECT 17,RGB(0,255,255)

POSITION OBJECT 17,+160,-260,700

MAKE OBJECT CUBE 18,100

COLOR OBJECT 18,RGB(0,255,255)

POSITION OBJECT 18,0,+430,700

MAKE OBJECT CUBE 19,100

COLOR OBJECT 19,RGB(0,255,255)

POSITION OBJECT 19,0,-370,700

MAKE OBJECT CUBE 20,100

COLOR OBJECT 20,RGB(0,255,255)

POSITION OBJECT 20,-175,+310,700

MAKE OBJECT CUBE 21,100

COLOR OBJECT 21,RGB(0,255,255)

POSITION OBJECT 21,-330,+430,700

MAKE OBJECT CUBE 22,100

COLOR OBJECT 22,RGB(0,255,255)

POSITION OBJECT 22,-175,-260,700

MAKE OBJECT CUBE 23,100

COLOR OBJECT 23,RGB(0,255,255)

POSITION OBJECT 23,-330,-370,700

MAKE OBJECT CUBE 24,100

COLOR OBJECT 24,RGB(0,255,255)

POSITION OBJECT 24,-530,+310,700

MAKE OBJECT CUBE 25,100

COLOR OBJECT 25,RGB(0,255,255)

POSITION OBJECT 25,-530,+120,700

MAKE OBJECT CUBE 26,100

COLOR OBJECT 26,RGB(0,255,255)

POSITION OBJECT 26,-530,-60,700

MAKE OBJECT CUBE 27,100

COLOR OBJECT 27,RGB(0,255,255)

POSITION OBJECT 27,-530,-260,700

MAKE OBJECT CUBE 28,100

COLOR OBJECT 28,RGB(0,255,255)

POSITION OBJECT 28,+530,+310,700

MAKE OBJECT CUBE 29,100

COLOR OBJECT 29,RGB(0,255,255)

POSITION OBJECT 29,+530,-260,700

MAKE OBJECT CUBE 30,100

COLOR OBJECT 30,RGB(0,255,255)

POSITION OBJECT 30,+530,-60,700

MAKE OBJECT CUBE 31,100

COLOR OBJECT 31,RGB(0,255,255)

POSITION OBJECT 31,+530,+120,700

ROTATE OBJECT 1,OBJECT ANGLE X(1)+0.1,OBJECT ANGLE Y(1)+0.2,OBJECT ANGLE Z(1)+0.3

ROTATE OBJECT 2,OBJECT ANGLE X(2)-0.3,OBJECT ANGLE Y(2)-0.2,OBJECT ANGLE Z(2)-0.1

ROTATE OBJECT 3,OBJECT ANGLE X(3)+0.2,OBJECT ANGLE Y(3)+0.3,OBJECT ANGLE Z(3)+0.1

ROTATE OBJECT 4,OBJECT ANGLE X(4)-0.3,OBJECT ANGLE Y(4)-0.1,OBJECT ANGLE Z(4)-0.2

ROTATE OBJECT 5,OBJECT ANGLE X(5)+0.1,OBJECT ANGLE Y(5)+0.1,OBJECT ANGLE Z(5)+0.3

ROTATE OBJECT 6,OBJECT ANGLE X(6)-0.1,OBJECT ANGLE Y(6)-0.1,OBJECT ANGLE Z(6)-0.1

ROTATE OBJECT 7,OBJECT ANGLE X(7)+0.2,OBJECT ANGLE Y(7)+0.2,OBJECT ANGLE Z(7)+0.2

ROTATE OBJECT 8,OBJECT ANGLE X(8)-0.3,OBJECT ANGLE Y(8)-0.3,OBJECT ANGLE Z(8)-0.3

ROTATE OBJECT 9,OBJECT ANGLE X(9)+0.1,OBJECT ANGLE Y(9)+0.2,OBJECT ANGLE Z(9)+0.4

ROTATE OBJECT 10,OBJECT ANGLE X(10)-0.2,OBJECT ANGLE Y(10)-0.1,OBJECT ANGLE Z(10)-0.4

ROTATE OBJECT 11,OBJECT ANGLE X(11)+0.4,OBJECT ANGLE Y(11)+0.1,OBJECT ANGLE Z(11)+0.2

ROTATE OBJECT 12,OBJECT ANGLE X(12)-0.1,OBJECT ANGLE Y(12)-0.4,OBJECT ANGLE Z(12)-0.2

ROTATE OBJECT 13,OBJECT ANGLE X(13)+0.3,OBJECT ANGLE Y(13)+0.2,OBJECT ANGLE Z(13)+0.4

ROTATE OBJECT 14,OBJECT ANGLE X(14)-0.2,OBJECT ANGLE Y(14)-0.3,OBJECT ANGLE Z(14)-0.4

ROTATE OBJECT 15,OBJECT ANGLE X(15)+0.4,OBJECT ANGLE Y(15)+0.4,OBJECT ANGLE Z(15)+0.4

ROTATE OBJECT 16,OBJECT ANGLE X(16)-0.3,OBJECT ANGLE Y(16)-0.4,OBJECT ANGLE Z(16)-0.3

ROTATE OBJECT 17,OBJECT ANGLE X(17)+0.1,OBJECT ANGLE Y(17)+0.4,OBJECT ANGLE Z(17)+0.1

ROTATE OBJECT 18,OBJECT ANGLE X(18)-0.4,OBJECT ANGLE Y(18)-0.2,OBJECT ANGLE Z(18)-0.5

ROTATE OBJECT 19,OBJECT ANGLE X(19)+0.5,OBJECT ANGLE Y(19)+0.4,OBJECT ANGLE Z(19)+0.3

ROTATE OBJECT 20,OBJECT ANGLE X(20)-0.3,OBJECT ANGLE Y(20)-0.4,OBJECT ANGLE Z(20)-0.5

ROTATE OBJECT 21,OBJECT ANGLE X(21)+0.1,OBJECT ANGLE Y(21)+0.5,OBJECT ANGLE Z(21)+0.5

ROTATE OBJECT 22,OBJECT ANGLE X(22)-0.5,OBJECT ANGLE Y(22)-0.3,OBJECT ANGLE Z(22)-0.3

ROTATE OBJECT 23,OBJECT ANGLE X(23)+0.3,OBJECT ANGLE Y(23)+0.1,OBJECT ANGLE Z(23)+0.3

ROTATE OBJECT 24,OBJECT ANGLE X(24)-0.1,OBJECT ANGLE Y(24)-0.2,OBJECT ANGLE Z(24)-0.5

ROTATE OBJECT 25,OBJECT ANGLE X(25)+0.1,OBJECT ANGLE Y(25)+0.2,OBJECT ANGLE Z(25)+0.4

ROTATE OBJECT 26,OBJECT ANGLE X(26)-0.4,OBJECT ANGLE Y(26)-0.2,OBJECT ANGLE Z(26)-0.1

ROTATE OBJECT 27,OBJECT ANGLE X(27)+0.4,OBJECT ANGLE Y(27)+0.4,OBJECT ANGLE Z(27)+0.6

ROTATE OBJECT 28,OBJECT ANGLE X(28)-0.3,OBJECT ANGLE Y(28)-0.2,OBJECT ANGLE Z(28)-0.3

ROTATE OBJECT 29,OBJECT ANGLE X(29)+0.2,OBJECT ANGLE Y(29)+0.5,OBJECT ANGLE Z(29)+0.3

ROTATE OBJECT 30,OBJECT ANGLE X(30)-0.6,OBJECT ANGLE Y(30)-0.5,OBJECT ANGLE Z(30)-0.4

ROTATE OBJECT 31,OBJECT ANGLE X(31)+0.4,OBJECT ANGLE Y(31)+0.5,OBJECT ANGLE Z(31)+0.6

CodeBase - VIVID 2

Information

Summary

Full Description

DarkBASIC Professional Source Code

Download

Screen Shot

Author

Comments

Author Name:	Pixle Pusher
CodeBase Entries:	2