|
发表于 2011-12-5 22:19:53
|显示全部楼层
[@恢复封号]
#CALL [\游戏登陆\封号设置.txt] @封号设置
[@StdModeFunc42]
#IF
CHECKITEMADDVALUE 1 3 < 7
#ACT
UPGRADEITEMEX 1 3 0 1 0
SENDMSG 6 你的武器获得祝福.!!
SENDCENTERMSG 0 232 [<$USERNAME>]使用了超级祝福油武器稳稳当当的提升了一点幸运 . 1 5
#ELSEACT
SendMsg 5 武器幸运已经+7了,无法再次使用!
SENDCENTERMSG 0 232 [<$USERNAME>]你老年痴呆不,武器都已经幸运7了还在点,大家鄙视他 . 1 5
GIVE 超级祝福油
[@确定]
#ACT
CLOSE
[@取消]
#ACT
CLOSE
[@StdModeFunc141]
#IF
RANDOM 300
#ACT
GIVE 龙牙 1
SENDMSG 0 (*)<$USERNAME>购买赞助彩票中奖,获得龙牙一把!提示:抽奖只能抽出普通装备,极品装备仍需通过努力才能得到.
sendcentermsg 0 223 [<$USERNAME>]购买赞助彩票中奖,获得龙牙一把,他的运气实在是太好了. 1 8
BREAK
#IF
RANDOM 300
#ACT
GIVE 怒斩 1
SENDMSG 0 (*)<$USERNAME>购买赞助彩票中奖,获得怒斩一把!提示:抽奖只能抽出普通装备,极品装备仍需通过努力才能得到.
sendcentermsg 0 223 [<$USERNAME>]购买赞助彩票中奖,获得怒斩一把,他的运气实在是太好了. 1 8
BREAK
#IF
RANDOM 300
#ACT
GIVE 逍遥扇 1
SENDMSG 0 (*)<$USERNAME>购买赞助彩票中奖,获得逍遥扇一把!提示:抽奖只能抽出普通装备,极品装备仍需通过努力才能得到.
sendcentermsg 0 223 [<$USERNAME>]购买赞助彩票中奖,获得逍遥扇一把,他的运气实在是太好了. 1 8
BREAK
#IF
RANDOM 300
#ACT
GetRandomText .\QuestDiary\鸿鹄科技\彩票奖励\新衣服.txt S11
GIVE <$STR(S11)> 1
SENDMSG 0 (*)<$USERNAME>购买赞助彩票中奖,获得<$STR(S11)>一件!提示:抽奖只能抽出普通装备,极品装备仍需通过努力才能得到.
BREAK
#IF
RANDOM 25
#ACT
GetRandomText .\QuestDiary\鸿鹄科技\彩票奖励\赤月奖励.txt S11
GIVE <$STR(S11)> 1
SENDMSG 0 (*)<$USERNAME>购买赞助彩票中奖,获得<$STR(S11)>一个!提示:抽奖只能抽出普通装备,极品装备仍需通过努力才能得到.
BREAK
#IF
RANDOM 5
#ACT
GetRandomText .\QuestDiary\鸿鹄科技\彩票奖励\零散奖励.txt S11
GIVE <$STR(S11)> 1
SENDMSG 7 您购买赞助彩票中奖,获得<$STR(S11)>一个!感谢您对服务器支持!
BREAK
#IF
RANDOM 2
#ACT
GetRandomText .\QuestDiary\鸿鹄科技\彩票奖励\祖玛奖励.txt S11
GIVE <$STR(S11)> 1
SENDMSG 7 您购买赞助彩票中奖,获得<$STR(S11)>一个!感谢您对服务器支持!
BREAK
#IF
RANDOM 1
#ACT
GetRandomText .\QuestDiary\鸿鹄科技\彩票奖励\经验奖励.txt S11
CHANGEEXP + <$STR(S11)>
SENDMSG 7 您购买赞助彩票中奖,获得<$STR(S11)>经验!感谢您对服务器支持!
BREAK
#IF
#ACT
GIVE 祝福油 1
SENDMSG 7 您购买赞助彩票中奖,获得祝福油一瓶!感谢您对服务器支持!
BREAK
[@StdModeFunc142]
#IF
#ACT
GIVE 护身符(大) 6
break
[@StdModeFunc143]
#IF
#ACT
GIVE 金条 5
break
[@StdModeFunc201]
#IF
CheckMapMonCount D717C < 8
CheckHumInRange D717C 19 24 30
#ACT
#CALL [\小文空间\物品触发\100.txt] @物品100
#ELSEACT
SENDMSG 5 您不是在天骄地吞旃用此卷,或者天骄地图怪物已经超过8只极限
give 天骄令 1
close
[@Member]
#IF
#ACT
CHANGEPERMISSION 10
break
[@StdModeFunc202]
#IF
isgroupmaster
CheckGroupCount > 1
#ACT
GROUPMAPMOVE D717C
SENDMSG 1 [%s]带领队伍进入了天骄地图挑战BOSS
sendcentermsg 0 223 [<$username>]带领队伍成功进入了天骄地图挑战BOSS. 1 8
#ELSEACT
GOTO @合成宝图
[@合成宝图]
#IF
#say
你不是组长或者你还没组队
#ACT
give 天骄组队卷 1
[@StdModeFunc203]
#IF
#ACT
give 玛雅四贵宾卡 1
#SAY
\ \
<贵宾房间①/@guibin1> <贵宾房间②/@guibin2> <贵宾房间③/@guibin3>\ \
<贵宾房间④/@guibin4> <贵宾房间⑤/@guibin5>\
[@guibin5]
#IF
#ACT
GOTO @TIAOZHANNEgg
BREAK
[@TIAOZHANNEgg]
#IF
checkitem 玛雅四贵宾卡 1
CHECKMAPHUMANCOUNT TG5 = 0
#act
take 玛雅四贵宾卡 1
CLEARMAPMON TG5
MOV S5 TG5
goto @SHdsaqwessa
MAP TG5
BREAK
#IF
#act
messagebox 您没有玛雅四贵宾卡!\ \或当前地图已满员,请稍后进入。。。
BREAK
[@SHdsaqwessa]
#IF
#ACT
Param1 <$STR(S5)>
Param2 18
Param3 13
MonGen 赤月恶魔 1 1
break
中间有段10的权限 不知道怎么弄。。我发多点 请高手 看看 |
|