Make(delphi)
Add(MainForm,6112295,23,13)
{
 Left=20
 Top=105
 Width=440
 Height=440
 Point(MouseX)
 Point(MouseY)
 Point(onResize)
 Point(Handle)
 link(onCreate,16299401:doEvent1,[(82,33)(82,138)])
 link(onResize,14551396:doWork1,[(146,40)])
}
Add(GL_Main,12986311,156,132)
{
 Color=8388608
 TwoSide=0
 StencilMask=3
 StencilBits=3
 link(onInit,12198675:doInit,[])
 link(onViewPort,3410847:doPerspective,[(212,145)(212,187)])
 link(Handle,6112295:Handle,[(162,88)(43,88)])
}
Add(Timer,9506849,44,216)
{
 Interval=33
 Enable=1
 link(onTimer,1049454:doEvent1,[])
}
Add(GL_GTools,771925,156,216)
{
 Point(doClear)
 Point(doPushMatrix)
 Point(doPopMatrix)
}
Add(Hub,1049454,93,216)
{
 OutCount=5
 link(onEvent1,771925:doClear,[])
 link(onEvent2,771925:doPushMatrix,[])
 link(onEvent3,9909796:doStencilFunc,[(137,236)(137,274)(102,274)(102,313)])
 link(onEvent4,771925:doPopMatrix,[(141,243)(141,236)])
 link(onEvent5,12986311:doFlip,[(141,250)(141,152)])
}
Add(Hub,16299401,86,132)
{
 OutCount=3
 link(onEvent1,12986311:doInit,[])
 link(onEvent2,14551396:doWork2,[])
 link(onEvent3,9506849:doTimer,[(129,152)(129,197)(35,197)(35,222)])
}
Add(HubEx,14551396,142,132)
{
 link(onEvent,12986311:doViewPort,[])
}
Add(GL_Perspective,3410847,219,181)
{
 Fovy=20
}
Add(GL_Options,5851269,268,132)
{
 Flag=1
 link(onEvent,10513853:doEnabled,[])
}
Add(GL_Options,10513853,324,132)
{
 Flag=11
 link(onEvent,15226729:doEnabled,[])
}
Add(GL_Options,15226729,373,132)
{
 Flag=2
 link(onEvent,1542151:doEnabled,[])
}
Add(GL_Light,7496745,541,132)
{
 Ambient=8421504
}
Add(GL_Options,1542151,422,132)
{
 link(onEvent,12739860:doEnabled,[])
}
Add(GL_Color,1968687,366,307)
{
 Color=65280
 Alpha=0.8
 link(onColor,4567949:doOperation,[(410,313)(410,264)])
}
Add(GL_StencilOp,13474924,156,307)
{
 Fail=2
 link(onStencilOp,4351930:doDraw,[])
}
Add(GL_StencilFunc,9909796,114,307)
{
 Ref=1
 link(onStencilFunc,13474924:doStencilOp,[])
}
Add(GL_StencilFunc,15607809,268,307)
{
 Func=4
 Ref=1
 Mask=3
 link(onStencilFunc,12156203:doStencilOp,[])
}
Add(GL_StencilOp,12156203,317,307)
{
 Fail=4
 link(onStencilOp,1968687:doColor,[])
}
Add(GL_Sphere,14324757,471,307)
{
 Slices=250
 Stacks=50
 link(onDraw,2972753:doTranslate,[(515,313)(515,359)(102,359)(102,404)])
}
Add(GL_GluTools,12198675,219,132)
{
 DrawStyle=3
 Texture=0
 link(onInit,5851269:doEnabled,[])
}
Add(GL_Options,12739860,478,132)
{
 Flag=8
 link(onEvent,7496745:doEnabled,[])
}
Add(GL_Cylinder,4351930,219,307)
{
 BaseRadius=0
 Height=0.3
 Slices=236
 link(onDraw,15607809:doStencilFunc,[])
}
Add(GL_Rotate,12263001,422,307)
{
 link(onRotate,14324757:doDraw,[])
 link(Z,4567949:Result,[(449,299)(428,299)])
}
Add(Memory,8950855,422,209)
{
 link(onData,12263001:doRotate,[(469,215)(469,296)(417,296)(417,313)])
}
Add(Math,4567949,422,258)
{
 Op2=0.02
 link(onResult,8950855:doValue,[(462,264)(462,245)(410,245)(410,215)])
 link(Op1,8950855:Value,[])
}
Add(GL_Color,493018,366,447)
{
 Color=16711935
 Alpha=0.9
 link(onColor,13466777:doOperation,[(410,453)(410,404)])
}
Add(GL_StencilOp,7416383,156,447)
{
 Fail=2
 link(onStencilOp,9482211:doDraw,[])
}
Add(GL_StencilFunc,5872815,114,447)
{
 Ref=1
 link(onStencilFunc,7416383:doStencilOp,[])
}
Add(GL_StencilFunc,15259424,268,447)
{
 Func=4
 Ref=1
 Mask=3
 link(onStencilFunc,590506:doStencilOp,[])
}
Add(GL_StencilOp,590506,317,447)
{
 Fail=4
 link(onStencilOp,493018:doColor,[])
}
Add(GL_Sphere,11882752,471,447)
{
 Slices=250
 Stacks=50
}
Add(GL_Cylinder,9482211,219,447)
{
 BaseRadius=0
 Height=0.3
 Slices=235
 Stacks=20
 link(onDraw,15259424:doStencilFunc,[])
}
Add(GL_Rotate,15044181,422,447)
{
 link(onRotate,11882752:doDraw,[])
 link(Z,13466777:Result,[(449,439)(428,439)])
}
Add(Memory,16517797,422,349)
{
 link(onData,15044181:doRotate,[(469,355)(469,436)(417,436)(417,453)])
}
Add(Math,13466777,422,398)
{
 Op2=0.02
 link(onResult,16517797:doValue,[(462,404)(462,385)(410,385)(410,355)])
 link(Op1,16517797:Value,[])
}
Add(Gl_Translate,2972753,114,398)
{
 Z=-0.1
 link(onTranslate,5872815:doStencilFunc,[(158,404)(158,428)(102,428)(102,453)])
}