升级
  100%
TA的每日心情 | 奋斗 昨天 07:59 |
|---|
签到天数: 330 天 [LV.8]以坛为家I
管理员
  
- 积分
- 9302
|
80家族网:本站力求让你一站在手资源全有!
脚本实例分享:
{
*******************************************************************}
Program Mir2;
{$I lostcommon.pas}
var
ml, bgl, my, ss, ly, hl, xy, hy, wl, sm: string;
jishu, jishu1, jishu2, jishu3, jishu4, jishu5, jishu6, jishu7, jishu8, jishu9: Integer;
Procedure _doexit;
begin
This_NPC.CloseDialog(This_Player);
end;
Procedure _buguilu;
begin
if GetG(21,46) >= 10 then
begin
bgl := '开启';
end
else bgl := '关闭';
begin
This_NPC.NpcDialog(This_Player,
+'|<不归路/c=253> \'
+'|<怪物:/c=250><统领.千年树妖.万年树妖/c=103> \'
+'|<爆率:/c=250><可爆雷霆.奔雷.战神.狂战.特戒等装备/c=103> \'
+'|<条件:/c=250>全服<10/c=254>人达到<44/c=254>级.系统自动开启不归路\'
+'|<人数:/c=250>当前全服44级人数 [ <'+inttostr(GetG(21,46))+'/c=254> ] 人 \'
+'|<状态:/c=250><[ '+ bgl +' ]/c=146>\'
+'|{cmd}<进入不归路/@buguilu1> ^<返回/@gaoji>\' );
end;
end;
procedure _buguilu1;
begin
if GetG(21,46) >= 10 then
begin
if This_Player.Level >= 44 then
begin
This_Player.RandomFlyto('cmzc1');
ServerSay('玩家['+This_Player.Name+']进入[不归路].希望他满载而归!', 2);
end else
This_Npc.NpcDialog(This_Player,
'进入不归路失败: \'
+'|状态:<[ '+ bgl +' ]/c=146> '
+'|原因:你的等级不足44级,不能让你去送死! |\'
+'|<返回上一页/@buguilu>^<返回首页/@main>\'
);
end else
This_Npc.NpcDialog(This_Player,
'进入不归路失败: \'
+'|状态:<[ '+ bgl +' ]/c=146> '
+'|原因:全服44级人数不足[ 10 ]人.目前[ <'+inttostr(GetG(21,46))+'/c=254> ]人| \'
+'|<返回上一页/@buguilu>^<返回首页/@main>\'
);
end;
|
上一篇:战神引擎欧皇传奇复古三职业+安卓+工具+外网教程下一篇:传奇手游战神引擎显示角色行会名的修改路径
|