fPostShaderC.dfm 23 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980
  1. object FormPostShader: TFormPostShader
  2. Left = 261
  3. Top = 176
  4. Margins.Left = 5
  5. Margins.Top = 5
  6. Margins.Right = 5
  7. Margins.Bottom = 5
  8. Caption = 'GLSL Post Shader'
  9. ClientHeight = 1085
  10. ClientWidth = 1589
  11. Color = clBtnFace
  12. Font.Charset = DEFAULT_CHARSET
  13. Font.Color = clWindowText
  14. Font.Height = -19
  15. Font.Name = 'MS Sans Serif'
  16. Font.Style = []
  17. Position = poScreenCenter
  18. OnClose = FormClose
  19. OnCreate = FormCreate
  20. PixelsPerInch = 168
  21. TextHeight = 24
  22. object Viewer: TGLSceneViewer
  23. Left = 0
  24. Top = 0
  25. Width = 1199
  26. Height = 1034
  27. Margins.Left = 5
  28. Margins.Top = 5
  29. Margins.Right = 5
  30. Margins.Bottom = 5
  31. Camera = Camera
  32. Buffer.BackgroundColor = clBackground
  33. Buffer.ContextOptions = [roDoubleBuffer, roStencilBuffer, roRenderToWindow]
  34. Buffer.AntiAliasing = aaNone
  35. Buffer.DepthPrecision = dp24bits
  36. Buffer.ColorDepth = cd24bits
  37. FieldOfView = 165.668136596679700000
  38. PenAsTouch = False
  39. Align = alClient
  40. TabOrder = 0
  41. end
  42. object Panel1: TPanel
  43. Left = 0
  44. Top = 1034
  45. Width = 1589
  46. Height = 51
  47. Margins.Left = 5
  48. Margins.Top = 5
  49. Margins.Right = 5
  50. Margins.Bottom = 5
  51. Align = alBottom
  52. TabOrder = 1
  53. object LightMovingCheckBox: TCheckBox
  54. Left = 14
  55. Top = 14
  56. Width = 170
  57. Height = 30
  58. Margins.Left = 5
  59. Margins.Top = 5
  60. Margins.Right = 5
  61. Margins.Bottom = 5
  62. Caption = 'Light is Moving'
  63. Checked = True
  64. Color = clBtnFace
  65. ParentColor = False
  66. State = cbChecked
  67. TabOrder = 0
  68. end
  69. object TurnPitchrollCheckBox: TCheckBox
  70. Left = 196
  71. Top = 14
  72. Width = 240
  73. Height = 30
  74. Margins.Left = 5
  75. Margins.Top = 5
  76. Margins.Right = 5
  77. Margins.Bottom = 5
  78. Caption = 'Turn-Pitch-Roll Enabled'
  79. Checked = True
  80. State = cbChecked
  81. TabOrder = 1
  82. end
  83. end
  84. object Panel2: TPanel
  85. Left = 1199
  86. Top = 0
  87. Width = 390
  88. Height = 1034
  89. Margins.Left = 5
  90. Margins.Top = 5
  91. Margins.Right = 5
  92. Margins.Bottom = 5
  93. Align = alRight
  94. TabOrder = 2
  95. object Label1: TLabel
  96. Left = 28
  97. Top = 14
  98. Width = 75
  99. Height = 24
  100. Margins.Left = 5
  101. Margins.Top = 5
  102. Margins.Right = 5
  103. Margins.Bottom = 5
  104. Caption = 'Shaders:'
  105. end
  106. object Label2: TLabel
  107. Left = 11
  108. Top = 322
  109. Width = 87
  110. Height = 24
  111. Margins.Left = 5
  112. Margins.Top = 5
  113. Margins.Right = 5
  114. Margins.Bottom = 5
  115. Caption = 'Blur Value'
  116. end
  117. object lblBlurValue: TLabel
  118. Left = 329
  119. Top = 322
  120. Width = 25
  121. Height = 24
  122. Margins.Left = 5
  123. Margins.Top = 5
  124. Margins.Right = 5
  125. Margins.Bottom = 5
  126. Caption = '0.0'
  127. Font.Charset = DEFAULT_CHARSET
  128. Font.Color = clWindowText
  129. Font.Height = -19
  130. Font.Name = 'MS Sans Serif'
  131. Font.Style = []
  132. ParentFont = False
  133. end
  134. object Label3: TLabel
  135. Left = 11
  136. Top = 380
  137. Width = 161
  138. Height = 24
  139. Margins.Left = 5
  140. Margins.Top = 5
  141. Margins.Right = 5
  142. Margins.Bottom = 5
  143. Caption = 'Thermal Threshold'
  144. end
  145. object lblThermalThreshold: TLabel
  146. Left = 329
  147. Top = 380
  148. Width = 25
  149. Height = 24
  150. Margins.Left = 5
  151. Margins.Top = 5
  152. Margins.Right = 5
  153. Margins.Bottom = 5
  154. Caption = '0.0'
  155. Font.Charset = DEFAULT_CHARSET
  156. Font.Color = clWindowText
  157. Font.Height = -19
  158. Font.Name = 'MS Sans Serif'
  159. Font.Style = []
  160. ParentFont = False
  161. end
  162. object Label5: TLabel
  163. Left = 11
  164. Top = 439
  165. Width = 142
  166. Height = 24
  167. Margins.Left = 5
  168. Margins.Top = 5
  169. Margins.Right = 5
  170. Margins.Bottom = 5
  171. Caption = 'Thermal Intensity'
  172. end
  173. object lblThermalIntensity: TLabel
  174. Left = 329
  175. Top = 439
  176. Width = 25
  177. Height = 24
  178. Margins.Left = 5
  179. Margins.Top = 5
  180. Margins.Right = 5
  181. Margins.Bottom = 5
  182. Caption = '0.0'
  183. Font.Charset = DEFAULT_CHARSET
  184. Font.Color = clWindowText
  185. Font.Height = -19
  186. Font.Name = 'MS Sans Serif'
  187. Font.Style = []
  188. ParentFont = False
  189. end
  190. object Label4: TLabel
  191. Left = 11
  192. Top = 558
  193. Width = 135
  194. Height = 24
  195. Margins.Left = 5
  196. Margins.Top = 5
  197. Margins.Right = 5
  198. Margins.Bottom = 5
  199. Caption = 'Night Threshold'
  200. end
  201. object lblNight: TLabel
  202. Left = 329
  203. Top = 558
  204. Width = 25
  205. Height = 24
  206. Margins.Left = 5
  207. Margins.Top = 5
  208. Margins.Right = 5
  209. Margins.Bottom = 5
  210. Caption = '0.0'
  211. Font.Charset = DEFAULT_CHARSET
  212. Font.Color = clWindowText
  213. Font.Height = -19
  214. Font.Name = 'MS Sans Serif'
  215. Font.Style = []
  216. ParentFont = False
  217. end
  218. object Label6: TLabel
  219. Left = 11
  220. Top = 618
  221. Width = 155
  222. Height = 24
  223. Margins.Left = 5
  224. Margins.Top = 5
  225. Margins.Right = 5
  226. Margins.Bottom = 5
  227. Caption = 'Night Amplification'
  228. end
  229. object lblNightAmplification: TLabel
  230. Left = 329
  231. Top = 618
  232. Width = 25
  233. Height = 24
  234. Margins.Left = 5
  235. Margins.Top = 5
  236. Margins.Right = 5
  237. Margins.Bottom = 5
  238. Caption = '0.0'
  239. Font.Charset = DEFAULT_CHARSET
  240. Font.Color = clWindowText
  241. Font.Height = -19
  242. Font.Name = 'MS Sans Serif'
  243. Font.Style = []
  244. ParentFont = False
  245. end
  246. object Label7: TLabel
  247. Left = 11
  248. Top = 499
  249. Width = 147
  250. Height = 24
  251. Margins.Left = 5
  252. Margins.Top = 5
  253. Margins.Right = 5
  254. Margins.Bottom = 5
  255. Caption = 'Dream Threshold'
  256. end
  257. object lblDreamThreshold: TLabel
  258. Left = 329
  259. Top = 499
  260. Width = 25
  261. Height = 24
  262. Margins.Left = 5
  263. Margins.Top = 5
  264. Margins.Right = 5
  265. Margins.Bottom = 5
  266. Caption = '0.0'
  267. Font.Charset = DEFAULT_CHARSET
  268. Font.Color = clWindowText
  269. Font.Height = -19
  270. Font.Name = 'MS Sans Serif'
  271. Font.Style = []
  272. ParentFont = False
  273. end
  274. object Label8: TLabel
  275. Left = 11
  276. Top = 677
  277. Width = 119
  278. Height = 24
  279. Margins.Left = 5
  280. Margins.Top = 5
  281. Margins.Right = 5
  282. Margins.Bottom = 5
  283. Caption = 'Pixelate Width'
  284. end
  285. object lblPixelateWidth: TLabel
  286. Left = 329
  287. Top = 677
  288. Width = 10
  289. Height = 24
  290. Margins.Left = 5
  291. Margins.Top = 5
  292. Margins.Right = 5
  293. Margins.Bottom = 5
  294. Caption = '1'
  295. Font.Charset = DEFAULT_CHARSET
  296. Font.Color = clWindowText
  297. Font.Height = -19
  298. Font.Name = 'MS Sans Serif'
  299. Font.Style = []
  300. ParentFont = False
  301. end
  302. object Label9: TLabel
  303. Left = 11
  304. Top = 737
  305. Width = 126
  306. Height = 24
  307. Margins.Left = 5
  308. Margins.Top = 5
  309. Margins.Right = 5
  310. Margins.Bottom = 5
  311. Caption = 'Pixelate Height'
  312. end
  313. object lblPixelateHeight: TLabel
  314. Left = 329
  315. Top = 737
  316. Width = 10
  317. Height = 24
  318. Margins.Left = 5
  319. Margins.Top = 5
  320. Margins.Right = 5
  321. Margins.Bottom = 5
  322. Caption = '1'
  323. Font.Charset = DEFAULT_CHARSET
  324. Font.Color = clWindowText
  325. Font.Height = -19
  326. Font.Name = 'MS Sans Serif'
  327. Font.Style = []
  328. ParentFont = False
  329. end
  330. object Label10: TLabel
  331. Left = 11
  332. Top = 796
  333. Width = 148
  334. Height = 24
  335. Margins.Left = 5
  336. Margins.Top = 5
  337. Margins.Right = 5
  338. Margins.Bottom = 5
  339. Caption = 'Posterize Gamma'
  340. end
  341. object lblPosterizeGamma: TLabel
  342. Left = 329
  343. Top = 796
  344. Width = 25
  345. Height = 24
  346. Margins.Left = 5
  347. Margins.Top = 5
  348. Margins.Right = 5
  349. Margins.Bottom = 5
  350. Caption = '0.0'
  351. Font.Charset = DEFAULT_CHARSET
  352. Font.Color = clWindowText
  353. Font.Height = -19
  354. Font.Name = 'MS Sans Serif'
  355. Font.Style = []
  356. ParentFont = False
  357. end
  358. object Label12: TLabel
  359. Left = 11
  360. Top = 856
  361. Width = 150
  362. Height = 24
  363. Margins.Left = 5
  364. Margins.Top = 5
  365. Margins.Right = 5
  366. Margins.Bottom = 5
  367. Caption = 'Posterize NColors'
  368. end
  369. object lblPosterizeColors: TLabel
  370. Left = 329
  371. Top = 856
  372. Width = 25
  373. Height = 24
  374. Margins.Left = 5
  375. Margins.Top = 5
  376. Margins.Right = 5
  377. Margins.Bottom = 5
  378. Caption = '0.0'
  379. Font.Charset = DEFAULT_CHARSET
  380. Font.Color = clWindowText
  381. Font.Height = -19
  382. Font.Name = 'MS Sans Serif'
  383. Font.Style = []
  384. ParentFont = False
  385. end
  386. object Label11: TLabel
  387. Left = 11
  388. Top = 915
  389. Width = 97
  390. Height = 24
  391. Margins.Left = 5
  392. Margins.Top = 5
  393. Margins.Right = 5
  394. Margins.Bottom = 5
  395. Caption = 'Frost Rand '
  396. end
  397. object lblFrostRand: TLabel
  398. Left = 329
  399. Top = 915
  400. Width = 25
  401. Height = 24
  402. Margins.Left = 5
  403. Margins.Top = 5
  404. Margins.Right = 5
  405. Margins.Bottom = 5
  406. Caption = '0.0'
  407. Font.Charset = DEFAULT_CHARSET
  408. Font.Color = clWindowText
  409. Font.Height = -19
  410. Font.Name = 'MS Sans Serif'
  411. Font.Style = []
  412. ParentFont = False
  413. end
  414. object Label14: TLabel
  415. Left = 11
  416. Top = 975
  417. Width = 100
  418. Height = 24
  419. Margins.Left = 5
  420. Margins.Top = 5
  421. Margins.Right = 5
  422. Margins.Bottom = 5
  423. Caption = 'Frost Factor'
  424. end
  425. object lblFrostFactor: TLabel
  426. Left = 329
  427. Top = 975
  428. Width = 25
  429. Height = 24
  430. Margins.Left = 5
  431. Margins.Top = 5
  432. Margins.Right = 5
  433. Margins.Bottom = 5
  434. Caption = '0.0'
  435. Font.Charset = DEFAULT_CHARSET
  436. Font.Color = clWindowText
  437. Font.Height = -19
  438. Font.Name = 'MS Sans Serif'
  439. Font.Style = []
  440. ParentFont = False
  441. end
  442. object Label13: TLabel
  443. Left = 11
  444. Top = 1052
  445. Width = 119
  446. Height = 24
  447. Margins.Left = 5
  448. Margins.Top = 5
  449. Margins.Right = 5
  450. Margins.Bottom = 5
  451. Caption = 'Trouble Width'
  452. end
  453. object lblTroubleWidth: TLabel
  454. Left = 329
  455. Top = 1052
  456. Width = 25
  457. Height = 24
  458. Margins.Left = 5
  459. Margins.Top = 5
  460. Margins.Right = 5
  461. Margins.Bottom = 5
  462. Caption = '0.0'
  463. Font.Charset = DEFAULT_CHARSET
  464. Font.Color = clWindowText
  465. Font.Height = -19
  466. Font.Name = 'MS Sans Serif'
  467. Font.Style = []
  468. ParentFont = False
  469. end
  470. object Label16: TLabel
  471. Left = 11
  472. Top = 1120
  473. Width = 126
  474. Height = 24
  475. Margins.Left = 5
  476. Margins.Top = 5
  477. Margins.Right = 5
  478. Margins.Bottom = 5
  479. Caption = 'Trouble Height'
  480. end
  481. object lblTroubleHeight: TLabel
  482. Left = 329
  483. Top = 1120
  484. Width = 25
  485. Height = 24
  486. Margins.Left = 5
  487. Margins.Top = 5
  488. Margins.Right = 5
  489. Margins.Bottom = 5
  490. Caption = '0.0'
  491. Font.Charset = DEFAULT_CHARSET
  492. Font.Color = clWindowText
  493. Font.Height = -19
  494. Font.Name = 'MS Sans Serif'
  495. Font.Style = []
  496. ParentFont = False
  497. end
  498. object Label18: TLabel
  499. Left = 11
  500. Top = 1188
  501. Width = 111
  502. Height = 24
  503. Margins.Left = 5
  504. Margins.Top = 5
  505. Margins.Right = 5
  506. Margins.Bottom = 5
  507. Caption = 'Trouble Freq'
  508. end
  509. object lblTroubleFreq: TLabel
  510. Left = 329
  511. Top = 1188
  512. Width = 25
  513. Height = 24
  514. Margins.Left = 5
  515. Margins.Top = 5
  516. Margins.Right = 5
  517. Margins.Bottom = 5
  518. Caption = '0.0'
  519. Font.Charset = DEFAULT_CHARSET
  520. Font.Color = clWindowText
  521. Font.Height = -19
  522. Font.Name = 'MS Sans Serif'
  523. Font.Style = []
  524. ParentFont = False
  525. end
  526. object ShaderCheckListBox: TCheckListBox
  527. Left = 14
  528. Top = 42
  529. Width = 362
  530. Height = 197
  531. Margins.Left = 5
  532. Margins.Top = 5
  533. Margins.Right = 5
  534. Margins.Bottom = 5
  535. ItemHeight = 30
  536. TabOrder = 0
  537. OnClick = ShaderCheckListBoxClick
  538. OnClickCheck = ShaderCheckListBoxClick
  539. end
  540. object tbBlurValue: TTrackBar
  541. Left = 149
  542. Top = 315
  543. Width = 170
  544. Height = 47
  545. Margins.Left = 5
  546. Margins.Top = 5
  547. Margins.Right = 5
  548. Margins.Bottom = 5
  549. Max = 100
  550. Min = 1
  551. PageSize = 1
  552. Position = 1
  553. TabOrder = 1
  554. ThumbLength = 35
  555. TickStyle = tsNone
  556. OnChange = tbBlurValueChange
  557. end
  558. object tbThermalThreshold: TTrackBar
  559. Left = 149
  560. Top = 373
  561. Width = 170
  562. Height = 47
  563. Margins.Left = 5
  564. Margins.Top = 5
  565. Margins.Right = 5
  566. Margins.Bottom = 5
  567. Max = 100
  568. Min = 1
  569. PageSize = 1
  570. Position = 1
  571. TabOrder = 2
  572. ThumbLength = 35
  573. TickStyle = tsNone
  574. OnChange = tbThermalThresholdChange
  575. end
  576. object tbThermalIntensity: TTrackBar
  577. Left = 161
  578. Top = 434
  579. Width = 170
  580. Height = 47
  581. Margins.Left = 5
  582. Margins.Top = 5
  583. Margins.Right = 5
  584. Margins.Bottom = 5
  585. Max = 100
  586. Min = 1
  587. PageSize = 1
  588. Position = 1
  589. TabOrder = 3
  590. ThumbLength = 35
  591. TickStyle = tsNone
  592. OnChange = tbThermalIntensityChange
  593. end
  594. object tblNightThreshold: TTrackBar
  595. Left = 159
  596. Top = 555
  597. Width = 170
  598. Height = 47
  599. Margins.Left = 5
  600. Margins.Top = 5
  601. Margins.Right = 5
  602. Margins.Bottom = 5
  603. Max = 100
  604. Min = 1
  605. PageSize = 1
  606. Position = 1
  607. TabOrder = 4
  608. ThumbLength = 35
  609. TickStyle = tsNone
  610. end
  611. object tbNightAmplification: TTrackBar
  612. Left = 159
  613. Top = 614
  614. Width = 170
  615. Height = 48
  616. Margins.Left = 5
  617. Margins.Top = 5
  618. Margins.Right = 5
  619. Margins.Bottom = 5
  620. Max = 1000
  621. Min = 1
  622. PageSize = 1
  623. Position = 1
  624. TabOrder = 5
  625. ThumbLength = 35
  626. TickStyle = tsNone
  627. end
  628. object tbDreamThreshold: TTrackBar
  629. Left = 163
  630. Top = 492
  631. Width = 170
  632. Height = 47
  633. Margins.Left = 5
  634. Margins.Top = 5
  635. Margins.Right = 5
  636. Margins.Bottom = 5
  637. Max = 200
  638. Min = 1
  639. PageSize = 1
  640. Position = 1
  641. TabOrder = 6
  642. ThumbLength = 35
  643. TickStyle = tsNone
  644. OnChange = tbDreamThresholdChange
  645. end
  646. object tbPixelateWidth: TTrackBar
  647. Left = 159
  648. Top = 674
  649. Width = 170
  650. Height = 47
  651. Margins.Left = 5
  652. Margins.Top = 5
  653. Margins.Right = 5
  654. Margins.Bottom = 5
  655. Max = 64
  656. Min = 1
  657. PageSize = 1
  658. Position = 1
  659. TabOrder = 7
  660. ThumbLength = 35
  661. TickStyle = tsNone
  662. end
  663. object tbPixelateHeight: TTrackBar
  664. Left = 159
  665. Top = 733
  666. Width = 170
  667. Height = 48
  668. Margins.Left = 5
  669. Margins.Top = 5
  670. Margins.Right = 5
  671. Margins.Bottom = 5
  672. Max = 64
  673. Min = 1
  674. PageSize = 1
  675. Position = 1
  676. TabOrder = 8
  677. ThumbLength = 35
  678. TickStyle = tsNone
  679. end
  680. object tbPosterizeGamma: TTrackBar
  681. Left = 159
  682. Top = 795
  683. Width = 170
  684. Height = 47
  685. Margins.Left = 5
  686. Margins.Top = 5
  687. Margins.Right = 5
  688. Margins.Bottom = 5
  689. Max = 300
  690. Min = 1
  691. PageSize = 1
  692. Position = 1
  693. TabOrder = 9
  694. ThumbLength = 35
  695. TickStyle = tsNone
  696. end
  697. object tbPosterizeColors: TTrackBar
  698. Left = 159
  699. Top = 854
  700. Width = 170
  701. Height = 47
  702. Margins.Left = 5
  703. Margins.Top = 5
  704. Margins.Right = 5
  705. Margins.Bottom = 5
  706. Max = 255
  707. Min = 1
  708. PageSize = 1
  709. Position = 1
  710. TabOrder = 10
  711. ThumbLength = 35
  712. TickStyle = tsNone
  713. end
  714. object tbFrostRand: TTrackBar
  715. Left = 159
  716. Top = 914
  717. Width = 170
  718. Height = 47
  719. Margins.Left = 5
  720. Margins.Top = 5
  721. Margins.Right = 5
  722. Margins.Bottom = 5
  723. Max = 500
  724. Min = 10
  725. PageSize = 1
  726. Position = 10
  727. TabOrder = 11
  728. ThumbLength = 35
  729. TickStyle = tsNone
  730. end
  731. object tbFrostFactor: TTrackBar
  732. Left = 159
  733. Top = 975
  734. Width = 170
  735. Height = 47
  736. Margins.Left = 5
  737. Margins.Top = 5
  738. Margins.Right = 5
  739. Margins.Bottom = 5
  740. Max = 250
  741. Min = 1
  742. PageSize = 1
  743. Position = 1
  744. TabOrder = 12
  745. ThumbLength = 35
  746. TickStyle = tsNone
  747. end
  748. object tbTroubleWidth: TTrackBar
  749. Left = 159
  750. Top = 1052
  751. Width = 160
  752. Height = 47
  753. Margins.Left = 5
  754. Margins.Top = 5
  755. Margins.Right = 5
  756. Margins.Bottom = 5
  757. Max = 64
  758. Min = 1
  759. PageSize = 1
  760. Position = 1
  761. TabOrder = 13
  762. ThumbLength = 35
  763. TickStyle = tsNone
  764. end
  765. object tbTroubleHeight: TTrackBar
  766. Left = 159
  767. Top = 1110
  768. Width = 160
  769. Height = 47
  770. Margins.Left = 5
  771. Margins.Top = 5
  772. Margins.Right = 5
  773. Margins.Bottom = 5
  774. Max = 64
  775. Min = 1
  776. PageSize = 1
  777. Position = 1
  778. TabOrder = 14
  779. ThumbLength = 35
  780. TickStyle = tsNone
  781. end
  782. object tbTroubleFreq: TTrackBar
  783. Left = 145
  784. Top = 1188
  785. Width = 174
  786. Height = 48
  787. Margins.Left = 5
  788. Margins.Top = 5
  789. Margins.Right = 5
  790. Margins.Bottom = 5
  791. Max = 300
  792. Min = 1
  793. PageSize = 1
  794. Position = 1
  795. TabOrder = 15
  796. ThumbLength = 35
  797. TickStyle = tsNone
  798. end
  799. object TrackBar1: TTrackBar
  800. Left = 84
  801. Top = 249
  802. Width = 235
  803. Height = 56
  804. Margins.Left = 5
  805. Margins.Top = 5
  806. Margins.Right = 5
  807. Margins.Bottom = 5
  808. TabOrder = 16
  809. ThumbLength = 35
  810. end
  811. end
  812. object Scene: TGLScene
  813. ObjectsSorting = osNone
  814. Left = 24
  815. Top = 16
  816. object GUICube: TGLDummyCube
  817. CubeSize = 1.000000000000000000
  818. object GLArrowLine1: TGLArrowLine
  819. Position.Coordinates = {00000000000000000000C8420000803F}
  820. Scale.Coordinates = {0000A0410000A0410000A04100000000}
  821. BottomRadius = 0.100000001490116100
  822. Height = 1.000000000000000000
  823. TopRadius = 0.100000001490116100
  824. TopArrowHeadHeight = 0.500000000000000000
  825. TopArrowHeadRadius = 0.200000002980232200
  826. BottomArrowHeadHeight = 0.500000000000000000
  827. BottomArrowHeadRadius = 0.200000002980232200
  828. end
  829. object GLXYZGrid1: TGLXYZGrid
  830. Direction.Coordinates = {00000000000080BF0000000000000000}
  831. Position.Coordinates = {00000000000000000000A0C10000803F}
  832. Up.Coordinates = {00000000000000000000803F00000000}
  833. XSamplingScale.Min = -200.000000000000000000
  834. XSamplingScale.Max = 200.000000000000000000
  835. XSamplingScale.Step = 20.000000000000000000
  836. YSamplingScale.Min = -200.000000000000000000
  837. YSamplingScale.Max = 200.000000000000000000
  838. YSamplingScale.Step = 20.000000000000000000
  839. ZSamplingScale.Min = -200.000000000000000000
  840. ZSamplingScale.Max = 200.000000000000000000
  841. ZSamplingScale.Step = 20.000000000000000000
  842. Parts = [gpX, gpZ]
  843. end
  844. end
  845. object LightCube: TGLDummyCube
  846. Direction.Coordinates = {0000000000000000000080BF00000000}
  847. Position.Coordinates = {000096C300000000000096430000803F}
  848. OnProgress = LightCubeProgress
  849. CubeSize = 1.000000000000000000
  850. object Light: TGLLightSource
  851. ConstAttenuation = 1.000000000000000000
  852. LightStyle = lsOmni
  853. SpotCutOff = 180.000000000000000000
  854. end
  855. object GLSphere1: TGLSphere
  856. Material.FrontProperties.Diffuse.Color = {E6E5653F8180003DCDCC4C3F0000803F}
  857. Material.FrontProperties.Emission.Color = {F4F3733FEEED6D3F000000000000803F}
  858. Radius = 10.000000000000000000
  859. end
  860. end
  861. object WorldCube: TGLDummyCube
  862. CubeSize = 1.000000000000000000
  863. object Fighter: TGLActor
  864. Material.MaterialLibrary = MaterialLibrary
  865. Material.LibMaterialName = 'Fighter'
  866. Position.Coordinates = {00001643000000000000A0410000803F}
  867. Up.Coordinates = {00000000000080BF0000008000000000}
  868. Interval = 100
  869. AutoCentering = [macCenterX, macCenterY, macCenterZ]
  870. end
  871. object Teapot: TGLActor
  872. Material.MaterialLibrary = MaterialLibrary
  873. Material.LibMaterialName = 'Fighter'
  874. Position.Coordinates = {000016C300000000000000000000803F}
  875. Interval = 100
  876. AutoCentering = [macCenterX, macCenterY, macCenterZ]
  877. end
  878. object Sphere_big: TGLActor
  879. Material.MaterialLibrary = MaterialLibrary
  880. Material.LibMaterialName = 'Earth'
  881. Position.Coordinates = {00000000000016C3000000000000803F}
  882. Interval = 100
  883. AutoCentering = [macCenterX, macCenterY, macCenterZ]
  884. end
  885. object Sphere_little: TGLActor
  886. Material.MaterialLibrary = MaterialLibrary
  887. Material.LibMaterialName = 'Earth'
  888. Position.Coordinates = {0000000000001643000000000000803F}
  889. Interval = 100
  890. AutoCentering = [macCenterX, macCenterY, macCenterZ]
  891. end
  892. end
  893. object PostShaderHolder: TGLPostShaderHolder
  894. TempTextureTarget = ttTextureRect
  895. Shaders = <>
  896. end
  897. object Camera: TGLCamera
  898. DepthOfView = 500.000000000000000000
  899. FocalLength = 65.000000000000000000
  900. TargetObject = GLXYZGrid1
  901. CameraStyle = csInfinitePerspective
  902. Position.Coordinates = {000048C20000164300007A430000803F}
  903. Direction.Coordinates = {00000000000080BF0000000000000000}
  904. Up.Coordinates = {00000000000000000000803F00000000}
  905. end
  906. end
  907. object Cadencer: TGLCadencer
  908. Scene = Scene
  909. MaxDeltaTime = 0.020000000000000000
  910. OnProgress = CadencerProgress
  911. Left = 96
  912. Top = 16
  913. end
  914. object MaterialLibrary: TGLMaterialLibrary
  915. Materials = <
  916. item
  917. Name = 'Noise'
  918. Tag = 0
  919. Material.Texture.Disabled = False
  920. end
  921. item
  922. Name = 'Fighter'
  923. Tag = 0
  924. Material.FrontProperties.Ambient.Color = {BFBEBE3EBBBABA3EBBBABA3E0000803F}
  925. Material.FrontProperties.Emission.Color = {B1B0B03DB1B0B03DB1B0B03D0000803F}
  926. Material.FrontProperties.Specular.Color = {8988083E8180003E8988083E0000803F}
  927. Material.BlendingMode = bmTransparency
  928. Material.Texture.TextureMode = tmModulate
  929. Material.Texture.Disabled = False
  930. end
  931. item
  932. Name = 'Earth'
  933. Tag = 0
  934. Material.FrontProperties.Ambient.Color = {E7E6E63EEBEAEA3EEBEAEA3E0000803F}
  935. Material.FrontProperties.Emission.Color = {F1F0F03DF1F0F03DF1F0F03D0000803F}
  936. Material.FrontProperties.Specular.Color = {8180003E8180003EE1E0E03D0000803F}
  937. Material.BlendingMode = bmTransparency
  938. Material.Texture.TextureMode = tmModulate
  939. Material.Texture.Disabled = False
  940. end
  941. item
  942. Name = 'Snow'
  943. Tag = 0
  944. Material.Texture.Disabled = False
  945. end
  946. item
  947. Name = 'FireGrade'
  948. Tag = 0
  949. Material.Texture.Disabled = False
  950. end
  951. item
  952. Name = 'Mask'
  953. Tag = 0
  954. Material.Texture.Disabled = False
  955. Material.Texture.DepthTextureMode = dtmIntensity
  956. end>
  957. Left = 40
  958. Top = 80
  959. end
  960. object GLSimpleNavigation1: TGLSimpleNavigation
  961. Form = Owner
  962. GLSceneViewer = Viewer
  963. FormCaption = 'GLSL Post Shader - %FPS'
  964. KeyCombinations = <
  965. item
  966. ShiftState = [ssLeft, ssRight]
  967. Action = snaZoom
  968. end
  969. item
  970. ShiftState = [ssLeft]
  971. Action = snaMoveAroundTarget
  972. end
  973. item
  974. ShiftState = [ssRight]
  975. Action = snaMoveAroundTarget
  976. end>
  977. Left = 192
  978. Top = 16
  979. end
  980. end