【導讀】設計了X，Y向的進給?？刂葡到y(tǒng)的CPU采用凌陽單片機，顯示器采用了液晶顯示器，使用絲杠副實現(xiàn)XY向的進給，通過進行經濟分析后，產品設計合理。

　　

【正文】 0x7008 .ram .var KEY_BUF,K_IN_P,K_IN_C,K_IN_D .var KD00, KD01, KD02, KD03 .var KDA0, KDA1, KDA2, KDA3 .var KDB0, KDB1, KDB2, KDB3 .var KDC0, KDC1, KDC2, KDC3 .var KDD0, KDD1, KDD2, KDD3 disp_buf: .dw 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 .CODE DISP_TABLE: .DW 0x003F,0x0006,0x005B,0x004F,0x0066,0x006D,0x007D,0x0007,0x007F,0x006F .DW 0x0077,0x007C,0x0039,0x005E,0x0079,0x0071,0x0073 .public _main _main: R1= 0XFFFF // [P_IOA_Dir] = R1。 // Set port IOA output [P_IOA_Attrib] = R1。 // R1 = 0xF0F0。 // 設置 PORTB D15D12 為鍵盤掃描 OUT [P_IOB_Dir] =R1。 // 設置 PORTB D11D8 為鍵盤掃描 IN [P_IOB_Attrib]=R1 R1 = 0x00FF [P_IOB_Data]=R1 // 數(shù)控立式銑床進給系統(tǒng)設計 24 R1=0X0000 R3=24 R4=KEY_BUF // CLRR0: [R4]=R1 R4+=1 R3=1 CMP R3,0 JNE CLRR0 mainloop: call F_disp_PIOA call F_ksc_PIOB call F_ksc_CLP jmp mainloop //鍵值處理 // F_ksc_CLP: R1=[KEY_BUF] CMP R1,0 JE KDAE CMP R1,11 JB K_DATA R2=0 [K_IN_C]=R2 CMP R1,11 JNE K_GN2 R2=KDA0 [K_IN_P]=R2 R2=1 [K_IN_D]=R2 R2=0 [KEY_BUF]=R2 RETF K_DATA: 數(shù)控立式銑床進給系統(tǒng)設計 25 R3= [K_IN_D] CMP R3,0 JE KDAE R2=[K_IN_P] R1=1 [R2]=R1 R2+=1 [K_IN_P]=R2 R2=[K_IN_C] R2+=1 [K_IN_C]=R2 CMP R2,4 JNE KDAE R2=0 [K_IN_C]=R2 R2=[K_IN_P] R2=4 [K_IN_P]=R2 KDAE: R2=0 [KEY_BUF]=R2 RETF K_GN2: CMP R1,12 JNE K_GN3 R2=KDB0 [K_IN_P]=R2 R2=2 [K_IN_D]=R2 R2=0 [KEY_BUF]=R2 RETF K_GN3: 數(shù)控立式銑床進給系統(tǒng)設計 26 CMP R1,13 JNE K_GN4 R2=KDC0 [K_IN_P]=R2 R2=3 [K_IN_D]=R2 R2=0 [KEY_BUF]=R2 RETF K_GN4: CMP R1,14 JNE K_GNAK R2=KDD0 [K_IN_P]=R2 R2=4 [K_IN_D]=R2 R2=0 [KEY_BUF]=R2 RETF K_GNAK: CMP R1,15 JNE K_GNNK R2=KDD0 [K_IN_P]=R2 R2=0 [K_IN_D]=R2 R2=0 [KEY_BUF]=R2 RETF K_GNNK: R2=0 [K_IN_P]=R2 數(shù)控立式銑床進給系統(tǒng)設計 27 [K_IN_C]=R2 [K_IN_D]=R2 [KEY_BUF]=R2 RETF // 顯示子程序 // F_disp_PIOA: R2=[K_IN_D] R2=R2 LSL 2 R2+=4 R1=0x0800 AA0: R5=DISP_TABLE R5+=[R2] R1+= [R5] [P_IOA_Data]=R1 R1= [R5] R2+=1 R1= R1 LSL 1 CALL DELAY CMP R1,0x8000 JB AA0 R1=0x0800 RETF。 DELAY: R4=0x0000 DL1:R4+=1 CMP R4,0x01 JBE DL1 RETF // 按鍵管理 // F_ksc_PIOB: call KSC_ALL 數(shù)控立式銑床進給系統(tǒng)設計 28 cmp R2,0 JE Kend call F_disp_PIOA call KSC_ALL cmp R2,0 JE Kend R4 = 0X7FFF。 KK1: [P_IOB_Data]=R4。 R2 = [P_IOB_Data]。 R2|=0xF0FF R5=R2 R2+=1 JCS Ksc1 R2=R5 R2 ^=0xFFFF R2=R2 LSL 4 R5=0 LLP1:R2=R2 LSL 1 R5+=1 CMP R2,0x0000 JNE LLP1 R5=R5 LSL 2 R2=R4 R2^=0xFFFF LLP2:R2=R2 LSL 1 R5+=1 CMP R2,0X0000 JNE LLP2 R5=4 [KEY_BUF]=R5 Ksc1: 數(shù)控立式銑床進給系統(tǒng)設計 29 R4=R4 LSR 1 R4|=0X8000 CMP R4,0XF7FF JNAE KK1 Ksc2: call KSC_ALL cmp R2,0 JnE Ksc2 Kend: RETF KSC_ALL: R2 = 0X0FFF [P_IOB_Data]=R2。 R2 = [P_IOB_Data]。 R2|=0xF0FF R2+=1 RETF END 數(shù)控立式銑床進給系統(tǒng)設計 30 附錄 二 調頻脈沖輸出程序，在 P_IOA0 輸出調頻脈沖信號 .define P_IOA_DATA 0x7000 .define P_IOA_DIR 0x7002 .define P_IOA_ATTRI 0x7003 .define P_IOB_DATA 0x7005 .define P_IOB_DIR 0x7007 .define P_IOB_ATTRI 0x7008 .define P_TimerA_Ctrl 0x700b .define P_TimerA_Data 0x700a .define P_INT_Ctrl 0x7010 .define P_INT_Clear 0x7011 .define T_DATA (0xffff 0x1FE0) .CODE //主程序 .public _main _main: INT OFF R1 = 0x00FF [P_IOA_DIR] =R1 [P_IOA_ATTRI]=R1 R1 = 0xFFFF [P_IOA_DATA]=R1 R1 = 0x0005 [P_TimerA_Ctrl] = R1。 R1 = T_DATA [P_TimerA_Data] = R1 R1 = 0x1000。 [P_INT_Ctrl] = R1 // 設置 IRQ1_TM 中 斷 數(shù)控立式銑床進給系統(tǒng)設計 31 INT IRQ // 開中斷 R2=0xffb6 R3=0x0000 Main_lop: Jmp Main_lop Key: R1=[P_IOA_DATA] R1|=0x00ff R1^=0xffff R1=R1 LSR 3 R1+=1 // CMP R3,0 //周期不變 的調寬脈沖時間設置 // JE LOW_TIME R4= 0xffff R4=R1 R1=R4 retf LOW_TIME: R4=0x2021 R4=R1 R1=R4 R4= 0xffff R4=R1 R1=R4 retf .TEXT .PUBLIC _IRQ1 //中斷子程序 _IRQ1: Call Key //輸入設置時間 [P_TimerA_Data] = R1 cmp R3 ,0 數(shù)控立式銑床進給系統(tǒng)設計 32 je cplp r4=0xffb6 [P_IOA_DATA]=r4 R3 = 0 R4 = 0x1000 [P_INT_Clear] = R4 reti cplp: R3=1 R4=0xffff [P_IOA_DATA]=R4 R4 = 0x1000 [P_INT_Clear] = R4 //清中斷標識位 reti //中斷返回 END 數(shù)控立式銑床進給系統(tǒng)設計 33 致謝 感謝我 的學院給我提供的物質上和精神上的幫助 和支持。 感謝所有在我的 畢業(yè)設計過程中 予我?guī)椭椭С值耐瑢W 、家人 和朋友。