新建 文本文档.txt

完全调好用单片机产生的正弦波的程序

  ORG 0000HMAIN:MOV DPTR,#07FFFH ;选通地址STR1:MOV R6,#00H;通过上升和下降来产生三角波///////////////////;电压随时间上升///////////////////////////////STR2: MOV A,R6MOVX @DPTR,AINC R6CJNE R6,#0FFH,STR2;/////////////////////////////////////////////;电压随时间下降///////////////////////////////STR3: DEC R6MOV A,R6MOVX @DPTR,ACJNE R6,#00H,STR3;/////////////////////////////////////////////AJMP STR1ENDORG 000HMAIN: MOV R1,#00H ;取表格初值LOOP1:;在表格里取数送到指定地址/////////////////////MOV A,R1MOV DPTR,#SETTABMOVC A,@A+DPTRMOV DPTR,#07FFFHMOVX @DPTR,A;/////////////////////////////////////////////INC R1 ;表格加一AJMP LOOP1 ;循环SETTAB:;正弦表格/////////////////////////////////////DB 80H,83H,86H,89H,8DH,90H,93H,96HDB 99H,9CH,9FH,0A2H,0A5H,0A8H,0ABH,0AEHDB 0B1H,0B4H,0B7H,0BAH,0BCH,0BFH,0C2H,0C5HDB 0C7H,0CAH,0CCH,0CFH,0D1H, 0D4H,0D6H,0D8HDB 0DAH,0DDH,0DFH,0E1H,0E3H, 0E5H,0E7H,0E9HDB 0EAH,0ECH,0EEH,0EFH,0F1H, 0F2H,0F4H,0F5HDB 0F6H,0F7H,0F8H,0F9H,0FAH, 0FBH,0FCH,0FDHDB 0FDH,0FEH,0FFH,0FFH,0FFH, 0FFH,0FFH,0FFHDB 0FFH,0FFH,0FFH,0FFH,0FFH, 0FFH,0FEH,0FDHDB 0FDH,0FCH,0FBH,0FAH,0F9H, 0F8H,0F7H,0F6HDB 0F5H,0F4H,0F2H,0F1H,0EFH, 0EEH,0ECH,0EAHDB 0E9H,0E7H,0E5H,0E3H,0E1H, 0DEH,0DDH,0DAHDB 0D8H,0D6H,0D4H,0D1H,0CFH, 0CCH,0CAH,0C7HDB 0C5H,0C2H,0BFH,0BCH,0BAH, 0B7H,0B4H,0B1HDB 0AEH,0ABH,0A8H,0A5H,0A2H, 9FH, 9CH, 99HDB 96H, 93H, 90H, 8DH, 89H, 86H, 83H, 80HDB 80H, 7CH, 79H, 78H, 72H, 6FH, 6CH, 69HDB 66H, 63H, 60H, 5DH, 5AH, 57H, 55H, 51HDB 4EH, 4CH, 48H, 45H, 43H, 40H, 3DH, 3AHDB 38H, 35H, 33H, 30H, 2EH, 2BH, 29H, 27HDB 25H, 22H, 20H, 1EH, 1CH, 1AH, 18H, 16HDB 15H, 13H, 11H, 10H, 0EH, 0DH, 0BH, 0AHDB 09H, 08H, 07H, 06H, 05H, 04H, 03H, 02HDB 02H, 01H, 00H, 00H, 00H, 00H, 00H, 00HDB 00H, 00H, 00H, 00H, 00H, 00H, 01H, 02HDB 02H, 03H, 04H, 05H, 06H, 07H, 08H, 09HDB 0AH, 0BH, 0DH, 0EH, 10H, 11H, 13H, 15HDB 16H, 18H, 1AH, 1CH, 1EH, 20H, 22H, 25HDB 27H, 29H, 2BH, 2EH, 30H, 33H, 35H, 38HDB 3AH, 3DH, 40H, 43H, 45H, 48H, 4CH, 4EHDB 51H, 55H, 57H, 5AH, 5DH, 60H, 63H, 66HDB 69H, 6CH, 6FH, 72H, 76H, 79H, 7CH, 80HENDORG 0000hMAIN: MOV DPTR,#07FFFH;通过高低电平地的变化来输出方波///////////////LOOP1:MOV A,0MOVX @DPTR,A ;向选通地址送低电平地ACALL DELAYMOV A,#0FFHMOVX @DPTR,A ;向选通地址送高电平ACALL DELAYAJMP LOOP1;/////////////////////////////////////////////DELAY: MOV 30H,#0FFH ;延时，通过改变它的大小可以改变占空比D2: DJNZ 30H,D2RETEND