In vip_rental.txt, add these +lines:
Index: vip_rental.txt
===================================================================
--- vip_rental.txt (revision 15)
+++ vip_rental.txt (working copy)
@@ -31,6 +31,8 @@
// timer in future
dispbottom "VIP Rental : expires in " + callfunc("Time2Str",#VIP_expire);
atcommand "@adjgmlvl 1 "+strcharinfo(0);
+ sc_start SC_EXPBOOST, -1,25; // 25 means increase exp by 25%
+ sc_start SC_ITEMBOOST,-1,200; // I think 200 means increase drop rates by 2x
OnVIPcheck:
if ((#VIP_expire - gettimetick(2)) < 2147483) { // prevent overflow error
addtimer (#VIP_expire - gettimetick(2)) *1000, strnpcinfo(3)+"::OnVIPend";
@@ -42,6 +44,8 @@
// else, their VIP has ended
OnVIPend:
atcommand "@adjgmlvl 0 "+strcharinfo(0);
+ sc_end SC_EXPBOOST;
+ sc_end SC_ITEMBOOST;
set #VIP_expire, 0;
dispbottom "Your VIP Rental has expired.";
end;