|
|
发表于 2026-3-29 18:23:02
|
显示全部楼层
[@main]
#ACT
GetRandomText ..\\QuestDiary\\测试.txt s$验证码
DELAYGOTO 10000 @输入超时
#SAY
10秒内输入验证码:<<$STR(s$验证码)>|点击复制/@@CopyToClipboard1>\\
<点击输入/@@InPutString10>
[@CopyToClipboard1]
#ACT
SENDMSG 6 验证码已复制
[@InPutString10]
#IF
EQUAL S10 <$STR(s$验证码)>
#ACT
CLEARDELAYGOTO
MessageBox 输入正确
break
#ELSEACT
goto @main
MessageBox 输入错误,重新输入
break
[@输入超时]
#ACT
KICK |
|