Gob引擎20201001功能更新脚本

//更新日志 2020.10.01
━━━━━━━━━━━━━━━━━━━━

[!] 取消使用CUT切割的时候M2的打印提示
[!] 彻底使用封杀WPE外挂复制金币的bug。
[!]
修正同屏假人较多时，偶尔提示TAIPlayObject.Run 6的问题。
[!] 解决在部分脚本命令中踢掉角色导致的引擎异常。
[+]
新增脚本命令SECKILL ，用于可以将怪物秒杀，实现一刀一个怪。
SECKILL 秒杀概率 秒杀怪物最高级别
持续时间
<$SecKillRate> //秒杀概率
<$SecKillTime> //
持续时间
<$SecKillLevel> //秒杀怪物最高等级
[@SECKILL]
#ACT
SECKILL
100 100000 3600
sendmsg 5
<$SecKillRate>/<$SecKillTime>/<$SecKillLevel>
[!]
修改怪物叠加N个不散开的问题。

[+] 增加一个查看他人装备触发功能脚本的[@QueryUserState]，同时<$PARAM(0)> 返回被查看的角色名称

[@QueryUserState]
#IF
ISADMIN
#SAY
尊金的GM，<$PARAM(0)>目前等级是<$HUMANINFO[$PARAM(0)].$LEVEL>\
元宝：<$HUMANINFO[$PARAM(0)].$GAMEGOLD>
<踢掉角色/@踢掉角色>
[@踢掉角色]
#IF
ISADMIN
#ACT
<$PARAM(0)>.KICK
[+]
新增脚本命令：LeftStr 获取字符串的左边几位，一个汉字为2个字符，汉字可能会被截断。
LeftStr 原字符串 截取长度
保存变量
[@LeftStr]
#IF
TRUE
#ACT
MOV S1 GAMEOFBLUE
LeftStr s1 6
s2
sendmsg 5 <$str(s2)>
结果是：GAMEOF
[+] 新增脚本命令：RightStr
获取字符串，从右边开始数。
RightStr 原字符串 截图长度
保存变量
[@LeftStr]
#IF
TRUE
#ACT
MOV S1 GAMEOFBLUE
RightStr s1 6
s2
sendmsg 5 <$str(s2)>
结果是：OFBLUE
[+] 新增脚本命令MidStr
截取指定长度的字符串。
MidStr 原字符串 开始截取位置(从1开始，写1就是从第一位开始，包含第一位) 截取长度
保存变量
[@LeftStr]
#IF
TRUE
#ACT
MOV S1 GAMEOFBLUE
MidStr s1 6 4
s2
sendmsg 5 <$str(s2)>
结果是：FBLU
[+]
新增GetMD5计算指定字符串的MD5密码串，MD5不可逆，可以加密保存一些玩家的二级密码等数据。
GetMD5 原字符串
保存字符串
[@GetMD5]
#IF
TRUE
#ACT
MOV S1 GAMEOFBLUE
GetMD5 s1
s2
sendmsg 5
<$str(s2)>
结果：A4CBF3739A6E1446E06EC07BF1E3A899
[+]
新增脚本命令：EnString 支持使用多种加密算法对字符进行加密，同时可使用DEString进行解密。
EnString 加密类型 源字符串
密码 保存结果
DEString 解密类型 需解密字符 密码 保存解密结果
类型：目前为如下几种，直接写名字即可
Gost，Mars，Ice Des， blowfish
，twofish
[@EnString]
#IF
TRUE
#ACT
MOV S1
GAMEOFBLUE
EnString Des s1 Mir2 S2
sendmsg 5
<$str(s2)>
;结果：nm8qpxs0ua+bWg==
EnString Des s2 Mir2 S3
sendmsg 5
<$str(s3)>

[+] ADDNAMEDATETIMELIST增加会员时间 文件名称 天 时
分
[@main]
#ACT
ADDNAMEDATETIMELIST ..\QuestDiary\会员名单.txt 30 2
3
#ACT
SENDMSG 6 增加30天2小时3分 255 253

[+] CHECKNAMEDATETIMELIST 检测会员剩余时间 文件名称 过期是否删除(0不删除 1删除) 变量1(到期时间 字符变量)
变量2(剩余天数 数字变量) 变量3(剩余小时 数字变量) 变量4(剩余分钟
数字变量)
[@main]
#IF
CHECKNAMEDATETIMELIST ..\QuestDiary\会员名单.txt 1 S$1
N$1 N$2 N$3
#ACT
SENDMSG 5
你的会员到期时间是<$STR(S$1)>【剩余天数=<$STR(N$1)>】【剩余小时=<$STR(N$2)>】【剩余分钟=<$STR(N$3)>】
255 253
#ELSEACT
SENDMSG 6 你不是会员或已过期，请及时充值！ 255 253

删除会员还是使用原来的老命令DELNAMEDATELIST

[!] 优化脚本错误提示，提示脚本错误的脚本内容。

[+]
增加第二个条件爆率模式，支持爆率触发脚本进行设置是否爆出该物品。
原来的条件爆率依旧支持，GM自行二选一即可。
格式：
1/1000 战神项链
1
@战神项链掉落检测
当战神项链掉落是会触发功能脚本(QF)的[@战神项链掉落检测]标签
GM可以写脚本进行操作设置是否允许掉落，标签内写任何检测脚本。
如允许掉落必须使用Monitem命令设置是允许掉落，否则将不会掉落。
如不设置则不会掉落，同时标签内不要过于复杂的脚本或者执行文件IO操作。
同时标签下返回如下参数(只能在本标签下检测，离开本标签将无效)
<$PARAM(0)>
掉落怪物名字
<$PARAM(1)> 掉落地图编号
<$PARAM(2)>
地图名称
<$PARAM(3)> 掉落怪物等级
<$PARAM(4)> 物品名称
Monitem 1
//允许掉落
MonItem 0
//禁止掉落
示例1
[@战神项链掉落检测]
#IF
TRUE
#ACT
SENDMSG 5
掉落怪物名字：<$PARAM(0)>
SENDMSG 5 掉落地图编号：<$PARAM(1)>
SENDMSG 5
地图名称：<$PARAM(2)>
SENDMSG 5 掉落怪物等级：<$PARAM(3)>
SENDMSG 5
物品名称：<$PARAM(4)>
#IF
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD –
1000
Monitem 1
#ELSEACT
MonItem
0
示例2
[@战神项链掉落检测]
#OR
CHECKGAMEGOLD > 10000
CHECKLEVELEX
> 55
#ACT
Monitem 1
#ELSEACT
MonItem
0
示例3
[@战神项链掉落检测]
#IF(2)
CHECKGAMEGOLD >
10000
CHECKLEVELEX > 55
CHECKVAR HUMAN 充值点数 >
1000
#ACT
Monitem 1
#ELSEACT
MonItem
0
示例4
[@战神项链掉落检测]
#IF
CHECKGAMEGOLD <
1000
#ACT
;MonItem 0 这行可省略不写
BREAK
#IF
CHECKGAMEGOLD >
10000
#ACT
Monitem 1
#ELSEACT
MonItem 0

[!] 优化FILLTEXT命令增加对S$变量支持。

[@FILLTEXT]
#ACT
MOV S1 GOB
MOV S2
MIR2
;将S1在左边填充空格到10个长度(右对齐)。
FILLTEXT S1 10
1
;将S1在右边填充空格到10个长度(左对齐)。
FILLTEXT S2 10
sendmsg 5
/<$str(s1)>/<$str(s2)>

MOV S$1 asdf
MOV S$2 asdf

;在左边填充空格到10个长度(右对齐)。
FILLTEXT S$1 10 1
;在右边填充空格到10个长度(左对齐)。
FILLTEXT
S$2 10
sendmsg 5 /<$str(s$1)>/<$str(s$2)>

[!] 优化GetListStringEx命令，增加对;过滤