Ham::Device::FT950 - Functions to Communicate with Yaesu FT-950
my $ft950 = new Ham::Device::FT950( portname => "/dev/ttyS0", baudrate => 4800, databits => 8, parity => "none", handshake => "rts", lockfile => 1, read_char_time => 0, read_const_time => 20 );
Set of functions used to talk to a Yaesu FT-950 HF Radio. Not all functions of the radio are implimented. The communications is based on Device::SerialPort as the underlying process to communicate with the radio. View "perldoc Device::SerialPort" for more infomation on serial port operation and options.
Included is a demonstration program pRigctl.plx that can be used to test most of the functionality of Ham::Device::FT950.
Below is a list of supported option that can be passed to set up serial port:
Usually a name like /dev/ttyS0 or /dev/ttyUSB0, default is /dev/ttyS0.
Number of bits in the serial steam excluding start, stop and parity. Legal values integer 5 to 8, default is 8.
One of the following: "none", "odd", "even". If you select anything except "none", you will need to set parity_enable (not implmented yet). Default is "none".
Number of stopbits. Legal valus are 1 and 2, default is 1.
One of the following: "none", "rts", and "xoff". Default is "rts". Note the FT-950 needs to be set "rts"; make sure all serial lines are connected.
Use alias to convert the name used by "built-in" messages. Default is "FT-950".
Use Device::SerialPort's built-in messages, "ON" or "OFF". Default is "OFF".
Flag to use or not use a lockfile. The Device::SerialPort package has support for lockfiles but support is experimental. So by setting this attribute to "0" turns off the usage of lockfiles. Options are "0" for no lockfile and "1" to enable lockfile, default is "1". Note lockfile location is hard coded to /var/lock/. If you see a messages like:
Unable to open /dev/ttyUSB0: File exists
Then delete the file "/var/lock/LCK..USB0" and try again. If still no sucess try setting lockfile equal to "0".
Average time between read characters. Default is 0.
Read time for serial port. See "perldoc Device::Serial". Default is 20ms.
This method plays back one of the 5 voice memories. $mem is required to be a string "01" to "05". Returns number of characters sent or undef on failure.
Gets the current output power setting of radio. Returns power between 5-100 or undef on failure.
Swaps the frequency of VFO A and VFO B. Returns the number of characters sent or undef on failure.
Selects VFO A or B. $vfo = "A" or "B". If you send the same VFO twice the rig will mute. Returns the number of characters sent or undef on failure.
Returns which VFO is currently active. Returns "A" or "B" or undef on failure.
Selects active band, $band equal to one of the following: 1.8, 3.5, 7, 10, 14, 18, 21, 28.5, 29, 50. Returns number of characters sent on undef on failure.
Gets the current frequency and returns the value in Mhz. Set $vfo to "a" or "b". Returns undef on failure.
Sets frequency in the requested VFO. $vfo must be "a" or "b" and frequency must be in Mhz. Returns undef on failure.
Sets the operating mode, valid modes are: LSB, USB, CW, FM, AM, FSK-L, CW-R, PKT-L, FSK-R, PKT-FM, FM-N, PKT-U and AM-N. Returns undef on failure.
Gets the current operating mode or undef on failure. Modes are LSB, USB, CW, FM, AM, FSK-L, CW-R, PKT-L, FSK-R, PKT-FM, FM-N, PKT-U and AM-N.
Sets the rigs output power. $power must be "005" to "100". Returns number of characters sent or undef on failure.
Reads an option from the radio. $option neets to be a string between "001" and "118". Returns the value of the option or undef on failure.
Reads the current value of the S meter. Returns a result between "000" and "255" or undef on failure.
Status the "BUSY" indicator of the radio. Returns 1 if ON or 0 if OFF. Returns undef on failure.
Sets the MOX (Manual Operated Transmit) on or off, or gets the status of the MOX . $mox equal 1 to set, 0 unsets and 2 returns status: 1 = ON, 0 = OFF. Returns undef on failure.
Sets the VOX (Voice Operated Transmit) on or off, or get the status of the VOX. $vox equal 1 to set, 0 to unset, and 2 returns status: 1 = ON, 0 = OFF. Returns undef on failure.
Returns the transmit status of the rig:
Returns 0 if Radio TX OFF CAT TX OFF Returns 1 if Radio TX OFF CAT TX ON Returns 2 if Radio TX ON CAT TX OFF Returns undef on failure.
Get the status of the Fast Step mode. Returns 0 for OFF, 1 for ON and undef for failure.
Set Fast step mode on or off. $fsmode = 0 for OFF and 1 for ON. Returns number of characters sent or undef on failure.
Writes all of the rigs options to a file. $filename contains the filename to write out the options. Default filename is FT950-options, returns 1 on success and undef on failure.
This is a very ealy version using object oriented Perl, so expect a few. Hope to complete full implemtation in the next year or so.
FT-950 CAT Operation Reference book, Vertex Standard Co., Ltd. Avaiable at www.yaesu.com, Device::Serial
Updates will be posted to http://www.cpan.org as they become avaiable.
Tim Gimmel, <email@example.com>
Copyright (C) 2008-2010 by Tim Gimmel
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.