Lab::Moose::Instrument::ZI_MFLI - Zurich Instruments MFLI Lock-in Amplifier
version 3.613
use Lab::Moose; my $mfli = instrument( type => 'ZI_MFLI', connection_type => 'Zhinst', connection_options => { host => '132.188.12.13', port => 8004, }); $mfli->set_frequency(value => 10000); # Set time constants of first two demodulators to 0.5 sec: $mfli->set_tc(demod => 0, value => 0.5); $mfli->set_tc(demod => 1, value => 0.5); # Read out demodulators: my $xy_0 = $mfli->get_xy(demod => 0); my $xy_1 = $mfli->get_xy(demod => 1); say "x_0, y_0: ", $xy_0->{x}, ", ", $xy_0->{y};
If the MFLI has the Impedance Analyzer option, calling some of the following setter options might be without effect. E.g. if the Bandwith Control option of the Impedance Analyzer module is set, manipulating the time constant with set_tc will not work.
set_tc
my $freq = $mfli->get_frequency();
Get oscillator frequency.
$mfli->set_frequency(value => 10000);
Set oscillator frequency.
my $sens = $mfli->get_voltage_sens();
Get sensitivity (range) of voltage input.
$mfli->set_voltage_sens(value => 1);
Set sensitivity (range) of voltage input.
my $sens = $mfli->get_current_sens();
Get sensitivity (range) of current input.
$mfli->set_current_sens(value => 100e-6);
Set sensitivity (range) of current input.
my $amplitude = $mfli->get_amplitude();
Get amplitude of voltage output.
$mfli->set_amplitude(value => 300e-3);
Set amplitude of voltage output.
my $amplitude_range = $mfli->get_amplitude_range();
Get range of voltage output.
$mfli->set_amplitude_range(value => 1);
my $phase = $mfli->get_phase(demod => 0);
Get demodulator phase shift.
$mfli->set_phase(demod => 0, value => 10);
Set demodulator phase.
my $tc = $mfli->get_tc(demod => 0);
Get demodulator time constant.
$mfli->set_tc(demod => 0, value => 0.5);
Set demodulator time constant.
my $order = $mfli->get_order(demod => 0);
Get demodulator filter order.
$mfli->set_order(demod => 0, order => 4);
Set demodulator filter order.
my $xy_0 = $mfli->get_xy(demod => 0); my $xy_1 = $mfli->get_xy(demod => 1); printf("x: %g, y: %g\n", $xy_0->{x}, $xy_0->{y});
Get demodulator X and Y output measurement values.
This software is copyright (c) 2017 by the Lab::Measurement team; in detail:
Copyright 2017 Andreas K. Huettel, Simon Reinhardt
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
To install Lab::Measurement, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Lab::Measurement
CPAN shell
perl -MCPAN -e shell install Lab::Measurement
For more information on module installation, please visit the detailed CPAN module installation guide.