GEE引擎传奇版本每攻击怪物一下为一刀,每天晚上12点清空刀数脚本

[@main]
#IF
CHECKNAMEDATETIMELIST ..\QuestDiary\会员\会员时间.txt 1 <$STR(S$时间)> <$STR(N$小时)> <$STR(N$分钟)> <$STR(N$读秒)>
#ACT


#IF
#ACT
MOV N$刀会员 9000
DEC N$刀会员 <$STR(J96)>
#SAY
{会员特权：/FCOLOR=253}\
========================================================\
商铺购买物品享受 {9/FCOLOR=250} 折价格 <[元宝服务]/@元宝服务>\
会员拥有 {2/FCOLOR=254} 倍经验倍数、{1.2/FCOLOR=254} 倍攻击倍数\
========================================================\
还差 [<ImgNum:1:<$STR(N$刀会员)>:-2:0:0:>] 刀获得会员资格 <[免费获取]/@免费>／天\
<提示：每攻击怪物一下为一刀,每天晚上12点清空刀数>\
{========================================================/FCOLOR=241}\
<[办理永久会员]/@会员> {(30天)/FCOLOR=251}      {到期时间：<$STR(S$时间)>/FCOLOR=250}\


[@免费]
#IF
CHECKNAMEDATETIMELIST ..\QuestDiary\会员\会员时间.txt 1 <$STR(S$时间)> <$STR(N$小时)> <$STR(N$分钟)> <$STR(N$读秒)>
#ACT
MessageBox 会员未到期，无需办理
break


#IF
EQUAL N$刀会员 0
#ACT
ADDNAMEDATETIMELIST ..\QuestDiary\会员\会员时间.txt 1 0 0
;会员商铺9折
SetShopItemPriceRate 90
KILLMONEXPRATE 200 86400 1
POWERRATE 120 86400 1
MessageBox 你的会员到期时间是【<$STR(S$时间)>】
#ELSESAY
还差 [<ImgNum:1:<$STR(N$刀会员)>:-2:0:0:>] 刀获得会员资格 <[免费获取]/@免费>／天\


[@会员]
#IF
CHECKNAMEDATETIMELIST ..\QuestDiary\会员\会员时间.txt 1 <$STR(S$时间)> <$STR(N$小时)> <$STR(N$分钟)> <$STR(N$读秒)>
#ACT
MessageBox 会员未到期，无需办理
#ELSEACT
ADDNAMEDATETIMELIST ..\QuestDiary\会员\会员时间.txt 30 0 0
;会员商铺9折
SetShopItemPriceRate 90
KILLMONEXPRATE 200 2592000 1
POWERRATE 120 2592000 1


#IF
CHECKNAMEDATETIMELIST ..\QuestDiary\会员\会员时间.txt 1 <$STR(S$时间)> <$STR(N$小时)> <$STR(N$分钟)> <$STR(N$读秒)>
#ACT
MessageBox 请联系QQ(41054098)赞助\你的会员到期时间是【<$STR(S$时间)>】


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


[@服务1]
放入需要拆卸的装备,第一次收费1000元宝，每次拆卸都会累加100元宝\ \
{拆卸成功后：/FCOLOR=250}{放入的拆卸装备将会返还所有镶嵌石/FCOLOR=251}\ \
<TEXT:需拆卸的装备:260:102{FCOLOR=2}> <TEXT:耳又:248:247{FCOLOR=251}/@取回>\
<ITEMBOX:1:22:392:260:176:0:0:5,6,10,11,15,20,21,22,23,24,26:254#此处放入需拆卸的装备>\ \


[@ItemIntoBox1]
#SAY
放入的装备{【<$BOXITEM[1].NAME>】/FCOLOR=251}镶嵌的位置（8个）\ \
镶嵌位置一：<$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>\ \
<[一键拆除]/@一键拆除> 放入的装备有多少镶嵌返还多少，只需消费一次元宝\
#ACT
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]
#IF
CHECKGAMEGOLD > <$STR(N$元宝累计)>
#ACT
GameGold - <$STR(N$元宝累计)>
ItemoffStone boxitem1 1
INC J171 100
#ELSESAY
你的元宝不够【<$STR(N$元宝累计)>】


[@拆除2]
#IF
CHECKGAMEGOLD > <$STR(N$元宝累计)>
#ACT
GameGold - <$STR(N$元宝累计)>
ItemoffStone boxitem1 2
INC J171 100
#ELSESAY
你的元宝不够【<$STR(N$元宝累计)>】


[@拆除3]
#IF
CHECKGAMEGOLD > <$STR(N$元宝累计)>
#ACT
GameGold - <$STR(N$元宝累计)>
ItemoffStone boxitem1 3
INC J171 100
#ELSESAY
你的元宝不够【<$STR(N$元宝累计)>】


[@拆除4]
#IF
CHECKGAMEGOLD > <$STR(N$元宝累计)>
#ACT
GameGold - <$STR(N$元宝累计)>
ItemoffStone boxitem1 4
INC J171 100
#ELSESAY
你的元宝不够【<$STR(N$元宝累计)>】


[@拆除5]
#IF
CHECKGAMEGOLD > <$STR(N$元宝累计)>
#ACT
GameGold - <$STR(N$元宝累计)>
ItemoffStone boxitem1 5
INC J171 100
#ELSESAY
你的元宝不够【<$STR(N$元宝累计)>】


[@拆除6]
#IF
CHECKGAMEGOLD > <$STR(N$元宝累计)>
#ACT
GameGold - <$STR(N$元宝累计)>
ItemoffStone boxitem1 6
INC J171 100
#ELSESAY
你的元宝不够【<$STR(N$元宝累计)>】


[@拆除7]
#IF
CHECKGAMEGOLD > <$STR(N$元宝累计)>
#ACT
GameGold - <$STR(N$元宝累计)>
ItemoffStone boxitem1 7
INC J171 100
#ELSESAY
你的元宝不够【<$STR(N$元宝累计)>】


[@拆除8]
#IF
CHECKGAMEGOLD > <$STR(N$元宝累计)>
#ACT
GameGold - <$STR(N$元宝累计)>
ItemoffStone boxitem1 8
INC J171 100
#ELSESAY
你的元宝不够【<$STR(N$元宝累计)>】


[@一键拆除]
#IF
CHECKGAMEGOLD > <$STR(N$元宝累计)>
#ACT
GameGold - <$STR(N$元宝累计)>
ItemoffStone boxitem1 1
ItemoffStone boxitem1 2
ItemoffStone boxitem1 3
ItemoffStone boxitem1 4
ItemoffStone boxitem1 5
ItemoffStone boxitem1 6
ItemoffStone boxitem1 7
ItemoffStone boxitem1 8
INC J171 100
#ELSESAY
你的元宝不够【<$STR(N$元宝累计)>】


[@服务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/@对对蒙玩法>\


[@对蒙元宝]
#ACT
MOV N$对对蒙数值 <$NPCINPUT(1)>
;SENDMSG 5 【<$STR(N$对对蒙数值)>】


#IF
CHECKGAMEGOLD > <$STR(N$对对蒙数值)>
RANDOMEX 1 1
#ACT
GameGold - <$STR(N$对对蒙数值)>
GetRandomText ..\QuestDiary\三单职业\武器经验满\道士武器经验值满.txt <$STR(S$随机武器)>
GetDBItemFieldValue <$STR(S$随机武器)> SC2 <$STR(N$武器属性上限)>
GetDBItemFieldValue <$STR(S$随机武器)> idx <$STR(N$对对蒙序号)>


#IF
CHECKGAMEGOLD > <$STR(N$对对蒙数值)>
RANDOMEX 1 2
#ACT
GameGold - <$STR(N$对对蒙数值)>
GetRandomText ..\QuestDiary\三单职业\武器经验满\法师武器经验值满.txt <$STR(S$随机武器)>
GetDBItemFieldValue <$STR(S$随机武器)> MC2 <$STR(N$武器属性上限)>
GetDBItemFieldValue <$STR(S$随机武器)> idx <$STR(N$对对蒙序号)>


#IF
CHECKGAMEGOLD > <$STR(N$对对蒙数值)>
RANDOMEX 1 3
#ACT
GameGold - <$STR(N$对对蒙数值)>
GetRandomText ..\QuestDiary\三单职业\武器经验满\战士武器经验值满.txt <$STR(S$随机武器)>
GetDBItemFieldValue <$STR(S$随机武器)> DC2 <$STR(N$武器属性上限)>
GetDBItemFieldValue <$STR(S$随机武器)> idx <$STR(N$对对蒙序号)>


#IF
CHECKTEXTLIST ..\QuestDiary\三单职业\武器经验满\战士武器经验值满.txt <$STR(S$随机武器)>
EQUAL N$对对蒙数值 <$STR(N$武器属性上限)>
#SAY
当前对对蒙的装备是 {战士武器/FCOLOR=70}\ \
<ItemShow:<$STR(N$对对蒙序号)>:0:0:0:1>\
<TEXT:武器攻击上限:50:-13{FCOLOR=251}> <TEXT:[ <$STR(N$武器属性上限)> ]:10:5{FCOLOR=250}>\ \
{对对蒙成功/FCOLOR=250} <IMG:2155:34:0:-2> <$STR(N$对对蒙数值)>{（+<$STR(N$对对蒙数值)>）/FCOLOR=250}\ \
<[再来一局]/@服务2>\
#ACT
break


#IF
CHECKTEXTLIST ..\QuestDiary\三单职业\武器经验满\法师武器经验值满.txt <$STR(S$随机武器)>
EQUAL N$对对蒙数值 <$STR(N$武器属性上限)>
#SAY
当前对对蒙的装备是 {法师武器/FCOLOR=70}\ \
<ItemShow:<$STR(N$对对蒙序号)>:0:0:0:1>\
<TEXT:武器魔力上限:50:-13{FCOLOR=251}> <TEXT:[ <$STR(N$武器属性上限)> ]:10:5{FCOLOR=250}>\ \
{对对蒙成功/FCOLOR=250} <IMG:2155:34:0:-2> <$STR(N$对对蒙数值)>{（+<$STR(N$对对蒙数值)>）/FCOLOR=250}\ \
<[再来一局]/@服务2>\
#ACT
break


#IF
CHECKTEXTLIST ..\QuestDiary\三单职业\武器经验满\道士武器经验值满.txt <$STR(S$随机武器)>
EQUAL N$对对蒙数值 <$STR(N$武器属性上限)>
#SAY
当前对对蒙的装备是 {道士武器/FCOLOR=254}\ \
<ItemShow:<$STR(N$对对蒙序号)>:0:0:0:1>\
<TEXT:武器道术上限:50:-13{FCOLOR=251}> <TEXT:[ <$STR(N$武器属性上限)> ]:10:5{FCOLOR=250}>\ \
{对对蒙成功/FCOLOR=250} <IMG:2155:34:0:-2> <$STR(N$对对蒙数值)>{（+<$STR(N$对对蒙数值)>）/FCOLOR=250}\ \
<[再来一局]/@服务2>\
#ACT
break
#ELSESAY
当前对对蒙的装备是\ \
<ItemShow:<$STR(N$对对蒙序号)>:0:0:0:1>\
<TEXT:武器上限:50:-13{FCOLOR=251}> <TEXT:[ <$STR(N$武器属性上限)> ]:10:5{FCOLOR=250}>\ \
<对对蒙失败> 损失 <IMG:2155:34:0:-2> <$STR(N$对对蒙数值)>\ \
<[再来一局]/@服务2>\




[@对对蒙玩法]
{对蒙元宝的玩法：/FCOLOR=251}\ \
玩家先消费指定元宝数量，点击对对蒙下注，然后系统会随机显示一件\
武器，根据武器属性的上限与玩家下注的元宝数量相同，将会获得元\
宝奖励{（显示武器为三职业的）/FCOLOR=247}\
下注数量与系统显示武器属性上限相同，双倍下注元宝奖励\
下注数量与系统显示武器属性上限不同，损失下注元宝\
<[返 回]/@服务2>\

版权声明

1、本站所有内容均由互联网收集整理、网友上传，仅供大家参考、学习研究使用，不存在任何商业目的与商业用途。

2、论坛的所有内容都不保证其准确性，完整性，有效性，因本站内容因误导等因素而造成的损失本站不承担连带责任。

3、本站以《2013 中华人民共和国计算机软件保护条例》第二章 “软件著作权” 第十七条为原则：为了学习和研究软件内含的设计思想和原理，通过安装、显示、传输或者存储软件等方式使用软件的，可以不经软件著作权人许可，若有用户需要商用本站资源，请务必联系版权方购买正版授权！

谢谢楼主！

传奇论坛里面相对来说比较好的一个！

喜欢这里的东西，方便又好用！

谢谢楼主！

下次在来看脚本

喜欢这里的东西，方便又好用！

感谢站长分享传奇脚本，让我学习到很多知识。

很专业的很全面的gm论坛

这个帖子不回对不起自己！