联网验证源代码
dim 返回值 = Url.Get("https://starcheng.xyz/test.html")
TracePrint 返回值
Dim 起始位置=UTF8.InStr(1,返回值,"<script>")
Dim 终点位置=UTF8.InStr(1,返回值,"</script>")
TracePrint 起始位置,终点位置
dim 字符串=UTF8.Mid(返回值,起始位置+8,终点位置-起始位置-8)
TracePrint 字符串
dim 秘钥=UTF8.Mid(字符串,1,8)
TracePrint 秘钥
Dim 加密=Encode.Md5(秘钥)
TracePrint 加密
If ReadUIConfig("输入框") = 加密 Then
TracePrint "激活码校验成功"
Else
TracePrint "激活码校验失败，退出脚本"
EndScript
End If参数热更新源代码
dim 白色=获取参数("粉红色=")
Function 获取参数(参数)
dim 返回值 = Url.Get("https://starcheng.xyz/test.html")
TracePrint 返回值
Dim 起始位置=UTF8.InStr(1,返回值,参数)
Dim 终点位置=UTF8.InStr(起始位置,返回值,"}")
Dim 长度=UTF8.Len(参数)
TracePrint 起始位置,终点位置
dim 字符串=UTF8.Mid(返回值,起始位置+长度,终点位置-起始位置-长度+1)
TracePrint 字符串
dim table = Cjson.Decode(字符串)
Dim 数组()
For Each k , v In table
数组(k)=v
Next
获取参数=数组
End Function
cs.单次图色查找 (白色)html源代码
<!DOCTYPE html>
<html>
<html lang="zh-CN">
<head>
<meta charset="UTF-8">
<title>橙苏博客</title>
</head>
<body>
<script>
var 版本={"0":1.1,"1":"https://starcheng.xyz/update.apk","2":20363815}
var 更新公告={"0":"1.新增XXXX功能","1":"2.修复XXXXBUG","2":"3.后续更新计划:1.XXXX,2.XXXXX"}
var 秘钥={"0":"147258369","1":"123456789","2":"abcdefgh"}
var 粉红色={"0":0,"1":"白色","2":1,"3":1,"4":0,"5":0,"6":5,"7":72,"8":726,"9":152,"10":807,"11":"FFFFFF-202020","12":0,"13":0.9}
</script>
</body>
</html>
