制作传奇封号 称呼 官爵 并带升级的脚本

有一定的官爵职位或者封号上升到另外的官爵地位，享受不同的级别待遇，领取不同的等级属性，这样是不是很厉害呢？很吸引玩家呢？其实这样的脚本不是很难 做，而且用脚本完全就能控制整个地位升级，传奇私服就在于没有做不到的，只有你想不到的，这也是能否抓住玩家，决定游戏可玩性高低的一个因素，下面就介绍 这个脚本的做法，为了保护作者的权利，请大家在转载的时候务必写上出处：

脚本开始：
(@@offlinemsg @@sendmsg @makedrug @@useitemname @getsellgold @selloff @buyoff @@dealgold @storage @@RecallPneuma @getback @getnextpage @getPreviouspage @repair @s_repair @@InPutString )；此处脚本变量不可以更改。否则不会被触发到。
[@main]
#IF
checknamelist ..\QuestDiary\官职系统\王.txt
#say
本服唯一的<《王》>，您1天可以T5个人下线\
还可领取裨将(宝宝)，偏将(宝宝)，谋事(宝宝)其中一个！！\
和一天1个小时的4.0倍经验和20分钟3.0倍攻击\ \
<领取裨将/@领取裨将>         <领取谋事/@领取谋事>         <领取偏将/@领取偏将>\
<踢人下线/@踢人下线>         <王的奖励/@王的奖励>\
<领取4.0倍经验（60分钟）/@领25经验>\
<领取3.0倍攻击（20分钟）/@领25攻击>\
#act
break
#IF
checknamelist ..\QuestDiary\官职系统\大将军.txt
#say
您现在的官职是：<《大将军》>！！\
您可以享受领取裨将(宝宝)，偏将(宝宝)其中一个！！\
和一天3个小时的2.0倍经验和100分钟2.0倍攻击\ \
<领取裨将/@领取裨将>         <领取谋事/@领取谋事>\ \
<领取2.0倍经验（180分钟）/@领20经验>\
<领取2.0倍攻击（100分钟）/@领20攻击>\
<晋升〈王〉/@晋升王>          <了解官职系统/@了解>\
#act
break
#IF
checknamelist ..\QuestDiary\官职系统\将军.txt
#say
您现在的官职是：<《将军》>！！\
您可以享受领取一个裨将(宝宝)\
和一天120分钟的2.0倍经验和90分钟2.0倍攻击\ \
<领取裨将/@领取裨将> \ \
<领取2.0倍经验（120分钟）/@领18经验>\
<领取2.0倍攻击（90分钟）/@领18攻击>\
<晋升〈大将军〉/@晋升大将军>          <了解官职系统/@了解>\
#act
break
#IF
checknamelist ..\QuestDiary\官职系统\国尉.txt
#say
您现在的官职是：<《国尉》>！！\
您可以享受领取兵，卒，勇(宝宝)其中一个！\
和一天90分钟的2.0倍经验和60分钟2.0倍攻击\ \
<领取兵/@领取兵>         <领取卒/@领取卒>         <领取勇/@领取勇>\
<领取2.0倍经验（90分钟）/@领15经验>\
<领取2.0倍攻击（60分钟）/@领15攻击>\
<晋升〈将军〉/@晋升将军>          <了解官职系统/@了解>\
#act
break

#IF
checknamelist ..\QuestDiary\官职系统\廷尉.txt
#say
您现在的官职是：<《廷尉》>！！\
您可以享受领取兵，卒(宝宝)其中一个！\
和一天60分钟的2.0倍经验和50分钟2.0倍攻击\ \
<领取兵/@领取兵>         <领取卒/@领取卒>\
<领取2.0倍经验（60分钟）/@领13经验>\
<领取2.0倍攻击（50分钟）/@领13攻击>\
<晋升〈国尉〉/@晋升国尉>          <了解官职系统/@了解>\
#act
break

#IF
checknamelist ..\QuestDiary\官职系统\少府.txt
#say
您现在的官职是：<《少府》>！！\
您可以享受领取兵(宝宝)一个！\
和一天40分钟的2.0倍经验和30分钟2.0倍攻击\ \
<领取兵/@领取兵> \
<领取2.0倍经验（40分钟）/@领12经验>\
<领取2.0倍攻击（30分钟）/@领12攻击>\
<晋升〈廷尉〉/@晋升廷尉>          <了解官职系统/@了解>\
#act
break

#IF
#say
本服新增<官职系统> \ \

50级后声望点20点和荣誉点达到5点就可以申请官职\  \

然后完成相应的任务就可获得相应的官职官职越高享受的待遇越高哦！\ \

<申请官职/@jiarubingyuan>        <了解官职系统/@了解>\ \

[@晋升王]
#IF
IsCastleMaster
CHECKLEVELEX > 89
CHECKCREDITPOINT > 199
CHECKGAMEDIAMOND > 49
#ACT
CREDITPOINT - 200
GAMEDIAMOND - 50
ClearNameList ..\QuestDiary\官职系统\王.txt
addnamelist ..\QuestDiary\官职系统\王.txt
#CALL [\登陆设置\封号系统.txt]  @封号系统
messagebox 恭喜！您申请《王》成功！！
close
break
#elsesay
晋升《王》需要90级声望200点和50点荣誉值！并且为沙城城主。\ \

您当前声望是：<$CREDITPOINT>点  您当前荣誉值是:<$GAMEDIAMOND>\ \

<返回/@main>

[@晋升大将军]
#IF
check [638] 1
#say
您申请的官职任务正在进行中……\ \
目前杀怪数为：<$HUMAN(杀怪数)>\ \
在打工营地杀满1000个敌人即可完成任务\ \
<返回/@main>
#act
break
#IF
CHECKLEVELEX > 81
CHECKCREDITPOINT > 99
CHECKGAMEDIAMOND > 49
#ACT
CREDITPOINT - 100
GAMEDIAMOND - 50
messagebox 去打工营地打死1000个[敌人]就可成为：大将军
set [638] 1
close
break
#elsesay
晋升大将军需要82级声望100点和50点荣誉值. \ \

您当前声望是：<$CREDITPOINT>点  您当前荣誉值是:<$GAMEDIAMOND>\ \

<返回/@main>


[@晋升将军]
#IF
check [637] 1
#say
您申请的官职任务正在进行中……\ \
目前杀怪数为：<$HUMAN(杀怪数)>\ \
在打工营地杀满500个敌人即可完成任务\ \
<返回/@main>
#act
break

#IF
CHECKLEVELEX > 75
CHECKCREDITPOINT > 30
CHECKGAMEDIAMOND > 19
#ACT
CREDITPOINT - 30
GAMEDIAMOND - 20
messagebox 去打工营地打死500个[敌人]就可成为：将军
set [637] 1
close
break
#elsesay
晋升将军需要76级声望30点和20点荣誉值. \ \

您当前声望是：<$CREDITPOINT>点  您当前荣誉值是:<$GAMEDIAMOND>\ \

<返回/@main>

[@晋升国尉]
#IF
check [636] 1
#say
您申请的官职任务正在进行中……\ \
目前杀怪数为：<$HUMAN(杀怪数)>\ \
在打工营地杀满200个敌人即可完成任务\ \
<返回/@main>
#act
break

#IF
CHECKLEVELEX > 67
CHECKCREDITPOINT > 19
CHECKGAMEDIAMOND > 9
#ACT
GAMEDIAMOND - 10
messagebox 去打工营地打死200个[敌人]就可成为：国尉
set [636] 1
close
break
#elsesay
晋升国尉需要68级声望20点和10点荣誉值. \ \

您当前声望是：<$CREDITPOINT>点  您当前荣誉值是:<$GAMEDIAMOND>\ \

<返回/@main>

[@晋升廷尉]
#IF
check [635] 1
#say
您申请的官职任务正在进行中……\ \
目前杀怪数为：<$HUMAN(杀怪数)>\ \
在打工营地杀满100个敌人即可完成任务\ \
<返回/@main>
#act
break

#IF
CHECKLEVELEX > 59
CHECKCREDITPOINT > 9
CHECKGAMEDIAMOND > 9
#ACT
CREDITPOINT - 10
GAMEDIAMOND - 10
messagebox 去打工营地打死100个[敌人]就可成为：廷尉
set [635] 1
close
break
#elsesay
晋升廷尉需要60级声望10点和10点荣誉值. \ \

您当前声望是：<$CREDITPOINT>点  您当前荣誉值是:<$GAMEDIAMOND>\ \

<返回/@main>
[@jiarubingyuan]
#IF
check [634] 1
#say
您申请的官职任务正在进行中……\ \
目前杀怪数为：<$HUMAN(杀怪数)>\ \
在打工营地杀满10个敌人即可完成任务\ \
<返回/@main>
#act
break
#IF
checknamelist ..\QuestDiary\官职系统\少府.txt
#SAY
你已经是官职系统中的一员了！！\ \
<返回/@main>
#ACT
break
#IF
CHECKLEVELEX > 49
CHECKCREDITPOINT > 9
CHECKGAMEDIAMOND > 4
#ACT
CREDITPOINT - 10
GAMEDIAMOND - 5
messagebox 去打工营地打死10个[敌人]就可成为：少府
set [634] 1
close
break
#elsesay
你没有达到申请官职所需要的条件！申请官职需要10点声望和5点荣誉值. \ \

您当前声望是：<$CREDITPOINT>点  您当前荣誉值是:<$GAMEDIAMOND>\ \

<返回/@main>

[@踢人下线]
您的专用权限，看谁不爽就<踢>谁！！但是每天只能<踢5次>哦！！\
您今天还可踢人下线：<$STR(G93)>次！！\ \
<点这里输入要踢下线玩家的名字/@@InPutString5>\ \
<返回/@Main>

[@InPutString5]
#if
SMALL G93 1
#act
messagebox 您今天的踢人数已经达到上限！！明天再踢吧！
#elseACT
DELAYGOTO 1 @InPutString5
[@InPutString5]
#IF
#ACT
GMEXECUTE T <$STR(S5)>
SENDMSG 0 [%S]使用王的特权将<$STR(S5)>踢下线了！！
dec G93 1
[@IsInFilterList]
#ACT
MESSAGEBOX 输入数据中包含了非法字符，请重新编辑！


[@领25经验]
#If
check [622] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [622] 1
KillMonExpRate 250 10800
MESSAGEBOX 您当前杀怪经验倍数为2.5倍.有效时间 3小时.

[@领25攻击]
#If
check [623] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [623] 1
PowerRate 250 1200
MESSAGEBOX 您当前攻击倍数为2.5倍.有效时间 20分钟.

[@领20经验]
#If
check [624] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [624] 1
KillMonExpRate 200 7200
MESSAGEBOX 您当前杀怪经验倍数为2倍.有效时间 2小时.

[@领20攻击]
#If
check [625] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [625] 1
PowerRate 200 1200
MESSAGEBOX 您当前攻击倍数为2倍.有效时间 20分钟.

[@领18经验]
#If
check [626] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [626] 1
KillMonExpRate 180 5400
MESSAGEBOX 您当前杀怪经验倍数为1.8倍.有效时间 90分钟.

[@领18攻击]
#If
check [627] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [627] 1
PowerRate 180 1200
MESSAGEBOX 您当前攻击倍数为1.8倍.有效时间 20分钟.

[@领15经验]
#If
check [628] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [628] 1
KillMonExpRate 150 3600
MESSAGEBOX 您当前杀怪经验倍数为1.5倍.有效时间 60分钟.

[@领15攻击]
#If
check [629] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [629] 1
PowerRate 150 1800
MESSAGEBOX 您当前攻击倍数为1.5倍.有效时间 30分钟.

[@领13经验]
#If
check [630] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [630] 1
KillMonExpRate 130 2400
MESSAGEBOX 您当前杀怪经验倍数为1.3倍.有效时间 40分钟.

[@领13攻击]
#If
check [631] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [631] 1
PowerRate 130 1800
MESSAGEBOX 您当前攻击倍数为1.3倍.有效时间 30分钟.

[@领12经验]
#If
check [632] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [632] 1
KillMonExpRate 120 1200
MESSAGEBOX 您当前杀怪经验倍数为1.2倍.有效时间 20分钟.

[@领12攻击]
#If
check [633] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
set [633] 1
PowerRate 120 1800
MESSAGEBOX 您当前攻击倍数为1.2倍.有效时间 30分钟.

[@领取裨将]
#IF
checkitem 金条 1
CHECKSLAVECOUNT < 1
#ACT
take 金条 1
RECALLMOB 裨将 3 12000  1
#SAY
好好看着自己的宝宝，不要乱咬人。
#ELSESAY
每次只能领取一个宝宝，并且需要一根金条！！


[@领取偏将]
#IF
checkitem 金条 1
CHECKSLAVECOUNT < 1
#ACT
take 金条 1
RECALLMOB 偏将 3 12000  1
#SAY
好好看着自己的宝宝，不要乱咬人。
#ELSESAY
每次只能领取一个宝宝，并且需要一根金条！！


[@领取谋事]
#IF
checkitem 金条 1
CHECKSLAVECOUNT < 1
#ACT
take 金条 1
RECALLMOB 谋事 3 12000  1
#SAY
好好看着自己的宝宝，不要乱咬人。
#ELSESAY
每次只能领取一个宝宝，并且需要一根金条！！


[@领取勇]
#IF
checkitem 金条 1
CHECKSLAVECOUNT < 1
#ACT
take 金条 1
RECALLMOB 勇 3 12000  1
#SAY
好好看着自己的宝宝，不要乱咬人。
#ELSESAY
每次只能领取一个宝宝，并且需要一根金条！！


[@领取卒]
#IF
checkitem 金条 1
CHECKSLAVECOUNT < 1
#ACT
take 金条 1
RECALLMOB 卒 3 12000  1
#SAY
好好看着自己的宝宝，不要乱咬人。
#ELSESAY
每次只能领取一个宝宝，并且需要一根金条！！

 

[@领取兵]
#IF
checkitem 金条 1
CHECKSLAVECOUNT < 1
#ACT
take 金条 1
RECALLMOB 兵 3 12000  1
#SAY
好好看着自己的宝宝，不要乱咬人。
#ELSESAY
每次只能领取一个宝宝，并且需要一根金条！！

 

[@了解]
<35级>声望点5点和镇魔点达到<20点>可申请官职，然后完成任务\ \
（任务为打工营地打死10个怪物[敌人]）成为少府！奖励武魂系列刀\ \
 一天20分钟的1.2倍经验和30分钟的1。2倍攻击\ \
领取 一个兵（宝宝 武士） \ \
<返回/@main>    <下一页/@了解1>

[@了解1]
<45级>声望点10点和镇魔点达到<50点>可申请官职，然后完成任务\ \
（任务为打工营地打死100个怪物[敌人]）成为少府！奖励精灵系列刀\ \
 一天40分钟的1.3倍经验和30分钟1.3倍攻击\ \
领取 一个卒（宝宝 道士） \ \
<返回/@main>    <下一页/@了解2>    <上一页/@了解>

[@了解2]
<55级>声望点20点和镇魔点达到<100点>可申请官职，然后完成任务\ \
（任务为打工营地打死200个怪物[敌人]）成为国尉！奖励无敌系列刀\ \
一天60分钟的1.5倍经验和30分钟1.5倍攻击\ \
领取一个兵（宝宝）一个卒（道士） 一个勇(法师)\ \
<返回/@main>    <下一页/@了解3>    <上一页/@了解1>

[@了解3]
<65级>声望点50和镇魔点达到<500点>可申请官职，然后完成任务\ \
（任务为打工营地打死500个怪物[敌人]）成为将军！奖励龙吟系列刀\ \
一天90分钟的1.8倍经验和20分钟1.8倍攻击\ \
领取一个裨将（宝宝武士）\ \
<返回/@main>    <下一页/@了解4>    <上一页/@了解2>

[@了解4]
<75级>声望点100点和镇魔点<800点>可申请官职，然后完成任务\ \
（任务为打工营地打死1000个怪物[敌人]）成为大将军！奖励强化龙吟系列刀\ \
一天2个小时的2.0倍经验和20分钟2.0倍攻击\ \
一个偏将 (道士宝宝) \ \
<返回/@main>    <下一页/@了解5>    <上一页/@了解3>


[@了解5]
<80级>声望点200点和镇魔点<1000点>可申请官职，然后完成任务\
（任务为拿下沙以后）成为《王》全区唯一！奖励狂雷.武器一把\ \
一天3个小时的2.5倍经验和20分钟2.5倍攻击\
可以发红字沙城，1天可以T5个人下线！！\
一个裨将（宝宝）一个偏将 (道士) 一个谋事(法师)\ \
<返回/@main>    <上一页/@了解4>

[@王的奖励]
#If
check [639] 1
#act
messagebox 对不起，今天您已经领取过了！！
break
#elseAct
GOTO @领取奖励123

[@领取奖励123]
#IF
checkjob warrior
#act
GIVE 王者之剑 1
SENDMSG 0 %s成功晋升为本区唯一的王，获得奖励王者之剑。
set [639] 1
break

#IF
checkjob wizard
#act
GIVE 王者之刃 1
SENDMSG 0 %s成功晋升为本区唯一的王，获得奖励王者之刃。
set [639] 1
break

#IF
checkjob taoist
#act
GIVE 王者之杖 1
SENDMSG 0 %s成功晋升为本区唯一的王，获得奖励王者之杖。
set [639] 1
break

全文脚本结束，在脚本中，涉及到武器领取的，如果你的传奇中没有此武器，请改写成有你脚本的武器或者装备名称即可。

作者:传奇十万个为什么 发表时间:2010-01-10
本文:热血传奇私服资源网版权所有，未经允许转载必究。

对此文章有什么疑问，请提交在传奇论坛