Branch Coverage

blib/lib/Ham/Device/FT817COMM.pm
Criterion Covered Total %
branch 3 4036 0.0


line true false branch
313 0 1 $^O eq 'MSWin32' ? :
314 0 1 if ($Ham::Device::FT817COMM::OS_win) { }
316 0 0 if $@
320 0 1 if $@
328 0 0 if ($Ham::Device::FT817COMM::OS_win) { }
330 0 0 if ($Ham::Device::FT817COMM::verbose)
334 0 0 if ($Ham::Device::FT817COMM::verbose)
336 0 0 unless ref $$ob{'port'}
337 0 0 unless $options{'baud'}
358 0 0 unless $$self{'port'}->close
367 0 0 if ($debugflag == '1')
368 0 0 if ($debugflag == '0')
369 0 0 if ($Ham::Device::FT817COMM::debug and $Ham::Device::FT817COMM::verbose)
370 0 0 if (not $Ham::Device::FT817COMM::debug and $Ham::Device::FT817COMM::verbose)
378 0 0 if ($bitwatcherflag == '1')
379 0 0 if ($bitwatcherflag == '0')
380 0 0 if ($Ham::Device::FT817COMM::bitwatch and $Ham::Device::FT817COMM::verbose)
381 0 0 if (not $Ham::Device::FT817COMM::bitwatch and $Ham::Device::FT817COMM::verbose)
389 0 0 if ($verboseflag == '1')
390 0 0 if ($verboseflag == '0')
398 0 0 if ($writeflag == '1')
399 0 0 if ($writeflag == '0')
400 0 0 if ($Ham::Device::FT817COMM::writeallow and $Ham::Device::FT817COMM::verbose)
401 0 0 if (not $Ham::Device::FT817COMM::writeallow and $Ham::Device::FT817COMM::verbose)
402 0 0 if (not $Ham::Device::FT817COMM::agreewithwarning and $Ham::Device::FT817COMM::writeallow and $Ham::Device::FT817COMM::verbose)
433 0 0 if ($agreeflag == '1')
441 0 0 if ($value eq 'DEBUG')
442 0 0 if ($value eq 'VERBOSE')
443 0 0 if ($value eq 'BITWATCH')
444 0 0 if ($value eq 'WRITEALLOW')
445 0 0 if ($value eq 'WARNED')
446 0 0 unless ($value)
447 0 0 if ($Ham::Device::FT817COMM::verbose)
474 0 0 if ($Ham::Device::FT817COMM::debug)
476 0 0 if ($Ham::Device::FT817COMM::debug)
478 0 0 if ($Ham::Device::FT817COMM::debug)
480 0 0 if (length $startaddress < 4)
481 0 0 if ($Ham::Device::FT817COMM::debug)
483 0 0 if ($Ham::Device::FT817COMM::debug)
485 0 0 if (length $startaddress == 5)
486 0 0 if ($Ham::Device::FT817COMM::debug)
488 0 0 if ($Ham::Device::FT817COMM::debug)
490 0 0 if ($Ham::Device::FT817COMM::debug)
491 0 0 if ($Ham::Device::FT817COMM::debug)
499 0 0 if ($Ham::Device::FT817COMM::debug)
500 0 0 if ($Ham::Device::FT817COMM::debug)
504 0 0 if ($Ham::Device::FT817COMM::debug)
523 0 0 if ($tuner eq 'MEMORY')
524 0 0 if ($tuner eq 'VFO')
535 0 0 if ($tuner eq 'Y')
536 0 0 if ($tuner eq 'N')
555 0 0 if ($frequency < $low or $frequency > $high)
556 0 0 if ($Ham::Device::FT817COMM::verbose)
570 0 0 if ($frequency >= $low and $frequency <= $high)
571 0 0 if ($Ham::Device::FT817COMM::verbose)
575 0 0 if ($Ham::Device::FT817COMM::verbose)
587 0 0 if ($Ham::Device::FT817COMM::debug)
590 0 0 if ($bit ne 'ALL') { }
593 0 0 if ($Ham::Device::FT817COMM::debug)
594 0 0 if ($Ham::Device::FT817COMM::debug)
595 0 0 if ($value != $testbit)
596 0 0 if ($Ham::Device::FT817COMM::verbose)
597 0 0 if ($Ham::Device::FT817COMM::verbose and $value)
602 0 0 if ($Ham::Device::FT817COMM::verbose and $status eq 'CHANGE')
603 0 0 if ($Ham::Device::FT817COMM::debug)
0 0 if ($status eq 'OK')
612 0 0 if ($Ham::Device::FT817COMM::debug)
615 0 0 if ($Ham::Device::FT817COMM::debug)
620 0 0 if ($Ham::Device::FT817COMM::debug)
621 0 0 if ($Ham::Device::FT817COMM::bitwatch)
629 0 0 if ($Ham::Device::FT817COMM::debug)
631 0 0 if ($Ham::Device::FT817COMM::debug)
638 0 0 if ($Ham::Device::FT817COMM::debug)
639 0 0 if ($Ham::Device::FT817COMM::debug)
642 0 0 if ($Ham::Device::FT817COMM::debug)
643 0 0 if ($Ham::Device::FT817COMM::debug)
651 0 0 if ($Ham::Device::FT817COMM::debug)
653 0 0 if ($Ham::Device::FT817COMM::debug)
660 0 0 if ($Ham::Device::FT817COMM::debug)
661 0 0 if ($Ham::Device::FT817COMM::debug)
664 0 0 if ($Ham::Device::FT817COMM::debug)
665 0 0 if ($Ham::Device::FT817COMM::debug)
673 0 0 if ($Ham::Device::FT817COMM::debug)
675 0 0 if ($Ham::Device::FT817COMM::debug)
680 0 0 if ($Ham::Device::FT817COMM::debug)
694 0 0 if ($Ham::Device::FT817COMM::writeallow != '1' and $Ham::Device::FT817COMM::agreewithwarning != '1')
695 0 0 if ($Ham::Device::FT817COMM::debug or $Ham::Device::FT817COMM::verbose)
699 0 0 if ($Ham::Device::FT817COMM::debug)
701 0 0 if ($Ham::Device::FT817COMM::debug)
709 0 0 if ($Ham::Device::FT817COMM::debug)
712 0 0 if ($Ham::Device::FT817COMM::debug)
713 0 0 if ($Ham::Device::FT817COMM::debug)
715 0 0 if ($Ham::Device::FT817COMM::debug)
717 0 0 if ($Ham::Device::FT817COMM::debug)
718 0 0 if (length $NEWHEX1 < 2) { }
720 0 0 if ($Ham::Device::FT817COMM::debug)
722 0 0 if ($Ham::Device::FT817COMM::debug)
723 0 0 if ($Ham::Device::FT817COMM::debug)
724 0 0 if ($Ham::Device::FT817COMM::debug)
727 0 0 if ($Ham::Device::FT817COMM::debug)
731 0 0 if ($Ham::Device::FT817COMM::debug)
736 0 0 if ($Ham::Device::FT817COMM::debug)
737 0 0 if ($Ham::Device::FT817COMM::debug)
741 0 0 if ($address == '0055' and $BIT == '1') { }
742 0 0 if ($Ham::Device::FT817COMM::debug)
746 0 0 if ($NEWHEX1 == $BYTE1 and $OLDBYTE2 == $BYTE2) { }
748 0 0 if ($Ham::Device::FT817COMM::debug)
752 0 0 if ($Ham::Device::FT817COMM::debug)
754 0 0 if ($Ham::Device::FT817COMM::bitwatch)
766 0 0 if ($Ham::Device::FT817COMM::writeallow != '1' and $Ham::Device::FT817COMM::agreewithwarning != '1')
767 0 0 if ($Ham::Device::FT817COMM::debug or $Ham::Device::FT817COMM::verbose)
772 0 0 if ($Ham::Device::FT817COMM::debug)
774 0 0 if ($Ham::Device::FT817COMM::debug)
780 0 0 if ($Ham::Device::FT817COMM::debug)
781 0 0 if ($Ham::Device::FT817COMM::debug)
782 0 0 if ($Ham::Device::FT817COMM::debug)
783 0 0 if (length $VALUE < 2) { }
785 0 0 if ($Ham::Device::FT817COMM::debug)
787 0 0 if ($Ham::Device::FT817COMM::debug)
788 0 0 if ($Ham::Device::FT817COMM::debug)
790 0 0 if ($Ham::Device::FT817COMM::debug)
795 0 0 if ($Ham::Device::FT817COMM::debug)
800 0 0 if ($Ham::Device::FT817COMM::debug)
801 0 0 if ($Ham::Device::FT817COMM::debug)
802 0 0 if ($VALUE == $BYTE1 and $OLDBYTE2 == $BYTE2) { }
804 0 0 if ($Ham::Device::FT817COMM::debug)
808 0 0 if ($Ham::Device::FT817COMM::debug)
810 0 0 if ($Ham::Device::FT817COMM::bitwatch)
822 0 0 if ($Ham::Device::FT817COMM::writeallow != '1' and $Ham::Device::FT817COMM::agreewithwarning != '1')
823 0 0 if ($Ham::Device::FT817COMM::debug or $Ham::Device::FT817COMM::verbose)
829 0 0 if ($Ham::Device::FT817COMM::debug)
835 0 0 if ($Ham::Device::FT817COMM::debug)
836 0 0 if (length $VALUE < 2)
838 0 0 if ($Ham::Device::FT817COMM::debug)
840 0 0 if ($Ham::Device::FT817COMM::debug)
841 0 0 if (length $VALUE2 < 2)
843 0 0 if ($Ham::Device::FT817COMM::debug)
845 0 0 if ($Ham::Device::FT817COMM::debug)
847 0 0 if ($Ham::Device::FT817COMM::debug)
852 0 0 if ($Ham::Device::FT817COMM::debug)
857 0 0 if ($Ham::Device::FT817COMM::debug)
858 0 0 if ($Ham::Device::FT817COMM::debug)
859 0 0 if ($VALUE == $NEWBYTE1 and $VALUE2 == $NEWBYTE2) { }
861 0 0 if ($Ham::Device::FT817COMM::debug)
865 0 0 if ($Ham::Device::FT817COMM::debug)
867 0 0 if ($Ham::Device::FT817COMM::bitwatch)
878 0 0 if ($Ham::Device::FT817COMM::writeallow != '1' and $Ham::Device::FT817COMM::agreewithwarning != '1')
879 0 0 if ($Ham::Device::FT817COMM::debug or $Ham::Device::FT817COMM::verbose)
883 0 0 unless ($Ham::Device::FT817COMM::RESTOREAREAS{$area})
884 0 0 if ($Ham::Device::FT817COMM::verbose)
888 0 0 if ($Ham::Device::FT817COMM::verbose)
890 0 0 if ($area eq '0055')
891 0 0 if ($area eq '0057')
892 0 0 if ($area eq '0058')
893 0 0 if ($area eq '0059')
894 0 0 if ($area eq '005B')
895 0 0 if ($area eq '005C')
896 0 0 if ($area eq '005D')
897 0 0 if ($area eq '005E')
898 0 0 if ($area eq '005F')
899 0 0 if ($area eq '0060')
900 0 0 if ($area eq '0061')
901 0 0 if ($area eq '0062')
902 0 0 if ($area eq '0063')
903 0 0 if ($area eq '0064')
904 0 0 if ($area eq '0065')
905 0 0 if ($area eq '0066')
906 0 0 if ($area eq '0067')
907 0 0 if ($area eq '0068')
908 0 0 if ($area eq '0069')
909 0 0 if ($area eq '006A')
910 0 0 if ($area eq '006B')
911 0 0 if ($area eq '006C')
912 0 0 if ($area eq '006D')
913 0 0 if ($area eq '006E')
914 0 0 if ($area eq '006F')
915 0 0 if ($area eq '0070')
916 0 0 if ($area eq '0071')
917 0 0 if ($area eq '0072')
918 0 0 if ($area eq '0073')
919 0 0 if ($area eq '0074')
920 0 0 if ($area eq '0079')
921 0 0 if ($area eq '007A')
922 0 0 if ($area eq '007B')
923 0 0 if ($area eq '044F')
943 0 0 if ($Ham::Device::FT817COMM::output eq $lock)
944 0 0 if ($Ham::Device::FT817COMM::verbose)
948 0 0 if ($lock ne 'ON' and $lock ne 'OFF')
949 0 0 if ($Ham::Device::FT817COMM::verbose)
952 0 0 if ($lock eq 'ON')
953 0 0 if ($lock eq 'OFF')
955 0 0 if ($Ham::Device::FT817COMM::verbose)
956 0 0 if $Ham::Device::FT817COMM::output eq '00'
957 0 0 if $Ham::Device::FT817COMM::output eq 'f0'
969 0 0 if ($ptt ne 'ON' and $ptt ne 'OFF')
970 0 0 if ($Ham::Device::FT817COMM::verbose)
974 0 0 if ($ptt eq 'ON')
975 0 0 if ($ptt eq 'OFF')
977 0 0 if ($Ham::Device::FT817COMM::verbose)
978 0 0 if $Ham::Device::FT817COMM::output eq '00'
979 0 0 if $Ham::Device::FT817COMM::output eq 'f0'
993 0 0 if ($Ham::Device::FT817COMM::output eq $newfrequency)
994 0 0 if ($Ham::Device::FT817COMM::verbose)
998 0 0 if (not $newfrequency =~ /\D/u and length $newfrequency == '8') { }
1010 0 0 if ($Ham::Device::FT817COMM::verbose)
1011 0 0 if $Ham::Device::FT817COMM::output eq '00'
1012 0 0 if $Ham::Device::FT817COMM::output eq 'f0'
1024 0 0 if ($Ham::Device::FT817COMM::output eq $newmode)
1025 0 0 if ($Ham::Device::FT817COMM::verbose)
1031 0 0 if ($mode eq '')
1032 0 0 if ($Ham::Device::FT817COMM::verbose)
1036 0 0 if ($Ham::Device::FT817COMM::verbose)
1037 0 0 if $Ham::Device::FT817COMM::output eq '00'
1038 0 0 if not $mode or $Ham::Device::FT817COMM::output ne '00'
1050 0 0 if ($clarifier ne 'ON' and $clarifier ne 'OFF')
1051 0 0 if ($Ham::Device::FT817COMM::verbose)
1055 0 0 if ($clarifier eq 'ON')
1056 0 0 if ($clarifier eq 'OFF')
1058 0 0 if ($Ham::Device::FT817COMM::verbose)
1059 0 0 if $Ham::Device::FT817COMM::output eq '00'
1060 0 0 if $Ham::Device::FT817COMM::output eq 'f0'
1071 0 0 if ($polarity ne 'POS' and $polarity ne 'NEG')
1072 0 0 if ($Ham::Device::FT817COMM::verbose)
1077 0 0 if (not $frequency =~ /\D/u and length $frequency == '4') { }
1085 0 0 if ($polarity eq 'POS')
1086 0 0 if ($polarity eq 'NEG')
1087 0 0 if ($p)
0 0 if ($frequency)
1090 0 0 if ($Ham::Device::FT817COMM::verbose)
1091 0 0 unless $frequency
1092 0 0 if $Ham::Device::FT817COMM::output eq '00'
1093 0 0 if $Ham::Device::FT817COMM::output eq 'f0'
1102 0 0 if ($Ham::Device::FT817COMM::verbose)
1103 0 0 if $Ham::Device::FT817COMM::output eq '00'
1104 0 0 if $Ham::Device::FT817COMM::output eq 'f0'
1116 0 0 if ($split ne 'ON' and $split ne 'OFF')
1117 0 0 if ($Ham::Device::FT817COMM::verbose)
1120 0 0 if ($split eq 'ON')
1121 0 0 if ($split eq 'OFF')
1125 0 0 if ($Ham::Device::FT817COMM::verbose)
1126 0 0 if $Ham::Device::FT817COMM::output eq '00'
1127 0 0 if $Ham::Device::FT817COMM::output eq 'f0'
1139 0 0 if ($offsetmode ne 'POS' and $offsetmode ne 'NEG' and $offsetmode ne 'SIMPLEX')
1140 0 0 if ($Ham::Device::FT817COMM::verbose)
1144 0 0 if ($offsetmode eq 'POS')
1145 0 0 if ($offsetmode eq 'NEG')
1146 0 0 if ($offsetmode eq 'SIMPLEX')
1148 0 0 if ($Ham::Device::FT817COMM::verbose)
1149 0 0 if $datablock
1150 0 0 unless $datablock
1160 0 0 if (not $frequency =~ /\D/u and length $frequency == '8') { }
1171 0 0 if ($Ham::Device::FT817COMM::verbose)
1172 0 0 unless $frequency
1173 0 0 if $Ham::Device::FT817COMM::output eq '00'
1174 0 0 if $Ham::Device::FT817COMM::output eq 'f0'
1186 0 0 if ($ctcssdcs ne 'DCS' and $ctcssdcs ne 'CTCSS' and $ctcssdcs ne 'ON' and $ctcssdcs ne 'OFF')
1187 0 0 if ($Ham::Device::FT817COMM::verbose)
1191 0 0 if ($ctcssdcs eq 'DCS')
1192 0 0 if ($ctcssdcs eq 'CTCSS')
1193 0 0 if ($ctcssdcs eq 'ON')
1194 0 0 if ($ctcssdcs eq 'OFF')
1196 0 0 if ($Ham::Device::FT817COMM::verbose)
1197 0 0 if $data
1198 0 0 unless $data
1208 0 0 if (not $tonefreq =~ /\D/u and length $tonefreq == '4') { }
1215 0 0 unless $tonefreq
1218 0 0 if ($tonefreq)
1219 0 0 if ($Ham::Device::FT817COMM::verbose)
1220 0 0 unless $tonefreq
1221 0 0 if $Ham::Device::FT817COMM::output eq '00'
1223 0 0 if ($Ham::Device::FT817COMM::output eq 'f0')
1229 0 0 if ($columns == 7)
1242 0 0 if (not $code =~ /\D/u and length $code == '4') { }
1249 0 0 if (not $code and $Ham::Device::FT817COMM::verbose)
1252 0 0 if ($code)
1253 0 0 if ($Ham::Device::FT817COMM::verbose)
1254 0 0 unless $code
1255 0 0 if $Ham::Device::FT817COMM::output eq '00'
1256 0 0 if ($Ham::Device::FT817COMM::output eq 'f0')
1262 0 0 if ($columns == 7)
1276 0 0 unless ($option)
1286 0 0 if ($sq == 0)
1287 0 0 if ($sq == 1)
1288 0 0 if ($ctcssmatch == 0)
1289 0 0 if ($ctcssmatch == 1)
1290 0 0 if ($descriminator == 0)
1291 0 0 if ($descriminator == 1)
1292 0 0 if ($Ham::Device::FT817COMM::verbose)
1298 0 0 if ($option eq 'VARIABLES')
1301 0 0 if ($option eq 'HASH')
1313 0 0 unless ($option)
1322 0 0 if ($pttvalue == 0)
1323 0 0 if ($pttvalue == 1)
1324 0 0 if ($highswrvalue == 0)
1325 0 0 if ($highswrvalue == 1)
1326 0 0 if ($splitvalue == 0)
1327 0 0 if ($splitvalue == 1)
1328 0 0 if ($Ham::Device::FT817COMM::verbose)
1334 0 0 if ($option eq 'VARIABLES')
1337 0 0 if ($option eq 'HASH')
1352 0 0 if ($formatted == 1)
1357 0 0 if ($Ham::Device::FT817COMM::verbose)
1369 0 0 if ($Ham::Device::FT817COMM::verbose)
1379 0 0 if ($powerset ne 'ON' and $powerset ne 'OFF')
1380 0 0 if ($Ham::Device::FT817COMM::verbose)
1385 0 0 if ($powerset eq 'ON')
1386 0 0 if ($powerset eq 'OFF')
1389 0 0 if ($Ham::Device::FT817COMM::verbose)
1390 0 0 if $Ham::Device::FT817COMM::output eq '00'
1391 0 0 unless $Ham::Device::FT817COMM::output
1414 0 0 unless ($address2)
1415 0 0 if ($Ham::Device::FT817COMM::verbose)
1416 0 0 if (not $address1 or length $address1 != 4)
1420 0 0 if ($address2 and length $address2 != 4)
1425 0 0 if ($times < 0)
1447 0 0 if ($times == 1) { }
1469 0 0 if ($Ham::Device::FT817COMM::verbose)
1488 0 0 if ($Ham::Device::FT817COMM::verbose)
1507 0 0 unless ($option)
1512 0 0 if ($option eq 'CONSOLE')
1513 0 0 if ($Ham::Device::FT817COMM::verbose)
1519 0 0 if ($Ham::Device::FT817COMM::verbose and $option eq 'DIGEST')
1522 0 0 if ($option eq 'FILE')
1523 0 0 unless ($filename)
1524 0 0 if (-e $filename) { }
1530 0 0 if ($Ham::Device::FT817COMM::verbose)
1531 0 0 unless open FILE, '>>', "$filename"
1539 0 0 if ($option eq 'DIGEST') { }
1543 0 0 if ($size < 2)
1553 0 0 if ($Ham::Device::FT817COMM::verbose)
1560 0 0 if ($size < 2)
1565 0 0 if ($hexsize < 2)
1567 0 0 if ($option eq 'CONSOLE' or $Ham::Device::FT817COMM::verbose)
1570 0 0 if ($buildfile == '1')
1578 0 0 if ($buildfile == '1')
1594 0 0 if ($block55[6] == '0')
1595 0 0 if ($block55[6] == '1')
1596 0 0 if ($Ham::Device::FT817COMM::verbose)
1605 0 0 if ($block55[5] == '0')
1606 0 0 if ($block55[5] == '1')
1607 0 0 if ($Ham::Device::FT817COMM::verbose)
1616 0 0 if ($block55[2] == '0')
1617 0 0 if ($block55[2] == '1')
1618 0 0 if ($Ham::Device::FT817COMM::verbose)
1626 0 0 if ($block55[7] == '0')
1627 0 0 if ($block55[7] == '1')
1628 0 0 if ($Ham::Device::FT817COMM::verbose)
1637 0 0 if ($block55[3] == '1')
1638 0 0 if ($block55[3] == '0')
1639 0 0 if ($Ham::Device::FT817COMM::verbose)
1640 0 0 if ($home eq 'Y')
1641 0 0 if ($home eq 'N')
1651 0 0 if ($block55[1] == '0')
1652 0 0 if ($block55[1] == '1')
1653 0 0 if ($Ham::Device::FT817COMM::verbose)
1665 0 0 if ($Ham::Device::FT817COMM::verbose)
1674 0 0 if ($block55[5] == '0')
1675 0 0 if ($block55[5] == '1')
1676 0 0 if ($Ham::Device::FT817COMM::verbose)
1685 0 0 if ($block55[3] == '0')
1686 0 0 if ($block55[3] == '1')
1687 0 0 if ($Ham::Device::FT817COMM::verbose)
1696 0 0 if ($block55[2] == '0')
1697 0 0 if ($block55[2] == '1')
1698 0 0 if ($Ham::Device::FT817COMM::verbose)
1707 0 0 if ($block55[1] == '1')
1708 0 0 if ($block55[1] == '0')
1709 0 0 if ($Ham::Device::FT817COMM::verbose)
1718 0 0 if ($block55[0] == '1')
1719 0 0 if ($block55[0] == '0')
1720 0 0 if ($Ham::Device::FT817COMM::verbose)
1732 0 0 if ($pwrmtr == '00')
1733 0 0 if ($pwrmtr == '01')
1734 0 0 if ($pwrmtr == '10')
1735 0 0 if ($pwrmtr == '11')
1736 0 0 if ($Ham::Device::FT817COMM::verbose)
1745 0 0 if ($cwpaddle == '0')
1746 0 0 if ($cwpaddle == '1')
1747 0 0 if ($Ham::Device::FT817COMM::verbose)
1756 0 0 if ($kyr == '0')
1757 0 0 if ($kyr == '1')
1758 0 0 if ($Ham::Device::FT817COMM::verbose)
1767 0 0 if ($bk == '0')
1768 0 0 if ($bk == '1')
1769 0 0 if ($Ham::Device::FT817COMM::verbose)
1778 0 0 if ($vlt == '0')
1779 0 0 if ($vlt == '1')
1780 0 0 if ($Ham::Device::FT817COMM::verbose)
1789 0 0 if ($block55[0] == '0')
1790 0 0 if ($block55[0] == '1')
1791 0 0 if ($Ham::Device::FT817COMM::verbose)
1802 0 0 if ($value ne 'A' and $value ne 'B')
1803 0 0 if ($Ham::Device::FT817COMM::verbose)
1807 0 0 if ($value eq 'A')
1808 0 0 if ($value eq 'B')
1810 0 0 if ($Ham::Device::FT817COMM::verbose)
1825 0 0 if ($Ham::Device::FT817COMM::verbose)
1834 0 0 if ($color == '1') { }
1836 0 0 if ($Ham::Device::FT817COMM::verbose)
1845 0 0 if ($backlight == '00')
1846 0 0 if ($backlight == '01')
1847 0 0 if ($backlight == '10')
1848 0 0 if ($Ham::Device::FT817COMM::verbose)
1862 0 0 if ($Ham::Device::FT817COMM::verbose)
1871 0 0 if ($beepfreq == '1')
1872 0 0 if ($beepfreq == '0')
1873 0 0 if ($Ham::Device::FT817COMM::verbose)
1885 0 0 if ($resumescan == '00')
1886 0 0 if ($resumescan == '01')
1887 0 0 if ($resumescan == '10')
1888 0 0 if ($resumescan == '11')
1889 0 0 if ($Ham::Device::FT817COMM::verbose)
1898 0 0 if ($pktrate == '0')
1899 0 0 if ($pktrate == '1')
1900 0 0 if ($Ham::Device::FT817COMM::verbose)
1909 0 0 if ($scope == '0')
1910 0 0 if ($scope == '1')
1911 0 0 if ($Ham::Device::FT817COMM::verbose)
1920 0 0 if ($cwid == '0')
1921 0 0 if ($cwid == '1')
1922 0 0 if ($Ham::Device::FT817COMM::verbose)
1931 0 0 if ($mainstep == '0')
1932 0 0 if ($mainstep == '1')
1933 0 0 if ($Ham::Device::FT817COMM::verbose)
1942 0 0 if ($artsmode == '00')
1943 0 0 if ($artsmode == '01')
1944 0 0 if ($artsmode == '10')
1945 0 0 if ($Ham::Device::FT817COMM::verbose)
1961 0 0 if ($Ham::Device::FT817COMM::verbose)
1970 0 0 if ($lockmode == '00')
1971 0 0 if ($lockmode == '01')
1972 0 0 if ($lockmode == '10')
1973 0 0 if ($Ham::Device::FT817COMM::verbose)
1982 0 0 if ($opfilter == '00')
1983 0 0 if ($opfilter == '01')
1984 0 0 if ($opfilter == '10')
1985 0 0 if ($Ham::Device::FT817COMM::verbose)
2002 0 0 unless ($option)
2003 0 0 if ($Ham::Device::FT817COMM::verbose)
2012 0 0 if ($ars144 == '0') { }
2014 0 0 if ($Ham::Device::FT817COMM::verbose)
2023 0 0 if ($ars430 == '0') { }
2025 0 0 if ($Ham::Device::FT817COMM::verbose)
2034 0 0 if ($sqlbit == '0') { }
2036 0 0 if ($Ham::Device::FT817COMM::verbose)
2051 0 0 if ($Ham::Device::FT817COMM::verbose)
2065 0 0 if ($Ham::Device::FT817COMM::verbose)
2077 0 0 if ($chargetime == '00')
2078 0 0 if ($chargetime == '01')
2079 0 0 if ($chargetime == '10')
2080 0 0 if ($Ham::Device::FT817COMM::verbose)
2092 0 0 if ($Ham::Device::FT817COMM::verbose)
2106 0 0 if ($Ham::Device::FT817COMM::verbose)
2115 0 0 if ($disabledial == '0') { }
2117 0 0 if ($Ham::Device::FT817COMM::verbose)
2132 0 0 if ($Ham::Device::FT817COMM::verbose)
2141 0 0 if ($emergency == '0')
2142 0 0 if ($emergency == '1')
2143 0 0 if ($Ham::Device::FT817COMM::verbose)
2152 0 0 if ($catrate == '00')
2153 0 0 if ($catrate == '01')
2154 0 0 if ($catrate == '10')
2155 0 0 if ($Ham::Device::FT817COMM::verbose)
2169 0 0 if ($apotime == '0')
2170 0 0 if ($Ham::Device::FT817COMM::verbose)
2179 0 0 if ($memgroup == '0')
2180 0 0 if ($memgroup == '1')
2181 0 0 if ($Ham::Device::FT817COMM::verbose)
2190 0 0 if ($digmode == '000')
2191 0 0 if ($digmode == '001')
2192 0 0 if ($digmode == '010')
2193 0 0 if ($digmode == '011')
2194 0 0 if ($digmode == '100')
2195 0 0 if ($Ham::Device::FT817COMM::verbose)
2209 0 0 if ($tottime == 0)
2210 0 0 if ($Ham::Device::FT817COMM::verbose)
2219 0 0 if ($dcsinv == '00')
2220 0 0 if ($dcsinv == '01')
2221 0 0 if ($dcsinv == '10')
2222 0 0 if ($dcsinv == '11')
2223 0 0 if ($Ham::Device::FT817COMM::verbose)
2237 0 0 if ($Ham::Device::FT817COMM::verbose)
2246 0 0 if ($micscan == '0')
2247 0 0 if ($micscan == '1')
2248 0 0 if ($Ham::Device::FT817COMM::verbose)
2262 0 0 if ($Ham::Device::FT817COMM::verbose)
2271 0 0 if ($mickey == '0')
2272 0 0 if ($mickey == '1')
2273 0 0 if ($Ham::Device::FT817COMM::verbose)
2287 0 0 if ($Ham::Device::FT817COMM::verbose)
2301 0 0 if ($Ham::Device::FT817COMM::verbose)
2315 0 0 if ($Ham::Device::FT817COMM::verbose)
2324 0 0 if ($extmenu == '0')
2325 0 0 if ($extmenu == '1')
2326 0 0 if ($Ham::Device::FT817COMM::verbose)
2340 0 0 if ($Ham::Device::FT817COMM::verbose)
2354 0 0 if ($decvalue >= 0 and $decvalue <= 300)
2355 0 0 if ($decvalue > 65235)
2357 0 0 if ($newvalue != '0')
2358 0 0 if ($Ham::Device::FT817COMM::verbose)
2371 0 0 if ($decvalue >= 0 and $decvalue <= 300)
2372 0 0 if ($decvalue > 65235)
2374 0 0 if ($newvalue != '0')
2375 0 0 if ($Ham::Device::FT817COMM::verbose)
2387 0 0 if ($decvalue >= 0 and $decvalue <= 30)
2388 0 0 if ($decvalue > 224)
2390 0 0 if ($newvalue != '0')
2391 0 0 if ($Ham::Device::FT817COMM::verbose)
2403 0 0 if ($decvalue >= 0 and $decvalue <= 30)
2404 0 0 if ($decvalue > 224)
2406 0 0 if ($newvalue != '0')
2407 0 0 if ($Ham::Device::FT817COMM::verbose)
2419 0 0 if ($decvalue >= 0 and $decvalue <= 30)
2420 0 0 if ($decvalue > 224)
2422 0 0 if ($newvalue != '0')
2423 0 0 if ($Ham::Device::FT817COMM::verbose)
2435 0 0 if ($decvalue >= 0 and $decvalue <= 30)
2436 0 0 if ($decvalue > 224)
2438 0 0 if ($newvalue != '0')
2439 0 0 if ($Ham::Device::FT817COMM::verbose)
2451 0 0 if ($Ham::Device::FT817COMM::verbose)
2460 0 0 if ($pri == '0')
2461 0 0 if ($pri == '1')
2462 0 0 if ($Ham::Device::FT817COMM::verbose)
2471 0 0 if ($dw == '0')
2472 0 0 if ($dw == '1')
2473 0 0 if ($Ham::Device::FT817COMM::verbose)
2482 0 0 if ($scn == '00')
2483 0 0 if ($scn == '10')
2484 0 0 if ($scn == '11')
2485 0 0 if ($Ham::Device::FT817COMM::verbose)
2494 0 0 if ($arts == '0')
2495 0 0 if ($arts == '1')
2496 0 0 if ($Ham::Device::FT817COMM::verbose)
2509 0 0 if ($value eq 'HF')
2510 0 0 if ($value eq '6M')
2511 0 0 if ($value eq 'FMBCB')
2512 0 0 if ($value eq 'AIR')
2513 0 0 if ($value eq 'VHF')
2514 0 0 if ($value eq 'UHF')
2515 0 0 if ($antenna == 0)
2516 0 0 if ($antenna == 1)
2517 0 0 if ($value and $value ne 'ALL')
2518 0 0 if ($Ham::Device::FT817COMM::verbose)
2520 0 0 if (not $value or $value eq 'ALL')
2526 0 0 if ($antenna == 0)
2527 0 0 if ($antenna == 1)
2542 0 0 if ($spl == '0')
2543 0 0 if ($spl == '1')
2544 0 0 if ($Ham::Device::FT817COMM::verbose)
2558 0 0 if ($test == '0')
2559 0 0 if ($test == '1')
2560 0 0 if ($Ham::Device::FT817COMM::charger eq 'OFF')
2561 0 0 if ($Ham::Device::FT817COMM::verbose)
2563 0 0 if ($Ham::Device::FT817COMM::charger eq 'ON')
2564 0 0 if ($Ham::Device::FT817COMM::verbose)
2579 0 0 unless ($value)
2580 0 0 if ($vfo ne 'A' and $vfo ne 'B' and $vfo ne 'MTQMB' and $vfo ne 'MTUNE')
2581 0 0 if ($Ham::Device::FT817COMM::verbose)
2585 0 0 if ($vfo eq 'MTQMB')
2586 0 0 if ($vfo eq 'MTUNE')
2589 0 0 if ($testvfoband eq '')
2590 0 0 if ($band ne 'MTQMB' and $band ne 'MTUNE')
2591 0 0 if ($Ham::Device::FT817COMM::verbose)
2597 0 0 if (not $testoptions and $value ne 'ALL')
2598 0 0 if ($Ham::Device::FT817COMM::verbose)
2604 0 0 if ($columns == 7)
2610 0 0 if ($vfo eq 'A')
2611 0 0 if ($vfo eq 'B')
2613 0 0 if ($value eq 'MODE' or $value eq 'ALL')
2620 0 0 if ($Ham::Device::FT817COMM::verbose)
2621 0 0 if ($value eq 'ALL') { }
2628 0 0 if ($value eq 'NARFM' or $value eq 'ALL')
2634 0 0 if ($Ham::Device::FT817COMM::output == '0')
2635 0 0 if ($Ham::Device::FT817COMM::output == '1')
2636 0 0 if ($Ham::Device::FT817COMM::verbose)
2637 0 0 if ($value eq 'ALL') { }
2643 0 0 if ($value eq 'NARCWDIG' or $value eq 'ALL')
2649 0 0 if ($Ham::Device::FT817COMM::output == '0')
2650 0 0 if ($Ham::Device::FT817COMM::output == '1')
2651 0 0 if ($Ham::Device::FT817COMM::verbose)
2652 0 0 if ($value eq 'ALL') { }
2658 0 0 if ($value eq 'RPTOFFSET' or $value eq 'ALL')
2664 0 0 if ($Ham::Device::FT817COMM::output == '00')
2665 0 0 if ($Ham::Device::FT817COMM::output == '01')
2666 0 0 if ($Ham::Device::FT817COMM::output == '10')
2667 0 0 if ($Ham::Device::FT817COMM::output == '11')
2668 0 0 if ($Ham::Device::FT817COMM::verbose)
2669 0 0 if ($value eq 'ALL') { }
2675 0 0 if ($value eq 'TONEDCS' or $value eq 'ALL')
2681 0 0 if ($Ham::Device::FT817COMM::output == '00')
2682 0 0 if ($Ham::Device::FT817COMM::output == '01')
2683 0 0 if ($Ham::Device::FT817COMM::output == '10')
2684 0 0 if ($Ham::Device::FT817COMM::output == '11')
2685 0 0 if ($Ham::Device::FT817COMM::verbose)
2686 0 0 if ($value eq 'ALL') { }
2692 0 0 if ($value eq 'ATT' or $value eq 'ALL')
2698 0 0 if ($Ham::Device::FT817COMM::output == '0')
2699 0 0 if ($Ham::Device::FT817COMM::output == '1')
2700 0 0 if ($Ham::Device::FT817COMM::verbose)
2701 0 0 if ($value eq 'ALL') { }
2707 0 0 if ($value eq 'IPO' or $value eq 'ALL')
2713 0 0 if ($Ham::Device::FT817COMM::output == '0')
2714 0 0 if ($Ham::Device::FT817COMM::output == '1')
2715 0 0 if ($Ham::Device::FT817COMM::verbose)
2716 0 0 if ($value eq 'ALL') { }
2722 0 0 if ($value eq 'FMSTEP' or $value eq 'ALL')
2728 0 0 if ($Ham::Device::FT817COMM::verbose)
2729 0 0 if ($value eq 'ALL') { }
2735 0 0 if ($value eq 'AMSTEP' or $value eq 'ALL')
2741 0 0 if ($Ham::Device::FT817COMM::verbose)
2742 0 0 if ($value eq 'ALL') { }
2748 0 0 if ($value eq 'SSBSTEP' or $value eq 'ALL')
2754 0 0 if ($Ham::Device::FT817COMM::output == '00')
2755 0 0 if ($Ham::Device::FT817COMM::output == '01')
2756 0 0 if ($Ham::Device::FT817COMM::output == '10')
2757 0 0 if ($Ham::Device::FT817COMM::verbose)
2758 0 0 if ($value eq 'ALL') { }
2764 0 0 if ($value eq 'CTCSSTONE' or $value eq 'ALL')
2771 0 0 if ($Ham::Device::FT817COMM::verbose)
2772 0 0 if ($value eq 'ALL') { }
2778 0 0 if ($value eq 'DCSCODE' or $value eq 'ALL')
2785 0 0 if ($Ham::Device::FT817COMM::verbose)
2786 0 0 if ($value eq 'ALL') { }
2792 0 0 if ($value eq 'CLARIFIER' or $value eq 'ALL')
2798 0 0 if ($Ham::Device::FT817COMM::output == '1')
2799 0 0 if ($Ham::Device::FT817COMM::output == '0')
2800 0 0 if ($Ham::Device::FT817COMM::verbose)
2801 0 0 if ($value eq 'ALL') { }
2807 0 0 if ($value eq 'CLAROFFSET' or $value eq 'ALL')
2815 0 0 if ($decvalue > 999)
2816 0 0 if ($decvalue >= 0 and $decvalue <= 999)
2818 0 0 if ($vallength == 1)
2819 0 0 if ($vallength == 2)
2820 0 0 if ($vallength == 3)
2825 0 0 if ($vallength == 4)
2831 0 0 if ($Ham::Device::FT817COMM::verbose)
2832 0 0 if ($value eq 'ALL') { }
2838 0 0 if ($value eq 'RXFREQ' or $value eq 'ALL')
2849 0 0 if ($Ham::Device::FT817COMM::verbose)
2850 0 0 if ($value eq 'ALL') { }
2856 0 0 if ($value eq 'RPTOFFSETFREQ' or $value eq 'ALL')
2866 0 0 if ($Ham::Device::FT817COMM::verbose)
2867 0 0 if ($value eq 'ALL') { }
2872 0 0 if ($value eq 'ALL')
2888 0 0 if ($Ham::Device::FT817COMM::output == '201')
2889 0 0 if ($Ham::Device::FT817COMM::output == '202')
2890 0 0 if ($Ham::Device::FT817COMM::verbose)
2902 0 0 if ($number eq 'M-PL')
2903 0 0 if ($number eq 'M-PU')
2904 0 0 if ($number < 1 or $number > 202)
2905 0 0 if ($Ham::Device::FT817COMM::verbose)
2913 0 0 if ($test == '0')
2914 0 0 if ($test == '1')
2915 0 0 if ($Ham::Device::FT817COMM::verbose)
2923 0 0 if ($Ham::Device::FT817COMM::verbose)
2931 0 0 if ($Ham::Device::FT817COMM::output eq 'ACTIVE')
2942 0 0 if ($encoder eq 'TONE' or $encoder eq 'TONETSQ') { }
0 0 elsif ($encoder eq 'DCS') { }
2950 0 0 if ($currentmem == '201')
2951 0 0 if ($currentmem == '202')
2953 0 0 if ($Ham::Device::FT817COMM::verbose)
2960 0 0 if ($Ham::Device::FT817COMM::verbose)
2972 0 0 if ($subtype eq 'M-PL')
2973 0 0 if ($subtype eq 'M-PU')
2978 0 0 unless ($value)
2979 0 0 if ($type ne 'HOME' and $type ne 'QMB' and $type ne 'M-PL' and $type ne 'M-PU' and $type ne 'MEM')
2980 0 0 if ($Ham::Device::FT817COMM::verbose)
2985 0 0 if (not $testoptions and $value ne 'ALL')
2986 0 0 if ($Ham::Device::FT817COMM::verbose)
2992 0 0 if ($columns == 7)
2998 0 0 if ($type eq 'HOME')
2999 0 0 if ($type eq 'QMB')
3000 0 0 if ($type eq 'MEM')
3002 0 0 if ($type eq 'MEM')
3003 0 0 if ($memnum > 1)
3009 0 0 if ($value eq 'READY' or $value eq 'ALL')
3015 0 0 if ($Ham::Device::FT817COMM::output == '0')
3016 0 0 if ($Ham::Device::FT817COMM::output == '1')
3017 0 0 if ($Ham::Device::FT817COMM::verbose)
3021 0 0 if ($value eq 'MODE' or $value eq 'ALL')
3028 0 0 if ($Ham::Device::FT817COMM::verbose)
3029 0 0 if ($value eq 'ALL') { }
3035 0 0 if ($value eq 'HFVHF' or $value eq 'ALL')
3041 0 0 if ($Ham::Device::FT817COMM::output == '0')
3042 0 0 if ($Ham::Device::FT817COMM::output == '1')
3043 0 0 if ($Ham::Device::FT817COMM::verbose)
3044 0 0 if ($value eq 'ALL') { }
3050 0 0 if ($value eq 'TAG' or $value eq 'ALL')
3056 0 0 if ($Ham::Device::FT817COMM::output == '0')
3057 0 0 if ($Ham::Device::FT817COMM::output == '1')
3058 0 0 if ($Ham::Device::FT817COMM::verbose)
3059 0 0 if ($value eq 'ALL') { }
3065 0 0 if ($value eq 'FREQRANGE' or $value eq 'ALL')
3071 0 0 if ($Ham::Device::FT817COMM::output == '000')
3072 0 0 if ($Ham::Device::FT817COMM::output == '001')
3073 0 0 if ($Ham::Device::FT817COMM::output == '010')
3074 0 0 if ($Ham::Device::FT817COMM::output == '011')
3075 0 0 if ($Ham::Device::FT817COMM::output == '100')
3076 0 0 if ($Ham::Device::FT817COMM::output == '101')
3077 0 0 if ($Ham::Device::FT817COMM::verbose)
3078 0 0 if ($value eq 'ALL') { }
3084 0 0 if ($value eq 'NARFM' or $value eq 'ALL')
3090 0 0 if ($Ham::Device::FT817COMM::output == '0')
3091 0 0 if ($Ham::Device::FT817COMM::output == '1')
3092 0 0 if ($Ham::Device::FT817COMM::verbose)
3093 0 0 if ($value eq 'ALL') { }
3099 0 0 if ($value eq 'NARCWDIG' or $value eq 'ALL')
3105 0 0 if ($Ham::Device::FT817COMM::output == '0')
3106 0 0 if ($Ham::Device::FT817COMM::output == '1')
3107 0 0 if ($Ham::Device::FT817COMM::verbose)
3108 0 0 if ($value eq 'ALL') { }
3114 0 0 if ($value eq 'UHF' or $value eq 'ALL')
3120 0 0 if ($Ham::Device::FT817COMM::output == '0')
3121 0 0 if ($Ham::Device::FT817COMM::output == '1')
3122 0 0 if ($Ham::Device::FT817COMM::verbose)
3123 0 0 if ($value eq 'ALL') { }
3129 0 0 if ($value eq 'RPTOFFSET' or $value eq 'ALL')
3135 0 0 if ($Ham::Device::FT817COMM::output == '00')
3136 0 0 if ($Ham::Device::FT817COMM::output == '01')
3137 0 0 if ($Ham::Device::FT817COMM::output == '10')
3138 0 0 if ($Ham::Device::FT817COMM::output == '11')
3139 0 0 if ($Ham::Device::FT817COMM::verbose)
3140 0 0 if ($value eq 'ALL') { }
3146 0 0 if ($value eq 'TONEDCS' or $value eq 'ALL')
3152 0 0 if ($Ham::Device::FT817COMM::output == '00')
3153 0 0 if ($Ham::Device::FT817COMM::output == '01')
3154 0 0 if ($Ham::Device::FT817COMM::output == '10')
3155 0 0 if ($Ham::Device::FT817COMM::output == '11')
3156 0 0 if ($Ham::Device::FT817COMM::verbose)
3157 0 0 if ($value eq 'ALL') { }
3163 0 0 if ($value eq 'ATT' or $value eq 'ALL')
3169 0 0 if ($Ham::Device::FT817COMM::output == '0')
3170 0 0 if ($Ham::Device::FT817COMM::output == '1')
3171 0 0 if ($Ham::Device::FT817COMM::verbose)
3172 0 0 if ($value eq 'ALL') { }
3178 0 0 if ($value eq 'IPO' or $value eq 'ALL')
3184 0 0 if ($Ham::Device::FT817COMM::output == '0')
3185 0 0 if ($Ham::Device::FT817COMM::output == '1')
3186 0 0 if ($Ham::Device::FT817COMM::verbose)
3187 0 0 if ($value eq 'ALL') { }
3193 0 0 if ($value eq 'MEMSKIP' or $value eq 'ALL')
3199 0 0 if ($Ham::Device::FT817COMM::output == '0')
3200 0 0 if ($Ham::Device::FT817COMM::output == '1')
3201 0 0 if ($Ham::Device::FT817COMM::verbose)
3202 0 0 if ($value eq 'ALL') { }
3208 0 0 if ($value eq 'FMSTEP' or $value eq 'ALL')
3214 0 0 if ($Ham::Device::FT817COMM::verbose)
3215 0 0 if ($value eq 'ALL') { }
3221 0 0 if ($value eq 'AMSTEP' or $value eq 'ALL')
3227 0 0 if ($Ham::Device::FT817COMM::verbose)
3228 0 0 if ($value eq 'ALL') { }
3234 0 0 if ($value eq 'SSBSTEP' or $value eq 'ALL')
3240 0 0 if ($Ham::Device::FT817COMM::output == '00')
3241 0 0 if ($Ham::Device::FT817COMM::output == '01')
3242 0 0 if ($Ham::Device::FT817COMM::output == '10')
3243 0 0 if ($Ham::Device::FT817COMM::verbose)
3244 0 0 if ($value eq 'ALL') { }
3250 0 0 if ($value eq 'CTCSSTONE' or $value eq 'ALL')
3257 0 0 if ($Ham::Device::FT817COMM::verbose)
3258 0 0 if ($value eq 'ALL') { }
3264 0 0 if ($value eq 'DCSCODE' or $value eq 'ALL')
3271 0 0 if ($Ham::Device::FT817COMM::verbose)
3272 0 0 if ($value eq 'ALL') { }
3278 0 0 if ($value eq 'CLARIFIER' or $value eq 'ALL')
3284 0 0 if ($Ham::Device::FT817COMM::output == '1')
3285 0 0 if ($Ham::Device::FT817COMM::output == '0')
3286 0 0 if ($Ham::Device::FT817COMM::verbose)
3287 0 0 if ($value eq 'ALL') { }
3293 0 0 if ($value eq 'CLAROFFSET' or $value eq 'ALL')
3300 0 0 if ($decvalue > 999)
3301 0 0 if ($decvalue >= 0 and $decvalue <= 999)
3303 0 0 if ($vallength == 1)
3304 0 0 if ($vallength == 2)
3305 0 0 if ($vallength == 3)
3310 0 0 if ($vallength == 4)
3316 0 0 if ($Ham::Device::FT817COMM::verbose)
3317 0 0 if ($value eq 'ALL') { }
3323 0 0 if ($value eq 'RXFREQ' or $value eq 'ALL')
3334 0 0 if ($Ham::Device::FT817COMM::verbose)
3335 0 0 if ($value eq 'ALL') { }
3341 0 0 if ($value eq 'RPTOFFSETFREQ' or $value eq 'ALL')
3351 0 0 if ($Ham::Device::FT817COMM::verbose)
3352 0 0 if ($value eq 'ALL') { }
3358 0 0 if ($value eq 'LABEL' or $value eq 'ALL')
3375 0 0 unless ($label)
3376 0 0 if ($Ham::Device::FT817COMM::verbose)
3377 0 0 if ($value eq 'ALL') { }
3382 0 0 if ($value eq 'ALL')
3415 0 0 if ($Ham::Device::FT817COMM::verbose)
3431 0 0 if ($Ham::Device::FT817COMM::writeallow != '1' and $Ham::Device::FT817COMM::agreewithwarning != '1')
3432 0 0 if ($Ham::Device::FT817COMM::debug or $Ham::Device::FT817COMM::verbose)
3436 0 0 unless ($calfile)
3437 0 0 if ($Ham::Device::FT817COMM::verbose)
3440 0 0 unless open CALFILE, "$calfile"
3441 0 0 if ($error) { }
3442 0 0 if ($Ham::Device::FT817COMM::verbose)
3453 0 0 if ($Ham::Device::FT817COMM::verbose)
3456 0 0 if ($test ne '00')
3458 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if (length($ln[0]) + length($ln[3]) != 6)
3461 0 0 if ($linecount != '77')
3462 0 0 if ($error) { }
3463 0 0 if ($Ham::Device::FT817COMM::verbose)
3470 0 0 if ($Ham::Device::FT817COMM::verbose)
3473 0 0 if ($Ham::Device::FT817COMM::verbose)
3476 0 0 if ($test ne '00')
3477 0 0 if ($skip == 0)
3478 0 0 if ($skip == 1)
3479 0 0 if ($Ham::Device::FT817COMM::verbose)
3482 0 0 if ($writestatus ne 'OK')
3486 0 0 if (not $error) { }
3487 0 0 if ($Ham::Device::FT817COMM::verbose)
3490 0 0 if ($Ham::Device::FT817COMM::verbose)
3503 0 0 if ($Ham::Device::FT817COMM::writeallow != '1' and $Ham::Device::FT817COMM::agreewithwarning != '1')
3504 0 0 if ($Ham::Device::FT817COMM::debug or $Ham::Device::FT817COMM::verbose)
3507 0 0 unless ($cfgfile)
3508 0 0 if ($Ham::Device::FT817COMM::verbose)
3511 0 0 unless open CFGFILE, "$cfgfile"
3512 0 0 if ($error) { }
3513 0 0 if ($Ham::Device::FT817COMM::verbose)
3525 0 0 if ($Ham::Device::FT817COMM::verbose)
3528 0 0 if ($test < 1)
3530 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 unless ($ln[0] or $ln[1] or $ln[2])
3533 0 0 if ($linecount != '50')
3534 0 0 if ($error) { }
3535 0 0 if ($Ham::Device::FT817COMM::verbose)
3539 0 0 if ($Ham::Device::FT817COMM::verbose)
3542 0 0 if ($Ham::Device::FT817COMM::verbose)
3545 0 0 if ($test < 1)
3548 0 0 if ($Ham::Device::FT817COMM::verbose)
3560 0 0 if ($Ham::Device::FT817COMM::verbose)
3572 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 unless ($value)
3573 0 0 if (-e $value)
3574 0 0 unless open FILE, '>>', "$value"
3579 0 0 if ($Ham::Device::FT817COMM::verbose)
3584 0 0 if ($ready eq 'YES')
3590 0 0 if ($currentmem > 1)
3601 0 0 if ($Ham::Device::FT817COMM::verbose)
3607 0 0 if ($size < 2)
3609 0 0 if ($size < 2)
3620 0 0 if ($Ham::Device::FT817COMM::verbose)
3633 0 0 if ($Ham::Device::FT817COMM::writeallow != '1' and $Ham::Device::FT817COMM::agreewithwarning != '1')
3634 0 0 if ($Ham::Device::FT817COMM::debug or $Ham::Device::FT817COMM::verbose)
3637 0 0 unless ($memfile)
3638 0 0 if ($Ham::Device::FT817COMM::verbose)
3641 0 0 unless open MEMFILE, "$memfile"
3642 0 0 if ($error) { }
3643 0 0 if ($Ham::Device::FT817COMM::verbose)
3655 0 0 if ($Ham::Device::FT817COMM::verbose)
3659 0 0 if ($test < 1)
3661 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 unless ($ln[0] or $ln[1])
3664 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($testnumber != '26')
3667 0 0 if ($error)
3668 0 0 if ($Ham::Device::FT817COMM::verbose)
3671 0 0 if ($Ham::Device::FT817COMM::verbose)
3673 0 0 if ($Ham::Device::FT817COMM::verbose)
3682 0 0 if ($test < 1)
3684 0 0 if ($ln[0] > 1)
3694 0 0 if ($Ham::Device::FT817COMM::verbose)
3700 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus ne 'OK')
3704 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 unless ($error)
3707 0 0 if (not $error) { }
3708 0 0 if ($Ham::Device::FT817COMM::verbose)
3711 0 0 if ($Ham::Device::FT817COMM::verbose)
3725 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 unless ($value)
3727 0 0 if (-e $value)
3728 0 0 unless open FILE, '>>', "$value"
3786 0 0 if ($Ham::Device::FT817COMM::verbose)
3796 0 0 if ($value ne 'MTUNE' and $value ne 'MEMORY')
3797 0 0 if ($Ham::Device::FT817COMM::verbose)
3803 0 0 if ($value eq $currentmtune)
3804 0 0 if ($Ham::Device::FT817COMM::verbose)
3807 0 0 if ($value eq 'MTUNE')
3808 0 0 if ($value eq 'MEMORY')
3809 0 0 if ($Ham::Device::FT817COMM::verbose)
3810 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
3821 0 0 if ($value ne 'ON' and $value ne 'OFF')
3822 0 0 if ($Ham::Device::FT817COMM::verbose)
3828 0 0 if ($value eq $currentmtqmb)
3829 0 0 if ($Ham::Device::FT817COMM::verbose)
3832 0 0 if ($value eq 'ON')
3833 0 0 if ($value eq 'OFF')
3834 0 0 if ($Ham::Device::FT817COMM::verbose)
3835 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
3846 0 0 if ($value ne 'ON' and $value ne 'OFF')
3847 0 0 if ($Ham::Device::FT817COMM::verbose)
3853 0 0 if ($value eq $currentqmb)
3854 0 0 if ($Ham::Device::FT817COMM::verbose)
3857 0 0 if ($value eq 'ON')
3858 0 0 if ($value eq 'OFF')
3859 0 0 if ($Ham::Device::FT817COMM::verbose)
3860 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
3871 0 0 if ($value ne 'ON' and $value ne 'OFF')
3872 0 0 if ($Ham::Device::FT817COMM::verbose)
3878 0 0 if ($value eq $currenthome)
3879 0 0 if ($Ham::Device::FT817COMM::verbose)
3882 0 0 if ($value eq 'ON')
3883 0 0 if ($value eq 'OFF')
3884 0 0 if ($Ham::Device::FT817COMM::verbose)
3885 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
3896 0 0 if ($value ne 'A' and $value ne 'B')
3897 0 0 if ($Ham::Device::FT817COMM::verbose)
3903 0 0 if ($value eq $currentvfo)
3904 0 0 if ($Ham::Device::FT817COMM::verbose)
3907 0 0 if ($value eq 'A')
3908 0 0 if ($value eq 'B')
3909 0 0 if ($Ham::Device::FT817COMM::verbose)
3910 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
3921 0 0 if ($value ne 'MEMORY' and $value ne 'VFO')
3922 0 0 if ($Ham::Device::FT817COMM::verbose)
3928 0 0 if ($value eq $currenttuner)
3929 0 0 if ($Ham::Device::FT817COMM::verbose)
3932 0 0 if ($value eq 'MEMORY')
3933 0 0 if ($value eq 'VFO')
3934 0 0 if ($Ham::Device::FT817COMM::verbose)
3935 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
3947 0 0 if ($value ne 'AUTO' and $value ne 'SLOW' and $value ne 'FAST' and $value ne 'OFF')
3948 0 0 if ($Ham::Device::FT817COMM::verbose)
3954 0 0 if ($value eq $currentagc)
3955 0 0 if ($Ham::Device::FT817COMM::verbose)
3959 0 0 if ($value eq 'OFF')
3960 0 0 if ($value eq 'SLOW')
3961 0 0 if ($value eq 'FAST')
3962 0 0 if ($value eq 'AUTO')
3965 0 0 if ($Ham::Device::FT817COMM::verbose)
3966 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
3978 0 0 if ($value ne 'ON' and $value ne 'OFF')
3979 0 0 if ($Ham::Device::FT817COMM::verbose)
3985 0 0 if ($value eq $currentnb)
3986 0 0 if ($Ham::Device::FT817COMM::verbose)
3989 0 0 if ($value eq 'ON')
3990 0 0 if ($value eq 'OFF')
3991 0 0 if ($Ham::Device::FT817COMM::verbose)
3992 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4004 0 0 if ($value ne 'ON' and $value ne 'OFF')
4005 0 0 if ($Ham::Device::FT817COMM::verbose)
4011 0 0 if ($value eq $currentdsp)
4012 0 0 if ($Ham::Device::FT817COMM::verbose)
4015 0 0 if ($value eq 'ON')
4016 0 0 if ($value eq 'OFF')
4017 0 0 if ($Ham::Device::FT817COMM::verbose)
4018 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4030 0 0 if ($value ne 'ON' and $value ne 'OFF')
4031 0 0 if ($Ham::Device::FT817COMM::verbose)
4037 0 0 if ($value eq $currentpbt)
4038 0 0 if ($Ham::Device::FT817COMM::verbose)
4041 0 0 if ($value eq 'ON')
4042 0 0 if ($value eq 'OFF')
4043 0 0 if ($Ham::Device::FT817COMM::verbose)
4044 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4056 0 0 if ($value ne 'ON' and $value ne 'OFF')
4057 0 0 if ($Ham::Device::FT817COMM::verbose)
4063 0 0 if ($value eq $currentlock)
4064 0 0 if ($Ham::Device::FT817COMM::verbose)
4067 0 0 if ($value eq 'ON')
4068 0 0 if ($value eq 'OFF')
4069 0 0 if ($Ham::Device::FT817COMM::verbose)
4070 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4082 0 0 if ($value ne 'ON' and $value ne 'OFF')
4083 0 0 if ($Ham::Device::FT817COMM::verbose)
4089 0 0 if ($value eq $currenttuning)
4090 0 0 if ($Ham::Device::FT817COMM::verbose)
4093 0 0 if ($value eq 'ON')
4094 0 0 if ($value eq 'OFF')
4095 0 0 if ($Ham::Device::FT817COMM::verbose)
4096 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4108 0 0 if ($value ne 'PWR' and $value ne 'ALC' and $value ne 'SWR' and $value ne 'MOD')
4109 0 0 if ($Ham::Device::FT817COMM::verbose)
4115 0 0 if ($value eq $currentpwrmtr)
4116 0 0 if ($Ham::Device::FT817COMM::verbose)
4120 0 0 if ($value eq 'PWR')
4121 0 0 if ($value eq 'ALC')
4122 0 0 if ($value eq 'SWR')
4123 0 0 if ($value eq 'MOD')
4126 0 0 if ($Ham::Device::FT817COMM::verbose)
4127 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4139 0 0 if ($value ne 'NORMAL' and $value ne 'REVERSE')
4140 0 0 if ($Ham::Device::FT817COMM::verbose)
4146 0 0 if ($value eq $currentcwpaddle)
4147 0 0 if ($Ham::Device::FT817COMM::verbose)
4150 0 0 if ($value eq 'NORMAL')
4151 0 0 if ($value eq 'REVERSE')
4152 0 0 if ($Ham::Device::FT817COMM::verbose)
4153 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4165 0 0 if ($value ne 'ON' and $value ne 'OFF')
4166 0 0 if ($Ham::Device::FT817COMM::verbose)
4172 0 0 if ($value eq $currentkyr)
4173 0 0 if ($Ham::Device::FT817COMM::verbose)
4176 0 0 if ($value eq 'ON')
4177 0 0 if ($value eq 'OFF')
4178 0 0 if ($Ham::Device::FT817COMM::verbose)
4179 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4191 0 0 if ($value ne 'ON' and $value ne 'OFF')
4192 0 0 if ($Ham::Device::FT817COMM::verbose)
4198 0 0 if ($value eq $currentbk)
4199 0 0 if ($Ham::Device::FT817COMM::verbose)
4202 0 0 if ($value eq 'ON')
4203 0 0 if ($value eq 'OFF')
4204 0 0 if ($Ham::Device::FT817COMM::verbose)
4205 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4217 0 0 if ($value ne 'ON' and $value ne 'OFF')
4218 0 0 if ($Ham::Device::FT817COMM::verbose)
4224 0 0 if ($value eq $currentvlt)
4225 0 0 if ($Ham::Device::FT817COMM::verbose)
4228 0 0 if ($value eq 'ON')
4229 0 0 if ($value eq 'OFF')
4230 0 0 if ($Ham::Device::FT817COMM::verbose)
4231 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4243 0 0 if ($value ne 'ON' and $value ne 'OFF')
4244 0 0 if ($Ham::Device::FT817COMM::verbose)
4250 0 0 if ($value eq $currentvox)
4251 0 0 if ($Ham::Device::FT817COMM::verbose)
4254 0 0 if ($value eq 'ON')
4255 0 0 if ($value eq 'OFF')
4256 0 0 if ($Ham::Device::FT817COMM::verbose)
4257 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4271 0 0 if ($vfo ne 'A' and $vfo ne 'B')
4272 0 0 if ($Ham::Device::FT817COMM::verbose)
4277 0 0 if ($testvfoband eq '')
4278 0 0 if ($Ham::Device::FT817COMM::verbose)
4284 0 0 if ($currentband eq $value)
4285 0 0 if ($Ham::Device::FT817COMM::verbose)
4289 0 0 if ($vfo eq 'A')
4290 0 0 if ($vfo eq 'B')
4293 0 0 if ($Ham::Device::FT817COMM::verbose)
4294 0 0 if ($writestatus eq 'OK') { }
4307 0 0 if ($value < 1 or $value > 12)
4308 0 0 if ($Ham::Device::FT817COMM::verbose)
4314 0 0 if ($value eq $currentcontrast)
4315 0 0 if ($Ham::Device::FT817COMM::verbose)
4326 0 0 if ($Ham::Device::FT817COMM::verbose)
4327 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4339 0 0 if ($value ne 'BLUE' and $value ne 'AMBER')
4340 0 0 if ($Ham::Device::FT817COMM::verbose)
4346 0 0 if ($currentcolor eq $value)
4347 0 0 if ($Ham::Device::FT817COMM::verbose)
4350 0 0 if ($value eq 'BLUE')
4351 0 0 if ($value eq 'AMBER')
4352 0 0 if ($Ham::Device::FT817COMM::verbose)
4353 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4365 0 0 if ($value ne 'OFF' and $value ne 'ON' and $value ne 'AUTO')
4366 0 0 if ($Ham::Device::FT817COMM::verbose)
4372 0 0 if ($value eq $currentbacklight)
4373 0 0 if ($Ham::Device::FT817COMM::verbose)
4377 0 0 if ($value eq 'OFF')
4378 0 0 if ($value eq 'ON')
4379 0 0 if ($value eq 'AUTO')
4382 0 0 if ($Ham::Device::FT817COMM::verbose)
4383 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4396 0 0 if ($value < 0 or $value > 100)
4397 0 0 if ($Ham::Device::FT817COMM::verbose)
4403 0 0 if ($value eq $currentbeepvol)
4404 0 0 if ($Ham::Device::FT817COMM::verbose)
4413 0 0 if ($Ham::Device::FT817COMM::verbose)
4414 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4427 0 0 if ($value == '440' and $value == '880')
4428 0 0 if ($Ham::Device::FT817COMM::verbose)
4434 0 0 if ($currentbeepfreq eq $value)
4435 0 0 if ($Ham::Device::FT817COMM::verbose)
4438 0 0 if ($value == '440')
4439 0 0 if ($value == '880')
4440 0 0 if ($Ham::Device::FT817COMM::verbose)
4441 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4454 0 0 if ($value ne 'OFF' and $value ne '3' and $value ne '5' and $value ne '10')
4455 0 0 if ($Ham::Device::FT817COMM::verbose)
4461 0 0 if ($value eq $currentresumescan)
4462 0 0 if ($Ham::Device::FT817COMM::verbose)
4466 0 0 if ($value eq 'OFF')
4467 0 0 if ($value eq '3')
4468 0 0 if ($value eq '5')
4469 0 0 if ($value eq '10')
4472 0 0 if ($Ham::Device::FT817COMM::verbose)
4473 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4485 0 0 if ($value != '1200' and $value != '9600')
4486 0 0 if ($Ham::Device::FT817COMM::verbose)
4492 0 0 if ($currentpktrate eq $value)
4493 0 0 if ($Ham::Device::FT817COMM::verbose)
4496 0 0 if ($value == '1200')
4497 0 0 if ($value == '9600')
4498 0 0 if ($Ham::Device::FT817COMM::verbose)
4499 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4511 0 0 if ($value ne 'CONT' and $value ne 'CHK')
4512 0 0 if ($Ham::Device::FT817COMM::verbose)
4518 0 0 if ($currentscope eq $value)
4519 0 0 if ($Ham::Device::FT817COMM::verbose)
4522 0 0 if ($value eq 'CONT')
4523 0 0 if ($value eq 'CHK')
4524 0 0 if ($Ham::Device::FT817COMM::verbose)
4525 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4537 0 0 if ($value ne 'ON' and $value ne 'OFF')
4538 0 0 if ($Ham::Device::FT817COMM::verbose)
4544 0 0 if ($currentcwid eq $value)
4545 0 0 if ($Ham::Device::FT817COMM::verbose)
4548 0 0 if ($value eq 'OFF')
4549 0 0 if ($value eq 'ON')
4550 0 0 if ($Ham::Device::FT817COMM::verbose)
4551 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4563 0 0 if ($value ne 'COURSE' and $value ne 'FINE')
4564 0 0 if ($Ham::Device::FT817COMM::verbose)
4570 0 0 if ($currentmainstep eq $value)
4571 0 0 if ($Ham::Device::FT817COMM::verbose)
4574 0 0 if ($value eq 'FINE')
4575 0 0 if ($value eq 'COURSE')
4576 0 0 if ($Ham::Device::FT817COMM::verbose)
4577 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4589 0 0 if ($value ne 'OFF' and $value ne 'ALL' and $value ne 'RANGE')
4590 0 0 if ($Ham::Device::FT817COMM::verbose)
4596 0 0 if ($value eq $currentartsmode)
4597 0 0 if ($Ham::Device::FT817COMM::verbose)
4601 0 0 if ($value eq 'OFF')
4602 0 0 if ($value eq 'RANGE')
4603 0 0 if ($value eq 'ALL')
4606 0 0 if ($Ham::Device::FT817COMM::verbose)
4607 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4621 0 0 if ($value < 300 or $value > 1000)
4622 0 0 if ($Ham::Device::FT817COMM::verbose)
4626 0 0 if ($testvalue != '00' and $testvalue != '50')
4627 0 0 if ($Ham::Device::FT817COMM::verbose)
4633 0 0 if ($value eq $currentcwpitch)
4634 0 0 if ($Ham::Device::FT817COMM::verbose)
4646 0 0 if ($Ham::Device::FT817COMM::verbose)
4647 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4659 0 0 if ($value ne 'DIAL' and $value ne 'FREQ' and $value ne 'PANEL')
4660 0 0 if ($Ham::Device::FT817COMM::verbose)
4666 0 0 if ($value eq $currentlockmode)
4667 0 0 if ($Ham::Device::FT817COMM::verbose)
4671 0 0 if ($value eq 'DIAL')
4672 0 0 if ($value eq 'FREQ')
4673 0 0 if ($value eq 'PANEL')
4676 0 0 if ($Ham::Device::FT817COMM::verbose)
4677 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4689 0 0 if ($value ne 'OFF' and $value ne 'SSB' and $value ne 'CW')
4690 0 0 if ($Ham::Device::FT817COMM::verbose)
4696 0 0 if ($value eq $currentopfilter)
4697 0 0 if ($Ham::Device::FT817COMM::verbose)
4701 0 0 if ($value eq 'OFF')
4702 0 0 if ($value eq 'SSB')
4703 0 0 if ($value eq 'CW')
4706 0 0 if ($Ham::Device::FT817COMM::verbose)
4707 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4722 0 0 if ($testvalue < 25 or $testvalue > 45)
4723 0 0 if ($Ham::Device::FT817COMM::verbose)
4730 0 0 if ($currentcwweight eq $testcwweight)
4731 0 0 if ($Ham::Device::FT817COMM::verbose)
4743 0 0 if ($Ham::Device::FT817COMM::verbose)
4744 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4756 0 0 if ($value ne 'ON' and $value ne 'OFF')
4757 0 0 if ($Ham::Device::FT817COMM::verbose)
4763 0 0 if ($currentars144 eq $value)
4764 0 0 if ($Ham::Device::FT817COMM::verbose)
4767 0 0 if ($value eq 'OFF')
4768 0 0 if ($value eq 'ON')
4769 0 0 if ($Ham::Device::FT817COMM::verbose)
4770 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4782 0 0 if ($value ne 'ON' and $value ne 'OFF')
4783 0 0 if ($Ham::Device::FT817COMM::verbose)
4789 0 0 if ($currentars430 eq $value)
4790 0 0 if ($Ham::Device::FT817COMM::verbose)
4793 0 0 if ($value eq 'OFF')
4794 0 0 if ($value eq 'ON')
4795 0 0 if ($Ham::Device::FT817COMM::verbose)
4796 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4808 0 0 if ($value ne 'RFGAIN' and $value ne 'SQUELCH')
4809 0 0 if ($Ham::Device::FT817COMM::verbose)
4815 0 0 if ($currentknob eq $value)
4816 0 0 if ($Ham::Device::FT817COMM::verbose)
4819 0 0 if ($value eq 'RFGAIN')
4820 0 0 if ($value eq 'SQUELCH')
4821 0 0 if ($Ham::Device::FT817COMM::verbose)
4822 0 0 if ($writestatus eq 'OK') { }
4835 0 0 if ($value < 10 or $value > 2500)
4836 0 0 if ($Ham::Device::FT817COMM::verbose)
4840 0 0 if ($testvalue != '0')
4841 0 0 if ($Ham::Device::FT817COMM::verbose)
4847 0 0 if ($value eq $currentcwdelay)
4848 0 0 if ($Ham::Device::FT817COMM::verbose)
4856 0 0 if ($Ham::Device::FT817COMM::verbose)
4857 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4870 0 0 if ($value < 0 or $value > 100)
4871 0 0 if ($Ham::Device::FT817COMM::verbose)
4874 0 0 if (length $value == 0)
4875 0 0 if ($Ham::Device::FT817COMM::verbose)
4881 0 0 if ($value eq $currentsidetonevol)
4882 0 0 if ($Ham::Device::FT817COMM::verbose)
4892 0 0 if ($Ham::Device::FT817COMM::verbose)
4893 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4906 0 0 if ($value < 4 or $value > 60)
4907 0 0 if ($Ham::Device::FT817COMM::verbose)
4914 0 0 if ($value eq $currentcwspeed)
4915 0 0 if ($Ham::Device::FT817COMM::verbose)
4926 0 0 if ($Ham::Device::FT817COMM::verbose)
4927 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
4943 0 0 if ($chargerstatus eq 'ON')
4944 0 0 if ($Ham::Device::FT817COMM::verbose)
4947 0 0 if ($Ham::Device::FT817COMM::debug)
4948 0 0 if ($value != 10 and $value != 6 and $value != 8) { }
4949 0 0 if ($Ham::Device::FT817COMM::verbose)
4954 0 0 if ($value == 6 and $chargebits == $six or $value == 8 and $chargebits == $eight or $value == 10 and $chargebits == $ten)
4961 0 0 if ($Ham::Device::FT817COMM::debug)
4963 0 0 if ($value == '6')
4964 0 0 if ($value == '8')
4965 0 0 if ($value == '10')
4968 0 0 if ($Ham::Device::FT817COMM::debug)
4969 0 0 if ($Ham::Device::FT817COMM::debug)
4971 0 0 if ($value == '6')
4972 0 0 if ($value == '8')
4973 0 0 if ($value == '10')
4976 0 0 if ($Ham::Device::FT817COMM::verbose)
4977 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK' and $writestatus2 eq 'OK') { }
4990 0 0 if ($value < 1 or $value > 100)
4991 0 0 if ($Ham::Device::FT817COMM::verbose)
4997 0 0 if ($value eq $currentvoxgain)
4998 0 0 if ($Ham::Device::FT817COMM::verbose)
5008 0 0 if ($Ham::Device::FT817COMM::verbose)
5009 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5021 0 0 if ($value ne 'ENABLE' and $value ne 'DISABLE')
5022 0 0 if ($Ham::Device::FT817COMM::verbose)
5028 0 0 if ($currentdial eq $value)
5029 0 0 if ($Ham::Device::FT817COMM::verbose)
5032 0 0 if ($value eq 'ENABLE')
5033 0 0 if ($value eq 'DISABLE')
5034 0 0 if ($Ham::Device::FT817COMM::verbose)
5035 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5048 0 0 if ($value < 100 or $value > 2500)
5049 0 0 if ($Ham::Device::FT817COMM::verbose)
5053 0 0 if ($testvalue != '00')
5054 0 0 if ($Ham::Device::FT817COMM::verbose)
5060 0 0 if ($value eq $currentvoxdelay)
5061 0 0 if ($Ham::Device::FT817COMM::verbose)
5072 0 0 if ($Ham::Device::FT817COMM::verbose)
5073 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5085 0 0 if ($value ne 'ON' and $value ne 'OFF')
5086 0 0 if ($Ham::Device::FT817COMM::verbose)
5092 0 0 if ($value eq $currentemergency)
5093 0 0 if ($Ham::Device::FT817COMM::verbose)
5096 0 0 if ($value eq 'ON')
5097 0 0 if ($value eq 'OFF')
5098 0 0 if ($Ham::Device::FT817COMM::verbose)
5099 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5111 0 0 if ($value != '4800' and $value != '9600' and $value != '38400')
5112 0 0 if ($Ham::Device::FT817COMM::verbose)
5118 0 0 if ($value eq $currentcatrate)
5119 0 0 if ($Ham::Device::FT817COMM::verbose)
5123 0 0 if ($value == '4800')
5124 0 0 if ($value == '9600')
5125 0 0 if ($value == '38400')
5128 0 0 if ($Ham::Device::FT817COMM::verbose)
5129 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5142 0 0 if ($value ne 'OFF' and $value < 1 || $value > 6)
5143 0 0 if ($Ham::Device::FT817COMM::verbose)
5149 0 0 if ($value eq $currentapotime)
5150 0 0 if ($Ham::Device::FT817COMM::verbose)
5160 0 0 if ($Ham::Device::FT817COMM::verbose)
5161 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5173 0 0 if ($value ne 'ON' and $value ne 'OFF')
5174 0 0 if ($Ham::Device::FT817COMM::verbose)
5180 0 0 if ($value eq $currentmemgroup)
5181 0 0 if ($Ham::Device::FT817COMM::verbose)
5184 0 0 if ($value eq 'ON')
5185 0 0 if ($value eq 'OFF')
5186 0 0 if ($Ham::Device::FT817COMM::verbose)
5187 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5199 0 0 if ($value ne 'RTTY' and $value ne 'PSK31-L' and $value ne 'PSK31-U' and $value ne 'USER-L' and $value ne 'USER-U')
5200 0 0 if ($Ham::Device::FT817COMM::verbose)
5206 0 0 if ($value eq $currentdigmode)
5207 0 0 if ($Ham::Device::FT817COMM::verbose)
5211 0 0 if ($value eq 'RTTY')
5212 0 0 if ($value eq 'PSK31-L')
5213 0 0 if ($value eq 'PSK31-U')
5214 0 0 if ($value eq 'USER-L')
5215 0 0 if ($value eq 'USER-U')
5218 0 0 if ($Ham::Device::FT817COMM::verbose)
5219 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5232 0 0 if ($value ne 'OFF' and $value < 1 || $value > 20)
5233 0 0 if ($Ham::Device::FT817COMM::verbose)
5239 0 0 if ($value eq $currenttottime)
5240 0 0 if ($Ham::Device::FT817COMM::verbose)
5243 0 0 if ($value eq 'OFF')
5251 0 0 if ($Ham::Device::FT817COMM::verbose)
5252 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5264 0 0 if ($value ne 'TN-RN' and $value ne 'TN-RIV' and $value ne 'TIV-RN' and $value ne 'TIV-RIV')
5265 0 0 if ($Ham::Device::FT817COMM::verbose)
5271 0 0 if ($value eq $currentdcsinv)
5272 0 0 if ($Ham::Device::FT817COMM::verbose)
5276 0 0 if ($value eq 'TN-RN')
5277 0 0 if ($value eq 'TN-RIV')
5278 0 0 if ($value eq 'TIV-RN')
5279 0 0 if ($value eq 'TIV-RIV')
5282 0 0 if ($Ham::Device::FT817COMM::verbose)
5283 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5296 0 0 if ($value < 0 or $value > 100)
5297 0 0 if ($Ham::Device::FT817COMM::verbose)
5301 0 0 if (length $value == 0)
5302 0 0 if ($Ham::Device::FT817COMM::verbose)
5309 0 0 if ($value eq $currentssbmic)
5310 0 0 if ($Ham::Device::FT817COMM::verbose)
5320 0 0 if ($Ham::Device::FT817COMM::verbose)
5321 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5333 0 0 if ($value ne 'ON' and $value ne 'OFF')
5334 0 0 if ($Ham::Device::FT817COMM::verbose)
5340 0 0 if ($value eq $currentmicscan)
5341 0 0 if ($Ham::Device::FT817COMM::verbose)
5344 0 0 if ($value eq 'ON')
5345 0 0 if ($value eq 'OFF')
5346 0 0 if ($Ham::Device::FT817COMM::verbose)
5347 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5360 0 0 if ($value < 0 or $value > 100)
5361 0 0 if ($Ham::Device::FT817COMM::verbose)
5365 0 0 if (length $value == 0)
5366 0 0 if ($Ham::Device::FT817COMM::verbose)
5372 0 0 if ($value eq $currentammic)
5373 0 0 if ($Ham::Device::FT817COMM::verbose)
5383 0 0 if ($Ham::Device::FT817COMM::verbose)
5384 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5396 0 0 if ($value ne 'ON' and $value ne 'OFF')
5397 0 0 if ($Ham::Device::FT817COMM::verbose)
5403 0 0 if ($value eq $currentmickey)
5404 0 0 if ($Ham::Device::FT817COMM::verbose)
5407 0 0 if ($value eq 'ON')
5408 0 0 if ($value eq 'OFF')
5409 0 0 if ($Ham::Device::FT817COMM::verbose)
5410 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5423 0 0 if ($value < 0 or $value > 100)
5424 0 0 if ($Ham::Device::FT817COMM::verbose)
5427 0 0 if (length $value == 0)
5428 0 0 if ($Ham::Device::FT817COMM::verbose)
5434 0 0 if ($value eq $currentfmmic)
5435 0 0 if ($Ham::Device::FT817COMM::verbose)
5445 0 0 if ($Ham::Device::FT817COMM::verbose)
5446 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5459 0 0 if ($value < 0 or $value > 100)
5460 0 0 if ($Ham::Device::FT817COMM::verbose)
5463 0 0 if (length $value == 0)
5464 0 0 if ($Ham::Device::FT817COMM::verbose)
5470 0 0 if ($value eq $currentdigmic)
5471 0 0 if ($Ham::Device::FT817COMM::verbose)
5481 0 0 if ($Ham::Device::FT817COMM::verbose)
5482 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5495 0 0 if ($value < 0 or $value > 100)
5496 0 0 if ($Ham::Device::FT817COMM::verbose)
5499 0 0 if (length $value == 0)
5500 0 0 if ($Ham::Device::FT817COMM::verbose)
5506 0 0 if ($value eq $currentpktmic)
5507 0 0 if ($Ham::Device::FT817COMM::verbose)
5517 0 0 if ($Ham::Device::FT817COMM::verbose)
5518 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5530 0 0 if ($value ne 'ON' and $value ne 'OFF')
5531 0 0 if ($Ham::Device::FT817COMM::verbose)
5537 0 0 if ($value eq $currentextmenu)
5538 0 0 if ($Ham::Device::FT817COMM::verbose)
5541 0 0 if ($value eq 'ON')
5542 0 0 if ($value eq 'OFF')
5543 0 0 if ($Ham::Device::FT817COMM::verbose)
5544 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5557 0 0 if ($value < 0 or $value > 100)
5558 0 0 if ($Ham::Device::FT817COMM::verbose)
5561 0 0 if (length $value == 0)
5562 0 0 if ($Ham::Device::FT817COMM::verbose)
5568 0 0 if ($value eq $current9600mic)
5569 0 0 if ($Ham::Device::FT817COMM::verbose)
5579 0 0 if ($Ham::Device::FT817COMM::verbose)
5580 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5597 0 0 if ($value != '0' and $polarity ne '+' and $polarity ne '-')
5598 0 0 if ($Ham::Device::FT817COMM::verbose)
5601 0 0 if ($endvalue != '0' or ($newvalue < 0 or $newvalue > 3000))
5602 0 0 if ($Ham::Device::FT817COMM::verbose)
5608 0 0 if ($value eq $currentdigshift)
5609 0 0 if ($Ham::Device::FT817COMM::verbose)
5613 0 0 if ($polarity eq '-')
5621 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK') { }
5622 0 0 if ($Ham::Device::FT817COMM::verbose)
5636 0 0 if ($value != '0' and $polarity ne '+' and $polarity ne '-')
5637 0 0 if ($Ham::Device::FT817COMM::verbose)
5640 0 0 if ($endvalue != '0' or ($newvalue < 0 or $newvalue > 3000))
5641 0 0 if ($Ham::Device::FT817COMM::verbose)
5647 0 0 if ($value eq $currentdigdisp)
5648 0 0 if ($Ham::Device::FT817COMM::verbose)
5652 0 0 if ($polarity eq '-')
5660 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK') { }
5661 0 0 if ($Ham::Device::FT817COMM::verbose)
5675 0 0 if ($value != '0' and $polarity ne '+' and $polarity ne '-')
5676 0 0 if ($Ham::Device::FT817COMM::verbose)
5679 0 0 if ($endvalue != '0' or ($newvalue < 0 or $newvalue > 300))
5680 0 0 if ($Ham::Device::FT817COMM::verbose)
5686 0 0 if ($value eq $currentrlsbcar)
5687 0 0 if ($Ham::Device::FT817COMM::verbose)
5691 0 0 if ($polarity eq '-')
5695 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK') { }
5696 0 0 if ($Ham::Device::FT817COMM::verbose)
5710 0 0 if ($value != '0' and $polarity ne '+' and $polarity ne '-')
5711 0 0 if ($Ham::Device::FT817COMM::verbose)
5714 0 0 if ($endvalue != '0' or ($newvalue < 0 or $newvalue > 300))
5715 0 0 if ($Ham::Device::FT817COMM::verbose)
5721 0 0 if ($value eq $currentrusbcar)
5722 0 0 if ($Ham::Device::FT817COMM::verbose)
5726 0 0 if ($polarity eq '-')
5730 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK') { }
5731 0 0 if ($Ham::Device::FT817COMM::verbose)
5745 0 0 if ($value != '0' and $polarity ne '+' and $polarity ne '-')
5746 0 0 if ($Ham::Device::FT817COMM::verbose)
5749 0 0 if ($endvalue != '0' or ($newvalue < 0 or $newvalue > 300))
5750 0 0 if ($Ham::Device::FT817COMM::verbose)
5756 0 0 if ($value eq $currenttlsbcar)
5757 0 0 if ($Ham::Device::FT817COMM::verbose)
5761 0 0 if ($polarity eq '-')
5765 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK') { }
5766 0 0 if ($Ham::Device::FT817COMM::verbose)
5780 0 0 if ($value != '0' and $polarity ne '+' and $polarity ne '-')
5781 0 0 if ($Ham::Device::FT817COMM::verbose)
5784 0 0 if ($endvalue != '0' or ($newvalue < 0 or $newvalue > 300))
5785 0 0 if ($Ham::Device::FT817COMM::verbose)
5791 0 0 if ($value eq $currenttusbcar)
5792 0 0 if ($Ham::Device::FT817COMM::verbose)
5796 0 0 if ($polarity eq '-')
5800 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK') { }
5801 0 0 if ($Ham::Device::FT817COMM::verbose)
5815 0 0 if ($testtxpwr eq '')
5816 0 0 if ($Ham::Device::FT817COMM::verbose)
5822 0 0 if ($currentpower eq $value)
5823 0 0 if ($Ham::Device::FT817COMM::verbose)
5830 0 0 if ($Ham::Device::FT817COMM::verbose)
5831 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5843 0 0 if ($value ne 'ON' and $value ne 'OFF')
5844 0 0 if ($Ham::Device::FT817COMM::verbose)
5851 0 0 if ($value eq $currentpri)
5852 0 0 if ($Ham::Device::FT817COMM::verbose)
5855 0 0 if ($value eq 'ON')
5856 0 0 if ($value eq 'OFF')
5857 0 0 if ($Ham::Device::FT817COMM::verbose)
5858 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5870 0 0 if ($value ne 'ON' and $value ne 'OFF')
5871 0 0 if ($Ham::Device::FT817COMM::verbose)
5877 0 0 if ($value eq $currentdw)
5878 0 0 if ($Ham::Device::FT817COMM::verbose)
5881 0 0 if ($value eq 'ON')
5882 0 0 if ($value eq 'OFF')
5883 0 0 if ($Ham::Device::FT817COMM::verbose)
5884 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5896 0 0 if ($value ne 'OFF' and $value ne 'UP' and $value ne 'DOWN')
5897 0 0 if ($Ham::Device::FT817COMM::verbose)
5903 0 0 if ($value eq $currentscn)
5904 0 0 if ($Ham::Device::FT817COMM::verbose)
5908 0 0 if ($value eq 'OFF')
5909 0 0 if ($value eq 'UP')
5910 0 0 if ($value eq 'DOWN')
5913 0 0 if ($Ham::Device::FT817COMM::verbose)
5914 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
5926 0 0 if ($value ne 'ON' and $value ne 'OFF')
5927 0 0 if ($Ham::Device::FT817COMM::verbose)
5934 0 0 if ($value eq $currentarts)
5935 0 0 if ($Ham::Device::FT817COMM::verbose)
5938 0 0 if ($value eq 'ON')
5939 0 0 if ($value eq 'OFF')
5940 0 0 if ($Ham::Device::FT817COMM::verbose)
5941 0 0 if ($writestatus eq 'OK') { }
5956 0 0 if ($value ne 'HF' and $value ne '6M' and $value ne 'FMBCB' and $value ne 'AIR' and $value ne 'VHF' and $value ne 'UHF')
5957 0 0 if ($Ham::Device::FT817COMM::verbose)
5961 0 0 if ($value2 ne 'FRONT' and $value2 ne 'BACK')
5962 0 0 if ($Ham::Device::FT817COMM::verbose)
5968 0 0 if ($currentantenna eq $value2)
5969 0 0 if ($Ham::Device::FT817COMM::verbose)
5973 0 0 if ($value2 eq 'BACK')
5974 0 0 if ($value2 eq 'FRONT')
5975 0 0 if ($value eq 'HF')
5976 0 0 if ($value eq '6M')
5977 0 0 if ($value eq 'FMBCB')
5978 0 0 if ($value eq 'AIR')
5979 0 0 if ($value eq 'VHF')
5980 0 0 if ($value eq 'UHF')
5982 0 0 if ($Ham::Device::FT817COMM::verbose and $Ham::Device::FT817COMM::writestatus eq 'OK')
5983 0 0 if ($Ham::Device::FT817COMM::verbose and $Ham::Device::FT817COMM::writestatus ne 'OK')
5993 0 0 if ($value ne 'ON' and $value ne 'OFF')
5994 0 0 if ($Ham::Device::FT817COMM::verbose)
6000 0 0 if ($value eq $currentspl)
6001 0 0 if ($Ham::Device::FT817COMM::verbose)
6004 0 0 if ($value eq 'ON')
6005 0 0 if ($value eq 'OFF')
6006 0 0 if ($Ham::Device::FT817COMM::verbose)
6007 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6020 0 0 if ($value ne 'ON' and $value ne 'OFF')
6021 0 0 if ($Ham::Device::FT817COMM::verbose)
6025 0 0 if ($chargerstatus eq $value) { }
6026 0 0 if ($Ham::Device::FT817COMM::verbose)
6030 0 0 if ($Ham::Device::FT817COMM::verbose)
6031 0 0 if ($value eq 'OFF')
6032 0 0 if ($value eq 'ON')
6048 0 0 if ($vfo eq 'MTQMB')
6049 0 0 if ($vfo eq 'MTUNE')
6050 0 0 if ($vfo ne 'A' and $vfo ne 'B')
6051 0 0 if ($Ham::Device::FT817COMM::verbose)
6058 0 0 if ($testvfoband eq '')
6059 0 0 if ($band ne 'MTQMB' and $band ne 'MTUNE')
6060 0 0 if ($Ham::Device::FT817COMM::verbose)
6066 0 0 unless ($testoptions)
6067 0 0 if ($Ham::Device::FT817COMM::verbose)
6073 0 0 if ($columns == 7)
6079 0 0 if ($value != '0' and not $value)
6080 0 0 if ($Ham::Device::FT817COMM::verbose)
6086 0 0 if ($currentvfo eq $vfo)
6087 0 0 if ($vfo eq 'A')
6088 0 0 if ($vfo eq 'B')
6092 0 0 if ($option eq 'MODE')
6097 0 0 if ($value eq $currentmode)
6098 0 0 if ($Ham::Device::FT817COMM::verbose)
6106 0 0 unless ($mode)
6107 0 0 if ($Ham::Device::FT817COMM::verbose)
6113 0 0 if ($columns == 7)
6122 0 0 if ($musttoggle)
6124 0 0 if ($musttoggle)
6125 0 0 if ($Ham::Device::FT817COMM::verbose)
6126 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6134 0 0 if ($option eq 'NARFM')
6136 0 0 if ($value ne 'ON' and $value ne 'OFF')
6137 0 0 if ($Ham::Device::FT817COMM::verbose)
6143 0 0 if ($value eq $currentnarfm)
6144 0 0 if ($Ham::Device::FT817COMM::verbose)
6149 0 0 if ($musttoggle)
6150 0 0 if ($value eq 'ON')
6151 0 0 if ($value eq 'OFF')
6152 0 0 if ($musttoggle)
6153 0 0 if ($Ham::Device::FT817COMM::verbose)
6154 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6162 0 0 if ($option eq 'NARCWDIG')
6164 0 0 if ($value ne 'ON' and $value ne 'OFF')
6165 0 0 if ($Ham::Device::FT817COMM::verbose)
6171 0 0 if ($value eq $currentnarcwdig)
6172 0 0 if ($Ham::Device::FT817COMM::verbose)
6177 0 0 if ($musttoggle)
6178 0 0 if ($value eq 'ON')
6179 0 0 if ($value eq 'OFF')
6180 0 0 if ($musttoggle)
6181 0 0 if ($Ham::Device::FT817COMM::verbose)
6182 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6190 0 0 if ($option eq 'RPTOFFSET')
6192 0 0 if ($value ne 'SIMPLEX' and $value ne 'MINUS' and $value ne 'PLUS' and $value ne 'NON-STANDARD')
6193 0 0 if ($Ham::Device::FT817COMM::verbose)
6199 0 0 if ($value eq $currentrptoffset)
6200 0 0 if ($Ham::Device::FT817COMM::verbose)
6206 0 0 if ($value eq 'SIMPLEX')
6207 0 0 if ($value eq 'MINUS')
6208 0 0 if ($value eq 'PLUS')
6209 0 0 if ($value eq 'NON-STANDARD')
6211 0 0 if ($musttoggle)
6213 0 0 if ($musttoggle)
6214 0 0 if ($Ham::Device::FT817COMM::verbose)
6215 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6223 0 0 if ($option eq 'TONEDCS')
6225 0 0 if ($value ne 'OFF' and $value ne 'TONE' and $value ne 'TONETSQ' and $value ne 'DCS')
6226 0 0 if ($Ham::Device::FT817COMM::verbose)
6232 0 0 if ($value eq $currenttonedcs)
6233 0 0 if ($Ham::Device::FT817COMM::verbose)
6239 0 0 if ($value eq 'OFF')
6240 0 0 if ($value eq 'TONE')
6241 0 0 if ($value eq 'TONETSQ')
6242 0 0 if ($value eq 'DCS')
6244 0 0 if ($musttoggle)
6246 0 0 if ($musttoggle)
6247 0 0 if ($Ham::Device::FT817COMM::verbose)
6248 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6256 0 0 if ($option eq 'CLARIFIER')
6258 0 0 if ($value ne 'ON' and $value ne 'OFF')
6259 0 0 if ($Ham::Device::FT817COMM::verbose)
6265 0 0 if ($value eq $currentclarifier)
6266 0 0 if ($Ham::Device::FT817COMM::verbose)
6271 0 0 if ($musttoggle)
6272 0 0 if ($value eq 'ON')
6273 0 0 if ($value eq 'OFF')
6274 0 0 if ($musttoggle)
6275 0 0 if ($Ham::Device::FT817COMM::verbose)
6276 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6284 0 0 if ($option eq 'ATT')
6286 0 0 if ($value ne 'ON' and $value ne 'OFF')
6287 0 0 if ($Ham::Device::FT817COMM::verbose)
6293 0 0 if ($value eq $currentatt)
6294 0 0 if ($Ham::Device::FT817COMM::verbose)
6299 0 0 if ($musttoggle)
6300 0 0 if ($value eq 'ON')
6301 0 0 if ($value eq 'OFF')
6302 0 0 if ($musttoggle)
6303 0 0 if ($Ham::Device::FT817COMM::verbose)
6304 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6312 0 0 if ($option eq 'IPO')
6314 0 0 if ($value ne 'ON' and $value ne 'OFF')
6315 0 0 if ($Ham::Device::FT817COMM::verbose)
6321 0 0 if ($value eq $currentipo)
6322 0 0 if ($Ham::Device::FT817COMM::verbose)
6327 0 0 if ($musttoggle)
6328 0 0 if ($value eq 'ON')
6329 0 0 if ($value eq 'OFF')
6330 0 0 if ($musttoggle)
6331 0 0 if ($Ham::Device::FT817COMM::verbose)
6332 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6340 0 0 if ($option eq 'FMSTEP')
6345 0 0 if ($value eq $currentfmstep)
6346 0 0 if ($Ham::Device::FT817COMM::verbose)
6354 0 0 unless ($fmstep)
6355 0 0 if ($Ham::Device::FT817COMM::verbose)
6361 0 0 if ($columns == 7)
6370 0 0 if ($musttoggle)
6372 0 0 if ($musttoggle)
6373 0 0 if ($Ham::Device::FT817COMM::verbose)
6374 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6382 0 0 if ($option eq 'AMSTEP')
6387 0 0 if ($value eq $currentamstep)
6388 0 0 if ($Ham::Device::FT817COMM::verbose)
6396 0 0 unless ($amstep)
6397 0 0 if ($Ham::Device::FT817COMM::verbose)
6403 0 0 if ($columns == 7)
6412 0 0 if ($musttoggle)
6414 0 0 if ($musttoggle)
6415 0 0 if ($Ham::Device::FT817COMM::verbose)
6416 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6424 0 0 if ($option eq 'SSBSTEP')
6426 0 0 if ($value ne '1.0' and $value ne '2.5' and $value ne '5.0')
6427 0 0 if ($Ham::Device::FT817COMM::verbose)
6433 0 0 if ($value eq $currentssbstep)
6434 0 0 if ($Ham::Device::FT817COMM::verbose)
6440 0 0 if ($value eq '1.0')
6441 0 0 if ($value eq '2.5')
6442 0 0 if ($value eq '5.0')
6444 0 0 if ($musttoggle)
6446 0 0 if ($musttoggle)
6447 0 0 if ($Ham::Device::FT817COMM::verbose)
6448 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6456 0 0 if ($option eq 'CTCSSTONE')
6461 0 0 if ($value eq $currenttone)
6462 0 0 if ($Ham::Device::FT817COMM::verbose)
6470 0 0 unless ($ctcsstone)
6471 0 0 if ($Ham::Device::FT817COMM::verbose)
6477 0 0 if ($columns == 7)
6486 0 0 if ($musttoggle)
6488 0 0 if ($musttoggle)
6489 0 0 if ($Ham::Device::FT817COMM::verbose)
6490 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6498 0 0 if ($option eq 'DCSCODE')
6503 0 0 if ($value eq $currentcode)
6504 0 0 if ($Ham::Device::FT817COMM::verbose)
6512 0 0 unless ($dcscode)
6513 0 0 if ($Ham::Device::FT817COMM::verbose)
6519 0 0 if ($columns == 7)
6529 0 0 if ($musttoggle)
6531 0 0 if ($musttoggle)
6532 0 0 if ($Ham::Device::FT817COMM::verbose)
6533 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6541 0 0 if ($option eq 'CLAROFFSET')
6545 0 0 if ($value != '0' and $polarity ne '+' and $polarity ne '-')
6546 0 0 if ($Ham::Device::FT817COMM::verbose)
6550 0 0 if ($newvalue < 0 or $newvalue > 999)
6551 0 0 if ($Ham::Device::FT817COMM::verbose)
6558 0 0 if ($value eq $currentoffset)
6559 0 0 if ($Ham::Device::FT817COMM::verbose)
6565 0 0 if ($polarity eq '-')
6573 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK') { }
6574 0 0 if ($Ham::Device::FT817COMM::verbose)
6580 0 0 if ($option eq 'RXFREQ')
6585 0 0 if ($value eq $currentrxfreq)
6586 0 0 if ($Ham::Device::FT817COMM::verbose)
6591 0 0 if ($test ne 'OK')
6592 0 0 if ($Ham::Device::FT817COMM::verbose)
6610 0 0 if ($musttoggle)
6613 0 0 if ($musttoggle)
6614 0 0 if ($writestatus1 eq $writestatus2) { }
6615 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK')
6617 0 0 if ($Ham::Device::FT817COMM::verbose)
6623 0 0 if ($option eq 'RPTOFFSETFREQ')
6625 0 0 if ($value < 0 or $value > 9999)
6626 0 0 if ($Ham::Device::FT817COMM::verbose)
6632 0 0 if ($value eq $currentoffset)
6633 0 0 if ($Ham::Device::FT817COMM::verbose)
6649 0 0 if ($musttoggle)
6652 0 0 if ($musttoggle)
6653 0 0 if ($writestatus1 eq $writestatus3) { }
6654 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK')
6656 0 0 if ($Ham::Device::FT817COMM::verbose)
6669 0 0 if ($value eq 'M-PL')
6670 0 0 if ($value eq 'M-PU')
6672 0 0 if ($value < 0 or $value > 202)
6673 0 0 if ($Ham::Device::FT817COMM::verbose)
6677 0 0 if (length $value == 0)
6678 0 0 if ($Ham::Device::FT817COMM::verbose)
6684 0 0 if ($value eq $currentcurrentmem + 1)
6685 0 0 if ($Ham::Device::FT817COMM::verbose)
6691 0 0 if ($Ham::Device::FT817COMM::verbose)
6692 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6707 0 0 if ($Ham::Device::FT817COMM::writeallow != '1' and $Ham::Device::FT817COMM::agreewithwarning != '1')
6708 0 0 if ($Ham::Device::FT817COMM::debug or $Ham::Device::FT817COMM::verbose)
6712 0 0 if ($number eq 'M-PL')
6713 0 0 if ($number eq 'M-PU')
6714 0 0 if ($number == 1)
6715 0 0 if ($Ham::Device::FT817COMM::verbose)
6718 0 0 if ($number < 2 or $number > 202)
6719 0 0 if ($Ham::Device::FT817COMM::verbose)
6722 0 0 if ($value ne 'ACTIVE' and $value ne 'INACTIVE')
6723 0 0 if ($Ham::Device::FT817COMM::verbose)
6729 0 0 if ($value eq $currentvalue)
6730 0 0 if ($Ham::Device::FT817COMM::verbose)
6734 0 0 if ($value eq 'ACTIVE')
6735 0 0 if ($value eq 'INACTIVE')
6740 0 0 if ($Ham::Device::FT817COMM::verbose)
6743 0 0 if ($isready eq 'NO')
6758 0 0 if ($Ham::Device::FT817COMM::writeallow != '1' and $Ham::Device::FT817COMM::agreewithwarning != '1')
6759 0 0 if ($Ham::Device::FT817COMM::debug or $Ham::Device::FT817COMM::verbose)
6767 0 0 if ($subtype eq 'M-PL')
6768 0 0 if ($subtype eq 'M-PU')
6772 0 0 unless ($value)
6773 0 0 if ($type ne 'HOME' and $type ne 'QMB' and $type ne 'M-PL' and $type ne 'M-PU' and $type ne 'MEM')
6774 0 0 if ($Ham::Device::FT817COMM::verbose)
6779 0 0 if (not $testoptions and $value ne 'ALL')
6780 0 0 if ($Ham::Device::FT817COMM::verbose)
6786 0 0 if ($columns == 7)
6792 0 0 if ($type eq 'HOME')
6793 0 0 if ($type eq 'QMB')
6794 0 0 if ($type eq 'MEM')
6796 0 0 if ($type eq 'MEM')
6797 0 0 if ($memnum > 1)
6802 0 0 unless ($base)
6803 0 0 if ($Ham::Device::FT817COMM::verbose)
6806 0 0 if ($type eq 'MEM')
6812 0 0 if ($type eq 'HOME' and $ishome eq 'Y')
6813 0 0 if ($currenttuner eq 'MEMORY')
6814 0 0 if ($type eq 'QMB' and $isqmb eq 'ON')
6815 0 0 if ($type eq 'MEM')
6822 0 0 if ($isready eq 'NO')
6823 0 0 if ($Ham::Device::FT817COMM::verbose)
6824 0 0 if ($hometoggle)
6825 0 0 if ($musttoggle)
6833 0 0 if ($Ham::Device::FT817COMM::verbose)
6834 0 0 if ($hometoggle)
6835 0 0 if ($musttoggle)
6839 0 0 if ($Ham::Device::FT817COMM::verbose)
6846 0 0 if ($Ham::Device::FT817COMM::verbose)
6848 0 0 if ($hometoggle)
6849 0 0 if ($musttoggle)
6853 0 0 if ($option eq 'MODE')
6858 0 0 if ($value eq $currentmode)
6859 0 0 if ($Ham::Device::FT817COMM::verbose)
6867 0 0 unless ($mode)
6868 0 0 if ($Ham::Device::FT817COMM::verbose)
6874 0 0 if ($columns == 7)
6883 0 0 if ($hometoggle)
6884 0 0 if ($musttoggle)
6886 0 0 if ($musttoggle)
6887 0 0 if ($hometoggle)
6888 0 0 if ($Ham::Device::FT817COMM::verbose)
6889 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6897 0 0 if ($option eq 'TAG')
6900 0 0 if ($value ne 'LABEL' and $value ne 'FREQUENCY')
6901 0 0 if ($Ham::Device::FT817COMM::verbose)
6907 0 0 if ($value eq $currenttag)
6908 0 0 if ($Ham::Device::FT817COMM::verbose)
6913 0 0 if ($musttoggle)
6914 0 0 if ($hometoggle)
6915 0 0 if ($value eq 'LABEL')
6916 0 0 if ($value eq 'FREQUENCY')
6917 0 0 if ($hometoggle)
6918 0 0 if ($musttoggle)
6919 0 0 if ($Ham::Device::FT817COMM::verbose)
6920 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6928 0 0 if ($option eq 'NARFM')
6931 0 0 if ($value ne 'ON' and $value ne 'OFF')
6932 0 0 if ($Ham::Device::FT817COMM::verbose)
6938 0 0 if ($value eq $currentnarfm)
6939 0 0 if ($Ham::Device::FT817COMM::verbose)
6944 0 0 if ($musttoggle)
6945 0 0 if ($hometoggle)
6946 0 0 if ($value eq 'ON')
6947 0 0 if ($value eq 'OFF')
6948 0 0 if ($hometoggle)
6949 0 0 if ($musttoggle)
6950 0 0 if ($Ham::Device::FT817COMM::verbose)
6951 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6959 0 0 if ($option eq 'NARCWDIG')
6962 0 0 if ($value ne 'ON' and $value ne 'OFF')
6963 0 0 if ($Ham::Device::FT817COMM::verbose)
6969 0 0 if ($value eq $currentnarcwdig)
6970 0 0 if ($Ham::Device::FT817COMM::verbose)
6975 0 0 if ($musttoggle)
6976 0 0 if ($hometoggle)
6977 0 0 if ($value eq 'ON')
6978 0 0 if ($value eq 'OFF')
6979 0 0 if ($hometoggle)
6980 0 0 if ($musttoggle)
6981 0 0 if ($Ham::Device::FT817COMM::verbose)
6982 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
6990 0 0 if ($option eq 'RPTOFFSET')
6992 0 0 if ($value ne 'SIMPLEX' and $value ne 'MINUS' and $value ne 'PLUS' and $value ne 'NON-STANDARD')
6993 0 0 if ($Ham::Device::FT817COMM::verbose)
6999 0 0 if ($value eq $currentrptoffset)
7000 0 0 if ($Ham::Device::FT817COMM::verbose)
7006 0 0 if ($value eq 'SIMPLEX')
7007 0 0 if ($value eq 'MINUS')
7008 0 0 if ($value eq 'PLUS')
7009 0 0 if ($value eq 'NON-STANDARD')
7011 0 0 if ($hometoggle)
7012 0 0 if ($musttoggle)
7014 0 0 if ($hometoggle)
7015 0 0 if ($musttoggle)
7016 0 0 if ($Ham::Device::FT817COMM::verbose)
7017 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7025 0 0 if ($option eq 'TONEDCS')
7027 0 0 if ($value ne 'OFF' and $value ne 'TONE' and $value ne 'TONETSQ' and $value ne 'DCS')
7028 0 0 if ($Ham::Device::FT817COMM::verbose)
7034 0 0 if ($value eq $currenttonedcs)
7035 0 0 if ($Ham::Device::FT817COMM::verbose)
7041 0 0 if ($value eq 'OFF')
7042 0 0 if ($value eq 'TONE')
7043 0 0 if ($value eq 'TONETSQ')
7044 0 0 if ($value eq 'DCS')
7046 0 0 if ($hometoggle)
7047 0 0 if ($musttoggle)
7049 0 0 if ($hometoggle)
7050 0 0 if ($musttoggle)
7051 0 0 if ($Ham::Device::FT817COMM::verbose)
7052 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7060 0 0 if ($option eq 'ATT')
7063 0 0 if ($value ne 'ON' and $value ne 'OFF')
7064 0 0 if ($Ham::Device::FT817COMM::verbose)
7070 0 0 if ($value eq $currentatt)
7071 0 0 if ($Ham::Device::FT817COMM::verbose)
7076 0 0 if ($musttoggle)
7077 0 0 if ($hometoggle)
7078 0 0 if ($value eq 'ON')
7079 0 0 if ($value eq 'OFF')
7080 0 0 if ($hometoggle)
7081 0 0 if ($musttoggle)
7082 0 0 if ($Ham::Device::FT817COMM::verbose)
7083 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7091 0 0 if ($option eq 'IPO')
7094 0 0 if ($value ne 'ON' and $value ne 'OFF')
7095 0 0 if ($Ham::Device::FT817COMM::verbose)
7101 0 0 if ($value eq $currentipo)
7102 0 0 if ($Ham::Device::FT817COMM::verbose)
7107 0 0 if ($musttoggle)
7108 0 0 if ($hometoggle)
7109 0 0 if ($value eq 'ON')
7110 0 0 if ($value eq 'OFF')
7111 0 0 if ($hometoggle)
7112 0 0 if ($musttoggle)
7113 0 0 if ($Ham::Device::FT817COMM::verbose)
7114 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7122 0 0 if ($option eq 'FMSTEP')
7127 0 0 if ($value eq $currentfmstep)
7128 0 0 if ($Ham::Device::FT817COMM::verbose)
7136 0 0 unless ($fmstep)
7137 0 0 if ($Ham::Device::FT817COMM::verbose)
7143 0 0 if ($columns == 7)
7152 0 0 if ($hometoggle)
7153 0 0 if ($musttoggle)
7155 0 0 if ($hometoggle)
7156 0 0 if ($musttoggle)
7157 0 0 if ($Ham::Device::FT817COMM::verbose)
7158 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7166 0 0 if ($option eq 'AMSTEP')
7171 0 0 if ($value eq $currentamstep)
7172 0 0 if ($Ham::Device::FT817COMM::verbose)
7180 0 0 unless ($amstep)
7181 0 0 if ($Ham::Device::FT817COMM::verbose)
7187 0 0 if ($columns == 7)
7196 0 0 if ($hometoggle)
7197 0 0 if ($musttoggle)
7199 0 0 if ($musttoggle)
7200 0 0 if ($hometoggle)
7201 0 0 if ($Ham::Device::FT817COMM::verbose)
7202 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7207 0 0 if ($option eq 'SSBSTEP')
7209 0 0 if ($value ne '1.0' and $value ne '2.5' and $value ne '5.0')
7210 0 0 if ($Ham::Device::FT817COMM::verbose)
7216 0 0 if ($value eq $currentssbstep)
7217 0 0 if ($Ham::Device::FT817COMM::verbose)
7223 0 0 if ($value eq '1.0')
7224 0 0 if ($value eq '2.5')
7225 0 0 if ($value eq '5.0')
7227 0 0 if ($musttoggle)
7228 0 0 if ($hometoggle)
7230 0 0 if ($musttoggle)
7231 0 0 if ($hometoggle)
7232 0 0 if ($Ham::Device::FT817COMM::verbose)
7233 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7241 0 0 if ($option eq 'CTCSSTONE')
7246 0 0 if ($value eq $currenttone)
7247 0 0 if ($Ham::Device::FT817COMM::verbose)
7255 0 0 unless ($ctcsstone)
7256 0 0 if ($Ham::Device::FT817COMM::verbose)
7262 0 0 if ($columns == 7)
7271 0 0 if ($musttoggle)
7272 0 0 if ($hometoggle)
7274 0 0 if ($musttoggle)
7275 0 0 if ($hometoggle)
7276 0 0 if ($Ham::Device::FT817COMM::verbose)
7277 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7285 0 0 if ($option eq 'CLARIFIER')
7287 0 0 if ($value ne 'ON' and $value ne 'OFF')
7288 0 0 if ($Ham::Device::FT817COMM::verbose)
7294 0 0 if ($value eq $currentclarifier)
7295 0 0 if ($Ham::Device::FT817COMM::verbose)
7300 0 0 if ($musttoggle)
7301 0 0 if ($hometoggle)
7302 0 0 if ($value eq 'ON')
7303 0 0 if ($value eq 'OFF')
7304 0 0 if ($musttoggle)
7305 0 0 if ($hometoggle)
7306 0 0 if ($Ham::Device::FT817COMM::verbose)
7307 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7315 0 0 if ($option eq 'CLAROFFSET')
7319 0 0 if ($value != '0' and $polarity ne '+' and $polarity ne '-')
7320 0 0 if ($Ham::Device::FT817COMM::verbose)
7323 0 0 if ($newvalue < 0 or $newvalue > 999)
7324 0 0 if ($Ham::Device::FT817COMM::verbose)
7330 0 0 if ($value eq $currentoffset)
7331 0 0 if ($Ham::Device::FT817COMM::verbose)
7337 0 0 if ($polarity eq '-')
7344 0 0 if ($hometoggle)
7345 0 0 if ($musttoggle)
7347 0 0 if ($hometoggle)
7348 0 0 if ($musttoggle)
7349 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK') { }
7350 0 0 if ($Ham::Device::FT817COMM::verbose)
7356 0 0 if ($option eq 'DCSCODE')
7361 0 0 if ($value eq $currentcode)
7362 0 0 if ($Ham::Device::FT817COMM::verbose)
7370 0 0 unless ($dcscode)
7371 0 0 if ($Ham::Device::FT817COMM::verbose)
7377 0 0 if ($columns == 7)
7386 0 0 if ($musttoggle)
7387 0 0 if ($hometoggle)
7389 0 0 if ($musttoggle)
7390 0 0 if ($hometoggle)
7391 0 0 if ($Ham::Device::FT817COMM::verbose)
7392 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7400 0 0 if ($option eq 'MEMSKIP')
7402 0 0 if ($value ne 'YES' and $value ne 'NO')
7403 0 0 if ($Ham::Device::FT817COMM::verbose)
7409 0 0 if ($value eq $currentmemskip)
7410 0 0 if ($Ham::Device::FT817COMM::verbose)
7415 0 0 if ($musttoggle)
7416 0 0 if ($hometoggle)
7417 0 0 if ($value eq 'NO')
7418 0 0 if ($value eq 'YES')
7419 0 0 if ($hometoggle)
7420 0 0 if ($musttoggle)
7421 0 0 if ($Ham::Device::FT817COMM::verbose)
7422 0 0 if ($Ham::Device::FT817COMM::writestatus eq 'OK') { }
7430 0 0 if ($option eq 'RXFREQ')
7435 0 0 if ($value eq $currentrxfreq)
7436 0 0 if ($Ham::Device::FT817COMM::verbose)
7439 0 0 if ($type eq 'HOME')
7441 0 0 if ($test ne 'OK')
7442 0 0 if ($Ham::Device::FT817COMM::verbose)
7461 0 0 if ($hometoggle)
7462 0 0 if ($musttoggle)
7472 0 0 if ($value >= 42000000) { }
7473 0 0 if ($currentuhf ne 'YES')
7477 0 0 if ($currentuhf ne 'NO')
7483 0 0 if ($value >= 5000000) { }
7484 0 0 if ($currenthfvhf ne 'VHF')
7488 0 0 if ($currenthfvhf ne 'HF')
7493 0 0 if ($currentrange ne $newrange)
7496 0 0 if ($newrange eq 'HF')
7497 0 0 if ($newrange eq '6M')
7498 0 0 if ($newrange eq 'FM-BCB')
7499 0 0 if ($newrange eq 'AIR')
7500 0 0 if ($newrange eq '2M')
7501 0 0 if ($newrange eq 'UHF')
7508 0 0 if ($hometoggle)
7509 0 0 if ($musttoggle)
7510 0 0 if ($writestatus1 eq $writestatus3) { }
7511 0 0 if ($Ham::Device::FT817COMM::verbose)
0 0 if ($writestatus1 eq 'OK')
7513 0 0 if ($Ham::Device::FT817COMM::verbose)
7519 0 0 if ($option eq 'RPTOFFSETFREQ')
7521 0 0 if ($value < 0 or $value > 9999)
7522 0 0 if ($Ham::Device::FT817COMM::verbose)
7528 0 0 if ($value eq $currentoffset)
7529 0 0 if ($Ham::Device::FT817COMM::verbose)
7545 0 0 if ($hometoggle)
7546 0 0 if ($musttoggle)
7549 0 0 if ($hometoggle)
7550 0 0 if ($musttoggle)
7551 0 0 if ($writestatus1 eq $writestatus3) { }
7552 0 0 if ($writestatus1 eq 'OK')
7553 0 0 if ($Ham::Device::FT817COMM::verbose)
7557 0 0 if ($Ham::Device::FT817COMM::verbose)
7564 0 0 if ($option eq 'LABEL')
7570 0 0 if ($value eq $currentlabel)
7571 0 0 if ($Ham::Device::FT817COMM::verbose)
7574 0 0 if (length $value > 11)
7575 0 0 if ($Ham::Device::FT817COMM::verbose)
7586 0 0 if ($Ham::Device::FT817COMM::verbose)
7587 0 0 if ($hometoggle)
7588 0 0 if ($musttoggle)
7592 0 0 if ($letter == '0')
7593 0 0 if ($letter2 == '0')
7604 0 0 if ($hometoggle)
7605 0 0 if ($musttoggle)
7606 0 0 if ($Ham::Device::FT817COMM::verbose)
7617 0 0 if (length $value > 10)
7618 0 0 if ($Ham::Device::FT817COMM::verbose)
7624 0 0 if ($value eq $currentid)
7625 0 0 if ($Ham::Device::FT817COMM::verbose)
7657 0 0 if ($Ham::Device::FT817COMM::verbose)