战神引擎武器剑甲+装备首饰互换脚本脚本素材

PROGRAM Mir2;

{$I common.pas}

Procedure _doexit;

begin

   This_Npc.CloseDialog(This_Player);  

end;

procedure domain;

begin

  This_Npc.NpcDialog(This_Player,

   '|我这里有一种秘术!\'+

   '|<提示:免费衣服男女互换>\'+

   '|<提示:免费衣服男女互换>\'+

   '|<提示:免费衣服男女互换> \'+

   '|{cmd}<传奇神甲男换女 yuan1="">  <传奇神甲女换男 yuan2="">\'+

   '|{cmd}<玉兔神甲男换女 yuan3="">  <玉兔神甲女换男 yuan4="">\'+

   '|{cmd}<刺影战甲男换女 yuan5="">    <刺影战甲女换男 yuan6="">\'+

   '|{cmd}<神龙夺命男换女 yuan7="">  <神龙夺命女换男 yuan8="">\'+

    '|{cmd}<神龍追魂男换女 yuan9="">  <神龍追魂女换男 yuan10="">\'+

    '|{cmd}<神龙化圣男换女 yuan11="">  <神龙化圣女换男 yuan12="">\'+

    '|{cmd}<恶魔神甲男换女 yuan13="">  <恶魔神甲女换男 yuan14="">\'+

    '|{cmd}<风云神甲男换女 yuan15="">  <风云神甲女换男 yuan16="">\'+

   '|{cmd}<藐视一切男换女 yuan17="">  <藐视一切女换男 yuan18="">\'

    );

end;

procedure _yuan1;

 begin

&网站制作模板nbsp;if (This_Player.GetBagItemCount ('传奇神甲(男)') >= 1)  then

   begin

This_Player.Take('传奇神甲(男)',1);

This_Player.Give('传奇神甲(女)',1);

ServerSay('恭喜玩家<' + This_Player.Name + '>在盟重互换了传奇神甲(女)！', 70);