战神引擎加官进爵自定义Npc脚本(带称号+地图)

用于战神引擎加官进爵自定义Npc脚本,玩家需要提供称号碎片+元宝才能晋升,晋升以后可以获得对应的称号,也可以进入对应的地图,帮主把自定义NPC的素材、脚本和引入文件、材料DB、称号素材都提取出来了,地图gm根据自己版本的情况,自己添加对应的就行。

称号碎片DB

2209 0 称号碎片 153 2 0 0 2376 0 9999 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 7 0

战神引擎加官进爵自定义Npc脚本(带称号+地图)

战神引擎加官进爵自定义Npc脚本(带称号+地图)

部分脚本

if strtoint(gotostr) = 4 then
	begin
		 if This_Player.getV(111,11) = 3 then
	begin
	if (This_Player.GetBagItemCount ('称号碎片') >= 80) and (This_Player.YBNum >= 800) then
	begin
	This_Player.SetV(111,11,4);				
	This_Player.SetV(111,15,10);
	This_Player.SetV(200,4,1);
	This_Player.Take('称号碎片',80)
	This_Player.ScriptRequestSubYBNum(800);
	This_Player.AddPlayerAbil(1, This_Player.GetV(111,15),10800);   
	This_Player.SetV(69,7,99);
	givefenghao;
	This_Player.playerNotice('激活成功', 0);  
	end else
	This_Player.playerNotice('称号碎片或元宝不足', 0); 
	end else
	 This_Player.playerNotice('请按顺序激活或你已激活过了', 0);  
end else  
if strtoint(gotostr) = 5 then
	begin
		 if This_Player.getV(111,11) = 4 then
	begin
	if (This_Player.GetBagItemCount ('称号碎片') >= 100) and (This_Player.YBNum >= 1000) then
	begin
	This_Player.SetV(111,11,5);						
	This_Player.SetV(111,16,10);
	This_Player.SetV(200,5,1);
	This_Player.Take('称号碎片',100)
	This_Player.ScriptRequestSubYBNum(1000);
	This_Player.AddPlayerAbil(14, This_Player.GetV(111,16),10800);   
	This_Player.SetV(69,7,94);
	givefenghao;
	This_Player.playerNotice('激活成功', 0);  
	end else
	This_Player.playerNotice('称号碎片或元宝不足', 0); 
	end else
	 This_Player.playerNotice('请按顺序激活或你已激活过了', 0);  
end;
end;
procedure _jihuo1;  
begin
	if This_Player.getV(200,1) = 1 then
	begin                 
	This_Player.SetV(69,7,96);
	givefenghao;
	end else 
		This_Npc.NpcDialog(This_Player,
	'称号未激活,请先激活'
	);
end;
procedure _jihuo2;  
begin  
	if This_Player.getV(200,2) = 1 then
	begin                 
		This_Player.SetV(69,7,97);
	givefenghao;
	end else 
		This_Npc.NpcDialog(This_Player,
	'称号未激活,请先激活'
	);
end;
procedure _jihuo3;  
begin  
	if This_Player.getV(200,3) = 1 then
	begin                 	
	This_Player.SetV(69,7,98);
	givefenghao;
	end else 
		This_Npc.NpcDialog(This_Player,
	'称号未激活,请先激活'
	);
end;
procedure _jihuo4;  
begin   
	if This_Player.getV(200,4) = 1 then
	begin                 
	This_Player.SetV(69,7,99);
	givefenghao;
	end else 
		This_Npc.NpcDialog(This_Player,
	'称号未激活,请先激活'
	);
end;
procedure _jihuo5;  
begin   
	if This_Player.getV(200,5) = 1 then
	begin                 
    This_Player.SetV(69,7,94);
	givefenghao;
	end else 
		This_Npc.NpcDialog(This_Player,
	'称号未激活,请先激活'
	);
end;
分享到:
赞(0)