| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980 |
- object FormPostShader: TFormPostShader
- Left = 261
- Top = 176
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'GLSL Post Shader'
- ClientHeight = 1085
- ClientWidth = 1589
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- PixelsPerInch = 168
- TextHeight = 24
- object Viewer: TGLSceneViewer
- Left = 0
- Top = 0
- Width = 1199
- Height = 1034
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Camera = Camera
- Buffer.BackgroundColor = clBackground
- Buffer.ContextOptions = [roDoubleBuffer, roStencilBuffer, roRenderToWindow]
- Buffer.AntiAliasing = aaNone
- Buffer.DepthPrecision = dp24bits
- Buffer.ColorDepth = cd24bits
- FieldOfView = 165.668136596679700000
- PenAsTouch = False
- Align = alClient
- TabOrder = 0
- end
- object Panel1: TPanel
- Left = 0
- Top = 1034
- Width = 1589
- Height = 51
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Align = alBottom
- TabOrder = 1
- object LightMovingCheckBox: TCheckBox
- Left = 14
- Top = 14
- Width = 170
- Height = 30
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Light is Moving'
- Checked = True
- Color = clBtnFace
- ParentColor = False
- State = cbChecked
- TabOrder = 0
- end
- object TurnPitchrollCheckBox: TCheckBox
- Left = 196
- Top = 14
- Width = 240
- Height = 30
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Turn-Pitch-Roll Enabled'
- Checked = True
- State = cbChecked
- TabOrder = 1
- end
- end
- object Panel2: TPanel
- Left = 1199
- Top = 0
- Width = 390
- Height = 1034
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Align = alRight
- TabOrder = 2
- object Label1: TLabel
- Left = 28
- Top = 14
- Width = 75
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Shaders:'
- end
- object Label2: TLabel
- Left = 11
- Top = 322
- Width = 87
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Blur Value'
- end
- object lblBlurValue: TLabel
- Left = 329
- Top = 322
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label3: TLabel
- Left = 11
- Top = 380
- Width = 161
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Thermal Threshold'
- end
- object lblThermalThreshold: TLabel
- Left = 329
- Top = 380
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label5: TLabel
- Left = 11
- Top = 439
- Width = 142
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Thermal Intensity'
- end
- object lblThermalIntensity: TLabel
- Left = 329
- Top = 439
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label4: TLabel
- Left = 11
- Top = 558
- Width = 135
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Night Threshold'
- end
- object lblNight: TLabel
- Left = 329
- Top = 558
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label6: TLabel
- Left = 11
- Top = 618
- Width = 155
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Night Amplification'
- end
- object lblNightAmplification: TLabel
- Left = 329
- Top = 618
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label7: TLabel
- Left = 11
- Top = 499
- Width = 147
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Dream Threshold'
- end
- object lblDreamThreshold: TLabel
- Left = 329
- Top = 499
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label8: TLabel
- Left = 11
- Top = 677
- Width = 119
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Pixelate Width'
- end
- object lblPixelateWidth: TLabel
- Left = 329
- Top = 677
- Width = 10
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '1'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label9: TLabel
- Left = 11
- Top = 737
- Width = 126
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Pixelate Height'
- end
- object lblPixelateHeight: TLabel
- Left = 329
- Top = 737
- Width = 10
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '1'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label10: TLabel
- Left = 11
- Top = 796
- Width = 148
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Posterize Gamma'
- end
- object lblPosterizeGamma: TLabel
- Left = 329
- Top = 796
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label12: TLabel
- Left = 11
- Top = 856
- Width = 150
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Posterize NColors'
- end
- object lblPosterizeColors: TLabel
- Left = 329
- Top = 856
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label11: TLabel
- Left = 11
- Top = 915
- Width = 97
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Frost Rand '
- end
- object lblFrostRand: TLabel
- Left = 329
- Top = 915
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label14: TLabel
- Left = 11
- Top = 975
- Width = 100
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Frost Factor'
- end
- object lblFrostFactor: TLabel
- Left = 329
- Top = 975
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label13: TLabel
- Left = 11
- Top = 1052
- Width = 119
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Trouble Width'
- end
- object lblTroubleWidth: TLabel
- Left = 329
- Top = 1052
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label16: TLabel
- Left = 11
- Top = 1120
- Width = 126
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Trouble Height'
- end
- object lblTroubleHeight: TLabel
- Left = 329
- Top = 1120
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label18: TLabel
- Left = 11
- Top = 1188
- Width = 111
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = 'Trouble Freq'
- end
- object lblTroubleFreq: TLabel
- Left = 329
- Top = 1188
- Width = 25
- Height = 24
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Caption = '0.0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object ShaderCheckListBox: TCheckListBox
- Left = 14
- Top = 42
- Width = 362
- Height = 197
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- ItemHeight = 30
- TabOrder = 0
- OnClick = ShaderCheckListBoxClick
- OnClickCheck = ShaderCheckListBoxClick
- end
- object tbBlurValue: TTrackBar
- Left = 149
- Top = 315
- Width = 170
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 100
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 1
- ThumbLength = 35
- TickStyle = tsNone
- OnChange = tbBlurValueChange
- end
- object tbThermalThreshold: TTrackBar
- Left = 149
- Top = 373
- Width = 170
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 100
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 2
- ThumbLength = 35
- TickStyle = tsNone
- OnChange = tbThermalThresholdChange
- end
- object tbThermalIntensity: TTrackBar
- Left = 161
- Top = 434
- Width = 170
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 100
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 3
- ThumbLength = 35
- TickStyle = tsNone
- OnChange = tbThermalIntensityChange
- end
- object tblNightThreshold: TTrackBar
- Left = 159
- Top = 555
- Width = 170
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 100
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 4
- ThumbLength = 35
- TickStyle = tsNone
- end
- object tbNightAmplification: TTrackBar
- Left = 159
- Top = 614
- Width = 170
- Height = 48
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 1000
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 5
- ThumbLength = 35
- TickStyle = tsNone
- end
- object tbDreamThreshold: TTrackBar
- Left = 163
- Top = 492
- Width = 170
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 200
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 6
- ThumbLength = 35
- TickStyle = tsNone
- OnChange = tbDreamThresholdChange
- end
- object tbPixelateWidth: TTrackBar
- Left = 159
- Top = 674
- Width = 170
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 64
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 7
- ThumbLength = 35
- TickStyle = tsNone
- end
- object tbPixelateHeight: TTrackBar
- Left = 159
- Top = 733
- Width = 170
- Height = 48
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 64
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 8
- ThumbLength = 35
- TickStyle = tsNone
- end
- object tbPosterizeGamma: TTrackBar
- Left = 159
- Top = 795
- Width = 170
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 300
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 9
- ThumbLength = 35
- TickStyle = tsNone
- end
- object tbPosterizeColors: TTrackBar
- Left = 159
- Top = 854
- Width = 170
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 255
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 10
- ThumbLength = 35
- TickStyle = tsNone
- end
- object tbFrostRand: TTrackBar
- Left = 159
- Top = 914
- Width = 170
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 500
- Min = 10
- PageSize = 1
- Position = 10
- TabOrder = 11
- ThumbLength = 35
- TickStyle = tsNone
- end
- object tbFrostFactor: TTrackBar
- Left = 159
- Top = 975
- Width = 170
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 250
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 12
- ThumbLength = 35
- TickStyle = tsNone
- end
- object tbTroubleWidth: TTrackBar
- Left = 159
- Top = 1052
- Width = 160
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 64
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 13
- ThumbLength = 35
- TickStyle = tsNone
- end
- object tbTroubleHeight: TTrackBar
- Left = 159
- Top = 1110
- Width = 160
- Height = 47
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 64
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 14
- ThumbLength = 35
- TickStyle = tsNone
- end
- object tbTroubleFreq: TTrackBar
- Left = 145
- Top = 1188
- Width = 174
- Height = 48
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- Max = 300
- Min = 1
- PageSize = 1
- Position = 1
- TabOrder = 15
- ThumbLength = 35
- TickStyle = tsNone
- end
- object TrackBar1: TTrackBar
- Left = 84
- Top = 249
- Width = 235
- Height = 56
- Margins.Left = 5
- Margins.Top = 5
- Margins.Right = 5
- Margins.Bottom = 5
- TabOrder = 16
- ThumbLength = 35
- end
- end
- object Scene: TGLScene
- ObjectsSorting = osNone
- Left = 24
- Top = 16
- object GUICube: TGLDummyCube
- CubeSize = 1.000000000000000000
- object GLArrowLine1: TGLArrowLine
- Position.Coordinates = {00000000000000000000C8420000803F}
- Scale.Coordinates = {0000A0410000A0410000A04100000000}
- BottomRadius = 0.100000001490116100
- Height = 1.000000000000000000
- TopRadius = 0.100000001490116100
- TopArrowHeadHeight = 0.500000000000000000
- TopArrowHeadRadius = 0.200000002980232200
- BottomArrowHeadHeight = 0.500000000000000000
- BottomArrowHeadRadius = 0.200000002980232200
- end
- object GLXYZGrid1: TGLXYZGrid
- Direction.Coordinates = {00000000000080BF0000000000000000}
- Position.Coordinates = {00000000000000000000A0C10000803F}
- Up.Coordinates = {00000000000000000000803F00000000}
- XSamplingScale.Min = -200.000000000000000000
- XSamplingScale.Max = 200.000000000000000000
- XSamplingScale.Step = 20.000000000000000000
- YSamplingScale.Min = -200.000000000000000000
- YSamplingScale.Max = 200.000000000000000000
- YSamplingScale.Step = 20.000000000000000000
- ZSamplingScale.Min = -200.000000000000000000
- ZSamplingScale.Max = 200.000000000000000000
- ZSamplingScale.Step = 20.000000000000000000
- Parts = [gpX, gpZ]
- end
- end
- object LightCube: TGLDummyCube
- Direction.Coordinates = {0000000000000000000080BF00000000}
- Position.Coordinates = {000096C300000000000096430000803F}
- OnProgress = LightCubeProgress
- CubeSize = 1.000000000000000000
- object Light: TGLLightSource
- ConstAttenuation = 1.000000000000000000
- LightStyle = lsOmni
- SpotCutOff = 180.000000000000000000
- end
- object GLSphere1: TGLSphere
- Material.FrontProperties.Diffuse.Color = {E6E5653F8180003DCDCC4C3F0000803F}
- Material.FrontProperties.Emission.Color = {F4F3733FEEED6D3F000000000000803F}
- Radius = 10.000000000000000000
- end
- end
- object WorldCube: TGLDummyCube
- CubeSize = 1.000000000000000000
- object Fighter: TGLActor
- Material.MaterialLibrary = MaterialLibrary
- Material.LibMaterialName = 'Fighter'
- Position.Coordinates = {00001643000000000000A0410000803F}
- Up.Coordinates = {00000000000080BF0000008000000000}
- Interval = 100
- AutoCentering = [macCenterX, macCenterY, macCenterZ]
- end
- object Teapot: TGLActor
- Material.MaterialLibrary = MaterialLibrary
- Material.LibMaterialName = 'Fighter'
- Position.Coordinates = {000016C300000000000000000000803F}
- Interval = 100
- AutoCentering = [macCenterX, macCenterY, macCenterZ]
- end
- object Sphere_big: TGLActor
- Material.MaterialLibrary = MaterialLibrary
- Material.LibMaterialName = 'Earth'
- Position.Coordinates = {00000000000016C3000000000000803F}
- Interval = 100
- AutoCentering = [macCenterX, macCenterY, macCenterZ]
- end
- object Sphere_little: TGLActor
- Material.MaterialLibrary = MaterialLibrary
- Material.LibMaterialName = 'Earth'
- Position.Coordinates = {0000000000001643000000000000803F}
- Interval = 100
- AutoCentering = [macCenterX, macCenterY, macCenterZ]
- end
- end
- object PostShaderHolder: TGLPostShaderHolder
- TempTextureTarget = ttTextureRect
- Shaders = <>
- end
- object Camera: TGLCamera
- DepthOfView = 500.000000000000000000
- FocalLength = 65.000000000000000000
- TargetObject = GLXYZGrid1
- CameraStyle = csInfinitePerspective
- Position.Coordinates = {000048C20000164300007A430000803F}
- Direction.Coordinates = {00000000000080BF0000000000000000}
- Up.Coordinates = {00000000000000000000803F00000000}
- end
- end
- object Cadencer: TGLCadencer
- Scene = Scene
- MaxDeltaTime = 0.020000000000000000
- OnProgress = CadencerProgress
- Left = 96
- Top = 16
- end
- object MaterialLibrary: TGLMaterialLibrary
- Materials = <
- item
- Name = 'Noise'
- Tag = 0
- Material.Texture.Disabled = False
- end
- item
- Name = 'Fighter'
- Tag = 0
- Material.FrontProperties.Ambient.Color = {BFBEBE3EBBBABA3EBBBABA3E0000803F}
- Material.FrontProperties.Emission.Color = {B1B0B03DB1B0B03DB1B0B03D0000803F}
- Material.FrontProperties.Specular.Color = {8988083E8180003E8988083E0000803F}
- Material.BlendingMode = bmTransparency
- Material.Texture.TextureMode = tmModulate
- Material.Texture.Disabled = False
- end
- item
- Name = 'Earth'
- Tag = 0
- Material.FrontProperties.Ambient.Color = {E7E6E63EEBEAEA3EEBEAEA3E0000803F}
- Material.FrontProperties.Emission.Color = {F1F0F03DF1F0F03DF1F0F03D0000803F}
- Material.FrontProperties.Specular.Color = {8180003E8180003EE1E0E03D0000803F}
- Material.BlendingMode = bmTransparency
- Material.Texture.TextureMode = tmModulate
- Material.Texture.Disabled = False
- end
- item
- Name = 'Snow'
- Tag = 0
- Material.Texture.Disabled = False
- end
- item
- Name = 'FireGrade'
- Tag = 0
- Material.Texture.Disabled = False
- end
- item
- Name = 'Mask'
- Tag = 0
- Material.Texture.Disabled = False
- Material.Texture.DepthTextureMode = dtmIntensity
- end>
- Left = 40
- Top = 80
- end
- object GLSimpleNavigation1: TGLSimpleNavigation
- Form = Owner
- GLSceneViewer = Viewer
- FormCaption = 'GLSL Post Shader - %FPS'
- KeyCombinations = <
- item
- ShiftState = [ssLeft, ssRight]
- Action = snaZoom
- end
- item
- ShiftState = [ssLeft]
- Action = snaMoveAroundTarget
- end
- item
- ShiftState = [ssRight]
- Action = snaMoveAroundTarget
- end>
- Left = 192
- Top = 16
- end
- end
|