[@申请天下第一]
国王有令:为天下最强的勇士们在盟重土城树立雕像,彰显 \
他们名号.天下群豪尽可以到我这里来登记在案,看看到底 \
谁是群雄中的最强者.如果来登记的勇士中你是最强的一位 \
你从此以后就可以名扬天下了. \
<我是天下第一/@天下第一> \
<离开/@exit> \
[@天下第一]
#IF
CHECKLEVELEX < 45
#act
messagebox 需要45级以上才能证明自己的实力.现在来申请天下第一恐怕还嫌早
break
#IF
gender man
checkjob warrior
#act
mov N10 <$LEVEL>
goto @男战申请
break
#IF
gender man
checkjob wizard
#act
mov N11 <$LEVEL>
goto @男法申请
break
#IF
gender man
checkjob taoist
#act
mov N12 <$LEVEL>
goto @男道申请
break
#IF
gender woman
checkjob warrior
#act
mov N13 <$LEVEL>
goto @女战申请
break
#IF
gender woman
checkjob wizard
#act
mov N14 <$LEVEL>
goto @女法申请
break
#IF
gender woman
checkjob taoist
#act
mov N15 <$LEVEL>
goto @女道申请
break
[@男战申请]
#IF
large G24 N10
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
EQUAL G24 N10
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
#act
mov G24 N10
mov A6 <$USERNAME>
mov A7 <$GUILDNAME>
mov G18 <$LEVEL>
mov A9 <$DATETIME>
#CALL [\封号系统\封号系统.txt] @封号分类
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
ADDNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
SENDMSG 0 %s成功申请了天下第一男战士!明天的天下第一会是谁?
break
CLOSE
[@男法申请]
#IF
large G25 N11
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
EQUAL G25 N11
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
#act
mov G25 N11
mov A10 <$USERNAME>
mov A11 <$GUILDNAME>
mov G12 <$LEVEL>
mov A13 <$DATETIME>
#CALL [\封号系统\封号系统.txt] @封号分类
CLEARNAMELIST ..\QuestDiary\天下第一\男法师名单.txt
ADDNAMELIST ..\QuestDiary\天下第一\男法师名单.txt
SENDMSG 0 %s成功申请了天下第一男法师!明天的天下第一会是谁?
break
CLOSE
[@男道申请]
#IF
large G26 N12
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
EQUAL G26 N12
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
#act
mov G26 N12
mov A14 <$USERNAME>
mov A15 <$GUILDNAME>
mov G16 <$LEVEL>
mov A17 <$DATETIME>
#CALL [\封号系统\封号系统.txt] @封号分类
CLEARNAMELIST ..\QuestDiary\天下第一\男道士名单.txt
ADDNAMELIST ..\QuestDiary\天下第一\男道士名单.txt
SENDMSG 0 %s成功申请了天下第一男道士!明天的天下第一会是谁?
break
CLOSE
[@女战申请]
#IF
large G27 N13
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
EQUAL G27 N13
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
#act
mov G27 N13
mov A18 <$USERNAME>
mov A19 <$GUILDNAME>
mov G20 <$LEVEL>
mov A21 <$DATETIME>
#CALL [\封号系统\封号系统.txt] @封号分类
CLEARNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
ADDNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
SENDMSG 0 %s成功申请了天下第一女战士!明天的天下第一会是谁?
break
CLOSE
[@女法申请]
#IF
large G28 N14
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
EQUAL G28 N14
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
#act
mov G28 N14
mov A22 <$USERNAME>
mov A23 <$GUILDNAME>
mov G19 <$LEVEL>
mov A25 <$DATETIME>
#CALL [\封号系统\封号系统.txt] @封号分类
CLEARNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
ADDNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
SENDMSG 0 %s成功申请了天下第一女法师!明天的天下第一会是谁?
break
CLOSE
[@女道申请]
#IF
large G29 N15
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
EQUAL G29 N15
#act
messagebox 对不起!!你目前还不是最高等级!
break
CLOSE
#IF
#act
mov G29 N15
mov A26 <$USERNAME>
mov A27 <$GUILDNAME>
mov G22 <$LEVEL>
mov A29 <$DATETIME>
#CALL [\封号系统\封号系统.txt] @封号分类
CLEARNAMELIST ..\QuestDiary\天下第一\女道士名单.txt
ADDNAMELIST ..\QuestDiary\天下第一\女道士名单.txt
SENDMSG 0 %s成功申请了天下第一女道士!明天的天下第一会是谁?
break
CLOSE