home *** CD-ROM | disk | FTP | other *** search
- object TTSForm: TTTSForm
- Left = 198
- Top = 162
- AutoScroll = False
- BorderIcons = []
- Caption = 'Text To Speech Properties'
- ClientHeight = 366
- ClientWidth = 494
- Color = 12632193
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 165
- Top = 7
- Width = 317
- Height = 323
- Shape = bsFrame
- end
- object Label1: TLabel
- Left = 243
- Top = 95
- Width = 24
- Height = 13
- Caption = 'Pitch'
- end
- object Label2: TLabel
- Left = 240
- Top = 126
- Width = 31
- Height = 13
- Caption = 'Speed'
- end
- object Label3: TLabel
- Left = 242
- Top = 159
- Width = 35
- Height = 13
- Caption = 'Volume'
- end
- object Label4: TLabel
- Left = 294
- Top = 60
- Width = 60
- Height = 13
- Caption = 'Select Voice'
- end
- object Label12: TLabel
- Left = 188
- Top = 20
- Width = 125
- Height = 13
- Caption = 'Select an Agent Character'
- end
- object Label5: TLabel
- Left = 308
- Top = 202
- Width = 148
- Height = 13
- Caption = 'Smaller Agent Size Larger'
- end
- object Label10: TLabel
- Left = 413
- Top = 307
- Width = 42
- Height = 13
- Caption = 'Seconds'
- end
- object OptLabel: TLabel
- Left = 177
- Top = 1
- Width = 126
- Height = 13
- Caption = 'Options for Main Character'
- Color = clMaroon
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object Label6: TLabel
- Left = 164
- Top = 331
- Width = 66
- Height = 26
- Caption = 'Background Music Volume'
- WordWrap = True
- end
- object Label7: TLabel
- Left = 247
- Top = 336
- Width = 7
- Height = 20
- Caption = '-'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label8: TLabel
- Left = 325
- Top = 335
- Width = 11
- Height = 20
- Caption = '+'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object AgentCountLbl: TLabel
- Left = 345
- Top = 19
- Width = 91
- Height = 13
- Caption = 'You have 1 Agents'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 10485760
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label9: TLabel
- Left = 358
- Top = 97
- Width = 100
- Height = 13
- Caption = 'Character Animations'
- end
- object MyAgent: TAgent
- Left = 450
- Top = 50
- Width = 32
- Height = 32
- OnClick = MyAgentClick
- OnDblClick = MyAgentDblClick
- OnDragStart = MyAgentDragStart
- OnDragComplete = MyAgentDragComplete
- OnRequestStart = MyAgentRequestStart
- OnRequestComplete = MyAgentRequestComplete
- OnIdleStart = MyAgentIdleStart
- OnIdleComplete = MyAgentIdleComplete
- OnMove = MyAgentMove
- ControlData = {000300004F0300004F030000}
- end
- object PitchBar: TTrackBar
- Left = 185
- Top = 107
- Width = 150
- Height = 17
- Max = 400
- Min = 1
- Orientation = trHorizontal
- PageSize = 1
- Frequency = 1
- Position = 100
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- ThumbLength = 15
- TickMarks = tmBoth
- TickStyle = tsNone
- end
- object SpeedBar: TTrackBar
- Left = 185
- Top = 140
- Width = 150
- Height = 17
- Max = 230
- Min = 50
- Orientation = trHorizontal
- PageSize = 1
- Frequency = 1
- Position = 155
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 15
- TickMarks = tmBoth
- TickStyle = tsNone
- end
- object VolumeBar: TTrackBar
- Left = 186
- Top = 170
- Width = 150
- Height = 17
- Max = 65535
- Min = 10000
- Orientation = trHorizontal
- PageSize = 1
- Frequency = 1
- Position = 65535
- SelEnd = 0
- SelStart = 0
- TabOrder = 3
- ThumbLength = 15
- TickMarks = tmBoth
- TickStyle = tsNone
- end
- object SayBtn: TButton
- Left = 171
- Top = 73
- Width = 35
- Height = 19
- Caption = 'Test'
- TabOrder = 4
- OnClick = SayBtnClick
- end
- object VoiceSel: TComboBox
- Left = 211
- Top = 72
- Width = 233
- Height = 21
- ItemHeight = 13
- TabOrder = 5
- Text = 'Voice Selection'
- OnChange = VoiceSelChange
- Items.Strings = (
- 'Adult Male Voice #1'
- 'Adult Male Voice #2'
- 'Adult Male Voice #3'
- 'Adult Male Voice #4'
- 'Adult Male Voice #5'
- 'Adult Male Voice #6'
- 'Adult Male Voice #7'
- 'Adult Male Voice #8'
- 'Adult Female Voice #1'
- 'Adult Female Voice #2'
- 'Brutus'
- 'Freddy'
- 'Mary'
- 'Mary in Hall'
- 'Mary in Space'
- 'Mary in Stadium'
- 'Mike'
- 'Mike in Hall'
- 'Mike in Space'
- 'Mike in Stadium'
- 'RoboSoft 5'
- 'RoboSoft 4'
- 'RoboSoft 1'
- 'RoboSoft 6'
- 'RoboSoft 3'
- 'RoboSoft 2'
- 'Sam')
- end
- object DoneBtn: TButton
- Left = 414
- Top = 333
- Width = 64
- Height = 19
- Caption = 'Done'
- TabOrder = 6
- OnClick = DoneBtnClick
- end
- object TextToSpeech1: TTextToSpeech
- Left = 156
- Top = 42
- Width = 34
- Height = 25
- TabOrder = 7
- ControlData = {020200008403000095020000}
- end
- object BrowseBtn: TButton
- Left = 392
- Top = 38
- Width = 49
- Height = 20
- Caption = 'Browse'
- TabOrder = 8
- OnClick = BrowseBtnClick
- end
- object AgentSel: TEdit
- Left = 210
- Top = 37
- Width = 177
- Height = 21
- Hint = 'Select the character to be used'
- ParentShowHint = False
- ReadOnly = True
- ShowHint = True
- TabOrder = 9
- end
- object AgentSizeBar: TTrackBar
- Left = 313
- Top = 216
- Width = 150
- Height = 21
- Hint = 'Select the size of the character'
- Max = 20
- Min = 1
- Orientation = trHorizontal
- ParentShowHint = False
- PageSize = 1
- Frequency = 1
- Position = 10
- SelEnd = 0
- SelStart = 0
- ShowHint = True
- TabOrder = 10
- ThumbLength = 15
- TickMarks = tmTopLeft
- TickStyle = tsNone
- OnChange = AgentSizeBarChange
- end
- object AgentPosition: TRadioGroup
- Left = 170
- Top = 192
- Width = 126
- Height = 113
- Caption = 'Screen Start Position'
- ItemIndex = 0
- Items.Strings = (
- 'Upper Left'
- 'Upper Right'
- 'Lower Left'
- 'Lower Right'
- 'Random'
- 'Center')
- TabOrder = 11
- end
- object PropBtn: TButton
- Left = 23
- Top = 289
- Width = 127
- Height = 22
- Caption = 'Character Properties'
- TabOrder = 12
- OnClick = PropBtnClick
- end
- object SpCtlBtn: TButton
- Left = 23
- Top = 312
- Width = 127
- Height = 22
- Caption = 'Speech Control Panel'
- TabOrder = 13
- OnClick = SpCtlBtnClick
- end
- object MessBalloons: TCheckBox
- Left = 309
- Top = 245
- Width = 162
- Height = 17
- Caption = 'Show Text in Balloons'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 14
- end
- object SFX: TCheckBox
- Left = 309
- Top = 266
- Width = 155
- Height = 17
- Caption = 'Character Sound Effects On'
- TabOrder = 15
- end
- object CharSelect: TRadioGroup
- Left = 14
- Top = 34
- Width = 150
- Height = 251
- Caption = 'Select Character For'
- ItemIndex = 0
- Items.Strings = (
- 'Main'
- 'Time'
- 'Email'
- 'News'
- 'Weather'
- 'Reminders'
- 'Stocks'
- 'Jokes'
- 'Thoughts'
- 'Feel Good Messages'
- 'Send Instant Messages')
- TabOrder = 16
- OnClick = CharSelectClick
- end
- object AgentHideCk: TCheckBox
- Left = 245
- Top = 307
- Width = 114
- Height = 17
- Caption = 'Hide When Idle for'
- TabOrder = 17
- end
- object HideSecs: TSpinEdit
- Left = 361
- Top = 300
- Width = 48
- Height = 26
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -15
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxValue = 300
- MinValue = 1
- ParentFont = False
- TabOrder = 18
- Value = 5
- end
- object MultiCharCk: TCheckBox
- Left = 15
- Top = 12
- Width = 145
- Height = 17
- Caption = 'Use Multiple Characters'
- TabOrder = 19
- OnClick = MultiCharCkClick
- end
- object TTshelp: TButton
- Left = 349
- Top = 334
- Width = 59
- Height = 19
- Caption = 'Help'
- TabOrder = 20
- OnClick = TTshelpClick
- end
- object MediaPlayer1: TMediaPlayer
- Left = 450
- Top = 16
- Width = 29
- Height = 30
- ColoredButtons = []
- VisibleButtons = [btEject]
- AutoOpen = True
- DeviceType = dtSequencer
- Visible = False
- TabOrder = 21
- OnNotify = MediaPlayer1Notify
- end
- object SpeechRecBtn: TButton
- Left = 23
- Top = 335
- Width = 127
- Height = 22
- Caption = 'Speech Recognition'
- TabOrder = 22
- end
- object BackMusicVol: TTrackBar
- Left = 253
- Top = 336
- Width = 73
- Height = 17
- Max = 50000
- Min = 1
- Orientation = trHorizontal
- PageSize = 1
- Frequency = 1
- Position = 25000
- SelEnd = 0
- SelStart = 0
- TabOrder = 23
- ThumbLength = 15
- TickMarks = tmBoth
- TickStyle = tsNone
- OnChange = BackMusicVolChange
- end
- object AnimationList: TListBox
- Left = 339
- Top = 110
- Width = 136
- Height = 79
- Hint = 'Double click animation to try'
- Color = 8454143
- ItemHeight = 13
- ParentShowHint = False
- ShowHint = True
- Sorted = True
- TabOrder = 24
- OnDblClick = AnimationListDblClick
- end
- object OpenDialog1: TOpenDialog
- Left = 127
- Top = 73
- end
- end
-