object fMicrobit: TfMicrobit Left = 1211 Height = 259 Top = 119 Width = 297 BorderIcons = [] BorderStyle = bsToolWindow Caption = 'micro:bit Input Output' ClientHeight = 259 ClientWidth = 297 FormStyle = fsStayOnTop OnActivate = FormActivate LCLVersion = '2.0.12.0' object GroupBox1: TGroupBox Left = 8 Height = 104 Top = 8 Width = 104 Caption = 'Display' ClientHeight = 84 ClientWidth = 100 TabOrder = 0 object Shape1: TShape Left = 8 Height = 15 Top = 0 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape2: TShape Left = 24 Height = 15 Top = 0 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape3: TShape Left = 40 Height = 15 Top = 0 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape4: TShape Left = 56 Height = 15 Top = 0 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape5: TShape Left = 72 Height = 15 Top = 0 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape6: TShape Left = 8 Height = 15 Top = 16 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape7: TShape Left = 24 Height = 15 Top = 16 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape8: TShape Left = 40 Height = 15 Top = 16 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape9: TShape Left = 56 Height = 15 Top = 16 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape10: TShape Left = 72 Height = 15 Top = 16 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape11: TShape Left = 8 Height = 15 Top = 32 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape12: TShape Left = 24 Height = 15 Top = 32 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape13: TShape Left = 40 Height = 15 Top = 32 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape14: TShape Left = 56 Height = 15 Top = 32 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape15: TShape Left = 72 Height = 15 Top = 32 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape16: TShape Left = 8 Height = 15 Top = 48 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape17: TShape Left = 24 Height = 15 Top = 48 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape18: TShape Left = 40 Height = 15 Top = 48 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape19: TShape Left = 56 Height = 15 Top = 48 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape20: TShape Left = 72 Height = 15 Top = 48 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape21: TShape Left = 8 Height = 15 Top = 64 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape22: TShape Left = 24 Height = 15 Top = 64 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape23: TShape Left = 40 Height = 15 Top = 64 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape24: TShape Left = 56 Height = 15 Top = 64 Width = 17 Brush.Color = clRed Shape = stRoundRect end object Shape25: TShape Left = 72 Height = 15 Top = 64 Width = 17 Brush.Color = clRed Shape = stRoundRect end end object GBInput: TGroupBox Left = 120 Height = 248 Top = 8 Width = 172 Caption = 'Input' ClientHeight = 228 ClientWidth = 168 ParentFont = False TabOrder = 1 object accx: TSpinEdit Left = 62 Height = 23 Top = 24 Width = 54 MaxValue = 255 ParentFont = False TabOrder = 0 end object accy: TSpinEdit Left = 62 Height = 23 Top = 52 Width = 54 MaxValue = 255 ParentFont = False TabOrder = 1 end object Label1: TLabel Left = 14 Height = 15 Top = 31 Width = 34 Caption = 'ACC.X' ParentColor = False ParentFont = False end object Label2: TLabel Left = 14 Height = 15 Top = 58 Width = 34 Caption = 'ACC.Y' ParentColor = False ParentFont = False end object accz: TSpinEdit Left = 62 Height = 23 Top = 81 Width = 54 MaxValue = 255 ParentFont = False TabOrder = 2 end object compass: TSpinEdit Left = 62 Height = 23 Top = 109 Width = 54 MaxValue = 255 ParentFont = False TabOrder = 3 end object Label16: TLabel Left = 14 Height = 15 Top = 87 Width = 34 Caption = 'ACC.Z' ParentColor = False ParentFont = False end object Label17: TLabel Left = 14 Height = 15 Top = 115 Width = 49 Caption = 'Compass' ParentColor = False ParentFont = False end object tbLogo: TToggleBox Left = 14 Height = 18 Top = 1 Width = 50 Caption = '&LOGO' ParentFont = False TabOrder = 4 end object Label3: TLabel Left = 14 Height = 15 Top = 143 Width = 34 Caption = 'Sound' ParentColor = False ParentFont = False end object snd: TSpinEdit Left = 62 Height = 23 Top = 136 Width = 54 MaxValue = 255 ParentFont = False TabOrder = 5 end object Label4: TLabel Left = 14 Height = 15 Top = 170 Width = 27 Caption = 'Light' ParentColor = False ParentFont = False end object light: TSpinEdit Left = 62 Height = 23 Top = 164 Width = 54 MaxValue = 255 ParentFont = False TabOrder = 6 end object Label18: TLabel Left = 14 Height = 15 Top = 199 Width = 40 Caption = 'Gesture' ParentColor = False ParentFont = False end object cbGesture: TComboBox Left = 64 Height = 23 Top = 194 Width = 68 ItemHeight = 15 ItemIndex = 0 Items.Strings = ( 'nothing ' 'up' 'down' 'left' 'right' 'face up' 'face down' 'freefall' '3g' '6g ' '8g' 'shake' ) Style = csDropDownList TabOrder = 7 Text = 'nothing ' end end end