Jerson A Tadios

prontera,155,188,0 script Emp Break Ladder 910,{ switch(select("View Emp Break Ladder:Redeem points for TCG:More Info:" + ((getgmlevel()>=99) ? "Reset Ladder":""))) { case 1: query_sql "SELECT `char`.`name`, `char`.`class`, guild.`name`, CAST(`value` AS UNSIGNED) " + "FROM global_reg_value " + "LEFT JOIN `char` ON global_reg_value.char_id=`char`.char_id " + "LEFT JOIN `guild` ON `char`.guild_id=guild.guild_id " + "WHERE global_reg_value.`str`='breaker_points' " + "ORDER BY CAST(`value` AS UNSIGNED) DESC LIMIT 10", [email protected]$, [email protected], [email protected]$, [email protected]; mes "[Top 10 Emp Breakers]"; for (set [email protected],0; [email protected]<getarraysize([email protected]$); set [email protected],[email protected]+1) { mes ([email protected]+1) +". ^0000FF"+ [email protected]$[[email protected]] +"^000000, "+jobname([email protected][[email protected]])+", "+ [email protected]$[[email protected]] +" ("+ [email protected][[email protected]] +(([email protected][[email protected]]==1)?" pt":" pts")+")"; } break; case 2: mes "[Emp Break Ladder]"; mes "Total Emp Breaks: " + breaker_points; mes "Available Points: " + (breaker_points - breaker_tcg); if (breaker_points == 0) { mes "You have not broke the emp yet!"; } else if (breaker_points <= breaker_tcg) { mes "You've already exchanged all your points for TCG."; mes "Come back after you break the emp again!"; } else if (breaker_points-breaker_tcg < 5) { mes "You need at least 5 breaker points to exchange for 1 TCG."; } else { set [email protected], (breaker_points-breaker_tcg)/5; if (select("Redeem points for "[email protected]+" TCG:Cancel") == 2) { mes "Come back if you change your mind."; } else if (checkweight(7227, [email protected]) == 0) { mes "You are overweight or carrying too many items."; } else { getitem 7227, [email protected]; set breaker_tcg, breaker_tcg + ([email protected]*5); mes "Here are your "[email protected]+" TCG!"; } } break; case 3: mes "[Emp Break Ladder]"; mes "Each time you break the emp, you earn 1 point."; mes "Then, talk to me to redeem 5 points for 1 TCG."; break; case 4: if (getgmlevel() < 99) end; set [email protected], playerattached(); // reset for offline chars query_sql "DELETE FROM global_reg_value WHERE `str`='breaker_points'"; query_sql "DELETE FROM global_reg_value WHERE `str`='breaker_tcg'"; // for each online char, reset breaker_points to 0 while (getusers(1) > [email protected]) { set [email protected], [email protected] + query_sql("SELECT account_id FROM `char` WHERE online=1 LIMIT 128 OFFSET "[email protected], [email protected]_id); set [email protected], 0; while ([email protected] < getarraysize([email protected]_id)) { if (attachrid([email protected]_id[[email protected]])) doevent strnpcinfo(3)+"::OnResetBreakerPoints"; set [email protected], [email protected] +1; } deletearray [email protected]_id, 128; sleep 1; // prevent infinity loop } attachrid [email protected]; mes "Emp Break Ladder has been reset."; break; } close; OnResetBreakerPoints: set breaker_points, 0; set breaker_tcg, 0; end; }

Thank you for helping me

i want to add pub on this NPC @greenmagic469 here is the script: prontera,158,173,4 cashshop Kafra Shop Employee 116,7179:1000

I've try yung this script: OnInit: waitingroom "FUKING ENCHANTER!",0; end; to add pub on my Kafra shop but in the end nothing happen how can i add pub on my kafra shop here is the script: prontera,158,173,4 cashshop Kafra Shop Employee 116,7179:1000 please help thank you

can you help me to make this kind of Cash points NPC

sir E M I S T R Y i've try your code but i cant click the npc

Hi good day please help me about the reset option for gm lvl 99 only... here the script for Euphy's Mvp Ladder thank you... /* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ * * ~~~~~~~~ Euphy's MVP Ladder v1.3 ~~~~~~~~ * * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */ prontera,148,170,6 script MVP Ladder 891,{ mes "[Rank MVP]"; mes "Hello."; mes "What are you doing here"; next; switch(select("Check Ranking.:My points.:Nothing...")) { case 1: mes "[Rank MVP]"; query_sql("SELECT char_id, CAST(`value` AS SIGNED) FROM `char_reg_num` WHERE `key` = 'MVP_Rank' ORDER BY CAST(`value` AS SIGNED) DESC LIMIT 20",[email protected],[email protected]); for(set [email protected],0; [email protected]<getarraysize([email protected]); set [email protected],[email protected]+1) { query_sql("SELECT `name` FROM `char` WHERE char_id = "[email protected][[email protected]]+";",[email protected]$); set [email protected]$[[email protected]], [email protected]$; } if (!getarraysize([email protected])) mes "The rankings are empty."; else for(set [email protected],0; [email protected]<getarraysize([email protected]); set [email protected],[email protected]+1) mes "["+([email protected]+1)+"] "[email protected]$[[email protected]]+" ~ "[email protected][[email protected]]+" kills"; close; case 2: mes "[Rank MVP]"; mes "You 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 `char_reg_num` (`char_id`,`key`,`index`,`value`) VALUES ("+getcharid(0)+",'MVP_Rank','0',1)"); else query_sql("UPDATE `char_reg_num` SET `value` = '"+MVP_Rank+"' WHERE char_id = "+getcharid(0)+" AND `key` ='MVP_Rank'"); dispbottom "~ You killed "+MVP_Rank+" MVP"+((MVP_Rank == 1)?"":"s")+". ~"; dispbottom " ~ Reward: Cash + 1 ~ "; set #CASHPOINTS, #CASHPOINTS + 1; specialeffect2 313; } end; OnInit: waitingroom "Stylist!",0; }

thanks big help ilove LEAF!

i try this cod but it doesn't work OnInit: waitingroom "Stylist!",0; end; heres the code for adv. stylist // credits to Annieruru function script ValueConvert { set [email protected], atoi(""+getarg(0)); if ( [email protected] == 0 || [email protected] >= 2147483647 ) return getarg(0); set [email protected], getstrlen(""[email protected]); for ( set [email protected],0; [email protected] < [email protected]; set [email protected], [email protected] + 1 ) { set [email protected]$, [email protected] % pow(10,[email protected]+1) / pow(10,[email protected]) + [email protected]$; if ( ([email protected]+1) % 3 == 0 && [email protected]+1 != [email protected] ) set [email protected]$, ","+ [email protected]$; } return [email protected]$; } - script Stylist -1,{ OnTalk: mes "[^0055FF ::: Adv. Stylist ::: ^000000]"; mes "I can change your appearance."; if( .cost_size ){ mes " "; mes "^777777[ SERVICES PAYMENT ]^000000"; for( [email protected] = 0; [email protected] < .menu_size; [email protected]++ ) if( .npc_mode & ( 1 << [email protected] ) ) if( .cost[[email protected]] ) mes "^0055FF"+.menu_name$[[email protected]]+" : ^777777"+ValueConvert( .cost[[email protected]] )+" "+.currency_name$[[email protected]]+"^000000"; else mes "^0055FF"+.menu_name$[[email protected]]+" : ^777777Free of Charge^000000"; } next; @style = ( select( .npc_menu$ ) - 1 ); @style_value = getlook( .look_type[@style] ); deletearray [email protected]; switch( @style ){ Case 0: [email protected]$ = ","+getd( ".blacklist_hairstyle_"+Sex+"$" )+","; break; Case 1: [email protected]$ = ","+getd( ".blacklist_haircolor_"+Sex+"$" )+","; break; Case 2: [email protected]$ = ","+getd( ".blacklist_cloth_"+Sex+"$" )+","; break; default: break; } [email protected]_number = .min_style[@style]; addtimer 1000,strnpcinfo(0)+"::OnPCLogoutEvent"; do{ message strcharinfo(0),.menu_name$[@style]+" : "[email protected]_number+"th"; [email protected] = 0; if( compare( [email protected]$,","[email protected]_number+"," ) ){ message strcharinfo(0),"[ REMOVED ] "+.menu_name$[@style]+" : "[email protected]_number+"th"; [email protected] = 1; // setlook .look_type[@style],.min_style[@style]; }else{ setlook .look_type[@style],[email protected]_number; } [email protected] = [email protected]_number + 1; [email protected] = [email protected]_number - 1; if( [email protected] > .max_style[@style] ) [email protected] = .min_style[@style]; if( [email protected] < .min_style[@style] ) [email protected] = .max_style[@style]; @select = prompt( (( [email protected] )?"Backward":"Forward" )+" - [ ^777777"+(( [email protected] )? [email protected]:[email protected] )+"th Style^000000 ]", (( [email protected] )?"Backward":"Forward" )+" - [ ^777777"+(( [email protected] )? [email protected]:[email protected] )+"th Style^000000 ]", "Jump to a Style", ( [email protected] )?"":"^0055FFOkay, I want this "+.menu_name$[@style]+"^000000" ); if( @select == 2 ) [email protected] = [email protected]; switch( @select ){ Case 1: Case 2: [email protected]_number = (( [email protected] )? [email protected]:[email protected] ); break; Case 3: message strcharinfo(0),"Available Style : "+.min_style[@style]+" ~ "+.max_style[@style]+"."; input [email protected]_number,.min_style[@style],.max_style[@style]; break; Case 4: [email protected]_currency = atoi( .currency$[@style] ); if( @style_value == [email protected]_number ){ message strcharinfo(0),"Swt..that is your original hairstyles."; break; } else if( [email protected]_currency ){ if( countitem( [email protected]_currency ) >= .cost[@style] ){ [email protected] = 1; delitem [email protected]_currency,.cost[@style]; } }else{ if( getd( ""+.currency$[@style] ) >= .cost[@style] ){ [email protected] = 1; setd( ""+.currency$[@style] ),( getd( ""+.currency$[@style] ) - .cost[@style] ); } } if( [email protected] ){ message strcharinfo(0),"Enjoy your NEW "+.menu_name$[@style]+" !!"; @style_value = [email protected]_number; }else{ mes "You dont have enough "+.currency_name$[@style]+" to change this "+.menu_name$[@style]+"."; mes "Cost : ^777777"+ValueConvert( .cost[@style] )+" "+.currency_name$[@style]+"^000000"; close2; } default: setlook .look_type[@style],@style_value; break; } }while( @select != 4 && @select != 255 ); mes "Come back again next time. ^^"; @select = 0; close2; deltimer strnpcinfo(0)+"::OnPCLogoutEvent"; OnPCLogoutEvent: if( @select ) setlook .look_type[@style],@style_value; end; OnInit: // NPC Mode ( Bitmask ) // 1 - Enable Hairstyle // 2 - Enable Hair Color // 4 - Enable Cloth Color .npc_mode = 7; // Menu Name setarray .menu_name$, "Hair Style", "Hair Color", "Cloth Color"; // Payment Currency + Cost // Can be ITEM ID or Any Variable. setarray .currency$, "Zeny", // Hairstyle - Ex. need Zeny "Zeny", // Hair Color - Ex. need Zeny "Zeny"; // Cloth Color - Ex. need Zeny setarray .cost, 10000, // Hairstyle ( 10,000 Zeny ) 10000, // Hair Color ( 10,000 Zeny ) 10000; // Cloth Color ( 10,000 Zeny ) // Blacklisted Style for each style and each gender. // --- Female --- .blacklist_hairstyle_0$ = "2,4,6"; .blacklist_haircolor_0$ = "1,3,5"; .blacklist_cloth_0$ = "1,2,3"; // --- Male --- .blacklist_hairstyle_1$ = "3,5,7"; .blacklist_haircolor_1$ = "2,4,6"; .blacklist_cloth_1$ = "4,5,6"; // Dont edit setarray .min_style,getbattleflag( "min_hair_style" ),getbattleflag( "min_hair_color" ),getbattleflag( "min_cloth_color" ); setarray .max_style,getbattleflag( "max_hair_style" ),getbattleflag( "max_hair_color" ),getbattleflag( "max_cloth_color" ); .menu_size = getarraysize( .menu_name$ ); .cost_size = getarraysize( .cost ); setarray .look_type,LOOK_HAIR,LOOK_HAIR_COLOR,LOOK_CLOTHES_COLOR; for( .npc_menu$ = ""; [email protected] < .menu_size; [email protected]++ ) .npc_menu$ = .npc_menu$ + ( ( .npc_mode & ( 1 << [email protected] ) )? .menu_name$[[email protected]]:"" ) +":"; for( [email protected] = 0; [email protected] < .cost_size; [email protected]++ ){ [email protected] = atoi( .currency$[[email protected]] ); .currency_name$[[email protected]] = ( ( [email protected] || getitemname( [email protected] ) == "null" )? .currency$[[email protected]]:getitemname( [email protected] ) ); } end; } // NPC Lists prontera,155,181,5 script Adv. Stylist 878,{ doevent "Stylist::OnTalk"; } payon,161,233,5 duplicate(Adv. Stylist) Adv. Stylist 878 please help me

it really works again I owe you much now last sir if you remember you also help me about my mvp ladder last thing about that can you put a reset option "for GM USE ONLY" thank you.. HERE'S the code thank you /* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ * * ~~~~~~~~ Euphy's MVP Ladder v1.3 ~~~~~~~~ * * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */ prontera,148,170,6 script MVP Ladder 891,{ mes "[Rank MVP]"; mes "Hello."; mes "What are you doing here"; next; switch(select("Check Ranking.:My points.:Nothing...")) { case 1: mes "[Rank MVP]"; query_sql("SELECT char_id, CAST(`value` AS SIGNED) FROM `char_reg_num` WHERE `key` = 'MVP_Rank' ORDER BY CAST(`value` AS SIGNED) DESC LIMIT 20",[email protected],[email protected]); for(set [email protected],0; [email protected]<getarraysize([email protected]); set [email protected],[email protected]+1) { query_sql("SELECT `name` FROM `char` WHERE char_id = "[email protected][[email protected]]+";",[email protected]$); set [email protected]$[[email protected]], [email protected]$; } if (!getarraysize([email protected])) mes "The rankings are empty."; else for(set [email protected],0; [email protected]<getarraysize([email protected]); set [email protected],[email protected]+1) mes "["+([email protected]+1)+"] "[email protected]$[[email protected]]+" ~ "[email protected][[email protected]]+" kills"; close; case 2: mes "[Rank MVP]"; mes "You 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 `char_reg_num` (`char_id`,`key`,`index`,`value`) VALUES ("+getcharid(0)+",'MVP_Rank','0',1)"); else query_sql("UPDATE `char_reg_num` SET `value` = '"+MVP_Rank+"' WHERE char_id = "+getcharid(0)+" AND `key` ='MVP_Rank'"); dispbottom "~ You killed "+MVP_Rank+" MVP"+((MVP_Rank == 1)?"":"s")+". ~"; dispbottom " ~ Reward: Cash + 1 ~ "; set #CASHPOINTS, #CASHPOINTS + 1; specialeffect2 313; } end; }

ill try this right away i do apologies about my action coz i really need it XD sorry noob here ​ sir this is the situation when i put a normal monster card ex "Thief bug card" it stock on this section no close button how can i add close button on that?

miss Elsa Mist can you do me a sample i can't get it thank you in advance

ive try this but the points just change what i want is the card trader will only ACCEPT MVP cards and MINI boss card and if they trade Rare boss card like Beelzebub points is different from the original 5 point each mvp to 10points please help me thank you in advance

I've tried to alter this Card trader script but in the end i failed can someone please help me with this... here is the original script that i have dl from Euphy //===== rAthena Script ======================================= //= Card Trader //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.1 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= //= Exchange cards for points. //============================================================ prontera,165,196,6 script Card Trader 90,{ mes "[Card Trader]"; mes "Hi, "+strcharinfo(0)+"!"; mes "What can I do for you?"; next; switch(select(" > Information: > Trade in cards: > Point shop (^0055FF"+getd(.Points$)+"^000000): > Leave")) { case 1: mes "[Card Trader]"; mes "Do you find that you've got"; mes "useless cards lying around?"; mes "I'll be glad to take them off"; mes "your hands!"; next; mes "[Card Trader]"; mes "I'll give you ^0055FF"+.Points[0]+" Point"+((.Points[0] == 1)?"":"s")+"^000000 for each"; mes "card you give me, and"; mes "^0055FF"+.Points[1]+" Points^000000 for MVP cards."; mes "You can trade those points"; mes "for items later on."; mes "How does that sound?"; emotion e_cash; close; case 2: mes "[Card Trader]"; mes "Select the cards you"; mes "want to trade in."; if (.Level) { mes " "; mes "They must be dropped"; mes "by monsters of level"; mes .Level+" and above."; } deletearray @sold_nameid[0],getarraysize(@sold_nameid); callshop "card_shop",2; npcshopattach "card_shop"; end; case 3: mes "[Card Trader]"; mes "You have ^0055FF"+getd(.Points$)+"^000000 Point"+((getd(.Points$) == 1)?".":"s."); callshop "card_shop",1; npcshopattach "card_shop"; end; case 4: mes "[Card Trader]"; mes "*yawn*"; mes "See you later!"; emotion e_yawn; close; } OnSellItem: mes "Cards to sell:"; mes "-----------------------------------"; for(set [email protected],0; [email protected]<getarraysize(@sold_nameid); set [email protected],[email protected]+1) if (@sold_nameid[[email protected]] > 4000 && @sold_nameid[[email protected]] < 4700) { if (.Level) { query_sql("SELECT `LV` FROM `mob_db` WHERE `DropCardid` = "[email protected]_nameid[[email protected]],[email protected]); if ([email protected] < .Level) { dispbottom getitemname(@sold_nameid[[email protected]])+" is under the minimum level."; continue; } } set [email protected]_id[getarraysize([email protected]_id)], @sold_nameid[[email protected]]; set [email protected]_amt[getarraysize([email protected]_amt)], @sold_quantity[[email protected]]; set [email protected], compare(.MVP$,""[email protected]_nameid[[email protected]]); mes (([email protected])?" ^FF0000":" ^777777")[email protected]_quantity[[email protected]]+"x "+getitemname(@sold_nameid[[email protected]])+"^000000"; set [email protected]_total, [email protected]_total+(@sold_quantity[[email protected]]*(([email protected])?.Points[1]:.Points[0])); } deletearray @sold_nameid[0], getarraysize(@sold_nameid); deletearray @sold_quantity[0], getarraysize(@sold_quantity); if ([email protected]_id) { mes " ^777777(none)^000000"; emotion e_swt; close; } mes " "; mes "---------- Total: ^0055FF"[email protected]_total+" pt.^000000 -------"; next; if(select(" > ^0055FFComplete trade...^000000: > ^777777Cancel^000000") == 2) { mes "[Card Trader]"; mes "Oh, okay..."; emotion e_hmm; close; } for(set [email protected],0; [email protected]<getarraysize([email protected]_id); set [email protected],[email protected]+1) delitem [email protected]_id[[email protected]],[email protected]_amt[[email protected]]; setd .Points$, getd(.Points$)[email protected]_total; mes "[Card Trader]"; mes "All done!"; emotion e_ho; close; OnBuyItem: for(set [email protected],0; [email protected]<getarraysize(@bought_nameid); set [email protected],[email protected]+1) for(set [email protected],0; [email protected]<getarraysize(.Shop); set [email protected],[email protected]+2) if (@bought_nameid[[email protected]] == .Shop[[email protected]]) { set [email protected], [email protected]+(.Shop[[email protected]+1]*@bought_quantity[[email protected]]); break; } if ([email protected] > getd(.Points$)) { mes "[Card Trader]"; mes "You don't have enough Points."; emotion e_omg; } else { mes "Items purchased:"; mes "-----------------------------------"; for(set [email protected],0; [email protected]<getarraysize(@bought_nameid); set [email protected],[email protected]+1) { getitem @bought_nameid[[email protected]], @bought_quantity[[email protected]]; mes " ^777777"[email protected]_quantity[[email protected]]+"x "+getitemname(@bought_nameid[[email protected]])+"^000000"; } mes " "; mes "---------- Total: ^0055FF"[email protected]+" pt.^000000 -------"; setd .Points$, getd(.Points$)[email protected]; emotion e_cash; } deletearray @bought_nameid[0], getarraysize(@bought_nameid); deletearray @bought_quantity[0], getarraysize(@bought_quantity); close; OnInit: set .Level,0; // Minimum monster level to trade corresponding cards. set .Points$,"#Card_Points"; // Variable to store points. setarray .Shop[0], // Card Shop items: <ID>,<point cost> 4001,1,4004,1,4033,1,4196,1,4197,25,4054,50,4174,75,4047,100; setarray .Points[0],1,5; // Points per <normal card>,<MVP card> set .MVP$, // List of MVP cards. "4121,4123,4128,4131,4132,4134,4135,4137,4142,4143,4144,4145,4146,4147,4148,4168,4236,"+ "4241,4263,4276,4302,4305,4318,4324,4330,4342,4357,4359,4361,4363,4365,4399,4403,4407"; npcshopdelitem "card_shop",909; for(set [email protected],0; [email protected]<getarraysize(.Shop); set [email protected],[email protected]+2) npcshopadditem "card_shop",.Shop[[email protected]],.Shop[[email protected]+1]; end; } - shop card_shop -1,909:-1 please help me to alter this i just want to make it like this card trader will only accept MVP cards and MINI boss card and if they trade Rare boss card points is different from the original 5 point each mvp to 10points please help me thank you in advance more powers to rathena.

thank you sir last request on this MVP ladder how can i put reset option that gm only will see and use that option!