[教程/工具] 战神引擎 每日免费领取3次经验修改手游脚本

每个玩家，每天免费领取三次经验脚本，是从手游服务端里面提取出来的，经过测试，领取三次之后，就无法重复领取，脚本测试过程中，没有发现任何问题，领取的经验和次数，都可以在脚本里面修改。$ N+ x% N$ m3 h: G5 R0 g: X% w
# w" g0 Y: S  L# o$ S' \% l
! r$ [4 B# U( d# A1 r8 u5 l2 ]
{+ e% k/ A9 r5 Y0 r
*******************************************************************}# r$ ]3 y" c- u
Program Mir2;0 d9 D5 y% h" D& g9 C+ I
Procedure _doexit;
2 Y9 L9 P6 f2 _4 Obegin5 X* @" E! ]9 f: f0 o' S9 S$ l
   This_NPC.CloseDialog(This_Player);
" \" N4 O" M# O7 z0 {% @end;
6 M3 {7 m6 q; e; b2 Z5 o. U//==============================================================新手任务
2 h) j1 O6 D$ M  zprocedure _GetFreeExp;
2 s4 M8 u' W" r" G! T- Y$ bvar today , num: integer;! d& y* ?% z, Q4 @0 Z5 d
begin4 _+ m3 {1 F( _6 A2 l; K
    today := GetDateNum(GetNow);// 获取当前日期4 A* G/ y% h8 i. v
    if This_Player.GetV(13,1) <> today then     
( [+ n& x# o0 C8 `  [% A0 q    begin
. J$ w! Z8 V. R( t, M* z       This_Player.SetV(13,1,today);
% ~0 ]+ d' F: o! F$ y* u" Z       This_Player.SetV(13,2,0);- q" d2 ]! o9 f9 {$ n: k& L7 y
    end;
  n/ c6 }" M3 n3 b: m             //初始化变量值，每天首次触发，将领取变量设置为05 p4 M9 W# \$ N& f
  f; x% G" e" k
    num := This_Player.GetV(13,2);  //获取已领取次数，**取值时切记写在初始化之后5 H1 q$ }2 b# W" i2 e, |
    if num < 3 then6 ~8 g! j/ ]: g: G/ F" f: w
    begin
$ A  {; I, Y, }) R/ O! T        This_Player.Give('经验',1000000);
( q* U7 f1 j5 l' w( x        This_Player.SetV(13,2, num + 1); //领取变量每领取一次加一
* ~$ Y+ _9 a3 x/ v  x) d! J: E5 q1 |        This_NPC.NpcDialog(This_Player,  [- i7 x5 l* I( t9 F6 p/ N
        '恭喜你获得100万点经验值'3 \* |9 x# Y' u7 ~: F, y7 k1 H
        +'|{cmd}<继续领取经验 getfreeexp="">');
1 c# |( \+ j& g5 t4 b& t; s  M" W/ N" }1 p! |5 I
    end else
( }" O! w7 ?- _) D7 t    This_NPC.NpcDialog(This_Player,'你今天已领取了3次经验');
3 a- d/ R, D3 ^2 T/ `end;0 ^- x5 Y- [' [3 M5 t3 p) v- J
" e8 L* d$ v" p
begin//主函数入口3 G* h9 W" @7 D2 T+ n7 h
    This_NPC.NpcDialog(This_Player,
7 z' n7 N. ~/ r. e# q; E    '玩家每天可免费领取3次经验，每次可领取100万'
6 q9 M) \# s/ y    +'|{cmd}<免费经验领取 getfreeexp="">');6 W, W0 L6 r7 U7 g9 @7 O5 H
end.' R2 ~, i6 K: V: z& T  b7 q

/ N8 u. w' c( N/ ^( X3 `% H7 V5 y4 K) Q; E* b% d