brmlab/ratbox
4
0
Fork 0
mirror of https://github.com/brmlab/ratbox.git synced 2025-06-08 18:04:05 +02:00
Code Issues Projects Releases Packages Wiki Activity

Podpora pro nahravani skriptu

Browse source
This commit is contained in:
Petr Baudis 2012-09-25 03:38:19 +02:00
parent 57c0ea70d9
commit 6ff4c2d562
2 changed files with 207 additions and 188 deletions
Download patch file Download diff file Expand all files Collapse all files

14
.src/FMain.class
View file

@ -14,6 +14,7 @@ Public konfigurace_experiment_cas_zhasnuteho_stimulu As Integer
Public konfigurace_experiment_cas_piti As Integer Public konfigurace_experiment_cas_piti As Integer
Public konfigurace_experiment_cas_dalsi_ciklus As Integer Public konfigurace_experiment_cas_dalsi_ciklus As Integer
Public konfigurace_experiment_nahoda As Boolean Public konfigurace_experiment_nahoda As Boolean
Public konfigurace_experiment_skript As New String[]
Public konfigurace_experiment_neopakovat As Boolean Public konfigurace_experiment_neopakovat As Boolean
Public konfigurace_experiment_vypni_stimul As Boolean Public konfigurace_experiment_vypni_stimul As Boolean
Public konfigurace_experiment_vypni_stimul_pauza_enable As Boolean Public konfigurace_experiment_vypni_stimul_pauza_enable As Boolean
@ -1154,6 +1155,15 @@ Dim arr_strings As String[]
SysLogWrite("PARAMETRY_OBNOVENY") SysLogWrite("PARAMETRY_OBNOVENY")
End End
Public Sub BtnNahrajSkript_Click()
SysLogWrite("NAHRANI_SKRIPTU")
konfigurace_experiment_skript = Split(File.LOAD("/ratbox/skripty/" & TxtSkriptNazev.Text), "\n")
'konfigurace_experiment_skript contains one extra element at the end because the last line is terminated by a newline character
konfigurace_pocet_cyklu = konfigurace_experiment_skript.Length - 1
TxtPocetCiklu.Text = Str(konfigurace_pocet_cyklu)
SysLogWrite("SKRIPT_NAHRAN")
End
Public Sub TmrCasovac_Timer() Public Sub TmrCasovac_Timer()
buffer_casovac = buffer_casovac + 1 buffer_casovac = buffer_casovac + 1
TxtInfoCasovac.text = Str(buffer_casovac) TxtInfoCasovac.text = Str(buffer_casovac)
@ -1337,7 +1347,9 @@ Dim exp_souhrn_odpoved As Integer
TimerExperimentMils.Enabled = True TimerExperimentMils.Enabled = True
exp_genstim: exp_genstim:
ExpLogWrite("CYKLUS" & ";" & tmp_cyklus & ";" & "NULL" & ";" & "NaN") ExpLogWrite("CYKLUS" & ";" & tmp_cyklus & ";" & "NULL" & ";" & "NaN")
If konfigurace_experiment_nahoda = True Then If konfigurace_experiment_skript.Length > 0 Then
tmp_stimul_idx = CInt(Val(konfigurace_experiment_skript[tmp_cyklus]))
Else If konfigurace_experiment_nahoda = True Then
tmp_stimul_idx = Rnd(1, 7) tmp_stimul_idx = Rnd(1, 7)
'ExpLogWrite("NAHODNY_STIMUL" & ";" & tmp_stimul_idx & ";" & "NULL" & ";" & "NaN") 'ExpLogWrite("NAHODNY_STIMUL" & ";" & tmp_stimul_idx & ";" & "NULL" & ";" & "NaN")
Else Else

381
.src/FMain.form
View file

@ -1,752 +1,759 @@
# Gambas Form File 3.0 # Gambas Form File 3.0
{ Form Form
{ Form Form
Move(0,0,1400,798) Move(0,0,1400,798)
#Scaled = False #Scaled = False
Border = False Border = False
FullScreen = True FullScreen = True
{ BtnKonec Button { BtnKonec Button
Move(1162,7,70,21) Move(1162,7,70,21)
Text = ("KONEC") Text = ("KONEC")
} }
{ TxtSysTime TextBox { TxtSysTime TextBox
Move(1015,7,140,21) Move(1015,7,140,21)
Alignment = Align.Center Alignment = Align.Center
} }
{ TimerSystime #Timer { TimerSystime #Timer
#MoveScaled(0,0)
Enabled = True Enabled = True
Delay = 250 Delay = 250
} }
{ TxtSysLog TextArea { TxtSysLog TextArea
Move(14,49,679,112) Move(14,49,679,112)
ReadOnly = True ReadOnly = True
Wrap = True Wrap = True
ScrollBar = Scroll.Vertical ScrollBar = Scroll.Vertical
} }
{ TxtWDT TextBox { TxtWDT TextBox
Move(959,7,49,21) Move(959,7,49,21)
Enabled = False Enabled = False
Text = ("WDT") Text = ("WDT")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPre Label { LabelPre Label
Move(35,182,77,35) Move(35,182,77,35)
ToolTip = ("Otevreni dvirek") ToolTip = ("Otevreni dvirek")
Text = ("OTEVRENI\nDVERI") Text = ("OTEVRENI\nDVERI")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPre2 Label { LabelPre2 Label
Move(196,175,63,63) Move(196,175,63,63)
ToolTip = ("Ceka se az potkan zacumakuje") ToolTip = ("Ceka se az potkan zacumakuje")
Text = ("CEKANI\nAKCE\nPOTKAN") Text = ("CEKANI\nAKCE\nPOTKAN")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPreFrm2 Label { LabelPreFrm2 Label
Move(266,196,70,14) Move(266,196,70,14)
Text = ("------------>") Text = ("------------>")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPre3 Label { LabelPre3 Label
Move(343,175,84,63) Move(343,175,84,63)
ToolTip = ("Pitko se nastavi do pozice zacumakovani") ToolTip = ("Pitko se nastavi do pozice zacumakovani")
Text = ("NASTAVENI\nPITKA") Text = ("NASTAVENI\nPITKA")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPreFrm3 Label { LabelPreFrm3 Label
Move(602,231,28,63) Move(602,231,28,63)
Text = (" |\n |\n |\n") Text = (" |\n |\n |\n")
Alignment = Align.Center Alignment = Align.Center
} }
{ TxtPreCasPiti TextBox { TxtPreCasPiti TextBox
Move(574,189,70,28) Move(574,189,70,28)
Text = ("10") Text = ("10")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label1 Label { Label1 Label
Move(511,189,56,28) Move(511,189,56,28)
Text = ("Cas piti") Text = ("Cas piti")
} }
{ Label2 Label { Label2 Label
Move(658,189,28,28) Move(658,189,28,28)
Text = ("sec") Text = ("sec")
} }
{ LabelPreFrm5 Label { LabelPreFrm5 Label
Move(441,301,189,14) Move(441,301,189,14)
Text = ("<-----------------------------------------\n") Text = ("<-----------------------------------------\n")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPreFrm1 Label { LabelPreFrm1 Label
Move(119,196,70,14) Move(119,196,70,14)
Text = ("------------>") Text = ("------------>")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPreFrm7 Label { LabelPreFrm7 Label
Move(434,196,70,14) Move(434,196,70,14)
Text = ("------------>") Text = ("------------>")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPre5 Label { LabelPre5 Label
Move(371,294,63,35) Move(371,294,63,35)
ToolTip = ("Nastaveni pitek do vychozich pozic") ToolTip = ("Nastaveni pitek do vychozich pozic")
Text = ("RESET") Text = ("RESET")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPreFrm6 Label { LabelPreFrm6 Label
Move(63,224,28,42) Move(63,224,28,42)
Text = ("|\n|\n") Text = ("|\n|\n")
Alignment = Align.Center Alignment = Align.Center
} }
{ ChkPreNeopakovat CheckBox { ChkPreNeopakovat CheckBox
Move(168,238,119,28) Move(168,238,119,28)
ToolTip = ("Zakaze opakovani stejnych pitek 2x po sobe") ToolTip = ("Zakaze opakovani stejnych pitek 2x po sobe")
Text = ("NEOPAKOVAT") Text = ("NEOPAKOVAT")
} }
{ BtnPreStart Button { BtnPreStart Button
Move(910,315,70,21) Move(910,315,70,21)
Text = ("START") Text = ("START")
} }
{ BtnPreStop Button { BtnPreStop Button
Move(994,315,70,21) Move(994,315,70,21)
Text = ("STOP") Text = ("STOP")
} }
{ BtnSZ1 Button { BtnSZ1 Button
Move(812,154,28,21) Move(812,154,28,21)
ToolTip = ("Simuluje zacumakovani potkana") ToolTip = ("Simuluje zacumakovani potkana")
Text = ("S1") Text = ("S1")
} }
{ BtnSZ2 Button { BtnSZ2 Button
Move(812,182,28,21) Move(812,182,28,21)
ToolTip = ("Simuluje zacumakovani potkana") ToolTip = ("Simuluje zacumakovani potkana")
Text = ("S2") Text = ("S2")
} }
{ BtnSZ3 Button { BtnSZ3 Button
Move(812,210,28,21) Move(812,210,28,21)
ToolTip = ("Simuluje zacumakovani potkana") ToolTip = ("Simuluje zacumakovani potkana")
Text = ("S3") Text = ("S3")
} }
{ BtnSZ4 Button { BtnSZ4 Button
Move(847,154,28,21) Move(847,154,28,21)
ToolTip = ("Simuluje zacumakovani potkana") ToolTip = ("Simuluje zacumakovani potkana")
Text = ("S4") Text = ("S4")
} }
{ BtnSZ5 Button { BtnSZ5 Button
Move(847,182,28,21) Move(847,182,28,21)
ToolTip = ("Simuluje zacumakovani potkana") ToolTip = ("Simuluje zacumakovani potkana")
Text = ("S5") Text = ("S5")
} }
{ BtnSZ6 Button { BtnSZ6 Button
Move(847,210,28,21) Move(847,210,28,21)
ToolTip = ("Simuluje zacumakovani potkana") ToolTip = ("Simuluje zacumakovani potkana")
Text = ("S6") Text = ("S6")
} }
{ TxtPocetCiklu TextBox { TxtPocetCiklu TextBox
Move(714,287,84,21) Move(714,287,84,21)
Text = ("10") Text = ("10")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label5 Label { Label5 Label
Move(714,245,84,21) Move(714,245,84,21)
Text = ("Pocet cyklu:") Text = ("Pocet cyklu:")
Alignment = Align.Center Alignment = Align.Center
} }
{ TxtInfoCasovac TextBox { TxtInfoCasovac TextBox
Move(385,7,70,21) Move(385,7,70,21)
Text = ("0") Text = ("0")
Alignment = Align.Center Alignment = Align.Center
ReadOnly = True ReadOnly = True
} }
{ Label6 Label { Label6 Label
Move(315,7,63,21) Move(315,7,63,21)
Text = ("Casovac") Text = ("Casovac")
Alignment = Align.Center Alignment = Align.Center
} }
{ TxtPrePauza TextBox { TxtPrePauza TextBox
Move(35,301,84,21) Move(35,301,84,21)
Text = ("10") Text = ("10")
Alignment = Align.Center Alignment = Align.Center
} }
{ ChkPrePauza CheckBox { ChkPrePauza CheckBox
Move(35,273,105,21) Move(35,273,105,21)
ToolTip = ("Zapne pauzu mezi visualni stimulaci\na experimentem.\nZa jakou dobu se zacne smicka\nod zobrazeni stimulacniho obrazce") ToolTip = ("Zapne pauzu mezi visualni stimulaci\na experimentem.\nZa jakou dobu se zacne smicka\nod zobrazeni stimulacniho obrazce")
Text = ("Pauza:") Text = ("Pauza:")
} }
{ Label7 Label { Label7 Label
Move(126,301,28,21) Move(126,301,28,21)
Text = ("sec") Text = ("sec")
} }
{ ExperimentPicture PictureBox { ExperimentPicture PictureBox
Move(14,434,161,126) Move(14,434,161,126)
Background = &H0000FF& Background = &H0000FF&
Stretch = True Stretch = True
Alignment = Align.Center Alignment = Align.Center
} }
{ ExperimentTxtTime0 TextBox { ExperimentTxtTime0 TextBox
Move(217,448,63,21) Move(217,448,63,21)
Text = ("10000") Text = ("10000")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label8 Label { Label8 Label
Move(182,441,35,28) Move(182,441,35,28)
Text = ("--->") Text = ("--->")
Alignment = Align.Center Alignment = Align.Center
} }
{ ChkZhasniStimul CheckBox { ChkZhasniStimul CheckBox
Move(357,434,70,42) Move(357,434,70,42)
Text = ("Vypni\nstimul") Text = ("Vypni\nstimul")
} }
{ Label9 Label { Label9 Label
Move(315,448,35,14) Move(315,448,35,14)
Text = ("--->") Text = ("--->")
Alignment = Align.Center Alignment = Align.Center
} }
{ ExperimentTxtTime1 TextBox { ExperimentTxtTime1 TextBox
Move(476,448,63,21) Move(476,448,63,21)
Text = ("10000") Text = ("10000")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label10 Label { Label10 Label
Move(434,441,28,28) Move(434,441,28,28)
Text = ("--->") Text = ("--->")
} }
{ ChkVypStimulPauza CheckBox { ChkVypStimulPauza CheckBox
Move(469,427,98,14) Move(469,427,98,14)
Text = ("ZAPNUTO") Text = ("ZAPNUTO")
} }
{ Label12 Label { Label12 Label
Move(210,483,112,56) Move(210,483,112,56)
Text = ("CAS\nZOBRAZENI\nSTIMULU") Text = ("CAS\nZOBRAZENI\nSTIMULU")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label13 Label { Label13 Label
Move(476,483,84,56) Move(476,483,84,56)
Text = ("CAS\nBEZ\nSTIMULU") Text = ("CAS\nBEZ\nSTIMULU")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPre6 Label { LabelPre6 Label
Move(602,441,77,35) Move(602,441,77,35)
ToolTip = ("Otevreni dvirek") ToolTip = ("Otevreni dvirek")
Text = ("OTEVRENI\nDVERI") Text = ("OTEVRENI\nDVERI")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label11 Label { Label11 Label
Move(574,448,28,28) Move(574,448,28,28)
Text = ("--->") Text = ("--->")
} }
{ TxtTimeout TextBox { TxtTimeout TextBox
Move(819,287,77,21) Move(819,287,77,21)
Text = ("30") Text = ("30")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label14 Label { Label14 Label
Move(798,245,112,21) Move(798,245,112,21)
Text = ("Cas na reakci:") Text = ("Cas na reakci:")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPre7 Label { LabelPre7 Label
Move(714,427,63,63) Move(714,427,63,63)
ToolTip = ("Ceka se az potkan zacumakuje") ToolTip = ("Ceka se az potkan zacumakuje")
Text = ("CEKANI\nAKCE\nPOTKAN") Text = ("CEKANI\nAKCE\nPOTKAN")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label15 Label { Label15 Label
Move(679,448,28,28) Move(679,448,28,28)
Text = ("--->") Text = ("--->")
} }
{ Label16 Label { Label16 Label
Move(882,448,133,21) Move(882,448,133,21)
Text = ("-----------------------------------------------") Text = ("-----------------------------------------------")
} }
{ LabelPreFrm11 Label { LabelPreFrm11 Label
Move(994,469,28,21) Move(994,469,28,21)
Text = (" |\n") Text = (" |\n")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPreFrm12 Label { LabelPreFrm12 Label
Move(875,469,28,21) Move(875,469,28,21)
Text = (" |\n") Text = (" |\n")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPreFrm13 Label { LabelPreFrm13 Label
Move(938,469,28,21) Move(938,469,28,21)
Text = (" |\n") Text = (" |\n")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label17 Label { Label17 Label
Move(868,497,42,21) Move(868,497,42,21)
Text = ("OK") Text = ("OK")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label18 Label { Label18 Label
Move(938,497,35,21) Move(938,497,35,21)
Text = ("KO") Text = ("KO")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label19 Label { Label19 Label
Move(973,497,70,21) Move(973,497,70,21)
Text = ("TIMEOUT") Text = ("TIMEOUT")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label20 Label { Label20 Label
Move(511,651,70,21) Move(511,651,70,21)
Text = ("RESET") Text = ("RESET")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPreFrm14 Label { LabelPreFrm14 Label
Move(994,525,28,140) Move(994,525,28,140)
Text = ("|\n|\n|\n|\n|\n|\n|\n|\n") Text = ("|\n|\n|\n|\n|\n|\n|\n|\n")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label21 Label { Label21 Label
Move(749,651,259,14) Move(749,651,259,14)
Text = ("-------------------------------------------------------------------------------------------------") Text = ("-------------------------------------------------------------------------------------------------")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPreFrm15 Label { LabelPreFrm15 Label
Move(945,518,28,140) Move(945,518,28,140)
Text = ("|\n|\n|\n|\n|\n|\n|") Text = ("|\n|\n|\n|\n|\n|\n|")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label22 Label { Label22 Label
Move(161,651,336,21) Move(161,651,336,21)
Text = ("----------------------------------------------------------------------------------------------------------") Text = ("----------------------------------------------------------------------------------------------------------")
Alignment = Align.Center Alignment = Align.Center
} }
{ ExperimentTxtTime2 TextBox { ExperimentTxtTime2 TextBox
Move(42,602,84,21) Move(42,602,84,21)
Text = ("10000") Text = ("10000")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPre8 Label { LabelPre8 Label
Move(847,553,84,35) Move(847,553,84,35)
ToolTip = ("Pitko se nastavi do pozice zacumakovani") ToolTip = ("Pitko se nastavi do pozice zacumakovani")
Text = ("NASTAVENI\nPITKA") Text = ("NASTAVENI\nPITKA")
Alignment = Align.Center Alignment = Align.Center
} }
{ LabelPreFrm17 Label { LabelPreFrm17 Label
Move(875,525,28,21) Move(875,525,28,21)
Text = (" |\n") Text = (" |\n")
Alignment = Align.Center Alignment = Align.Center
} }
{ ExperimentTxtTime3 TextBox { ExperimentTxtTime3 TextBox
Move(840,595,70,21) Move(840,595,70,21)
Text = ("10000") Text = ("10000")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label23 Label { Label23 Label
Move(126,378,63,49) Move(144,368,63,49)
Font = Font["Bold,+2"] Font = Font["Bold,+2"]
Text = ("0") Text = ("0")
Alignment = Align.Center Alignment = Align.Center
} }
{ TmrCasovac #Timer { TmrCasovac #Timer
#MoveScaled(1,1) #Move(8,8)
} }
{ TxtInfoTimeout TextBox { TxtInfoTimeout TextBox
Move(532,7,70,21) Move(532,7,70,21)
Text = ("0") Text = ("0")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label24 Label { Label24 Label
Move(469,7,56,21) Move(469,7,56,21)
Text = ("Timeout") Text = ("Timeout")
} }
{ TxtCommPort TextBox { TxtCommPort TextBox
Move(14,7,140,21) Move(14,7,140,21)
Text = ("/dev/ttyUSB0") Text = ("/dev/ttyUSB0")
} }
{ BtnPripoj Button { BtnPripoj Button
Move(161,7,147,21) Move(161,7,147,21)
Text = ("Pripoj / Odpoj") Text = ("Pripoj / Odpoj")
} }
{ SerialPort1 #SerialPort { SerialPort1 #SerialPort
#MoveScaled(2,2) #Move(16,16)
} }
{ Separator1 Separator { Separator1 Separator
Move(14,35,1218,7) Move(14,35,1218,7)
Foreground = &H000000& Foreground = &H000000&
} }
{ Separator2 Separator { Separator2 Separator
Move(7,357,1218,21) Move(8,344,1218,21)
} }
{ Separator3 Separator { Separator3 Separator
Move(700,49,7,301) Move(700,49,7,301)
} }
{ CheckBox2 CheckBox { CheckBox2 CheckBox
Move(770,7,21,21) Move(770,7,21,21)
Text = ("CheckBox2") Text = ("CheckBox2")
} }
{ CheckBox3 CheckBox { CheckBox3 CheckBox
Move(798,7,21,21) Move(798,7,21,21)
Text = ("CheckBox3") Text = ("CheckBox3")
} }
{ CheckBox4 CheckBox { CheckBox4 CheckBox
Move(826,7,21,21) Move(826,7,21,21)
Text = ("CheckBox4") Text = ("CheckBox4")
} }
{ CheckBox5 CheckBox { CheckBox5 CheckBox
Move(854,7,21,21) Move(854,7,21,21)
Text = ("CheckBox5") Text = ("CheckBox5")
} }
{ CheckBox6 CheckBox { CheckBox6 CheckBox
Move(882,7,21,21) Move(882,7,21,21)
Text = ("CheckBox6") Text = ("CheckBox6")
} }
{ CheckBox7 CheckBox { CheckBox7 CheckBox
Move(910,7,21,21) Move(910,7,21,21)
Text = ("CheckBox7") Text = ("CheckBox7")
} }
{ Label25 Label { Label25 Label
Move(42,630,105,56) Move(42,630,105,56)
Text = ("PAUZA\nMEZI\nZOBRAZENIMI") Text = ("PAUZA\nMEZI\nZOBRAZENIMI")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label26 Label { Label26 Label
Move(1043,462,35,21) Move(1043,462,35,21)
Text = ("1") Text = ("1")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label27 Label { Label27 Label
Move(1043,497,35,21) Move(1043,497,35,21)
Text = ("2") Text = ("2")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label28 Label { Label28 Label
Move(1043,532,35,21) Move(1043,532,35,21)
Text = ("3") Text = ("3")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label29 Label { Label29 Label
Move(1043,567,35,21) Move(1043,567,35,21)
Text = ("4") Text = ("4")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label30 Label { Label30 Label
Move(1043,602,35,21) Move(1043,602,35,21)
Text = ("5") Text = ("5")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label31 Label { Label31 Label
Move(1043,637,35,21) Move(1043,637,35,21)
Text = ("6") Text = ("6")
Alignment = Align.Center Alignment = Align.Center
} }
{ ExpTxtS1Time TextBox { ExpTxtS1Time TextBox
Move(1078,462,70,21) Move(1078,462,70,21)
Text = ("10000") Text = ("10000")
Alignment = Align.Center Alignment = Align.Center
} }
{ ExpTxtS2Time TextBox { ExpTxtS2Time TextBox
Move(1078,497,70,21) Move(1078,497,70,21)
Text = ("10000") Text = ("10000")
Alignment = Align.Center Alignment = Align.Center
} }
{ ExpTxtS3Time TextBox { ExpTxtS3Time TextBox
Move(1078,532,70,21) Move(1078,532,70,21)
Text = ("10000") Text = ("10000")
Alignment = Align.Center Alignment = Align.Center
} }
{ ExpTxtS4Time TextBox { ExpTxtS4Time TextBox
Move(1078,567,70,21) Move(1078,567,70,21)
Text = ("10000") Text = ("10000")
Alignment = Align.Center Alignment = Align.Center
} }
{ ExpTxtS5Time TextBox { ExpTxtS5Time TextBox
Move(1078,602,70,21) Move(1078,602,70,21)
Text = ("10000") Text = ("10000")
Alignment = Align.Center Alignment = Align.Center
} }
{ ExpTxtS6Time TextBox { ExpTxtS6Time TextBox
Move(1078,637,70,21) Move(1078,637,70,21)
Text = ("10000") Text = ("10000")
Alignment = Align.Center Alignment = Align.Center
} }
{ ExpChkSTime CheckBox { ExpChkSTime CheckBox
Move(1190,462,56,28) Move(1190,462,56,28)
Text = ("ZAP") Text = ("ZAP")
Value = CheckBox.True Value = CheckBox.True
} }
{ ExpChkEnableTiming CheckBox { ExpChkEnableTiming CheckBox
Move(1085,427,147,21) Move(1085,427,147,21)
Text = ("Zapnout Casovani") Text = ("Zapnout Casovani")
} }
{ ExpChkSTime2 CheckBox { ExpChkSTime2 CheckBox
Move(1190,497,56,28) Move(1190,497,56,28)
Text = ("ZAP") Text = ("ZAP")
Value = CheckBox.True Value = CheckBox.True
} }
{ ExpChkSTime3 CheckBox { ExpChkSTime3 CheckBox
Move(1190,532,56,28) Move(1190,532,56,28)
Text = ("ZAP") Text = ("ZAP")
Value = CheckBox.True Value = CheckBox.True
} }
{ ExpChkSTime4 CheckBox { ExpChkSTime4 CheckBox
Move(1190,567,56,28) Move(1190,567,56,28)
Text = ("ZAP") Text = ("ZAP")
Value = CheckBox.True Value = CheckBox.True
} }
{ ExpChkSTime5 CheckBox { ExpChkSTime5 CheckBox
Move(1190,602,56,28) Move(1190,602,56,28)
Text = ("ZAP") Text = ("ZAP")
Value = CheckBox.True Value = CheckBox.True
} }
{ ExpChkSTime6 CheckBox { ExpChkSTime6 CheckBox
Move(1190,637,56,28) Move(1190,637,56,28)
Text = ("ZAP") Text = ("ZAP")
Value = CheckBox.True Value = CheckBox.True
} }
{ ChkExpNahoda CheckBox { ChkExpNahoda CheckBox
Move(14,406,98,21) Move(16,392,98,21)
Text = ("NAHODNE") Text = ("NAHODNE")
} }
{ ChkExpNeopakovat CheckBox { ChkExpNeopakovat CheckBox
Move(14,378,119,21) Move(16,368,128,24)
Text = ("NEOPAKOVAT") Text = ("NEOPAKOVAT")
} }
{ BtnOpenDor Button { BtnOpenDor Button
Move(714,98,35,21) Move(714,98,35,21)
Text = ("OD") Text = ("OD")
} }
{ BtnCloseDor Button { BtnCloseDor Button
Move(763,98,35,21) Move(763,98,35,21)
Text = ("CD") Text = ("CD")
} }
{ BtnReset Button { BtnReset Button
Move(714,210,84,21) Move(714,210,84,21)
Text = ("RESET") Text = ("RESET")
} }
{ BtnPitS Button { BtnPitS Button
Move(714,126,35,21) Move(714,126,35,21)
Text = ("S1") Text = ("S1")
} }
{ BtnPitS2 Button { BtnPitS2 Button
Move(714,154,35,21) Move(714,154,35,21)
Text = ("S2") Text = ("S2")
} }
{ BtnPitS3 Button { BtnPitS3 Button
Move(714,182,35,21) Move(714,182,35,21)
Text = ("S3") Text = ("S3")
} }
{ BtnPitS4 Button { BtnPitS4 Button
Move(763,126,35,21) Move(763,126,35,21)
Text = ("S4") Text = ("S4")
} }
{ BtnPitS5 Button { BtnPitS5 Button
Move(763,154,35,21) Move(763,154,35,21)
Text = ("S5") Text = ("S5")
} }
{ BtnPitS6 Button { BtnPitS6 Button
Move(763,182,35,21) Move(763,182,35,21)
Text = ("S6") Text = ("S6")
} }
{ Label32 Label { Label32 Label
Move(728,49,140,42) Move(728,49,140,42)
Text = ("Manu\xC3\xA1ln\xC3\xAD ovl\xC3\xA1d\xC3\xA1n\xC3\xAD\naparatury") Text = ("Manuální ovládání\naparatury")
Alignment = Align.Center Alignment = Align.Center
} }
{ Separator4 Separator { Separator4 Separator
Move(707,238,189,7) Move(707,238,189,7)
} }
{ BtnExpFull Button { BtnExpFull Button
Move(14,567,161,21) Move(14,567,161,21)
Text = ("FULLSCREEN") Text = ("FULLSCREEN")
} }
{ LabelPreFrm4 Label { LabelPreFrm4 Label
Move(168,301,189,14) Move(168,301,189,14)
Text = ("<-----------------------------------------\n") Text = ("<-----------------------------------------\n")
Alignment = Align.Center Alignment = Align.Center
} }
{ Separator5 Separator { Separator5 Separator
Move(805,98,7,140) Move(805,98,7,140)
} }
{ Label3 Label { Label3 Label
Move(812,98,70,14) Move(812,98,70,14)
Text = ("SIMULACE") Text = ("SIMULACE")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label4 Label { Label4 Label
Move(812,112,70,14) Move(812,112,70,14)
Text = ("AKCE") Text = ("AKCE")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label35 Label { Label35 Label
Move(812,126,70,21) Move(812,126,70,21)
Text = ("POTKANA") Text = ("POTKANA")
Alignment = Align.Center Alignment = Align.Center
} }
{ ChkTimeout CheckBox { ChkTimeout CheckBox
Move(812,266,91,14) Move(812,266,91,14)
Text = ("ZAPNUTO") Text = ("ZAPNUTO")
Value = CheckBox.True Value = CheckBox.True
} }
{ TxtInfoCyklus TextBox { TxtInfoCyklus TextBox
Move(672,7,70,21) Move(672,7,70,21)
Text = ("0") Text = ("0")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label33 Label { Label33 Label
Move(609,7,56,21) Move(609,7,56,21)
Text = ("Cyklus") Text = ("Cyklus")
Alignment = Align.Center Alignment = Align.Center
} }
{ BtnMod Button { BtnMod Button
Move(910,287,154,21) Move(910,287,154,21)
Text = ("PreLearning") Text = ("PreLearning")
} }
{ BtnKonfUloz Button { BtnKonfUloz Button
Move(896,105,175,21) Move(896,105,175,21)
Text = ("ULOZ PARAMETRY") Text = ("ULOZ PARAMETRY")
} }
{ TxtKonfigNazev TextBox { TxtKonfigNazev TextBox
Move(896,77,175,21) Move(896,77,175,21)
} }
{ Label34 Label { Label34 Label
Move(896,49,175,21) Move(896,49,175,21)
Text = ("N\xC3\xA1zev konfigurace:") Text = ("Název konfigurace:")
Alignment = Align.Center Alignment = Align.Center
} }
{ BtnNahrajKonfiguraci Button { BtnNahrajKonfiguraci Button
Move(896,133,175,21) Move(896,133,175,21)
Text = ("NAHRAJ PARAMETRY") Text = ("NAHRAJ PARAMETRY")
} }
{ BtnNastav Button { BtnNastav Button
Move(714,315,182,21) Move(714,315,182,21)
Text = ("UPLATNI PARAMETRY") Text = ("UPLATNI PARAMETRY")
} }
{ TxtSessionID TextBox { TxtSessionID TextBox
Move(616,385,126,21) Move(736,392,126,21)
Text = ("SessionID") Text = ("SessionID")
} }
{ TxtExperimentID TextBox { TxtExperimentID TextBox
Move(392,385,112,21) Move(608,392,112,21)
Text = ("ExperimentID") Text = ("ExperimentID")
} }
{ TmrTimeout #Timer { TmrTimeout #Timer
#MoveScaled(3,3) #Move(24,24)
} }
{ ListBox1 ListBox { ListBox1 ListBox
Move(1085,49,147,259) Move(1085,49,147,259)
} }
{ Button1 Button { Button1 Button
Move(1085,315,147,21) Move(1085,315,147,21)
Text = ("OBNOV SEZNAM") Text = ("OBNOV SEZNAM")
} }
{ BtnSmazKonfiguraci Button { BtnSmazKonfiguraci Button
Move(896,161,175,21) Move(896,161,175,21)
Text = ("SMAZAT KONFIGURACI") Text = ("SMAZAT KONFIGURACI")
} }
{ Label36 Label { Label36 Label
Move(833,623,105,21) Move(833,623,105,21)
Text = ("PAUZA NA PITI") Text = ("PAUZA NA PITI")
Alignment = Align.Center Alignment = Align.Center
} }
{ TimerExperimentMils #Timer { TimerExperimentMils #Timer
#MoveScaled(4,4) #Move(32,32)
Delay = 10 Delay = 10
} }
{ PictureLogo1 PictureBox { PictureLogo1 PictureBox
Move(903,196,161,35) Move(903,196,161,35)
Stretch = True Stretch = True
} }
{ Label38 Label { Label38 Label
Move(910,238,161,42) Move(910,238,161,42)
Text = ("Tom\xC3\xA1\xC5\xA1 Suchan 2011\ntomsuch@tomsuch.net") Text = ("Tomáš Suchan 2011\ntomsuch@tomsuch.net")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label39 Label { Label39 Label
Move(518,385,91,21) Move(752,368,91,21)
Text = ("SESSION ID:") Text = ("SESSION:")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label40 Label { Label40 Label
Move(259,385,126,21) Move(600,368,126,21)
Text = ("EXPERIMENT ID:") Text = ("EXPERIMENT:")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label37 Label { Label37 Label
Move(749,385,91,21) Move(888,368,91,21)
Text = ("OBJECT ID:") Text = ("OBJECT:")
Alignment = Align.Center Alignment = Align.Center
} }
{ TxtOjectID TextBox { TxtOjectID TextBox
Move(847,385,126,21) Move(872,392,126,21)
Text = ("ObjectID") Text = ("ObjectID")
} }
{ TimerMilis #Timer { TimerMilis #Timer
#MoveScaled(5,5) #Move(40,40)
Delay = 10 Delay = 10
} }
{ Label41 Label { Label41 Label
Move(287,455,28,14) Move(287,455,28,14)
Text = ("ms") Text = ("ms")
} }
{ Label42 Label { Label42 Label
Move(546,455,28,14) Move(546,455,28,14)
Text = ("ms") Text = ("ms")
} }
{ Label43 Label { Label43 Label
Move(1155,574,28,14) Move(1155,574,28,14)
Text = ("ms") Text = ("ms")
} }
{ Label44 Label { Label44 Label
Move(1155,609,28,14) Move(1155,609,28,14)
Text = ("ms") Text = ("ms")
} }
{ Label45 Label { Label45 Label
Move(1155,539,28,14) Move(1155,539,28,14)
Text = ("ms") Text = ("ms")
} }
{ Label46 Label { Label46 Label
Move(1155,504,28,14) Move(1155,504,28,14)
Text = ("ms") Text = ("ms")
} }
{ Label47 Label { Label47 Label
Move(1155,469,28,14) Move(1155,469,28,14)
Text = ("ms") Text = ("ms")
} }
{ Label48 Label { Label48 Label
Move(1155,644,28,14) Move(1155,644,28,14)
Text = ("ms") Text = ("ms")
} }
{ Label49 Label { Label49 Label
Move(917,602,28,14) Move(917,602,28,14)
Text = ("ms") Text = ("ms")
} }
{ Label50 Label { Label50 Label
Move(133,609,35,14) Move(133,609,35,14)
Text = ("ms") Text = ("ms")
} }
{ TxtInfoCasovacMilis TextBox { TxtInfoCasovacMilis TextBox
Move(1106,385,84,21) Move(1106,385,84,21)
Text = ("0") Text = ("0")
Alignment = Align.Center Alignment = Align.Center
} }
{ Label51 Label { Label51 Label
Move(1197,392,28,14) Move(1197,392,28,14)
Text = ("ms") Text = ("ms")
} }
{ Label52 Label { Label52 Label
Move(1015,392,84,14) Move(1015,392,84,14)
Text = ("Casovac(ms):") Text = ("Casovac(ms):")
} }
{ ChkTimeoutOpakReset CheckBox { ChkTimeoutOpakReset CheckBox
Move(168,273,217,14) Move(168,273,217,14)
Text = ("TIMEOUT = RESET OPAKOVANI") Text = ("TIMEOUT = RESET OPAKOVANI")
} }
{ ChkZhasniStimulPreReset CheckBox { ChkZhasniStimulPreReset CheckBox
Move(672,637,70,42) Move(672,637,70,42)
Text = ("Vypni\nstimul") Text = ("Vypni\nstimul")
} }
{ Label53 Label { Label53 Label
Move(588,651,63,14) Move(588,651,63,14)
Text = ("-------------------------------------------------------------------------------------------------") Text = ("-------------------------------------------------------------------------------------------------")
Alignment = Align.Center Alignment = Align.Center
} }
{ ChkZhasniStimulPoAkci CheckBox { ChkZhasniStimulPoAkci CheckBox
Move(805,441,70,42) Move(805,441,70,42)
Text = ("Vypni\nstimul") Text = ("Vypni\nstimul")
} }
{ Label54 Label { Label54 Label
Move(770,448,28,28) Move(770,448,28,28)
Text = ("--->") Text = ("--->")
} }
} { TxtSkriptNazev TextBox
Move(216,368,175,21)
}
{ BtnNahrajSkript Button
Move(216,392,175,21)
Text = ("NAHRAJ SKRIPT")
}
}