Make(delphi) Add(MainForm,15261923,42,7) { Left=20 Top=105 Width=600 Height=600 Position=1 Point(MouseX) Point(MouseY) Point(onResize) Point(Handle) link(onCreate,16299401:doEvent1,[(86,27)(86,48)(51,48)(51,69)]) link(onResize,3213527:doWork1,[(137,34)]) } Add(GL_Main,12986311,154,63) { Color=0 link(onInit,14989432:doEnabled,[]) link(onViewPort,3410847:doPerspective,[(198,76)(198,111)]) link(Handle,15261923:Handle,[(160,44)(62,44)]) } Add(Timer,9506849,21,161) { Interval=5 Enable=1 link(onTimer,1049454:doEvent1,[]) } Add(GL_GTools,771925,154,161) { Point(doClear) Point(doPushMatrix) Point(doPopMatrix) } Add(GL_GluTools,4593655,350,63) { Texture=0 link(onInit,6976573:doEnabled,[]) } Add(Hub,1049454,70,161) { OutCount=5 link(onEvent1,771925:doClear,[]) link(onEvent2,771925:doPushMatrix,[]) link(onEvent3,7874684:doNext,[(109,181)(109,264)(58,264)(58,349)]) link(onEvent4,771925:doPopMatrix,[(113,188)(113,181)]) link(onEvent5,9022240:doEvent1,[(128,195)(128,118)]) } Add(Hub,16299401,63,63) { InCount=3 OutCount=3 link(onEvent1,12986311:doInit,[]) link(onEvent2,3213527:doWork2,[]) link(onEvent3,9506849:doTimer,[(109,83)(109,128)(15,128)(15,167)]) } Add(HubEx,3213527,133,63) { link(onEvent,12986311:doViewPort,[]) } Add(GL_Light,6976573,406,63) { Diffuse=65535 Specular=0 link(onEnabled,6976573:doMove,[(452,69)(452,103)(392,103)(392,76)]) link(Point,5501973:Point3D,[]) } Add(GL_Options,1571481,266,63) { link(onEvent,15984634:doEnabled,[]) } Add(GL_Options,15984634,308,63) { Flag=1 link(onEvent,4593655:doInit,[]) } Add(GL_Perspective,3410847,217,105) { Fovy=40 zFar=300 } Add(GL_Point3D,5501973,406,21) { Y=5 Z=1 } Add(GL_Options,14989432,217,63) { Flag=2 link(onEvent,1571481:doEnabled,[]) } Add(GL_Rotate,7147066,210,343) { link(onRotate,12677101:doSet,[]) link(Y,1354156:Value,[(230,331)(198,331)(198,387)(167,387)]) } Add(Counter,7874684,70,343) { Max=720 Type=1 Default=350 link(onNext,2471183:doOperation,[]) } Add(Memory,1354156,161,343) { link(onData,7147066:doRotate,[]) } Add(Math,2471183,112,343) { OpType=3 Op2=2 link(onResult,1354156:doValue,[]) } Add(GL_Material,12677101,259,343) { Diffuse=0 Specular=11206655 Emission=128 Shininess=40 Point(doSpecular) link(onSet,13750711:doDraw,[]) } Add(Label,2972090,413,182) { Left=10 Top=5 Width=60 Color=0 Font=[MS Sans Serif,10,1,255,1] Caption="" AutoSize=1 } Add(Counter,15168560,371,140) { } Add(Timer,6366185,273,182) { link(onTimer,8792126:doEvent1,[]) } Add(Hub,8792126,315,182) { link(onEvent1,11738922:doStrCat,[]) link(onEvent2,15168560:doReset,[(362,195)(362,160)]) } Add(StrCat,11738922,371,182) { Str1="Fps " link(onStrCat,2972090:doText,[]) link(Str2,15168560:Count,[(384,181)(377,181)]) } Add(InfoTip,13443594,266,119) { Info=#3:FPS| Font=[MS Sans Serif,8,1,255,1] Width=190 Height=109 } Add(GL_Torus,13750711,308,343) { inRadius=0.7 outRadius=1.2 Sides=3 Rings=3 Point(Sides) Point(Rings) link(Sides,934699:Data1,[]) link(Rings,934699:Data2,[]) } Add(Hub,9022240,154,112) { link(onEvent1,12986311:doFlip,[(192,118)(192,100)(142,100)(142,83)]) link(onEvent2,15168560:doNext,[(200,125)(200,146)]) } Add(Timer,15432929,273,245) { Interval=100 link(onTimer,4638523:doNext,[]) } Add(GetData,934699,322,287) { link(Data,4638523:Count,[]) } Add(Counter,4638523,322,245) { Max=500 link(onNext,9364606:doStrCat,[]) } Add(Label,16703038,413,245) { Left=370 Top=5 Width=215 Color=0 Font=[MS Sans Serif,8,1,255,1] Caption="" AutoSize=1 } Add(StrCat,9364606,371,245) { Str1="Колличество сторон и колец " link(onStrCat,16703038:doText,[]) }