Sourcecode
rasch@rasch:~> octave
GNU Octave, version 2.1.50 (i686-pc-linux-gnu).
...
octave:1> ra=ra_lib_init
ra = 145016952
octave:2> meas=ra_meas_open(ra, '/home/rasch/ecgs/AT011030_rdi.ART', 0)
meas = 145243840
octave:3> rec=ra_rec_get_first(meas, 0)
rec = 145420840
octave:4> num_ch=ra_rec_get_info(rec, 'rec_num_channel')
num_ch = 5
octave:5> rec_name=ra_rec_get_info(rec, 'rec_name')
rec_name = AT011030_rdi
octave:6> rec_date=ra_rec_get_info(rec, 'rec_date')
rec_date = 30.10.2001
octave:7> for i=0:(num_ch-1)
> name=ra_ch_get_info(rec, i, 'ch_name')
> unit=ra_ch_get_info(rec, i, 'ch_unit')
> endfor
name = EKGX
unit = uV
name = EKGY
unit = uV
name = EKGZ
unit = uV
name = ABP
unit = mmHg
name = RESP
unit = uV
octave:8>
|
