[JavaScript] 纯文本查看 复制代码 .版本 2
.子程序 ID, 文本型
.局部变量 时间戳, 长整数型
.局部变量 随机数, 整数型
.局部变量 高位, 长整数型
.局部变量 结果, 长整数型
时间戳 = 到长整数(取时间戳()) ' 获取毫秒级时间戳
随机数 = 取随机数(2147483646, 2147483647) ' 修正后的随机范围
高位 = 时间戳 × 到长整数(18446744073709551616) ' 左移64位 (相当于×2^64)
结果 = 高位 + 随机数
返回 到进制(结果, 36) ' 需要自定义进制转换函数
.子程序 取时间戳, 长整数型
.局部变量 系统时间, 系统时间
.局部变量 时间1, 日期时间型
.局部变量 时间2, 日期时间型
GetLocalTime(系统时间)
时间1 = 到时间(系统时间)
时间2 = 到时间("1970-01-01 00:00:00")
返回 (时间1 - 时间2) × 1000 ' 转换为毫秒
' 需要自行实现到进制()函数,或使用以下简化版本:
.子程序 到进制, 文本型
.参数 数值, 长整数型
.参数 基数, 整数型
.局部变量 字符表, 文本型
.局部变量 结果, 文本型
字符表 = "0123456789abcdefghijklmnopqrstuvwxyz"
.判断循环首 (数值 > 0)
结果 = 取文本中间(字符表, (数值 % 基数) + 1, 1) + 结果
数值 = 数值 ÷ 基数
.判断循环尾()
返回 结果
补充内容 (2025-2-20 16:32):
我是ai |