[GOM]独家数字拼图防脱机验证脚本

爱上版本库

[@23bbk.com拼图防脱机系统(地图版)]
#if
CHECKLEVELEX > 0
#ACT
#CALL [\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\【常量设置】.INI] @23bbk.com拼图防脱机系统常量设置
DelayCall 45000 @23bbk.com倒计时结束
CALCVAR HUMAN pttj-倒计时 = 45
GOTO @拼图初始数据(地图版)
[@显示拼图(地图版)]
#if
CHECKLEVELEX > 0
#ACT
#SAY
<$HUMAN(pttj-位置1图)><$HUMAN(pttj-位置2图)><$HUMAN(pttj-位置3图)><$HUMAN(pttj-位置4图)><$HUMAN(pttj-位置5图)><$HUMAN(pttj-位置6图)>\
　\
　\
　\
　\
　\
<请按【><$HUMAN(pttj-抽取记录1)><$HUMAN(pttj-抽取记录2)><$HUMAN(pttj-抽取记录3)><$HUMAN(pttj-抽取记录4)><$HUMAN(pttj-抽取记录5)><$HUMAN(pttj-抽取记录6)><】的顺序排序上面图片数字！><【点击完成验证】/@点击验证排序(地图版)>\
<【排序方法】：点击一张图片然后再点击另外张图片进行位置调换！/SCOLOR=253>\
<(点击后图片显示灰色,表示此图片已被选取可与其他图片进行调换位置)/SCOLOR=250>


[@点击验证排序(地图版)]
#if
CHECKVAR HUMAN pttj-位置 > 0
#ACT
GOTO @选择图<$HUMAN(pttj-位置)>
#if
CompareText <$HUMAN(pttj-图未点编号1)><$HUMAN(pttj-图未点编号2)><$HUMAN(pttj-图未点编号3)><$HUMAN(pttj-图未点编号4)><$HUMAN(pttj-图未点编号5)><$HUMAN(pttj-图未点编号6)> <$HUMAN(pttj-抽取图片编号1)><$HUMAN(pttj-抽取图片编号2)><$HUMAN(pttj-抽取图片编号3)><$HUMAN(pttj-抽取图片编号4)><$HUMAN(pttj-抽取图片编号5)><$HUMAN(pttj-抽取图片编号6)>
#ACT
Close
CALCVAR HUMAN pttj-是否在验证 = 0
SAVEVAR HUMAN pttj-是否在验证 ..\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com地图验证数据.txt
CALCVAR HUMAN pttj-错误次数 = 0
SAVEVAR HUMAN pttj-错误次数 ..\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com地图验证数据.txt
ClearDelayGoto
ChangeModeEx 2 1
ChangeModeEx 10 1
messagebox 验证成功！你可以正常游戏了！
BREAK
#ELSEACT
CALCVAR HUMAN pttj-错误次数 + 1
SAVEVAR HUMAN pttj-错误次数 ..\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com地图验证数据.txt
#if
CHECKVAR HUMAN pttj-错误次数 > 2
#act
KICK
CALCVAR HUMAN pttj-错误次数 = 0
SAVEVAR HUMAN pttj-错误次数 ..\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com地图验证数据.txt
messagebox 你错误3次已被T下线！
#ELSEACT
ClearDelayGoto
GOTO @23bbk.com拼图防脱机系统(地图版)
messagebox 验证错误,重新验证！当前错误次数:<$HUMAN(pttj-错误次数)>次！(错误3次T下线)


[@23bbk.com倒计时结束]
#act
KICK
messagebox 45秒时间已到！你已被T下线！














;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;下面的代码必须要和上面的代码显示放同一文本里
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;下面的代码必须要和上面的代码显示放同一文本里
[@拼图初始数据(地图版)]
#if
CHECKVAR HUMAN pttj-jcblsm = 0
#ACT
VAR String  HUMAN pttj-bqljyz
CALCVAR HUMAN pttj-jcblsm = 1
#CALL [\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com拼图防脱机系统QM触发.txt] @23bbk.com拼图防脱机系统QMM触发
#if
CHECKVAR HUMAN pttj-jcblsm = 1
#ACT
CALCVAR HUMAN pttj-位置 = 0
CreateFile .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt
ClearNameList ..\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt $图片0未点编号图片0已点编号
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt $图片1未点编号图片1已点编号
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt $图片2未点编号图片2已点编号
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt $图片3未点编号图片3已点编号
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt $图片4未点编号图片4已点编号
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt $图片5未点编号图片5已点编号
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt $图片6未点编号图片6已点编号
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt $图片7未点编号图片7已点编号
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt $图片8未点编号图片8已点编号
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt $图片9未点编号图片9已点编号



CreateFile .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt
ClearNameList ..\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt
MOVR P70 10
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(P70)>
MOVR P70 10
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(P70)>
MOVR P70 10
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(P70)>
MOVR P70 10
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(P70)>
MOVR P70 10
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(P70)>
MOVR P70 10
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(P70)>



GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录1 = <$STR(S90)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)> s92 n92
CALCVAR HUMAN pttj-图未点编号1 = <$STR(S92)>
CALCVAR HUMAN pttj-图已点编号1 = <$STR(n92)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录2 = <$STR(S90)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)> s92 n92
CALCVAR HUMAN pttj-图未点编号2 = <$STR(S92)>
CALCVAR HUMAN pttj-图已点编号2 = <$STR(n92)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录3 = <$STR(S90)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)> s92 n92
CALCVAR HUMAN pttj-图未点编号3 = <$STR(S92)>
CALCVAR HUMAN pttj-图已点编号3 = <$STR(n92)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录4 = <$STR(S90)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)> s92 n92
CALCVAR HUMAN pttj-图未点编号4 = <$STR(S92)>
CALCVAR HUMAN pttj-图已点编号4 = <$STR(n92)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录5 = <$STR(S90)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)> s92 n92
CALCVAR HUMAN pttj-图未点编号5 = <$STR(S92)>
CALCVAR HUMAN pttj-图已点编号5 = <$STR(n92)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录6 = <$STR(S90)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)> s92 n92
CALCVAR HUMAN pttj-图未点编号6 = <$STR(S92)>
CALCVAR HUMAN pttj-图已点编号6 = <$STR(n92)>


ClearNameList ..\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$HUMAN(pttj-抽取记录1)>
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$HUMAN(pttj-抽取记录2)>
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$HUMAN(pttj-抽取记录3)>
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$HUMAN(pttj-抽取记录4)>
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$HUMAN(pttj-抽取记录5)>
AddTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$HUMAN(pttj-抽取记录6)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录1 = <$STR(s90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)>  s92 n92
CALCVAR HUMAN pttj-抽取图片编号1 = <$STR(s92)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录2 = <$STR(s90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)>  s92 n92
CALCVAR HUMAN pttj-抽取图片编号2 = <$STR(s92)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录3 = <$STR(s90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)>  s92 n92
CALCVAR HUMAN pttj-抽取图片编号3 = <$STR(s92)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录4 = <$STR(s90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)>  s92 n92
CALCVAR HUMAN pttj-抽取图片编号4 = <$STR(s92)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录5 = <$STR(s90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)>  s92 n92
CALCVAR HUMAN pttj-抽取图片编号5 = <$STR(s92)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>

GetRandomText .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt S90
CALCVAR HUMAN pttj-抽取记录6 = <$STR(s90)>
GetListString .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>图片编号.txt <$STR(S90)>  s92 n92
CALCVAR HUMAN pttj-抽取图片编号6 = <$STR(s92)>
DelTextList .\QuestDiary\23bbk.com子木脚本库\23bbk.com拼图防脱机系统\23bbk.com临时文本(开区删除里面所有文件)\<$USERNAME>.txt <$STR(S90)>

MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号1)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图1>
CALCVAR HUMAN pttj-位置1图 = <$STR(S85)>

MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号2)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图2>
CALCVAR HUMAN pttj-位置2图 = <$STR(S85)>

MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号3)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图3>
CALCVAR HUMAN pttj-位置3图 = <$STR(S85)>

MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号4)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图4>
CALCVAR HUMAN pttj-位置4图 = <$STR(S85)>

MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号5)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图5>
CALCVAR HUMAN pttj-位置5图 = <$STR(S85)>

MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号6)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图6>
CALCVAR HUMAN pttj-位置6图 = <$STR(S85)>

GOTO @显示拼图(地图版)







[@选择图1]
#if
CHECKVAR HUMAN pttj-位置 > 0
#ACT
MOV S85 <Img:
INC S85 <$HUMAN(pttj-未点位置图编号)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图1>
CALCVAR HUMAN pttj-位置1图 = <$STR(S85)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号1)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
CALCVAR HUMAN pttj-图未点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图未点编号1)>
CALCVAR HUMAN pttj-图已点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图已点编号1)>
CALCVAR HUMAN pttj-图未点编号1 = <$HUMAN(pttj-未点位置图编号)>
CALCVAR HUMAN pttj-图已点编号1 = <$HUMAN(pttj-已点位置图编号)>
CALCVAR HUMAN pttj-位置 = 0
GOTO @显示拼图(地图版)
#ELSEACT
CALCVAR HUMAN pttj-位置触发 = :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图1>
CALCVAR HUMAN pttj-位置 = 1
CALCVAR HUMAN pttj-未点位置图编号 = <$HUMAN(pttj-图未点编号1)>
CALCVAR HUMAN pttj-已点位置图编号 = <$HUMAN(pttj-图已点编号1)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-已点位置图编号)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
GOTO @显示拼图(地图版)


[@选择图2]
#if
CHECKVAR HUMAN pttj-位置 > 0
#ACT
MOV S85 <Img:
INC S85 <$HUMAN(pttj-未点位置图编号)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图2>
CALCVAR HUMAN pttj-位置2图 = <$STR(S85)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号2)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
CALCVAR HUMAN pttj-图未点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图未点编号2)>
CALCVAR HUMAN pttj-图已点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图已点编号2)>
CALCVAR HUMAN pttj-图未点编号2 = <$HUMAN(pttj-未点位置图编号)>
CALCVAR HUMAN pttj-图已点编号2 = <$HUMAN(pttj-已点位置图编号)>
CALCVAR HUMAN pttj-位置 = 0
GOTO @显示拼图(地图版)
#ELSEACT
CALCVAR HUMAN pttj-位置触发 = :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图2>
CALCVAR HUMAN pttj-位置 = 2
CALCVAR HUMAN pttj-未点位置图编号 = <$HUMAN(pttj-图未点编号2)>
CALCVAR HUMAN pttj-已点位置图编号 = <$HUMAN(pttj-图已点编号2)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-已点位置图编号)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
GOTO @显示拼图(地图版)


[@选择图3]
#if
CHECKVAR HUMAN pttj-位置 > 0
#ACT
MOV S85 <Img:
INC S85 <$HUMAN(pttj-未点位置图编号)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图3>
CALCVAR HUMAN pttj-位置3图 = <$STR(S85)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号3)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
CALCVAR HUMAN pttj-图未点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图未点编号3)>
CALCVAR HUMAN pttj-图已点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图已点编号3)>
CALCVAR HUMAN pttj-图未点编号3 = <$HUMAN(pttj-未点位置图编号)>
CALCVAR HUMAN pttj-图已点编号3 = <$HUMAN(pttj-已点位置图编号)>
CALCVAR HUMAN pttj-位置 = 0
GOTO @显示拼图(地图版)
#ELSEACT
CALCVAR HUMAN pttj-位置触发 = :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图3>
CALCVAR HUMAN pttj-位置 = 3
CALCVAR HUMAN pttj-未点位置图编号 = <$HUMAN(pttj-图未点编号3)>
CALCVAR HUMAN pttj-已点位置图编号 = <$HUMAN(pttj-图已点编号3)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-已点位置图编号)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
GOTO @显示拼图(地图版)


[@选择图4]
#if
CHECKVAR HUMAN pttj-位置 > 0
#ACT
MOV S85 <Img:
INC S85 <$HUMAN(pttj-未点位置图编号)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图4>
CALCVAR HUMAN pttj-位置4图 = <$STR(S85)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号4)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
CALCVAR HUMAN pttj-图未点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图未点编号4)>
CALCVAR HUMAN pttj-图已点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图已点编号4)>
CALCVAR HUMAN pttj-图未点编号4 = <$HUMAN(pttj-未点位置图编号)>
CALCVAR HUMAN pttj-图已点编号4 = <$HUMAN(pttj-已点位置图编号)>
CALCVAR HUMAN pttj-位置 = 0
GOTO @显示拼图(地图版)
#ELSEACT
CALCVAR HUMAN pttj-位置触发 = :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图4>
CALCVAR HUMAN pttj-位置 = 4
CALCVAR HUMAN pttj-未点位置图编号 = <$HUMAN(pttj-图未点编号4)>
CALCVAR HUMAN pttj-已点位置图编号 = <$HUMAN(pttj-图已点编号4)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-已点位置图编号)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
GOTO @显示拼图(地图版)


[@选择图5]
#if
CHECKVAR HUMAN pttj-位置 > 0
#ACT
MOV S85 <Img:
INC S85 <$HUMAN(pttj-未点位置图编号)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图5>
CALCVAR HUMAN pttj-位置5图 = <$STR(S85)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号5)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
CALCVAR HUMAN pttj-图未点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图未点编号5)>
CALCVAR HUMAN pttj-图已点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图已点编号5)>
CALCVAR HUMAN pttj-图未点编号5 = <$HUMAN(pttj-未点位置图编号)>
CALCVAR HUMAN pttj-图已点编号5 = <$HUMAN(pttj-已点位置图编号)>
CALCVAR HUMAN pttj-位置 = 0
GOTO @显示拼图(地图版)
#ELSEACT
CALCVAR HUMAN pttj-位置触发 = :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图5>
CALCVAR HUMAN pttj-位置 = 5
CALCVAR HUMAN pttj-未点位置图编号 = <$HUMAN(pttj-图未点编号5)>
CALCVAR HUMAN pttj-已点位置图编号 = <$HUMAN(pttj-图已点编号5)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-已点位置图编号)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
GOTO @显示拼图(地图版)


[@选择图6]
#if
CHECKVAR HUMAN pttj-位置 > 0
#ACT
MOV S85 <Img:
INC S85 <$HUMAN(pttj-未点位置图编号)>
INC S85 :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图6>
CALCVAR HUMAN pttj-位置6图 = <$STR(S85)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-图未点编号6)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
CALCVAR HUMAN pttj-图未点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图未点编号6)>
CALCVAR HUMAN pttj-图已点编号<$HUMAN(pttj-位置)> = <$HUMAN(pttj-图已点编号6)>
CALCVAR HUMAN pttj-图未点编号6 = <$HUMAN(pttj-未点位置图编号)>
CALCVAR HUMAN pttj-图已点编号6 = <$HUMAN(pttj-已点位置图编号)>
CALCVAR HUMAN pttj-位置 = 0
GOTO @显示拼图(地图版)
#ELSEACT
CALCVAR HUMAN pttj-位置触发 = :$图片素材文件号:$图片坐标X微调:$图片坐标Y微调/@选择图6>
CALCVAR HUMAN pttj-位置 = 6
CALCVAR HUMAN pttj-未点位置图编号 = <$HUMAN(pttj-图未点编号6)>
CALCVAR HUMAN pttj-已点位置图编号 = <$HUMAN(pttj-图已点编号6)>
MOV S85 <Img:
INC S85 <$HUMAN(pttj-已点位置图编号)>
INC S85 <$HUMAN(pttj-位置触发)>
CALCVAR HUMAN pttj-位置<$HUMAN(pttj-位置)>图 = <$STR(S85)>
GOTO @显示拼图(地图版)

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

x3474362

66666666666