战神引擎自定义转职+变性+一键学技能Npc脚本带素材

用于战神引擎战神引擎自定义转职+变性Npc脚本，对应的素材帮主也一起提取出来了，脚本经过帮主亲自测试，没有任何问题，条件满足以后，转职后，需要大退一次，从新进去，打开NPC，初始化自己的技能，这样就可以自动学习好当前职业的所有技能，并在自动升级到三级，一些高级技能需要额外学习，脚本需要配合盘古插件一起使用。

特别注意：脚本压缩包里面有2个素材有关的文件夹，pic是帮主提取出来的，你们添加的时候，发现素材有遗漏，那么用战神解压工具，把rs-完整版.zip解压出来，在里面找到遗漏的素材，补全。如果没有遗漏，可以别管rs-完整版.zip这个文件。脚本和素材是帮主从3.0插件里面提取的，你们在增加的时候，记得严格安装插件读取自定义素材的路径进行操作。

转账+变性物品DB

数据库没有就复制下面的DB数据增加进去，物品内观素材随便用什么代替，用技能书的就行。如果数据库有类似的物品，则不用添加下面的。

554 0 转职证 41 0 0 0 1949 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 0 0 7 0

555 0 变性证 41 0 0 0 1953 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 0 0 7 0

盘古设置

战神引擎自定义转职+变性+一键学技能Npc脚本带素材

Npc截图

战神引擎自定义转职+变性+一键学技能Npc脚本带素材

部分脚本

Program Mir2;
procedure doMain;
begin
This_Npc.NpcDialog(This_Player,
'Bg:diy:1|'+
'Exit:diy:2:0:660:72|'+
'1:Text:160:80:19:转职需求：转职证*1个@251|'+
'1:Text:220:110:18:确认转职后，需要大退重新进入游戏！@254|'+
'1:Text:220:140:18:注意：转职后可以免费学习初级技能！@253|'+
'1:Text:220:170:18:注意：转职后高级技能需要重新修炼！@249|'+
'1:Spr:diy:40:55:150:285:0.1:0.7|'+
'1:Spr:diy:80:95:350:280:0.1:0.7|'+
'1:Spr:diy:120:135:550:285:0.1:0.7|'+
'1:RBtn:diy:7:450:135:初级技能@xuejn:20:250|'+
'1:RBtn:diy:7:590:135:我要变性@xing:20:251|'+
'1:RBtn:diy:7:160:430:转职战士@zhanshi:20:245|'+
'1:RBtn:diy:7:360:430:转职法师@fashi:20:245|'+
'1:RBtn:diy:7:560:430:转职道士@daoshi:20:245|'+
'|{cmd}</@main></@xing></@xuejn></@zhanshi></@fashi></@daoshi></@bian>'
);
end;
procedure _xing;
var G1 , G2 , G3 , G4: String;
begin
 if This_Player.Gender = 0 then
begin
This_Npc.NpcDialog(This_Player,
'Bg:diy:1|'+
'Exit:diy:2:0:660:72|'+
'1:Text:180:100:20:变性需求：变性证明*1个@251|'+
'1:Text:240:130:20:确认变性后，需要大退重新进入游戏！@254|'+
'1:Text:240:160:20:注意：变性前需要先脱下身上的衣服！@253|'+
'1:Spr:diy:160:185:160:280:0.1:0.7|'+
'1:Spr:diy:200:215:350:280:0.1:0.7|'+
'1:Spr:diy:240:255:540:285:0.1:0.7|'+
'1:RBtn:diy:7:590:135:我要转职@main:20:251|'+
'1:RBtn:diy:7:360:430:开始手术@bian:20:245|'+
'|{cmd}</@main></@xing></@zhanshi></@fashi></@daoshi></@bian>'
);
end else
This_Npc.NpcDialog(This_Player,
'Bg:diy:1|'+
'Exit:diy:2:0:660:72|'+
'1:Text:180:100:20:变性需求：变性证明*1个@251|'+
'1:Text:240:130:20:确认变性后，需要大退重新进入游戏！@254|'+
'1:Text:240:160:20:注意：变性前需要先脱下身上的衣服！@253|'+
'1:Spr:diy:40:55:150:285:0.1:0.7|'+
'1:Spr:diy:80:95:350:280:0.1:0.7|'+
'1:Spr:diy:120:135:550:285:0.1:0.7|'+
'1:RBtn:diy:7:590:135:我要转职@main:20:251|'+
'1:RBtn:diy:7:360:430:开始手术@bian:20:245|'+
'|{cmd}</@main></@xing></@zhan想法></@fashi></@daoshi></@bian>'
);
end;
procedure _bian;
begin
if This_Player.GetBagItemCount ('变性证明') >= 1  then
begin
This_Player.Take('变性证明',1);
This_Player.SetS(1,1,3);//变性
ServerSay('玩家<' + This_Player.Name + '>在盟重成功完成变性手术，你们猜他现在是帅哥还是美眉！', 3);
This_NPC.NpcDialog(This_Player,'变性成功，祝您游戏愉快！');
This_Player.SetS(1,1,16);//踢下线
end else
This_NPC.NpcDialog(This_Player,'变性证明不足，请准备好一枚变形证明在来！');
end;

分享到：

赞(0)