- 打卡等级:暂无等级
- 打卡总天数:194
- 打卡月天数:18
- 打卡总奖励:150
- 最近打卡:2025-11-18 00:53:50
|
每个玩家,每天免费领取三次经验脚本,是从手游服务端里面提取出来的,经过测试,领取三次之后,就无法重复领取,脚本测试过程中,没有发现任何问题,领取的经验和次数,都可以在脚本里面修改。1 f5 ]! u0 ]8 W. |+ M
{' ]$ r2 i7 x' o5 B
/ {6 H, p8 I3 ^5 @3 r1 z. D; d
{
: [: z6 j; R! a+ C6 |2 z2 x' o*******************************************************************}
2 `* n0 {3 P& { AProgram Mir2;: u- f- M, a% T/ S5 t# c+ x5 O
Procedure _doexit;2 Y% o$ p. W. ^: v2 A& p
begin
9 M6 G5 t. a1 x% k7 a% S This_NPC.CloseDialog(This_Player);8 G4 k4 r9 a3 C# T7 D1 c+ O7 D
end;
7 F; K S4 N0 s//==============================================================新手任务6 C B- |, p5 X* K; E j
procedure _GetFreeExp;
7 ~# L* s/ y3 F9 r( v" _- ~var today , num: integer;
% R4 ?' r* c V5 c+ Y$ _7 m! Ibegin$ a( B" e. f6 W% X' U
today := GetDateNum(GetNow);// 获取当前日期
2 L# C' e; e$ H$ m4 Q3 L if This_Player.GetV(13,1) <> today then
6 Z7 ]; y# M0 V) O- d, Q( ^ | begin& u: m3 N* y3 ]* {+ X
This_Player.SetV(13,1,today);
, s" v/ n$ t' Q4 G. p This_Player.SetV(13,2,0);) g" {% B9 o6 |+ W1 H4 N4 d
end;
$ q+ K# h4 ?8 a- y* q. Z1 y //初始化变量值,每天首次触发,将领取变量设置为0
$ O! l' r+ I9 b+ {1 b8 w7 h% q$ q% S$ [0 Z1 g! C
num := This_Player.GetV(13,2); //获取已领取次数,**取值时切记写在初始化之后1 {- Q9 c: ?- @- T1 m! ^$ O
if num < 3 then
/ S' c' J& b, i5 Q& n8 f4 V% H8 e begin) y! t( J0 C& D6 T
This_Player.Give('经验',1000000);/ L! K! O: P! J" m# ]1 J
This_Player.SetV(13,2, num + 1); //领取变量每领取一次加一
$ b* M& a! R/ l9 Y3 S0 A This_NPC.NpcDialog(This_Player,$ w0 W! T2 u6 @% n
'恭喜你获得100万点经验值'
; a$ p( W6 V% x" o; q/ { +'|{cmd}<继续领取经验 getfreeexp="">');
6 i4 v6 l- D( w, N" M" T8 A- D! T$ G) \; q+ W( x3 x- L
end else
9 y2 t" ?* c2 f) t- @! L3 o# e This_NPC.NpcDialog(This_Player,'你今天已领取了3次经验');" a, ?( Z* [7 p p4 K, ]% V
end;( U0 v0 ?+ a' _2 Z
/ A+ {& g- `; }; ~begin//主函数入口
4 z" t& ^& n2 P& Q) Z( w This_NPC.NpcDialog(This_Player,! u- s+ e$ i8 g; ~7 ?+ [
'玩家每天可免费领取3次经验,每次可领取100万'
0 M0 e/ y( ~2 A+ v/ V) u +'|{cmd}<免费经验领取 getfreeexp="">');
/ n, R, Q1 {4 p# r5 bend.
+ ~6 G$ Q2 n: F2 K/ @" F; ^9 w+ n; C* U& m& h8 \
w$ h# R& I3 v7 p) e% P
 |
|