网站主页>>部分脚本实例教程 >>>传奇引擎与登陆器论坛: 传奇GM交流论坛

Gom引擎自动输入命令“@鲜花”送给其他玩家鲜花的脚本(完整)实例

更新:2018-12-23

第一步:在UserCmds文本里添加:鲜花  6

第二部:建立一个专门送花的NPC,名称自定

NPC:

(@@InPutString @@inputInteger)
[@main]
#if
#act
mov S$魅力第一 <$STR(A80)>
mov S$魅力第二 <$STR(A81)>
mov S$魅力第三 <$STR(A82)>
mov S$魅力值一 <$STR(G80)>朵玫瑰
mov S$魅力值二 <$STR(G81)>朵玫瑰
mov S$魅力值三 <$STR(G82)>朵玫瑰
SetStringBlank <$STR(S$魅力第一)> 15 1
SetStringBlank <$STR(S$魅力第二)> 15 1
SetStringBlank <$STR(S$魅力第三)> 15 1
SetStringBlank <$STR(S$魅力值一)> 13 1
SetStringBlank <$STR(S$魅力值二)> 13 1
SetStringBlank <$STR(S$魅力值三)> 13 1

#IF
#ACT
OPENMERCHANTBIGDLG 9 12 1 0 1 1 1 395 15
#say
<Img:28:9:0:8> \
    <榜上有名/SCOLOR=154>\
    <玫瑰情人/SCOLOR=19>    <谁于争锋,排行榜上创新高,由你定夺!/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
<魅力No.1:/SCOLOR=91> {<$STR(s$魅力第一)>/SCOLOR=251}<玫瑰数量:/SCOLOR=91>{<$STR(s$魅力值一)>/SCOLOR=250}  \
<魅力No.2:/SCOLOR=92> {<$STR(s$魅力第二)>/SCOLOR=251}<玫瑰数量:/SCOLOR=92>{<$STR(s$魅力值二)>/SCOLOR=250}  \
<魅力No.3:/SCOLOR=93> {<$STR(s$魅力第三)>/SCOLOR=251}<玫瑰数量:/SCOLOR=93>{<$STR(s$魅力值三)>/SCOLOR=250}  \
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
<1./SCOLOR=91><魅力值第一名可获得全属性/SCOLOR=147><5点/SCOLOR=251>\
<2./SCOLOR=92><魅力值第二名可获得全属性/SCOLOR=145><3点/SCOLOR=251>\
<3./SCOLOR=93><魅力值第三名可获得全属性/SCOLOR=155><2点/SCOLOR=251>\
<4./SCOLOR=93><魅力值大于零可获得全属性/SCOLOR=155><1点/SCOLOR=251>\
<5./SCOLOR=89><每朵鲜花需消耗/SCOLOR=156><100元宝/SCOLOR=251>,<接收人可得到/SCOLOR=156><25元宝/SCOLOR=251>\
<6./SCOLOR=103><魅力值最高的玩家上线全服公告提示/SCOLOR=168>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
           <鲜花数据合区保存./SCOLOR=70>\ \
<您的魅力值:/SCOLOR=229> {<$STR(U20)>/SCOLOR=251}<朵玫瑰/SCOLOR=229>      <赠送玫瑰将触发全服全屏滚动/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\
<┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈/SCOLOR=13>\
 <IMG:130:9:0:-11/@赠送>                             <IMG:61:9:0:-11/@exit>\

[@赠送]
#ACT
MESSAGEBOX 赠送鲜花命令:@鲜花 游戏名字 鲜花数量\ \温馨提示:每朵鲜花需要消耗100元宝,被赠送人可获得25元宝
break

 


QF:

 

[@usercmd6]
#if
EQUAL <$PARAM(1)>
EQUAL <$PARAM(2)>
#act
MESSAGEBOX 鲜花至少赠送1朵!
BREAK

#IF
<$PARAM(1)>.checkonline
#ELSEACT
MESSAGEBOX 提示:玩家【<$PARAM(2)>】不在线.
BREAK

#if
EQUAL <$PARAM(2)>
#act
MESSAGEBOX 鲜花至少赠送1朵!
BREAK

#IF
ONLINELONGMIN < 2
#ACT
MESSAGEBOX 提示:当前在线时长未达2分钟,无法使用此功能.
BREAK

#IF
#ACT
MOV S5 <$PARAM(1)>
MUL N$费用 <$PARAM(2)> 100

#if
CHECKGAMEGOLD ? <$STR(N$费用)>
#act
GAMEGOLD - <$STR(N$费用)>
MOV I5 <$PARAM(2)>
MOV A85 <$USERNAME>
SENDMSG 6 你给赠送<$PARAM(1)>赠送了<$PARAM(2)>朵鲜花,你花费了<$STR(N$费用)>元宝
S5.MOV N$结算 0
S5.MUL N$结算 <$STR(I5)> 25
S5.GAMEGOLD +  <$STR(N$结算)>
S5.inc U20 <$STR(I5)>
S5.SENDMSG 6 <$STR(A85)>给你赠送<$STR(I5)>朵鲜花,你获得了<$STR(N$结算)>元宝
HCALL <$STR(S5)> @刷新鲜花榜
#ELSEACT
MESSAGEBOX 提示:赠送<$PARAM(2)>朵鲜花所需<$STR(N$费用)>元宝,请检查你是否有足够的元宝.
BREAK

 


Copyright @ 2013-2020 GameOfMir官方网站 版权所有 Www.Gom-Key.Com 鲁ICP备16028535号-5 GOM传奇引擎与登陆器Gm论坛

敬请关注>
  • 返回顶部
  • 等待添加
  • 986568922
  • 微信二维码
    添加站长微信