Gledrawscene[hfor(Scene ) ]，stop )； //设置场景绘制函数并结束
//与鼠标一起移动图形。 factor是比例因子，factor越大移动幅度越大。
fcglFollowMouse(factor:x、y、xx、yy、static、fcglfollowmouse、xMouse、yMouse ) )=
{
if [ glegetmousemsg (WM _ lbuttondown，x，y )，fcglFollowMouse=1，xMouse=x，yMouse=y]，
gleGetWindowSize[xxx，yyy]，
if[fcglFollowMouse，glegetmousemsg(WM_mousemove，xx，yy )，gleangle(1，gleangle(1) ) yy-yMouse )/yyy * fa
if[glegetmousemsg(WM_lbuttonup，xx，yy ) ]，fcglFollowMouse=0] )，
GLrotated[Gleangle(1)，1，0，0 ]//沿x轴旋转图像
GLrotated[Gleangle(2)，0，1，0 ]//沿y轴旋转图像
GL rotated [沿z轴旋转gle angle (3)，0，0，1 )//图像]
(；
: dot12 ()=
{
GLpointsize(8)，定义//点的大小
GLbegin(GL_points )，//开始绘制
GL color 3d (1.0，0.0，0.0 )，//红色
glvertex3d(0.65758346、0.61920220、0.42915339 )、
GLcolor3d(0.2、0.8、0.0 )、/
glvertex3d(0.70203400，- 0.68122298，0.20756570 )，
GLcolor3d(0.2、0.0、0.8 )、/
glvertex3d(0.70428352，- 0.55221381，0.44614418 )，
GLcolor3d(0.0、1.0、0.0 )、/
LVERTEX3D(0.71018481，-0.16518988，-0.68436090 )、
GLcolor3d(0.8、0.2、0.0 )、/
glvertex3d(0.84130836，- 0.32306467，0.43339297 )、
GLcolor3d(0.0、0.2、0.8 )、/
LVERTEX3D(0.84532735、-0.30622774、-0.43777418 )、
GLcolor3d(0.0、0.0、1.0 )、/
glvertex3d(0.85087242、0.52354706、-0.04375603 )、
GLcolor3d(0.2、0.0、0.8 )、/
glvertex3d(0.85473787，- 0.02894596，0.51825216 )，
GLcolor3d(0.0、0.2、0.8 )、/
glvertex3d(0.87135881、0.43350173和0.22980441 )，
GLcolor3d(1.0、1.0、0.0 )、/
glvertex3d(0.94028712，- 0.28839660，0.18079695 )、
GLcolor3d(1.0、0.0、1.0 )、/
glvertex3d(0.96296114、0.02735042、0.26824950 )、
GLcolor3d(0.0、1.0、1.0 )、/
glvertex3d(0.98473889、0.16325742、0.06030199 )、
glEnd ()//完成绘制
(；
Sene(3360I )=
{
清除glClear[]、//画面，清除深度缓冲区
glLoadIdentity ()，//重置当前模型视图矩阵
GL translated (0，0，-35 )，将35个单元移动到//画面
fcglfollowmouse(2)、
i=0，(i12 ).while{
glPushMatrix (
GL rotated [ I/12 * 360，0，0，1 ]，
GLscaled(1 i，1 i，1 i )、
dot12 ()、//绘图点
glPopMatrix (
I
}
(；