|
发表于 2014-6-24 16:26:57
|
显示全部楼层
QuestDiary\据文件\坐监名单.txt
[@TakeOn0]
#if
#act
#CALL [\游戏触发\衣服发光.txt] @衣服发光1
[@TakeOn12]
#if
IsOnMap 0127
checkitemw 千里传音(大) 1
#act
TakeEx 12
#if
IsOnMap 0127
checkitemw 千里传音(小) 1
#act
TakeEx 12
[@TakeOn14]
#if
checkitemw 蒙面黑巾 1
#act
SETRANKLEVELNAME 神秘人\神秘人\ \ \ \ \ \ \ \ \ \ \ \%s
SendMsg 6 你佩带了蒙面黑巾,名字显示为《神秘人》
[@TakeOff14]
#if
checkitem 蒙面黑巾 1
#act
SETRANKLEVELNAME %s
SendMsg 6 你取下了蒙面黑巾,名字显示正常!
[@usercmd11]
#IF
ISADMIN
#ACT
#CALL [\服务\会员管理.txt] @管理
[@MapEventWalks2]
#if
#act
SetOnTimer 12 1
sendcentermsg 151 249 玩家『<$username>』抢占了激情闭关修炼的淫水点,每秒享受最高40万经验加成的奖励! 1 6
GMEXECUTE 表情 0
break
[@MUZHUANG]
#IF
CHECKHITMONNAME 苍井空
#ACT
CHANGEEXP + 400000
gamegold + 2
[@Challenge]
#IF
CHECKMAPHUMANCOUNT EM029A = 0
#ACT
CHALLENGMAPMOVE EM029A 14 15
BREAK
#IF
#ACT
goto @Challenge_Fail
[@Challenge_Fail]
#IF
#ACT
GETCHALLENGEBAKITEM
#SAY
当前地图人数已经满员!请稍后再试,谢谢!\
;挑战胜利者执行..
[@Challenge_Win]
#IF
#ACT
SendMsg 5 挑战胜利..
[@GetBoxItem1]
#IF
CheckTextList .\QuestDiary\抽取数据\金丹装备.txt <$STR(S0)>
#ACT
Take <$STR(S0)> 1
Give 红焰·石[无视] 1
GuildNoticeMsg 0 250 玩家『%s』淬炼金丹装备,淬炼出一个:红焰·石[无视]!
Break
#IF
CheckTextList .\QuestDiary\抽取数据\逍遥装备.txt <$STR(S0)>
#ACT
Take <$STR(S0)> 1
Give 红焰·石[无视] 2
GuildNoticeMsg 0 250 玩家『%s』淬炼逍遥装备,淬炼出二个:红焰·石[无视]!
Break
#ELSESAY
请放入<金丹装备>或者<逍遥装备>才可以淬炼出<红焰·石[无视]>
[@GetBoxItem2]
#IF
CheckTextList .\QuestDiary\抽取数据\金丹装备.txt <$STR(S0)>
#ACT
Take <$STR(S0)> 1
Give 蓝灵·石[致命] 1
GuildNoticeMsg 0 250 玩家『%s』淬炼金丹装备,淬炼出一个:蓝灵·石[致命]!
Break
#IF
CheckTextList .\QuestDiary\抽取数据\逍遥装备.txt <$STR(S0)>
#ACT
Take <$STR(S0)> 1
Give 蓝灵·石[致命] 2
GuildNoticeMsg 0 250 玩家『%s』淬炼霸天装备,淬炼出二个:蓝灵·石[致命]!
Break
#ELSESAY
请放入<金丹装备>或者<逍遥装备>才可以淬炼出<蓝灵·石[致命]>
[@GetBoxItem3]
#IF
CheckTextList .\QuestDiary\抽取数据\金丹装备.txt <$STR(S0)>
#ACT
Take <$STR(S0)> 1
Give 金刚·石[伤害] 1
GuildNoticeMsg 0 250 玩家『%s』淬炼金丹装备,淬炼出一个:金刚·石[伤害]!
Break
#IF
CheckTextList .\QuestDiary\抽取数据\逍遥装备.txt <$STR(S0)>
#ACT
Take <$STR(S0)> 1
Give 金刚·石[伤害] 2
GuildNoticeMsg 0 250 玩家『%s』淬炼逍遥装备,淬炼出二个:金刚·石[伤害]!
Break
#ELSESAY
请放入<金丹装备>或者<逍遥装备>才可以淬炼出<金刚·石[伤害]>
[@GetBoxItem4]
#IF
Random 3
CheckTextList .\QuestDiary\抽取数据\逍遥装备.txt <$STR(S0)>
#ACT
Take <$STR(S0)> 1
Give 龍之神石 1
GuildNoticeMsg 0 250 玩家『%s』淬炼出一个:龍之神石!
Break
#IF
Random 1
CheckTextList .\QuestDiary\抽取数据\逍遥装备.txt <$STR(S0)>
#ACT
Take <$STR(S0)> 1
GuildNoticeMsg 0 250 玩家『%s』淬炼龍之神石失败了!
Break
#ELSESAY
请放入<逍遥装备>才可以淬炼出<龍之神石>!
[@GetBoxItem5]
#IF
CHECKGAMEGOLD > 499
CheckTextList .\QuestDiary\抽取数据\剑灵装备.txt <$STR(S0)>
#ACT
GAMEGOLD - 500
GetRandomText .\QuestDiary\抽取数据\剑灵装备.txt S8
give <$STR(S8)> 1
GuildNoticeMsg 252 255 【转换成功,获得[<$STR(S8)>]】 SELF
Break
#IF
CHECKGAMEGOLD > 999
CheckTextList .\QuestDiary\抽取数据\白金装备.txt <$STR(S0)>
#ACT
GAMEGOLD - 1000
GetRandomText .\QuestDiary\抽取数据\白金装备.txt S8
give <$STR(S8)> 1
GuildNoticeMsg 252 255 【转换成功,获得[<$STR(S8)>]】 SELF
break
;--qq156598018制作--------------
#IF
CHECKGAMEGOLD > 1999
CheckTextList .\QuestDiary\抽取数据\金丹装备.txt <$STR(S0)>
#ACT
GAMEGOLD - 2000
GetRandomText .\QuestDiary\抽取数据\金丹装备.txt S8
give <$STR(S8)> 1
GuildNoticeMsg 252 255 【转换成功,获得[<$STR(S8)>]】 SELF
break
#IF
CHECKGAMEGOLD > 4999
CheckTextList .\QuestDiary\抽取数据\逍遥装备.txt <$STR(S0)>
#ACT
GAMEGOLD - 5000
GetRandomText .\QuestDiary\抽取数据\逍遥装备.txt S8
give <$STR(S8)> 1
GuildNoticeMsg 252 255 【转换成功,获得[<$STR(S8)>]】 SELF
break
#IF
CHECKGAMEGOLD > 9999
CheckTextList .\QuestDiary\抽取数据\龙之霸天装备.txt <$STR(S0)>
#ACT
GAMEGOLD - 10000
GetRandomText .\QuestDiary\抽取数据\龙之霸天装备.txt S8
give <$STR(S8)> 1
GuildNoticeMsg 252 255 【转换成功,获得[<$STR(S8)>]】 SELF
break
#IF
CHECKGAMEGOLD > 19999
CheckTextList .\QuestDiary\抽取数据\灭世装备.txt <$STR(S0)>
#ACT
GAMEGOLD - 20000
GetRandomText .\QuestDiary\抽取数据\灭世装备.txt S8
give <$STR(S8)> 1
GuildNoticeMsg 252 255 【转换成功,获得[<$STR(S8)>]】 SELF
break
#elseact
give <$STR(S0)> 1
#elsesay
失败提示:没有满足条件!请看清楚说明!
|
|