1,658
edits
Changes
Jump to navigation
Jump to search
Line 224:
Line 224: + Line 271:
Line 272: − + − + − + Line 338:
Line 339: + + + − + − function ret = buttonbox(cmd,varargin)+ − % to initialize connection: (omit 2nd argument if defaults apply)+ − % define settings as structure with fields:+ − % bb.Device = 'COM2';+ − % bb.BaudRate = 115200;+ − % bb.DataBits = 8;+ − % bb.StopBits = 1;+ − % bb.Parity = 'none'; − % handle = buttonbox('open',bb) − − % to run: (receiving incoming data, check code for own purposes) − % buttonbox('run'); − % − % or − % − % to send a marker: (marker: a numeric value; Fs: sampling frequency device) − % buttonbox(marker,Fs) − % − % or − % − % to wait for a buttonpress: − % buttonbox('clear'); (make sure buttonbox buffer is emptied) − % key = buttonbox('wait_keypress') − % − % to close the connection: − % buttonbox('close'); − persistent old_hdl % keep handle to COM object persistent + − + − + − bb.BaudRate = 115200;+ − + − bb.StopBits = 1;+ − + + + + + + + + − if nargin < 1+ − cmd = 'open';+ − end+ − if nargin > 1 && isstruct(varargin{1})+ − % user overwrites default settings+ − flds = fields(varargin{1});+ − for n = 1 : numel(flds)+ − bb.(flds{n}) = varargin{1}.(flds{n});+ − end+ − end+ − if nargin==1 && isnumeric(cmd)+ − error('Please also specify acquisition sampling frequency of device that receives the marker');+ − end − if nargin > 1 && isnumeric(cmd) − marker = cmd; − cmd = 'marker'; − Fs = varargin{1}; − end − if ~any(strcmp(cmd,{'open','close'}))+ − if isempty(old_hdl)+ − help serial_buttonbox_common+ − error('Buttonbox not yet initialized');+ − end+ − handle = old_hdl; − end − switch cmd+ − case 'marker'+ − fwrite(handle, uint8(marker));%IOPort('Write', handle, uint8(marker), 1); % last argument: blocking+ − WaitSecs(2/Fs);+ − fwrite(handle, uint8(0));%IOPort('Write', handle, uint8(0), 0); % last argument: blocking+ − return − case 'clear' − while(handle.BytesAvailable) − fread(handle, 1); − end − ret = []; % meaningless − return − case 'open' − % get handle to serial device − handle = open_buttonbox(bb); − ret = handle; − return − case 'close' − if nargin > 1 − handle = varargin{1}; − else − handle = old_hdl; − end − fclose(handle); − delete(handle); − ret = []; − return − case 'run' − % read incoming data − % code proceeds below .... − case 'wait_keypress' − % start polling for characters (indicating start of scan) − while(1) − data = []; − while handle.BytesAvailable − navailable = handle.BytesAvailable; − % read incoming data − [newdata, cnt] = fread(handle, navailable); − % concatenate possible new data − if cnt − data = [data newdata(:)]; − end − end − if ~isempty(data) − ret = data; − return − end − end − otherwise − fprintf('Unknown option %s\n',cmd); − ret = []; − return − end − + − % only gets here when cmd = 'run' %+ − %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + − % Initialize output figure+ − win = list_output(' ',[]); − while 1 − % Exit if user closed output figure − if ~ishandle(win) − return − end − % start polling for characters (indicating start of scan) − navailable = handle.BytesAvailable; − if navailable − data = []; − while navailable − % read incoming data − [newdata, cnt] = fread(handle, navailable); − % concatenate possible new data − if cnt − data = [data newdata(:)]; − end − % check if any more data left − navailable = handle.BytesAvailable; − end − % output info about which button was pressed − for n = 1 : numel(data) − line = sprintf('incoming: %03d %s',data(n),char(data(n))); − list_output(line,win); − end − end − pause(0.01); − end %while 1 − + − − function hdl = open_buttonbox(device) − % open handle to serial device (mini buttonbox) WaitSecs(0.002); % just to load mex-file into memory − try − hdl = serial(device.Device, 'Baudrate', device.BaudRate, 'DataBits', device.DataBits, 'StopBits', device.StopBits, 'Parity', device.Parity); − fopen(hdl); − catch − if ~isempty(old_hdl) − fclose(old_hdl); − delete(old_hdl); − end − hdl = serial(device.Device, 'Baudrate', device.BaudRate, 'DataBits', device.DataBits, 'StopBits', device.StopBits, 'Parity', device.Parity); − fopen(hdl); − end − old_hdl = hdl; − fprintf('Wait for device buttonbox....\n'); − tic − while hdl.BytesAvailable && toc<10 − navailable = bbox.BytesAvailable; − % wait for welcome message device − fread(hdl, navailable); − end − pause(0.5); − end − − function win = list_output(line,win) − persistent ptr − persistent lines − persistent edt − Maxlines = 40; − if isempty(win) − % initialize listbox output figure − lines = cell(1,Maxlines); − [lines(1:end)]=deal({''}); − ptr=Maxlines; − lines(ptr) = {'Buttonbox output:'}; − idxs = mod(ptr:ptr+Maxlines-1,Maxlines)+1; − win = figure(); − % initialize figure to hold output text − edt = uicontrol('Parent',win,'Style','ListBox','HorizontalAlignment','left', ... − 'Max',Maxlines,'BackgroundColor',[1 1 1],'Visible','on','String',lines(idxs), ... − 'FontSize',12,'Value',Maxlines); − pos = get(win,'Position'); − set(edt,'Position',[1 1 pos(3) pos(4)]); − end − ptr = mod(ptr,Maxlines)+1; % start − lines{ptr} = line; − idxs = mod(ptr:ptr+Maxlines-1,Maxlines)+1; − set(edt,'String',lines(idxs),'Value',Maxlines); − drawnow; − end − end − end</syntaxhighlight>
no edit summary
Download this site-package to use the buttonbox: [https://pypi.python.org/pypi/RuSocSci rusocsci]
Download this site-package to use the buttonbox: [https://pypi.python.org/pypi/RuSocSci rusocsci]
or use in windows command 'pip install --upgrade rusocsci'
or use in windows command 'pip install --upgrade rusocsci'
# select a function
# select a function
bb.sendMarker(val=(ord(X))) #select pulse time
bb.sendMarker(val=(ord('X'))) #select pulse time
bb.sendMarker(val=2) #set time of dureation pulse to 2ms
bb.sendMarker(val=2) #set time of dureation pulse to 2ms
bb.sendMarker(val=(ord(M))) #select marker out
bb.sendMarker(val=(ord('M'))) #select marker out
bb.sendMarker(val=115) #set marker value 115
bb.sendMarker(val=115) #set marker value 115
</syntaxhighlight>
</syntaxhighlight>
For more documentation click here: http://pythonhosted.org//RuSocSci/index.html
For more documentation click here: http://pythonhosted.org//RuSocSci/index.html
<br>
<br>
=== Matlab ===
=== Matlab ===
'''Example using markers with the Buttonbox in Matlab:'''
<syntaxhighlight lang="matlab" line style="height:50em; overflow:auto;">
Download the file Bitsi.m from the DCCN website: https://intranet.donders.ru.nl/index.php?id=bitsim0
<br> Make sure to have this file in your Matlab path.
<syntaxhighlight lang="matlab" line style="overflow:auto;">
% At the start of your script, create the buttonbox serial object
bb = Bitsi("COM2");
% other code
:
</syntaxhighlight>
%
BITSI simple mode:
% set defaults
<syntaxhighlight lang="matlab" line style="overflow:auto;">
bb.Device = 'COM2';
% This example is for an EEG system sampling at 500Hz samplerate.
% at the start of your script, reset marker
bb.DataBits = 8;
samplerate = 500;
pulseLen = 2000/samplerate; % get pulse time length for a 2 samples delay
bb.Parity = 'none';
bb.sendTrigger(0);
% send a marker
val = 1; % val: this is your marker code, range code 1-255
bb.sendTrigger(val);
java.lang.Thread.sleep(pulseLen); % wait long enough for the EEG system to capture the trigger, i.e., 2000/samplerate ms
% reset marker
bb.sendTrigger(0) % Note: if resetting the marker is not possible at this moment in code, you can decide to do this later as long as it has taken place long enough before the next marker has to be sent. Another solution using a timer object instead of a simple delay is outlined below.
</syntaxhighlight>
BITSI extended mode:
<syntaxhighlight lang="matlab" line style="overflow:auto;">
samplerate = 500;
pulseLen = 2000/samplerate; % get pulse time length for a 2 samples delay
% select a function
bb.sendTrigger(uint8('X')); % select pulse time
bb.sendTrigger(pulseLen); % set time of duration pulse to (2000/samplerate) ms
val = 1; % val: this is your marker code, range code 1-255
bb.sendTrigger(uint8('M')); % select marker out
bb.sendTrigger(val); % val: this is your marker code, range code 1-255
</syntaxhighlight>
<syntaxhighlight lang="matlab" line style="overflow:auto;">
% At the end of your script, close the buttonbox serial object
:
bb.close();
</syntaxhighlight>
Reset marker using a timer:
<syntaxhighlight lang="matlab" line style="overflow:auto;">
% At the start of your script, define timer object and callback function
pulseTime = 0.004; % trigger pulse duration in s. NB: extra time will be added due to overhead in calling Matlab functions related to the timer event.
resetMarker = timer('TimerFcn',@(x,y)bb.sendTrigger(0),'StartDelay',pulseTime);
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% replace the code to send a marker with:
val = 1; % val: this is your marker code, range code 1-255
bb.sendTrigger(val);
resetMarker.start(); % this will call bb.sendTrigger(0) after pulseTime seconds (plus some additional overhead)
</syntaxhighlight>