1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
|
--[[
Eugeniy Mikhailov
1 June 2021
]]
--------- FREQ TO BITS ---------
function freq2regestersValues(freq)
local F_COMP = 5000000 -- magic number
local N = freq / F_COMP
local RF_N = math.floor(N)
local frac = math.abs(N - RF_N)
local RF_FD = 4000000 --magic number
local RF_FN = math.floor( (frac * RF_FD) + 0.5)
return freq, RF_N, RF_FN, RF_FD
end
-- test freq2regestersValues
fIn = 6.834e9
freq, RF_N, RF_FN, RF_FD = freq2regestersValues(fIn)
if freq ~= fIn and RF_N ~= 1366 and RF_FN ~= 3200000 and 4000000 then
print("ERROR in freq2regestersValues")
end
fIn=nil
freq=nil
RF_N=nil
RF_FN=nil
RF_FD=nil
-- end of freq2regestersValues test
------ INITIAL SETTINGS (send to chip)-------
function initSettings( )
local setting = { }
-- prefill with magic numbers & pad empty bits with 0's
setting["R0"] = pad2NumBitsInPlace( toBits(11197502), 24)
setting["R1"] = pad2NumBitsInPlace( toBits(4352515), 24)
setting["R2"] = pad2NumBitsInPlace( toBits(48238), 24)
setting["R3"] = pad2NumBitsInPlace( toBits(15925287), 24)
setting["R4"] = pad2NumBitsInPlace( toBits(10618633), 24)
setting["R5"] = pad2NumBitsInPlace( toBits(393579), 24)
setting["R6"] = pad2NumBitsInPlace( toBits(8126541), 24)
setting["R7"] = pad2NumBitsInPlace( toBits(10639), 24)
return setting
end
---------- COPY TABLE WITH DIFFERNT INDEX NAME -----------
function copySettings(old)
local dst={}
dst["R0"]= copyTableArray(old["R0"])
dst["R1"]= copyTableArray(old["R1"])
dst["R2"]= copyTableArray(old["R2"])
dst["R3"]= copyTableArray(old["R3"])
dst["R4"]= copyTableArray(old["R4"])
dst["R5"]= copyTableArray(old["R5"])
dst["R6"]= copyTableArray(old["R6"])
dst["R7"]= copyTableArray(old["R7"])
return dst
end
--------- SLICE AND REPLACE ------------
function FreqToSettings(freq, old_settings) --create table with new values of R0, R1, and R5
local settings= copySettings(old_settings)
local freq, RF_N, RF_FN, RF_FD = freq2regestersValues(freq)
local bRF_N=toBits(RF_N)
local bRF_FN=toBits(RF_FN)
local bRF_FD=toBits(RF_FD)
pad2NumBitsInPlace(bRF_N, 11)
pad2NumBitsInPlace(bRF_FN, 22)
pad2NumBitsInPlace(bRF_FD, 22)
-- print("bRF_N = "..bin2string(bRF_N, " "))
-- print("bRF_FN = "..bin2string(bRF_FN, " "))
-- print("bRF_FD = "..bin2string(bRF_FD, " "))
--print(bin2string(settings["R0"], " "))
settings["R0"]=tableReplace(settings["R0"], bRF_N, 14, 24)
--print(bin2string(settings["R0"], " "))
settings["R0"]=tableReplace(settings["R0"], bitSlice(bRF_FN, 1, 12), 2, 13)
--print(bin2string(settings["R0"], " "))
--print(bin2string(settings["R1"], " "))
settings["R1"]=tableReplace(settings["R1"], bitSlice(bRF_FD, 1, 12), 5, 16)
--print(bin2string(settings["R1"], " "))
--print(bin2string(settings["R5"], " "))
settings["R5"]=tableReplace(settings["R5"], bitSlice(bRF_FN, 13, 22), 5, 14)
--print(bin2string(settings["R5"], " "))
settings["R5"]=tableReplace(settings["R5"], bitSlice(bRF_FD, 13, 22), 15, 24)
--print(bin2string(settings["R5"], " "))
return settings
end
-- test
sinit= initSettings()
snew = FreqToSettings(6.834e9, sinit)
if bin2string(snew["R0"]) ~= "101010101100100000000000" then
print("Frequency to R0 register value conversion is broken")
end
if bin2string(snew["R1"]) ~= "010000101001000000000011" then
print("Frequency to R1 register value conversion is broken")
end
if bin2string(snew["R5"]) ~= "111101000011000011011011" then
print("Frequency to R5 register value conversion is broken")
end
sinit=nil
snew=nil
------- no changes to previous code -------------
-- send new register binary strings to chip
function set_lmx2487_board_to_new_state(settings)
set = {"R0", "R1", "R2", "R3", "R4", "R5", "R6", "R7"}
for i = 1, #set do
set_lmx2487register(toNum(settings[(set[i])]), (i-1))
end
update_lmx2487state()
end
function setFreq(freq)
settings = FreqToSettings(freq, settings)
set_lmx2487_board_to_new_state(settings)
end
|
