上文中我們講述了PIC單片機基礎(chǔ)學(xué)習(xí)之程序設(shè)計(一)，接下來將繼續(xù)為大家講解PIC單片機程序設(shè)計(二),供大家學(xué)習(xí)。
PIC單片機的查表程序可以利用子程序帶值返回的特點來實現(xiàn)。具體是在主程序中先取表數(shù)據(jù)地址放入W，接著調(diào)用子程序，子程序的第一條指令將W置入PC，則程序跳到數(shù)據(jù)地址的地方，再由“RETLW”指令將數(shù)據(jù)放入W返回到主程序。下面程序以F10放表頭地址。
　　　　　　MOVLW 　TABLE 　　　??；表頭地址→F10 　
　　　　　　MOVWF 　10
　　　　　　　　　 ┋
　　　　　　MOVLW　 1 　　　　　　　；1→W，準(zhǔn)備取“1”的線段值
　　　　　　ADDWF 　10，1 　　　　??；F10+W =“1”的數(shù)據(jù)地址
　　　　　　CALL　 CONVERT
　　　　　　MOVWF 　6 　　　　　　??；線段值置到B口，點亮LED
　　　　　　　　　 ┋
　　CONVERT MOVWF　 2　　　　　　　 ；W→PC TABLE
　　　　　　RETLW 　0C0H 　　　　??；“0”線段值
　　　　　　RETLW 　0F9H 　　　　?。弧?”線段值
　　　　　　　　　 ┋
　　　　　　RETLW 　90H 　　　　　　；“9”線段值
　　 9)“READ……DATA，RESTORE”格式程序
　　“READ……DATA”程序是每次讀取數(shù)據(jù)表的一個數(shù)據(jù)，然后將數(shù)據(jù)指針加1，準(zhǔn)備取下一個數(shù)據(jù)。下例程序中以F10為數(shù)據(jù)表起始地址，F(xiàn)11做數(shù)據(jù)指針。
　　　　　　POINTER 　EQU 　11 　　；定義F11名稱為POINTER
　　　　　　　　　 ┋
　　　　　　MOVLW 　　DATA
　　　　　　MOVWF 　　10 　　　??；數(shù)據(jù)表頭地址→F10
　　　　　　CLRF 　　POINTER 　?。粩?shù)據(jù)指針清零
　　　　　　　　　 ┋
　　　　　　MOVF 　　POINTER，0 　
　　　　　　ADDWF 10，0 　　　　??；W =F10+POINTER
　　　　　　　　　 ┋
　　　　　 INCF 　　　POINTER，1 ??；指針加1
　　　　　 CALL CONVERT 　　　　?。徽{(diào)子程序，取表格數(shù)據(jù)
　　　　　　　　　 ┋
　　CONVERT MOVWF　　 2 　　　；數(shù)據(jù)地址→PC
　　DATA 　RETLW 　　20H 　　　；數(shù)據(jù)
　　　　　　　　　 ┋
　　　　　 RETLW 15H 　　　　　；數(shù)據(jù)
　　如果要執(zhí)行“RESTORE”，只要執(zhí)行一條“CLRF POINTER”即可。
　　10) PIC單片機 延時程序
　　如果延時時間較短，可以讓程序簡單地連續(xù)執(zhí)行幾條空操作指令“NOP”。如果延時時間長，可以用循環(huán)來實現(xiàn)。下例以F10計算，使循環(huán)重復(fù)執(zhí)行100次。
　　　　　 MOVLW D‘100’
　　　　　 MOVWF 10
　　LOOP 　DECFSZ 10，1 　　；F10—1→F10，結(jié)果為零則跳
　　　　　 GOTO LOOP
　　　　　　 ┋
　　延時程序中計算指令執(zhí)行的時間和即為延時時間。如果使用4MHz振蕩，則每個指令周期為1μS。所以單周期指令時間為1μS，雙周期指令時間為2μS。在上例的LOOP循環(huán)延時時間即為：（1+2）*100+2=302（μS）。在循環(huán)中插入空操作指令即可延長延時時間：
　　　　　　MOVLW 　D‘100’
　　　　　　MOVWF 　10
　　LOOP 　　NOP
　　　　　　 NOP
　　　　　　 NOP
　　　　　　DECFSZ 10，1
　　　　　　GOTO LOOP
　　　　　　　 ┋
　　延時時間=（1+1+1+1+2）*100+2=602（μS）。
　　用幾個循環(huán)嵌套的方式可以大大延長延時時間。下例用2個循環(huán)來做延時：
　　　　　　MOVLW 　　D‘100’
　　　　　　MOVWF 　　10
　　LOOP　　MOVLW 　　D‘16’
　　　　　　MOVWF 　　11
　　LOOP1 　DECFSZ 　　11，1
　　　　　　GOTO 　　　LOOP1
　　　　　　DECFSZ 　　10，1
　　　　　　GOTO LOOP
　　　　　　 ┋
　　延時時間=1+1+[1+1+（1+2）*16-1+1+2]*100-1=5201（μS）