其他引擎传奇版本每攻击怪物一下为一刀

[@main]

#IF

CHECKNAMEDATETIMELIST ..\QuestDiary\会员\会员时间.txt 1 <$STR(S$时间)> <$STR(N$小时)> <$STR(N$分钟)> <$STR(N$读秒)>

#ACT

MOV N$刀会员 9000

DEC N$刀会员 <$STR(J96)>

#SAY

========================================================\

还差 [<ImgNum:1:<$STR(N$刀会员)>:-2:0:0:>] 刀获得会员资格 <[免费获取]/@免费>／天\

<提示：每攻击怪物一下为一刀,每天晚上12点清空刀数>\

[@免费]

MessageBox 会员未到期，无需办理

break

EQUAL N$刀会员 0

ADDNAMEDATETIMELIST ..\QuestDiary\会员\会员时间.txt 1 0 0

;会员商铺9折

SetShopItemPriceRate 90

KILLMONEXPRATE 200 86400 1

POWERRATE 120 86400 1

MessageBox 你的会员到期时间是【<$STR(S$时间)>】

#ELSESAY

[@会员]

#ELSEACT

ADDNAMEDATETIMELIST ..\QuestDiary\会员\会员时间.txt 30 0 0

KILLMONEXPRATE 200 2592000 1

POWERRATE 120 2592000 1

[@元宝服务]

<拆镶嵌/@服务1> <对蒙元宝/@服务2>\

[@服务1]

放入需要拆卸的装备,第一次收费1000元宝，每次拆卸都会累加100元宝\ \

<ITEMBOX:1:22:392:260:176:0:0:5,6,10,11,15,20,21,22,23,24,26:254#此处放入需拆卸的装备>\ \

[@ItemIntoBox1]

镶嵌位置一：<$STR(S$镶宝石1)> <[拆除]/@拆除1> 镶嵌位置二：<$STR(S$镶宝石2)> <[拆除]/@拆除2>\

镶嵌位置三：<$STR(S$镶宝石3)> <[拆除]/@拆除3> 镶嵌位置四：<$STR(S$镶宝石4)> <[拆除]/@拆除4>\

镶嵌位置五：<$STR(S$镶宝石5)> <[拆除]/@拆除5> 镶嵌位置六：<$STR(S$镶宝石6)> <[拆除]/@拆除6>\

镶嵌位置七：<$STR(S$镶宝石7)> <[拆除]/@拆除7> 镶嵌位置八：<$STR(S$镶宝石8)> <[拆除]/@拆除8>\ \

<[一键拆除]/@一键拆除> 放入的装备有多少镶嵌返还多少，只需消费一次元宝\

GetItemStoneInfo boxitem1 0 0 <$STR(S$镶宝石1)>

GetItemStoneInfo boxitem1 1 0 <$STR(S$镶宝石2)>

GetItemStoneInfo boxitem1 2 0 <$STR(S$镶宝石3)>

GetItemStoneInfo boxitem1 3 0 <$STR(S$镶宝石4)>

GetItemStoneInfo boxitem1 4 0 <$STR(S$镶宝石5)>

GetItemStoneInfo boxitem1 5 0 <$STR(S$镶宝石6)>

GetItemStoneInfo boxitem1 6 0 <$STR(S$镶宝石7)>

GetItemStoneInfo boxitem1 7 0 <$STR(S$镶宝石8)>

MOV N$元宝累计 1000

INC N$元宝累计 <$STR(J171)>

[@拆除1]

CHECKGAMEGOLD > <$STR(N$元宝累计)>

GameGold - <$STR(N$元宝累计)>

ItemoffStone boxitem1 1

INC J171 100

你的元宝不够【<$STR(N$元宝累计)>】

[@拆除2]

ItemoffStone boxitem1 2

[@拆除3]

ItemoffStone boxitem1 3

[@拆除4]

ItemoffStone boxitem1 4

[@拆除5]

ItemoffStone boxitem1 5

[@拆除6]

ItemoffStone boxitem1 6

[@拆除7]

ItemoffStone boxitem1 7

[@拆除8]

ItemoffStone boxitem1 8

[@一键拆除]

[@服务2]

下注你要对对蒙的元宝<IMG:2155:34:0:0>数量\ \

<INPUTNUM:1:0:-10:100:0:0:255:251:1:100:禁止为空，最小对对蒙元宝数量为1，最大为100:输入对对蒙元宝数量:247>\

<IMG:2155:34:0:0> <TEXT:[对对蒙下注]:0:0:1/@对蒙元宝>\ \

<IMG:1642:29:2:-8> <TEXT:[对对蒙玩法]:7:0/@对对蒙玩法>\

[@对蒙元宝]

MOV N$对对蒙数值 <$NPCINPUT(1)>

;SENDMSG 5 【<$STR(N$对对蒙数值)>】

CHECKGAMEGOLD > <$STR(N$对对蒙数值)>

RANDOMEX 1 1

GameGold - <$STR(N$对对蒙数值)>

GetRandomText ..\QuestDiary\三单职业\武器经验满\道士武器经验值满.txt <$STR(S$随机武器)>

GetDBItemFieldValue <$STR(S$随机武器)> SC2 <$STR(N$武器属性上限)>

GetDBItemFieldValue <$STR(S$随机武器)> idx <$STR(N$对对蒙序号)>

RANDOMEX 1 2

GetRandomText ..\QuestDiary\三单职业\武器经验满\法师武器经验值满.txt <$STR(S$随机武器)>

GetDBItemFieldValue <$STR(S$随机武器)> MC2 <$STR(N$武器属性上限)>

RANDOMEX 1 3

GetRandomText ..\QuestDiary\三单职业\武器经验满\战士武器经验值满.txt <$STR(S$随机武器)>

GetDBItemFieldValue <$STR(S$随机武器)> DC2 <$STR(N$武器属性上限)>

CHECKTEXTLIST ..\QuestDiary\三单职业\武器经验满\战士武器经验值满.txt <$STR(S$随机武器)>

EQUAL N$对对蒙数值 <$STR(N$武器属性上限)>

<ItemShow:<$STR(N$对对蒙序号)>:0:0:0:1>\

<[再来一局]/@服务2>\

CHECKTEXTLIST ..\QuestDiary\三单职业\武器经验满\法师武器经验值满.txt <$STR(S$随机武器)>

CHECKTEXTLIST ..\QuestDiary\三单职业\武器经验满\道士武器经验值满.txt <$STR(S$随机武器)>

当前对对蒙的装备是\ \

<对对蒙失败> 损失 <IMG:2155:34:0:-2> <$STR(N$对对蒙数值)>\ \

[@对对蒙玩法]

玩家先消费指定元宝数量，点击对对蒙下注，然后系统会随机显示一件\

武器，根据武器属性的上限与玩家下注的元宝数量相同，将会获得元\

下注数量与系统显示武器属性上限相同，双倍下注元宝奖励\

下注数量与系统显示武器属性上限不同，损失下注元宝\

<[返 回]/@服务2>\