土城跑酷Npc脚本(战神引擎手游活动功能)

用于战神引擎手游版本的土城跑酷Npc脚本,脚本从夜雨版本里面提取出来的,如果你们在添加以后,牵扯到了素材,记得到这个版本里面提取,帮主制只提取了脚本文件。跑酷的时间和奖品可以任意在脚本里面修改,明文版的。

土城跑酷Npc脚本(战神引擎手游活动功能)

部分脚本

program Mir2;
var
WpName : string;
Rdm_int,px, py :Integer;

Procedure _doexit;
begin
   This_Npc.CloseDialog(This_Player);
end;

procedure _tcpk;
   begin
if This_Player.Level >1 then
  begin                 
    This_Player.CallOut(This_Npc, 1, 'tcpk2');
    This_Player.FlyTo('3',333,333);
    This_Npc.NpcDialog(This_Player,
   '请好好把握这幸福的时光。'
   ); 
   
   end;
    end;

 procedure tcpk2;
 
begin
Rdm_int := random(100); 
px:= This_player.My_X;
py:= This_Player.My_Y;

if  ((GetHour = 15) and (GetMin < 5)) or 
((GetHour = 19) and (GetMin < 5)) then begin  //自己修改开放时间    
if (This_Player.MapName = '3') and ( 323 < px ) and (px < 343 ) 
and (323 < py ) and (py < 343) then  //在土城坐标333.333 周围10格内跑动有效 
    begin if (This_Player.GetV(77,1)  <> px) or  
    (This_Player.GetV(77,2)  <> py )then   // 移动才会继续触犯以下代码 
    begin 
      if This_Player.FreeBagNum >= 2 then  
       begin
	      if Rdm_int < 5 then  // 5%机会获得以下物品 
                begin
                case random(10) of    // 5%机会获得以下25个物品中的一个 
                    0 : WpName := '裁决之杖';
					1 : WpName := '圣战头盔';
					2 : WpName := '圣战项链';
					3 : WpName := '圣战手镯';
					4 : WpName := '圣战戒指';
					5 : WpName := '骨玉权杖';
					6 : WpName := '法神项链';
					7 : WpName := '法神手镯';
					8 : WpName := '法神戒指';
					9 : WpName := '龙纹剑';
					10 : WpName := '天尊项链';
					11 : WpName := '天尊手镯';
					12 : WpName := '天尊戒指';
					13: WpName := '防御戒指';
					14: WpName := '天师长袍';
					15 :WpName := '天尊道袍';
					16: WpName := '霓裳羽衣';
                    17 :WpName := '法神披风';
                    18 :WpName := '圣战宝甲';
					19: WpName := '天魔神甲';

					end;
               
             end else if Rdm_int < 10 then  
                begin
                case random(16) of
                    0 : WpName := '井中月';
                    1 : WpName := '黑铁头盔';
                    2 : WpName := '骑士手镯';
					4 : WpName := '力量戒指';
                    5 : WpName := '无极棍';
                    6 : WpName := '灵魂项链';
					7 : WpName := '三眼手镯';
                    8 : WpName := '泰坦戒指';
                    9 : WpName := '恶魔铃铛';
					10: WpName := '龙之手镯';
					11 :WpName := '紫碧螺';
					12: WpName := '魔杖';
					13: WpName := '绿色项链';
				
            end;
               
             end    
             else if Rdm_int < 20 then 
                begin
                case random(10) of
                    0 : WpName := '炼狱';
                    1 : WpName := '幽灵项链';
                    2 : WpName := '幽灵手套';
					3 : WpName := '龙之戒指';
                    4 : WpName := '魔杖';
                    5 : WpName := '生命项链';
                    6 : WpName := '思贝儿手镯';
                    7 : WpName := '红宝石戒指';
                    8 : WpName := '银蛇';
                    9 : WpName := '天珠项链';
					10 : WpName := '心灵手镯';
					11 : WpName := '铂金戒指';
             end;
               
             end  
             else if Rdm_int < 50 then 
                begin
                case random(50) of
                    0 : WpName := '裁决之杖';
                    1 : WpName := '骨玉权杖';
                    2 : WpName := '无极棍';
					3 : WpName := '龙纹剑';
                    4 : WpName := '祝福油';
                    5 : WpName := '金刚石';
					6 : WpName := '1元宝';
					7 : WpName := '2元宝';
					8 : WpName := '10元宝';
					9 : WpName := '5元宝';
					10 : WpName := '2灵符';
					11 : WpName := '5灵符';
					12 : WpName := '1灵符';
           end;
               
             end
分享到:
赞(0)