(@@inputstring @@CreateMercenary)

[@main]

#if

ISADMIN

#say

<COLOR=#$CEB6F7 角色交易：玩家可以将自己的角色制作成【佣兵契约纸】进行交易！>\ \

<COLOR=clAqua 1、制作为佣兵的人物角色不小于40级。>\

<COLOR=clAqua 2、每次制作，背包需要放一张空白的【佣兵契约纸】。>\

<COLOR=clAqua 3、经验、技能、物品等数据将会保留。>\

<COLOR=clAqua 4、已经签约的【佣兵契约纸】可以用于创建新角色。><COLOR=clFuchsia 需要佣兵令牌>\

<COLOR=clAqua 5、制作佣兵契约的角色，需要取消金币交易行的所有订单！>\ \

<制作佣兵契约/@MakeMercenarymibao> <使用契约创建角色/@@CreateMercenary>\

; ------------------- 制作契约，需密保验证 -------------------

[@MakeMercenarymibao]

请输入以下正确信息进行验证\

输入连续错误3次将30分钟内禁止在次输入\

问题1：【<$STR(S1)>】--------------------<点击输入/@验证1>\

答案1：【<$STR(S2)>】--------------------<点击输入/@验证2>\

问题2：【<$STR(S3)>】--------------------<点击输入/@验证3>\

答案2：【<$STR(S4)>】--------------------<点击输入/@验证4>\

[@验证1]

#IF

!COMPVAL <$QUIZ> = <$STR(S1)>

#ACT

QUERYVALUE 1 0 20 ~MMBB1 请输入你的【密保问题1】：

#ELSEACT

MESSAGEBOX 错误提示：当前输入的密保是正确的无需在次输入

BREAK

[~MMBB1]

COMPVAL $INTS2 < 3300

COMPVAL $INTS2 > 1500

MOV D1 <$UNIXTIME>

INC D1 <$INTS2>

INTS 2 = <$STR(D1)>

COMPVAL $INTS2 > 3300

COMPVAL $INTS2 > $UNIXTIME

CALCVAL $INTS2 - $UNIXTIME

SENDMSG 7 将在<$CALCRESULT>秒后，才可以再次输入

CALCVAL $INTS2 ~ 0

SENDMSG 7 将在<$CALCRESULT>过期，才可以再次输入

MOV S1

COMPVAL $INTS2 < $UNIXTIME

INTS 2 = 0

COMPVAL <$QUIZ> = <$STR(S1)>

DELAYGOTO 1 @MAKEMERCENARYMIBAO

MESSAGEBOX 错误提示：你输入的【密保问题1】错误.连续错误3次将30分钟内禁止在次输入

INTS 2 + 600

[@验证2]

EQUAL S1

MESSAGEBOX 错误提示：请先输入【密保问题1】

!COMPVAL <$ANSWER> = <$STR(S2)>

QUERYVALUE 2 0 20 ~MMBB2 请输入你的【密保答案1】：

[~MMBB2]

MOV S2

COMPVAL <$ANSWER> = <$STR(S2)>

MESSAGEBOX 错误提示：你输入的【密保答案1】错误.连续错误3次将30分钟内禁止在次输入

[@验证3]

EQUAL S2

MESSAGEBOX 错误提示：请先输入【密保答案1】

!COMPVAL <$QUIZ2> = <$STR(S3)>

QUERYVALUE 3 0 20 ~MMBB3 请输入你的【密保问题2】：

[~MMBB3]

MOV S3

COMPVAL <$QUIZ2> = <$STR(S3)>

MESSAGEBOX 错误提示：你输入的【密保问题2】错误.连续错误3次将30分钟内禁止在次输入

[@验证4]

EQUAL S3

MESSAGEBOX 错误提示：请先输入【密保问题2】

QUERYVALUE 4 0 20 ~MMBB4 请输入你的【密保答案2】：

[~MMBB4]

MOV S4

COMPVAL <$ANSWER2> = <$STR(S4)>

;参数1表示不小于此等级的角色可以被压卡，

;参数2表示制作为佣兵将损失15%的经验值

;参数3为1时表示过滤掉隐藏角色

QUERYMERCENARIES 5 1 0

MESSAGEBOX 错误提示：你输入的【密保答案2】错误.连续错误3次将30分钟内禁止在次输入

; ------------------- 契约创建角色 -------------------

[@@CreateMercenary]

左边空框内放入<COLOR=clFuchsia 已签约的佣兵契约纸>\

右边空框内放入<COLOR=clFuchsia 佣兵令牌>\ \

<返回/@main> <关闭/@exit>

; ------------------- 压卡成功后执行的字段 -------------------

[@MakeMercenarySuccess]

true

#act

sendmsg 7 压卡成功：正在制作契约的玩家：<$PARAMSTR(0)>，被制作为契约的原角色名：<$PARAMSTR(1)>，佣兵契约上的角色名：<$PARAMSTR(2)>

ADDLINELIST ..\QuestDiary\账号交易记录.txt 原角色名：<$PARAMSTR(1)>---佣兵契约上的角色名：<$PARAMSTR(2)>

;使用契约纸成功创建角色后执行的字段

[@NewCharByContractSuccess]

sendmsg 7 创角成功：正在使用契约创角的玩家：<$PARAMSTR(0)>，佣兵契约上的角色名：<$PARAMSTR(1)>，创建的新角色名：<$PARAMSTR(2)>

ADDLINELIST ..\QuestDiary\账号交易记录.txt 佣兵契约上的角色名：<$PARAMSTR(1)>---创建的新角色名：<$PARAMSTR(2)>