Unit1.dfm 7.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232
  1. object Form1: TForm1
  2. Left = 0
  3. Top = 0
  4. Align = alClient
  5. BorderStyle = bsNone
  6. Caption = 'Ode Terrain'
  7. ClientHeight = 547
  8. ClientWidth = 639
  9. Color = clBtnFace
  10. Font.Charset = DEFAULT_CHARSET
  11. Font.Color = clWindowText
  12. Font.Height = -11
  13. Font.Name = 'Tahoma'
  14. Font.Style = []
  15. OldCreateOrder = False
  16. OnCreate = FormCreate
  17. OnKeyPress = FormKeyPress
  18. PixelsPerInch = 96
  19. TextHeight = 13
  20. object GLSceneViewer1: TGLSceneViewer
  21. Left = 0
  22. Top = 0
  23. Width = 639
  24. Height = 547
  25. Camera = GLCamera1
  26. BeforeRender = GLSceneViewer1BeforeRender
  27. Buffer.FogEnvironment.FogColor.Color = {0000803F0000803F0000803F0000803F}
  28. Buffer.FogEnvironment.FogStart = 200.000000000000000000
  29. Buffer.FogEnvironment.FogEnd = 650.000000000000000000
  30. Buffer.FogEnvironment.FogDistance = fdEyeRadial
  31. Buffer.BackgroundColor = clGray
  32. Buffer.FogEnable = True
  33. FieldOfView = 159.279708862304700000
  34. PenAsTouch = False
  35. Align = alClient
  36. TabOrder = 0
  37. end
  38. object GLBitmapHDS1: TGLBitmapHDS
  39. MaxPoolSize = 0
  40. Left = 320
  41. Top = 72
  42. end
  43. object GLScene1: TGLScene
  44. ObjectsSorting = osNone
  45. Left = 32
  46. Top = 16
  47. object GLLightSource1: TGLLightSource
  48. ConstAttenuation = 1.000000000000000000
  49. LightStyle = lsParallel
  50. SpotCutOff = 180.000000000000000000
  51. SpotDirection.Coordinates = {00000000F4FD34BFF4FD343F00000000}
  52. end
  53. object SkyDome1: TGLSkyDome
  54. Bands = <
  55. item
  56. StartAngle = -5.000000000000000000
  57. StartColor.Color = {0000803F0000803F0000803F0000803F}
  58. StopAngle = 25.000000000000000000
  59. Slices = 9
  60. end
  61. item
  62. StartAngle = 25.000000000000000000
  63. StopAngle = 90.000000000000000000
  64. StopColor.Color = {938C0C3E938C0C3E938E0E3F0000803F}
  65. Slices = 9
  66. Stacks = 4
  67. end>
  68. Stars = <>
  69. Options = [sdoTwinkle]
  70. object SPMoon: TGLSprite
  71. Material.FrontProperties.Ambient.Color = {0000000000000000000000000000803F}
  72. Material.FrontProperties.Diffuse.Color = {0000000000000000000000000000803F}
  73. Material.FrontProperties.Emission.Color = {0000803F0000803F0000803F0000803F}
  74. Material.BlendingMode = bmTransparency
  75. Material.MaterialOptions = [moIgnoreFog]
  76. Material.Texture.ImageAlpha = tiaSuperBlackTransparent
  77. Material.Texture.TextureMode = tmReplace
  78. Material.Texture.Compression = tcNone
  79. Material.Texture.Disabled = False
  80. Position.Coordinates = {00000C430000C842000096420000803F}
  81. Visible = False
  82. Width = 30.000000000000000000
  83. Height = 30.000000000000000000
  84. Rotation = 0.000000000000000000
  85. end
  86. object SPSun: TGLSprite
  87. Material.FrontProperties.Ambient.Color = {0000000000000000000000000000803F}
  88. Material.FrontProperties.Diffuse.Color = {0000000000000000000000000000803F}
  89. Material.BlendingMode = bmAdditive
  90. Material.MaterialOptions = [moIgnoreFog]
  91. Material.Texture.TextureMode = tmReplace
  92. Material.Texture.TextureFormat = tfLuminance
  93. Material.Texture.Compression = tcNone
  94. Material.Texture.Disabled = False
  95. Position.Coordinates = {00000C430000C842000096420000803F}
  96. Width = 60.000000000000000000
  97. Height = 60.000000000000000000
  98. Rotation = 0.000000000000000000
  99. end
  100. end
  101. object TerrainRenderer1: TGLTerrainRenderer
  102. Material.MaterialLibrary = GLMaterialLibrary1
  103. Material.LibMaterialName = 'ground'
  104. Direction.Coordinates = {09260E19ECD96EB30000803F00000000}
  105. Scale.Coordinates = {00008040000080400000803E00000000}
  106. Up.Coordinates = {E146A6250000803FECD96E3300000000}
  107. HeightDataSource = GLBitmapHDS1
  108. TileSize = 32
  109. TilesPerTexture = 1.000000000000000000
  110. QualityDistance = 150.000000000000000000
  111. ContourWidth = 0
  112. BehavioursData = {
  113. 0458434F4C02010201061154474C4F44454865696768744669656C6402001200
  114. 00000002000200120000000002000500000000006F1283F53F08000005000000
  115. 00000000FA084005000000000000000000000500000000000000000000050000
  116. 0000000000000000050000000000000000000005000000000000000000000500
  117. 0000000000000000000500000000000000000000050000000000000000000005
  118. 000000000000000000000200050000000000000080FF3F080500000000000000
  119. C000400000803F0200}
  120. end
  121. object ODEObjects: TGLDummyCube
  122. CubeSize = 1.000000000000000000
  123. object ODERenderPoint: TGLRenderPoint
  124. end
  125. end
  126. object HUDText1: TGLHUDText
  127. Position.Coordinates = {000096420000C841000000000000803F}
  128. BitmapFont = BitmapFont1
  129. Rotation = 0.000000000000000000
  130. end
  131. object GLLensFlare: TGLLensFlare
  132. Size = 100
  133. Seed = 978
  134. FlareIsNotOccluded = True
  135. Position.Coordinates = {9A620252C9B28B51B743BAD10000803F}
  136. Visible = False
  137. object GLDummyCube1: TGLDummyCube
  138. CubeSize = 100.000000000000000000
  139. VisibleAtRunTime = True
  140. end
  141. end
  142. object GLCamera1: TGLCamera
  143. DepthOfView = 650.000000000000000000
  144. FocalLength = 50.000000000000000000
  145. Direction.Coordinates = {000000000000803F0000000000000000}
  146. Up.Coordinates = {00000000000000000000803F00000000}
  147. Left = 264
  148. Top = 160
  149. object ODEDrop: TGLDummyCube
  150. Position.Coordinates = {0000000000000000000020410000803F}
  151. CubeSize = 1.000000000000000000
  152. end
  153. end
  154. end
  155. object Timer1: TTimer
  156. OnTimer = Timer1Timer
  157. Left = 224
  158. Top = 72
  159. end
  160. object GLCadencer1: TGLCadencer
  161. Scene = GLScene1
  162. MaxDeltaTime = 0.020000000000000000
  163. OnProgress = GLCadencer1Progress
  164. Left = 128
  165. Top = 16
  166. end
  167. object GLMaterialLibrary1: TGLMaterialLibrary
  168. Materials = <
  169. item
  170. Name = 'ground'
  171. Tag = 0
  172. Material.FrontProperties.Ambient.Color = {0000000000000000000000000000803F}
  173. Material.FrontProperties.Diffuse.Color = {0000000000000000000000000000803F}
  174. Material.FrontProperties.Emission.Color = {9A99993E9A99993E9A99993E0000803F}
  175. Material.Texture.TextureMode = tmReplace
  176. Material.Texture.Compression = tcStandard
  177. Material.Texture.Disabled = False
  178. Texture2Name = 'details'
  179. end
  180. item
  181. Name = 'details'
  182. Tag = 0
  183. Material.Texture.TextureMode = tmModulate
  184. Material.Texture.TextureFormat = tfLuminance
  185. Material.Texture.Compression = tcStandard
  186. Material.Texture.Disabled = False
  187. TextureScale.Coordinates = {00000043000000430000004300000000}
  188. end>
  189. Left = 32
  190. Top = 72
  191. end
  192. object BitmapFont1: TGLBitmapFont
  193. GlyphsIntervalX = 1
  194. GlyphsIntervalY = 1
  195. Ranges = <
  196. item
  197. StartASCII = ' '
  198. StopASCII = 'Z'
  199. StartGlyphIdx = 0
  200. end>
  201. CharWidth = 30
  202. CharHeight = 30
  203. Left = 320
  204. Top = 16
  205. end
  206. object GLODEManager1: TGLODEManager
  207. Gravity.Coordinates = {0000000000000000C3F51CC10000803F}
  208. Solver = osmQuickStep
  209. Iterations = 3
  210. MaxContacts = 8
  211. RenderPoint = ODERenderPoint
  212. Visible = True
  213. VisibleAtRunTime = True
  214. Left = 416
  215. Top = 16
  216. end
  217. object GLNavigator1: TGLNavigator
  218. VirtualUp.Coordinates = {00000000000000000000803F0000803F}
  219. MovingObject = GLCamera1
  220. UseVirtualUp = True
  221. AutoUpdateObject = True
  222. Left = 224
  223. Top = 16
  224. end
  225. object GLUserInterface1: TGLUserInterface
  226. MouseSpeed = 25.000000000000000000
  227. GLNavigator = GLNavigator1
  228. GLVertNavigator = GLNavigator1
  229. Left = 128
  230. Top = 72
  231. end
  232. end