天下第一脚本
文章作者:传奇私服 文章来源:http://www.zhaokf.com 更新时间:2008-12-17 0:06:05 
男战士申请天下第一....

[@男战申请]
{
#IF
large G1 <$STR(A12)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
EQUAL G1 <$STR(A12)>
large G7 <$STR(A15)>
#act
break
#say
对不起!!你目前还不是最高经验!\\\
#IF
EQUAL G1 <$STR(A12)>
EQUAL G7 <$STR(A15)>
#act
break
#say
对不起!!你目前还不是最高经验!\\\
#IF
HAVEGUILD
#act
break
mov G1 <$STR(A12)>
mov G7 <$EXP>
mov s1 <$USERNAME>\
inc S1 ↘天下第一男战↙
inc S1 \
mov A11 <$USERNAME>
mov A12 <$LEVEL>
mov A13 <$GUILDNAME>
mov A14 <$DATETIME>
mov A15 <$EXP>
SETRANKLEVELNAME <$STR(S1)>
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
AddTextList QuestDiary\天下第一\男战士名单.txt <$USERNAME>
SENDMSG 0 〖%s〗成功申请了天下第一男战士!他在烽烟四起的『<$SERVERNAME>』中修炼成为天下第一,明天的天下第一会是谁?
mov N0 1
#CALL [\\天下第一\重新刷新NPC.txt] @刷新NPC
#say
申请成功!目前今天的天下第一男战士是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开/@exit>
#IF
#act
mov G1 <$STR(A12)>
mov G7 <$EXP>
mov s1 <$USERNAME>\
inc S1 ↘天下第一男战↙\
inc S1 \
mov A11 <$USERNAME>
mov A12 <$LEVEL>
mov A13 暂无
mov A14 <$DATETIME>
mov A15 <$EXP>
SETRANKLEVELNAME <$STR(S1)>
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
;addnamelist ..\QuestDiary\天下第一\男战士名单.txt
AddTextList QuestDiary\天下第一\男战士名单.txt <$USERNAME>
SENDMSG 0 〖%s〗成功申请了天下第一男战士!他在烽烟四起的『<$SERVERNAME>』中修炼成为天下第一,明天的天下第一会是谁?
mov N0 1
#CALL [\\天下第一\重新刷新NPC.txt] @刷新NPC
#say
申请成功!目前今天的天下第一男战士是<$USERNAME>,\
明天的天下第一会是谁? \ \
}

[@刷新NPC]
{
#IF
equal N0 1
#ACT
DelNPC? <$str(A16)>
DelNPC? <$str(A16)>
mov A16 <$str(A11)>
CreateNPC <$str(A16)> 3 316 309 30 功能服务/第一男战-3
CreateNPC <$str(A16)> 0 330 259 35 功能服务/第一男战-0
break

#IF
equal N0 2
#ACT
DelNPC? <$str(A26)>
DelNPC? <$str(A26)>
mov A26 <$str(A21)>
CreateNPC <$str(A26)> 3 310 303 31 功能服务/第一男法-3
CreateNPC <$str(A26)> 0 333 259 37 功能服务/第一男法-0
break

#IF
equal N0 3
#ACT
DelNPC? <$str(A36)>
DelNPC? <$str(A36)>
mov A36 <$str(A31)>
CreateNPC <$str(A36)> 3 301 301 29 功能服务/第一男道-3
CreateNPC <$str(A36)> 0 336 259 39 功能服务/第一男道-0
break


#IF
equal N0 4
#ACT
DelNPC? <$str(A46)>
DelNPC? <$str(A46)>
mov A46 <$str(A41)>
CreateNPC <$str(A46)> 3 313 306 28 功能服务/第一女战-3
CreateNPC <$str(A46)> 0 327 259 36 功能服务/第一女战-0
break

#IF
equal N0 5
#ACT
DelNPC? <$str(A56)>
DelNPC? <$str(A56)>
mov A56 <$str(A51)>
CreateNPC <$str(A56)> 3 307 300 27 功能服务/第一女法-3
CreateNPC <$str(A56)> 0 324 259 38 功能服务/第一女法-0
break

#IF
equal N0 6
#ACT
DelNPC? <$str(A66)>
DelNPC? <$str(A66)>
mov A66 <$str(A61)>
CreateNPC <$str(A66)> 3 298 304 26 功能服务/第一女道-3
CreateNPC <$str(A66)> 0 321 259 40 功能服务/第一女道-0
break

#if
equal N0 0
#ACT
DelNPC? <$str(A16)>
DelNPC? <$str(A16)>
mov A16 <$str(A11)>
CreateNPC <$str(A16)> 3 316 309 30 功能服务/第一男战-3
CreateNPC <$str(A16)> 0 330 259 35 功能服务/第一男战-0
DelNPC? <$str(A26)>
DelNPC? <$str(A26)>
mov A26 <$str(A21)>
CreateNPC <$str(A26)> 3 310 303 31 功能服务/第一男法-3
CreateNPC <$str(A26)> 0 333 259 37 功能服务/第一男法-0
DelNPC? <$str(A36)>
DelNPC? <$str(A36)>
mov A36 <$str(A31)>
CreateNPC <$str(A36)> 3 301 301 29 功能服务/第一男道-3
CreateNPC <$str(A36)> 0 336 259 39 功能服务/第一男道-0
DelNPC? <$str(A46)>
DelNPC? <$str(A46)>
mov A46 <$str(A41)>
CreateNPC <$str(A46)> 3 313 306 28 功能服务/第一女战-3
CreateNPC <$str(A46)> 0 327 259 36 功能服务/第一女战-0
DelNPC? <$str(A56)>
DelNPC? <$str(A56)>
mov A56 <$str(A51)>
CreateNPC <$str(A56)> 3 307 300 27 功能服务/第一女法-3
CreateNPC <$str(A56)> 0 324 259 38 功能服务/第一女法-0
DelNPC? <$str(A66)>
DelNPC? <$str(A66)>
mov A66 <$str(A61)>
CreateNPC <$str(A66)> 3 298 304 26 功能服务/第一女道-3
CreateNPC <$str(A66)> 0 321 259 40 功能服务/第一女道-0
}
浏览次数:302
最新文章
· 冬天里的暖日...
· 有时还要优待一点...
· 迈入美丽的人生...
· 要精致优雅些会更有魅力的...
· 一个人的天空很蓝...
· 不要再开辟出来一片新的战场...
· 远在大洋彼岸...
· 坚持下来的好习惯需要发扬光大...
· 踩在满地的金黄叶上沙沙地很惬意...
· 眉心里都藏着微笑...
热门文章
· 传奇道法一个徘徊在天堂与地狱之间的职业...
· 传奇私服ip...
· 传奇-私服-网站...
· 今日最新开传奇私服...
· 传奇游戏中领略了诸多人的言行...
· 如果传奇只剩下七天...
· 今日新开传奇私服...
· 战士PK之所见...
· 传奇SF脚本中变量解释...
· 传奇2私服代码公布讲解...