求一腳本 上線滿30分鐘 自動發放點數或物品 [80積分]

qqq66339

求一種腳本     
譬如說  玩家 只要在線上  滿30分鐘

就會自動取得隨機商城點數  1~100點


我找了好久  就是沒有類似的腳本  


所以 求各位大大  幫我製作這種腳本 ^^   


感激不盡 ....

dyher

原來是變數紀錯...哈哈哈
我真糊塗
真不好意思
再試試看吧

1. 
   
2. -        script        商城點數取得        -1,{
   
3. OnPCLoginEvent:
   
4.         addtimer 1800000,strnpcinfo(3) +"::OnaddCash";
   
5. end;
   
6. OnaddCash:
   
7.         deltimer strnpcinfo(3) +"::OnaddCash";
   
8.         set .@getmoney,rand(0,1000);
   
9.         set #CASHPOINTS,#CASHPOINTS + .@getmoney;
   
10.         dispbottom "取得商城點數：" + .@getmoney +"點";
    
11.         dispbottom "你共有商城點數：" + #CASHPOINTS +"點";
    
12.         
    
13.         addtimer 1800000,strnpcinfo(3) +"::OnaddCash";
    
14. 
    
15. end;
    
16. 
    
17. }
    

複製代碼

dyher

1. 
   
2. -        script        商城點數取得        -1,{
   
3. OnPCLoginEvent:
   
4.         addtimer 1800000,strnpcinfo(3) +"::OnaddCash";
   
5. end;
   
6. OnaddCash:
   
7.         deltimer strnpcinfo(3) +"::OnaddCash";
   
8.         set .@getmoney,rand(0,1000);
   
9.         set #CashPoint,#CashPoint + .@getmoney;
   
10.         dispbottom "取得商城點數：" + .@getmoney +"點";
    
11.         dispbottom "你共有商城點數：" + #CashPoint +"點";
    
12.        
    
13.         addtimer 1800000,strnpcinfo(3) +"::OnaddCash";
    
14. 
    
15. end;
    
16. 
    
17. }
    

複製代碼

qqq66339

請問大大  直接複製 貼在腳本就OK了嗎?

dyher

對阿-.-
有問題再提出吧

qqq66339

大大  話說 沒效果說ˊˇˋ

qqq66339

可以加個即時幫忙修改一下嘛 ?

小即 forever75127

qqq66339

大大 開機檔出現這些字

[錯誤]: npc_parsesrcfile: Unknown syntax in file 'npc/腳本/半小時發放點數.txt', line '1'. Stopping...
* w1=-        script        商城點數取得        -1,{
* w2=
* w3=
* w4=


這算正常嘛.?

qqq66339

過了半個多小時了 他還是沒發點數

milktea_31512

腳本一設定

1. -        script        Login        -1,{
   
2. OnPCLoginEvent:
   
3.                 set @chcheck,1;
   
4.                 addtimer $@podelay,"點數人員::OnTimeover";
   
5.          dispbottom "[ 點數系統 ] : 開始 積分 計算請勿中途離線會重新計算!! (每經過 30分鐘 增加積分 1點)";
   
6.                 dispbottom "[ 點數系統 ] : 開啟 露天商店、聊天室將會暫停積分計算請注意!!";
   
7.                 dispbottom "[ 點數系統 ] : 您目前積分為[ "+##CASHPoint+" ]";
   
8.         }
   
9.         close;
   
10. }
    

複製代碼

腳本二設定

1. prt_in,161,107,3        script        點數人員        -1,{
   
2. if(@chcheck==0){set $printa$,"開始點數累積";}
   
3. if(@chcheck==1){set $printa1$,"停止點數累積";}
   
4. mes "         [積分人員]";
   
5. mes "妳好阿，我是積分系統的服務員";
   
6. mes "您目前有^FF0000"+##CASHPoint+"^000000點";
   
7. mes "我可以為你提供有關積分的服務";
   
8. mes "使用此服務等級必須達到^0000FF75^000000級喲";
   
9. switch(select($printa$,$printa1$,"服務說明")) {
   
10. case 1:
    
11.                 set $printa$,"";
    
12.                 set $printa1$,"停止點數累積";
    
13.                 set @chcheck,1;
    
14.                 addtimer $@podelay,"點數人員::OnTimeover";
    
15.          dispbottom "[ 天使積分系統 ] : 您目前積分為[ "+##CASHPoint+" ]";
    
16.                 close2;
    
17.                 end;
    
18.         case 2:
    
19.                 next;
    
20.                 mes "已為您關閉";
    
21.                 mes "您目前有^FF0000"+##CASHPoint+"^000000點";
    
22.                 set @chcheck,0;
    
23.                 set $printa1$,"";
    
24.                 set $printa$,"開始點數累積";
    
25.                 deltimer "積分人員::OnTimeover";
    
26.                 close2;
    
27.                 end;
    
28.         case 3:
    
29.                 next;
    
30.                 mes "^FF0000點數人員^000000";
    
31.                 mes "系統會根據玩家的在線時間從而累積";
    
32.                 mes "如果玩家開啟聊天室則不會累積喲";
    
33.          mes "每^0000FF30^000000分鐘可以換取1點積分";
    
34.                 mes "到達某個積分可以換取夢寐的精品";
    
35.                 mes "同時也鼓勵玩家多點上來坐坐喔~";
    
36.                 close;
    
37.                 }
    
38. OnTimeover:
    
39.                 if(@chcheck==0){end;}
    
40.                 if(!checkvending()){
    
41.                 set ##CASHPoint,##CASHPoint+1;
    
42.          dispbottom "[ 點數系統 ] : 時間經過30分鐘點數增加１點";
    
43.                 dispbottom "[ 點數系統 ] : 您目前積分為[ "+##CASHPoint+" ]";
    
44.                 if(##StarPoint%100==0){announce "您的點數數到達"+##CASHPoint+"點",bc_self,0x0fff8c;}
    
45.                 }
    
46.                 addtimer $@podelay,"點數人員::OnTimeover";
    
47. OnInit:
    
48. set $@podelay,1800000;
    
49.         end;
    
50. }

複製代碼

傻傻~

商城點數 我是不會

但我有只有上線滿多久自動發放物品

可以設置多項物品 物品數量 取得物品機率

如果要的話跟我說 我再貼給你吧@@

傻酷

傻傻 大大~
我要這個腳本 Q____Q
如果您願意給我~
我會另外發一個腳本求檔ˊˇˋ