基于单片机DDS课程设计源程序.doc

;端口设置;RS BIT P1.0RW BIT P1.1E BIT P1.2WMAX EQU P0S EQU P2;存储区域;COM EQU 30HDAT EQU 31HSHU EQU 34HWEI EQU 35HADDR EQU 36HJIEMIAN EQU 40HPLV EQU 41HBJH8 EQU 42H ;相位值高8位BJM8 EQU 43H ;相位值中8位BJL8 EQU 44H ;相位值中低8位BJN8 EQU 45H ;相位值低8位RESULTH8 EQU 46H ;累加器高8位RESULTM8 EQU 47H ;累加器中8位RESULTL8 EQU 48H ;累加器中低8位RESULTN8 EQU 49H ;累加器低8位 ;程序开始;ORG 0000HLJMP STARTORG 0003HLJMP INTRSTART:MOV P1,#0FFHMOV SP,#60HMOV A,#00H;SETB IT0SETB EX0MOV BJN8,#0D7HMOV BJL8,#8DHMOV BJM8,#16H ;步进值清零MOV BJH8,#44HACALL INITLCALL DISPLAY1LCALL DISPLAY4LCALL DISPLAY8SETB EAADDA: MOV A,BJN8 ADD A,RESULTN8 ;累加器低8位加步进值 MOV RESULTN8,A MOV A,BJL8 ADDC A,RESULTL8 ;累加器低8位加步进值 MOV RESULTL8,A MOV A,BJM8 ADDC A,RESULTM8 ;累加器中8位加步进值 MOV RESULTM8,A MOV A,BJH8 ADDC A,RESULTH8 ;累加器高8位加步进值 MOV RESULTH8,A MOVC A,A+DPTR ;查表 MOV S,A NOP NOP NOP NOP LJMP ADDA;中断服务子程序;INTR: PUSH ACC PUSH PSW MOV RESULTH8,#0H MOV RESULTM8,#0H MOV RESULTL8,#0H ;累加器清零 MOV RESULTN8,#0H JNB P1.5 , KS1 JNB P1.6 ,KS1 LJMP INTRENDKS1: LCALL DELAY JNB P1.5 , KS11 JNB P1.6 ,KS12 LJMP INTRENDKS11: INC JIEMIAN LCALL CLEAR1 MOV A,JIEMIAN CJNE A,#01H,KS111 LCALL DISPLAY1;界面1 三角波 MOV DPTR,#TABLE_TRI LJMP KS113 ; 三角波KS111: MOV A,JIEMIAN CJNE A,#02H,KS112 LCALL DISPLAY2;界面2 正弦波 MOV DPTR,#TABLE_SIN ;?调正弦波参数表 LJMP KS113 KS112: LCALL DISPLAY3;界面3 方波 MOV DPTR,#TABLE_SQU MOV JIEMIAN,#00H ;调方波参数表 KS113: KS114 : JNB P1.5,KS114 LJMP INTRENDKS12: INC PLV LCALL CLEAR2 MOV A,PLV CJNE A,#01H,KS211 MOV BJN8,#0D7H MOV BJL8,#8DH MOV BJM8,#16H ;步进值清零 MOV BJH8,#44H ;10HZ LCALL DISPLAY4 LJMP KS214KS211: MOV A,PLV CJNE A,#02H,KS212 MOV BJN8,#0D7H MOV BJL8,#8DH MOV BJM8,#16H ;步进值清零 MOV BJH8,#44H ;1KHZ LCALL DISPLAY5 LJMP KS214KS212: MOV A,PLV CJNE A,#03H,KS213 MOV BJN8,#0D7H MOV BJL8,#8DH MOV BJM8,#16H ;步进值清零 MOV BJH8,#44H ;5KHZ LCALL DISPLAY6 LJMP KS214KS213: MOV BJN8,#0D7H MOV BJL8,#8DH MOV BJM8,#16H ;步进值清零 MOV BJH8,#44H ;10KHZ LCALL DISPLAY7 MOV PLV,#00H LJMP INTRENDKS214: KS215 :JNB P1.6,KS215 LJMP INTREND INTREND: POP PSW POP ACCRETI DISPLAY1:MOV WEI ,#13;输入的数据长度MOV ADDR,#82H ;输入的数据起始地址MOV DPTR,#TAB1;输入的查表地址ACALL DISPLAYRETDISPLAY2:MOV WEI ,#09 ;输入的数据长度MOV ADDR,#83H ;输入的数据起始地址MOV DPTR,#TAB2;输入的查表地址ACALL DISPLAYRETDISPLAY3:MOV WEI ,#12 ;输入的数据长度MOV ADDR,#83H ;输入的数据起始地址MOV DPTR,#TAB3;输入的查表地址ACALL DISPLAYRETDISPLAY4:MOV WEI ,#4 ;输入的数据长度MOV ADDR,#0CAH ;输入的数据起始地址MOV DPTR,#TAB4;输入的查表地址ACALL DISPLAYRETDISPLAY5:MOV WEI ,#4 ;输入的数据长度MOV ADDR,#0CAH ;输入的数据起始地址MOV DPTR,#TAB5;输入的查表地址ACALL DISPLAYRETDISPLAY6:MOV WEI ,#4 ;输入的数据长度MOV ADDR,#0CAH ;输入的数据起始地址MOV DPTR,#TAB6;输入的查表地址ACALL DISPLAYRETDISPLAY7:MOV WEI ,#5 ;输入的数据长度MOV ADDR,#0CAH ;输入的数据起始地址MOV DPTR,#TAB7;输入的查表地址ACALL DISPLAYRETDISPLAY8:MOV WEI ,#8 ;输入的数据长度MOV ADDR,#0C1H ;输入的数据起始地址MOV DPTR,#TAB8;输入的查表地址ACALL DISPLAYRET DELAY: MOV R5,#250 DEL11:MOV R4,#4 DEL12: DJNZ R4,DEL12 DJNZ R5, DEL11 RET ;写1602地址;WCOM:CLR RSCLR RWSETB EMOV WMAX,COMACALL DELAYLCD1602CLR ERET;延时1602;DELAYLCD1602: MOV 32H,#10DEL2: MOV 33H,#50DEL1 :DJNZ 33H,DEL1 DJNZ 32H,DEL2 RET;写1602数据 ;WDAT:SETB RSCLR RWSETB EMOV WMAX,DATACALL DELAYLCD1602CLR ERET;1602清零;CLEAR:MOV COM,#01HACALL WCOMRETCLEAR1:MOV R3,#0FHMOV COM ,#80HCLEA:ACALL WCOMMOV DAT,#20HACALL WDATINC COMDJNZ R3,CLEARETCLEAR2:MOV R3,#05HMOV COM ,#0CAHCLEA1:ACALL WCOMMOV DAT,#20HACALL WDATINC COMDJNZ R3,CLEA1RET;1602初始化;INIT:ACALL CLEARMOV COM,#02HACALL WCOMMOV COM,#38HACALL WCOMMOV COM,#0CHACALL WCOMMOV COM,#06HACALL WCOMRET;字符显示区;DISPLAY: MOV COM,ADDR MOV R1,#00H MOV SHU,WEI DIS: ACALL WCOM MOV A,R1 INC R1 MOVC A,A+DPTR MOV DAT ,A ACALL WDAT INC COM DJNZ SHU,DIS RETTAB1: DB Triangle waveTAB2: DB Sine waveTAB3: DB Square-waveTAB4: DB 10HZTAB5: DB 1KHZTAB6: DB 5KHZTAB7: DB 10KHZTAB8:DB PING-LV: TABLE_SIN:DB 080H,083H,086H,089H,08cH,08fH,092H,095H,098H,09cH,09fH,0a2H,0a5H,0a8H,0abH,0aeHDB 0b0H,0b3H,0b6H,0b9H,0bcH,0bfH,0c1H,0c4H,0c7H,0c9H,0ccH,0ceH,0d1H,0d3H,0d5H,0d8HDB 0daH,0dcH,0deH,0e0H,0e2H,0e4H,0e6H,0e8H,0eaH,0ecH,0edH,0efH,0f0H,0f2H,0f3H,0f4HDB 0f6H,0f7H,0f8H,0f9H,0faH,0fbH,0fcH,0fcH,0fdH,0feH,0feH,0ffH,0ffH,0ffH,0FfH,0ffHDB 0ffH,0ffH,0ffH,0ffH,0ffH,0ffH,0feH,0feH,0fdH,0fcH,0fcH,0fbH,0faH,0f9H,0f8H,0f7HDB 0f6H,0f5H,0f3H,0f2H,0f0H,0efH,0edH,0ecH,0eaH,0e8H,0e6H,0e4H,0e3H,0e1H,0deH,0dcHDB 0daH,0d8H,0d6H,0d3H,0d1H,0ceH,0ccH,0c9H,0c7H,0c4H,0c1H,0bfH,0bcH,0b9H,0b6H,0b4HDB 0b1H,0aeH,0abH,0a8H,0a5H,0a2H,09fH,09cH,099H,096H,092H,08fH,08cH,089H,086H,083HDB 080H,07dH,079H,076H,073H,070H,06dH,06aH,067H,064H,061H,05eH,05bH,058H,055H,052HDB 04fH,04cH,049H,046H,043H,041H,03eH,03bH,039H,036H,033H,031H,02eH,02cH,02aH,027HDB 025H,023H,021H,01fH,01dH,01bH,019H,017H,015H,014H,012H,010H,0fH,0dH,0cH,0bHDB 09H,08H,07H,06H,05H,04H,03H,03H,02H,01H,01H,00H,00H,00H,00H,00HDB 00H,00H,00H,00H,00H,00H,01H,01H,02H,03H,03H,04H,05H,06H,07H,08HDB 09H,0aH,0cH,0dH,0eH,010H,012H,013H,015H,017H,018H,01aH,01cH,01eH,020H,023HDB 025H,027H,029H,02cH,02eH,030H,033H,035H,038H,03bH,03dH,040H,043H,046H,048H,04bHDB 04eH,051H,054H,057H,05aH,05dH,060H,063H,066H,069H,06cH,06fH,073H,076H,079H,07cHTABLE_TRI:DB 0H,2H,4H,6H,8H,0AH,0CH,0EH,10H,12H,14H,16H,18H,1AH,1CH,1EHDB 20H,22H,24H,26H,28H,2AH,2CH,2EH,30H,32H,34H,36H,38H,3AH,3CH,3EHDB 40H,42H,44H,46H,48H,4AH,4CH,4EH,50H,52H,54H,56H,58H,5AH,5CH,5EHDB 60H,62H,64H,66H,68H,6AH,6CH,6EH,70H,72H,74H,76H,78H,7AH,7CH,7EHDB 80H,82H,84H,86H,88H,8AH,8CH,8EH,90H,92H,94H,96H,98H,9AH,9CH,9EHDB 0A0H,0A2H,0A4H,0A6H,0A8H,0AAH,0ACH,0AEH,0B0H,0B2H,0B4H,0B6H,0B8H,0BAH,0BCH,0BEHDB 0C0H,0C2H,0C4H,0C6H,0C8H,0CAH,0CCH,0CEH,0D0H,0D2H,0D4H,0D6H,0D8H,0DAH,0DCH,0DEHDB 0E0H,0E2H,0E4H,0E6H,0E8H,0EAH,0ECH,0EEH,0F0H,0F2H,0F4H,0F6H,0F8H,0FAH,0FCH,0FEHDB 0FEH,0FCH,0FAH,0F8H,0F6H,0F4H,0F2H,0F0H,0EEH,0ECH,0EAH,0E8H,0E6H,0E4H,0E2H,0E0HDB 0DEH,0DCH,0DAH,0D8H,0D6H,0D4H,0D2H,0D0H,0CEH,0CCH,0CAH,0C8H,0C6H,0C4H,0C2H,0C0HDB 0BEH,0BCH,0BAH,0B8H,0B6H,0B4H,0B2H,0B0H,0AEH,0ACH,0AAH,0A8H,0A6H,0A4H,0A2H,0A0HDB 9EH,9CH,9AH,98H,96H,94H,92H,90H,8EH,8CH,8AH,88H,86H,84H,82H,80HDB 7EH,7CH,7AH,78H,76H,74H,72H,70H,6EH,6CH,6AH,68H,66H,64H,62H,60HDB 5EH,5CH,5AH,58H,56H,54H,52H,50H,4EH,4CH,4AH,48H,46H,44H,42H,40HDB 3EH,3CH,3AH,38H,36H,34H,32H,30H,2EH,2CH,2AH,28H,26H,24H,22H,20HDB 1EH,1CH,1AH,18H,16H,14H,12H,10H,0EH,0CH,0AH,8H,6H,4H,2H,0HTABLE_SQU:DB 0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0HDB 0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0HDB 0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0HDB 0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0HDB 0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0HDB 0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0HDB 0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,