传奇七号站-为优质资源而生分享无止境,七版本站Ctrl+D收藏本站!
登录后,享受更多优质服务哦

传奇GOM引擎沙城捐献脚本,增加人物倍攻增加物

七号编辑 收藏

传奇GOM引擎沙城捐献脚本,爆率增加人物倍攻增加物抗魔坑专属称号,捐献为功宜捐献作为沙城给予,只需要30游戏点即可获得属性,人物爆率增加:1000%,人物倍攻增加:40%,物抗.魔坑+5%塔配某称号双减免捐献专属称号:无需佩戴属性叠加。
 

[@main]
#IF
#act
OPENMERCHANTBIGDLG 36 94 1 4 -20 -80 1  580  45
GetListString ........n598018通区捐献<$STR(A8)>今日01区.txt 0 S$今日首区 S$捐献金额0
GetListString ........n598018通区捐献<$STR(A8)>今日02区.txt 0 S$今日二区 S$捐献金额1
GetListString ........n598018通区捐献<$STR(A8)>今日03区.txt 0 S$今日三区 S$捐献金额2
GetListString ........n598018通区捐献<$STR(A8)>今日04区.txt 0 S$今日四区 S$捐献金额3
GetListString ........n598018通区捐献<$STR(A8)>今日05区.txt 0 S$今日五区 S$捐献金额4
GetListString ........n598018通区捐献<$STR(A8)>今日06区.txt 0 S$今日六区 S$捐献金额5
GetListString ........n598018通区捐献<$STR(A8)>今日07区.txt 0 S$今日七区 S$捐献金额6
GetListString ........n598018通区捐献<$STR(A8)>今日08区.txt 0 S$今日八区 S$捐献金额7
MOV N$总金额 0
INC N$总金额 <$str(S$捐献金额0)>
INC N$总金额 <$str(S$捐献金额1)>
INC N$总金额 <$str(S$捐献金额2)>
INC N$总金额 <$str(S$捐献金额3)>
INC N$总金额 <$str(S$捐献金额4)>
INC N$总金额 <$str(S$捐献金额5)>
INC N$总金额 <$str(S$捐献金额6)>
INC N$总金额 <$str(S$捐献金额7)>
SetStringBlank S$今日首区 15 1
SetStringBlank S$今日二区 15 1
SetStringBlank S$今日三区 15 1
SetStringBlank S$今日四区 15 1
SetStringBlank S$今日五区 15 1
SetStringBlank S$今日六区 15 1
SetStringBlank S$今日七区 15 1
SetStringBlank S$今日八区 15 1
 
SetStringBlank S$捐献金额0 5 1
SetStringBlank S$捐献金额1 5 1
SetStringBlank S$捐献金额2 5 1
SetStringBlank S$捐献金额3 5 1
SetStringBlank S$捐献金额4 5 1
SetStringBlank S$捐献金额5 5 1
SetStringBlank S$捐献金额6 5 1
SetStringBlank S$捐献金额7 5 1
 
#SAY
   
<>      {<$GAMEGLORY> 元/SCOLOR=254} <爽翻天沙城奖池系统,每人限一次!合区后关闭激活页面!/SCOLOR=241>
 
<>      <激活说明:本次捐献为功宜捐献作为沙城给予,只需要30游戏点即可获得属性!/SCOLOR=253>
<>     <人物爆率增加:1000%,人物倍攻增加:40%,物抗.魔坑+5%塔配某称号双减免捐献专属称号:无需佩戴属性叠加/SCOLOR=70>  
<>     <人物爆率增加:1000%,人物倍攻增加:40%,物抗.魔坑+5%塔配某称号双减免捐献专属称号:无需佩戴属性叠加/SCOLOR=70>  
<>         {<$STR(S$今日首区)>/FCOLOR=215}<已经累计沙城给予  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额0)>/FCOLOR=254} <元/FCOLOR=58>
<>         {<$STR(S$今日二区)>/FCOLOR=215}<已经累计沙城给予  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额1)>/FCOLOR=254} <元/FCOLOR=58>
<>         {<$STR(S$今日三区)>/FCOLOR=215}<已经累计沙城给予  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额2)>/FCOLOR=254} <元/FCOLOR=58>
<>         {<$STR(S$今日四区)>/FCOLOR=215}<已经累计沙城给予  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额3)>/FCOLOR=254} <元/FCOLOR=58>
<>         {<$STR(S$今日五区)>/FCOLOR=215}<已经累计沙城给予  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额4)>/FCOLOR=254} <元/FCOLOR=58>
<>         {<$STR(S$今日六区)>/FCOLOR=215}<已经累计沙城给予  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额4)>/FCOLOR=254} <元/FCOLOR=58>
<>         {<$STR(S$今日七区)>/FCOLOR=215}<已经累计沙城给予  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额4)>/FCOLOR=254} <元/FCOLOR=58>
<>         {<$STR(S$今日八区)>/FCOLOR=215}<已经累计沙城给予  [金额]⊙⊿/SCOLOR=215> {<$STR(S$捐献金额4)>/FCOLOR=254} <元/FCOLOR=58>
<>               刷新抱BOSS<[进入功宜捐献地图]/@进入>          <[捐献获得长期属性加成]/@开始捐献>
                               {<$STR(N$总金额)>/SCOLOR=254} <元/SCOLOR=58>
<>     
<>     
<>     
 
 
 
[@进入]
#IF
CHECK [7] 1
#ACT
mapmove gycx 98 99
SENDMSG 0 251 241 {[功宜捐献地图]:|151:0:1}◆尊贵功宜捐献玩家◆{「<$USERNAME>」|254:0:1}进入{『功宜捐献地图』|250:0:1}开始打宝,此地图刷新抱BOSS!!!
SENDMSG 0 251 241 {[功宜捐献地图]:|151:0:1}◆尊贵功宜捐献玩家◆{「<$USERNAME>」|254:0:1}进入{『功宜捐献地图』|250:0:1}开始打宝,此地图刷新抱BOSS!!!
SENDMSG 0 251 241 {[功宜捐献地图]:|151:0:1}◆尊贵功宜捐献玩家◆{「<$USERNAME>」|254:0:1}进入{『功宜捐献地图』|250:0:1}开始打宝,此地图刷新抱BOSS!!!
SENDMSG 0 251 241 {[功宜捐献地图]:|151:0:1}◆尊贵功宜捐献玩家◆{「<$USERNAME>」|254:0:1}进入{『功宜捐献地图』|250:0:1}开始打宝,此地图刷新抱BOSS!!!
SENDMSG 0 251 241 {[功宜捐献地图]:|151:0:1}◆尊贵功宜捐献玩家◆{「<$USERNAME>」|254:0:1}进入{『功宜捐献地图』|250:0:1}开始打宝,此地图刷新抱BOSS!!!
break
#elseact
messagebox  对不起!!!功宜捐献地图不是每个人都可以进的!!!必需捐献后才可以进入!  
 
 
 
 
[@开始捐献]
 
;#IF
;CHECKTEXTLIST ..QuestDiary数据文件合区检测.txt 测试
;#ACT
;MESSAGEBOX 当前还是测试区无法捐献!
;break
 
;#IF
;CHECKTEXTLIST ..QuestDiary数据文件合区检测.txt 总区
;#ACT
;MESSAGEBOX 当前区已经合区了,捐献通道已关闭,务必合区前开通!
;break
 
 
 
 
 
#IF
Check [7] 1
#ACT
MESSAGEBOX 您已经捐献过了,且长期增加属性!
break
 
#IF
not CHECKGAMEGLORY > 29
#ACT
MESSAGEBOX 当前游戏币不够!
break
 
 
#IF
Check [7] 0
CHECKGAMEGLORY > 29
CheckContainsText <$SERVERNAME> 01区
#ACT
GAMEGLORY - 30
INC G8 30
SET [7] 1
CONFERTITLE 沙城捐献
;#CALL [封号系统属性更改.txt] @属性更改
SendMsg 6 恭喜你!捐献成功,获得长期属性加成!!!
CLEARNAMELIST ........n598018通区捐献<$STR(A8)>今日01区.txt
AddTextListEx ........n598018通区捐献<$STR(A8)>今日01区.txt 今日首区:<$STR(G8)> 0
GOTO @main
break
 
 
#IF
Check [7] 0
CHECKGAMEGLORY > 29
CheckContainsText <$SERVERNAME> 02区
#ACT
GAMEGLORY - 30
INC G8 30 
SET [7] 1
CONFERTITLE 沙城捐献
;#CALL [封号系统属性更改.txt] @属性更改
SendMsg 6 恭喜你!捐献成功,获得长期属性加成!!!
CLEARNAMELIST ........n598018通区捐献<$STR(A8)>今日02区.txt
AddTextListEx ........n598018通区捐献<$STR(A8)>今日02区.txt 今日二区:<$STR(G8)> 0
GOTO @main
break
 
#IF
Check [7] 0
CHECKGAMEGLORY > 29
CheckContainsText <$SERVERNAME> 03区
#ACT
GAMEGLORY - 30
INC G8 30 
SET [7] 1
CONFERTITLE 沙城捐献
;#CALL [封号系统属性更改.txt] @属性更改
SendMsg 6 恭喜你!捐献成功,获得长期属性加成!!!
CLEARNAMELIST ........n598018通区捐献<$STR(A8)>今日03区.txt
AddTextListEx ........n598018通区捐献<$STR(A8)>今日03区.txt 今日三区:<$STR(G8)> 0
GOTO @main
break
 
#IF
Check [7] 0
CHECKGAMEGLORY > 29
CheckContainsText <$SERVERNAME> 04区
#ACT
GAMEGLORY - 30
INC G8 30 
SET [7] 1
CONFERTITLE 沙城捐献
;#CALL [封号系统属性更改.txt] @属性更改
SendMsg 6 恭喜你!捐献成功,获得长期属性加成!!!
CLEARNAMELIST ........n598018通区捐献<$STR(A8)>今日04区.txt
AddTextListEx ........n598018通区捐献<$STR(A8)>今日04区.txt 今日四区:<$STR(G8)> 0
GOTO @main
break
 
#IF
Check [7] 0
CHECKGAMEGLORY > 29
CheckContainsText <$SERVERNAME> 05区
#ACT
GAMEGLORY - 30
INC G8 30 
SET [7] 1
CONFERTITLE 沙城捐献
;#CALL [封号系统属性更改.txt] @属性更改
SendMsg 6 恭喜你!捐献成功,获得长期属性加成!!!
CLEARNAMELIST ........n598018通区捐献<$STR(A8)>今日05区.txt
AddTextListEx ........n598018通区捐献<$STR(A8)>今日05区.txt 今日五区:<$STR(G8)> 0
GOTO @main
break
 
 
#IF
Check [7] 0
CHECKGAMEGLORY > 29
CheckContainsText <$SERVERNAME> 06区
#ACT
GAMEGLORY - 30
INC G8 30 
SET [7] 1
CONFERTITLE 沙城捐献
;#CALL [封号系统属性更改.txt] @属性更改
SendMsg 6 恭喜你!捐献成功,获得长期属性加成!!!
CLEARNAMELIST ........n598018通区捐献<$STR(A8)>今日06区.txt
AddTextListEx ........n598018通区捐献<$STR(A8)>今日06区.txt 今日六区:<$STR(G8)> 0
GOTO @main
break
 
 
#IF
Check [7] 0
CHECKGAMEGLORY > 29
CheckContainsText <$SERVERNAME> 07区
#ACT
GAMEGLORY - 30
INC G8 30 
SET [7] 1
CONFERTITLE 沙城捐献
;#CALL [封号系统属性更改.txt] @属性更改
SendMsg 6 恭喜你!捐献成功,获得长期属性加成!!!
CLEARNAMELIST ........n598018通区捐献<$STR(A8)>今日07区.txt
AddTextListEx ........n598018通区捐献<$STR(A8)>今日07区.txt 今日七区:<$STR(G8)> 0
GOTO @main
break
 
 
 
#IF
Check [7] 0
CHECKGAMEGLORY > 29
CheckContainsText <$SERVERNAME> 08区
#ACT
GAMEGLORY - 30
INC G8 30 
SET [7] 1
CONFERTITLE 沙城捐献
;#CALL [封号系统属性更改.txt] @属性更改
SendMsg 6 恭喜你!捐献成功,获得长期属性加成!!!
CLEARNAMELIST ........n598018通区捐献<$STR(A8)>今日08区.txt
AddTextListEx ........n598018通区捐献<$STR(A8)>今日08区.txt 今日八区:<$STR(G8)> 0
GOTO @main
break
 
 
 
 

☉若无特殊注明本文皆为传奇版本库原创,转载请保留文章出处。
☉本站提供的资源来源网络收集,仅供学习研究之用切勿用于商业用途。
上一篇:传奇行会竞价脚本提取来自西风烈服务端
下一篇:传奇输入中文验证汉字二及密码(合区轻松无文本记录)可拓展

我要评论
说点什么吧
  • 全部评论(0
    还没有评论,快来抢沙发吧!