89s52的UART测试
测试程序使用BASCOM-8051，内容同测试AVR M16的。$regfile = "8052.DAT" 'use the 8052.DAT file
$crystal = 12000000
$baud = 4800
Dim I As Integer
I = 1
For I = 0 To 10
Print "www.ouravr.com " ; I
Print 'new line
Next I
Do
Print "type a key"
I = Waitkey()
Printbin I
Loop
End
由于晶体为12M，所以9600收到乱码，4800正常。通过。
在M16板上的连接方式：
使用短路片短路89S52边上的：
PB5、PB6、PB7、RST（以上为ISP口）；
PD0、PD1（TXD和RXD）
X2、X1（连接晶体）；
JN（连89S5X）、J1（连12M）；
PIN20的GND与旁边的GNG短路，PIN40的VCC与5V短路（提供电源）；
使用一根连接线，将PIN31与5V连接（使用内部ROM方式）；
-----此内容被machao于2005-02-27,02:58:39编辑过
页:
[1]