若熟悉了代码,完全可以升级一下代码实现双稳态控制,即摸一下就可以改变灯的亮灭;或再升级一下实现双击或长按等功能,然后与前面的呼吸跑马灯结合起来,就很酷了。
这讲的触摸控制跟按键控制实现的效果一模一样,只是我觉得按键太简单,触摸好玩一点哈哈。
附上esp32的引脚图:
可以看到我的14引脚不是乱设的,esp32的引脚只有8个支持touch,就是上面的T0-T7,我们还可以发现有各种AD、DA、SD等功能,等着你去玩耍。
ADC
下面我们来看一个有趣的ADC实验,即模拟和数字的转换。效果是通过旋转电位器从而控制灯的亮度,这是呼吸灯的升级版:
from machine import Pin, PWM, ADC #引入ADC模块
from time import sleep
frequency = 5000
led = PWM(Pin(12), frequency)
pot = ADC(Pin(34)) #定义34脚为ADC脚,可以读取模拟电压
potwidth(ADCWIDTH_12BIT) #读取的电压转为0-4096
potatten(ADCATTN_11DB) #输入电压0-33v
while True:
pot_value = potread() //4 #使读取的电压变为0-1024
print(pot_value) #打印出读取到的电压以便调试
if pot_value < 15:
ledduty(0)
else:
ledduty(pot_value) #通过读取电位器的电压调节灯的占空比
sleep(01) #每100ms读取一次
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18BUFFER DB 10 DUP();BUFFER存放8个不确定数
augend DB 2 DUP() ;被加数
addend DB 2 DUP() ;加数
msg1 DB 0DH,0AH,'请输入被加数: $'
msg2 DB 0DH,0AH,'请输入加数: $'
msg3 DB 0DH,0AH,'结果: $';msg3存放结果
;0DH和0AH分别是回车和换行的ASCII码,
;'$'是DOS功能调用INT 21H中9号功能要求的要显示字符串的结束标志
CODE
START: MOV AX,@DATA
MOV DS,AX
MOV ES,AX
CLD ;方向标志位清零 ;CLD与STD是用来 *** 作方向标志位DF(Direction Flag)。
;CLD使DF复位,即DF=0,STD使DF置位,即DF=1用于串 *** 作指令中
NOP ;空 *** 作 ;NOP指令只使程序计数器PC加1,所以占用一个机器周期
;其目的为保证写、读之间有个稳定时间
MOV AH,00H
MOV AL,03H
INT 10H ;清屏
START1: MOV AH,09H ;9号调用DX指向被加数的首地址,输出提示信息
LEA DX,msg1 ;将源 *** 作数给出的有效地址传送到指定的的寄存器中
INT 21H
LEA DI,augend ;DI->augend的首地址
MOV CX,4 ;按键次数
CALL GetBCDKey ;得到双字节十进制数(被加数)
JNB START2 ;没有输入任何数字,结束 CF=0
MOV AH,09H ;9号调用DX指向加数的首地址
LEA DX,msg2 ;将源 *** 作数给出的有效地址传送到指定的的寄存器中
INT 21H
LEA DI,addend ;di指向加数
MOV CX,4 ;按键次数
CALL GetBCDKey ;得到双字节十进制数(加数)
JNB START2 ;没有输入任何数字,结束
MOV AL,augend ;被加数的低8位送al
ADD AL,addend ;al与加数的低位相加的结果送al
DAA ;BCD算术运算调整,转换为压缩型BCD
XCHG AL,AH ;高位与低位互换
MOV AL,augend + 1
ADC AL,addend + 1 ;高位
DAA
XCHG AL,AH
MOV BL,0
ADC BL,0 ;进位 bl存放的是进位 bl和ax相加是最后的结果
STD ;方向标志置1
LEA DI,BUFFER+4 ;存放显示结果
CALL B1toB2 ;低位
MOV AL,AH
CALL B1toB2 ;高位
MOV AL,BL
OR AL,30H ;转换成数字
STOSB ;存数
LEA SI,BUFFER
MOV CX,5
CALL BlackDisplay ;将高位0消隐
MOV AH,09H
LEA DX,msg3 ;9号调用DX指向结果的首地址
INT 21H
MOV AH,09H
LEA DX,BUFFER ;9号调用DX指向BUFFER的首地址
INT 21H
JMP START1 ;跳转到START1
START2: MOV AH,4CH ;结束程序
INT 21H
; JMP $
;将一个字节压缩BCD码转换成二个字节数字
B1toB2 PROC NEAR ;段内
PUSH AX ;ax存放的是相加后的结果
AND AL,0FH ;高四位置0
OR AL,30H ;加30H
STOSB ;存数 个位 百位
POP AX
AND AL,0F0H ;低四位置0
ROR AL,4 ;循环右移4位
OR AL,30H ;加30H
STOSB ;存数 十位 千位
RET
B1toB2 ENDP
BlackDisplay PROC NEAR
CLD ;方向标志清零
MOV DI,SI ;si送给di si指向buff的第一个缓冲区 增量变化
BlackDisplay1: LODSB ;将高位0消隐,取串
CMP AL,'0'
JNZ Exit ;若al不等于0跳转EXIT
LOOP BlackDisplay1 ;否则cx不为0一直循环 cx次
INC CX ;cx加1
Exit: DEC SI ;si前移
REP MOVSB ;重复传送字节
MOV AL,'$' ;把$符送al
STOSB ;存数
RET
BlackDisplay ENDP
GetBCDKey PROC NEAR
LEA SI,BUFFER
MOV AL,4 ;把4写入到buff
MOV [SI],AL ;是内存单元
MOV DX,SI
MOV AH,0AH ;dx指向缓冲区
MOV AL,02H ;0:任意字符 1:16进制数 2:10进制数,10进制数输入
INT 21H
GetBCDKey1: LODSB ;ds:si->al
AND AL,0FH ;高4位清零
CMP CX,1 ;
JE GetBCDKey2
DEC CX ;进数位-1
MOV AH,AL
LODSB
AND AL,0FH
SHL AL,4 ;逻辑左移4位
OR AL,AH ;
GetBCDKey2: CLD
STOSB ;存串指令
STD
LOOP GetBCDKey1 ;cx=2 原先为4 上面减了一次一 loop再减一所以等于2
MOV CL,[BUFFER]
SUB CL,[BUFFER+1]
SHR CL,1 ;逻辑右移1位
MOV AL,0
CLD
REP STOSB ;重复存数
STC ;进位标志位置1
RET
GetBCDKey3: CLC ;进位标志位清零cf=0
RET ;返回
GetBCDKey ENDP
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)