File Coverage

blib/lib/Lab/Moose/Instrument/SCPI/Display/Window.pm
Criterion Covered Total %
statement 20 25 80.0
branch n/a
condition n/a
subroutine 7 9 77.7
pod 1 2 50.0
total 28 36 77.7


line stmt bran cond sub pod time code
1             package Lab::Moose::Instrument::SCPI::Display::Window;
2             $Lab::Moose::Instrument::SCPI::Display::Window::VERSION = '3.900';
3             #ABSTRACT: Role for the SCPI DISPlay:WINDow subsystem
4              
5 1     1   14961 use v5.20;
  1         5  
6              
7 1     1   6 use Moose::Role;
  1         5  
  1         6  
8 1     1   5499 use Lab::Moose::Instrument::Cache;
  1         3  
  1         8  
9             use Lab::Moose::Instrument
10 1     1   626 qw/validated_channel_getter validated_channel_setter/;
  1         4  
  1         56  
11 1     1   6 use MooseX::Params::Validate;
  1         3  
  1         6  
12 1     1   455 use Carp;
  1         3  
  1         53  
13              
14 1     1   6 use namespace::autoclean;
  1         2  
  1         8  
15              
16              
17             cache display_window_trace_y_scale_rlevel =>
18             ( getter => 'display_window_trace_y_scale_rlevel_query' );
19              
20             sub display_window_trace_y_scale_rlevel_query {
21 0     0 0   my ( $self, $channel, %args ) = validated_channel_getter( \@_ );
22              
23 0           return $self->cached_display_window_trace_y_scale_rlevel(
24             $self->query( command => ":DISP:WIN:TRACe:Y:SCALe:RLEV?", %args ) );
25             }
26              
27             sub display_window_trace_y_scale_rlevel {
28 0     0 1   my ( $self, $channel, $value, %args ) = validated_channel_setter( \@_ );
29 0           $self->write(
30             command => sprintf( ":DISP:WIN:TRACe:Y:SCALe:RLEV %.17g", $value ),
31             %args
32             );
33 0           $self->cached_display_window_trace_y_scale_rlevel($value);
34             }
35              
36             1;
37              
38             __END__
39              
40             =pod
41              
42             =encoding UTF-8
43              
44             =head1 NAME
45              
46             Lab::Moose::Instrument::SCPI::Display::Window - Role for the SCPI DISPlay:WINDow subsystem
47              
48             =head1 VERSION
49              
50             version 3.900
51              
52             =head1 METHODS
53              
54             =head2 display_window_trace_y_scale_rlevel
55              
56             my $refLevel = $self->display_window_trace_y_scale_rlevel_query();
57              
58             Query the amplitude value of the reference level for the y-axis.
59              
60             =head2 display_window_trace_y_scale_rlevel
61              
62             $self->display_window_trace_y_scale_rlevel(value => -20);
63              
64             Sets the amplitude value of the reference level for the y-axis.
65              
66             =head1 COPYRIGHT AND LICENSE
67              
68             This software is copyright (c) 2023 by the Lab::Measurement team; in detail:
69              
70             Copyright 2018 Eugeniy E. Mikhailov
71             2020 Andreas K. Huettel
72              
73              
74             This is free software; you can redistribute it and/or modify it under
75             the same terms as the Perl 5 programming language system itself.
76              
77             =cut