• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.05
软件大小:21.6M
更新时间:07-04

按键精灵安卓版
立即下载

软件版本:3.3.0
软件大小:62.5M
更新时间:5-24

按键精灵iOS版
立即下载

软件版本:1.3.3
软件大小:29.2M
更新时间:06-14

按键精灵Mac版
立即下载

软件版本:1.1.0
软件大小:12.3M
更新时间:12-29

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
返回列表 12345678» / 15
发新话题 回复该主题

[按键精灵安卓版] 小知识点合集1 - 【201509期】 [复制链接]

1#

小知识点合集1





本文按键学院提供技术支持




按键学院交流①群(已满):376122403

按键学院交流②群(已满):372671254

按键学院交流③群(快满):170084238

按键学院安卓①群:115768679



写脚本的时候,总有一些事与愿违的地方,一个不经意的小地方,可能会令我们寻找半天才发现并且解决,将我们平时碰到的积累起来,是一笔不小的财富,积少成多,跟着我记下书写脚本的点点滴滴吧。




1. 输入框

我们在使用UI界面的输入框时,有这样一个选项:



当我们改成true时,我们知道,这代表这个输入框只能输入数字,但是我们获取到的就是一个数值吗?我们来尝试一下。

UI界面:

  1. 界面1:
  2. {
  3. 输入框:
  4. {
  5. 注释:"初始文本、文字大小、最大输入长度、高度、宽度是可选属性,如需使用默认值,可保持值为0或直接删除此属性",
  6. 名称:"输入框1",
  7. 提示内容:"提示用户应该输入什么内容",
  8. 仅输入数字:true,
  9. 文字大小:0,
  10. 最大输入长度:0,
  11. 高度:0,
  12. 宽度:600
  13. },
  14. }
复制代码
脚本源码:
  1. Dim 内容 = ReadUIConfig("输入框1")
  2. If 内容 = 1 Then
  3. TracePrint "你输入的是1"
  4. End If
复制代码
我们什么都不会得到,而如果改成:
  1. Dim 内容 = ReadUIConfig("输入框1")
  2. If 内容 = "1" Then
  3. TracePrint "你输入的是1"
  4. End If
复制代码
就可以正常显示,这说明,即使勾上了仅输入数字,我们得到的依旧是一个字符串,数字并不代表数值,一串由数字组成的数依旧是字符串,我们可以通过类型转换来改变数据类型。
  1. Dim 内容 = ReadUIConfig("输入框1")
  2. If CInt(内容) = 1 Then
  3. TracePrint "你输入的是1"
  4. End If
复制代码

2. 字符串处理

我们学习了字符串处理之后知道了,字符串可以提取,切割,合并,转换类型等。那么,我们可以用这些来做什么呢?发挥你的想象力,我们是不是可以对字符串进行处理后得到另一个字符串,再通过反过来的处理回到原始的数值,当然不一定能返回,但这不影响我们脑洞大开,尝试着做一个加密试试。

UI界面:

  1. 界面1:
  2. {
  3. 水平布局:
  4. {
  5. 注释:"用于将多个控件放在同一行",
  6. 文字框:
  7. {
  8. 注释:"文字大小、高度、宽度是可选属性,如需使用默认值,可保持值为0或直接删除此属性",
  9. 名称:"xiaohaomingzi",
  10. 显示内容:"注册码",
  11. 文字大小:0,
  12. 高度:0,
  13. 宽度:0
  14. },
  15. 输入框:
  16. {
  17. 注释:"文字大小、最大输入长度、高度、宽度是可选属性,如需使用默认值,可保持值为0或直接删除此属性",
  18. 名称:"注册码",
  19. 提示内容:"注册码",
  20. 仅输入数字:false,
  21. 文字大小:0,
  22. 最大输入长度:0,
  23. 高度:0,
  24. 宽度:500
  25. },
  26. },
  27. }
复制代码
脚本源码:
  1. Dim deviceID
  2. deviceID = GetDeviceID()
  3. TracePrint "本机的ID是:"&deviceID

  4. Dim 用户输入的注册码,正确口令

  5. 用户输入的注册码 = ReadUIConfig("注册码")
  6. TracePrint "用户输入的注册码是:" & 用户输入的注册码

  7. 正确口令 = 加密算法(deviceID)
  8. TracePrint "正确口令是:" & 正确口令

  9. If 用户输入的注册码 = 正确口令 Then
  10. TracePrint "口令正确"
  11. Else
  12. TracePrint "口令失败,退出脚本"
  13. EndScript
  14. End If



  15. Function 加密算法(参数)
  16. Dim MyVar = Mid(参数, 2, 5)
  17. Dim var(5)
  18. For i=1 to 5
  19. Dim Str = Mid(MyVar,i, 1)
  20. Dim Str1 = Asc(Str)
  21. var(i - 1) = Str1
  22. Next
  23. Dim MyString = Join(var, "")
  24. Dim fanzhuan = StrReverse(MyString)
  25. Dim fanzhuanjiequ = Mid(fanzhuan,1, 7)
  26. Dim strtonum = CInt(fanzhuanjiequ)
  27. Dim z = strtonum - 65535
  28. 加密算法 = CStr(z)
  29. End Function
复制代码
在输入框中随便写入一个数字,运行一遍试试:




我们根据提示,将输入框的内容改成正确口令的内容再一次尝试:





一个简单的加密就这么做好了。可能比较粗糙,有人可以轻易破解,但是我们的用户总不会人人都是大神~学到一点是一点!


最后编辑兄弟工程师13 最后编辑于 2015-09-29 17:20:36
本主题由 按键工程师 兄弟工程师13 于 2015/9/29 17:21:27 执行 移动主题 操作
2#

知识点合集1 - 【201509期】修改
高级编辑器高级编辑器

3#

dddddddddd

4#

nj摁着

5#

哈哈哈哈哈哈哈哈哈哈哈哈

6#

5555555555555555555555555

7#

实发

8#

我來看看].............

9#

感觉不错 支持下

10#

字符串测试学习

11#

213211233

12#

支持

13#


14#

11111111111111111

15#

看一下,学一学

16#

6666666666666

17#

123423

18#

好东西

19#

看看 好不

20#

挺有意思的,学习一下

发新话题 回复该主题