|
|||||||||||
| 技術(shù)交流 | 電路欣賞 | 工控天地 | 數(shù)字廣電 | 通信技術(shù) | 電源技術(shù) | 測(cè)控之家 | EMC技術(shù) | ARM技術(shù) | EDA技術(shù) | PCB技術(shù) | 嵌入式系統(tǒng) 驅(qū)動(dòng)編程 | 集成電路 | 器件替換 | 模擬技術(shù) | 新手園地 | 單 片 機(jī) | DSP技術(shù) | MCU技術(shù) | IC 設(shè)計(jì) | IC 產(chǎn)業(yè) | CAN-bus/DeviceNe |
數(shù)控直流電流源(單片機(jī)與模擬電子的完美結(jié)）51程序 |
| 作者：laibohai 欄目：單片機(jī) |
LED1 EQU 60H LED2 EQU 5FH LED3 EQU 5EH LED4 EQU 5DH POINTER EQU 5CH CCH1 EQU 5BH CCH10 EQU 5AH CCH100 EQU 59H CCH1000 EQU 58H WEIXUAN EQU 57H S1 BIT P1.0 S2 BIT P1.1 S3 BIT P1.2 S4 BIT P1.3 S5 BIT P1.4 MOV POINTER, #0 MOV CCH1, #0 MOV CCH10, #0 MOV CCH100, #2 MOV CCH1000, #0 MOV WEIXUAN, #0 ACALL DIS ;鍵盤主程序 START: JB S1, NET1 LCALL T12MS JB S1, NET1 JNB S1, $ SJMP CHOOSE NET1: ACALL JIA ACALL CHABIAO ACALL DIS ACALL T12MS ACALL T12MS SJMP START ;選擇調(diào)整位 CHOOSE: JB S2, NET11 LCALL T12MS JB S2, NET11 JNB S2, $ INC WEIXUAN MOV A, WEIXUAN CJNE A, #1, NT1 LJMP TIAO10 NT1: CJNE A, #2, NT2 LJMP TIAO100 NT2: CJNE A, #3, NET11 LJMP TIAO1000 MOV WEIXUAN, #0 NET11: JB S5, NT4 ACALL T12MS JB S5, NT4 JNB S5, $ MOV WEIXUAN, #0 LJMP START ;返回主程序，表示回車已經(jīng)按下 NT4: LJMP CHOOSE ;按建調(diào)10,加一 ,減一 TIAO10: MOV LED2, #0AH ;------------------------------------------------ ACALL DISS ACALL T100MS ;ACALL T100MS ; ACALL T100MS MOV LED2, CCH10 ACALL DIS ACALL T100MS ;ACALL T100MS JB S3, K0 ;加一處理 ACALL T12MS JB S3, K0 JNB S3, $ INC CCH10 INC POINTER ;指針加一 MOV A, CCH10 CJNE A, #10, K0 MOV CCH10, #0 K0 : JB S4, K1 ACALL T12MS ACALL T12MS JB S4, K1 JNB S4, $ MOV A, POINTER CLR C SUBB A, #1 MOV POINTER, A MOV A, #99H ADD A, CCH10 DA A MOV CCH10, A CJNE A, #99H, K1 MOV CCH10, #9 K1: JB S5, LP1 ACALL T12MS ACALL T12MS JB S5, LP1 JNB S5, $ LJMP CHOOSE LP1: ACALL DIS ACALL T12MS LJMP TIAO10 TIAO100: MOV LED3, #0AH ;------------------------------------------------ ACALL DISS ACALL T100MS ;ACALL T100MS ; ACALL T100MS MOV LED3, CCH100 ACALL DIS ACALL T100MS ;ACALL T100MS JB S3, KY1 ;加一處理 ACALL T12MS JB S3, KY1 JNB S3, $ INC CCH100 MOV A, #10 ADDC A, POINTER MOV POINTER, A ;指針加10 MOV A, CCH100 CJNE A, #10, KY1 MOV CCH100, #0 KY1 : JB S4, KY2 ACALL T12MS JB S4, KY2 JNB S4, $ MOV A, POINTER CLR C SUBB A, #10 MOV POINTER, A MOV A, #99H ADD A, CCH100 DA A MOV CCH100, A CJNE A, #99H, KY2 MOV CCH100, #9 KY2: JB S5, LP11 ACALL T12MS JB S5, LP11 JNB S5, $ LJMP CHOOSE LP11: ACALL DIS ACALL T12MS LJMP TIAO100 TIAO1000: MOV LED4, #0AH ;------------------------------------------------ ACALL DISS ACALL T100MS ;ACALL T100MS ; ACALL T100MS MOV LED4, CCH1000 ACALL DIS ACALL T100MS ;ACALL T100MS JB S3, KEY1 ;加一處理 ACALL T12MS JB S3, KEY1 JNB S3, $ INC CCH1000 MOV A, #100 ;加100 ADDC A, POINTER MOV POINTER ,A MOV A, CCH1000 CJNE A, #3, KEY1 MOV CCH1000, #0 KEY1 : JB S4, KEY2 ACALL T12MS JB S4, KEY2 JNB S4, $ MOV A, POINTER CLR C SUBB A, #100 MOV POINTER, A MOV A, #99H ADD A, CCH1000 DA A MOV CCH1000, A CJNE A, #99H, KEY2 MOV CCH1000, #2 KEY2: JB S5, LP12 ACALL T12MS JB S5, LP12 JNB S5, $ LJMP CHOOSE LP12: ACALL DIS ACALL T12MS LJMP TIAO1000 T12MS: MOV R4,#18H TM: MOV R3,#0FFH TM6:DJNZ R3,TM6 DJNZ R4,TM CLR RS0 CLR RS1 RET T100MS: MOV R3, #200 D11: MOV R4, #125 D12: DJNZ R4, D12 DJNZ R3, D11 RET JIA: MOV A, CCH10 MOV B, #1 MUL AB MOV POINTER, A MOV A, CCH100 MOV B, #10 MUL AB ADDC A, POINTER MOV POINTER, A MOV A, CCH1000 MOV B, #100 MUL AB ADDC A, POINTER CLR C SUBB A, #20 MOV POINTER, A RET DIS: MOV LED1, CCH1 MOV LED2, CCH10 MOV LED3, CCH100 MOV LED4, CCH1000 DISS: MOV R7,#4H MOV R1,#LED1 loop: MOV A,@R1 MOV DPTR,#TAB MOVC A,@A+DPTR MOV SBUF,A BK: JBC TI,NEXT SJMP BK NEXT: DEC R1 DJNZ R7,LOOP RET TAB: DB 11H,0D7H,32H,92H,0D4H,98H,18H,0D1H,10H,90H,0FFH CHABIAO: MOV A, POINTER MOV DPTR, #TABLE_1 MOVC A, @A+DPTR MOV DPTR, #2FFFH MOVX @DPTR, A RET TABLE_1: ;DB 00H, 01H, 02H, 03H, 04H, 05H, 06H, 07H, 08H, 09H ; DB 0AH, 0BH, 0CH, 0DH, 0EH, 0FH, 10H, 11H, 12H DB 13H,14H, 15H, 16H,17H, 18H, 19H, 1AH, 1BH, 1CH, 1DH DB 1EH, 1FH, 20H, 21H, 22H, 23H, 24H, 25H, 26H, 26H DB 27H, 28H, 29H, 2AH, 2BH, 2CH, 2DH, 2EH, 2FH, 30H DB 30H,31H, 32H, 33H, 34H, 35H, 36H, 37H, 38H, 39H, 3AH DB 3BH, 3CH, 3DH, 3EH, 3FH, 40H, 41H, 42H, 43H, 44H DB 45H, 46H, 47H, 48H, 49H, 4AH, 4BH, 4CH, 4DH, 4EH DB 4FH, 50H, 51H, 52H, 53H, 54H, 55H, 56H, 57H, 58H DB 59H, 5AH, 5BH, 5CH, 5DH, 5EH, 5FH, 60H, 61H, 62H DB 63H, 64H, 65H, 66H, 67H, 68H, 69H, 6AH, 6BH, 6CH DB 6DH, 6EH, 6FH, 70H, 71H, 72H, 73H, 74H, 75H, 76H DB 77H, 78H, 79H, 7AH, 7BH, 7CH, 7DH, 7EH, 7FH, 80H DB 81H, 82H, 83H, 84H, 85H, 86H, 87H, 88H, 89H, 8AH DB 8BH, 8CH, 8DH, 8EH, 8FH, 90H, 91H, 92H, 93H, 94H DB 95H, 96H, 97H, 98H, 99H, 9AH, 9BH, 9CH, 9DH, 9EH DB 9FH, 0A0H, 0A1H, 0A2H,0A3H, 0A4H, 0A5H, 0A6H, 0A7H, 0A8H DB 0A9H,0AAH, 0ABH, 0ACH, 0ADH, 0AEH, 0AFH,0B0H,0B1H, 0B2H DB 0B3H, 0B4H, 0B5H, 0B6H,0B7H, 0B8H, 0B9H,0BAH,0BBH, 0BCH DB 0BDH, 0BEH, 0BFH, 0C0H, 0C1H, 0C2H, 0C3H, 0C4H, 0C5H, 0C6H ;;;;;;;;; DB 0C7H, 0C8H, 0C9H, 0CAH, 0CBH, 0CCH, 0CDH, 0CEH, 0CFH, 0D0H DB 0D1H, 0D2H, 0D3H, 0D4H, 0D5H, 0D6H, 0D7H, 0D8H, 0D9H, 0DAH DB 0DBH, 0DCH, 0DEH, 0DFH, 0E0H, 0E1H, 0E2H, 0E3H, 0E4H, 0E5H DB 0E6H, 0E7H, 0E8H, 0E9H, 0EAH, 0EBH, 0ECH, 0EDH, 0EEH, 0EFH DB 0F0H, 0F1H, 0F2H, 0F3H, 0F4H, 0F5H, 0F6H, 0F7H, 0F8H, 0F9H DB 0FAH, 0FBH ,0FCH, 0FDH, 0FEH, 0FFH END |
| 2樓： | >>參與討論 |
| 作者： 聯(lián)想中國(guó) 于 2006/11/21 17:32:40 發(fā)布：
牛,亂麻麻的匯編 |
|
| 3樓： | >>參與討論 |
| 作者： 789987ruijia 于 2006/11/22 23:49:51 發(fā)布：
多謝分享，學(xué)習(xí)中。 |
|
| 4樓： | >>參與討論 |
| 作者： laibohai 于 2006/11/23 14:31:58 發(fā)布：
以下是引用 聯(lián)想中國(guó) 在(2006-11-21 17:32:40)的發(fā)言 牛,亂麻麻的匯編 仔細(xì)的看，你能發(fā)現(xiàn)肯定能看到，匯編的指令是很少的，比C語(yǔ)言簡(jiǎn)單的多。 |
|
| 5樓： | >>參與討論 |
| 作者： agenzhu 于 2006/11/23 14:48:13 發(fā)布：
該用戶帖子已被管理員屏蔽，請(qǐng)和管理員聯(lián)系 |
|
| 6樓： | >>參與討論 |
| 作者： shifang 于 2006/11/30 13:20:36 發(fā)布：
不錯(cuò)，提供電路圖紙就更好了 |
|
| 7樓： | >>參與討論 |
| 作者： hua2008 于 2006/11/30 23:29:24 發(fā)布：
是啊`能提供電路圖紙那就好了`斑竹留個(gè)把`一邊大家多多學(xué)習(xí)`呵呵` |
|
| 8樓： | >>參與討論 |
| 作者： springs 于 2006/12/8 12:43:39 發(fā)布：
同感 |
|
| 9樓： | >>參與討論 |
| 作者： zwt659 于 2006/12/10 16:54:13 發(fā)布：
看了，不錯(cuò)，樓主厲害，，，樓主，原理圖片能不能發(fā)個(gè)上來(lái)，共享，一起學(xué)習(xí)，謝謝 |
|
|
|
| 免費(fèi)注冊(cè)為維庫(kù)電子開發(fā)網(wǎng)會(huì)員，參與電子工程師社區(qū)討論，點(diǎn)此進(jìn)入 |
Copyright © 1998-2006 m.58mhw.cn 浙ICP證030469號(hào) |