GOM引擎传奇全服功能脚本,传奇私服服务端设置综合服务教程范例

GOM引擎传奇全服功能脚本,传奇私服服务端设置综合服务教程范例

20190904095415.png (898.21 KB, 下载次数: 2)

下载附件

2019-9-4 11:45 上传

(@storage @getback )

%100

[@MAIN]

#IF

#ACT

OPENMERCHANTBIGDLG 16 1 1 0 0 0 1 395 2

#say

             <[综合服务生]/SCOLOR=251> 

        <变性服务/SCOLOR=250> <[需要:50000 元宝]/SCOLOR=254> <变性转职/@转职变性100>

        <全服喊话/SCOLOR=250> <[需要:20000酒鬼币]/SCOLOR=254> <全服喊话/@@InPutString88>

;        <在线改名/SCOLOR=250> <[需要:  30 RMB点]/SCOLOR=254> <在线改名/@在线改名>

        <仓库服务/SCOLOR=250> <[144 格可视化仓库]/SCOLOR=254> <仓库服务/@storage>

[@InPutString88]

#IF

CheckStringlength <$STR(S88)> < 1

#act

BREAK

#IF

CheckStringlength <$STR(S88)> > 100

#act

MESSAGEBOX 文字限制50字以内!!

BREAK

#IF

CHECKCREDITPOINT > 19999

#act

CREDITPOINT - 20000

SENDMOVEMSG  0 244 255 290 1  玩家[<$USERNAME>]:<$STR(S88)>

#ELSEACT

MESSAGEBOX 酒鬼币不足!

BREAK

[@在线改名]

<查询名称是否可以使用/@@InputString1(请输入新的名称:)>

<我要改名(花费50RMB点)/@@InputString2(请输入新的名称:)>

[@InputString1]

#IF

Equal S1

#ACT

SENDMSG 6 请输入一个正确的名称

Break

#OR

CheckStringlength S1 > 20

CheckStringlength S1 < 4

#ACT

SENDMSG 6 输入名称长度不正确

Break

#IF

#ACT

QUERYHUMNAMEEXIST S1

[@InputString2]

#IF

CHECKGamePoint > 49

#ELSEACT

messagebox 你RMB点不足!

BREAK

#IF

Equal S2

#ACT

SENDMSG 6 请输入一个正确的名称

Break

#OR

CheckStringlength S2 > 20

CheckStringlength S2 < 4

#ACT

SENDMSG 6 输入名称长度不正确

Break

#IF

#ACT

CHANGEHUMNAME S2

[@转职变性100]

#IF

gender man

#SAY

  <╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗/SCOLOR=7>

  <┊/SCOLOR=7><是不是做男人没什么意思呀,想不想尝尝做女人的味道呀!/SCOLOR=191>  <┊/SCOLOR=7>

  <┊/SCOLOR=7><好了,幸亏上天冥怜有我这个人来帮你,不用担心,手术一眨/SCOLOR=191><┊/SCOLOR=7>

  <┊/SCOLOR=7><眼就好了,你丝毫感觉不到疼痛的,那我们现在就开始吧。。/SCOLOR=191><┊/SCOLOR=7>

  <┊/SCOLOR=7><手术费50000元宝!                   /SCOLOR=191><┊/SCOLOR=7>

  <┊┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┊/SCOLOR=7>

  <┊/SCOLOR=7>                           ┊<变成女的/@towoman><┊/SCOLOR=7>

  <╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝/SCOLOR=7>

#ELSESAY

  <╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗/SCOLOR=7>

  <┊/SCOLOR=7><是不是做女人没什么意思呀,想不想尝尝做男人的味道呀!/SCOLOR=191>  <┊/SCOLOR=7>

  <┊/SCOLOR=7><好了,幸亏上天冥怜有我这个人来帮你,不用担心,手术一眨/SCOLOR=191><┊/SCOLOR=7>

  <┊/SCOLOR=7><眼就好了,你丝毫感觉不到疼痛的,那我们现在就开始吧。。/SCOLOR=191><┊/SCOLOR=7>

  <┊/SCOLOR=7><手术费50000元宝!                   /SCOLOR=191><┊/SCOLOR=7>

  <┊┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┊/SCOLOR=7>

  <┊/SCOLOR=7>                           ┊<变成男的/@toman><┊/SCOLOR=7>

  <╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝/SCOLOR=7>

[@toman]

#IF

CHECKGAMEGOLD > 49999

#ACT

GAMEGOLD - 50000

CHANGEGENDER 0

sendmsg 0 额滴神啊,玩家{<$USERNAME>}成功变性为男人!

sendmsg 0 额滴神啊,玩家{<$USERNAME>}成功变性为男人!

sendmsg 0 额滴神啊,玩家{<$USERNAME>}成功变性为男人!

#SAY

呵呵,你已经变成一位猛男了。  

请下线在进来看看!<返回/@main>

#ELSESAY

钱都没有,想做手术?我这不是慈善机构!! <离开/@exit>

[@towoman]

#IF

CHECKGAMEGOLD > 49999

#ACT

GAMEGOLD - 50000

CHANGEGENDER 1

sendmsg 0 额滴神啊,玩家{<$USERNAME>}成功变性为女人!

sendmsg 0 额滴神啊,玩家{<$USERNAME>}成功变性为女人!

sendmsg 0 额滴神啊,玩家{<$USERNAME>}成功变性为女人!

#SAY

呵呵,你已经变成一位淑女了。  

请下线在进来看看!<返回/@main>

#ELSESAY

钱都没有,想做手术?我这不是慈善机构!! <离开/@exit>

[@storage]

  

需要保管什么东西?

<返回/@main>

[@getback]

  

请看目录决定找什么东西.   

<返回/@main>

文章归发布者所有。发布者:爱到深处,转载请注明出处:https://www.anyitu.com

如该内容侵犯您的权利,请及时联系我们

微信公众号