TGC Codebase Backup



Simple Object Rotation by Anonymous Coder

7th Nov 2009 21:06
Summary

Rotate Object Use Arrow Keys to Rotate Object



Description

Simple Program That Rotates a Cube
use Arrow Keys to Move Cube
Press Enter To Exit



Code
                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    MAKE OBJECT CUBE 1,5
DO
 IF LEFTKEY()=1 THEN
  YROTATE OBJECT 1,OBJECT ANGLE Y(1)+0.1
 IF RIGHTKEY()=1 THEN
  YROTATE OBJECT 1,OBJECT ANGLE Y(1)-0.1
 IF UPKEY()=1 THEN
  XROTATE OBJECT 1,OBJECT ANGLE X(1)-0.1
 IF DOWNKEY()=1 THEN
  XROTATE OBJECT 1,OBJECT ANGLE X(1)+0.1
 IF RETURNKEY()=1 THEN
  EXIT
 TEXTURE OBJECT 1, 1
loop
WAIT KEY
END