用单片机产生正弦波程序培训资料.doc

用单片机产生正弦波程序

精品资料

精品资料

仅供学习与交流，如有侵权请联系网站删除谢谢PAGE

仅供学习与交流，如有侵权请联系网站删除谢谢PAGE2

精品资料

仅供学习与交流，如有侵权请联系网站删除谢谢PAGE

用单片机产生正弦波程序

要用到数模转换DAC0832

??????MOV?DPTR,#SINTAB????????;正弦表写入内部RAM6DH-7FH

??????MOV?R0,#6DH

LOOP:?CLR?A

??????MOVCA,@A+DPTR

??????MOV?@R0,A

??????INC?DPTR

??????INC?R0

??????CJNER0,#80H,LOOP

??????MOV?DPTR,#7FFFH?????????;设置D/A转换器的端口地址

??????MOV?R0,#6DH??????????????;设置正弦表指针

LOOP1:MOV?A,@R0???????????????;查表

??????MOVX@DPTR,A?????????????;D/A转换

??????ACALL?DELAY?????????????;延时，等待转换结束

??????DEC?R0????????????????????;正弦表位移量增量

??????CJNER0,#6DH,LOOP1?????????;第一象限输出完？

LOOP2:MOV?A,@R0???????????????;查表

??????MOVX@DPTR,A?????????????;D/A转换

??????acall?DELAY????????????;延时，等待转换结束

??????DEC?R0????????????????????;正弦表位移量减量

??????CJNER0,#6DH,LOOP2?????????;第二象限输出完？

LOOP3:MOV?A,@R0???????????????;查表

??????CPLA???????????????????????;表值取反

??????MOVX@DPTR,A?????????????;D/A转换

??????ACALL?DELAY????????????;延时，等待转换结束

??????INC?R0????????????????????;正弦表位移量增量

?????CJNER0,#7FH,LOOP3?????????;第三象限输出完？

LOOP4:MOV?A,@R0???????????????;查表

?????CPL?A?????????????????????;表值取反

?????MOVX@DPTR,A?????????????;D/A转换

?????ACALL?DELAY????????????;延时，等待转换结束

?????DEC?R0????????????????????;正弦表位移量减量

?????CJNER0,#6DH,LOOP4?????????;第四象限输出完？

?????SJMPLOOP1

DELAY:MOV?R7,#200??????????????;延时50ms

DEL1:MOVR6,#123

?????NOP

DEL2：JNZR6,DEL2

?????DJNZR7,DEL1

?????RET

SINTAB:

DB80H,83H,86H,89H,8DH,90H,93H,96H

DB99H,9CH,9FH,0A2H,0A5H,0A8H,0ABH,0AEH

DB0B1H,0B4H,0B7H,0BAH,0BCH,0BFH,0C2H,0C5H

DB0C7H,0CAH,0CCH,0CFH,0D1H,0D4H,0D6H,0D8H

DB0DAH,0DDH,0DFH,0E1H,0E3H,0E5H,0E7H,0E9H

DB0EAH,0ECH,0EEH,0EFH,0F1H,0F2H,0F4H,0F5H

DB0F6H,0F7H,0F8H,0F9H,0FAH,0FBH,0FCH,0FDH

DB0FDH,0FEH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH

DB0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FEH,0FDH

DB0FDH,0FCH,0FBH,0FAH,0F9H,0F8H,0F7H,0F6H

DB0F5H,0F4H,0F2H,0F1H,0EFH,0EEH,0ECH,0EAH

DB0E9H,0E7H,0E5H,0E3H,0E1H,0DEH,0DDH,0DAH

DB0D8H,0D