战神引擎装备时装双外显NPC脚本代码

夜游神 · 发表于 2022-12-31 21:17:05

{**********************************
此脚本需配合盘古插件和明文使用,可独立控制两套外显和时装,
两套外显不分男女600张,时装男女各600张,分别支持五套.
外显一外显二时装分别对应\assets\res\data下 pangu.zip pangu2.zip pangu3.zip 三个素材文件
在其他脚本调用时只需参考此脚本传参即可.
*********************************}

program mir2;
procedure _pangu(pg:Integer);
var sort, index, pg1, pg2, pg3, hair : integer;
begin
sort := pg / 10;
index := pg mod 10;
This_Player.SetV(66,sort,index); //保存变更外显到变量
pg1 := This_Player.GetV(66,1); //获取外显一当前当前状态
pg2 := This_Player.GetV(66,2); //获取外显二当前当前状态
pg3 := This_Player.GetV(66,3); //获取时装当前当前状态
if pg1 < 0 then pg1 := 0;
if pg2 < 0 then pg2 := 0;
if pg3 < 0 then pg3 := 0;
hair := pg1 + pg2*6 + pg3*36 + 40; //计算出应设置的hair值
This_Player.ChgHair(hair);
end;
procedure domain;
begin
This_NPC.NpcDialog(This_Player,
+'{cmd}<外显一1/@pangu~11> ^<外显二1/@pangu~21> ^<时装1/@pangu~31>|\'
+'{cmd}<外显一2/@pangu~12> ^<外显二2/@pangu~22> ^<时装2/@pangu~32>|\'
+'{cmd}<外显一3/@pangu~13> ^<外显二3/@pangu~23> ^<时装3/@pangu~33>|\'
+'{cmd}<外显一4/@pangu~14> ^<外显二4/@pangu~24> ^<时装4/@pangu~34>|\'
+'{cmd}<外显一5/@pangu~15> ^<外显二5/@pangu~25> ^<时装5/@pangu~35>|\'
+'{cmd}<外显一取消/@pangu~10> ^<外显二取消/@pangu~20> ^<时装取消/@pangu~30>|\'
);
end;
begin
domain;
end.

复制代码

Chinese.Doll · 发表于 2023-12-26 07:45:32

积分任务

[战神引擎] 战神引擎装备时装双外显NPC脚本代码

相关帖子

[战神引擎] 战神引擎装备 时装双外显NPC脚本代码

相关帖子

[战神引擎] 战神引擎装备时装双外显NPC脚本代码