乾坤-3乙 多普勒测向机

乾坤-3乙测向机是在乾坤系列测向机不断完善基础上改进版本的最后一个二单元版本的多普勒测向机。

它体积小巧，使用方便，成本低廉，适应范围广。和早先的版本一样，可以识别单向，采用声音识别的方式判断左右，避免正午强光下led亮度不够的问题。核心仍然采用avr13v单片机，一个片子处理全部天线切换，相位识别等任务。

全景图

PCB表情

电路图

以下是程序。根据不同的接受机要稍微调整延时语句。
本程序只在bg1cnx的小灵通和th46 th78测试通过。并且不同接受机要稍微调整参数。
本程序只能保证能用。如果有十分多的功夫和十分多的耐心，可以完善这个程序以及硬件。
以这个为蓝本不断完善，完全可以出产商品化的傻瓜型测向机。成本低的不好意思说。
这个程序google上2007年9月24日21:45分以前是搜不到的，为什么呢？因为这个是hocool自己原创的。任何人都可以拿去copy、转贴、删改、加帽子、任意署名。毕竟这个东西实在没有技术含量，声明太严格的版权那是在骂自己“就这么点能耐还要这要那的”。
献丑了，diy不灵别骂我。这个东西个性化极强，我自己diy10个出来，就会有10个不同的使用效果。

忘了说了，那两个二极管要严格配对。配对是什么意思呢？就是要冷参数和热参数、低频和高频参数尽量一样，别光量pn结电压。

$regfile = "2313DEF.dat"

$crystal = 1000000 ' 定义单片机时钟周期是1000000Hz

'Config Portb = Output ' 定义PC5端口作为输出
Config Pinb.1 = Output
Config Pinb.4 = Input

Portb = 0

Dim Countl As Integer
Dim Countr As Integer
Dim A As Integer

Loop1:
Countl = 0
Countr = 0
Portb.4 = 0
For A = 0 To 1000
Portb.1 = 1
Waitus 250
If Pinb.4 = 1 Then
Countl = Countl + 1
End If
Waitus 400
Portb.1 = 0
Waitus 250
If Pinb.4 = 1 Then
Countr = Countr + 1
End If
Waitus 400
Portb.2 = 0
Next A

If Countl > Countr Then
For A = 0 To 300
Portb.1 = 1
Waitus 250
Portb.1 = 0
Waitus 250
Next A
End If

If Countr > Countl Then
For A = 0 To 100
Portb.1 = 1
Waitus 950
Portb.1 = 0
Waitus 950
Next Aend If
End If
Goto Loop1
__________________

梦想着买下中华世纪坛，在那个布满观众席的斜面上安装10000个2单元HB9CV，在它空旷的内部空间安装高频矩阵切换器和相位转换器。使之成为市中心一座壮观的UHF相控阵天线。胡哥已经点头了，可是低下那些个部长总不乐意。


qq:41440
www.hocool.com/radio

使用的时候，和乾坤-1甲不同，这个要高高举过头顶才准。因为人的脑袋和身体也会反射折射电波，造成多经干扰。第一次玩要排除所有的干扰，在十分空旷的地方玩。玩熟练了掌握它的脾气以后才能尝试在城市内使用。

找到哑点后，找单向的时候转动的角度不能太大，否则有些接受机会解调不出来正确的多普勒信号。毕竟大多数手台不支持数传。估计具有频移建控的接受机使用效果应该最佳。没有事过，没那闲功夫。