關於 RA腳本使用到SEAR上面

jhg681291

請問一下   這個到底是怎麼回事= =

我從RA論壇上找了許多腳本 在SEAR上可以使用 但是這個腳本不能使用

好像出在  explode這個指令上

我覺得好像與標籤也有關係到   因為我在SEAR找不到   OnWhisperGlobal  跟  OnLoginCmnd

1. -        script        LOGIN        -1,{
   
2. //OnWhisperGlobal:
   
3. //OnLoginCmnd:
   
4. OnPCLoginEvent:
   
5.         sleep2 1000 + .Rest * 60000;
   
6.         set .@i, (gettime(7) * 365 * 24 * 60) + (gettime(8) * 24 * 60) + (gettime(3) * 60) +gettime(2);
   
7.         if(.@i >= (#LastDailyReward + .MinWait)){
   
8.                 if(.@i < #LastDailyReward + .MaxWait){
   
9.                         set #DRewardCon, #DRewardCon + 1;
   
10.                 } else {
    
11.                         set #DRewardCon, 1;
    
12.                 }
    
13.                 set .@g, (#DRewardCon > getarraysize(.Rewards$)) ? getarraysize(.Rewards$) : #DRewardCon;
    
14.                 explode(.@TT$,.Rewards$[.@g],"|");
    
15.                 if(.Mode & 1 && .@TT$[4]){
    
16.                         explode(.@XT$,.@TT$[4],":");
    
17.                         
    
18.                         for(set .@x,0; .@x < getarraysize(.@XT$); set .@x,.@x + 2){
    
19.                                 getitem  atoi(.@XT$[.@x]),  atoi(.@XT$[.@x+1]);
    
20.                                 message strcharinfo(0),"Recived "+  .@XT$[.@x+1] +" "+ getitemname( atoi(.@XT$[.@x]));
    
21.                         }
    
22.                 }
    
23.                 if(.Mode & 2 && .@TT$[0]){
    
24.                         setd getd(.@TT$[1]),getd(.@TT$[1]) + atoi(.@TT$[0]);
    
25.                         message strcharinfo(0),"Recived "+ .@TT$[0] +" "+ .@TT$[1];
    
26.                 }
    
27.                 if(.Mode & 4 && (.@TT$[2] || .@TT$[3])) getexp atoi(.@TT$[2]),atoi(.@TT$[3]);
    
28.                 if(.Mode & 8){
    
29.                         for(set .@x,0; .@x < getarraysize(.BuffInfo); set .@x,.@x + 4){
    
30.                                 if(#DRewardCon % .BuffInfo[.@x + 1] == 0) sc_start .BuffInfo[.@x], .BuffInfo[.@x + 2] * 60000, .BuffInfo[.@x + 3];
    
31.                         }
    
32.                 }
    
33.                 message strcharinfo(0),"每日登入獎勵, 第 "+#DRewardCon+" 天"+((#DRewardCon > 1)?"s":"")+" in a row.";
    
34.                 set #LastDailyReward, .@i;
    
35.         } else {
    
36.                 set .@days,(#LastDailyReward + .MinWait - .@i)/60/24;
    
37.                 set .@hours,((#LastDailyReward + .MinWait - .@i)/60)%24;
    
38.                 set .@mins,(#LastDailyReward + .MinWait - .@i)%60;
    
39. 
    
40.         }
    
41. end;
    
42. OnInit:
    
43.         //Basic Settings
    
44.         //   1: Item | 2: "Points" | 4: Exp  
    
45.         //   8: Gain Buffs Every X Consecutive Days logged in
    
46.         // (a bit value, e.g. 3 = Items & Points from Multi)
    
47.         set .Mode,1 + 2 + 4 + 8;
    
48. 
    
49.         //To Enable @ Command '@loginreward' unslash next lines
    
50.         // * Needs extra commands for typos
    
51. //        bindatcmd("loginreward"        ,"LOGIN::OnLoginCmnd",0,99);
    
52. 
    
53.         //Minimum Minuets Between Collecting Daily Reward
    
54.         //   Day: 22*60 - 24*60
    
55.         //   Week: 10080
    
56.         set .MinWait,1320;
    
57. 
    
58.         //Minuets Before Lose Consecutive Daily Reward
    
59.         //   Day: 48*60 - 50*60
    
60.         //   Week: 20160
    
61.         set .MaxWait,3000;
    
62. 
    
63.         //Number of mins after logging before collecting prize
    
64.         set .Rest,0;
    
65. 
    
66.         // Consecutive Days Buff
    
67.         // Each buff contains 4 variables (32 Total Max)
    
68.         // <Type>,<Days>,<Duration>,<Rate>, // Buff 1
    
69.         // <Type>,<Days>,<Duration>,<Rate>, // Buff 2
    
70.         //   ...;
    
71.         //
    
72.         //  Example: 188,7,45,3
    
73.         //    -Every 7th consecutive day logged in Player gains +3 Str for 45 mins
    
74.         //
    
75.         //  Type is 188, which references which SC_ to use, SC_INCSTR in this example
    
76.         //     -For a full list of SC_ visit the db/const.txt
    
77.         //  Days is days buff is applied, in this example 7, so every 7th day, 14,21,28....
    
78.         //  Duration is buff duration is Minuits, in this example 45 mins
    
79.         //  Rate is buff strength, in this example player gains 3 Str
    
80.         setarray .BuffInfo        ,188,7,45,3        // +3 Str for 45 Mins Every 7th Day
    
81.                                 ,194,4,45,25        // +25 Hit for 45 Mins Every 4th Day
    
82.                                 ,198,10,60,10        // +10% Hp for 60 Mins Every 10th Day
    
83.                                 ,257,9,120,50;        // +50% Exp for 120 Mins Every 9th Day
    
84. 
    
85.         // Daily Prize items (max 128 days):
    
86.         //   "<Points>|<PointType>|<BaseExp>|<JobExp>|<itemID-1>:<amount-1>:<itemID-2>:<amount-2>...etc", // Day 1
    
87.         //   "<Points>|<PointType>|<BaseExp>|<JobExp>|<itemID-1>:<amount-1>:<itemID-2>:<amount-2>...etc"  // Day 2
    
88.         //   ...;
    
89.         // Total length of any days string must be 255 or shorter
    
90.         // * If players login longer than the last set
    
91.         //   day, they will keep getting the last prize.
    
92.         setarray .Rewards$,
    
93.                 "0|Zeny|0|0|512:1",                        // Day 1: 1 Apple
    
94.                 "0|Zeny|0|0|513:1",                        // Day 2: 2 Bananas
    
95.                 "1000|Zeny",                                // Day 3: 1000 Zeny
    
96.                 "0|Zeny|100|50",                        // Day 4: 100 Base 50 Job Exp
    
97.                 "1|#ExamplePoint|0|0|512:1";        // Day 5: 1 Apple + 2 Bananas + 1 #ExamplePoint
    
98. end;
    
99. }

複製代碼

a91323

sear有 OnWhisperGlobal

explode  sear跟ra結構上沒差異

jhg681291

a91323 發表於 2014-4-24 05:30 PM
sear有 OnWhisperGlobal

explode  sear跟ra結構上沒差異

有找到你說的那個標籤了

但是不知道是哪裡還有問題..

o03126

if(.Mode & 1 && .@TT$[4]!="")

sea可能if 不能直接判斷字串是否為空吧

jhg681291

o03126 發表於 2014-4-24 07:28 PM
if(.Mode & 1 && .@TT$[4]!="")

sea可能if 不能直接判斷字串是否為空吧

可以了     謝謝你

現在還有些小bug還要修復ˊˇˋ  

jasonwu0319

jhg681291 發表於 2014-4-24 07:40 PM
可以了     謝謝你

現在還有些小bug還要修復ˊˇˋ

sear版本()內只能判斷單個字串或數值是否為空
多個無法這樣用