打宝全屏语音播报Npc脚本

用于战神引擎的打金提现带全屏语音播报Npc脚本，脚本明文版，可以任意修改里面的一切内容，网站上类似的打金提现脚本也有不少，个有个的特色，帮主也有对应的教程，讲解了打金提现脚本的安装和使用，不会的自行下载对照一下。脚本是帮主从3.0里面提取的。

打宝全屏语音播报Npc脚本

部分脚本

PROGRAM Mir2;
var 
num :integer;
today:integer; 
num1 :string;
num111 :string;
num0 :integer;
alipay :integer;
 color,wordlen, time, endpoint, txtlen:integer;
qq1797962565:string;
Procedure _doexit;
begin
   This_Npc.CloseDialog(This_Player);
end;
procedure _Exit;
begin
  This_Npc.CloseDialog(This_Player);
end;
procedure domain;
begin
if This_Player.GMLevel > 0 then
begin
    This_NPC.NpcDialog(This_Player,
+'|　　　　　　　　　　　　　　　　　　　　　\'
   +'|<欢迎来到顺风银行提款机/c=58>\'
   +'|<各大BOOS均爆红包/c=245>\'
   +'|<满10元可申请提现/c=95>\'
   +'|<提现处理时间为20-24点/c=245>\'
   +'|<每次最低提现10元，每天限一次/c=245>\'
   +'|　　　　　　　　　　　　　　　　　　　　　\'
	+'|{cmd} ^<申请提现/@first>\'
	+'|{cmd} ^<查询进度/@find>\'
	+'|{cmd} ^<关闭对话/@doexit>\'
	+'|{cmd} ^<清空当日变量/@delete>\'
  );
end
else
begin
    This_NPC.NpcDialog(This_Player,
+'|　　　　　　　　　　　　　　　　　　　　　\'
   +'|<欢迎来到顺风银行提款机/c=58>\'
   +'|<各大BOOS均爆红包/c=245>\'
   +'|<满10元可申请提现/c=95>\'
   +'|<提现处理时间为20-24点/c=245>\'
   +'|<每次最低提现10元，每天限一次/c=245>\'
   +'|　　　　　　　　　　　　　　　　　　　　　\'
	+'|{cmd} ^<申请提现/@first>\'
	+'|{cmd} ^<查询进度/@find>\'
	+'|{cmd} ^<关闭对话/@doexit>\'
  );
end;
end;
procedure _delete; 
begin    
        This_Player.SetV(63,4,0);
		This_NPC.NpcDialog(This_Player,'操作状态：成功');   
end;
procedure _find; 
begin 
alipay := This_Player.GetV(63,4);
    if alipay > 0 then//当日提现次数（检测是否当日有没有提现过）
	    begin
        if This_Npc.ChkStrInFile('\提现\成功提现角色.txt', This_Player.Name) = true  then  //检查是有申请提现角色
		    begin
            This_NPC.NpcDialog(This_Player,'当前角色的提现进度：正在审核中'); 
            end 
		else
		This_NPC.NpcDialog(This_Player,'当前角色的提现进度：成功');
        end		
    else
	This_NPC.NpcDialog(This_Player,'你没有正在处理的进度（今日未提现）');   
end;

分享到：

赞(0)