[@main]
#If
#act
OPENMERCHANTBIGDLG 1 493 1 4 0 0 50 390 7
loadvar human 人气王总数 ..\QuestDiary\九尾自创剧本目录\人气王系列\人气王纪录.txt
sortvartolist 人气王总数 ..\QuestDiary\九尾自创剧本目录\人气王系列\人气王纪录.txt ..\QuestDiary\九尾自创剧本目录\人气王系列\人气王名单.txt 0 1
getliststring ..\QuestDiary\九尾自创剧本目录\人气王系列\人气王名单.txt 0 S$第一名人气 S$第一名数目
MOV S$人气第一名 <$str（S$第一名人气）>
SETSTRiNGBLANK <$str（S$人气第一名）> 20 1
#say
<人气王系统/AUTOCOLOR=254> \ \
<917独家研发的人气系统，专门为散人定制的系统，第一名可以进入满回馈舆图/SCOLOR=125> \
\
<[当前人气王]:><$str（S$人气第一名）> <[人气值]：><$str（S$第一名数目）>\
\
<你当前[人气值]为：/SCOLOR=249>[<$human（人气王总数）>]点\
<人气值是通过别人用[星光碎片]为你增添获得，[1个星光碎片]=[1人气值]/SCOLOR=249>\
【星光碎片】--击PK全服随便怪有几率获得.爆率很高！\
<给它人增添人气值需要品级大于350.级且不能为自己。/SCOLOR=125> \ \
<《我要给人增添人气》/@@InPutString54> <进入满回馈舆图/@进入舆图>\
<主要提醒：人气王被挤下来就会传送回土城./FCOLOR=249>\
<主要提醒：每1个小时整理一次人气王数据.....主要提醒：每1个小时整理一次人气王数据...../FCOLOR=249>\
<温馨提醒：野外舆图刷碎片最快！/FCOLOR=249>\
[@进入舆图]
#if
not equal <$str（S$第一名人气）> <$USERNAME>
#act
messagebox 操作失败！你现在不是第一名无法进入！
break
#if
equal S$第一名人气
#act
messagebox 第一名还没著名额！！！！
break
#if
#act
mapmove 15ji1 96 108
GuildNoticeMsg 0 254 ぐ【人气王】『<$USERNAME>』天空一声巨响,进入了满回馈舆图.最终爆爆爆.加油了,老铁！
GuildNoticeMsg 0 254 ぐ【人气王】『<$USERNAME>』天空一声巨响,进入了满回馈舆图.最终爆爆爆.加油了,老铁！
GuildNoticeMsg 0 254 ぐ【人气王】『<$USERNAME>』天空一声巨响,进入了满回馈舆图.最终爆爆爆.加油了,老铁！
GuildNoticeMsg 0 254 ぐ【人气王】『<$USERNAME>』天空一声巨响,进入了满回馈舆图.最终爆爆爆.加油了,老铁！
SETONTIMER 3 1
CLOSE
BREAK
[@InPutString54]
#if
EQUAL s54
#act
MessageBox 操作失败,请填写准确的名字！！
break
#if
checklevelex < 349
#act
messagebox 操作失败，你品级小于350级，无法给他人增添！
break
#IF
EQUAL s54 <$USERNAME>
#ACT
MessageBox 对不起,你不能为自己增添人气值！
break
#IF
not <$STR（S54）>.CheckOnline
#act
MessageBox 操作失败,【<$STR（S54）>】不在线！
break
#IF
#SAY
\ \ \
你要增添人气的玩家为：【 <$STR（S54）> 】\
\ \
<为他增添10点人气 ,需要10 个[星光碎片]/AUTOCOLOR=254,250,253,241> <《确定增添》/@确定增添人气值10>\
<为他增添50点人气 ,需要50 个[星光碎片]/AUTOCOLOR=254,250,253,241> <《确定增添》/@确定增添人气值50>\
<为他增添100点人气,需要100个[星光碎片]/AUTOCOLOR=254,250,253,241> <《确定增添》/@确定增添人气值100>\
<为他增添500点人气,需要500个[星光碎片]/AUTOCOLOR=254,250,253,241> <《确定增添》/@确定增添人气值500>\ \
<主要提醒：天天晚上破晓12点整理人气值.传回土城/FCOLOR=249>\
<主要提醒：被人挤下来也回传送回土城./FCOLOR=249>\
<主要提醒：天天晚上破晓12点整理人气值.传回土城/FCOLOR=249>\
<主要提醒：被人挤下来也回传送回土城./FCOLOR=249>\
[@确定增添人气值10]
#if
#act
mov N$需要质料 10
goto @增添人气综合
break
[@确定增添人气值50]
#if
#act
mov N$需要质料 50
goto @增添人气综合
break
[@确定增添人气值100]
#if
#act
mov N$需要质料 100
goto @增添人气综合
break
[@确定增添人气值500]
#if
#act
mov N$需要质料 500
goto @增添人气综合
break
[@增添人气综合]
#if
not checkitem 星光碎片 <$str（N$需要质料）>
#act
messagebox 操作失败！你【星光碎片】不足<$str（N$需要质料）>个无法增添！
break
#IF
not <$STR（S54）>.CheckOnline
#act
MessageBox 操作失败,【<$STR（S54）>】不在线！
break
#IF
#ACT
TAKE 星光碎片 <$str（N$需要质料）>
<$STR（S54）>.MOVEX N$需要质料 <$str（N$需要质料）>
<$STR（S54）>.CALCVAR HUMAN 人气王总数 + <$str（N$需要质料）>
<$STR（S54）>.SAVEVAR HUMAN 人气王总数 ..\QuestDiary\九尾自创剧本目录\人气王系列\人气王纪录.txt
goto @main
GuildNoticeMsg 0 254 ぐ【人气之最通知】：天空一声巨响！[<$USERNAME>]为[<$STR（S54）>]增添了<$str（N$需要质料）>点人气,有望成为人气之王了,列位帅哥玉人要加油了啊!!!
GuildNoticeMsg 0 254 ぐ【人气之最通知】：天空一声巨响！[<$USERNAME>]为[<$STR（S54）>]增添了<$str（N$需要质料）>点人气,有望成为人气之王了,列位帅哥玉人要加油了啊!!!
break
发表于 2022-5-8 20:17:03
发表于 2022-5-8 20:32:56
