w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-23 04:38:37 -05:00
Code Issues Packages Projects Releases Wiki Activity

Move project files to map65 sub-directory

Browse Source 
Preparation for merging with the wsjtx project repository.
This commit is contained in:
Bill Somerville 2021-04-09 13:57:41 +01:00
parent 7c673b41be
commit 280c8344cd
No known key found for this signature in database
GPG Key ID: D864B06D1E81618F
240 changed files with 10338 additions and 10338 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

0
.gitignore → map65/.gitignore vendored
View File

0
CMakeLists.txt → map65/CMakeLists.txt
View File

60
LICENSE_WHEATLEY.TXT → map65/LICENSE_WHEATLEY.TXT
View File

@ -1,30 +1,30 @@
+ + + This Software is released under the "Simplified BSD License" + + + + + + This Software is released under the "Simplified BSD License" + + +
Copyright 2010 Moe Wheatley. All rights reserved. Copyright 2010 Moe Wheatley. All rights reserved.
Redistribution and use in source and binary forms, with or without Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are modification, are permitted provided that the following conditions are
met: met:
1. Redistributions of source code must retain the above copyright 1. Redistributions of source code must retain the above copyright
notice, this list of conditions and the following disclaimer. notice, this list of conditions and the following disclaimer.
2. Redistributions in binary form must reproduce the above copyright 2. Redistributions in binary form must reproduce the above copyright
notice, this list of conditions and the following disclaimer in notice, this list of conditions and the following disclaimer in
the documentation and/or other materials provided with the the documentation and/or other materials provided with the
distribution. distribution.
THIS SOFTWARE IS PROVIDED BY Moe Wheatley ``AS IS'' AND ANY EXPRESS OR THIS SOFTWARE IS PROVIDED BY Moe Wheatley ``AS IS'' AND ANY EXPRESS OR
IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
DISCLAIMED. IN NO EVENT SHALL Moe Wheatley OR CONTRIBUTORS BE LIABLE DISCLAIMED. IN NO EVENT SHALL Moe Wheatley OR CONTRIBUTORS BE LIABLE
FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
The views and conclusions contained in the software and documentation The views and conclusions contained in the software and documentation
are those of the authors and should not be interpreted as representing are those of the authors and should not be interpreted as representing
official policies, either expressed or implied, of Moe Wheatley. official policies, either expressed or implied, of Moe Wheatley.

0
MAP65_Beta_Release.docx → map65/MAP65_Beta_Release.docx
View File

0
about.cpp → map65/about.cpp
View File

0
about.h → map65/about.h
View File

82
about.ui → map65/about.ui
View File

@ -1,41 +1,41 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<ui version="4.0"> <ui version="4.0">
<class>CAboutDlg</class> <class>CAboutDlg</class>
<widget class="QDialog" name="CAboutDlg"> <widget class="QDialog" name="CAboutDlg">
<property name="windowModality"> <property name="windowModality">
<enum>Qt::NonModal</enum> <enum>Qt::NonModal</enum>
</property> </property>
<property name="geometry"> <property name="geometry">
<rect> <rect>
<x>0</x> <x>0</x>
<y>0</y> <y>0</y>
<width>374</width> <width>374</width>
<height>164</height> <height>164</height>
</rect> </rect>
</property> </property>
<property name="sizePolicy"> <property name="sizePolicy">
<sizepolicy hsizetype="Preferred" vsizetype="Preferred"> <sizepolicy hsizetype="Preferred" vsizetype="Preferred">
<horstretch>0</horstretch> <horstretch>0</horstretch>
<verstretch>0</verstretch> <verstretch>0</verstretch>
</sizepolicy> </sizepolicy>
</property> </property>
<property name="windowTitle"> <property name="windowTitle">
<string>About MAP65</string> <string>About MAP65</string>
</property> </property>
<widget class="QLabel" name="labelTxt"> <widget class="QLabel" name="labelTxt">
<property name="geometry"> <property name="geometry">
<rect> <rect>
<x>20</x> <x>20</x>
<y>10</y> <y>10</y>
<width>331</width> <width>331</width>
<height>131</height> <height>131</height>
</rect> </rect>
</property> </property>
<property name="text"> <property name="text">
<string/> <string/>
</property> </property>
</widget> </widget>
</widget> </widget>
<resources/> <resources/>
<connections/> <connections/>
</ui> </ui>

514
afmhot.dat → map65/afmhot.dat
View File

@ -1,257 +1,257 @@
0 0.0000 0.0000 0.0000 0 0.0000 0.0000 0.0000
1 0.0000 0.0000 0.0000 1 0.0000 0.0000 0.0000
2 0.0078 0.0000 0.0000 2 0.0078 0.0000 0.0000
3 0.0157 0.0000 0.0000 3 0.0157 0.0000 0.0000
4 0.0235 0.0000 0.0000 4 0.0235 0.0000 0.0000
5 0.0314 0.0000 0.0000 5 0.0314 0.0000 0.0000
6 0.0392 0.0000 0.0000 6 0.0392 0.0000 0.0000
7 0.0471 0.0000 0.0000 7 0.0471 0.0000 0.0000
8 0.0549 0.0000 0.0000 8 0.0549 0.0000 0.0000
9 0.0627 0.0000 0.0000 9 0.0627 0.0000 0.0000
10 0.0706 0.0000 0.0000 10 0.0706 0.0000 0.0000
11 0.0784 0.0000 0.0000 11 0.0784 0.0000 0.0000
12 0.0863 0.0000 0.0000 12 0.0863 0.0000 0.0000
13 0.0941 0.0000 0.0000 13 0.0941 0.0000 0.0000
14 0.1020 0.0000 0.0000 14 0.1020 0.0000 0.0000
15 0.1098 0.0000 0.0000 15 0.1098 0.0000 0.0000
16 0.1176 0.0000 0.0000 16 0.1176 0.0000 0.0000
17 0.1255 0.0000 0.0000 17 0.1255 0.0000 0.0000
18 0.1333 0.0000 0.0000 18 0.1333 0.0000 0.0000
19 0.1412 0.0000 0.0000 19 0.1412 0.0000 0.0000
20 0.1490 0.0000 0.0000 20 0.1490 0.0000 0.0000
21 0.1569 0.0000 0.0000 21 0.1569 0.0000 0.0000
22 0.1647 0.0000 0.0000 22 0.1647 0.0000 0.0000
23 0.1725 0.0000 0.0000 23 0.1725 0.0000 0.0000
24 0.1804 0.0000 0.0000 24 0.1804 0.0000 0.0000
25 0.1882 0.0000 0.0000 25 0.1882 0.0000 0.0000
26 0.1961 0.0000 0.0000 26 0.1961 0.0000 0.0000
27 0.2039 0.0000 0.0000 27 0.2039 0.0000 0.0000
28 0.2118 0.0000 0.0000 28 0.2118 0.0000 0.0000
29 0.2196 0.0000 0.0000 29 0.2196 0.0000 0.0000
30 0.2275 0.0000 0.0000 30 0.2275 0.0000 0.0000
31 0.2353 0.0000 0.0000 31 0.2353 0.0000 0.0000
32 0.2431 0.0000 0.0000 32 0.2431 0.0000 0.0000
33 0.2510 0.0000 0.0000 33 0.2510 0.0000 0.0000
34 0.2588 0.0000 0.0000 34 0.2588 0.0000 0.0000
35 0.2667 0.0000 0.0000 35 0.2667 0.0000 0.0000
36 0.2745 0.0000 0.0000 36 0.2745 0.0000 0.0000
37 0.2824 0.0000 0.0000 37 0.2824 0.0000 0.0000
38 0.2902 0.0000 0.0000 38 0.2902 0.0000 0.0000
39 0.2980 0.0000 0.0000 39 0.2980 0.0000 0.0000
40 0.3059 0.0000 0.0000 40 0.3059 0.0000 0.0000
41 0.3137 0.0000 0.0000 41 0.3137 0.0000 0.0000
42 0.3216 0.0000 0.0000 42 0.3216 0.0000 0.0000
43 0.3294 0.0000 0.0000 43 0.3294 0.0000 0.0000
44 0.3373 0.0000 0.0000 44 0.3373 0.0000 0.0000
45 0.3451 0.0000 0.0000 45 0.3451 0.0000 0.0000
46 0.3529 0.0000 0.0000 46 0.3529 0.0000 0.0000
47 0.3608 0.0000 0.0000 47 0.3608 0.0000 0.0000
48 0.3686 0.0000 0.0000 48 0.3686 0.0000 0.0000
49 0.3765 0.0000 0.0000 49 0.3765 0.0000 0.0000
50 0.3843 0.0000 0.0000 50 0.3843 0.0000 0.0000
51 0.3922 0.0000 0.0000 51 0.3922 0.0000 0.0000
52 0.4000 0.0000 0.0000 52 0.4000 0.0000 0.0000
53 0.4078 0.0000 0.0000 53 0.4078 0.0000 0.0000
54 0.4157 0.0000 0.0000 54 0.4157 0.0000 0.0000
55 0.4235 0.0000 0.0000 55 0.4235 0.0000 0.0000
56 0.4314 0.0000 0.0000 56 0.4314 0.0000 0.0000
57 0.4392 0.0000 0.0000 57 0.4392 0.0000 0.0000
58 0.4471 0.0000 0.0000 58 0.4471 0.0000 0.0000
59 0.4549 0.0000 0.0000 59 0.4549 0.0000 0.0000
60 0.4627 0.0000 0.0000 60 0.4627 0.0000 0.0000
61 0.4706 0.0000 0.0000 61 0.4706 0.0000 0.0000
62 0.4784 0.0000 0.0000 62 0.4784 0.0000 0.0000
63 0.4863 0.0000 0.0000 63 0.4863 0.0000 0.0000
64 0.4941 0.0000 0.0000 64 0.4941 0.0000 0.0000
65 0.5020 0.0000 0.0000 65 0.5020 0.0000 0.0000
66 0.5098 0.0098 0.0000 66 0.5098 0.0098 0.0000
67 0.5176 0.0176 0.0000 67 0.5176 0.0176 0.0000
68 0.5255 0.0255 0.0000 68 0.5255 0.0255 0.0000
69 0.5333 0.0333 0.0000 69 0.5333 0.0333 0.0000
70 0.5412 0.0412 0.0000 70 0.5412 0.0412 0.0000
71 0.5490 0.0490 0.0000 71 0.5490 0.0490 0.0000
72 0.5569 0.0569 0.0000 72 0.5569 0.0569 0.0000
73 0.5647 0.0647 0.0000 73 0.5647 0.0647 0.0000
74 0.5725 0.0725 0.0000 74 0.5725 0.0725 0.0000
75 0.5804 0.0804 0.0000 75 0.5804 0.0804 0.0000
76 0.5882 0.0882 0.0000 76 0.5882 0.0882 0.0000
77 0.5961 0.0961 0.0000 77 0.5961 0.0961 0.0000
78 0.6039 0.1039 0.0000 78 0.6039 0.1039 0.0000
79 0.6118 0.1118 0.0000 79 0.6118 0.1118 0.0000
80 0.6196 0.1196 0.0000 80 0.6196 0.1196 0.0000
81 0.6275 0.1275 0.0000 81 0.6275 0.1275 0.0000
82 0.6353 0.1353 0.0000 82 0.6353 0.1353 0.0000
83 0.6431 0.1431 0.0000 83 0.6431 0.1431 0.0000
84 0.6510 0.1510 0.0000 84 0.6510 0.1510 0.0000
85 0.6588 0.1588 0.0000 85 0.6588 0.1588 0.0000
86 0.6667 0.1667 0.0000 86 0.6667 0.1667 0.0000
87 0.6745 0.1745 0.0000 87 0.6745 0.1745 0.0000
88 0.6824 0.1824 0.0000 88 0.6824 0.1824 0.0000
89 0.6902 0.1902 0.0000 89 0.6902 0.1902 0.0000
90 0.6980 0.1980 0.0000 90 0.6980 0.1980 0.0000
91 0.7059 0.2059 0.0000 91 0.7059 0.2059 0.0000
92 0.7137 0.2137 0.0000 92 0.7137 0.2137 0.0000
93 0.7216 0.2216 0.0000 93 0.7216 0.2216 0.0000
94 0.7294 0.2294 0.0000 94 0.7294 0.2294 0.0000
95 0.7373 0.2373 0.0000 95 0.7373 0.2373 0.0000
96 0.7451 0.2451 0.0000 96 0.7451 0.2451 0.0000
97 0.7529 0.2529 0.0000 97 0.7529 0.2529 0.0000
98 0.7608 0.2608 0.0000 98 0.7608 0.2608 0.0000
99 0.7686 0.2686 0.0000 99 0.7686 0.2686 0.0000
100 0.7765 0.2765 0.0000 100 0.7765 0.2765 0.0000
101 0.7843 0.2843 0.0000 101 0.7843 0.2843 0.0000
102 0.7922 0.2922 0.0000 102 0.7922 0.2922 0.0000
103 0.8000 0.3000 0.0000 103 0.8000 0.3000 0.0000
104 0.8078 0.3078 0.0000 104 0.8078 0.3078 0.0000
105 0.8157 0.3157 0.0000 105 0.8157 0.3157 0.0000
106 0.8235 0.3235 0.0000 106 0.8235 0.3235 0.0000
107 0.8314 0.3314 0.0000 107 0.8314 0.3314 0.0000
108 0.8392 0.3392 0.0000 108 0.8392 0.3392 0.0000
109 0.8471 0.3471 0.0000 109 0.8471 0.3471 0.0000
110 0.8549 0.3549 0.0000 110 0.8549 0.3549 0.0000
111 0.8627 0.3627 0.0000 111 0.8627 0.3627 0.0000
112 0.8706 0.3706 0.0000 112 0.8706 0.3706 0.0000
113 0.8784 0.3784 0.0000 113 0.8784 0.3784 0.0000
114 0.8863 0.3863 0.0000 114 0.8863 0.3863 0.0000
115 0.8941 0.3941 0.0000 115 0.8941 0.3941 0.0000
116 0.9020 0.4020 0.0000 116 0.9020 0.4020 0.0000
117 0.9098 0.4098 0.0000 117 0.9098 0.4098 0.0000
118 0.9176 0.4176 0.0000 118 0.9176 0.4176 0.0000
119 0.9255 0.4255 0.0000 119 0.9255 0.4255 0.0000
120 0.9333 0.4333 0.0000 120 0.9333 0.4333 0.0000
121 0.9412 0.4412 0.0000 121 0.9412 0.4412 0.0000
122 0.9490 0.4490 0.0000 122 0.9490 0.4490 0.0000
123 0.9569 0.4569 0.0000 123 0.9569 0.4569 0.0000
124 0.9647 0.4647 0.0000 124 0.9647 0.4647 0.0000
125 0.9725 0.4725 0.0000 125 0.9725 0.4725 0.0000
126 0.9804 0.4804 0.0000 126 0.9804 0.4804 0.0000
127 0.9882 0.4882 0.0000 127 0.9882 0.4882 0.0000
128 0.9961 0.4961 0.0000 128 0.9961 0.4961 0.0000
129 1.0000 0.5039 0.0000 129 1.0000 0.5039 0.0000
130 1.0000 0.5118 0.0118 130 1.0000 0.5118 0.0118
131 1.0000 0.5196 0.0196 131 1.0000 0.5196 0.0196
132 1.0000 0.5275 0.0275 132 1.0000 0.5275 0.0275
133 1.0000 0.5353 0.0353 133 1.0000 0.5353 0.0353
134 1.0000 0.5431 0.0431 134 1.0000 0.5431 0.0431
135 1.0000 0.5510 0.0510 135 1.0000 0.5510 0.0510
136 1.0000 0.5588 0.0588 136 1.0000 0.5588 0.0588
137 1.0000 0.5667 0.0667 137 1.0000 0.5667 0.0667
138 1.0000 0.5745 0.0745 138 1.0000 0.5745 0.0745
139 1.0000 0.5824 0.0824 139 1.0000 0.5824 0.0824
140 1.0000 0.5902 0.0902 140 1.0000 0.5902 0.0902
141 1.0000 0.5980 0.0980 141 1.0000 0.5980 0.0980
142 1.0000 0.6059 0.1059 142 1.0000 0.6059 0.1059
143 1.0000 0.6137 0.1137 143 1.0000 0.6137 0.1137
144 1.0000 0.6216 0.1216 144 1.0000 0.6216 0.1216
145 1.0000 0.6294 0.1294 145 1.0000 0.6294 0.1294
146 1.0000 0.6373 0.1373 146 1.0000 0.6373 0.1373
147 1.0000 0.6451 0.1451 147 1.0000 0.6451 0.1451
148 1.0000 0.6529 0.1529 148 1.0000 0.6529 0.1529
149 1.0000 0.6608 0.1608 149 1.0000 0.6608 0.1608
150 1.0000 0.6686 0.1686 150 1.0000 0.6686 0.1686
151 1.0000 0.6765 0.1765 151 1.0000 0.6765 0.1765
152 1.0000 0.6843 0.1843 152 1.0000 0.6843 0.1843
153 1.0000 0.6922 0.1922 153 1.0000 0.6922 0.1922
154 1.0000 0.7000 0.2000 154 1.0000 0.7000 0.2000
155 1.0000 0.7078 0.2078 155 1.0000 0.7078 0.2078
156 1.0000 0.7157 0.2157 156 1.0000 0.7157 0.2157
157 1.0000 0.7235 0.2235 157 1.0000 0.7235 0.2235
158 1.0000 0.7314 0.2314 158 1.0000 0.7314 0.2314
159 1.0000 0.7392 0.2392 159 1.0000 0.7392 0.2392
160 1.0000 0.7471 0.2471 160 1.0000 0.7471 0.2471
161 1.0000 0.7549 0.2549 161 1.0000 0.7549 0.2549
162 1.0000 0.7627 0.2627 162 1.0000 0.7627 0.2627
163 1.0000 0.7706 0.2706 163 1.0000 0.7706 0.2706
164 1.0000 0.7784 0.2784 164 1.0000 0.7784 0.2784
165 1.0000 0.7863 0.2863 165 1.0000 0.7863 0.2863
166 1.0000 0.7941 0.2941 166 1.0000 0.7941 0.2941
167 1.0000 0.8020 0.3020 167 1.0000 0.8020 0.3020
168 1.0000 0.8098 0.3098 168 1.0000 0.8098 0.3098
169 1.0000 0.8176 0.3176 169 1.0000 0.8176 0.3176
170 1.0000 0.8255 0.3255 170 1.0000 0.8255 0.3255
171 1.0000 0.8333 0.3333 171 1.0000 0.8333 0.3333
172 1.0000 0.8412 0.3412 172 1.0000 0.8412 0.3412
173 1.0000 0.8490 0.3490 173 1.0000 0.8490 0.3490
174 1.0000 0.8569 0.3569 174 1.0000 0.8569 0.3569
175 1.0000 0.8647 0.3647 175 1.0000 0.8647 0.3647
176 1.0000 0.8725 0.3725 176 1.0000 0.8725 0.3725
177 1.0000 0.8804 0.3804 177 1.0000 0.8804 0.3804
178 1.0000 0.8882 0.3882 178 1.0000 0.8882 0.3882
179 1.0000 0.8961 0.3961 179 1.0000 0.8961 0.3961
180 1.0000 0.9039 0.4039 180 1.0000 0.9039 0.4039
181 1.0000 0.9118 0.4118 181 1.0000 0.9118 0.4118
182 1.0000 0.9196 0.4196 182 1.0000 0.9196 0.4196
183 1.0000 0.9275 0.4275 183 1.0000 0.9275 0.4275
184 1.0000 0.9353 0.4353 184 1.0000 0.9353 0.4353
185 1.0000 0.9431 0.4431 185 1.0000 0.9431 0.4431
186 1.0000 0.9510 0.4510 186 1.0000 0.9510 0.4510
187 1.0000 0.9588 0.4588 187 1.0000 0.9588 0.4588
188 1.0000 0.9667 0.4667 188 1.0000 0.9667 0.4667
189 1.0000 0.9745 0.4745 189 1.0000 0.9745 0.4745
190 1.0000 0.9824 0.4824 190 1.0000 0.9824 0.4824
191 1.0000 0.9902 0.4902 191 1.0000 0.9902 0.4902
192 1.0000 0.9980 0.4980 192 1.0000 0.9980 0.4980
193 1.0000 1.0000 0.5059 193 1.0000 1.0000 0.5059
194 1.0000 1.0000 0.5137 194 1.0000 1.0000 0.5137
195 1.0000 1.0000 0.5216 195 1.0000 1.0000 0.5216
196 1.0000 1.0000 0.5294 196 1.0000 1.0000 0.5294
197 1.0000 1.0000 0.5373 197 1.0000 1.0000 0.5373
198 1.0000 1.0000 0.5451 198 1.0000 1.0000 0.5451
199 1.0000 1.0000 0.5529 199 1.0000 1.0000 0.5529
200 1.0000 1.0000 0.5608 200 1.0000 1.0000 0.5608
201 1.0000 1.0000 0.5686 201 1.0000 1.0000 0.5686
202 1.0000 1.0000 0.5765 202 1.0000 1.0000 0.5765
203 1.0000 1.0000 0.5843 203 1.0000 1.0000 0.5843
204 1.0000 1.0000 0.5922 204 1.0000 1.0000 0.5922
205 1.0000 1.0000 0.6000 205 1.0000 1.0000 0.6000
206 1.0000 1.0000 0.6078 206 1.0000 1.0000 0.6078
207 1.0000 1.0000 0.6157 207 1.0000 1.0000 0.6157
208 1.0000 1.0000 0.6235 208 1.0000 1.0000 0.6235
209 1.0000 1.0000 0.6314 209 1.0000 1.0000 0.6314
210 1.0000 1.0000 0.6392 210 1.0000 1.0000 0.6392
211 1.0000 1.0000 0.6471 211 1.0000 1.0000 0.6471
212 1.0000 1.0000 0.6549 212 1.0000 1.0000 0.6549
213 1.0000 1.0000 0.6627 213 1.0000 1.0000 0.6627
214 1.0000 1.0000 0.6706 214 1.0000 1.0000 0.6706
215 1.0000 1.0000 0.6784 215 1.0000 1.0000 0.6784
216 1.0000 1.0000 0.6863 216 1.0000 1.0000 0.6863
217 1.0000 1.0000 0.6941 217 1.0000 1.0000 0.6941
218 1.0000 1.0000 0.7020 218 1.0000 1.0000 0.7020
219 1.0000 1.0000 0.7098 219 1.0000 1.0000 0.7098
220 1.0000 1.0000 0.7176 220 1.0000 1.0000 0.7176
221 1.0000 1.0000 0.7255 221 1.0000 1.0000 0.7255
222 1.0000 1.0000 0.7333 222 1.0000 1.0000 0.7333
223 1.0000 1.0000 0.7412 223 1.0000 1.0000 0.7412
224 1.0000 1.0000 0.7490 224 1.0000 1.0000 0.7490
225 1.0000 1.0000 0.7569 225 1.0000 1.0000 0.7569
226 1.0000 1.0000 0.7647 226 1.0000 1.0000 0.7647
227 1.0000 1.0000 0.7725 227 1.0000 1.0000 0.7725
228 1.0000 1.0000 0.7804 228 1.0000 1.0000 0.7804
229 1.0000 1.0000 0.7882 229 1.0000 1.0000 0.7882
230 1.0000 1.0000 0.7961 230 1.0000 1.0000 0.7961
231 1.0000 1.0000 0.8039 231 1.0000 1.0000 0.8039
232 1.0000 1.0000 0.8118 232 1.0000 1.0000 0.8118
233 1.0000 1.0000 0.8196 233 1.0000 1.0000 0.8196
234 1.0000 1.0000 0.8275 234 1.0000 1.0000 0.8275
235 1.0000 1.0000 0.8353 235 1.0000 1.0000 0.8353
236 1.0000 1.0000 0.8431 236 1.0000 1.0000 0.8431
237 1.0000 1.0000 0.8510 237 1.0000 1.0000 0.8510
238 1.0000 1.0000 0.8588 238 1.0000 1.0000 0.8588
239 1.0000 1.0000 0.8667 239 1.0000 1.0000 0.8667
240 1.0000 1.0000 0.8745 240 1.0000 1.0000 0.8745
241 1.0000 1.0000 0.8824 241 1.0000 1.0000 0.8824
242 1.0000 1.0000 0.8902 242 1.0000 1.0000 0.8902
243 1.0000 1.0000 0.8980 243 1.0000 1.0000 0.8980
244 1.0000 1.0000 0.9059 244 1.0000 1.0000 0.9059
245 1.0000 1.0000 0.9137 245 1.0000 1.0000 0.9137
246 1.0000 1.0000 0.9216 246 1.0000 1.0000 0.9216
247 1.0000 1.0000 0.9294 247 1.0000 1.0000 0.9294
248 1.0000 1.0000 0.9373 248 1.0000 1.0000 0.9373
249 1.0000 1.0000 0.9451 249 1.0000 1.0000 0.9451
250 1.0000 1.0000 0.9529 250 1.0000 1.0000 0.9529
251 1.0000 1.0000 0.9608 251 1.0000 1.0000 0.9608
252 1.0000 1.0000 0.9686 252 1.0000 1.0000 0.9686
253 1.0000 1.0000 0.9765 253 1.0000 1.0000 0.9765
254 1.0 0.0 0.0 254 1.0 0.0 0.0
255 1.0 1.0 0.0 255 1.0 1.0 0.0
256 0.0 1.000 0.0 256 0.0 1.000 0.0

0
astro.cpp → map65/astro.cpp
View File

0
astro.h → map65/astro.h
View File

74
astro.ui → map65/astro.ui
View File

@ -1,37 +1,37 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<ui version="4.0"> <ui version="4.0">
<class>Astro</class> <class>Astro</class>
<widget class="QWidget" name="Astro"> <widget class="QWidget" name="Astro">
<property name="geometry"> <property name="geometry">
<rect> <rect>
<x>0</x> <x>0</x>
<y>0</y> <y>0</y>
<width>262</width> <width>262</width>
<height>483</height> <height>483</height>
</rect> </rect>
</property> </property>
<property name="windowTitle"> <property name="windowTitle">
<string>Form</string> <string>Form</string>
</property> </property>
<widget class="QTextBrowser" name="astroTextBrowser"> <widget class="QTextBrowser" name="astroTextBrowser">
<property name="geometry"> <property name="geometry">
<rect> <rect>
<x>0</x> <x>0</x>
<y>10</y> <y>10</y>
<width>256</width> <width>256</width>
<height>451</height> <height>451</height>
</rect> </rect>
</property> </property>
<property name="font"> <property name="font">
<font> <font>
<family>Courier New</family> <family>Courier New</family>
<pointsize>20</pointsize> <pointsize>20</pointsize>
<weight>75</weight> <weight>75</weight>
<bold>true</bold> <bold>true</bold>
</font> </font>
</property> </property>
</widget> </widget>
</widget> </widget>
<resources/> <resources/>
<connections/> <connections/>
</ui> </ui>

0
bandmap.cpp → map65/bandmap.cpp
View File

0
bandmap.h → map65/bandmap.h
View File

86
bandmap.ui → map65/bandmap.ui
View File

@ -1,43 +1,43 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<ui version="4.0"> <ui version="4.0">
<class>BandMap</class> <class>BandMap</class>
<widget class="QWidget" name="BandMap"> <widget class="QWidget" name="BandMap">
<property name="geometry"> <property name="geometry">
<rect> <rect>
<x>0</x> <x>0</x>
<y>0</y> <y>0</y>
<width>329</width> <width>329</width>
<height>379</height> <height>379</height>
</rect> </rect>
</property> </property>
<property name="minimumSize"> <property name="minimumSize">
<size> <size>
<width>0</width> <width>0</width>
<height>0</height> <height>0</height>
</size> </size>
</property> </property>
<property name="windowTitle"> <property name="windowTitle">
<string>Form</string> <string>Form</string>
</property> </property>
<layout class="QGridLayout" name="gridLayout"> <layout class="QGridLayout" name="gridLayout">
<item row="0" column="0"> <item row="0" column="0">
<widget class="QTextBrowser" name="bmTextBrowser"> <widget class="QTextBrowser" name="bmTextBrowser">
<property name="minimumSize"> <property name="minimumSize">
<size> <size>
<width>107</width> <width>107</width>
<height>0</height> <height>0</height>
</size> </size>
</property> </property>
<property name="font"> <property name="font">
<font> <font>
<family>Courier New</family> <family>Courier New</family>
<pointsize>9</pointsize> <pointsize>9</pointsize>
</font> </font>
</property> </property>
</widget> </widget>
</item> </item>
</layout> </layout>
</widget> </widget>
<resources/> <resources/>
<connections/> <connections/>
</ui> </ui>

512
blue.dat → map65/blue.dat
View File

@ -1,256 +1,256 @@
0 0.0000 0.0000 0.0000 0 0.0000 0.0000 0.0000
1 0.0902 0.0902 0.2558 1 0.0902 0.0902 0.2558
2 0.1176 0.1176 0.2694 2 0.1176 0.1176 0.2694
3 0.1412 0.1412 0.2820 3 0.1412 0.1412 0.2820
4 0.1569 0.1569 0.2938 4 0.1569 0.1569 0.2938
5 0.1725 0.1725 0.3049 5 0.1725 0.1725 0.3049
6 0.1843 0.1843 0.3154 6 0.1843 0.1843 0.3154
7 0.1961 0.1961 0.3254 7 0.1961 0.1961 0.3254
8 0.2039 0.2039 0.3349 8 0.2039 0.2039 0.3349
9 0.2157 0.2157 0.3440 9 0.2157 0.2157 0.3440
10 0.2235 0.2235 0.3528 10 0.2235 0.2235 0.3528
11 0.2314 0.2314 0.3612 11 0.2314 0.2314 0.3612
12 0.2392 0.2392 0.3693 12 0.2392 0.2392 0.3693
13 0.2471 0.2471 0.3772 13 0.2471 0.2471 0.3772
14 0.2549 0.2549 0.3848 14 0.2549 0.2549 0.3848
15 0.2588 0.2588 0.3921 15 0.2588 0.2588 0.3921
16 0.2667 0.2667 0.3992 16 0.2667 0.2667 0.3992
17 0.2706 0.2706 0.4061 17 0.2706 0.2706 0.4061
18 0.2784 0.2784 0.4129 18 0.2784 0.2784 0.4129
19 0.2824 0.2824 0.4194 19 0.2824 0.2824 0.4194
20 0.2902 0.2902 0.4258 20 0.2902 0.2902 0.4258
21 0.2941 0.2941 0.4319 21 0.2941 0.2941 0.4319
22 0.2980 0.2980 0.4380 22 0.2980 0.2980 0.4380
23 0.3059 0.3059 0.4439 23 0.3059 0.3059 0.4439
24 0.3098 0.3098 0.4496 24 0.3098 0.3098 0.4496
25 0.3137 0.3137 0.4553 25 0.3137 0.3137 0.4553
26 0.3176 0.3176 0.4608 26 0.3176 0.3176 0.4608
27 0.3216 0.3216 0.4661 27 0.3216 0.3216 0.4661
28 0.3294 0.3294 0.4714 28 0.3294 0.3294 0.4714
29 0.3333 0.3333 0.4765 29 0.3333 0.3333 0.4765
30 0.3373 0.3373 0.4815 30 0.3373 0.3373 0.4815
31 0.3412 0.3412 0.4865 31 0.3412 0.3412 0.4865
32 0.3451 0.3451 0.4913 32 0.3451 0.3451 0.4913
33 0.3490 0.3490 0.4960 33 0.3490 0.3490 0.4960
34 0.3529 0.3529 0.5006 34 0.3529 0.3529 0.5006
35 0.3569 0.3569 0.5052 35 0.3569 0.3569 0.5052
36 0.3608 0.3608 0.5096 36 0.3608 0.3608 0.5096
37 0.3647 0.3647 0.5140 37 0.3647 0.3647 0.5140
38 0.3686 0.3686 0.5183 38 0.3686 0.3686 0.5183
39 0.3725 0.3725 0.5225 39 0.3725 0.3725 0.5225
40 0.3765 0.3765 0.5266 40 0.3765 0.3765 0.5266
41 0.3804 0.3804 0.5306 41 0.3804 0.3804 0.5306
42 0.3843 0.3843 0.5346 42 0.3843 0.3843 0.5346
43 0.3843 0.3843 0.5385 43 0.3843 0.3843 0.5385
44 0.3882 0.3882 0.5423 44 0.3882 0.3882 0.5423
45 0.3922 0.3922 0.5460 45 0.3922 0.3922 0.5460
46 0.3961 0.3961 0.5497 46 0.3961 0.3961 0.5497
47 0.4000 0.4000 0.5533 47 0.4000 0.4000 0.5533
48 0.4039 0.4039 0.5569 48 0.4039 0.4039 0.5569
49 0.4078 0.4078 0.5603 49 0.4078 0.4078 0.5603
50 0.4118 0.4118 0.5638 50 0.4118 0.4118 0.5638
51 0.4118 0.4118 0.5671 51 0.4118 0.4118 0.5671
52 0.4157 0.4157 0.5704 52 0.4157 0.4157 0.5704
53 0.4196 0.4196 0.5736 53 0.4196 0.4196 0.5736
54 0.4235 0.4235 0.5768 54 0.4235 0.4235 0.5768
55 0.4275 0.4275 0.5799 55 0.4275 0.4275 0.5799
56 0.4314 0.4314 0.5829 56 0.4314 0.4314 0.5829
57 0.4314 0.4314 0.5859 57 0.4314 0.4314 0.5859
58 0.4353 0.4353 0.5889 58 0.4353 0.4353 0.5889
59 0.4392 0.4392 0.5917 59 0.4392 0.4392 0.5917
60 0.4431 0.4431 0.5946 60 0.4431 0.4431 0.5946
61 0.4471 0.4471 0.5973 61 0.4471 0.4471 0.5973
62 0.4471 0.4471 0.6001 62 0.4471 0.4471 0.6001
63 0.4510 0.4510 0.6027 63 0.4510 0.4510 0.6027
64 0.4549 0.4549 0.6053 64 0.4549 0.4549 0.6053
65 0.4588 0.4588 0.6079 65 0.4588 0.4588 0.6079
66 0.4627 0.4627 0.6104 66 0.4627 0.4627 0.6104
67 0.4627 0.4627 0.6129 67 0.4627 0.4627 0.6129
68 0.4667 0.4667 0.6153 68 0.4667 0.4667 0.6153
69 0.4706 0.4706 0.6176 69 0.4706 0.4706 0.6176
70 0.4745 0.4745 0.6199 70 0.4745 0.4745 0.6199
71 0.4745 0.4745 0.6222 71 0.4745 0.4745 0.6222
72 0.4784 0.4784 0.6244 72 0.4784 0.4784 0.6244
73 0.4824 0.4824 0.6266 73 0.4824 0.4824 0.6266
74 0.4863 0.4863 0.6287 74 0.4863 0.4863 0.6287
75 0.4863 0.4863 0.6308 75 0.4863 0.4863 0.6308
76 0.4902 0.4902 0.6328 76 0.4902 0.4902 0.6328
77 0.4941 0.4941 0.6348 77 0.4941 0.4941 0.6348
78 0.4980 0.4980 0.6367 78 0.4980 0.4980 0.6367
79 0.5020 0.5020 0.6386 79 0.5020 0.5020 0.6386
80 0.5020 0.5020 0.6404 80 0.5020 0.5020 0.6404
81 0.5059 0.5059 0.6422 81 0.5059 0.5059 0.6422
82 0.5098 0.5098 0.6440 82 0.5098 0.5098 0.6440
83 0.5098 0.5098 0.6457 83 0.5098 0.5098 0.6457
84 0.5137 0.5137 0.6474 84 0.5137 0.5137 0.6474
85 0.5176 0.5176 0.6490 85 0.5176 0.5176 0.6490
86 0.5216 0.5216 0.6506 86 0.5216 0.5216 0.6506
87 0.5216 0.5216 0.6521 87 0.5216 0.5216 0.6521
88 0.5255 0.5255 0.6536 88 0.5255 0.5255 0.6536
89 0.5294 0.5294 0.6551 89 0.5294 0.5294 0.6551
90 0.5333 0.5333 0.6565 90 0.5333 0.5333 0.6565
91 0.5333 0.5333 0.6578 91 0.5333 0.5333 0.6578
92 0.5373 0.5373 0.6591 92 0.5373 0.5373 0.6591
93 0.5412 0.5412 0.6604 93 0.5412 0.5412 0.6604
94 0.5451 0.5451 0.6617 94 0.5451 0.5451 0.6617
95 0.5451 0.5451 0.6629 95 0.5451 0.5451 0.6629
96 0.5490 0.5490 0.6640 96 0.5490 0.5490 0.6640
97 0.5529 0.5529 0.6651 97 0.5529 0.5529 0.6651
98 0.5569 0.5569 0.6662 98 0.5569 0.5569 0.6662
99 0.5569 0.5569 0.6672 99 0.5569 0.5569 0.6672
100 0.5608 0.5608 0.6682 100 0.5608 0.5608 0.6682
101 0.5647 0.5647 0.6692 101 0.5647 0.5647 0.6692
102 0.5647 0.5647 0.6701 102 0.5647 0.5647 0.6701
103 0.5686 0.5686 0.6710 103 0.5686 0.5686 0.6710
104 0.5725 0.5725 0.6718 104 0.5725 0.5725 0.6718
105 0.5765 0.5765 0.6726 105 0.5765 0.5765 0.6726
106 0.5765 0.5765 0.6733 106 0.5765 0.5765 0.6733
107 0.5804 0.5804 0.6740 107 0.5804 0.5804 0.6740
108 0.5843 0.5843 0.6747 108 0.5843 0.5843 0.6747
109 0.5843 0.5843 0.6753 109 0.5843 0.5843 0.6753
110 0.5882 0.5882 0.6759 110 0.5882 0.5882 0.6759
111 0.5922 0.5922 0.6765 111 0.5922 0.5922 0.6765
112 0.5961 0.5961 0.6770 112 0.5961 0.5961 0.6770
113 0.5961 0.5961 0.6774 113 0.5961 0.5961 0.6774
114 0.6000 0.6000 0.6779 114 0.6000 0.6000 0.6779
115 0.6039 0.6039 0.6783 115 0.6039 0.6039 0.6783
116 0.6039 0.6039 0.6786 116 0.6039 0.6039 0.6786
117 0.6078 0.6078 0.6789 117 0.6078 0.6078 0.6789
118 0.6118 0.6118 0.6792 118 0.6118 0.6118 0.6792
119 0.6157 0.6157 0.6794 119 0.6157 0.6157 0.6794
120 0.6157 0.6157 0.6796 120 0.6157 0.6157 0.6796
121 0.6196 0.6196 0.6798 121 0.6196 0.6196 0.6798
122 0.6235 0.6235 0.6799 122 0.6235 0.6235 0.6799
123 0.6235 0.6235 0.6800 123 0.6235 0.6235 0.6800
124 0.6275 0.6275 0.6800 124 0.6275 0.6275 0.6800
125 0.6314 0.6314 0.6800 125 0.6314 0.6314 0.6800
126 0.6353 0.6353 0.6799 126 0.6353 0.6353 0.6799
127 0.6353 0.6353 0.6799 127 0.6353 0.6353 0.6799
128 0.6392 0.6392 0.6797 128 0.6392 0.6392 0.6797
129 0.6431 0.6431 0.6796 129 0.6431 0.6431 0.6796
130 0.6431 0.6431 0.6794 130 0.6431 0.6431 0.6794
131 0.6471 0.6471 0.6791 131 0.6471 0.6471 0.6791
132 0.6510 0.6510 0.6789 132 0.6510 0.6510 0.6789
133 0.6549 0.6549 0.6785 133 0.6549 0.6549 0.6785
134 0.6549 0.6549 0.6782 134 0.6549 0.6549 0.6782
135 0.6588 0.6588 0.6778 135 0.6588 0.6588 0.6778
136 0.6627 0.6627 0.6773 136 0.6627 0.6627 0.6773
137 0.6627 0.6627 0.6769 137 0.6627 0.6627 0.6769
138 0.6667 0.6667 0.6763 138 0.6667 0.6667 0.6763
139 0.6706 0.6706 0.6758 139 0.6706 0.6706 0.6758
140 0.6745 0.6745 0.6752 140 0.6745 0.6745 0.6752
141 0.6745 0.6745 0.6746 141 0.6745 0.6745 0.6746
142 0.6784 0.6784 0.6739 142 0.6784 0.6784 0.6739
143 0.6824 0.6824 0.6732 143 0.6824 0.6824 0.6732
144 0.6824 0.6824 0.6724 144 0.6824 0.6824 0.6724
145 0.6863 0.6863 0.6716 145 0.6863 0.6863 0.6716
146 0.6902 0.6902 0.6708 146 0.6902 0.6902 0.6708
147 0.6941 0.6941 0.6699 147 0.6941 0.6941 0.6699
148 0.6941 0.6941 0.6690 148 0.6941 0.6941 0.6690
149 0.6980 0.6980 0.6680 149 0.6980 0.6980 0.6680
150 0.7020 0.7020 0.6670 150 0.7020 0.7020 0.6670
151 0.7020 0.7020 0.6660 151 0.7020 0.7020 0.6660
152 0.7059 0.7059 0.6649 152 0.7059 0.7059 0.6649
153 0.7098 0.7098 0.6638 153 0.7098 0.7098 0.6638
154 0.7098 0.7098 0.6626 154 0.7098 0.7098 0.6626
155 0.7137 0.7137 0.6614 155 0.7137 0.7137 0.6614
156 0.7176 0.7176 0.6601 156 0.7176 0.7176 0.6601
157 0.7216 0.7216 0.6589 157 0.7216 0.7216 0.6589
158 0.7216 0.7216 0.6575 158 0.7216 0.7216 0.6575
159 0.7255 0.7255 0.6561 159 0.7255 0.7255 0.6561
160 0.7294 0.7294 0.6547 160 0.7294 0.7294 0.6547
161 0.7294 0.7294 0.6533 161 0.7294 0.7294 0.6533
162 0.7333 0.7333 0.6518 162 0.7333 0.7333 0.6518
163 0.7373 0.7373 0.6502 163 0.7373 0.7373 0.6502
164 0.7412 0.7412 0.6486 164 0.7412 0.7412 0.6486
165 0.7412 0.7412 0.6470 165 0.7412 0.7412 0.6470
166 0.7451 0.7451 0.6453 166 0.7451 0.7451 0.6453
167 0.7490 0.7490 0.6436 167 0.7490 0.7490 0.6436
168 0.7490 0.7490 0.6418 168 0.7490 0.7490 0.6418
169 0.7529 0.7529 0.6400 169 0.7529 0.7529 0.6400
170 0.7569 0.7569 0.6382 170 0.7569 0.7569 0.6382
171 0.7608 0.7608 0.6363 171 0.7608 0.7608 0.6363
172 0.7608 0.7608 0.6343 172 0.7608 0.7608 0.6343
173 0.7647 0.7647 0.6324 173 0.7647 0.7647 0.6324
174 0.7686 0.7686 0.6303 174 0.7686 0.7686 0.6303
175 0.7686 0.7686 0.6282 175 0.7686 0.7686 0.6282
176 0.7725 0.7725 0.6261 176 0.7725 0.7725 0.6261
177 0.7765 0.7765 0.6239 177 0.7765 0.7765 0.6239
178 0.7804 0.7804 0.6217 178 0.7804 0.7804 0.6217
179 0.7804 0.7804 0.6194 179 0.7804 0.7804 0.6194
180 0.7843 0.7843 0.6171 180 0.7843 0.7843 0.6171
181 0.7882 0.7882 0.6147 181 0.7882 0.7882 0.6147
182 0.7882 0.7882 0.6123 182 0.7882 0.7882 0.6123
183 0.7922 0.7922 0.6098 183 0.7922 0.7922 0.6098
184 0.7961 0.7961 0.6073 184 0.7961 0.7961 0.6073
185 0.8000 0.8000 0.6047 185 0.8000 0.8000 0.6047
186 0.8000 0.8000 0.6021 186 0.8000 0.8000 0.6021
187 0.8039 0.8039 0.5994 187 0.8039 0.8039 0.5994
188 0.8078 0.8078 0.5967 188 0.8078 0.8078 0.5967
189 0.8078 0.8078 0.5939 189 0.8078 0.8078 0.5939
190 0.8118 0.8118 0.5911 190 0.8118 0.8118 0.5911
191 0.8157 0.8157 0.5882 191 0.8157 0.8157 0.5882
192 0.8196 0.8196 0.5853 192 0.8196 0.8196 0.5853
193 0.8196 0.8196 0.5823 193 0.8196 0.8196 0.5823
194 0.8235 0.8235 0.5792 194 0.8235 0.8235 0.5792
195 0.8275 0.8275 0.5761 195 0.8275 0.8275 0.5761
196 0.8275 0.8275 0.5729 196 0.8275 0.8275 0.5729
197 0.8314 0.8314 0.5697 197 0.8314 0.8314 0.5697
198 0.8353 0.8353 0.5664 198 0.8353 0.8353 0.5664
199 0.8392 0.8392 0.5630 199 0.8392 0.8392 0.5630
200 0.8392 0.8392 0.5596 200 0.8392 0.8392 0.5596
201 0.8431 0.8431 0.5561 201 0.8431 0.8431 0.5561
202 0.8471 0.8471 0.5525 202 0.8471 0.8471 0.5525
203 0.8471 0.8471 0.5489 203 0.8471 0.8471 0.5489
204 0.8510 0.8510 0.5452 204 0.8510 0.8510 0.5452
205 0.8549 0.8549 0.5414 205 0.8549 0.8549 0.5414
206 0.8588 0.8588 0.5376 206 0.8588 0.8588 0.5376
207 0.8588 0.8588 0.5337 207 0.8588 0.8588 0.5337
208 0.8627 0.8627 0.5297 208 0.8627 0.8627 0.5297
209 0.8667 0.8667 0.5257 209 0.8667 0.8667 0.5257
210 0.8667 0.8667 0.5215 210 0.8667 0.8667 0.5215
211 0.8706 0.8706 0.5173 211 0.8706 0.8706 0.5173
212 0.8745 0.8745 0.5130 212 0.8745 0.8745 0.5130
213 0.8784 0.8784 0.5086 213 0.8784 0.8784 0.5086
214 0.8784 0.8784 0.5042 214 0.8784 0.8784 0.5042
215 0.8824 0.8824 0.4996 215 0.8824 0.8824 0.4996
216 0.8863 0.8863 0.4950 216 0.8863 0.8863 0.4950
217 0.8863 0.8863 0.4902 217 0.8863 0.8863 0.4902
218 0.8902 0.8902 0.4854 218 0.8902 0.8902 0.4854
219 0.8941 0.8941 0.4804 219 0.8941 0.8941 0.4804
220 0.8980 0.8980 0.4754 220 0.8980 0.8980 0.4754
221 0.8980 0.8980 0.4702 221 0.8980 0.8980 0.4702
222 0.9020 0.9020 0.4649 222 0.9020 0.9020 0.4649
223 0.9059 0.9059 0.4595 223 0.9059 0.9059 0.4595
224 0.9098 0.9098 0.4540 224 0.9098 0.9098 0.4540
225 0.9098 0.9098 0.4484 225 0.9098 0.9098 0.4484
226 0.9137 0.9137 0.4426 226 0.9137 0.9137 0.4426
227 0.9176 0.9176 0.4366 227 0.9176 0.9176 0.4366
228 0.9176 0.9176 0.4306 228 0.9176 0.9176 0.4306
229 0.9216 0.9216 0.4243 229 0.9216 0.9216 0.4243
230 0.9255 0.9255 0.4179 230 0.9255 0.9255 0.4179
231 0.9294 0.9294 0.4114 231 0.9294 0.9294 0.4114
232 0.9294 0.9294 0.4046 232 0.9294 0.9294 0.4046
233 0.9333 0.9333 0.3977 233 0.9333 0.9333 0.3977
234 0.9373 0.9373 0.3905 234 0.9373 0.9373 0.3905
235 0.9373 0.9373 0.3831 235 0.9373 0.9373 0.3831
236 0.9412 0.9412 0.3754 236 0.9412 0.9412 0.3754
237 0.9451 0.9451 0.3675 237 0.9451 0.9451 0.3675
238 0.9490 0.9490 0.3594 238 0.9490 0.9490 0.3594
239 0.9490 0.9490 0.3509 239 0.9490 0.9490 0.3509
240 0.9529 0.9529 0.3420 240 0.9529 0.9529 0.3420
241 0.9569 0.9569 0.3328 241 0.9569 0.9569 0.3328
242 0.9608 0.9608 0.3232 242 0.9608 0.9608 0.3232
243 0.9608 0.9608 0.3131 243 0.9608 0.9608 0.3131
244 0.9647 0.9647 0.3024 244 0.9647 0.9647 0.3024
245 0.9686 0.9686 0.2912 245 0.9686 0.9686 0.2912
246 0.9686 0.9686 0.2792 246 0.9686 0.9686 0.2792
247 0.9725 0.9725 0.2664 247 0.9725 0.9725 0.2664
248 0.9765 0.9765 0.2526 248 0.9765 0.9765 0.2526
249 0.9804 0.9804 0.2375 249 0.9804 0.9804 0.2375
250 0.9804 0.9804 0.2208 250 0.9804 0.9804 0.2208
251 0.9843 0.9843 0.2020 251 0.9843 0.9843 0.2020
252 0.9882 0.9882 0.1800 252 0.9882 0.9882 0.1800
253 1.0 0.0 0.0 253 1.0 0.0 0.0
254 1.0 1.0 0.0 254 1.0 1.0 0.0
255 0.0 1.000 0.0 255 0.0 1.000 0.0

0
commons.h → map65/commons.h
View File

0
devsetup.cpp → map65/devsetup.cpp
View File

0
devsetup.h → map65/devsetup.h
View File

3602
devsetup.ui → map65/devsetup.ui
View File

File diff suppressed because it is too large Load Diff

0
displaytext.cpp → map65/displaytext.cpp
View File

0
displaytext.h → map65/displaytext.h
View File

0
ffft.f → map65/ffft.f
View File

0
fftw3.f → map65/fftw3.f
View File

2
ft2000_freq.sh → map65/ft2000_freq.sh
View File

@ -1 +1 @@
rigctl-wsjtx -m 129 -r COM1 -s 38400 -C data_bits=8 -C stop_bits=2 -C serial_handshake=Hardware f rigctl-wsjtx -m 129 -r COM1 -s 38400 -C data_bits=8 -C stop_bits=2 -C serial_handshake=Hardware f

0
getdev.cpp → map65/getdev.cpp
View File

0
getfile.cpp → map65/getfile.cpp
View File

0
getfile.h → map65/getfile.h
View File

0
getsvn.cmake → map65/getsvn.cmake
View File

0
in.dat → map65/in.dat
View File

0
killbyname.cpp → map65/killbyname.cpp
View File

0
libfftw3f_win.a → map65/libfftw3f_win.a
View File

0
libm65/CMakeLists.txt → map65/libm65/CMakeLists.txt
View File

0
libm65/Makefile → map65/libm65/Makefile
View File

0
libm65/Makefile.0 → map65/libm65/Makefile.0
View File

0
libm65/Makefile.MinGW → map65/libm65/Makefile.MinGW
View File

0
libm65/Makefile.jtsdk → map65/libm65/Makefile.jtsdk
View File

0
libm65/Makefile.linux → map65/libm65/Makefile.linux
View File

0
libm65/afc65b.f90 → map65/libm65/afc65b.f90
View File

0
libm65/astro.f90 → map65/libm65/astro.f90
View File

0
libm65/astro0.f90 → map65/libm65/astro0.f90
View File

0
libm65/astrosub.f90 → map65/libm65/astrosub.f90
View File

40
libm65/averms.f90 → map65/libm65/averms.f90
View File

@ -1,20 +1,20 @@
subroutine averms(x,n,nskip,ave,rms) subroutine averms(x,n,nskip,ave,rms)
real x(n) real x(n)
integer ipk(1) integer ipk(1)
ns=0 ns=0
s=0. s=0.
sq=0. sq=0.
ipk=maxloc(x) ipk=maxloc(x)
do i=1,n do i=1,n
if(abs(i-ipk(1)).gt.nskip) then if(abs(i-ipk(1)).gt.nskip) then
s=s + x(i) s=s + x(i)
sq=sq + x(i)**2 sq=sq + x(i)**2
ns=ns+1 ns=ns+1
endif endif
enddo enddo
ave=s/ns ave=s/ns
rms=sqrt(sq/ns - ave*ave) rms=sqrt(sq/ns - ave*ave)
return return
end subroutine averms end subroutine averms

92
libm65/badmsg.f90 → map65/libm65/badmsg.f90
View File

@ -1,46 +1,46 @@
subroutine badmsg(irc,dat,nc1,nc2,ng2) subroutine badmsg(irc,dat,nc1,nc2,ng2)
! Get rid of a few QRA64 false decodes that cannot be correct messages. ! Get rid of a few QRA64 false decodes that cannot be correct messages.
integer dat(12) !Decoded message (as 12 integers) integer dat(12) !Decoded message (as 12 integers)
ic1=ishft(dat(1),22) + ishft(dat(2),16) + ishft(dat(3),10)+ & ic1=ishft(dat(1),22) + ishft(dat(2),16) + ishft(dat(3),10)+ &
ishft(dat(4),4) + iand(ishft(dat(5),-2),15) ishft(dat(4),4) + iand(ishft(dat(5),-2),15)
! Test for "......" or "CQ 000" ! Test for "......" or "CQ 000"
if(ic1.eq.262177560 .or. ic1.eq.262177563) then if(ic1.eq.262177560 .or. ic1.eq.262177563) then
irc=-1 irc=-1
return return
endif endif
ic2=ishft(iand(dat(5),3),26) + ishft(dat(6),20) + & ic2=ishft(iand(dat(5),3),26) + ishft(dat(6),20) + &
ishft(dat(7),14) + ishft(dat(8),8) + ishft(dat(9),2) + & ishft(dat(7),14) + ishft(dat(8),8) + ishft(dat(9),2) + &
iand(ishft(dat(10),-4),3) iand(ishft(dat(10),-4),3)
ig=ishft(iand(dat(10),15),12) + ishft(dat(11),6) + dat(12) ig=ishft(iand(dat(10),15),12) + ishft(dat(11),6) + dat(12)
! Test for blank, -01 to -30, R-01 to R-30, RO, RRR, 73 ! Test for blank, -01 to -30, R-01 to R-30, RO, RRR, 73
if(ig.ge.32401 .and. ig.le.32464) return if(ig.ge.32401 .and. ig.le.32464) return
if(ig.ge.14220 .and. ig.le.14229) return !-41 to -50 if(ig.ge.14220 .and. ig.le.14229) return !-41 to -50
if(ig.ge.14040 .and. ig.le.14049) return !-31 to -40 if(ig.ge.14040 .and. ig.le.14049) return !-31 to -40
if(ig.ge.13320 .and. ig.le.13329) return !+00 to +09 if(ig.ge.13320 .and. ig.le.13329) return !+00 to +09
if(ig.ge.13140 .and. ig.le.13149) return !+10 to +19 if(ig.ge.13140 .and. ig.le.13149) return !+10 to +19
if(ig.ge.12960 .and. ig.le.12969) return !+20 to +29 if(ig.ge.12960 .and. ig.le.12969) return !+20 to +29
if(ig.ge.12780 .and. ig.le.12789) return !+30 to +39 if(ig.ge.12780 .and. ig.le.12789) return !+30 to +39
if(ig.ge.12600 .and. ig.le.12609) return !+40 to +49 if(ig.ge.12600 .and. ig.le.12609) return !+40 to +49
if(ig.ge.12420 .and. ig.le.12429) return !R-41 to R-50 if(ig.ge.12420 .and. ig.le.12429) return !R-41 to R-50
if(ig.ge.12240 .and. ig.le.12249) return !R-31 to R-40 if(ig.ge.12240 .and. ig.le.12249) return !R-31 to R-40
if(ig.ge.11520 .and. ig.le.11529) return !R+00 to R+09 if(ig.ge.11520 .and. ig.le.11529) return !R+00 to R+09
if(ig.ge.11340 .and. ig.le.11349) return !R+10 to R+19 if(ig.ge.11340 .and. ig.le.11349) return !R+10 to R+19
if(ig.ge.11160 .and. ig.le.11169) return !R+20 to R+29 if(ig.ge.11160 .and. ig.le.11169) return !R+20 to R+29
if(ig.ge.10980 .and. ig.le.10989) return !R+30 to R+39 if(ig.ge.10980 .and. ig.le.10989) return !R+30 to R+39
if(ig.ge.10800 .and. ig.le.10809) return !R+40 to R+49 if(ig.ge.10800 .and. ig.le.10809) return !R+40 to R+49
if(ic1.eq.nc1 .and. ic2.eq.nc2 .and. ng2.ne.32401 .and. ig.ne.ng2) irc=-1 if(ic1.eq.nc1 .and. ic2.eq.nc2 .and. ng2.ne.32401 .and. ig.ne.ng2) irc=-1
return return
end subroutine badmsg end subroutine badmsg

0
libm65/ccf2.f90 → map65/libm65/ccf2.f90
View File

0
libm65/ccf65.f90 → map65/libm65/ccf65.f90
View File

198
libm65/cgen65.f90 → map65/libm65/cgen65.f90
View File

@ -1,99 +1,99 @@
subroutine cgen65(message,mode65,samfac,nsendingsh,msgsent,cwave,nwave) subroutine cgen65(message,mode65,samfac,nsendingsh,msgsent,cwave,nwave)
! Encodes a JT65 message into a wavefile. ! Encodes a JT65 message into a wavefile.
! Executes in 17 ms on opti-745. ! Executes in 17 ms on opti-745.
use packjt use packjt
parameter (NMAX=60*96000) !Max length of wave file parameter (NMAX=60*96000) !Max length of wave file
character*22 message !Message to be generated character*22 message !Message to be generated
character*22 msgsent !Message as it will be received character*22 msgsent !Message as it will be received
character*3 cok !' ' or 'OOO' character*3 cok !' ' or 'OOO'
real*8 t,dt,phi,f,f0,dfgen,dphi,twopi,samfac,tsymbol real*8 t,dt,phi,f,f0,dfgen,dphi,twopi,samfac,tsymbol
complex cwave(NMAX) !Generated complex wave file complex cwave(NMAX) !Generated complex wave file
integer dgen(12) integer dgen(12)
integer sent(63) integer sent(63)
logical first logical first
integer nprc(126) integer nprc(126)
real pr(126) real pr(126)
data nprc/1,0,0,1,1,0,0,0,1,1,1,1,1,1,0,1,0,1,0,0, & data nprc/1,0,0,1,1,0,0,0,1,1,1,1,1,1,0,1,0,1,0,0, &
0,1,0,1,1,0,0,1,0,0,0,1,1,1,0,0,1,1,1,1, & 0,1,0,1,1,0,0,1,0,0,0,1,1,1,0,0,1,1,1,1, &
0,1,1,0,1,1,1,1,0,0,0,1,1,0,1,0,1,0,1,1, & 0,1,1,0,1,1,1,1,0,0,0,1,1,0,1,0,1,0,1,1, &
0,0,1,1,0,1,0,1,0,1,0,0,1,0,0,0,0,0,0,1, & 0,0,1,1,0,1,0,1,0,1,0,0,1,0,0,0,0,0,0,1, &
1,0,0,0,0,0,0,0,1,1,0,1,0,0,1,0,1,1,0,1, & 1,0,0,0,0,0,0,0,1,1,0,1,0,0,1,0,1,1,0,1, &
0,1,0,1,0,0,1,1,0,0,1,0,0,1,0,0,0,0,1,1, & 0,1,0,1,0,0,1,1,0,0,1,0,0,1,0,0,0,0,1,1, &
1,1,1,1,1,1/ 1,1,1,1,1,1/
data twopi/6.283185307179586476d0/,first/.true./ data twopi/6.283185307179586476d0/,first/.true./
save save
if(first) then if(first) then
do i=1,126 do i=1,126
pr(i)=2*nprc(i)-1 pr(i)=2*nprc(i)-1
enddo enddo
first=.false. first=.false.
endif endif
call chkmsg(message,cok,nspecial,flip) !See if it's a shorthand call chkmsg(message,cok,nspecial,flip) !See if it's a shorthand
if(nspecial.eq.0) then if(nspecial.eq.0) then
call packmsg(message,dgen,itype) !Pack message into 72 bits call packmsg(message,dgen,itype) !Pack message into 72 bits
nsendingsh=0 nsendingsh=0
if(iand(dgen(10),8).ne.0) nsendingsh=-1 !Plain text flag if(iand(dgen(10),8).ne.0) nsendingsh=-1 !Plain text flag
call rs_encode(dgen,sent) call rs_encode(dgen,sent)
call interleave63(sent,1) !Apply interleaving call interleave63(sent,1) !Apply interleaving
call graycode(sent,63,1) !Apply Gray code call graycode(sent,63,1) !Apply Gray code
nsym=126 !Symbols per transmission nsym=126 !Symbols per transmission
tsymbol=4096.d0/11025.d0 !Time per symbol tsymbol=4096.d0/11025.d0 !Time per symbol
else else
nsendingsh=1 !Flag for shorthand message nsendingsh=1 !Flag for shorthand message
nsym=32 nsym=32
tsymbol=16384.d0/11025.d0 tsymbol=16384.d0/11025.d0
endif endif
! Set up necessary constants ! Set up necessary constants
dt=1.d0/(samfac*96000.d0) dt=1.d0/(samfac*96000.d0)
f0=118*11025.d0/1024 f0=118*11025.d0/1024
dfgen=mode65*11025.d0/4096.d0 dfgen=mode65*11025.d0/4096.d0
t=0.d0 t=0.d0
phi=0.d0 phi=0.d0
k=0 k=0
j0=0 j0=0
ndata=nsym*96000.d0*samfac*tsymbol ndata=nsym*96000.d0*samfac*tsymbol
do i=1,ndata do i=1,ndata
t=t+dt t=t+dt
j=int(t/tsymbol) + 1 !Symbol number, 1-126 j=int(t/tsymbol) + 1 !Symbol number, 1-126
if(j.ne.j0) then if(j.ne.j0) then
f=f0 f=f0
if(nspecial.ne.0 .and. mod(j,2).eq.0) f=f0+10*nspecial*dfgen if(nspecial.ne.0 .and. mod(j,2).eq.0) f=f0+10*nspecial*dfgen
if(nspecial.eq.0 .and. flip*pr(j).lt.0.0) then if(nspecial.eq.0 .and. flip*pr(j).lt.0.0) then
k=k+1 k=k+1
f=f0+(sent(k)+2)*dfgen f=f0+(sent(k)+2)*dfgen
endif endif
dphi=twopi*dt*f dphi=twopi*dt*f
j0=j j0=j
endif endif
phi=phi+dphi phi=phi+dphi
if(phi.gt.twopi) phi=phi-twopi if(phi.gt.twopi) phi=phi-twopi
xphi=phi xphi=phi
cwave(i)=cmplx(cos(xphi),-sin(xphi)) cwave(i)=cmplx(cos(xphi),-sin(xphi))
enddo enddo
cwave(ndata+1:)=0 cwave(ndata+1:)=0
nwave=ndata + 48000 nwave=ndata + 48000
call unpackmsg(dgen,msgsent) call unpackmsg(dgen,msgsent)
if(flip.lt.0.0) then if(flip.lt.0.0) then
do i=22,1,-1 do i=22,1,-1
if(msgsent(i:i).ne.' ') goto 10 if(msgsent(i:i).ne.' ') goto 10
enddo enddo
10 msgsent=msgsent(1:i)//' OOO' 10 msgsent=msgsent(1:i)//' OOO'
endif endif
if(nsendingsh.eq.1) then if(nsendingsh.eq.1) then
if(nspecial.eq.2) msgsent='RO' if(nspecial.eq.2) msgsent='RO'
if(nspecial.eq.3) msgsent='RRR' if(nspecial.eq.3) msgsent='RRR'
if(nspecial.eq.4) msgsent='73' if(nspecial.eq.4) msgsent='73'
endif endif
return return
end subroutine cgen65 end subroutine cgen65

0
libm65/chkhist.f90 → map65/libm65/chkhist.f90
View File

0
libm65/chkmsg.f90 → map65/libm65/chkmsg.f90
View File

0
libm65/coord.f90 → map65/libm65/coord.f90
View File

0
libm65/cutil.c → map65/libm65/cutil.c
View File

0
libm65/dcoord.f90 → map65/libm65/dcoord.f90
View File

0
libm65/decode0.f90 → map65/libm65/decode0.f90
View File

0
libm65/decode1a.f90 → map65/libm65/decode1a.f90
View File

0
libm65/decode65b.f90 → map65/libm65/decode65b.f90
View File

0
libm65/decode_rs.c → map65/libm65/decode_rs.c
View File

0
libm65/deep65.f90 → map65/libm65/deep65.f90
View File

0
libm65/deg2grid.f90 → map65/libm65/deg2grid.f90
View File

0
libm65/demod64a.f90 → map65/libm65/demod64a.f90
View File

0
libm65/display.f90 → map65/libm65/display.f90
View File

0
libm65/dot.f90 → map65/libm65/dot.f90
View File

0
libm65/dpol.f90 → map65/libm65/dpol.f90
View File

0
libm65/encode65.f90 → map65/libm65/encode65.f90
View File

0
libm65/encode_rs.c → map65/libm65/encode_rs.c
View File

0
libm65/extract.f90 → map65/libm65/extract.f90
View File

0
libm65/f77_wisdom.f → map65/libm65/f77_wisdom.f
View File

0
libm65/fchisq.f90 → map65/libm65/fchisq.f90
View File

0
libm65/fchisq0.f90 → map65/libm65/fchisq0.f90
View File

0
libm65/fftw3.f → map65/libm65/fftw3.f
View File

128
libm65/fftw3.f90 → map65/libm65/fftw3.f90
View File

@ -1,64 +1,64 @@
INTEGER FFTW_R2HC INTEGER FFTW_R2HC
PARAMETER (FFTW_R2HC=0) PARAMETER (FFTW_R2HC=0)
INTEGER FFTW_HC2R INTEGER FFTW_HC2R
PARAMETER (FFTW_HC2R=1) PARAMETER (FFTW_HC2R=1)
INTEGER FFTW_DHT INTEGER FFTW_DHT
PARAMETER (FFTW_DHT=2) PARAMETER (FFTW_DHT=2)
INTEGER FFTW_REDFT00 INTEGER FFTW_REDFT00
PARAMETER (FFTW_REDFT00=3) PARAMETER (FFTW_REDFT00=3)
INTEGER FFTW_REDFT01 INTEGER FFTW_REDFT01
PARAMETER (FFTW_REDFT01=4) PARAMETER (FFTW_REDFT01=4)
INTEGER FFTW_REDFT10 INTEGER FFTW_REDFT10
PARAMETER (FFTW_REDFT10=5) PARAMETER (FFTW_REDFT10=5)
INTEGER FFTW_REDFT11 INTEGER FFTW_REDFT11
PARAMETER (FFTW_REDFT11=6) PARAMETER (FFTW_REDFT11=6)
INTEGER FFTW_RODFT00 INTEGER FFTW_RODFT00
PARAMETER (FFTW_RODFT00=7) PARAMETER (FFTW_RODFT00=7)
INTEGER FFTW_RODFT01 INTEGER FFTW_RODFT01
PARAMETER (FFTW_RODFT01=8) PARAMETER (FFTW_RODFT01=8)
INTEGER FFTW_RODFT10 INTEGER FFTW_RODFT10
PARAMETER (FFTW_RODFT10=9) PARAMETER (FFTW_RODFT10=9)
INTEGER FFTW_RODFT11 INTEGER FFTW_RODFT11
PARAMETER (FFTW_RODFT11=10) PARAMETER (FFTW_RODFT11=10)
INTEGER FFTW_FORWARD INTEGER FFTW_FORWARD
PARAMETER (FFTW_FORWARD=-1) PARAMETER (FFTW_FORWARD=-1)
INTEGER FFTW_BACKWARD INTEGER FFTW_BACKWARD
PARAMETER (FFTW_BACKWARD=+1) PARAMETER (FFTW_BACKWARD=+1)
INTEGER FFTW_MEASURE INTEGER FFTW_MEASURE
PARAMETER (FFTW_MEASURE=0) PARAMETER (FFTW_MEASURE=0)
INTEGER FFTW_DESTROY_INPUT INTEGER FFTW_DESTROY_INPUT
PARAMETER (FFTW_DESTROY_INPUT=1) PARAMETER (FFTW_DESTROY_INPUT=1)
INTEGER FFTW_UNALIGNED INTEGER FFTW_UNALIGNED
PARAMETER (FFTW_UNALIGNED=2) PARAMETER (FFTW_UNALIGNED=2)
INTEGER FFTW_CONSERVE_MEMORY INTEGER FFTW_CONSERVE_MEMORY
PARAMETER (FFTW_CONSERVE_MEMORY=4) PARAMETER (FFTW_CONSERVE_MEMORY=4)
INTEGER FFTW_EXHAUSTIVE INTEGER FFTW_EXHAUSTIVE
PARAMETER (FFTW_EXHAUSTIVE=8) PARAMETER (FFTW_EXHAUSTIVE=8)
INTEGER FFTW_PRESERVE_INPUT INTEGER FFTW_PRESERVE_INPUT
PARAMETER (FFTW_PRESERVE_INPUT=16) PARAMETER (FFTW_PRESERVE_INPUT=16)
INTEGER FFTW_PATIENT INTEGER FFTW_PATIENT
PARAMETER (FFTW_PATIENT=32) PARAMETER (FFTW_PATIENT=32)
INTEGER FFTW_ESTIMATE INTEGER FFTW_ESTIMATE
PARAMETER (FFTW_ESTIMATE=64) PARAMETER (FFTW_ESTIMATE=64)
INTEGER FFTW_ESTIMATE_PATIENT INTEGER FFTW_ESTIMATE_PATIENT
PARAMETER (FFTW_ESTIMATE_PATIENT=128) PARAMETER (FFTW_ESTIMATE_PATIENT=128)
INTEGER FFTW_BELIEVE_PCOST INTEGER FFTW_BELIEVE_PCOST
PARAMETER (FFTW_BELIEVE_PCOST=256) PARAMETER (FFTW_BELIEVE_PCOST=256)
INTEGER FFTW_DFT_R2HC_ICKY INTEGER FFTW_DFT_R2HC_ICKY
PARAMETER (FFTW_DFT_R2HC_ICKY=512) PARAMETER (FFTW_DFT_R2HC_ICKY=512)
INTEGER FFTW_NONTHREADED_ICKY INTEGER FFTW_NONTHREADED_ICKY
PARAMETER (FFTW_NONTHREADED_ICKY=1024) PARAMETER (FFTW_NONTHREADED_ICKY=1024)
INTEGER FFTW_NO_BUFFERING INTEGER FFTW_NO_BUFFERING
PARAMETER (FFTW_NO_BUFFERING=2048) PARAMETER (FFTW_NO_BUFFERING=2048)
INTEGER FFTW_NO_INDIRECT_OP INTEGER FFTW_NO_INDIRECT_OP
PARAMETER (FFTW_NO_INDIRECT_OP=4096) PARAMETER (FFTW_NO_INDIRECT_OP=4096)
INTEGER FFTW_ALLOW_LARGE_GENERIC INTEGER FFTW_ALLOW_LARGE_GENERIC
PARAMETER (FFTW_ALLOW_LARGE_GENERIC=8192) PARAMETER (FFTW_ALLOW_LARGE_GENERIC=8192)
INTEGER FFTW_NO_RANK_SPLITS INTEGER FFTW_NO_RANK_SPLITS
PARAMETER (FFTW_NO_RANK_SPLITS=16384) PARAMETER (FFTW_NO_RANK_SPLITS=16384)
INTEGER FFTW_NO_VRANK_SPLITS INTEGER FFTW_NO_VRANK_SPLITS
PARAMETER (FFTW_NO_VRANK_SPLITS=32768) PARAMETER (FFTW_NO_VRANK_SPLITS=32768)
INTEGER FFTW_NO_VRECURSE INTEGER FFTW_NO_VRECURSE
PARAMETER (FFTW_NO_VRECURSE=65536) PARAMETER (FFTW_NO_VRECURSE=65536)
INTEGER FFTW_NO_SIMD INTEGER FFTW_NO_SIMD
PARAMETER (FFTW_NO_SIMD=131072) PARAMETER (FFTW_NO_SIMD=131072)

0
libm65/fil6521.f90 → map65/libm65/fil6521.f90
View File

0
libm65/filbig.f90 → map65/libm65/filbig.f90
View File

42
libm65/fmtmsg.f90 → map65/libm65/fmtmsg.f90
View File

@ -1,21 +1,21 @@
subroutine fmtmsg(msg,iz) subroutine fmtmsg(msg,iz)
character*22 msg character*22 msg
! Convert all letters to upper case ! Convert all letters to upper case
iz=22 iz=22
do i=1,22 do i=1,22
if(msg(i:i).ge.'a' .and. msg(i:i).le.'z') & if(msg(i:i).ge.'a' .and. msg(i:i).le.'z') &
msg(i:i)= char(ichar(msg(i:i))+ichar('A')-ichar('a')) msg(i:i)= char(ichar(msg(i:i))+ichar('A')-ichar('a'))
if(msg(i:i).ne.' ') iz=i if(msg(i:i).ne.' ') iz=i
enddo enddo
do iter=1,5 !Collapse multiple blanks into one do iter=1,5 !Collapse multiple blanks into one
ib2=index(msg(1:iz),' ') ib2=index(msg(1:iz),' ')
if(ib2.lt.1) go to 100 if(ib2.lt.1) go to 100
msg=msg(1:ib2)//msg(ib2+2:) msg=msg(1:ib2)//msg(ib2+2:)
iz=iz-1 iz=iz-1
enddo enddo
100 return 100 return
end subroutine fmtmsg end subroutine fmtmsg

0
libm65/four2a.f90 → map65/libm65/four2a.f90
View File

0
libm65/ftninit.f90 → map65/libm65/ftninit.f90
View File

0
libm65/ftnquit.f90 → map65/libm65/ftnquit.f90
View File

0
libm65/ftrsd2.c → map65/libm65/ftrsd2.c
View File

0
libm65/gen65.f90 → map65/libm65/gen65.f90
View File

0
libm65/gen_q65_wave.f90 → map65/libm65/gen_q65_wave.f90
View File

174
libm65/genqra64a.f90 → map65/libm65/genqra64a.f90
View File

@ -1,87 +1,87 @@
subroutine genqra64a(msg0,ichk,ntxfreq,mode64,itype,msgsent,iwave,nwave) subroutine genqra64a(msg0,ichk,ntxfreq,mode64,itype,msgsent,iwave,nwave)
! Encodes a QRA64 message to yield itone(1:84) ! Encodes a QRA64 message to yield itone(1:84)
use packjt use packjt
parameter (NMAX=2*60*11025) parameter (NMAX=2*60*11025)
character*22 msg0 character*22 msg0
character*22 message !Message to be generated character*22 message !Message to be generated
character*22 msgsent !Message as it will be received character*22 msgsent !Message as it will be received
integer itone(84) integer itone(84)
character*3 cok !' ' or 'OOO' character*3 cok !' ' or 'OOO'
real*8 t,dt,phi,f,f0,dfgen,dphi,twopi,samfac,tsym real*8 t,dt,phi,f,f0,dfgen,dphi,twopi,samfac,tsym
integer dgen(13) integer dgen(13)
integer sent(63) integer sent(63)
integer*2 iwave(NMAX) integer*2 iwave(NMAX)
integer icos7(0:6) integer icos7(0:6)
data icos7/2,5,6,0,4,1,3/ !Defines a 7x7 Costas array data icos7/2,5,6,0,4,1,3/ !Defines a 7x7 Costas array
data twopi/6.283185307179586476d0/ data twopi/6.283185307179586476d0/
save save
if(msg0(1:1).eq.'@') then if(msg0(1:1).eq.'@') then
read(msg0(2:5),*,end=1,err=1) nfreq read(msg0(2:5),*,end=1,err=1) nfreq
go to 2 go to 2
1 nfreq=1000 1 nfreq=1000
2 itone(1)=nfreq 2 itone(1)=nfreq
write(msgsent,1000) nfreq write(msgsent,1000) nfreq
1000 format(i5,' Hz') 1000 format(i5,' Hz')
else else
message=msg0 message=msg0
do i=1,22 do i=1,22
if(ichar(message(i:i)).eq.0) then if(ichar(message(i:i)).eq.0) then
message(i:)=' ' message(i:)=' '
exit exit
endif endif
enddo enddo
do i=1,22 !Strip leading blanks do i=1,22 !Strip leading blanks
if(message(1:1).ne.' ') exit if(message(1:1).ne.' ') exit
message=message(i+1:) message=message(i+1:)
enddo enddo
call chkmsg(message,cok,nspecial,flip) call chkmsg(message,cok,nspecial,flip)
call packmsg(message,dgen,itype) !Pack message into 72 bits call packmsg(message,dgen,itype) !Pack message into 72 bits
call unpackmsg(dgen,msgsent) !Unpack to get message sent call unpackmsg(dgen,msgsent) !Unpack to get message sent
if(ichk.ne.0) go to 999 !Return if checking only if(ichk.ne.0) go to 999 !Return if checking only
call qra64_enc(dgen,sent) !Encode using QRA64 call qra64_enc(dgen,sent) !Encode using QRA64
nsync=10 nsync=10
itone(1:7)=nsync*icos7 !Insert 7x7 Costas array in 3 places itone(1:7)=nsync*icos7 !Insert 7x7 Costas array in 3 places
itone(8:39)=sent(1:32) itone(8:39)=sent(1:32)
itone(40:46)=nsync*icos7 itone(40:46)=nsync*icos7
itone(47:77)=sent(33:63) itone(47:77)=sent(33:63)
itone(78:84)=nsync*icos7 itone(78:84)=nsync*icos7
endif endif
! Set up necessary constants ! Set up necessary constants
nsym=84 nsym=84
tsym=6912.d0/12000.d0 tsym=6912.d0/12000.d0
samfac=1.d0 samfac=1.d0
dt=1.d0/(samfac*11025.d0) dt=1.d0/(samfac*11025.d0)
f0=ntxfreq f0=ntxfreq
ndf=2**(mode64-1) ndf=2**(mode64-1)
dfgen=ndf*12000.d0/6912.d0 dfgen=ndf*12000.d0/6912.d0
phi=0.d0 phi=0.d0
dphi=twopi*dt*f0 dphi=twopi*dt*f0
i=0 i=0
iz=84*6912*11025.d0/12000.d0 iz=84*6912*11025.d0/12000.d0
t=0.d0 t=0.d0
j0=0 j0=0
do i=1,iz do i=1,iz
t=t+dt t=t+dt
j=t/tsym j=t/tsym
if(j.ne.j0) then if(j.ne.j0) then
f=f0 + itone(j)*dfgen f=f0 + itone(j)*dfgen
dphi=twopi*dt*f dphi=twopi*dt*f
j0=j j0=j
endif endif
phi=phi+dphi phi=phi+dphi
if(phi.gt.twopi) phi=phi-twopi if(phi.gt.twopi) phi=phi-twopi
xphi=phi xphi=phi
iwave(2*i-1)=32767.0*cos(xphi) iwave(2*i-1)=32767.0*cos(xphi)
iwave(2*i)=32767.0*sin(xphi) iwave(2*i)=32767.0*sin(xphi)
enddo enddo
nwave=2*iz nwave=2*iz
999 return 999 return
end subroutine genqra64a end subroutine genqra64a

0
libm65/geocentric.f90 → map65/libm65/geocentric.f90
View File

0
libm65/getdphi.f90 → map65/libm65/getdphi.f90
View File

0
libm65/getpfx1.f90 → map65/libm65/getpfx1.f90
View File

0
libm65/getpfx2.f90 → map65/libm65/getpfx2.f90
View File

56
libm65/gran.c → map65/libm65/gran.c
View File

@ -1,28 +1,28 @@
#include <stdlib.h> #include <stdlib.h>
#include <math.h> #include <math.h>
/* Generate gaussian random float with mean=0 and std_dev=1 */ /* Generate gaussian random float with mean=0 and std_dev=1 */
float gran_() float gran_()
{ {
float fac,rsq,v1,v2; float fac,rsq,v1,v2;
static float gset; static float gset;
static int iset; static int iset;
if(iset){ if(iset){
/* Already got one */ /* Already got one */
iset = 0; iset = 0;
return gset; return gset;
} }
/* Generate two evenly distributed numbers between -1 and +1 /* Generate two evenly distributed numbers between -1 and +1
* that are inside the unit circle * that are inside the unit circle
*/ */
do { do {
v1 = 2.0 * (float)rand() / RAND_MAX - 1; v1 = 2.0 * (float)rand() / RAND_MAX - 1;
v2 = 2.0 * (float)rand() / RAND_MAX - 1; v2 = 2.0 * (float)rand() / RAND_MAX - 1;
rsq = v1*v1 + v2*v2; rsq = v1*v1 + v2*v2;
} while(rsq >= 1.0 || rsq == 0.0); } while(rsq >= 1.0 || rsq == 0.0);
fac = sqrt(-2.0*log(rsq)/rsq); fac = sqrt(-2.0*log(rsq)/rsq);
gset = v1*fac; gset = v1*fac;
iset++; iset++;
return v2*fac; return v2*fac;
} }

0
libm65/graycode.f90 → map65/libm65/graycode.f90
View File

0
libm65/graycode65.f90 → map65/libm65/graycode65.f90
View File

0
libm65/grid2deg.f90 → map65/libm65/grid2deg.f90
View File

0
libm65/grid2k.f90 → map65/libm65/grid2k.f90
View File

0
libm65/igray.c → map65/libm65/igray.c
View File

0
libm65/indexx.f90 → map65/libm65/indexx.f90
View File

0
libm65/init_rs.c → map65/libm65/init_rs.c
View File

0
libm65/int.h → map65/libm65/int.h
View File

0
libm65/interleave63.f90 → map65/libm65/interleave63.f90
View File

0
libm65/ipcomm.cpp → map65/libm65/ipcomm.cpp
View File

0
libm65/iqcal.f90 → map65/libm65/iqcal.f90
View File

0
libm65/iqfix.f90 → map65/libm65/iqfix.f90
View File

0
libm65/jt65code.f90 → map65/libm65/jt65code.f90
View File

0
libm65/k2grid.f90 → map65/libm65/k2grid.f90
View File

0
libm65/lorentzian.f90 → map65/libm65/lorentzian.f90
View File

0
libm65/m65.f90 → map65/libm65/m65.f90
View File

Some files were not shown because too many files have changed in this diff Show More