Unit1.dfm 13 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263
  1. object Form1: TForm1
  2. Left = 209
  3. Top = 112
  4. Caption = 'FPS Movement'
  5. ClientHeight = 431
  6. ClientWidth = 582
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -11
  11. Font.Name = 'MS Sans Serif'
  12. Font.Style = []
  13. KeyPreview = True
  14. OldCreateOrder = False
  15. Position = poScreenCenter
  16. WindowState = wsMaximized
  17. OnKeyDown = FormKeyDown
  18. PixelsPerInch = 96
  19. TextHeight = 13
  20. object GLSceneViewer1: TGLSceneViewer
  21. Left = 0
  22. Top = 0
  23. Width = 582
  24. Height = 431
  25. Camera = ThirdPersonCamera
  26. Buffer.BackgroundColor = clBlack
  27. Buffer.ShadeModel = smSmooth
  28. FieldOfView = 153.874877929687500000
  29. Align = alClient
  30. TabOrder = 0
  31. end
  32. object GLScene1: TGLScene
  33. Left = 48
  34. Top = 24
  35. object World: TGLDummyCube
  36. CubeSize = 1.000000000000000000
  37. object Player: TGLDummyCube
  38. Position.Coordinates = {0000803FCDCC8C3F0000803F0000803F}
  39. CubeSize = 1.000000000000000000
  40. BehavioursData = {
  41. 0458434F4C02010201060F54474C424650534D6F76656D656E74020012000000
  42. 000200020002000F6666263F0909060A4D6F764D616E61676572}
  43. object PlayerSphere: TGLSphere
  44. Radius = 0.649999976158142100
  45. end
  46. object FirstPersonCamera: TGLCamera
  47. DepthOfView = 120.000000000000000000
  48. FocalLength = 50.000000000000000000
  49. NearPlaneBias = 0.500000000000000000
  50. Direction.Coordinates = {00000000000000000000803F00000000}
  51. Up.Coordinates = {00000000FFFF7F3F0000008000000000}
  52. end
  53. object ThirdPersonCamera: TGLCamera
  54. DepthOfView = 12000.000000000000000000
  55. FocalLength = 50.000000000000000000
  56. TargetObject = Player
  57. Position.Coordinates = {000000000000803F000000C00000803F}
  58. end
  59. object GLLightSource1: TGLLightSource
  60. ConstAttenuation = 1.000000000000000000
  61. SpotCutOff = 180.000000000000000000
  62. end
  63. object PlayerCentre: TGLSphere
  64. Radius = 0.050000000745058060
  65. end
  66. end
  67. object Bot: TGLDummyCube
  68. CubeSize = 1.000000000000000000
  69. BehavioursData = {
  70. 0458434F4C02010201060F54474C424650534D6F76656D656E74020012000000
  71. 000200020002000FCDCCCC3E0909060A4D6F764D616E61676572}
  72. object BotCenter: TGLSphere
  73. Radius = 0.050000000745058060
  74. end
  75. object BotSphere: TGLSphere
  76. Material.FaceCulling = fcNoCull
  77. Radius = 0.400000005960464500
  78. end
  79. end
  80. object GLLight: TGLLightSource
  81. ConstAttenuation = 1.000000000000000000
  82. SpotCutOff = 180.000000000000000000
  83. end
  84. object Map1: TGLFreeForm
  85. VisibilityCulling = vcNone
  86. Direction.Coordinates = {F7FF7FA7FFFF7FBFE1CD0C3400000000}
  87. ShowAxes = True
  88. Up.Coordinates = {00000000E2CD0C340000803F00000000}
  89. MaterialLibrary = GLMaterialLibrary1
  90. LightmapLibrary = GLMaterialLibrary1
  91. end
  92. object Map2: TGLFreeForm
  93. Direction.Coordinates = {000000000000803F0000000000000000}
  94. Position.Coordinates = {00000000000000C0000000000000803F}
  95. Up.Coordinates = {00000000000000000000803F00000000}
  96. end
  97. end
  98. end
  99. object GLCadencer1: TGLCadencer
  100. Scene = GLScene1
  101. MaxDeltaTime = 0.020000000000000000
  102. OnProgress = GLCadencer1Progress
  103. Left = 136
  104. Top = 24
  105. end
  106. object GLMaterialLibrary1: TGLMaterialLibrary
  107. Materials = <
  108. item
  109. Name = 'LibMaterial'
  110. Tag = 0
  111. Material.FrontProperties.Ambient.Color = {0000803F0000803F0000803F0000803F}
  112. Material.FrontProperties.Diffuse.Color = {0000803F0000803F0000803F0000803F}
  113. Material.FrontProperties.Emission.Color = {0000803F0000803F0000803F0000803F}
  114. Material.FrontProperties.Shininess = 100
  115. Material.FrontProperties.Specular.Color = {0000803F0000803F0000803F0000803F}
  116. Material.BlendingMode = bmAdditive
  117. Material.Texture.Image.Picture.Data = {
  118. 07544269746D6170360C0000424D360C00000000000036000000280000002000
  119. 0000200000000100180000000000000C0000C30E0000C30E0000000000000000
  120. 0000000000000000000000000000000000000000000000000000000000000000
  121. 0000000000000000000000000000000000000000000000000000000000000000
  122. 0000000000000000000000000000000000000000000000000000000000000000
  123. 0000000000000000000000000000000000000000000000000000000000000000
  124. 0000000301000703000A05000D06000F07001007000F07000D06000A05000703
  125. 0003010000000000000000000000000000000000000000000000000000000000
  126. 0000000000000000000000000000000000000000000000000000000000050200
  127. 0C0500130800190B001E0D00220F00251000261100251000220F001E0D00190B
  128. 001308000C050005020000000000000000000000000000000000000000000000
  129. 00000000000000000000000000000000000000000000000301000B0500150900
  130. 1E0D002712003015003618003C1B003F1C00401D003F1C003C1B003618003015
  131. 002712001E0D001509000B050002010000000000000000000000000000000000
  132. 00000000000000000000000000000000000000000502001007001C0C00281200
  133. 341700401D004A21005225005827005C29005D2A005C29005827005225004A21
  134. 00401D003417002812001C0C0010070004020000000000000000000000000000
  135. 0000000000000000000000000000000000060300130800210F003015003F1C00
  136. 4D23005A2800662E006F32007635007A37007C37007A37007635006F3200662E
  137. 005A28004D23003F1C00301500210F0013080005020000000000000000000000
  138. 0000000000000000000000000000050200130800220F00331700451F00572700
  139. 672E00763500813A00863C008A3D008C3E008C3F008C3E008A3D00863C00813A
  140. 00763500672E00572700451F00331700220F0013080004010000000000000000
  141. 0000000000000000000000030100100700210F003317004720005C29006F3200
  142. 803900883D008F40009442009844009A45009B45009A45009844009442008F40
  143. 00883D008039006F32005C2900472000331700210F0010070002010000000000
  144. 00000000000000000000000B05001C0C00301500451F005C2900723300833B00
  145. 8C3F009542009C4600A14800A64A00A84B00A94C00A84B00A64A00A148009C46
  146. 009542008C3F00833B007233005C2900451F003015001C0C000A050000000000
  147. 00000000000000000502001509002812003F1C005727006F3200833B008E3F00
  148. 984400A14800A84B00AE4E00B35000B65100B75200B65100B35000AE4E00A84B
  149. 00A148009844008E3F00833B006F32005727003F1C0028120015090003010000
  150. 00000000000000000C05001E0D003417004D2300672E008039008C3F00984400
  151. A24900AC4D00B45000BB5400C05600C35700C45800C35700C05600BB5400B450
  152. 00AC4D00A249009844008C3F00803900672E004D23003417001E0D000B040000
  153. 0000000000030100130800271200401D005A2800763500883D00954200A14800
  154. AC4D00B65100BF5500C65900CC5B00CF5D00D15D00CF5D00CC5B00C65900BF55
  155. 00B65100AC4D00A14800954200883D007635005A2800401D0027120013080001
  156. 0000000000070300190B003015004A2100662E00813A008F40009C4600A84B00
  157. B45000BF5500C85A00D15D00D76000DB6200DC6200DB6200D76000D15D00C85A
  158. 00BF5500B45000A84B009C46008F4000813A00662E004A2100301500190B0004
  159. 02000000000A05001E0D003618005225006F3200863C00944200A14800AE4E00
  160. BB5400C65900D15D00D96100E16400E56600E76700E56600E16400D96100D15D
  161. 00C65900BB5400AE4E00A14800944200863C006F32005225003618001E0D0008
  162. 04000000000D0600220F003C1B005827007635008A3D00984400A64A00B35000
  163. C05600CC5B00D76000E16400E96800EE6A00F06B00EE6A00E96800E16400D760
  164. 00CC5B00C05600B35000A64A009844008A3D007635005827003C1B00220F000B
  165. 05000000000F07002510003F1C005C29007A37008C3E009A4500A84B00B65100
  166. C35700CF5D00DB6200E56600EE6A00F56E00F86F00F56E00EE6A00E56600DB62
  167. 00CF5D00C35700B65100A84B009A45008C3E007A37005C29003F1C002510000F
  168. 0700000000100700261100401D005D2A007C37008C3F009B4500A94C00B75200
  169. C45800D15D00DC6200E76700F06B00F86F00FF7200F86F00F06B00E76700DC62
  170. 00D15D00C45800B75200A94C009B45008C3F007C37005D2A00401D0026110010
  171. 07000000000F07002510003F1C005C29007A37008C3E009A4500A84B00B65100
  172. C35700CF5D00DB6200E56600EE6A00F56E00F86F00F56E00EE6A00E56600DB62
  173. 00CF5D00C35700B65100A84B009A45008C3E007A37005C29003F1C002510000D
  174. 06000000000D0600220F003C1B005827007635008A3D00984400A64A00B35000
  175. C05600CC5B00D76000E16400E96800EE6A00F06B00EE6A00E96800E16400D760
  176. 00CC5B00C05600B35000A64A009844008A3D007635005827003C1B00220F000A
  177. 05000000000A05001E0D003618005225006F3200863C00944200A14800AE4E00
  178. BB5400C65900D15D00D96100E16400E56600E76700E56600E16400D96100D15D
  179. 00C65900BB5400AE4E00A14800944200863C006F32005225003618001E0D0006
  180. 0300000000070300190B003015004A2100662E00813A008F40009C4600A84B00
  181. B45000BF5500C85A00D15D00D76000DB6200DC6200DB6200D76000D15D00C85A
  182. 00BF5500B45000A84B009C46008F4000813A00662E004A2100301500190B0003
  183. 0100000000030100130800271200401D005A2800763500883D00954200A14800
  184. AC4D00B65100BF5500C65900CC5B00CF5D00D15D00CF5D00CC5B00C65900BF55
  185. 00B65100AC4D00A14800954200883D007635005A2800401D0027120011070000
  186. 00000000000000000C05001E0D003417004D2300672E008039008C3F00984400
  187. A24900AC4D00B45000BB5400C05600C35700C45800C35700C05600BB5400B450
  188. 00AC4D00A249009844008C3F00803900672E004D23003417001E0D0007030000
  189. 00000000000000000502001509002812003F1C005727006F3200833B008E3F00
  190. 984400A14800A84B00AE4E00B35000B65100B75200B65100B35000AE4E00A84B
  191. 00A148009844008E3F00833B006F32005727003F1C0028120013080001010000
  192. 00000000000000000000000B05001C0C00301500451F005C2900723300833B00
  193. 8C3F009542009C4600A14800A64A00A84B00A94C00A84B00A64A00A148009C46
  194. 009542008C3F00833B007233005C2900451F003015001C0C0006030000000000
  195. 0000000000000000000000020100100700210F003317004720005C29006F3200
  196. 803900883D008F40009442009844009A45009B45009A45009844009442008F40
  197. 00883D008039006F32005C2900472000331700210F000B050000000000000000
  198. 0000000000000000000000000000040200130800220F00331700451F00572700
  199. 672E00763500813A00863C008A3D008C3E008C3F008C3E008A3D00863C00813A
  200. 00763500672E00572700451F00331700220F000F060001010000000000000000
  201. 0000000000000000000000000000000000050200130800210F003015003F1C00
  202. 4D23005A2800662E006F32007635007A37007C37007A37007635006F3200662E
  203. 005A28004D23003F1C00301500210F000F060002010000000000000000000000
  204. 00000000000000000000000000000000000000000401001007001C0C00281200
  205. 341700401D004A21005225005827005C29005D2A005C29005827005225004A21
  206. 00401D003417002812001C0C000B050001010000000000000000000000000000
  207. 00000000000000000000000000000000000000000000000201000A0500150900
  208. 1E0D002712003015003618003C1B003F1C00401D003F1C003C1B003618003015
  209. 002712001E0D0013080006030000000000000000000000000000000000000000
  210. 0000000000000000000000000000000000000000000000000000000000030100
  211. 0B0400130800190B001E0D00220F00251000261100251000220F001E0D00190B
  212. 0011070007030001010000000000000000000000000000000000000000000000
  213. 0000000000000000000000000000000000000000000000000000000000000000
  214. 0000000100000402000804000B05000F07001007000D06000A05000603000301
  215. 0000000000000000000000000000000000000000000000000000000000000000
  216. 0000}
  217. Material.Texture.ImageAlpha = tiaSuperBlackTransparent
  218. Material.Texture.TextureMode = tmModulate
  219. Material.Texture.Disabled = False
  220. end>
  221. Left = 48
  222. Top = 96
  223. end
  224. object Navigator1: TGLNavigator
  225. VirtualUp.Coordinates = {000000000000803F000000000000803F}
  226. UseVirtualUp = True
  227. AutoUpdateObject = True
  228. Left = 136
  229. Top = 96
  230. end
  231. object MovManager: TGLFPSMovementManager
  232. Navigator = Navigator1
  233. Scene = GLScene1
  234. DisplayTime = 2000
  235. MovementScale = 4.000000000000000000
  236. Left = 216
  237. Top = 24
  238. MapsData = {
  239. 0458434F4C02010202061454474C4D6170436F6C6C656374696F6E4974656D02
  240. 00060E4650534D6F76656D656E744D61700200020006044D6170310200020006
  241. 0E4650534D6F76656D656E744D61700200020006044D617032}
  242. end
  243. object GLSimpleNavigation1: TGLSimpleNavigation
  244. Form = Owner
  245. GLSceneViewer = GLSceneViewer1
  246. FormCaption = 'FPS Movement - %FPS'
  247. KeyCombinations = <
  248. item
  249. ShiftState = [ssLeft, ssRight]
  250. Action = snaZoom
  251. end
  252. item
  253. ShiftState = [ssLeft]
  254. Action = snaMoveAroundTarget
  255. end
  256. item
  257. ShiftState = [ssRight]
  258. Action = snaMoveAroundTarget
  259. end>
  260. Left = 320
  261. Top = 24
  262. end
  263. end