Page 169 -
P. 169
實驗 15-3 瓦斯感測器～使用 TGS 800 實驗
功能：將瓦斯感測值顯示於埠 1 之 LED 上
開關設定：SW2-2、SW4-4=ON，VR9 瓦斯感測靈敏度調整，VR10 瓦斯感測值調整
程式：
ORG 00H
JMP START
ORG 03H
JMP INDATA
START：
MOV DPTR,#8030H
MOVX @DPTR,A
AGAIN：
MOV A,#0FFH
MOVX @DPTR,A
MOV IE,#81H
WAIT：
JNZ WAIT
JMP AGAIN
INDATA：
MOVX A,@DPTR
MOV R6,A
CPL A
ADD A,#32
JNC INDATA1
MOV A,#80H
MOV P1,A
JMP OUT
INDATA1：
MOV A,R6
CPL A
ADD A,#64
JNC INDATA2
MOV A,#0C0H
MOV P1,A
JMP OUT
INDATA2：
MOV A,R6
CPL A
ADD A,#96
