传奇衙门捕快系统脚本

[@衙门榜单]
{
为了让游戏PK更有意思.本服独家推出衙门捕快系统\ \
<本届衙门捕快>：<$STR(A41)>\
<当前捕快封号>：<$STR(A498)>\
<当前追捕人物>：<$STR(A497)>\ \
<捕快已经追杀>：<$STR(G22)> 人  <捕快已经误杀>：<$STR(G23)> 人\ \
<查看捕快规则/@查看规则>                         <返回顾回头页/@MAIN>
[@查看规则]
每周礼拜六下午13：10系统按期举行，所有玩家都可以参加\
最后获胜者即可赢得捕快封号.捕快可以在皇宫内修改自己的封号\
<沙城主也有权利修改捕快封号>.系统随机提示当前追杀的人物\
捕快假如杀死系统当条件示人物.将随机得到奖励.也可能无奖励\
只要完成杀死系统提示的10个人.并且误杀不超过5人.即可到皇宫\
领取衙门奖励!<假如误杀超过5人.无奖励.超过10人取消资格>\ \
捕快完成任务可随机获得:经验.声望.金钥匙.活跃等     <返回上页/@衙门榜单>
}
[@2008年飞尔16版]
{
#IF
INCASTLEWARAREA
#ACT
SENDCOLORMSG 1 251 249 提示：处于攻城区域，杀人不会增加误杀数目，也无任何奖励
break
#IF
COMPARETEXT S0 A497
#ACT
MOV D5 3
GOTO @指定奖励
MOV A497
break
#ELSEACT
INC G23 1
MOV D5 3
GOTO @误杀惩罚
MOV A497
break
[@误杀惩罚]
#IF
CHECKEXP > 1000000
equal D5 0
#ACT
CHANGEEXP - 1000000
MOV D5 0
SENDMOVEMSG 0 251 249 1 『<$STR(S0)>』未被衙门通缉.被捕快『<$USERNAME>』误杀!本日已经误杀[<$STR(G23)>]人!捕快经验丢失100万!
break
#IF
CHECKCREDITPOINT > 4
equal D5 1
#ACT
CREDITPOINT - 5
MOV D5 0
SENDMOVEMSG 0 251 249 1 『<$STR(S0)>』未被衙门通缉.被捕快『<$USERNAME>』误杀!本日已经误杀[<$STR(G23)>]人!捕快声望降低[5点]!
break
#IF
CHECKGAMEGOLD > 499
equal D5 2
#ACT
GAMEGOLD - 500
MOV D5 0
SENDMOVEMSG 0 251 249 1 『<$STR(S0)>』未被衙门通缉.被捕快『<$USERNAME>』误杀!本日已经误杀[<$STR(G23)>]人!捕快丢失元宝[500个]!
break
#IF
CHECKGAMEPOINT > 99
equal D5 3
#ACT
GAMEPOINT - 100
MOV D5 0
SENDMOVEMSG 0 251 249 1 『<$STR(S0)>』未被衙门通缉.被捕快『<$USERNAME>』误杀!本日已经误杀[<$STR(G23)>]人!捕快丢失活跃[100点]!
break
#ELSEACT
SENDMOVEMSG 0 251 249 1 『<$STR(S0)>』未被衙门通缉.被捕快『<$USERNAME>』误杀!本日已经误杀[<$STR(G23)>]人!
break
[@指定奖励]
#IF
S0.CHECKEXP > 5000000
equal D5 0
#ACT
S0.CHANGEEXP - 5000000
CHANGEEXP + 5000000
CHANGEPKPOINT - 100
MOV D5 0
INC G22 1
MOV M70 <$LEVEL>
MUL M70 50000
ChangeExp + M70
SENDMOVEMSG 0 251 249 1 『<$STR(S0)>』已被捕快『<$USERNAME>』就地处死!奖励经验[500W]+经验[<$STR(M70)>]!
S0.SENDMSG 5 提示：你已被衙门通缉.现被捕快杀死.你丢失经验[500W]!
break
#IF
S0.CHECKCREDITPOINT > 9
equal D5 1
#ACT
S0.CREDITPOINT - 10
CREDITPOINT + 10
CHANGEPKPOINT - 100
MOV D5 0
INC G22 1
MOV M70 <$LEVEL>
MUL M70 50000
ChangeExp + M70
SENDMOVEMSG 0 251 249 1 『<$STR(S0)>』已被捕快『<$USERNAME>』就地处死!奖励声望[10点]+经验[<$STR(M70)>]!
S0.SENDMSG 5 提示：你已被衙门通缉.现被捕快杀死.你丢失声望[10点]!
break
#IF
S0.CHECKGAMEGOLD > 499
equal D5 2
#ACT
S0.GAMEGOLD - 500
GAMEGOLD + 500
CHANGEPKPOINT - 100
MOV D5 0
INC G22 1
MOV M70 <$LEVEL>
MUL M70 50000
ChangeExp + M70
SENDMOVEMSG 0 251 249 1 『<$STR(S0)>』已被捕快『<$USERNAME>』就地处死!奖励元宝[500个]+经验[<$STR(M70)>]!
S0.SENDMSG 5 提示：你已被衙门通缉.现被捕快杀死.你丢失元宝[500个]!
break
#IF
S0.CHECKGAMEPOINT > 99
equal D5 3
#ACT
S0.GAMEPOINT - 100
GAMEPOINT + 100
CHANGEPKPOINT - 100
MOV D5 0
INC G22 1
MOV M70 <$LEVEL>
MUL M70 50000
ChangeExp + M70
SENDMOVEMSG 0 251 249 1 『<$STR(S0)>』已被捕快『<$USERNAME>』就地处死!奖励活跃[100点]+经验[<$STR(M70)>]!
S0.SENDMSG 5 提示：你已被衙门通缉.现被捕快杀死.你丢失活跃[100点]!
break
#ELSEACT
CHANGEPKPOINT - 100
MOV D5 0
INC G22 1
MOV M70 <$LEVEL>
MUL M70 50000
ChangeExp + M70
SENDMOVEMSG 0 251 249 1 『<$STR(S0)>』已被捕快『<$USERNAME>』就地处死!奖励捕快经验[<$STR(M70)>].本日已杀[<$STR(G22)>]人.误杀[<$STR(G23)>]人!
break
}
[@追杀名单]
{
#IF
CHECKLEVELEX < 149
#ACT
break
#IF
ISOFFLINEMODE
#ACT
break
#IF
CHECKNAMELIST ..\QuestDiary\宇皓数据\封号系统\流动名单\捕快名单.txt
#ACT
break
#IF
ISADMIN
#ACT
break
#ELSEACT
ADDNAMELIST ..\QuestDiary\宇皓数据\变量文件\捕杀名单.txt
break
}