Jump to content
  • 0

VIP system?


Syndicate

Question


  • Group:  Members
  • Topic Count:  38
  • Topics Per Day:  0.01
  • Content Count:  108
  • Reputation:   6
  • Joined:  08/27/12
  • Last Seen:  

How can I remove the status effect of VIP system was made by BrianL?

Link to comment
Share on other sites

7 answers to this question

Recommended Posts


  • Group:  Members
  • Topic Count:  81
  • Topics Per Day:  0.02
  • Content Count:  1654
  • Reputation:   583
  • Joined:  08/09/12
  • Last Seen:  

atcommand "@adjgroup 0 "+strcharinfo(0);
set #VIP_expire, 0;
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  38
  • Topics Per Day:  0.01
  • Content Count:  108
  • Reputation:   6
  • Joined:  08/27/12
  • Last Seen:  

http://athena-scripts.googlecode.com/svn/dev/Brian/script_requests/vip_rental.txt

//===== eAthena Script =======================================

//= VIP Rental System

//===== By: ==================================================

//= Brian

//===== Current Version: =====================================

//= 1.0

//===== Compatible With: =====================================

//= eAthena SVN (SQL only)

//===== Description: =========================================

//= Makes a player VIP (GM level 1) for a set amount of time.

//===== Additional Comments: =================================

//=

//============================================================

function script F_VIPstart {

set .@ticks, getarg(0); // getarg(0) = ticks (seconds)

if (.@ticks <= 0) {

debugmes "F_VIPstart - tried to set a timer in the past";

end;

}

// #VIP_expire = Unixtime when their VIP expires

set #VIP_expire, ((#VIP_expire > gettimetick(2)) ? #VIP_expire : gettimetick(2)) + .@ticks;

doevent "vip_rental::OnPCLoginEvent"; // trigger the VIP to start

return;

}

- script vip_rental -1,{

OnPCLoginEvent:

if (#VIP_expire > gettimetick(2)) {

// they still have time left

dispbottom "VIP Rental : expires in " + callfunc("Time2Str",#VIP_expire);

atcommand "@adjgroup 1 "+strcharinfo(0);

deltimer strnpcinfo(3)+"::OnPCLoginEvent";

if ((#VIP_expire - gettimetick(2)) < 2147483) { // prevent overflow error

addtimer (#VIP_expire - gettimetick(2)) *1000, strnpcinfo(3)+"::OnPCLoginEvent";

} else {

addtimer 2147483000, strnpcinfo(3)+"::OnPCLoginEvent";

}

} else if (#VIP_expire) {

atcommand "@adjgroup 0 "+strcharinfo(0);

set #VIP_expire, 0;

dispbottom "Your VIP Rental has expired.";

}

end;

}

Link to comment
Share on other sites


  • Group:  Forum Moderator
  • Topic Count:  93
  • Topics Per Day:  0.02
  • Content Count:  10013
  • Reputation:   2348
  • Joined:  10/28/11
  • Last Seen:  

what status effect ? i dont see any inside your script ? /hmm

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  38
  • Topics Per Day:  0.01
  • Content Count:  108
  • Reputation:   6
  • Joined:  08/27/12
  • Last Seen:  

VIP Rental : expires in 44days, 18 hours , 45 minutes , 54 seconds

This is appearing in my chat.


When I use again the item it will add another 15 days ..

Link to comment
Share on other sites


  • Group:  Forum Moderator
  • Topic Count:  93
  • Topics Per Day:  0.02
  • Content Count:  10013
  • Reputation:   2348
  • Joined:  10/28/11
  • Last Seen:  

that's the behavior of the script itself...otherwise how you want it do work ?

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  38
  • Topics Per Day:  0.01
  • Content Count:  108
  • Reputation:   6
  • Joined:  08/27/12
  • Last Seen:  

Thanks problem solved..

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...