是否在找人幫你寫作業 ?

btfss PORTB, RB0
bra $-2
clrf PORTD
; movf ADRESH, W
STEP_2:
btfsc SW4 ;
bra sw5_press
movlw b'01010101'
movwf PORTD
goto step_2

sw5_press:


作個參考 自己完成

檢測按鍵SW4.SW5.SW6的狀態
1.當按鍵SW2按下時.PORTD顯示類比電壓
2.當按鍵SW2放開時.依下列方式亮燈:
a 按sw4時.D0.D2.D4.D6四個燈亮
b 按sw5時.D1.D3.D5.D7四個燈亮
C 按sw6時.D0到D7八個燈亮


以下類似程式應該在哪些地方做修改呢?

list p = 18f4520
#include <p18f4520.inc>
;Configuration Register
CONFIG OSC=HS, BOREN=OFF, BORV = 2, PWRT=ON, WDT=OFF, LVP=OFF

;
C_Hold_Delay equ 0x20 ; 延遲時間計數暫存器
;
;********************************************************************
;**** RESET Vector @ 0x0000
;********************************************************************

org 0x00 ; 程式起始位址
bra Main
;
org 0x08 ; 中斷向量起始位址
bra Hi_ISRs
;
;********************************************************************
;**** The Main Program start from Here !!
;********************************************************************

org 0x02A ; 主程式起始位址
Main:
call Init_IO ; 呼叫數位輸出入埠初始化函式
call Init_AD ; 呼叫類比訊號轉換模組初始化函式
;
AD_Loop btfsc PORTB, RB0
bra $-2
call C_Hold_Time ; 延遲50uS完成類比訊號採樣保持
bsf ADCON0,GO ; 啟動類比訊號轉換
nop ;
btfsc ADCON0,GO ; 檢查類比訊號轉換是否完成?
bra $-4 ; 否，迴圈繼續(倒退兩行, 4/2=2)
movff ADRESH, PORTD ; 是，將結果轉移到PORTD
;
btfss PORTB, RB0
bra $-2
clrf PORTD
movf ADRESH, W
SW4: bnz SW5 ; ADRESH>0, Others
bsf PORTD, 4 ; ADRES=0, SW4 Pressed
goto AD_Loop ; 重複無窮迴圈
SW5:
sublw .127
bn SW6 ; ADRES>128, Others
bsf PORTD, 5 ; ADRES<128, SW5 Pressed
goto AD_Loop ; 重複無窮迴圈
SW6: movf ADRESH, W
sublw .169
bn AD_Loop
bsf PORTD, 6 ; ADRES<170, SW6 Pressed
bra AD_Loop ; ADRES>170, None, 重複無窮迴圈
;***********************************************************************
;**** Initial the PORTD for the output port
;***********************************************************************
Init_IO: ; 數位輸出入埠初始化函式
clrf PORTD ; 設定PORTD暫存器數值
clrf TRISD ; 設定PORTD全部為數位輸出
;
bsf TRISA,RA4 ; 設定RA4為數位輸入
bsf TRISB,RB0 ; 設定RB0為數位輸入
;
return
;***********************************************************************
;**** Initial A/D converter
;***********************************************************************
Init_AD: ; 類比訊號模組初始化函式 for PIC18F4520
movlw b'00001001' ; 選擇AN2通道轉換，
movwf ADCON0 ; 啟動A/D模組
;
movlw b'00001100' ; 設定AN0~AN2為類比輸入
movwf ADCON1
;
movlw b'00111010' ; 結果向左靠齊並設定轉換時間為Fosc/32
movwf ADCON2 ;
;

bcf PIE1,ADIE ; 關閉A/D模組中斷功能

return
;
;
;***********************************************************************
; 採樣保持時間延遲函式 (50uS)
;***********************************************************************
C_Hold_Time:
movlw .125
movwf C_Hold_Delay
nop
decfsz C_Hold_Delay,F
bra $-4
return

;**************************************************************************
; 高優先權中斷執行函式
;**************************************************************************
Hi_ISRs
retfie FAST ; Return with shadow register
;
END