传奇超级宝箱脚本

gmbbs醉后知酒浓

[@MAIN] #ACT CloseBigDialogBox #SAY 幻想大陆休息地，等级只可以泡点到200级.\ \ 后期升级需自己杀怪.\ \ <免费修炼[url=]/@xiul[/url]>: 每秒获得10000经验.\ \ \ <收费修炼[url=]/@shou[/url]>: 每秒消耗1元宝.获得100000经验.\ \ \ <终极修炼[url=]/@zhon[/url]>: 每秒消耗10元宝.获得1000000经验.\ \ \ [@open] #IF CHECKITEM 超级宝箱钥匙 1 #ELSEACT close #ACT TAKE 超级宝箱钥匙 1 GOTO @open0 BREAK #IF CHECKGAMEGOLD > 99 #ELSEACT MESSAGEBOX 提示:没有超级宝箱钥匙.或元宝无法开启超级宝箱. close #ACT GAMEGOLD - 100 GOTO @open0 [@open0] #IF RANDOM 15 #ACT CHANGEEXP + 100000 SendMsg 4 %S打开超级宝箱.获得100000经验. SendMsg 5 打开超级宝箱.获得100000经验. close BREAK #IF RANDOM 14 #ACT CHANGEEXP + 100000 SendMsg 4 %S打开超级宝箱.获得100000经验. SendMsg 5 打开超级宝箱.获得100000经验. close BREAK #IF RANDOM 13 #ACT CHANGEEXP + 100000 SendMsg 4 %S打开超级宝箱.获得100000经验. SendMsg 5 打开超级宝箱.获得100000经验. close BREAK #IF RANDOM 12 #ACT GIVE 金刚石块 1 SendMsg 5 打开超级宝箱.获得宝藏-金刚石块. SendMsg 4 %S打开超级宝箱.获得宝藏-金刚石块. close BREAK #IF RANDOM 11 #ACT GIVE 金刚石块 1 SendMsg 5 打开超级宝箱.获得宝藏-金刚石块. SendMsg 4 %S打开超级宝箱.获得宝藏-金刚石块. close BREAK #IF RANDOM 10 #ACT GIVE 金刚石块 1 SendMsg 5 打开超级宝箱.获得宝藏-金刚石块. SendMsg 4 %S打开超级宝箱.获得宝藏-金刚石块. close BREAK #IF RANDOM 9 #ACT GetRandomText .\QuestDiary\数据文件\超级宝箱\星王.txt S1 GIVE <$STR(S1)> 1 SendMsg 5 打开超级宝箱.获得宝藏-<$STR(S1)>. SendMsg 4 %S打开超级宝箱.获得宝藏-<$STR(S1)>. close BREAK #IF RANDOM 8 #ACT GetRandomText .\QuestDiary\数据文件\超级宝箱\星王.txt S1 GIVE <$STR(S1)> 1 SendMsg 5 打开超级宝箱.获得宝藏-<$STR(S1)>. SendMsg 4 %S打开超级宝箱.获得宝藏-<$STR(S1)>. close BREAK #IF RANDOM 7 #ACT GetRandomText .\QuestDiary\数据文件\超级宝箱\星王.txt S1 GIVE <$STR(S1)> 1 SendMsg 5 打开超级宝箱.获得宝藏-<$STR(S1)>. SendMsg 4 %S打开超级宝箱.获得宝藏-<$STR(S1)>. close BREAK #IF RANDOM 6 #ACT GetRandomText .\QuestDiary\数据文件\超级宝箱\狂雷.txt S1 GIVE <$STR(S1)> 1 SendMsg 5 打开超级宝箱.获得宝藏-<$STR(S1)>. SendMsg 4 %S打开超级宝箱.获得宝藏-<$STR(S1)>. close BREAK #IF RANDOM 5 #ACT GetRandomText .\QuestDiary\数据文件\超级宝箱\狂雷.txt S1 GIVE <$STR(S1)> 1 SendMsg 5 打开超级宝箱.获得宝藏-<$STR(S1)>. SendMsg 4 %S打开超级宝箱.获得宝藏-<$STR(S1)>. close BREAK #IF RANDOM 4 #ACT GetRandomText .\QuestDiary\数据文件\超级宝箱\狂雷.txt S1 GIVE <$STR(S1)> 1 SendMsg 5 打开超级宝箱.获得宝藏-<$STR(S1)>. SendMsg 4 %S打开超级宝箱.获得宝藏-<$STR(S1)>. close BREAK #IF RANDOM 3 #ACT GetRandomText .\QuestDiary\数据文件\超级宝箱\王者.txt S1 GIVE <$STR(S1)> 1 SendMsg 0 %S打开超级宝箱.获得宝藏-<$STR(S1)>. SendMsg 4 %S打开超级宝箱.获得宝藏-<$STR(S1)>. close BREAK #IF RANDOM 2 #ACT GetRandomText .\QuestDiary\数据文件\超级宝箱\王者.txt S1 GIVE <$STR(S1)> 1 SendMsg 0 %S打开超级宝箱.获得宝藏-<$STR(S1)>. SendMsg 4 %S打开超级宝箱.获得宝藏-<$STR(S1)>. close BREAK #IF RANDOM 1 #ACT GetRandomText .\QuestDiary\数据文件\超级宝箱\刑天.txt S1 GIVE <$STR(S1)> 1 SendMsg 0 %S打开超级宝箱.获得宝藏-<$STR(S1)>. SendMsg 4 %S打开超级宝箱.获得宝藏-<$STR(S1)>. close BREAK [@xiul] #ACT SetOnTimer 0 1 MAP GJ01 SENDMSG 0 %S进入了免费闭关地图. [@shou] #ACT SetOnTimer 1 1 MAP GJ02 SENDMSG 0 %S进入了收费修炼地图. [@zhon] #ACT SetOnTimer 2 1 MAP GJ03 SENDMSG 0 %S进入了终极修炼地图.

逄娅智

我只是路过，不发表意见

笑郾卤

呵呵，低调，低调！

於幼

支持，赞一个

拆獭蚯

大人，此事必有蹊跷！

脐遥

无回帖，不论坛，这才是人道。

路娅雅

发发呆，回回帖，工作结束~

占厉屈

锄禾日当午，发帖真辛苦。谁知坛中餐，帖帖皆辛苦！

钮卿云

前排顶，很好！

海元

回个帖子，下班咯~