UID135269
帖子
精華
主題
積分4983
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限20
註冊時間2009-2-26
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 開心 2019-6-13 09:37 PM |
---|
簽到天數: 705 天 連續簽到: 3 天 [LV.9]以壇為家II
|
樓主 |
發表於 2012-1-10 11:54:28
|
顯示全部樓層
本帖最後由 jqkeric11 於 2012-1-10 11:58 AM 編輯
- - script 在線計時 -1,{
- OnPCLoginEvent:
- addtimer $WaitingTime,"在線計時::OnTimeA";
- set Time,gettimetick(2) + $SetWaitingTime;
- end;
- OnTimeA:
- deltimer "在線計時::OnTimeA";
- if(getmapxy(.@m$,.@mx,.@my,0) !=0 || .@m$ !="poring_w01") {
- addtimer $WaitingTime,"在線計時::OnTimeA";
- close;
- }
- if (checkVending()) {
- close;
- }
- // if(BaseLevel < 150) {
- // close;
- // }
- set ChangePoint,ChangePoint + 1;
- dispbottom "你已經在線滿 "+($SetWaitingTime / 60)+" 分鐘 , 目前在線點數累積為 "+ChangePoint+" 點。";
- addtimer $WaitingTime,"在線計時::OnTimeA";
- set Time,gettimetick(2) + $SetWaitingTime;
- end;
- OnPCLogoutEvent:
- deltimer "在線計時::OnTimeA";
- end;
- }
複製代碼
- - script Set -1,{
- OnInit:
- // 設定秒數 ( 單位 : 秒 )
- // 3600 / 60 = 60分鐘
- set $SetWaitingTime,2;
- // 設定點數多少可以換取物品
- set $PointNu,4;
- set $PointNu,4;
- // 設定獎品
- setarray $@ChangeID[1],50000;
- setarray $@ChangeID[2],50002;
- // 設定獎品數量 ( 需對應獎品設置 )
- setarray $@ChangeIDNu[1],1;
- setarray $@ChangeIDNu[2],1;
- // 秒數轉換毫秒 ( 此函數勿動 )
- set $WaitingTime,$SetWaitingTime * 1000;
- end;
- }
複製代碼 |
|