【正文】 MOV 60H, 10H AJMP CCC0CCCC: CJNE R5, 06H, CCC1 AJMP CCC0CCC1: MOV 60H, 61H MOV 61H, 62H MOV 62H, 63H MOV 63H, 64H MOV 64H, 65H MOV 65H, ANJIAN INC R5CCC0: LCALL DISP 。 調顯示子程序CCCN: MOV XIANS, 00H RET。********************************************************。資源:R1,R2,R3。把輸入的數(shù)據(jù)進行BCD二進制的轉換。*******************************************************QUEDING: MOV R3, 04H MOV R0, 60H MOV R1, 70HQUED0: MOV A, @R0 ANL A, 0FH SWAP A MOV B, A INC R0 MOV A, @R0 ANL A, 0FH ADD A, B DA A MOV @R1, A INC R0 INC R1 DJNZ R3, QUED0 MOV R1, 70H MOV R2, 71H MOV R3, 72H LCALL BH2 MOV R1, 70H MOV R2, 71H MOV R3, 72H LCALL SONG 。送字符給FPGA RETMOFF: MOV R7, 06H MOV R0, 60H MOFF0: MOV @R0, 10H INC R0 DJNZ R7, MOFF0 RET。*******************************************************。DISP:顯示程序。占用資源:。*******************************************************DISP: PUSH PSW SETB RS0 SETB RS1 MOV DPTR, TAB MOV R0, 60H MOV R7, 06H DISP0: MOV A, @R0 MOVC A, @A+DPTR MOV SBUF, A JNB TI, $ CLR TI INC R0 DJNZ R7, DISP0 pop psw RET。*************************************************************。字型碼表。*************************************************************TAB: DB 03H,9FH,25H,0DH,99H 。字型碼0~4 DB 49H,41H,1FH,01H,09H 。字型碼5~9 DB 11H,0C1H,63H,85H,61H 。字型碼A~E DB 71H,0ffH,72H,0FDH,91H 。字型碼F,39。滅39。,39。r.39。, DB 0EDH,73H, 。字型碼H,r。*************************************************************。SONG:送字符給FPGA子程序。************************************************************SONG: PUSH PSW SETB RS0 SETB RS1 MOV R6, 03H MOV R0, 70H MOV A, ZHUT 。狀態(tài)位0送頻率字,1送相位字 JNZ SON1 MOV R1, 02H SON0: MOV P2, R1 。送頻率字 MOV P1, @R0 INC R0 INC R1 DJNZ R6, SON0 MOV ZHUT, 01H AJMP SONM0 SON1: MOV A, 70H CJNE A, 00, SSSS MOV P2, 06H 。送相位字 MOV P1, 70H MOV ZHUT, 00H AJMP SONM0 SSSS: LCALL ERROR LCALL DISPSONM0: POP PSW RETERROR: MOV 60H, 0EH MOV 61H, 15H MOV 62H, 15H MOV 63H, 00H MOV 64H, 15H MOV 65H, 10H RET。**********************************************。BCD碼轉換成十六進制。**********************************************BCDH: MOV B, 10H DIV AB MOV R4, B MOV B, 10 MUL AB ADD A, R4 RETBH2: MOV A, R3 LCALL BCDH MOV R3, A MOV A, R2 LCALL BCDH MOV B, 100 MUL AB ADD A, R3 MOV R3, A CLR A ADDC A, B MOV R2, A RET end附錄二 VHDL程序——DDS子程序library ieee。 use 。use 。use 。library lpm。use 。entity CHAIN is generic(freq_width :integer :=32。 phase_width :integer :=8。 adder_width:integer :=32。 romad_width:integer :=8。 rom_d_width:integer :=8)。 port( clk :in std_logic。freqin :in std_logic_vector(freq_width1 downto 0)。phasein :in std_logic_vector(phase_width1 downto 0)。ddsout :out std_logic_vector(rom_d_width1 downto 0))。end entity 。architecture behave of CHAIN is signal acc :std_logic_vector(adder_width1 downto 0)。 signal phaseadd:std_logic_vector(phase_width1 downto 0)。 signal romaddr:std_logic_vector(romad_width1 downto 0)。 signal freqw :std_logic_vector(freq_width1 downto 0)。 signal phasew:std_logic_vector(phase_width1 downto 0)。begin process (clk) begin if(clk39。event and clk=39。139。) then freqw=freqin。 phasew=phasein。