TGC Codebase Backup



headspin basic 3d by chunks

17th Aug 2005 14:55
Summary

REM Project: ballfacesspin REM Created: 16/08/2005 23:28:40 REM REM ***** Main Source File ***** REM hide mouse sync on load object "res/ballface.x",1 scale object 1,10,1



Description

REM Project: ballfacesspin
REM Created: 16/08/2005 23:28:40
REM
REM ***** Main Source File *****
REM

hide mouse
sync on
load object "res/ballface.x",1
scale object 1,10,10,10
color backdrop 0

do
rotate limb 1,3,x,y,z
rotate limb 1,4,x1,y1,z1

inc y,1
dec z1,1
yrotate object 1,a#
a#=a#+0.5

if y=>360
offset limb 1,3,bx#,by#,bz#
by#=by#-0.02
endif

if y=>200
offset limb 1,4,ox#,oy#,oz#
oy#=oy#+0.02
endif
if y=>1300
scale limb 1,2,cx,cy,cz
inc cx,1
inc cy,1
inc cz,1
endif
if cx=300
hide limb 1,2
endif
sync

loop






Code
                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    REM Project: ballfacesspin
REM Created: 16/08/2005 23:28:40
REM
REM ***** Main Source File *****
REM

hide mouse
sync on
load object "res/ballface.x",1
scale object 1,10,10,10
color backdrop 0

do
rotate limb 1,3,x,y,z
rotate limb 1,4,x1,y1,z1

inc y,1
dec z1,1
yrotate object 1,a#
a#=a#+0.5

if y=>360
offset limb 1,3,bx#,by#,bz#
by#=by#-0.02
endif

if y=>200
offset limb 1,4,ox#,oy#,oz#
oy#=oy#+0.02
endif
 if y=>1300
 scale limb 1,2,cx,cy,cz
 inc cx,1
 inc cy,1
 inc cz,1
 endif
 if cx=300
 hide limb 1,2
 endif
sync

loop