#! /bin/sh
# \
exec mxtclsh_script "$0" ${1+"$@"}

proc main { record_list argv } {

	if { [ llength $argv ] != 1 } {
		puts stderr ""
		puts stderr "Usage: testsoft_sca_get sca_name"
		puts stderr ""
		exit
	}

        set sca_name [ lindex $argv 0 ]

        set sca [ $record_list get_record $sca_name ]

        set gain [ $sca get_gain ]

        puts "SCA '$sca_name' gain = $gain"
}