Randomaze/Unit1.dfm

object Form1: TForm1
  Left = 13
  Top = 37
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'Randomaze'
  ClientHeight = 654
  ClientWidth = 1110
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyPress = FormKeyPress
  OnMouseUp = GLSceneViewer1MouseUp
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object GLSceneViewer1: TGLSceneViewer
    Left = 0
    Top = 0
    Width = 1110
    Height = 654
    Camera = GLCamera1
    VSync = vsmSync
    Buffer.BackgroundColor = clWindow
    FieldOfView = 160.224029541015600000
    Align = alClient
    OnMouseDown = GLSceneViewer1MouseDown
    OnMouseMove = GLSceneViewer1MouseMove
    OnMouseUp = GLSceneViewer1MouseUp
    TabOrder = 0
  end
  object Panel1: TPanel
    Left = 8
    Top = 8
    Width = 150
    Height = 25
    Caption = 'Panel1'
    TabOrder = 1
    Visible = False
  end
  object Panel2: TPanel
    Left = 8
    Top = 40
    Width = 150
    Height = 25
    Caption = 'Panel2'
    TabOrder = 2
    Visible = False
  end
  object Panel3: TPanel
    Left = 8
    Top = 72
    Width = 150
    Height = 25
    Caption = 'Panel3'
    TabOrder = 3
    Visible = False
  end
  object Panel4: TPanel
    Left = 8
    Top = 104
    Width = 150
    Height = 25
    Caption = 'Panel4'
    TabOrder = 4
    Visible = False
  end
  object Panel5: TPanel
    Left = 8
    Top = 136
    Width = 150
    Height = 25
    Caption = 'Panel5'
    TabOrder = 5
    Visible = False
  end
  object Panel6: TPanel
    Left = 8
    Top = 176
    Width = 150
    Height = 25
    Caption = 'Panel6'
    TabOrder = 6
    Visible = False
  end
  object Panel8: TPanel
    Left = 136
    Top = 16
    Width = 569
    Height = 49
    BevelOuter = bvNone
    Caption = 'Panel8'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -32
    Font.Name = 'Lucida Console'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    Visible = False
  end
  object Panel9: TPanel
    Left = 136
    Top = 64
    Width = 569
    Height = 49
    BevelOuter = bvNone
    Caption = 'Panel9'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -32
    Font.Name = 'Lucida Console'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
    Visible = False
  end
  object Panel11: TPanel
    Left = 136
    Top = 112
    Width = 849
    Height = 49
    BevelOuter = bvNone
    Caption = 'Panel11'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -32
    Font.Name = 'Lucida Console'
    Font.Style = []
    ParentFont = False
    TabOrder = 9
    Visible = False
  end
  object Panel13: TPanel
    Left = 216
    Top = 216
    Width = 729
    Height = 169
    BevelOuter = bvNone
    Caption = 'Panel13'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -133
    Font.Name = 'Lucida Console'
    Font.Style = []
    ParentFont = False
    TabOrder = 10
    Visible = False
  end
  object RichEdit1: TRichEdit
    Left = 304
    Top = 400
    Width = 473
    Height = 94
    Alignment = taCenter
    BevelInner = bvNone
    BevelOuter = bvNone
    BorderStyle = bsNone
    Color = clBtnFace
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -32
    Font.Name = 'Lucida Console'
    Font.Style = []
    Lines.Strings = (
      ''
      'RichEdit1')
    ParentFont = False
    ReadOnly = True
    TabOrder = 11
    Visible = False
  end
  object Memo1: TMemo
    Left = 872
    Top = 520
    Width = 201
    Height = 111
    Alignment = taCenter
    BevelInner = bvNone
    BevelOuter = bvNone
    BiDiMode = bdLeftToRight
    BorderStyle = bsNone
    Color = clBlack
    DragCursor = crDefault
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -32
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Lines.Strings = (
      'Memo1')
    ParentBiDiMode = False
    ParentFont = False
    ReadOnly = True
    TabOrder = 12
    OnKeyPress = FormKeyPress
    OnMouseDown = GLSceneViewer1MouseDown
    OnMouseMove = GLSceneViewer1MouseMove
  end
  object ThrustBar: TProgressBar
    Left = 1072
    Top = 24
    Width = 30
    Height = 617
    Max = 1000
    Orientation = pbVertical
    Smooth = True
    TabOrder = 13
    OnMouseDown = ThrustBarMouseDown
    OnMouseMove = GLSceneViewer1MouseMove
    OnMouseUp = GLSceneViewer1MouseUp
  end
  object Scene1: TGLScene
    Left = 160
    Top = 256
    object Walls: TGLDummyCube
      CubeSize = 1.000000000000000000
    end
    object OtherPlayers: TGLDummyCube
      CubeSize = 1.000000000000000000
    end
    object GLCamera1: TGLCamera
      DepthOfView = 1000.000000000000000000
      FocalLength = 57.000000000000000000
      Position.Coordinates = {00000000000000BF000000000000803F}
      object PlayerLight: TGLLightSource
        ConstAttenuation = 1.000000000000000000
        SpotCutOff = 180.000000000000000000
      end
    end
    object Planes: TGLDummyCube
      CubeSize = 1.000000000000000000
      object Pushers: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object UpDownPorters: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object GreenSpeeds: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object Explosions: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object BadSpeeds: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object Turners: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object Grounds: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object Speeds: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object Arrows: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object YSNPs: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object Ceilings: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object Blackexplosions: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object Lightnings: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
    end
    object Menu: TGLDummyCube
      CubeSize = 1.000000000000000000
      object MPJoinMenu: TGLGameMenu
        Position.Coordinates = {0000964300006643000000000000803F}
        Font = MenuFont
        Items.Strings = (
          'Server-IP:'
          'Port:'
          'Join Game!'
          'Return')
        Selected = 0
      end
      object MPHostMenu: TGLGameMenu
        Position.Coordinates = {0000964300006643000000000000803F}
        Font = MenuFont
        Items.Strings = (
          'Port:'
          'Host Game!'
          'Return')
        Selected = 0
      end
      object MPMenu: TGLGameMenu
        Position.Coordinates = {0000964300006643000000000000803F}
        Font = MenuFont
        Items.Strings = (
          'Host Game'
          'Join Game'
          'Return')
        Selected = 0
      end
      object VideoMenu: TGLGameMenu
        Position.Coordinates = {0000964300006643000000000000803F}
        Font = MenuFont
        Items.Strings = (
          'Fullscreen (M)'
          'Resolution (non-fullscreen)'
          'Shading Distance'
          'Return')
        Selected = 0
      end
      object SettingsMenu: TGLGameMenu
        Position.Coordinates = {0000964300006643000000000000803F}
        Font = MenuFont
        Items.Strings = (
          'Video'
          'Return')
        Selected = 0
      end
      object MainMenu: TGLGameMenu
        Position.Coordinates = {0000964300006643000000000000803F}
        Font = MenuFont
        Items.Strings = (
          'CONTINUE (P/Esc)'
          'RESTART GAME (N)'
          'SETTINGS (-)'
          'MULTIPLAYER'
          'RESPAWN (R)'
          'QUIT GAME (B)')
        Selected = 0
      end
    end
    object HUDTexts: TGLDummyCube
      CubeSize = 1.000000000000000000
      object GLHUDText1: TGLHUDText
        Position.Coordinates = {008031440000F041000000000000803F}
        BitmapFont = MenuFont
        Text = 'Speed:15'
        Rotation = 0.000000000000000000
      end
      object PlayerGoalDists: TGLDummyCube
        CubeSize = 1.000000000000000000
      end
      object GLHUDText2: TGLHUDText
        Position.Coordinates = {0000484200001644000000000000803F}
        BitmapFont = MenuFont
        Text = 'Version'
        Rotation = 0.000000000000000000
      end
    end
    object MuhNPCs: TGLDummyCube
      CubeSize = 1.000000000000000000
    end
  end
  object Timer1: TTimer
    Interval = 200
    OnTimer = Timer1Timer
    Left = 200
    Top = 296
  end
  object GLUserInterface1: TGLUserInterface
    MouseSpeed = 15.000000000000000000
    GLNavigator = GLNavigator1
    GLVertNavigator = GLNavigator1
    Left = 120
    Top = 384
  end
  object GLNavigator1: TGLNavigator
    VirtualUp.Coordinates = {000000000000803F0000000000000000}
    MovingObject = GLCamera1
    UseVirtualUp = True
    AutoUpdateObject = True
    MaxAngle = 90.000000000000000000
    MinAngle = -90.000000000000000000
    AngleLock = True
    Left = 112
    Top = 440
  end
  object MenuFont: TGLWindowsBitmapFont
    Font.Charset = ANSI_CHARSET
    Font.Color = clWhite
    Font.Height = -35
    Font.Name = 'Lucida Console'
    Font.Style = []
    Left = 136
    Top = 304
  end
  object PlayerGoalDistFont: TGLWindowsBitmapFont
    Font.Charset = ANSI_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = 'Lucida Console'
    Font.Style = []
    Left = 88
    Top = 344
  end
end