Last active
August 29, 2015 14:09
-
-
Save cho45/3e463247a8e6560aeb85 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!ruby | |
require 'serialport' | |
@port = SerialPort.new( | |
"/dev/tty.usbserial-A402PY11", | |
38400, | |
8, | |
1, | |
0 | |
) | |
@port.set_encoding(Encoding::BINARY) | |
TEXT_MAP = { | |
'<' => 'L', | |
'>' => '-', | |
'@' => ' ', | |
'K' => 'H', | |
'M' => 'N', | |
'Q' => 'O', | |
'V' => 'U', | |
'W' => 'I', | |
'X' => 'c-bar', | |
'Z' => 'c', | |
'[' => 'r-bar', | |
'\\' => 'λ', | |
']' => '', | |
'^' => '', | |
} | |
def get_swr(step=3) | |
ret = 0 | |
step.times do | |
@port << "DS;" | |
data = @port.gets(";") | |
t, a, f = *data.match(/DS(........)(.)(.)/).captures | |
t = t.split(//).reduce("") {|r, i| | |
chr = (i.ord & 0b01111111).chr | |
r << ( ( (i.ord & 1<<7) != 0) ? ("." + chr) : (chr) ) | |
}.gsub(Regexp.new(TEXT_MAP.keys.map {|i| Regexp.escape(i) }.join("|")), TEXT_MAP) | |
# KX3 displays SWR to main display as following : "1.2-1" | |
if m = t.match(/([\d]+.[\d]+)-I/) | |
swr = m[1] | |
else | |
return nil | |
end | |
ret += swr.to_f | |
# p [t, a, f, swr] | |
end | |
ret / step | |
end | |
def get_freq | |
@port << "FA;" | |
res = @port.gets(";") | |
freq = res.match(/FA(\d{11})/)[1].to_i | |
end | |
def set_freq(freq) | |
@port << ("FA%011d;" % freq) | |
get_freq == freq or raise "Failed to set freq" | |
end | |
def bypass_atu(&block) | |
@port << "MN023;" | |
@port << "MP;" | |
current = @port.gets(";") | |
current =~ /^MP\d{3}/ or raise "Unknown Responde #{current}" | |
@port << "MP001;MP;" | |
res = @port.gets(";") | |
res == "MP001;" or raise "Failed to set KAT3 bypass: #{res}" | |
@port << "MN255;" | |
block.call | |
ensure | |
@port << "MN023;" | |
@port << current | |
@port << "MN255;" | |
end | |
def tune(&block) | |
# Switch Hold Emulation 16 = TUNE | |
@port << 'SWH16;' | |
sleep 0.5 | |
@port << 'TQ;' | |
@port.gets(";") == 'TQ1;' or raise "Band END" | |
sleep 0.3 | |
block.call | |
ensure | |
@port << "RX;" | |
sleep 0.5 | |
@port << "TQ;" | |
@port.gets(";") == 'TQ0;' or raise "Failed to back to RX" | |
end | |
def scan_swr | |
result = [] | |
@port << "PC;" | |
current_power = @port.gets(";") | |
@port << "PC001;PC;" | |
@port.gets(";") == "PC001;" or raise "Failed to set power" | |
bypass_atu do | |
freq = get_freq | |
step = 20e3 | |
range = Range.new(freq - 100e3, freq + 100e3) | |
catch(:done) do | |
begin | |
set_freq(range.first) | |
tune do | |
range.step(step) {|n| | |
set_freq(n) | |
swr = get_swr(3) | |
if swr.nil? | |
throw :done | |
end | |
r = [n, swr] | |
p r | |
result << r | |
} | |
end | |
rescue => e | |
if e.message = "Band END" | |
range = Range.new(range.first + step, range.last) | |
retry | |
end | |
ensure | |
set_freq(freq) | |
end | |
end | |
end | |
result | |
ensure | |
@port << current_power | |
@port << "PC;" | |
@port.gets(";") == current_power or raise "Failed to back to power" | |
end | |
p scan_swr |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment