|
|
|
|
|
|
|
|
dofile(box:get_config("${Path_Data}") .. "/plugins/stimulation/lua-stimulator-stim-codes.lua")
|
|
|
dofile(box:get_config("${Path_Data}") .. "/plugins/stimulation/lua-stimulator-stim-codes.lua")
|
|
|
|
|
|
|
|
|
math.randomseed(os.time())
|
|
|
math.randomseed(os.time())
|
|
|
row_base = _G[box:get_setting(2)]
|
|
|
|
|
|
col_base = _G[box:get_setting(3)]
|
|
|
|
|
|
delay = box:get_setting(4)
|
|
|
|
|
|
if box:get_setting(5) == 'true' then
|
|
|
|
|
|
|
|
|
row_base = _G[box:get_setting(2)]
|
|
|
|
|
|
col_base = _G[box:get_setting(3)]
|
|
|
|
|
|
n_tactilos = box:get_setting(4)
|
|
|
|
|
|
delay = box:get_setting(5)
|
|
|
|
|
|
if box:get_setting(6) == 'true' then
|
|
|
free_spelling = true
|
|
|
free_spelling = true
|
|
|
else
|
|
|
else
|
|
|
free_spelling = false
|
|
|
free_spelling = false
|
|
|
|
|
|
|
|
|
if stimulation_id == OVTK_StimulationId_RestStart then
|
|
|
if stimulation_id == OVTK_StimulationId_RestStart then
|
|
|
|
|
|
|
|
|
-- triggers the target
|
|
|
-- triggers the target
|
|
|
box:send_stimulation(1, row_base+math.random(1,6)-1, t+delay, 0)
|
|
|
|
|
|
|
|
|
box:send_stimulation(1, row_base+math.random(1,n_tactilos)-1, t+delay, 0)
|
|
|
box:send_stimulation(1, col_base, t+delay, 0)
|
|
|
box:send_stimulation(1, col_base, t+delay, 0)
|
|
|
|
|
|
|
|
|
elseif stimulation_id == OVTK_StimulationId_ExperimentStop then
|
|
|
elseif stimulation_id == OVTK_StimulationId_ExperimentStop then
|