Gra_command( "create test 0 10 100") or die "error message";
SPECTRA> test(1) = 12
.
In Perl-Spectra we write (taken
from the example 10.10.2 ):
use Spectra; use GQE; $t1 = SCAN->create( name => "t1", start => "0", stop => "10", np => "$size") or die " Failed to create t1 "; # # ... set the y-values to sinus() ... # for $i (0 .. ($size - 1)) { $t1->{y}[$i] = sin( $t1->{x}[$i]); }
Notice that $i
starts at 0.
use Spectra; use GQE; $t1 = TEXT->create( name => 'test'); $col = $t1->get( 'colour'); $ret = $t1->set( string => 'ein Text', colour => 'red');