防脱机（带自定义按钮不带版）适配GOM引擎

腾飞论坛 发表于 2018-5-25 15:46:45

防脱机（带自定义按钮不带版）适配GOM引擎

脚本比较多需要回复下载压缩包
此脚本免费发布回复即可下载

[@Login]
#if
#act

VAR Integer HUMAN 脱机杀怪个数
VAR Integer HUMAN 脱机验证错误
VAR Integer HUMAN 脱机怪物数量
LOADVAR HUMAN 脱机杀怪个数 ..\QuestDiary\标记数据\综合数据每日清理.txt
LOADVAR HUMAN 脱机验证错误 ..\QuestDiary\标记数据\综合数据每日清理.txt
LOADVAR HUMAN 脱机怪物数量 ..\QuestDiary\标记数据\综合数据每日清理.txt
SETONTIMER 1 1

#IF
not checknamelist ..\QuestDiary\标记数据\玩家名称.txt
#act
ADDNAMELIST ..\QuestDiary\标记数据\玩家名称.txt

#if
checkvar human 脱机怪物数量 =
#act
MOVR N$脱机怪物数量 88 188
CALCVAR HUMAN 脱机怪物数量 = <$str(N$脱机怪物数量)>
SAVEVAR HUMAN 脱机怪物数量 ..\QuestDiary\标记数据\综合数据每日清理.txt

#if
checkvar human 脱机杀怪个数 = <$human(脱机怪物数量)>
#act
CALCVAR HUMAN 脱机验证错误 = 0
SAVEVAR HUMAN 脱机验证错误 ..\QuestDiary\标记数据\综合数据每日清理.txt
MOV S$脱机验证码
MOV N$脱机验证码秒 0
MOV S34
GETRANDOMLINETEXT ..\QuestDiary\标记数据\玩家名称.txt <$str(S$脱机验证码)>
MOV N$脱机验证码秒 60
SETONTIMER 21 1
break

;==================================防脱机验证码===========================
[@OnTimer21]
#if
#act
#call [\功能脚本\进图设置\脱机正文.txt] @脱机正文

[@OnTimer1]

#IF
not checknamelist ..\QuestDiary\标记数据\脱机人员.txt
CheckHumInRange 3 324 312 6
#act
mapmove 3 333 333
MessageBox [非法提示]：您进入非法区域，小心遭同样罪名。请远离
#IF
checknamelist ..\QuestDiary\标记数据\脱机人员.txt
not CheckHumInRange 3 324 312 5
#act
DELBUTTON 16
CloseBigDialogBox
close
mapmove 3 324 312
MessageBox [系统提示]：系统判定您为脱机状态，晚上24点解封

**** Hidden Message *****

sunchong 发表于 2018-6-6 12:20:44

看帖必回是美德

77303601 发表于 2018-8-8 18:28:48

打撒sadsadsadsadsad打撒十大sad

三八你好 发表于 2018-9-4 22:38:58

大大大大大大大大大大大大大

psufnul 发表于 2018-10-19 20:43:05

15011018 发表于 2018-12-1 16:18:56

15011018，如果您要查看本帖隐藏内容请回复
15011018，如果您要查看本帖隐藏内容请回复

超级小虫 发表于 2018-12-9 10:43:03

谢谢分享，议长了了了　

13646239582 发表于 2019-2-21 20:54:50

z1214r2353e4

15309072075 发表于 2019-3-13 20:34:58

:loveliness::loveliness::loveliness:

manyi5481830 发表于 2019-3-14 23:43:07

GOM引擎九尾简单假人完整脚本

页: [1] 2

腾飞论坛's Archiver

防脱机（带自定义按钮不带版）适配GOM引擎