战神引擎纯图片传送自定义Npc脚本,整个NPC上没有一个文字,用图片+地图按钮构成,默认上面有八哥传送点,是直接从梵天第二季提取出来的,传送条件需要渡劫点和转生,脚本是明文版的,可以任意修改这些条件。素材是从3.0里面提取的,如果添加到2.0或者4.0,路径可能有区别,自行参照。

部分脚本
procedure _decpkdecsw4;
begin
if This_Player.MyPkpoint >= 100 then
begin
if This_Player.GoldNum >= 1000000 then
begin
This_Player.DecGold(1000000);
This_Player.DecPkPoint(100);
end
else
begin
This_Npc.NpcDialog(This_Player,
'对不起,你没有金币,不能消减PK值!'
);
end;
end
else
begin
This_Npc.NpcDialog(This_Player,
'你现在不需要消减PK值!'
);
end;
end;
procedure _anquan9;
begin
if This_Player.GetS(15,32) >= 3 then
begin This_Player.FlyTo('31',29 + random(3),40 + random(3)); end else This_NPC.NpcDialog(This_Player,'您此大陆渡劫未满无法进入');
end;
procedure _anquan8;
begin
if This_Player.GetS(15,32) >= 2 then
begin This_Player.FlyTo('29',24 + random(3),28 + random(3)); end else This_NPC.NpcDialog(This_Player,'您此大陆渡劫未满无法进入');
end;
procedure _anquan7;
begin
if This_Player.GetS(15,32) >= 1 then
begin This_Player.FlyTo('yzjt',24 + random(3),26 + random(3)); end else This_NPC.NpcDialog(This_Player,'您渡劫未满无法进入');
end;
procedure _anquan6;
begin
if (This_Player.level >= 1399) then
begin This_Player.FlyTo('x276',42 + random(3),47 + random(3)); end else This_NPC.NpcDialog(This_Player,'等级不足1399级无法进入');
end;
procedure _anquan5;
begin
if This_Player.GetV(77,1) >= 25 then begin This_Player.FlyTo('xbxzc',115 + random(3),89 + random(3)); end else This_NPC.NpcDialog(This_Player,'转生不足25无法进入');
end;
procedure _anquan4;
begin
if This_Player.GetV(77,1) >= 20 then begin This_Player.FlyTo('4~9',242 + random(3),198 + random(3)); end else This_NPC.NpcDialog(This_Player,'转生不足20无法进入');
end;
procedure _anquan3;
begin
if This_Player.GetV(77,1) >= 15 then begin This_Player.FlyTo('5~10',140 + random(3),333 + random(3)); end else This_NPC.NpcDialog(This_Player,'转生不足15无法进入');
end;
procedure _anquan2;
begin
if This_Player.GetV(77,1) >= 0 then begin This_Player.FlyTo('3~10',333 + random(3),333 + random(3)); end else This_NPC.NpcDialog(This_Player,'转生不足15无法进入');
end;








