[求助]
可以幫我看看這個程序在上電時,可以讓GP2,GP5為1嗎?謝謝!!
STATUS EQU 3
GP EQU 6
GP0 EQU 6
GP1 EQU 6
GP2 EQU 6
GP5 EQU 6
BIT EQU 07H
INPUT EQU 3
loop MOVLW 18H
TRIS 6
LP1 BTFSS GP,3
GOTO LP1
BSF GP,2
BSF GP,5
BCF GP,0
BCF GP,1
CALL DEL500US
LP2 BTFSC GP,3
GOTO LP2
MOVLW 10
MOVWF BIT
CALL DEL500US
BTFSC GP,3
GOTO OUT1
DECFSZ BIT
GOTO OUT1
GOTO OUT2
LP3 BTFSC GP,3
GOTO LP3
MOVLW 10
MOVWF BIT
CALL DEL500US
BTFSC GP,3
GOTO OUT3
DECFSZ BIT
GOTO OUT3
GOTO OUT4
CALL DEL500US
GOTO LOOP
OUT1 MOVLW 1
MOVWF GP1
BTFSS GP,3
GOTO OUT1
BCF GP,1
GOTO LP3
DECFSZ BIT
GOTO OUT1
MOVLW 0
MOVWF GP0
MOVWF GP1
RETURN
OUT2 MOVLW 1
MOVWF GP0
BTFSS GP,3
GOTO OUT2
BCF GP,0
RETURN
OUT3 MOVLW 0
MOVWF GP2
BTFSS GP,3
GOTO OUT3
BSF GP,2
GOTO LOOP
RETURN
OUT4 MOVLW 0
MOVWF GP5
BTFSS GP,3
GOTO OUT4
BSF GP,5
RETURN
DEL500US CLRF 1
DEL MOVLW 7
OPTION
MOVF 1,0
XORLW 02H
BTFSS STATUS,2
GOTO DEL
RETLW 0
END
发表时间:2003年4月15日10:57:40