8051可以用組合語言的巨集 |
|
答題得分者是：mymj
|
|
sam168
一般會員   發表：4 回覆：7 積分：2 註冊：2004-11-16 發送簡訊給我 |
|
|
暗黑破壞神
版主   發表：9 回覆：2301 積分：1627 註冊：2004-10-04 發送簡訊給我 |
|
|
mymj
版主 發表：132 回覆：486 積分：608 註冊：2002-10-25 發送簡訊給我 |
這是使用X8051的範例
SYMBOLS ON
CHIP 8052
;使用MicroTek E8052 ICE 符號檔(.SYM)
;本程式使用2500AD X8051組譯器,2500AD LINK 連結
;展示具集使用
RES .REG P3.5
;***********************
;* DELAY (0.5MSEC - 32.8 SEC) *
DELAY MACRO H,L
MOV DTL,L
MOV DTH,H
CALL DELAY
ENDM
;***********************
CASE MACRO MODE,FUN_MODE
CJNE A,#MODE,FUN_MODE;IF A=#MODE THEN RUN NEXT INSTRUCTION
;ELSE JUMP TO FUN_MODE
ENDM
;***********************
LED_ON MACRO
CLR P1.5
NOP
ENDM
;***********************
LED_OFF MACRO
SETB P1.5
NOP
ENDM
;***********************
;***********************
RESET_LOW MACRO
CLR RES
NOP
ENDM
;***********************
RESET_HIGH MACRO
SETB RES
NOP
ENDM
;***********************
;***********************
;程式啟始
ORG 0000H
;中斷向量
JMP START
ORG 30H
START MOV SP,#60H
MOV P2,#0FFH ;Set p2 Input mode
LED_OFF ;關閉測試LED
RESET_LOW
RESET_HIGH
DELAY1 #50
NOP
NOP
;*********************** ;** DELAY **
DELAY: PUSH PSW
SETB RS0
MOV R5,DTH
$1 MOV R6,DTL
$0 MOV R7,#248
DJNZ R7,$
DJNZ R6,$0
DJNZ R5,$1
POP PSW
RET
END
巨集好好使用程式看起來會很像高階語言的語法如上
LED_OFF ;關閉測試LED
RESET_LOW
RESET_HIGH
DELAY1 #50
要如何善用就需找使用手冊或書店購買書籍 發表人 - mymj 於 2004/12/11 00:32:49
|
|
sam168
一般會員 發表：4 回覆：7 積分：2 註冊：2004-11-16 發送簡訊給我 |
|
|
mymj
版主 發表：132 回覆：486 積分：608 註冊：2002-10-25 發送簡訊給我 |
發表時間：2004-12-08 14:48:54
IP:61.224.xxx.xxx 未訂閱
系統時間：2024-05-07 21:44:48
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |