找回密码
 立即注册

全新改版编写天下第一脚本文件

[复制链接]
◇逍遥◆MIR2◇ 发表于 2022-8-31 02:02:44 | 显示全部楼层 |阅读模式
[@main]
国王有令:为天下最强的勇士们在盟重土城树立雕像,彰显 \
他们名号。天下群豪尽可以到我这里来登记在案,看看到底 \
谁是群雄中的最强者。如果来登记的勇士中你是最强的一位 \
你从此以后就可以名扬天下了。上线1.2倍攻击\
<我是天下第一/@天下第一>\
<天下第一有谁/@查看第一> \
<离开/@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
checknamelist ..\QuestDiary\天下第一\男战士名单.txt
#ACT
SENDMSG 5 你已经是天下第一男战士!不能再申请其它职业的天下第一!
BREAK
#IF
large G80 <$STR(A0)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
EQUAL G80 <$STR(A0)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#ACT
BREAK
#IF
HAVEGUILD
#act
break
mov G80 <$STR(A0)>
mov s1 ↘天下第一男战↙\
mov A6 <$USERNAME>
mov A7 <$GUILDNAME>
mov A8 <$LEVEL>
mov A9 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S1)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
addnamelist ..\QuestDiary\天下第一\男战士名单.txt
SENDMSG 4 %s成功申请了天下第一男战士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一男战士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一男战士是<$USERNAME>,\
明天的天下第一会是谁? \ \
    <离开/@exit>\\
#IF
#act
break
mov G80 <$STR(A0)>
mov s1 ↘天下第一男战↙\
mov A6 <$USERNAME>
mov A7 <$GUILDNAME>
mov A8 <$LEVEL>
mov A9 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S1)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
addnamelist ..\QuestDiary\天下第一\男战士名单.txt
SENDMSG 4 %s成功申请了天下第一男战士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一男战士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一男战士是<$USERNAME>,\
明天的天下第一会是谁? \ \
    <离开/@exit>\\
[@男法申请]
#IF
checknamelist ..\QuestDiary\天下第一\男法师名单.txt
#ACT
SENDMSG 5 你已经是天下第一男法师!不能再申请其它职业的天下第一!
#ACT
BREAK
#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 ↘天下第一男法↙\
mov A10 <$USERNAME>
mov A11 <$GUILDNAME>
mov A12 <$LEVEL>
mov A13 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S2)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
CLEARNAMELIST ..\QuestDiary\天下第一\男法师名单.txt
addnamelist ..\QuestDiary\天下第一\男法师名单.txt
SENDMSG 4 %s成功申请了天下第一男法师!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一男法师!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一男法师是<$USERNAME>,\
明天的天下第一会是谁? \ \
    <离开/@exit>\\
#IF
#act
break
mov G25 <$STR(A1)>
mov s2 ↘天下第一男法↙\
mov A10 <$USERNAME>
mov A11 <$GUILDNAME>
mov A12 <$LEVEL>
mov A13 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S2)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
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
checknamelist ..\QuestDiary\天下第一\男道士名单.txt
#ACT
SENDMSG 5 你已经是天下第一男道士!不能再申请其它职业的天下第一!
#ACT
BREAK
#IF
HAVEGUILD
#act
break
mov G26 <$STR(A2)>
mov s3 ↘天下第一男道↙\
mov A14 <$USERNAME>
mov A15 <$GUILDNAME>
mov A16 <$LEVEL>
mov A17 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S3)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
CLEARNAMELIST ..\QuestDiary\天下第一\男道士名单.txt
addnamelist ..\QuestDiary\天下第一\男道士名单.txt
SENDMSG 4 %s成功申请了天下第一男道士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一男道士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一男道士是<$USERNAME>,\
明天的天下第一会是谁? \ \
    <离开/@exit>
#IF
#act
break
mov G26 <$STR(A2)>
mov s3 ↘天下第一男道↙\
mov A14 <$USERNAME>
mov A15 <$GUILDNAME>
mov A16 <$LEVEL>
mov A17 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S3)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
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
checknamelist ..\QuestDiary\天下第一\女战士名单.txt
#ACT
SENDMSG 5 你已经是天下第一女战士!不能再申请其它职业的天下第一!
#ACT
BREAK
#IF
HAVEGUILD
#act
break
mov G27 <$STR(A3)>
mov s4 ↘天下第一女战↙\
mov A18 <$USERNAME>
mov A19 <$GUILDNAME>
mov A20 <$LEVEL>
mov A21 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S4)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
CLEARNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
addnamelist ..\QuestDiary\天下第一\女战士名单.txt
SENDMSG 4 %s成功申请了天下第一女战士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女战士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女战士是<$USERNAME>,\
明天的天下第一会是谁? \ \
    <离开/@exit>
#IF
#act
break
mov G27 <$STR(A3)>
mov s4 ↘天下第一女战↙\
mov A18 <$USERNAME>
mov A19 <$GUILDNAME>
mov A20 <$LEVEL>
mov A21 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S4)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
CLEARNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
addnamelist ..\QuestDiary\天下第一\女战士名单.txt
SENDMSG 4 %s成功申请了天下第一女战士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女战士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女战士是<$USERNAME>,\
明天的天下第一会是谁? \ \
    <离开/@exit>
[@女法申请]
#IF
checknamelist ..\QuestDiary\天下第一\女法师名单.txt
#ACT
SENDMSG 5 你已经是天下第一女法师!不能再申请其它职业的天下第一!
#ACT
BREAK
#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 ↘天下第一女法↙\
mov A22 <$USERNAME>
mov A23 <$GUILDNAME>
mov A24 <$LEVEL>
mov A25 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S5)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
CLEARNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
addnamelist ..\QuestDiary\天下第一\女法师名单.txt
SENDMSG 4 %s成功申请了天下第一女法师!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女法师!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女法师是<$USERNAME>,\
明天的天下第一会是谁? \ \
    <离开/@exit>
#IF
#act
break
mov G28 <$STR(A4)>
mov s5 ↘天下第一女法↙\
mov A22 <$USERNAME>
mov A23 <$GUILDNAME>
mov A24 <$LEVEL>
mov A25 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S5)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
CLEARNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
addnamelist ..\QuestDiary\天下第一\女法师名单.txt
SENDMSG 4 %s成功申请了天下第一女法师!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女法师!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女法师是<$USERNAME>,\
明天的天下第一会是谁? \ \
    <离开/@exit>
[@女道申请]
#IF
checknamelist ..\QuestDiary\天下第一\女道士名单.txt
#ACT
SENDMSG 5 你已经是天下第一女道士!不能再申请其它职业的天下第一!
#ACT
BREAK
#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 ↘天下第一女道↙\
mov A26 <$USERNAME>
mov A27 <$GUILDNAME>
mov A28 <$LEVEL>
mov A29 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S6)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
CLEARNAMELIST ..\QuestDiary\天下第一\女道士名单.txt
addnamelist ..\QuestDiary\天下第一\女道士名单.txt
SENDMSG 4 %s成功申请了天下第一女道士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女道士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女道士是<$USERNAME>,\
明天的天下第一会是谁? \ \
    <离开/@exit>
#IF
#act
break
mov G29 <$STR(A5)>
mov s6 ↘天下第一女道↙\
mov A26 <$USERNAME>
mov A27 <$GUILDNAME>
mov A28 <$LEVEL>
mov A29 <$DATETIME>
CHANGENAMECOLOR 253
PowerRate 120 6000
SETRANKLEVELNAME 等级[<$LEVEL>]\<$STR(S6)>\【强奸并内射】≮<$HUMAN(杀人)>≯←人\【肛门被爆过】≮<$HUMAN(被杀)>≯←次
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] @天下第一道女


meidou. 发表于 2022-8-31 05:05:31 | 显示全部楼层
我只是路过打酱油的。
回复

使用道具 举报

tomchina55 发表于 2022-9-2 16:41:42 | 显示全部楼层
激动人心,无法言表!
回复

使用道具 举报

goodscx 发表于 2022-9-4 08:03:28 | 显示全部楼层
真是被感动的痛哭流涕……
回复

使用道具 举报

1yuqunchenggong 发表于 2022-9-5 21:00:37 | 显示全部楼层
感恩无私的分享与奉献 :)
回复

使用道具 举报

jz641268 发表于 2022-9-6 00:17:20 | 显示全部楼层
无回帖,不论坛,这才是人道。
回复

使用道具 举报

lxb1101 发表于 2022-9-7 15:36:23 | 显示全部楼层
看到这帖子真是高兴!
回复

使用道具 举报

sulee 发表于 2022-9-8 06:35:21 | 显示全部楼层
无回帖,不论坛,这才是人道。
回复

使用道具 举报

gj6tty 发表于 2022-9-10 05:06:00 | 显示全部楼层
真是难得给力的帖子啊。
回复

使用道具 举报

ismiao 发表于 2022-9-10 20:04:02 | 显示全部楼层
无回帖,不论坛,这才是人道。
回复

使用道具 举报

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

本版积分规则

Archiver|手机版|小黑屋|游戏淘宝湾

GMT+8, 2024-11-23 09:11 , Processed in 0.068117 second(s), 53 queries .

Powered by Discuz! X3.5

Copyright © 2001-2024, Oddpp Cloud.

快速回复 返回顶部 返回列表