战神引擎传统版Npc彩色文字对话框脚本

用于战神引擎传统版Npc彩色文字对话框脚本,脚本是传统版,没有使用任何自定义NPC素材,上面的才是文字,也是通过演示代码实现的,脚本功能比较丰富,有判断等级和扣除灵符的功能。脚本是明文版,里面扣除的货币变量和数量以及等级都可以任意修改。

战神引擎传统版Npc彩色文字对话框脚本

部分脚本

Program Mir2;
Procedure _doexit;
begin
   This_NPC.CloseDialog(This_Player);
end;
procedure loadPlayer;
var count:integer; Uname:string;
begin	
	count:=0;
	This_DB.ExecuteQuery('select ChrName from mir3.user_index where level >= 0 order by level desc;');	
	while not(This_DB.PsEof()) do
	begin	
		Uname:=This_DB.PsFieldByName('ChrName');
		if This_Player.FindPlayer(Uname) then	
		begin
			count:=count+1;
			WriteIniSectionStr('loadPlayer.txt','PlayerList',inttostr(count),Uname);	
			WriteIniSectionStr('loadPlayer.txt','PlayerList','reloadtime',inttostr(GetMin));	
		end				
		This_DB.PsNext();
	end;
  	end;    
procedure reloadplayer;
var settime:integer;
begin
	settime:=strtointdef(ReadIniSectionStr('loadPlayer.txt','PlayerList','reloadtime'),-1);	
	settime:=settime;
	if GetMin <> settime then
	loadPlayer;
end;
Procedure domain;
   begin
   	reloadplayer;
     { This_Npc.NPCSay('高爆地图爽歪歪!!!'); }
      This_NPC.NpcDialog(This_Player,
'|          <≈≈≈/FCOLOR=248><雷/FCOLOR=252><霆/FCOLOR=250><星王/FCOLOR=251><2022/FCOLOR=250>年<独家/FCOLOR=249><手游/FCOLOR=253><≈≈≈/FCOLOR=248>\'+
   '|<◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇/c=153>\'+
   '|<◇◆地图爆率◆◇:/c=247>┝<爆所有装备!!!/c=253>\'+
   '|<◇◆刷新频率◆◇:/c=250>┝<◇BOSS120分!!!/c=21>\'+  
   '|<◇◆挑战难度◆◇:/c=251>┝<★★★★/SCOLOR=249>\'+
   '|<◇◆爆率指数◆◇:/c=252>┝<★★★★★/SCOLOR=249>\'+ 
   '|<◇◆特别提示◆◇:/c=247>┝<62级+500灵符!/SCOLOR=21>\'+     
   '|<◇◆特别提示◆◇:/c=247>┝<2分钟扣60灵符!!!/SCOLOR=21>\'+  
   '|◇◆<英雄联盟乐园/SCOLOR=249>◆◇<进入英雄联盟乐园/@qinjun>※※※\'+
  // '|◇◆<英雄联盟乐园/SCOLOR=249>◆◇            <元宝进入英雄联盟乐园/@qinjun1>※※※\'+
   '|<◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇/c=153>\'+ 
+'|\'
      );
   end;
 procedure mei;
begin
    if (This_Player.MyLFnum >= 60) then 
    begin
         if CompareText(This_Player.MapName,'kls~1') = 0 then
        begin
            This_Player.DecLF(0, 60, false);
            This_Player.CallOut(This_NPC,120,'mei');
			This_Player.PlayerNotice('您在英雄联盟乐园2分钟扣除60灵符!',2);
        end;
    end else 
    begin
        This_Player.Flyto('3',330+random(3),330+random(3));
          This_NPC.NpcDialog(This_Player,
  '你的灵符用完啦!!!'
  );
    end;
end;
分享到:
赞(0)