战神引擎 每日免费领取3次经验修改手游脚本
每个玩家，每天免费领取三次经验脚本，是从手游服务端里面提取出来的，经过测试，领取三次之后，就无法重复领取，脚本测试过程中，没有发现任何问题，领取的经验和次数，都可以在脚本里面修改。{
*******************************************************************}
Program Mir2;
Procedure _doexit;
begin
This_NPC.CloseDialog(This_Player);
end;
//==============================================================新手任务
procedure _GetFreeExp;
var today , num: integer;
begin
today := GetDateNum(GetNow);// 获取当前日期
if This_Player.GetV(13,1) <> today then
begin
This_Player.SetV(13,1,today);
This_Player.SetV(13,2,0);
end;
//初始化变量值，每天首次触发，将领取变量设置为0
num := This_Player.GetV(13,2);//获取已领取次数，**取值时切记写在初始化之后
if num < 3 then
begin
This_Player.Give('经验',1000000);
This_Player.SetV(13,2, num + 1); //领取变量每领取一次加一
This_NPC.NpcDialog(This_Player,
'恭喜你获得100万点经验值'
+'|{cmd}<继续领取经验 getfreeexp="">');
end else
This_NPC.NpcDialog(This_Player,'你今天已领取了3次经验');
end;
begin//主函数入口
This_NPC.NpcDialog(This_Player,
'玩家每天可免费领取3次经验，每次可领取100万'
+'|{cmd}<免费经验领取 getfreeexp="">');
end.
https://ps.ssl.qhimg.com/t02fdc712e2c38dc1da.jpg
页:
[1]