天下第一腳本BLUE引擎傳奇NPC腳本代碼編寫

天下第一腳本BLUE引擎傳奇NPC腳本代碼編寫天下第一腳本BLUE編寫的天下第一腳本（傳奇）

天下第一腳本功能:
1.檢測申請人等級，最高即可申請當前職業的天下第一；
2.申請成功后可獲得1.1倍攻擊屬性；
3.系統每六小時刷新清零一次，刷新后需要重新申請；
4.如碰到最高等級相同的兩個或幾個人，可使用無限RMB申請。


()
%100
[@main]
國王有令：為天下最強的勇士們在盟重土城樹立雕像，彰顯 \
他們名號。天下群豪盡可以到我這里來登記在案，看看到底 \
誰是群雄中的最強者。如果來登記的勇士中你是最強的一位 \
你從此以后就可以名揚天下了。 \
<我是天下第一/@天下第一> \
<天下第一有誰/@查看第一> \
<離開/@exit> \
[@查看第一]
<天下第一男戰士/@男戰> \
<天下第一女戰士/@女戰> \
<天下第一男道士/@男道> \
<天下第一女道士/@女道> \
<天下第一男法師/@男法> \
<天下第一女法師/@女法> \
[@天下第一]
#IF
CHECKLEVELEX < 49
#act
break
#say
看來你很有信心，不過你還沒有達到資格，你需要50級來證明自己的實力\
現在來申請天下第一恐怕還嫌早.\
<離開/@exit>
#IF
gender man
checkjob warrior
#act
break
mov A0 <$LEVEL>
goto @男戰申請
#IF
gender man
checkjob wizard
#act
break
mov A1 <$LEVEL>
goto @男法申請
#IF
gender man
checkjob taoist
#act
break
mov A2 <$LEVEL>
goto @男道申請
#IF
checkjob warrior
#act
break
mov A3 <$LEVEL>
goto @女戰申請
#IF
checkjob wizard
#act
break
mov A4 <$LEVEL>
goto @女法申請
#IF
checkjob taoist
#act
break
mov A5 <$LEVEL>
goto @女道申請
[@男戰申請]
#IF
large G24 <$STR(A0)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
EQUAL G24 <$STR(A0)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
HAVEGUILD
#act
break
mov G24 <$STR(A0)>
mov s1 ↘天下第一男戰↙\
inc S1 <$USERNAME>
inc S1 \
mov A6 <$USERNAME>
mov A7 <$GUILDNAME>
mov A8 <$LEVEL>
mov A9 <$DATETIME>
SETRANKLEVELNAME <$STR(S1)>
CLEARNAMELIST ..\QuestDiary\天下第一\男戰士名單.txt
addnamelist ..\QuestDiary\天下第一\男戰士名單.txt
SENDMSG 4 %s成功申請了天下第一男戰士！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一男戰士！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一男戰士是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
#IF
#act
mov G24 <$STR(A0)>
mov s1 ↘天下第一男戰↙\
inc S1 <$USERNAME>
inc S1 \
mov A6 <$USERNAME>
mov A7 暫無
mov A8 <$LEVEL>
mov A9 <$DATETIME>
SETRANKLEVELNAME <$STR(S1)>
CLEARNAMELIST ..\QuestDiary\天下第一\男戰士名單.txt
addnamelist ..\QuestDiary\天下第一\男戰士名單.txt
SENDMSG 4 %s成功申請了天下第一男戰士！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一男戰士！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一男戰士是<$USERNAME>，\
明天的天下第一會是誰？ \ \
[@男法申請]
#IF
large G25 <$STR(A1)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
EQUAL G25 <$STR(A1)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
HAVEGUILD
#act
break
mov G25 <$STR(A1)>
mov s2 ↘天下第一男法↙\
inc S2 <$USERNAME>
inc S2 \
mov A10 <$USERNAME>
mov A11 <$GUILDNAME>
mov A12 <$LEVEL>
mov A13 <$DATETIME>
SETRANKLEVELNAME <$STR(S2)>
CLEARNAMELIST ..\QuestDiary\天下第一\男法師名單.txt
addnamelist ..\QuestDiary\天下第一\男法師名單.txt
SENDMSG 4 %s成功申請了天下第一男法師！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一男法師！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一男法師是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
#IF
#act
mov G25 <$STR(A1)>
mov s2 ↘天下第一男法↙\
inc S2 <$USERNAME>
inc S2 \
mov A10 <$USERNAME>
mov A11 暫無
mov A12 <$LEVEL>
mov A13 <$DATETIME>
SETRANKLEVELNAME <$STR(S2)>
CLEARNAMELIST ..\QuestDiary\天下第一\男法師名單.txt
addnamelist ..\QuestDiary\天下第一\男法師名單.txt
SENDMSG 4 %s成功申請了天下第一男法師！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一男法師！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一男法師是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
[@男道申請]
#IF
large G26 <$STR(A2)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
EQUAL G26 <$STR(A2)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
HAVEGUILD
#act
break
mov G26 <$STR(A2)>
mov s3 ↘天下第一男道↙\
inc S3 <$USERNAME>
inc S3 \
mov A14 <$USERNAME>
mov A15 <$GUILDNAME>
mov A16 <$LEVEL>
mov A17 <$DATETIME>
SETRANKLEVELNAME <$STR(S3)>
CLEARNAMELIST ..\QuestDiary\天下第一\男道士名單.txt
addnamelist ..\QuestDiary\天下第一\男道士名單.txt
SENDMSG 4 %s成功申請了天下第一男道士！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一男道士！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一男道士是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
#IF
#act
mov G26 <$STR(A2)>
mov s3 ↘天下第一男道↙\
inc S3 <$USERNAME>
inc S3 \
mov A14 <$USERNAME>
mov A15 暫無
mov A16 <$LEVEL>
mov A17 <$DATETIME>
SETRANKLEVELNAME <$STR(S3)>
CLEARNAMELIST ..\QuestDiary\天下第一\男道士名單.txt
addnamelist ..\QuestDiary\天下第一\男道士名單.txt
SENDMSG 4 %s成功申請了天下第一男道士！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一男道士！他在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一男道士是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
[@女戰申請]
#IF
large G27 <$STR(A3)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
EQUAL G27 <$STR(A3)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
HAVEGUILD
#act
break
mov G27 <$STR(A3)>
mov s4 ↘天下第一女戰↙\
inc S4 <$USERNAME>
inc S4 \
mov A18 <$USERNAME>
mov A19 <$GUILDNAME>
mov A20 <$LEVEL>
mov A21 <$DATETIME>
SETRANKLEVELNAME <$STR(S4)>
CLEARNAMELIST ..\QuestDiary\天下第一\女戰士名單.txt
addnamelist ..\QuestDiary\天下第一\女戰士名單.txt
SENDMSG 4 %s成功申請了天下第一女戰士！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一女戰士！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一女戰士是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
#IF
#act
mov G27 <$STR(A3)>
mov s4 ↘天下第一女戰↙\
inc S4 <$USERNAME>
inc S4 \
mov A18 <$USERNAME>
mov A19 暫無
mov A20 <$LEVEL>
mov A21 <$DATETIME>
SETRANKLEVELNAME <$STR(S4)>
CLEARNAMELIST ..\QuestDiary\天下第一\女戰士名單.txt
addnamelist ..\QuestDiary\天下第一\女戰士名單.txt
SENDMSG 4 %s成功申請了天下第一女戰士！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一女戰士！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一女戰士是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
[@女法申請]
#IF
large G28 <$STR(A4)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
EQUAL G28 <$STR(A4)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
HAVEGUILD
#act
break
mov G28 <$STR(A4)>
mov s5 ↘天下第一女法↙\
inc S5 <$USERNAME>
inc S5 \
mov A22 <$USERNAME>
mov A23 <$GUILDNAME>
mov A24 <$LEVEL>
mov A25 <$DATETIME>
SETRANKLEVELNAME <$STR(S5)>
CLEARNAMELIST ..\QuestDiary\天下第一\女法師名單.txt
addnamelist ..\QuestDiary\天下第一\女法師名單.txt
SENDMSG 4 %s成功申請了天下第一女法師！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一女法師！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一女法師是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
#IF
#act
mov G28 <$STR(A4)>
mov s5 ↘天下第一女法↙\
inc S5 <$USERNAME>
inc S5 \
mov A22 <$USERNAME>
mov A23 暫無
mov A24 <$LEVEL>
mov A25 <$DATETIME>
SETRANKLEVELNAME <$STR(S5)>
CLEARNAMELIST ..\QuestDiary\天下第一\女法師名單.txt
addnamelist ..\QuestDiary\天下第一\女法師名單.txt
SENDMSG 4 %s成功申請了天下第一女法師！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一女法師！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一女法師是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
[@女道申請]
#IF
large G29 <$STR(A5)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
EQUAL G29 <$STR(A5)>
#act
break
#say
對不起！！你目前還不是最高等級！\\\
#IF
HAVEGUILD
#act
break
mov G29 <$STR(A5)>
mov s6 ↘天下第一女道↙\
inc S6 <$USERNAME>
inc S6 \
mov A26 <$USERNAME>
mov A27 <$GUILDNAME>
mov A28 <$LEVEL>
mov A29 <$DATETIME>
SETRANKLEVELNAME <$STR(S6)>
CLEARNAMELIST ..\QuestDiary\天下第一\女道士名單.txt
addnamelist ..\QuestDiary\天下第一\女道士名單.txt
SENDMSG 4 %s成功申請了天下第一女道士！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一女道士！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一女道士是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
#IF
#act
mov G29 <$STR(A5)>
mov s6 ↘天下第一女道↙\
inc S6 <$USERNAME>
inc S6 \
mov A26 <$USERNAME>
mov A27 暫無
mov A28 <$LEVEL>
mov A29 <$DATETIME>
SETRANKLEVELNAME <$STR(S6)>
CLEARNAMELIST ..\QuestDiary\天下第一\女道士名單.txt
addnamelist ..\QuestDiary\天下第一\女道士名單.txt
SENDMSG 4 %s成功申請了天下第一女道士！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
SENDMSG 0 %s成功申請了天下第一女道士！她在烽煙四起的<$SERVERNAME>中修煉成為天下第一，明天的天下第一會是誰？
#say
申請成功！目前今天的天下第一女道士是<$USERNAME>，\
明天的天下第一會是誰？ \ \
<離開/@exit>
[@男戰]
#CALL [\\天下第一\男戰士.txt] @天下第一戰男
[@男法]
#CALL [\\天下第一\男法師.txt] @天下第一法男
[@男道]
#CALL [\\天下第一\男道士.txt] @天下第一道男
[@女戰]
#CALL [\\天下第一\女戰士.txt] @天下第一戰女
[@女法]
#CALL [\\天下第一\女法師.txt] @天下第一法女
[@女道]
#CALL [\\天下第一\女道士.txt] @天下第一道女

以上為加入檢測天下第一人的腳本！以下是變量顯示：

[@天下第一道男]
{
天下第一男道士：<$STR(A14)>\
所屬行會：<$STR(A15)> \\
紛擾亂世群雄逐鹿，<$STR(A14)>在烽煙四起的<$SERVERNAME>中修煉成為\
天下第一、他從<$STR(A17)>至今還沒有人可以超越。\
<$STR(A14)>的目前等級為<$STR(A16)>級。\
今天的天下第一是<$STR(A14)>，明天的天下第一會是誰？\
申請天下第一名號，請到比齊皇宮找天下第一 <離開/@exit>
}

[@天下第一法男]
{
天下第一男法師：<$STR(A10)>\
所屬行會：<$STR(A11)> \\
紛擾亂世群雄逐鹿，<$STR(A10)>在烽煙四起的<$SERVERNAME>中修煉成為\
天下第一、他從<$STR(A13)>至今還沒有人可以超越。\
<$STR(A10)>的等級目前為<$STR(A12)>級。\
今天的天下第一是<$STR(A10)>，明天的天下第一會是誰？\
申請天下第一名號，請到比齊皇宮找天下第一 <離開/@exit>
}

[@天下第一戰男]
{
天下第一男戰士：<$STR(A6)>\
所屬行會：<$STR(A7)> \ \
紛擾亂世群雄逐鹿，<$STR(A6)>在烽煙四起的<$SERVERNAME>中修煉成為\
天下第一、他從<$STR(A9)>至今還沒有人可以超越。\
<$STR(A6)>的等級目前為<$STR(A8)>級。\
今天的天下第一是<$STR(A6)>，明天的天下第一會是誰？\
申請天下第一名號，請到比齊皇宮找天下第一 <離開/@exit>
}

[@天下第一道女]
{
天下第一女道士：<$STR(A26)>\
所屬行會：<$STR(A27)> \\
紛擾亂世群雄逐鹿，<$STR(A26)>在烽煙四起的<$SERVERNAME>中修煉成為\
天下第一、她從<$STR(A29)>至今還沒有人可以超越。\
<$STR(A26)>的等級目前為<$STR(A28)>級。\
今天的天下第一是<$STR(A26)>，明天的天下第一會是誰？\
申請天下第一名號，請到比齊皇宮找天下第一 <離開/@exit>
}

[@天下第一法女]
{
天下第一女法師：<$STR(A22)>\
所屬行會：<$STR(A23)> \\
紛擾亂世群雄逐鹿，<$STR(A22)>在烽煙四起的<$SERVERNAME>中修煉成為\
天下第一、她從<$STR(A25)>至今還沒有人可以超越。\
<$STR(A22)>的等級目前為<$STR(A24)>級。\
今天的天下第一是<$STR(A22)>，明天的天下第一會是誰？\
申請天下第一名號，請到比齊皇宮找天下第一 <離開/@exit>
}

[@天下第一戰女]
{
天下第一女戰士：<$STR(A18)>\
所屬行會：<$STR(A19)> \\
紛擾亂世群雄逐鹿，<$STR(A18)>在烽煙四起的<$SERVERNAME>中修煉成為\
天下第一、她從<$STR(A21)>至今還沒有人可以超越。\
<$STR(A18)>的等級目前為<$STR(A20)>級。\
今天的天下第一是<$STR(A18)>，明天的天下第一會是誰？\
申請天下第一名號，請到比齊皇宮找天下第一 <離開/@exit>
}

下載地址

BLUE編寫的天下第一腳本（傳奇） .txt

網盤失效？舉報有獎

立即下載

2

您未購買

金錢

當前下載通道需要【VIP】權限下載   [VIP權限]
★【VIP資源免費】  ★【積分資源5折】   [購買VIP]
[充值金幣]     [賺金幣]     [網盤鏈接失效處理]

刷金幣66666666666666666666

頂頂頂頂頂頂頂頂頂頂頂

RE: 天下第一腳本BLUE引擎傳奇NPC腳本代碼編寫 [修改]

第三方所發生的方法為無法威風威風威風威風二分格顧全顧全個