传奇一条龙之GOM引擎夫妻光影脚本
以下为NPC脚本预览：(@@InPutString @@InPutInteger)
[@main]
<——————————————————————————————/SCOLOR=215>\
\
<Img:544:0:0:0><夫妻光影特效一旦确定，永久无法解除。/SCOLOR=254>\
<Img:544:0:0:0><该效果两人相距五步内，立刻幻化出好看的光影。/SCOLOR=254>\
<Img:544:0:0:0><我们将在以后的更新中添加更多好看的光影特效。/SCOLOR=69>\
<Img:544:0:0:0><特效需要男方携带5个/SCOLOR=253><夫妻光影材料/@夫妻光影材料><，双方各备50W元宝./SCOLOR=253>\\
\ <Img:551:0:0:0><我确定不反悔/@开始许愿><Img:551:0:0:0><我要回盟重/@盟重><Img:550:0:0:0>\
\ <Img:576:0:0:0><相见争如不见,有情何似无情/SCOLOR=100><Img:576:0:0:0>\
<——————————————————————————————/SCOLOR=215>\
[@盟重]
#ACT
mapmove 3 333 333
[@夫妻光影材料]
\ \
\ \
<——————————————————————————————/SCOLOR=215>\
\
<情深义重地图掉落。/SCOLOR=253>\
<——————————————————————————————/SCOLOR=215>\
[@开始许愿]
<Img:551:0:0:0><夫妻光影系统/SCOLOR=254> <Hot~/SCOLOR=249> <爱情要绚烂，要精彩!夜夜制作 /SCOLOR=31><Img:551:0:0:0>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
<1.你要开启的人必须在线,输入对象名字并提交即可./SCOLOR=239>\
<2.结义时将收取/SCOLOR=239><各方各需50W元宝费用+男方准备5个/SCOLOR=249><夫妻光影材料/@夫妻光影材料> \
<3.开启后可/SCOLOR=239><双方在五步内/SCOLOR=249><即可出现光影特效./SCOLOR=239>\
<4.再次提醒，该效果一旦开启，无法解除。/SCOLOR=239>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
<Img:568:0:0:0><开始吧/@@InPutString11><Img:568:0:0:0><返回上一页/@MAIN><Img:550:0:0:0>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
[@Mrrp_开始结义]
#IF
CHECKVAR HUMAN 夫妻光影状态 =
#ELSEACT
GOTO @MAIN
MESSAGEBOX [错误]:你已经和人开启过了,不要背信弃义哦.
break
#IF
CHECKLEVELEX > 0
#ACT
SetStringBlank S2 30 0
#SAY
<夫妻光影系统/SCOLOR=254> <Hot~/SCOLOR=249> <爱情要绚烂，要精彩!夜夜制作 /SCOLOR=31>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
<1.你要开启的人必须在线,输入对象名字并提交即可./SCOLOR=239>\
<2.结义时将收取/SCOLOR=239><各方各需50W元宝费用+男方准备5个/SCOLOR=249><夫妻光影材料/@夫妻光影材料> \
<3.开启后可/SCOLOR=239><双方在五步内/SCOLOR=249><即可出现光影特效./SCOLOR=239>\
<4.再次提醒，该效果一旦开启，无法解除。/SCOLOR=239>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
<Img:568:0:0:0><开始吧/@Mrrp_开始结义><Img:568:0:0:0><返回上一页/@MAIN><Img:550:0:0:0>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
[@Mrrp_解除结义]
#IF
CHECKVAR HUMAN 夫妻光影状态 = 已结义
#ACT
MOV S2 <$HUMAN(夫妻光影对象)>
#ELSEACT
GOTO @MAIN
MESSAGEBOX [错误]:你并没有开启.
break
#IF
CheckOnline <$STR(S2)>
#ACT
GOTO @开始解除结义8
#ELSEACT
GOTO @MAIN
MESSAGEBOX [错误]:开启对象[<$STR(S2)>]玩家并不在线!
break
[@开始解除结义8]
#IF
#ACT
S2.CALCVAR HUMAN 夫妻光影状态 = 解除吧结义
S2.CALCVAR HUMAN 夫妻光影对象 = <$USERNAME>
GMEXECUTE 开始提问 @解除抛弃结义
#SAY
\ \
<已向对方提出解除开启申请，请耐心等待答复.../SCOLOR=100>\ \
<如果对方拒绝，不扣除元宝./SCOLOR=100>\ \
[@Mrrp_强制解除]
#IF
CHECKVAR HUMAN 夫妻光影状态 = 已结义
#ELSEACT
GOTO @MAIN
MESSAGEBOX [错误]:你并没有开启.
break
#IF
CHECKGAMEGOLD > 499
#ACT
GAMEGOLD - 500
AddTextList .\QuestDiary\夫妻光影系统\强制解除夫妻光影名单.txt <$HUMAN(夫妻光影对象)>
CALCVAR HUMAN 夫妻光影状态 =
CALCVAR HUMAN 夫妻光影对象 =
SAVEVAR HUMAN 夫妻光影状态 ..\QuestDiary\夫妻光影系统\夫妻光影数据.txt
SAVEVAR HUMAN 夫妻光影对象 ..\QuestDiary\夫妻光影系统\夫妻光影数据.txt
DELSKILL 穿云箭
GuildNoticeMsg 239 0 玩家[%s]强制解除自己的结义兄弟，从此割袍断义，再见面就是仇人。
GMEXECUTE 开始提问 @Mrrp_清理结义
MESSAGEBOX 你强制解除结义
close
break
#ELSEACT
GOTO @MAIN
MESSAGEBOX [错误]:你并没用500元宝!
break
[@CallInPutString11]
#IF
checkitem 夫妻光影材料 5
CHECKGAMEGOLD > 499999
#ELSEACT
MESSAGEBOX [错误]:元宝不足50W个或夫妻光影材料不足5个！
BREAK
#IF
CHECKVAR HUMAN 夫妻光影状态 =
#ELSEACT
GOTO @MAIN
MESSAGEBOX [错误]:你已经和人开启过了,不要背信弃义哦.
break
#IF
CheckMarry
#ELSEACT
GOTO @MAIN
MESSAGEBOX [错误]:你还没有和她结婚,请先结婚再来哦.
break
#IF
CheckOnline <$STR(S11)>
#ELSEACT
GOTO @Mrrp_开始结义
MESSAGEBOX [错误]:开启对象[<$STR(S11)>]玩家并不在线!
break
#IF
CHECKPOSEDIR
#ACT
GetOppositeHumName S0
GOTO @Mrrp_开始结义1
#ELSEACT
GOTO @Mrrp_开始结义
MESSAGEBOX [错误]:请与开启对象[<$STR(S11)>]玩家面对面!
break
[@Mrrp_开始结义1]
#IF
EQUAL S0 <$STR(S11)>
#ELSEACT
MESSAGEBOX [错误]:您对面的玩家并非你所输入的[<$STR(S11)>]玩家!
break
#IF
S0.CHECKVAR HUMAN 夫妻光影状态 =
#ELSEACT
MESSAGEBOX [错误]:你输入的玩家已经开启过了,不能挖墙角哦.
BREAK
#IF
S0.CHECKGAMEGOLD > 499999
#ELSEACT
MESSAGEBOX [错误]:你输入的玩家元宝不足50W个
BREAK
#IF
#ACT
S0.CALCVAR HUMAN 夫妻光影状态 = 等待结义
S0.CALCVAR HUMAN 夫妻光影对象 = <$USERNAME>
GMEXECUTE 开始提问 @Mrrp_结义提问
#SAY
\ \
<已向对方提出开启申请，请耐心等待答复.../SCOLOR=100>\ \
<如果对方拒绝，不扣除元宝./SCOLOR=100>\ \
点击下载leg引擎夫妻光影完整脚本
页:
[1]