Lab::Moose::Instrument::TBS1000C - Tektronix TBS 1000C series Oscilloscope.
version 3.831
use Lab::Moose; my $tbs = instrument( type => 'TBS1000C', connection_type => 'USB' # For NT-VISA use 'VISA::USB' ); # Configure measurement setup $tbs->waveform_output_encoding(value => 'ASCII'); $tbs->trigger_mode(value => 'NORMAL'); $tbs->data_source(value => 'CH1'); $tbs->acquire_stopafter(value => 'SEQUENCE'); # Start acquisition $tbs->acquire_state(value =>1); # Waveform will be recorded once triggered # software trigger: # $tbs->trigger_force(); # Wait until acquisition is finished $tbs->opc_query(); # Get waveform as arrayref my $data_block = $tbs->curve_query(); # Logging multiple blocks into a datafile $sweep->log_block(prefix => ..., block => [$block1, $block2]);
Used roles:
$tbs->acquire_state(value => 1); say $tbs->acquire_state_query();
Allowed values: 0,1
0,1
$tbs->acquire_stopafter(value => 'SEQUENCE'); say $tbs->acquire_stopafter_query();
Allowed values: SEQUENCE, STOPAFTER
my $busy = $tbs->busy_query();
Return 1 if busy, 0 if idle.
my $data_block = $tbs->curve_query();
Get waveform from instrument as arrayref.
The channel is defined by the data_source method.
data_source
$tbs->data_source(value => 'CH1'); say $tbs->data_source_query();
Data source for the curve_query method. Allowed values: CH1, CH2, MATH, REF1, REF2
curve_query
CH1, CH2, MATH, REF1, REF2
my $info = $tbs->trigger_query();
Info about trigger setup.
$tbs->trigger_force();
Force a trigger.
say $tbs->trigger_state_query();
Returns one of ARMED, AUTO, READY, SAVE, TRIGGER.
ARMED, AUTO, READY, SAVE, TRIGGER
$tbs->trigger_mode(value => 'NORMAL'); say $tbs->trigger_mode_query();
Allowed values: NORMAL, AUTO
NORMAL, AUTO
$tbs->waveform_output_encoding(value => 'ASCII'); say $tbs->waveform_output_encoding_query();
Allowed values: ASCII, BINARY
ASCII, BINARY
This software is copyright (c) 2022 by the Lab::Measurement team; in detail:
Copyright 2020 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.