mirror of
https://github.com/Hamlib/Hamlib
synced 2026-08-13 17:32:05 -04:00
Remove execute bits for all test scripts and install them into doc/examples. Make sure check-py and check-tcl targets work. Set a conditional for Python3 or Python2 and install/test the correct script file. Use Makefile variables instead of configure substitutions wherever possible. Generate tcltest.tcl at make time to insert installation library path into the script so that tests pass.
123 lines
4.9 KiB
Lua
123 lines
4.9 KiB
Lua
#!/usr/bin/lua
|
|
|
|
Hamlib = require("Hamliblua")
|
|
|
|
-- you can see the Hamlib properties:
|
|
-- for key,value in pairs(Hamlib) do print(key,value) end
|
|
|
|
function doStartup()
|
|
print(string.format("%s test, %s\n", _VERSION, Hamlib.hamlib_version))
|
|
|
|
|
|
-- Hamlib.rig_set_debug (Hamlib.RIG_DEBUG_TRACE)
|
|
Hamlib.rig_set_debug (Hamlib.RIG_DEBUG_NONE)
|
|
|
|
-- Init RIG_MODEL_DUMMY
|
|
my_rig = Hamlib.Rig (Hamlib.RIG_MODEL_DUMMY)
|
|
-- you can see the Rig properties:
|
|
-- for key,value in pairs(my_rig) do print(key,value) end
|
|
|
|
my_rig:set_conf("rig_pathname", "/dev/Rig")
|
|
|
|
my_rig:set_conf("retry", "5")
|
|
my_rig:open()
|
|
|
|
-- 1073741944 is token value for "itu_region"
|
|
-- but using get_conf is much more convenient
|
|
region = my_rig:get_conf(1073741944)
|
|
regionstr = my_rig:get_conf("itu_region")
|
|
tpath = my_rig:get_conf("rig_pathname")
|
|
retry = my_rig:get_conf("retry")
|
|
|
|
print (string.format("status(str):\t\t%s", Hamlib.rigerror(my_rig.error_status)))
|
|
print (string.format("get_conf:\t\tpath = %s, retry = %s, ITU region = %s, ITU region (str) = %s", tpath, retry, region, regionstr))
|
|
|
|
my_rig:set_freq(Hamlib.RIG_VFO_B, 5700000000)
|
|
my_rig:set_vfo(Hamlib.RIG_VFO_B)
|
|
print(string.format("freq:\t\t\t%d", my_rig:get_freq()))
|
|
my_rig:set_freq(Hamlib.RIG_VFO_A, 145550000)
|
|
my_rig:set_vfo(Hamlib.RIG_VFO_A)
|
|
|
|
mode, width = my_rig:get_mode()
|
|
print(string.format("mode:\t\t\t%s\nbandwidth:\t\t%s", Hamlib.rig_strrmode(mode), width))
|
|
|
|
my_rig:set_mode(Hamlib.RIG_MODE_CW)
|
|
mode, width = my_rig:get_mode()
|
|
print(string.format("mode:\t\t\t%s\nbandwidth:\t\t%d", Hamlib.rig_strrmode(mode), width))
|
|
|
|
print(string.format("ITU_region:\t\t%s", my_rig.state.itu_region))
|
|
print(string.format("Backend copyright:\t%s",my_rig.caps.copyright))
|
|
|
|
print(string.format("Model:\t\t\t%s", my_rig.caps.model_name))
|
|
print(string.format("Manufacturer:\t\t%s", my_rig.caps.mfg_name))
|
|
print(string.format("Backend version:\t%s", my_rig.caps.version))
|
|
print(string.format("Backend license:\t%s", my_rig.caps.copyright))
|
|
print(string.format("Rig info:\t\t%s", my_rig:get_info()))
|
|
|
|
my_rig:set_level("VOX", 1)
|
|
print(string.format("status:\t\t\t%s - %s", my_rig.error_status, Hamlib.rigerror(my_rig.error_status)))
|
|
print(string.format("VOX level:\t\t%d", my_rig:get_level_i("VOX")))
|
|
my_rig:set_level(Hamlib.RIG_LEVEL_VOX, 5)
|
|
print(string.format("status:\t\t\t%s - %s", my_rig.error_status, Hamlib.rigerror(my_rig.error_status)))
|
|
-- see the func name (get_level_i) and format (%d)
|
|
print(string.format("VOX level:\t\t%d", my_rig:get_level_i(Hamlib.RIG_LEVEL_VOX)))
|
|
|
|
af = 12.34
|
|
print(string.format("Setting AF to %f...", af))
|
|
my_rig:set_level(Hamlib.RIG_LEVEL_AF, af)
|
|
print(string.format("status:\t\t\t%s - %s", my_rig.error_status, Hamlib.rigerror(my_rig.error_status)))
|
|
-- see the different of func name and format related to RIG_LEVEL_VOX!
|
|
print(string.format("AF level:\t\t%f", my_rig:get_level_f("AF")))
|
|
|
|
print(string.format("strength:\t\t%d", my_rig:get_level_i(Hamlib.RIG_LEVEL_STRENGTH)))
|
|
print(string.format("status:\t\t\t%s", my_rig.error_status))
|
|
print(string.format("status(str):\t\t%s", Hamlib.rigerror(my_rig.error_status)))
|
|
|
|
chan = Hamlib.channel(Hamlib.RIG_VFO_B)
|
|
|
|
my_rig:get_channel(chan)
|
|
print(string.format("get_channel status:\t%d", my_rig.error_status))
|
|
|
|
print(string.format("VFO:\t\t\t%s, %s", Hamlib.rig_strvfo(chan.vfo), chan.freq))
|
|
print(string.format("Attenuators:\t\t%s", table.concat(my_rig.caps.attenuator, ", ")))
|
|
|
|
print("\nSending Morse, '73'")
|
|
my_rig:send_morse(Hamlib.RIG_VFO_A, "73")
|
|
|
|
my_rig:close ()
|
|
|
|
print("\nSome static functions:")
|
|
|
|
err, lon1, lat1 = Hamlib.locator2longlat("IN98XC")
|
|
err, lon2, lat2 = Hamlib.locator2longlat("DM33DX")
|
|
err, loc1 = Hamlib.longlat2locator(lon1, lat1, 3)
|
|
err, loc2 = Hamlib.longlat2locator(lon2, lat2, 3)
|
|
print(string.format("Loc1:\t\tIN98XC -> %9.4f, %9.4f -> %s", lon1, lat1, loc1))
|
|
print(string.format("Loc2:\t\tDM33DX -> %9.4f, %9.4f -> %s", lon2, lat2, loc2))
|
|
|
|
err, dist, az = Hamlib.qrb(lon1, lat1, lon2, lat2)
|
|
longpath = Hamlib.distance_long_path(dist)
|
|
print(string.format("Distance:\t%.3f km, azimuth %.2f, long path:\t%.3f km", dist, az, longpath))
|
|
|
|
-- dec2dms expects values from 180 to -180
|
|
-- sw is 1 when deg is negative (west or south) as 0 cannot be signed
|
|
err, deg1, mins1, sec1, sw1 = Hamlib.dec2dms(lon1)
|
|
err, deg2, mins2, sec2, sw2 = Hamlib.dec2dms(lat1)
|
|
|
|
lon3 = Hamlib.dms2dec(deg1, mins1, sec1, sw1)
|
|
lat3 = Hamlib.dms2dec(deg2, mins2, sec2, sw2)
|
|
|
|
if sw1 > 0 then D = 'W' else D = 'E' end
|
|
print(string.format("Longitude:\t%4.4f, %4.0f° %.0f' %2.0f\" %1s\trecoded: %9.4f", lon1, deg1, mins1, sec1, D, lon3))
|
|
|
|
if sw2 > 0 then D = 'S' else D = 'N' end
|
|
print(string.format("Latitude:\t%4.4f, %4.0f° %.0f' %2.0f\" %1s\trecoded: %9.4f", lat1, deg2, mins2, sec2, D, lat3))
|
|
|
|
end
|
|
|
|
doStartup()
|
|
|
|
|
|
|
|
|
|
|