• slider image 442
  • slider image 483
  • slider image 484
  • slider image 485
  • slider image 486
  • slider image 487
:::


Browsing this Thread:   1 Anonymous Users






請幫我檢查一下問題
#1
新會員
新會員


查看用戶資訊
這程式是使用PIC16F877
PORTD是8顆LED做跑馬燈,
PORTB是4顆選擇按鈕,
按下B1.左移B2.右移B3.延遲變大B4.延遲變小,

左右移沒問題,但是延遲卻無法變化,
撿查許久都不知道問題所在
程式碼如下:

LIST P=16F877, R=DEC
INCLUDE <P16F877.INC>
CBLOCK H'20'
A,X,X1,X2,X3,X4
ENDC
ORG 0
NOP
BANKSEL TRISD
MOVLW 0
MOVWF TRISD
BANKSEL PORTD
MOVLW B'11111110'
MOVWF A
MOVWF PORTD
CALL DLY
MOVLW 100
MOVWF X
MOVLW 10
MOVWF X4

S1:
RLF A,W
RLF A,F
MOVF A
MOVWF PORTD
CALL DLY
BTFSC PORTB,2
GOTO S1
GOTO S2

S2:
RRF A,W
RRF A,F
MOVF A
MOVWF PORTD
CALL DLY
BTFSC PORTB,1
GOTO S2
GOTO S1

DLY:
MOVF X
MOVWF X1
BTFSS PORTB,4
GOTO A1
BTFSS PORTB,3
GOTO A2
GOTO AA

A1:
MOVF X1
ADDWF X4
MOVWF X1
GOTO AA

A2:
MOVF X1
SUBWF X4
MOVWF X1
GOTO AA

AA:
MOVF X1
MOVWF X

LL:
MOVF 10
MOVWF X2

L1:
MOVLW 50
MOVWF X3

L2:
DECFSZ X3
GOTO L2
DECFSZ X2
GOTO L1
DECFSZ X1
GOTO LL
RETURN

END

發表於: 2005/1/3 1:15
Twitter Facebook Google Plus Linkedin Del.icio.us Digg Reddit Mr. Wong 頂部







You can view topic.
不可以 發起新主題
You cannot reply to posts.
You cannot edit your posts.
You cannot delete your posts.
You cannot add new polls.
You cannot vote in polls.
You cannot attach files to posts.
You cannot post without approval.
You cannot use topic type.
You cannot use HTML syntax.
You cannot use signature.
You cannot create PDF files.
You cannot get print page.

[進階搜尋]


:::

Microchip連結

https://www.facebook.com/microchiptechnologytaiwan/
http://www.microchip.com.tw/modules/tad_uploader/index.php?of_cat_sn=13
https://mu.microchip.com/page/tmu
http://elearning.microchip.com.tw/modules/tad_link/index.php?cate_sn=1
https://page.microchip.com/APAC-PrefCenters-TW.html
http://www.microchip.com/
http://www.microchip.com/treelink
http://www.microchipdirect.com/
http://www.microchip.com.cn/newcommunity/index.php?m=Video&a=index&id=103
http://www.microchip.com.tw/modules/tad_uploader/index.php?of_cat_sn=2
http://www.microchip.com.tw/Data_CD/eLearning/index.html
http://www.microchip.com.tw/RTC/RTC_DVD/
https://www.microchip.com/development-tools/
https://www.youtube.com/user/MicrochipTechnology
[ more... ]

教育訓練中心

!開發工具購買
辦法說明 [業界客戶] [教育單位]
----------------------------------
!校園樣品申請
辦法說明 [教師資格] [學生資格]
----------------------------------