Last change
on this file was
17,
checked in by zhangj, 10 years ago
|
To have a stable version on the server.
|
-
Property svn:executable set to
*
|
File size:
342 bytes
|
Rev | Line | |
---|
[17] | 1 | function quadcell13(command) |
---|
| 2 | |
---|
| 3 | %% |
---|
| 4 | dev=family2tangodev('QC13'); |
---|
| 5 | for k = 1:10, |
---|
| 6 | rep = tango_command_inout2(dev{k},command); |
---|
| 7 | switch command |
---|
| 8 | case {'Status', 'State'} |
---|
| 9 | if ischar(rep) |
---|
| 10 | fprintf('Device: %s, State: %s \n',dev{k},rep); |
---|
| 11 | end |
---|
| 12 | otherwise |
---|
| 13 | % does nothing |
---|
| 14 | end |
---|
| 15 | end; |
---|
Note: See
TracBrowser
for help on using the repository browser.