查看: 2159|回复: 0

GOM引擎转职变态发型专用脚本

[复制链接]
发表于 2018-5-25 08:20:50 | 显示全部楼层 |阅读模式
[@main]
转职是趋势.变性是潮流.\
一切只为了自己喜欢.来把.重新选择你的去向.\ \

<改变性别/@性别变更> 需要花费50W金币\ \

<改变职业/@职业变更> 需要花费500W金币\ \

<改变名字/@@InPutString20> 需要花费1000W金币\ \


<离开/@exit>




[@性别变更]
#IF
gender man
#SAY
是不是做猛男没什么意思呀,想不想尝尝做淑女的滋味呀!!!\ \
『<尝尝/@towoman>』\ \
〖<返回/@main>〗 〖<关闭/@exit>〗
#ELSESAY
是不是做淑女挺累的,想不想尝尝做猛男的滋味呀!!!\ \
『<尝尝/@toman>』\ \
〖<返回/@main>〗 〖<关闭/@exit>〗


[@toman]
#IF
LARGE <$GOLDCOUNT> 499999
#ACT
take 金币 500000
CHANGEGENDER 0
KICK 1
#SAY
呵呵,你已经变成一位猛男了。\ \
<返回/@main>
#ELSEACT
MESSAGEBOX 对不起,您的金币不够50W
[@towoman]
#IF
LARGE <$GOLDCOUNT> 499999
#ACT
take 金币 500000
CHANGEGENDER 1
KICK 1
#SAY
呵呵,你已经变成一位淑女了。\ \
〖<返回/@main>〗 〖<关闭/@exit>〗
#ELSEACT
MESSAGEBOX 对不起,您的金币不够50W






[@职业变更]
#IF
CHECKJOB warrior
#SAY
是不是战士不好玩呀,换换别的职业试试吧!\ \
『<玩玩法师/@法师>』\
『<玩玩道士/@道士>』\ \
〖<返回/@main>〗〖<关闭/@exit>〗
#ACT
break
#IF
CHECKJOB wizard
#SAY
是不是法师不好玩呀,换换别的职业试试吧!\ \
『<玩玩战士/@战士>』\
『<玩玩道士/@道士>』\ \
〖<返回/@main>〗〖<关闭/@exit>〗
#ACT
break
#IF
CHECKJOB taoist
#SAY
是不是道士不好玩呀,换换别的职业试试吧!\ \
『<玩玩战士/@战士>』\
『<玩玩法师/@法师>』\ \
〖<返回/@main>〗〖<关闭/@exit>〗
#ACT
break

[@战士]
#IF
LARGE <$GOLDCOUNT> 4999999
#ACT
take 金币 5000000
CLEARSKILL
CHANGEJOB warrior
Gmexecute JN <$USERNAME> 心灵召唤 3
Gmexecute JN <$USERNAME> 基本剑术 3
GOTO @职业变更
SENDMSG 0 恭喜:玩家「<$USERNAME>」成功转职。
KICK 1
#ELSEACT
MESSAGEBOX 对不起,您的金币不够500W
BREAK

[@法师]
#IF
LARGE <$GOLDCOUNT> 4999999
#ACT
take 金币 5000000
CLEARSKILL
CHANGEJOB WIZARD
Gmexecute JN <$USERNAME> 心灵召唤 3
Gmexecute JN <$USERNAME> 雷电术 3
GOTO @职业变更
SENDMSG 0 恭喜:玩家「<$USERNAME>」成功转职。
KICK 1
#ELSEACT
MESSAGEBOX 对不起,您的金币不够500W
BREAK

[@道士]
#IF
LARGE <$GOLDCOUNT> 4999999
#ACT
take 金币 5000000
CLEARSKILL
CHANGEJOB taoist
Gmexecute JN <$USERNAME> 心灵召唤 3
Gmexecute JN <$USERNAME> 灵魂火符 3
GOTO @职业变更
SENDMSG 0 恭喜:玩家「<$USERNAME>」成功转职。
KICK 1
#ELSEACT
MESSAGEBOX 对不起,您的金币不够500W
BREAK









[@InPutString20]
#IF
LARGE <$GOLDCOUNT> 9999999
#ACT
#ELSEACT
MESSAGEBOX 对不起,您的金币不够1000W
BREAK


#IF
Equal S20
#ACT
SENDMSG 6 请输入一个正确的名称
Break

#OR
CheckStringlength S20 > 14
CheckStringlength S20 < 4
#ACT
SENDMSG 6 输入名称长度不正确
Break


#IF
#ACT
CHANGEHUMNAME S20





回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册登录

本版积分规则

热点图文

网站分类|小黑屋|爱上gm论坛 |网站地图

GMT+8, 2025-5-1 11:34 , Processed in 0.182868 second(s), 33 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.