NAME

Lab::Moose::Instrument::TBS1000C - Tektronix TBS 1000C series Oscilloscope.

VERSION

version 3.731

SYNOPSIS

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]);

METHODS

Used roles:

Lab::Moose::Instrument::Common

acquire_state/acquire_state_query

$tbs->acquire_state(value => 1);
say $tbs->acquire_state_query();

Allowed values: 0,1

acquire_stopafter/acquire_stopafter_query

$tbs->acquire_stopafter(value => 'SEQUENCE');
say $tbs->acquire_stopafter_query();

Allowed values: SEQUENCE, STOPAFTER

busy_query

my $busy = $tbs->busy_query();

Return 1 if busy, 0 if idle.

curve_query

my $data_block = $tbs->curve_query();

Get waveform from instrument as arrayref.

The channel is defined by the data_source method.

data_source/data_source_query

$tbs->data_source(value => 'CH1');
say $tbs->data_source_query();

Data source for the curve_query method. Allowed values: CH1, CH2, MATH, REF1, REF2

trigger_query

my $info = $tbs->trigger_query();

Info about trigger setup.

trigger_force

$tbs->trigger_force();

Force a trigger.

trigger_state_query

say $tbs->trigger_state_query();

Returns one of ARMED, AUTO, READY, SAVE, TRIGGER.

trigger_mode/trigger_mode_query

$tbs->trigger_mode(value => 'NORMAL');
say $tbs->trigger_mode_query();

Allowed values: NORMAL, AUTO

waveform_output_encoding/waveform_output_encoding_query

$tbs->waveform_output_encoding(value => 'ASCII');
say $tbs->waveform_output_encoding_query();

Allowed values: ASCII, BINARY

COPYRIGHT AND LICENSE

This software is copyright (c) 2020 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.