安卓按键精灵脚本命令-验证激活码封装

//===========================验证码封装===========================

//———-验证

Function 验证验证码
    Dim 设备imsi号,机器码
    设备imsi号 = CInt(UTF8.right(DEVICE.GetImsi(), 5) * 25)
    机器码= DEVICE.GetImsi()
    TracePrint 设备imsi号
    If 验证码 = 设备imsi号 Then 
           For miao = 4 to 1 step -1
            ShowMessage "验证成功" & miao & "秒"
            Delay 1000
        Next
        TracePrint "验证成功"
               
    Else 
        For miao = 6 to 1 step -1
            ShowMessage "验证失败" & miao & "秒"
            Delay 1000
        Next
        UI.NewLayout ("获取机器码")
        UI.AddEditText "获取机器码", "机器码", 机器码
        UI.AddTextView "获取机器码", "文字控", "单击继续按钮可复制机器码"
        UI.Show ("获取机器码")
        sys.SetClipText 机器码
        Delay 7000
        EndScript      
    End If       
End Function

//Dim 验证码 = CInt(ReadUIConfig("验证码"))//验证码

If 验证码 = 验证验证码() Then 
 TracePrint "失败"
     Else 
   Call 主程序()
End If