Подключение GPIB к внешнему устройству с помощью MATLAB

Есть ли способ установить соединение GPIB с помощью MATLAB без панели инструментов управления прибором? (у меня его нет). Также есть способ для MATLAB узнать, каковы значения параметров RS232 внешнего устройства (скорость передачи, стоповый бит и т. д.). Для соединения RS232 у меня есть следующий код:

% This function is meant to send commands to Potentiostat Model 263A.

% A run includes turning the cell on, reading current for time t1, turning

% the cell off, waiting for time t2.

% t1 is the duration [secs] for which the Potentiostat must run (cell is on)

% t2 is the duration [secs] to on after off

% n is the number of runs 

% port is the serial port name such as COM1

function [s] = Potentiostat_control(t1,t2,n)

port = input('type port name such as COM1', 's')

s = serial(port);

set(s,'BaudRate', 9600, 'DataBits', 8, 'Parity', 'even', 'StopBits', 2 ,'Terminator', 'CR/LF'); 

fopen(s)

%fprintf(s,'RS232?')

disp(['Total runs requested = ' num2str(n)]) 

disp('i denotes number of runs executed so far..');

for i=1:n

    i

    %data1 = query(s, '*IDN?')

    fprintf(s,'%s','CELL 1'); % sends the command 'CELL 1'

    %fprintf(s,'%s','READI');

    pause(t1);

    fprintf(s,'%s','CELL 0');

    %fprintf(s,'%s','CLEAR');

    pause(t2);

end

fclose(s)

matlab serial-port gpib
person hkf    schedule 13.05.2010    source источник

Ответы (3)


arrow_upward
2
arrow_downward

Что касается вашего вопроса о GPIB, поставляется ли карта GPIB с вызываемой библиотекой (DLL, если вы работаете в Windows)? В Matlab есть интерфейс для вызова внешних библиотек. Основная процедура состоит в том, чтобы Matlab анализировал файл заголовка, используя LOADLIBRARY, затем просматривал доступные функции, используя LIBFUNCTIONS, и вызывал функции, используя CALLLIB.

Что касается вашего вопроса о RS232, я не думаю, что хост-сторона может узнать параметры стороны устройства без внешней документации.

person mtrw    schedule 13.05.2010
comment
Спасибо МТРВ. Я посмотрю - person hkf; 14.05.2010

arrow_upward
1
arrow_downward

Я использую National Instruments VISA и NI 488.2.

Сначала убедитесь, что вы отметили VisaNS.NET API в настройках NI-VISA, см. следующий рисунок:

введите здесь описание изображения

Я использую NationalInstruments.VisaNS.MessageBasedSession поверх интерфейса .NET из MATLAB.

Я написал следующий класс MATLAB, который переносит NI VISA в MATLAB:

classdef Visa
    properties
        vi
        SrqMask
        SrqTimeout
    end
    methods
        function obj = Visa(resourceName)
            NET.addAssembly('NationalInstruments.VisaNS');
            obj.vi = NationalInstruments.VisaNS.MessageBasedSession(resourceName);
            obj.SrqMask = '*CLS;*ESE 1;*SRE 32';
            obj.SrqTimeout = 10000;
        end
        function obj = delete(obj)
            obj.vi.Dispose();
        end
        function obj = Dispose(obj)
            obj.vi.Dispose();
        end
        function obj = Write(obj, data)
            obj.vi.Write(data);
        end
        function data = ReadString(obj)
            data = char(obj.vi.ReadString());
        end
        function data = ReadByteArray(obj)
            data = obj.vi.ReadByteArray();
        end
        function data2 = Query(obj, data)
            data2 = char(obj.vi.Query(data));
        end
        function obj = SrqBegin(obj)
            obj.vi.EnableEvent(NationalInstruments.VisaNS.MessageBasedSessionEventType.ServiceRequest, ...
                NationalInstruments.VisaNS.EventMechanism.Queue);
            obj.vi.DiscardEvent(NationalInstruments.VisaNS.MessageBasedSessionEventType.ServiceRequest);
            obj.Write(obj.SrqMask);
        end
        function status = SrqEnd(obj)
            evt = obj.vi.WaitOnEvent(NationalInstruments.VisaNS.MessageBasedSessionEventType.ServiceRequest, ...
                obj.SrqTimeout);
            evt.Dispose();
            status = obj.vi.ReadStatusByte();
            obj.vi.DisableEvent(NationalInstruments.VisaNS.MessageBasedSessionEventType.ServiceRequest, ...
                NationalInstruments.VisaNS.EventMechanism.Queue);           
        end
        function obj = SrqWrite(obj, data)
            obj.SrqBegin();
            obj.Write(data);
            obj.SrqEnd();
        end
        function data2 = SrqQuery(obj, data)
            obj.SrqBegin();
            obj.Write(data);
            obj.SrqEnd();
            data2 = obj.ReadString();
        end
    end
end

Я также добавил несколько методов для обработки запроса SRQ.

С помощью следующего кода вы можете, например, управлять прибором GPIB:

resourceName = 'GPIB0::20::INSTR'; % GPIB adapter 0, Instrument address 20
vi = Visa(resourceName);
idn = vi.QueryString('*IDN?');

MessageBasedSession можно использовать для связи с вашим прибором через GPIB, Ethernet или USB.

См. также https://stackoverflow.com/a/49388678/7556646.

person Wollmich    schedule 20.03.2018

arrow_upward
0
arrow_downward

Я не знаю о параметрах RS232, но для прибора с tcpip вы можете очень легко отправлять команды SCPI.

Вот пример, когда я отправляю команду SCPI на приборы Rohde&Schwarz. Виза или IVI не нужны. Используйте порт 5025.

t = tcpip('147.214.90.136', 5025); 
fopen(t); 
fprintf(t, '*IDN?');
fprintf(1, DataReceived)

Затем закройте соединение, когда закончите:

fclose(t); 
delete(t); 
clear t
person psteffensen    schedule 14.12.2018