查看: 49|回复: 1

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

[复制链接]

升级   63.33%

88

主题

51

回帖

145

积分

注册会员

Rank: 2

金钱
6 币
元宝
0 枚
发表于 2024-7-16 13:22:54 | 显示全部楼层 |阅读模式
[@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$元宝累计)>】

速记论坛网址:9420Gm.com---就是爱你Gm.com

升级   63.33%

88

主题

51

回帖

145

积分

注册会员

Rank: 2

金钱
6 币
元宝
0 枚
 楼主| 发表于 2024-7-16 13:23:12 | 显示全部楼层

[@拆除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>\
速记论坛网址:9420Gm.com---就是爱你Gm.com
回复

使用道具 举报

懒得打字嘛,点击右侧快捷回复 【右侧内容,后台自定义】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

×本站发帖友情提示
1、注册用户在本社区发表、转载的任何作品仅代表其个人观点,不代表本社区认同其观点。
2、如果存在违反国家相关法律、法规、条例的行为,我们有权在不经作者准许的情况下删除其在本论坛所发表的文章。
3、所有网友不要盗用有明确版权要求的作品,转贴请注明来源,否则文责自负。
4、本社区保护注册用户个人资料,但是在自身原因导致个人资料泄露、丢失、被盗或篡改,本论坛概不负责,也不承担相应法律责任。

9420Gm传奇论坛,就是爱你Gm传奇论坛。 立即登录 立即注册
快速回复 返回顶部 返回列表