不會紀錄連續簽到天數

too520

這腳本有簽到＋留言板
可是簽到那邊不會紀錄連續簽到幾天
一直都是０天
麻煩大大幫助　　感恩∼∼
不知道貼這樣夠不夠
如要全部貼出　權限要設多少

1. Gmenu:
   
2.         mes2 "["+Strnpcinfo(0)+"]";
   
3.         mes2 "我能為您服務?";
   
4.         mes2 "[你已經連續簽到"+#loopgot+"天了]";
   
5.         if($@gbmode==1)menu "留言",adw,"觀看留言",a1,"刪除留言",a2;
   
6.         if($@gbmode==0 && getgmlevel()>40)menu "簽到",adw,"觀看簽到",a1,"刪除留言",a2;
   
7.         if($@gbmode==0)menu "簽到",adw,"觀看簽到",a1;
   
8.         if($@gbmode==3)menu "留言或者簽到",adw,"觀看留言",a1,"刪除留言",a2;
   
9. adw:
   
10. next;
    
11. if($@gbmode==3)set @chmode,prompt("留言:簽到");
    
12. If($canadd==0 && @chmode!=1 && $@gbmode!=1){
    
13.         mes2 "["+Strnpcinfo(0)+"]";
    
14.         mes2 "已經不開放簽到囉";
    
15. close;
    
16. }
    
17. If(#gbdata==gettime(4) && $@gbmode==0){
    
18.         mes2 "["+Strnpcinfo(0)+"]";
    
19.         mes2 "你已經簽到過囉";
    
20. close;
    
21. }
    
22. If(#gbdata==gettime(4) && $@gbmode==3 && @chmode==2){
    
23.         mes2 "["+Strnpcinfo(0)+"]";
    
24.         mes2 "你已經簽到過囉";
    
25. close;
    
26. }

複製代碼

emistry

當玩家簽到，你要增加這個的數目

1. #loopgot

複製代碼

在你的腳本中，並沒有這

還有， 你需要用

1. OnPCLoginEvent：

複製代碼

too520

emistry 發表於 2014-1-7 07:06 PM
當玩家簽到，你要增加這個的數目在你的腳本中，並沒有這

還有， 你需要用

emistry大~  
不好意思  上面貼的不夠多 -    -

1. Done:
   
2.         If($@gbmode==0)set $canadd,$canadd-1;
   
3.         //數字
   
4.         Set $gmt,$gmt+1;
   
5.         //名字
   
6.         SetD "$gmS"+$gmt+"$",strcharinfo(0);
   
7.         //日期
   
8.         SetD "$gmD"+$gmt+"$",gettimestr("%Y-%m-%d %H:%M:%S",20);
   
9.         //內容設置
   
10.         set .@i,1;
    
11.         While(.@i<=@im){
    
12.         SetD "$gmTgg_"+$gmt+"_"+.@i+"$","^"+@gmC$+""+GetD("@ip"+.@i+"$")+"^000000";
    
13.         Set .@i,.@i+1;
    
14.         }
    
15.         SetD "$gmTmax"+$gmt+"",@im;
    
16.         if(@chmode==1)SetD "$gmType"+$gmt+"$","留言";
    
17.         If($@gbmode==0 && (gettime(4)-#gbdata)^2==1)set #loopgot,#loopgot+1;
    
18.         If($@gbmode==0 && (gettime(4)-#gbdata)^2!=1)set #loopgot,0;
    
19.         If($@gbmode==3 && (gettime(4)-#gbdata)^2==1 && @chmode==2)set #loopgot,#loopgot+1;
    
20.         If($@gbmode==3 && (gettime(4)-#gbdata)^2!=1 && @chmode==2)set #loopgot,0;
    
21.         if(@chmode==2){
    
22.         Set Zeny,Zeny+$@getzeny+$@getzenys*#loopgot;
    
23.         SetD "$gmType"+$gmt+"$","簽到";
    
24.         }
    
25.         if($@gbmode==0){
    
26.         Set Zeny,Zeny+$@getzeny+$@getzenys*#loopgot;
    
27.         SetD "$gmType"+$gmt+"$","簽到";
    
28.         }
    
29.         if($@gbmode==1)SetD "$gmType"+$gmt+"$","留言";
    
30.         If($@gbmode==0)Set #gbdata,gettime(4);
    
31.         If($@gbmode==3)Set #gbdata,gettime(4);
    
32.         Next;
    
33.         Goto Gmenu;
    
34. }
    
35. Gmenu:
    
36.         mes2 "["+Strnpcinfo(0)+"]";
    
37.         mes2 "我能為您服務?";
    
38.         mes2 "[你已經連續簽到"+#loopgot+"天了]";
    
39.         if($@gbmode==1)menu "留言",adw,"觀看留言",a1,"刪除留言",a2;
    
40.         if($@gbmode==0 && getgmlevel()>40)menu "簽到",adw,"觀看簽到",a1,"刪除留言",a2;
    
41.         if($@gbmode==0)menu "簽到",adw,"觀看簽到",a1;
    
42.         if($@gbmode==3)menu "留言或者簽到",adw,"觀看留言",a1,"刪除留言",a2;
    
43. adw:
    
44. next;
    
45. if($@gbmode==3)set @chmode,prompt("留言:簽到");
    
46. If($canadd==0 && @chmode!=1 && $@gbmode!=1){
    
47.         mes2 "["+Strnpcinfo(0)+"]";
    
48.         mes2 "已經不開放簽到囉";
    
49. close;
    
50. }
    
51. If(#gbdata==gettime(4) && $@gbmode==0){
    
52.         mes2 "["+Strnpcinfo(0)+"]";
    
53.         mes2 "你已經簽到過囉";
    
54. close;
    
55. }
    
56. If(#gbdata==gettime(4) && $@gbmode==3 && @chmode==2){
    
57.         mes2 "["+Strnpcinfo(0)+"]";
    
58.         mes2 "你已經簽到過囉";
    
59. close;
    
60. }

複製代碼

我用尋找 找不到這段

1. OnPCLoginEvent:

複製代碼

goddameit

http://okayro.com/thread-205472-1-1.html

mur

too520 發表於 2014-1-7 09:06 PM
emistry大~  
不好意思  上面貼的不夠多 -    -我用尋找 找不到這段

1. OnPCLoginEvent:

複製代碼

腳色登入時發生的事件
其實可以不用用到登入事件

只要點擊選單之後
->
set下列
#gbdata=gettime(4)
$@gbmode=0

就可以了

too520

我換別的腳本了   

謝謝各位大大協力幫助><