Leaderboard

switch(select((countitem(34996))?"Insertar Ticket Clase C":"" , (countitem(34995)) ? "Insertar Ticket Clase B":"", (countitem(34994)) ? "Insertar Ticket Clase A":"", (countitem(34993)) ? "Insertar Ticket Clase S":"", "Cancelar"))

View File Customize your iteminfo with import V2 Version 2 Information: now support more then 2 iteminfo , you can check line 17 to add as much as you want! IInfo = {"System.import_iteminfo","System.kro_iteminfo5","System.kro_iteminfo4","System.kro_iteminfo3","System.kro_iteminfo2","System.kro_iteminfo1","System.kro_iteminfo"} now it's much much much faster for big files! remove functions.lua move url functions to the iteminfo itself 2 Big files loading test : this test is not loading in the client , but loading in the debugger! If you are new to this > Details: this an example and template on how you Customize your iteminfo read the ReadMe!! file before you ask anything this work as the import folders in rathena (if you don't know what i mean than i suggest you use rathena search or google) ALL THE FILES MUST BE .lua !!! the way it work: you add your custom and edited items in the import iteminfo file you add kro iteminfo file you add the server url in the function file the client will read the iteminfo import first than the kro iteminfo than you can update your kro iteminfo at anytime you need without any edit to it without the need to re-add your custom and edited items to a new kro iteminfo the kro_iteminfo included is from https://github.com/zackdreaver/ROenglishRE this file is added for example on how you use it i suggest you get the last iteminfo after you make sure there is no error! i would highly suggest you check out his great project every time you want to update your iteminfo! Please report any error in the forum post not in the PM , Thanks. Submitter sader1992 Submitted 02/21/2019 Category Client Resources Video Content Author sader1992 , zackdreaver  

Hi, I guess the VIP time has not been saved to the database yet so I put sleep2 into your code and it works. Fixed code: dewata,196,165,5 script CashToVIP 123,{ .@cashperday = 100; .@timeperday = 1440; mes "["+ strnpcinfo(1)+"]"; if( #CASHPOINTS < .@cashperday ){ mes "You don't have enough Cash Points to purchase VIP Days"; close; } switch(vip_status(VIP_STATUS_ACTIVE)){ case 0: mes "You're not a VIP"; break; case 1: mes "You are a VIP"; break; } mes "You currently have "+ #CASHPOINTS +" Cash Points."; mes "Each VIP Day will cost you ^0000ff"+ .@cashperday +"^000000"; next; mes "["+ strnpcinfo(1)+"]"; mes "Would you like to purchase/increase your VIP Days?"; switch(select(" - Nope: - 1 day: - many days")){ case 1: break; case 2: #CASHPOINTS -= .@cashperday; vip_time .@timeperday; sleep2 1; set .@Timer, vip_status(VIP_STATUS_EXPIRE); dispbottom "Current Cash Points: "+ #CASHPOINTS; dispbottom "Time left : "+ callfunc("Time2Str",.@Timer); break; case 3: input .@inputDay; if(.@inputDay > 0 && (.@cashperday*.@inputDay) < #CASHPOINTS){ #CASHPOINTS -= .@cashperday*.@inputDay; vip_time .@timeperday*.@inputDay; sleep2 1; set .@Timer, vip_status(VIP_STATUS_EXPIRE); dispbottom "Current Cash Points: "+ #CASHPOINTS; dispbottom "Time left : "+ callfunc("Time2Str",.@Timer); }else{ mes "-"; mes "^FF0000You don't have enough Cash Points to purchase VIP Days^FF0000"; close; } break; } close; } Bonus: dewata,196,165,5 script CashToVIP 123,{ .@cashperday = 100; .@timeperday = 1440; .@n$ = "["+strnpcinfo(0)+"]"; mes .@n$; switch(vip_status(VIP_STATUS_ACTIVE)){ case 0: mes "You're not a VIP."; break; case 1: mes "VIP time left: " + Time2Str(vip_status(VIP_STATUS_EXPIRE)); break; } mes "You currently have "+ #CASHPOINTS +" Cash Points."; mes "Each VIP Day will cost you ^0000ff"+ .@cashperday +"^000000"; next; mes .@n$; mes "Would you like to purchase/increase your VIP Days?"; next; switch(select(" - Nope: - 1 day: - Many days")){ case 1: break; case 2: .@inputDay = 1; case 3: if (!.@inputDay) input .@inputDay; if (.@inputDay == 0) { mes .@n$; mes "Invalid day!"; close; } .@total = .@cashperday*.@inputDay; if (.@total > #CASHPOINTS) { mes .@n$; mes "^FF0000You don't have enough Cash Points to purchase VIP Days^FF0000"; close; } mes .@n$; mes .@inputDay + " x " + .@cashperday + " = ^FF0000" + .@total + "^000000 Cash Points."; mes "Are you sure?"; if (select("No:Yes") == 1) close; #CASHPOINTS -= .@total; vip_time .@timeperday*.@inputDay; sleep2 1; .@Timer = vip_status(VIP_STATUS_EXPIRE); dispbottom "Current Cash Points: "+ #CASHPOINTS; dispbottom "VIP time left : "+ callfunc("Time2Str",.@Timer); break; } close; } Hope you like it ?

Are you sure you identify the item properly (use a magnifier for now) ?

@Eros @Haruka Mayumi You can remove ID of this effect from "..\data\luafiles514\lua files\effecttool\forcerendereffect.lub" Fury Cast Animation == 261

Eh... that was entirely a joke, I would never put such effort into a real script. ;D In case you need one, here's the actual version of that script (as you can see, it's pretty bare): prontera,148,170,6 script MVP Ladder 891,{ mes "[MVP Ladder]"; mes "Hello!"; mes "What are you doing here?"; next; switch(select("Check rankings.:My stats.:Nothing...")) { case 1: mes "[MVP Ladder]"; query_sql("SELECT char_id,CAST(`value` AS SIGNED) FROM `global_reg_value` WHERE `str` = 'MVP_Rank' ORDER BY CAST(`value` AS SIGNED) DESC LIMIT 20",.@cid,.@value); for(set .@i,0; .@i<getarraysize(.@cid); set .@i,.@i+1) { query_sql("SELECT `name` FROM `char` WHERE char_id = "+.@cid[.@i]+";",.@j$); set .@name$[.@i], .@j$; } if (!getarraysize(.@cid)) mes "The rankings are empty."; else for(set .@i,0; .@i<getarraysize(.@cid); set .@i,.@i+1) mes "["+(.@i+1)+"] "+.@name$[.@i]+" ~ "+.@value[.@i]+" kills"; close; case 2: mes "[MVP Ladder]"; mes "You have killed "+((MVP_Rank)?"^0055FF"+MVP_Rank:"no")+"^000000 MVP"+((MVP_Rank == 1)?".":"s."); close; case 3: close; } OnNPCKillEvent: if (getmonsterinfo(killedrid,22)) { set MVP_Rank, MVP_Rank+1; if (MVP_Rank == 1) query_sql("INSERT INTO `global_reg_value` (`char_id`,`str`,`value`,`type`,`account_id`) VALUES ("+getcharid(0)+",'MVP_Rank','1',3,0)"); else query_sql("UPDATE `global_reg_value` SET `value` = '"+MVP_Rank+"' WHERE char_id = "+getcharid(0)+" AND `str` ='MVP_Rank'"); dispbottom "~ You've killed "+MVP_Rank+" MVP"+((MVP_Rank == 1)?"":"s")+". ~"; specialeffect2 313; } end; }

Using cliente 2012-04-10 the servers when login dont show the account login, show a null value and give the console error "Login Authentication Failed"