Microsoft Word - 透析8051之迴圈控制方法.doc

Size: px

Start display at page:

Download "Microsoft Word - 透析8051之迴圈控制方法.doc"

裔柳
5 years ago
Views:

1 透析 8051 之分支跳躍與迴圈控制 - 利用 VB 的程式觀念解說迴圈的控制方法不失為寫程式最重要的技巧之所在之一, 它搭配邏輯運算的判斷作為迴圈繼續執行的判斷依據, 程式設計師必須考量分析所有可能的情況, 然後給予不同的條件, 當條件成立時執行某段程式, 不符合時執行另一段程式, 然後重複某項任務, 直到使用者中斷程式的執行, 或是條件喪失時才跳出迴圈也可能一個程式重複著無止盡的迴圈, 直到關閉電源為止, 等有鑑於此, 以下的控制方法, 是程式設計必須學會的 : 如何控制迴圈? 可以使用那些控制迴圈的指令? 邏輯判斷式的表示? 掌控程式流向的方法? 茲特別整理出來相關的指令及範例, 綜合幾種不同的常用作法, 利用高階語言的語法來對照, 透過 VB 的判斷式迴圈控制語法來說明, 相信能給你更方便的學習 8051 的程式寫作, 也因此進一步對學習市面上任何其它種類的微電腦程式語言, 均可以舉一而反三, 靈活應用於程式寫作 VB 語言有關迴圈邏輯判斷式分支跳躍及程式呼叫等語法, 列表說明 VB 指令語法格式說明 Goto GoSub Return : Goto GoSub MyRoutine MyRoutine: Return 無條件的重複執行呼叫同一 Sub 中的副程式 MyRoutine 副程式返回後繼續執行 GoSub 之後的陳述式副程式 ( 與呼叫程序同 Sub) 結束副程式, 返回呼叫程式 If..Then..Else If < 條件 > Then Else End IF 邏輯判斷式, 控制執行路徑當 < 條件 > 成立, 執行, 否則, 執行 For...Next For i= 初值 To 終值 Step 增量 Next 明確指定變數 i 的初值終值增量控制執行敘述的次數

2 While While < 條件 > Do While.. Do Until.. Select Case Do While < 條件 > Do While < 條件 > Do Until < 條件 > Do Until < 條件 > Select Case n Case 1 Case 2 End Select 先測試後執行 : 當 < 條件 > 成立, 則重複執行先測試後執行 : 當 < 條件 > 成立, 則重複執行先執行後測試 : 先執行, 再判斷是否繼續執行當 < 條件 > 成立, 則重複執行先測試後執行 : 當 < 條件 > 不成立, 則重複執行先執行後測試 : 先執行, 再判斷是否繼續執行當 < 條件 > 不成立, 則重複執行多選一當符合條件 1, 執行當符合條件 2, 執行 8051 有關迴圈邏輯判斷式分支跳躍及程式呼叫等語法, 列表說明 8051 指令語法範例說明 JMP JB bit,rel JNB bit,rel JMP LOOP JB BIT1,LOOP1 JNB BIT1,LOOP1 無條件的重複執行當 BIT1=1, 則跳至 LOOP1, 否則, 執行 BIT1: 凡符合位元定址之位元均屬之, 如 20h.1,2fh.3,P0.7,PSW.0 (Jmp to LOOP1 if BIT1=1) 當 BIT1=0( 即不為 1), 則跳至 LOOP1, 否則, 執行 (Jmp to LOOP1 if BIT1<>1)

3 JBC bit,rel JC rel JNC rel JZ rel JNZ rel CJNE data1,data2,rel DJNZ data1,rel JBC BIT1,LOOP1 JC LOOP1 JNC LOOP1 JZ LOOP1 JNZ LOOP1 CJNE A,#01,LOOP1 DJNZ R0,LOOP 當 BIT1=1, 則跳至 LOOP1, 執行, 並清除此 bit 為 0 否則, 執行 (Jmp to LOOP1 if BIT1=1,Clear BIT1) 運算後, 當進位旗標 C=1, 則跳至 LOOP1 否則, 執行 (Jmp to LOOP1 if C=1) 運算後, 當沒有進位時,C=0( 即不為 1), 則跳至 LOOP1 否則, 執行 (Jmp to LOOP1 if C<>1) 運算後, 當零旗標 Z=1, 則跳至 LOOP1 否則, 執行 (Z=1 表示運算結果使 ACC=0) Z 旗標只對 ACC 判斷 (Jmp to LOOP1 if Z=1) 運算後, 當零旗標 Z=0, 則跳至 LOOP1 否則, 執行 (Z=1 表示運算結果使 ACC=0) (Jmp to LOOP1 if Z<>1) 比較 (Compare) 兩值是否不相等, 當 ACC 的值不等於 1, 則跳至 LOOP1 執行, 否則, 執行 data1: 可以是 A Rn data2: 可以是 #data,direct (jmp to LOOP1 if ACC<>#01) R0=R0-1, 並判斷是否為 0, 當 R0<>0, 跳回 LOOP 繼續執行否則, 往下執行 data1: 可以是 Rn direct (R0=R0-1, jmp to LOOP if R0<>0)

4 8051 與 VB 之相似對照範例項目 8051 VB 說明 1 2 P0=A INC A MOV A,R0 SUBB A,#10 JC MyRoutine Next: P0=A JMP Other MyRoutine: INC A JMP Next Other: 3 JB BIT1,S1 JMP S2 S1: ACALL SUB1 JMP Next S2: ACALL SUB2 Next: Sub1() Print A GOTO LOOP If N<10 Then GoSub MyRoutine Print N Exit Sub MyRoutine: N = N+1 Return End Sub IF BIT1=1 THEN CALL SUB1 ELSE CALL SUB2 ENDIF 無條件跳躍無盡迴圈當 A-10 產生借位 (C=1) 則表示變數值小於 10 狀況一 : 當 N<10, 則執行副程式 N+1 後返回並輸出狀況二 : 若 N>=10, 則直接輸出當 BIT=1, 跳 S1 否則, 跳 S2 副程式呼叫 SUB1 返回後跳 Next 繼續向下執行副程式呼叫 SUB2 4 SUBB A,#1 JZ S1 JMP S2 S1: ACALL SUB1 JMP Next S2: ACALL SUB2 Next: ACC=ACC-1 IF ACC=0 THEN CALL SUB1 ELSE CALL SUB2 ENDIF JZ 指令 : 判斷 ACC 是否為 0 是, 則零旗標 Z=1, 跳 S1, 呼叫副程式 1 否則, 跳 S2, 呼叫副程式 1 5 MOV R0,#10 INC A DJNZ R0,L1 FOR I=1 TO 10 NEXT R0 訂定迴圈次數 =10 次以 DJNZ 遞減 1 後判斷是否為 0

5 6 MOV R0,#0 MOV A,#0 ADD A,R0 INC R0 INC R0 CJNE R0,#22,L1 MOV P0,A 7 MOV R0,#20 MOV A,#0 ADD A,R0 DEC R0 DJNZ R0,L1 MOV P0,A 8 CLR C JC L2 ADD A,#1 L2: MOV P0,A 9 CLR C JNC L2 JMP L3 L2: ADD A,#1 L3: MOV P0,A 10 MOV R1,#2 CJNE R1,#1,L2 MOV P0,#1 L2: CJNE R1,#2,L3 MOV P0,#2 L3: CJNE R1,#3,L4 MOV P0,#3 L4: 11 BIT1 EQU 20H.0 CLR BIT1 CPL BIT1 N=0 Sum=0 While N<=20 Sum=Sum+N N=N+2 Print Sum N=0 Sum=0 Do While N<=20 Sum=Sum+N N=N+2 Print Sum C=0 DO While C=0 IF A>255 THEN C=1 LOOP Print A C=0 Do Until C=1 IF A>255 THEN C=1 Print A Select Case n Case 1 Print 1 Case 2 Print 2 Case 3 Print 3 End Select Dim BIT1 As Boolean BIT1=False While (1) BIT1=Not BIT1 變數 N=0 總和 =0 計算 Sum= 用 CJNE 判斷已執行迴圈數注意 :( 先加 2 後判斷 ) 與 ( 先判斷後加 2) 之區別與上一項目同功能, 唯作法不同用 DJNZ 判斷已執行迴圈數 VB: 以 Do While 完成相同的功能 8051 為 8 位元, 當 ACC 超過 255=256 時, 使進位旗標 C=1, 並使 ACC=0 以 JC 是否進位判斷迴圈之執行功能同上以 JNC 判斷, 直到產生進位為止 VB: 以 Do Until 完成相同的功能多選一判斷式 : 當 R1=1, 輸出 1 當 R1=2, 輸出 2 當 R1=3, 輸出 3 定義布林數 ( 位元定址 ) 初值設定無盡迴圈反相

6 L2: JNB BIT1,L2 MOV P0,#0H Call Delay MOV P0,#0FFH Call Delay1s IF BIT1 THEN ACC= 00h Else ACC= FFh End If Label1=ACC Call Delay1s 當 BIT1=True 輸出 00 當 BIT1=False 輸出 FF 輸出, 並延時 1 秒 12 MOV A,#0 JB ACC.0,L1 MOV P0,#00H JMP L2 MOV P0,#0FFH L2: INC A CALL Delay JMP LOOP A=0 While (1) IF A MOD 2=0 THEN ACC= 00h Else ACC= FFh End if Label1=ACC Call Delay1s 初值設定無盡迴圈當 A= 偶數, 輸出 00 當 A= 奇數, 輸出 FF ( 偶數 : 最低位元 LSB=0) ( 奇數 : 最低位元 LSB=1) 輸出, 並延時 1 秒

Microsoft PowerPoint - chap5.ppt

Microsoft PowerPoint - chap5.ppt 邏輯運算指令的動作 0 1 0 1 0 0 1 1 OR 1 0 1 1 1 0 0 1 1 1 1 1 1 0 1 1 (a) OR 運算 0 1 0 1 0 0 1 1 XOR 1 0 1 1 1 0 0 1 1 1 1 0 1 0 1 0 (c) XOR 運算希望設定為 1 的位元罩網標的位元組新標的位元組不改變的位元希望取補數的位元罩網標的位元組新標的位元組不改變的位元 1