- script VIP_STATUSs -1,{
OnPCLoginEvent:
if ( vip_status(1) ) {
dispbottom "========================";
dispbottom "Account Status : VIP";
dispbottom "Expire Date : "+vip_status(2);
dispbottom "Time left : "+vip_status(3);
dispbottom "========================";
end;
}
}
prontera,135,171,6 script VIP System 109,{
if(getgmlevel()>=60){
mes "[^0000FFSlave-sama^000000]";
mes "Hello, Master, would you like to proceed with your official duties or view the player menu?";
next;
if(select("Take me to the GM menu!:I'd like to view the player menu.")==1) {
mes "[^0000FFSlave-sama^000000]";
mes "Alright, Master, please entire the characters name that you'd like to edit!";
next;
input(.@character$);
if(!getcharid(0,.@character$)) {
mes "[^0000FFSlave-sama^000000]";
mes "Master, I'm sorry but that character doesn't seem to exist.";
emotion e_sob,0;
close;
}
L_Menu:
mes "[^0000FFSlave-sama^000000]";
mes "So you'd like to modify ^0000FF"+.@character$+"^000000, good choice!";
mes "What would you like to do?";
next;
switch(select("Modify players time.:View players vip status.:I'm leaving!")){
case 1:
mes "[^0000FFSlave-sama^000000]";
mes "Input a positive value in minutes to increase VIP status and a negative value to decrease it.";
mes "Put 0 to return.";
next;
input(.@time);
if(!.@time) goto "L_Menu";
vip_time .@time,.@character$;
mes "[^0000FFSlave-sama^000000]";
mes "VIP time updated!";
next;
goto L_Menu;
case 2:
mes "[^0000FFSlave-sama^000000]";
mes vip_status(1,.@character$)?"^0000FF"+.@character$+" is currently a VIP Member.^000000":"^FF0000"+.@character$+" is not a VIP Member.^000000";
mes .@character$+"'s VIP status will expire on ^FF0000"+vip_status(2,.@character$)+"^000000";
mes .@character$+" has "+vip_status(3,.@character$)+" remaining.";
next;
goto L_Menu;
case 3:
mes "[^0000FFSlave-sama^000000]";
mes "Thank you Master please come again!";
close;
}
}
}
mes "Hello, "+strcharinfo(0)+(vip_status(1)||getgmlevel()>=60?"-sama":"")+", what would you like to do?";
switch (select("Purchase VIP:View VIP Status:Explain")) {
case 1:
mes "[^0000FFHime-sama^000000]";
mes "Here you can purchase VIP status for a number of days.";
next;
set @menu, select(.purchase$)-1;
if(#CASHPOINTS<.cost[@menu]) {
mes "[^0000FFHime-sama^000000]";
mes "Look, you don't have enough money, so how about... YOU STOP WASTING MY TIME!";
emotion e_pif,0;
close;
}
mes "[^0000FFHime-sama^000000]";
mes "You're now an official member of the VIP gang for "+.time[@menu]+" day(s). ^EE82EE<3^000000";
set #CASHPOINTS, #CASHPOINTS-.cost[@menu];
vip_time(.time[@menu]*1440);
emotion e_lv,0;
close;
case 2:
mes "[^0000FFHime-sama^000000]";
mes vip_status(1)?"^0000FFYou're currently a VIP Member.^000000":"^FF0000You're not a VIP Member.^000000";
mes "You're VIP status will expire on ^FF0000"+vip_status(2)+"^000000";
mes "You have "+vip_status(3)+" remaining.";
close;
case 3:
mes "[^0000FFHime-sama^000000]";
mes "I'm a princess I shouldn't have to explain myself to you!";
close;
}
end;
OnInit:
setarray .time, 1, 10, 20, 30, 40; //Time in days.
setarray .cost, 1, 10, 20, 30, 40; //Cash?
for(set .@a,0; .@a<getarraysize(.time); set .@a,.@a+1)
set .purchase$, .purchase$+.time[.@a]+" day(s) for "+.cost[.@a]+" cash.:";
}
hi, how can change time left (156598 remaining) to day - hour - min - sec. on this script
Question
MyNoobScriptz
- script VIP_STATUSs -1,{ OnPCLoginEvent: if ( vip_status(1) ) { dispbottom "========================"; dispbottom "Account Status : VIP"; dispbottom "Expire Date : "+vip_status(2); dispbottom "Time left : "+vip_status(3); dispbottom "========================"; end; } } prontera,135,171,6 script VIP System 109,{ if(getgmlevel()>=60){ mes "[^0000FFSlave-sama^000000]"; mes "Hello, Master, would you like to proceed with your official duties or view the player menu?"; next; if(select("Take me to the GM menu!:I'd like to view the player menu.")==1) { mes "[^0000FFSlave-sama^000000]"; mes "Alright, Master, please entire the characters name that you'd like to edit!"; next; input(.@character$); if(!getcharid(0,.@character$)) { mes "[^0000FFSlave-sama^000000]"; mes "Master, I'm sorry but that character doesn't seem to exist."; emotion e_sob,0; close; } L_Menu: mes "[^0000FFSlave-sama^000000]"; mes "So you'd like to modify ^0000FF"+.@character$+"^000000, good choice!"; mes "What would you like to do?"; next; switch(select("Modify players time.:View players vip status.:I'm leaving!")){ case 1: mes "[^0000FFSlave-sama^000000]"; mes "Input a positive value in minutes to increase VIP status and a negative value to decrease it."; mes "Put 0 to return."; next; input(.@time); if(!.@time) goto "L_Menu"; vip_time .@time,.@character$; mes "[^0000FFSlave-sama^000000]"; mes "VIP time updated!"; next; goto L_Menu; case 2: mes "[^0000FFSlave-sama^000000]"; mes vip_status(1,.@character$)?"^0000FF"+.@character$+" is currently a VIP Member.^000000":"^FF0000"+.@character$+" is not a VIP Member.^000000"; mes .@character$+"'s VIP status will expire on ^FF0000"+vip_status(2,.@character$)+"^000000"; mes .@character$+" has "+vip_status(3,.@character$)+" remaining."; next; goto L_Menu; case 3: mes "[^0000FFSlave-sama^000000]"; mes "Thank you Master please come again!"; close; } } } mes "Hello, "+strcharinfo(0)+(vip_status(1)||getgmlevel()>=60?"-sama":"")+", what would you like to do?"; switch (select("Purchase VIP:View VIP Status:Explain")) { case 1: mes "[^0000FFHime-sama^000000]"; mes "Here you can purchase VIP status for a number of days."; next; set @menu, select(.purchase$)-1; if(#CASHPOINTS<.cost[@menu]) { mes "[^0000FFHime-sama^000000]"; mes "Look, you don't have enough money, so how about... YOU STOP WASTING MY TIME!"; emotion e_pif,0; close; } mes "[^0000FFHime-sama^000000]"; mes "You're now an official member of the VIP gang for "+.time[@menu]+" day(s). ^EE82EE<3^000000"; set #CASHPOINTS, #CASHPOINTS-.cost[@menu]; vip_time(.time[@menu]*1440); emotion e_lv,0; close; case 2: mes "[^0000FFHime-sama^000000]"; mes vip_status(1)?"^0000FFYou're currently a VIP Member.^000000":"^FF0000You're not a VIP Member.^000000"; mes "You're VIP status will expire on ^FF0000"+vip_status(2)+"^000000"; mes "You have "+vip_status(3)+" remaining."; close; case 3: mes "[^0000FFHime-sama^000000]"; mes "I'm a princess I shouldn't have to explain myself to you!"; close; } end; OnInit: setarray .time, 1, 10, 20, 30, 40; //Time in days. setarray .cost, 1, 10, 20, 30, 40; //Cash? for(set .@a,0; .@a<getarraysize(.time); set .@a,.@a+1) set .purchase$, .purchase$+.time[.@a]+" day(s) for "+.cost[.@a]+" cash.:"; }
hi, how can change time left (156598 remaining) to day - hour - min - sec. on this script
i use last rathena version
Link to comment
Share on other sites
5 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.