金币/灵符开赞助使者自定义Npc脚本带素材

用于战神引擎的赞助使者NPC脚本，脚本使用了自定义对话框，帮主把脚本和对应的素材一起提取出来了，喜欢这种自定义对话框的GM可以下载来研究一下，npc默认开启赞助需要金币或者灵符，五种赞助称号，脚本是明文版，可以任意修改里面的内容，牵扯到了三份属性文件，切莫覆盖，添加的时候记得备份一下原先版本里面的属性文件。

部分脚本

procedure _wzzz;  
begin
if This_Player.GetV(124,24) < 4 then
begin
OKKK('失败','请先领取钻石赞助');
exit;
end; 
if This_Player.GetV(124,24) = 4 then
begin
This_Player.SetV(124,24,5); 
This_Player.SetV(69,13,25);
setfenghao(5);
givefenghao;
This_Player.SetS(71,12,6);
This_Player.SetS(61,12,150);
shuxing1;
shuxing10;
NOTICE('恭喜你','成功领取王者赞助');
ServerSayPlus('恭喜【'+This_Player.Name+'】成功领取了王者赞助！');
end else
OKKK('失败','你已经领取过王者赞助');
end;
procedure _yc;  
begin
if This_Player.GetV(124,24) = 5 then
begin
if This_Player.GetV(69,13) <> 0 then
begin
This_Player.SetV(69,13,0);
givefenghao;
NOTICE('操作成功','称号已隐藏');
end else
begin
OKKK('失败','称号已处于隐藏状态,无需重复隐藏');
end;
end else
OKKK('失败','你还不是王者赞助');
end;
procedure _kq;  
begin
if This_Player.GetV(124,24) = 5 then
begin
if This_Player.GetV(69,13) = 0 then
begin
This_Player.SetV(69,13,25);
givefenghao;
NOTICE('操作成功','称号已开启');
end else
begin
OKKK('失败','称号处于开启状态，无需重复开启');
end;
end else
OKKK('失败','你还不是王者赞助');
end;
begin
	domain;
end.

分享到：

赞(0)