bcz666

no one can help?

please help me to fix it.. thanks.. s_atelier,0,0,5 sc[attachment=13320:errreer.PNG][attachment=13320:errreer.PNG] set checkbot,0; if(botter >= 1) { doevent "anti-bot::Oncheckb"; } } s_atelier,0,0,5 script anti-bot -1,{ OnNPCKillEvent: if( rand(100) < 75 ) { end;} // Default Setting: 75% Chance to Ignore the Anti-Bot Oncheckb: function GetString; if (getgmlevel() >= 3) { end;} /* Uncomment if you want to Ignore this by GM */ if(checkbot >= 1) { end; } atcommand "@jail "+strcharinfo(0)+""; set botter,1; sc_start SC_BERSERK, 1000000000, 1; sc_start SC_FREEZE, 1000000000, 1; sleep2 3000; for(set botter,botter; botter < 4; set botter,botter + 1;){ set [email protected]$,GetString( 15,rand(3,7) ); mes "You Have 3 Chance to Type the Red Text Correctly"; mes "If you failed- You will be jailed"; mes "Input the ^FF0000RED COLOUR^000000 part"; mes "^0000FF"+GetString( 15,rand(5,10) )+"^FF0000"[email protected]$+"^0000FF"+GetString( 15,rand(3,10) )+"^000000"; input [email protected]$; if( [email protected]$ != [email protected]$ ){ if (botter >= 3) { atcommand "@unjail "+strcharinfo(0)+""; sleep2 1000; atcommand "@jailfor 10d "+strcharinfo(0)+""; announce "[Anti-BOT]: The user [" +strcharinfo(0) +"] Has Been Jailed For 10 Days.",0,0xe80f0f; set botter,0; close; end; } mes "Wrong.."; next; } else { break; } } atcommand "@unjail "+strcharinfo(0)+""; set botter,0; set checkbot,1; sc_end SC_BERSERK; sc_end SC_FREEZE; percentheal 100,100; sc_start SC_INC_AGI,240000,10; sc_start SC_BLESSING,240000,10; end; function GetString { if( getarg(0) & 1 ) setarray [email protected]$[ getarraysize( [email protected]$ ) ],"1","2","3","4","5","6","7","8","9"; if( getarg(0) & 2 ) setarray [email protected]$[ getarraysize( [email protected]$ ) ],"A","B","C","D","E","F","G","H","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"; if( getarg(0) & 4 ) setarray [email protected]$[ getarraysize( [email protected]$ ) ],"a","b","c","d","e","f","g","h","i","j","k","m","n","o","p","q","r","s","t","u","v","w","x","y","z"; //if( getarg(0) & 8 ) setarray [email protected]$[ getarraysize( [email protected]$ ) ],"!","@","#","$","%","^","&","*","(",")","-","=","/","+"; set [email protected]$,""; while( getstrlen( [email protected]$ ) < getarg(1) ) set [email protected]$,[email protected]$ + [email protected]$[ rand( getarraysize( [email protected]$ ) ) ]; return [email protected]$; } } sec_pri mapflag pvp off this the error line for(set botter,botter; botter < 4; set botter,botter + 1;){

anyone can hep me please?

i have issue for this code.. please help me to make the code right.. thanks.. sorry for my bad english this the code //===== rAthena Script ======================================= //= Advanced Refiner //===== By: ================================================== //= L0ne_W0lf //===== Current Version: ===================================== //= 1.6 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= [Official Conversion] //= Refiner that uses Enriched ores to increase upgrade success. //= After a conversation with Doddler, it's been established that //= the advanced refiner works similar the the "Bubble Gum" item. //= The success percentage is not "increased" however, if it fails //= You get a second try. This tries twice at the same time, //= effectively giving you a re-roll on your attempt. //= - Dialog is only partly official to iRO. //= - Uses the iRO position for this NPC. //===== Additional Comments: ================================= //= 1.0 First Version. [L0ne_W0lf] //= 1.1 Fixed a weird carriage return. o_o [L0ne_W0lf] //= 1.2 Optimizing refine method [Zephyrus] //= 1.3 Typo fixes [Yommy] //= 1.4 Removed unnecessary dialogs [Zephyrus] //= 1.4a Added 'disable_items' command. [Euphy] //= 1.4b Fixed coordinates. [Euphy] //= 1.5 Some official script updates. [Euphy] //= 1.6 Added VIP features. [Euphy] //============================================================ payon,157,146,6 script Suhnbi#cash 85,{ disable_items; mes "[Suhnbi]"; mes "I am the Armsmith"; mes "I can refine all kinds of weapons,"; mes "armor and equipment, so let me"; mes "know what you want to refine."; next; setarray [email protected]$[1], "Head","Body","Left hand","Right hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3"; set [email protected]$,""; for(set [email protected],1; [email protected]<=10; set [email protected],[email protected]+1) { if (getequipisequiped([email protected])) { set [email protected]$, [email protected]$ + [email protected]$[[email protected]] + "-" + "[" + getequipname([email protected]) + "]"; set [email protected],1; } set [email protected]$, [email protected]$ + ":"; } if ([email protected] == 0) { mes "[Suhnbi]"; mes "I don't think I can refine any items you have..."; close; } set [email protected], select([email protected]$); if (!getequipisequiped([email protected])) //custom check close; if (!getequipisenableref([email protected])) { mes "[Suhnbi]"; mes "Go find another Blacksmith. You can't refine this thing."; close; } if (getequiprefinerycnt([email protected]) >= 10) { mes "[Suhnbi]"; mes "Hmm... someone perfected this already. I don't think I can work on it further."; close; } // Make sure you have the neccessary items and Zeny to refine your items // Determines chance of failure and verifies that you want to continue. switch(getequipweaponlv([email protected])) { case 1: callsub S_RefineValidate,1,7620,50,[email protected]; break; case 2: callsub S_RefineValidate,2,7620,200,[email protected]; break; case 3: callsub S_RefineValidate,3,7620,5000,[email protected]; break; case 4: callsub S_RefineValidate,4,7620,20000,[email protected]; break; default: callsub S_RefineValidate,0,7619,2000,[email protected]; break; } mes "[Suhnbi]"; mes "Clang! Clang! Clang!"; if (getequippercentrefinery([email protected]) > rand(100) || getequippercentrefinery([email protected]) > rand(100)) { successrefitem [email protected]; next; emotion e_no1; mes "[Suhnbi]"; mes "There you go! It's done."; mes "It's been a while since I've made such a fine "+((getequipweaponlv([email protected]))?"weapon":"armor")+". You must be happy because it has become stronger!"; close; } failedrefitem [email protected]; next; emotion (!rand(5))?e_cash:e_omg; mes "[Suhnbi]"; mes "Uuuuuuuuuummmmmph!!!"; next; mes "[Suhnbi]"; mes "..."; mes "....."; mes ".......Huhuhuhuhu~"; mes "........It was your choice and my ability, no regret."; close; S_RefineValidate: [email protected]_lvl = getarg(0); [email protected]_req = getarg(1); set [email protected], getarg(2); // If the VIP system is enabled, the prices for non-VIP players are considerably higher. if (VIP_SCRIPT && !vip_status(1)) { switch([email protected]_lvl){ case 0: set [email protected], [email protected] * 10; break; case 1: set [email protected], [email protected] * 40; break; case 2: set [email protected], [email protected] * 50; break; case 3: set [email protected], [email protected] * 2; break; case 4: set [email protected], [email protected] * 2; break; } } mes "[Suhnbi]"; if ([email protected]_lvl) mes "You want to refine a level "+ [email protected]_lvl +" weapon?"; mes "To refine that, you'll need to have one ^ff9999"+ getitemname([email protected]_req) +"^000000 and "+ [email protected] +" zeny."; mes "Would you like to continue?"; next; if(select("Yes:No") == 1) { if (getequippercentrefinery(getarg(3)) < 100) { if ([email protected]_lvl) { mes "[Suhnbi]"; mes "Wow!!"; mes "This weapon probably"; mes "looks like it's been refined..."; mes "many times..."; mes "It may break if"; mes "you refine it again."; next; mes "And if it breaks,"; mes "you can't use it anymore!"; mes "All the cards in it and the properties ^ff0000will be lost^000000!"; mes "^ff0000Besides, the equipment will break!^000000"; mes "Are you sure you still want to continue?"; next; if(select("Yes:No") == 2) { mes "[Suhnbi]"; mes "Good."; mes "Because if the weapon breaks from unreasonable refining, then I get a bad mood, too."; close; } } else { mes "[Suhnbi]"; mes "Giggle. Giggle. Oh, you have guts, daring to refine this."; mes "You know it's pretty risky, don't you?"; next; mes "If your defensive equipment is broken, you'll never be able to use it again."; mes "Even your cards and your modifications will ^ff0000completely disappear^000000."; //mes "Everything will disappear. As in... GONE!"; mes "Do you really wish to continue?"; next; if(select("Yes:No") == 2) { mes "[Suhnbi]"; mes "What nonsense. You waste my precious time."; mes "Get lost, punk."; close; } } } if (countitem([email protected]_req) > 0 && Zeny > [email protected]) { delitem [email protected]_req,1; set Zeny, Zeny - [email protected]; return; } mes "[Suhnbi]"; mes "Are these all you have?"; mes "I'm very sorry, but I can't do anything without all the materials. Besides, I deserve some payments for my work, don't I?"; close; } mes "[Suhnbi]"; mes "I can't help it even if you're not happy about it..."; close; } please help me.. thank youuu

please help me to change this script guys.. i need change the cost fromm 200k zeny to 50k cashpoint.. thanks for helping me.. //===== rAthena Script ======================================= //= Card Removal NPC //===== By: ================================================== //= TyrNemesis^ //===== Current Version: ===================================== //= 1.2a //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= Removes cards from equipped items. //===== Additional Comments: ================================= //= 1.0 First version. [TyrNemesis^] //= 1.2 Optimized and fixed getequipname menu. [Kisuka] //= 1.2a Added 'disable_items' command. [Euphy] //============================================================ prt_in,28,73,4 script Wise Old Woman#eAcustom 78,{ set .zenycost,200000; // base cost of the card remover services (in Zeny) set .percardcost,25000; // cost per card of the card remover services (in Zeny) set .faildestroy,1; // should the card remover have a chance of failure that destroys items? (1=yes, 0=no) disable_items; mes "[Wise Old Woman]"; mes "Good day, young one. I have the power to remove cards that you have compounded onto your equipment. Does this idea please you?"; next; switch(select("Yes, it does.:What do you charge?:No thanks.")) { case 1: mes "[Wise Old Woman]"; mes "Very well. Which item shall I examine for you?"; next; setarray [email protected]$[1], "Head","Body","Left hand","Right hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3"; set [email protected]$,""; for( set [email protected],1; [email protected] <= 10; set [email protected],[email protected]+1 ) { if( getequipisequiped([email protected]) ) set [email protected]$, [email protected]$ + [email protected]$[[email protected]] + "-" + "[" + getequipname([email protected]) + "]"; set [email protected]$, [email protected]$ + ":"; } set [email protected],select([email protected]$); if(!getequipisequiped([email protected])) { mes "[Wise Old Woman]"; mes "Young one... Your not wearing anything there that I can remove cards from."; close; } if(getequipcardcnt([email protected]) == 0) { mes "[Wise Old Woman]"; mes "Young one... There are no cards compounded on this item. I can do nothing with it, I'm afraid."; close; } set [email protected],getequipcardcnt([email protected]); if (!checkweight(1202,([email protected]+1))) { mes "^3355FFJust a minute!"; mes "I can't offer any of my"; mes "services to you because"; mes "you're carrying too much"; mes "stuff. Put your extra items in"; mes "Kafra Storage and come again~"; close; } mes "[Wise Old Woman]"; mes "This item has " + [email protected] + " cards compounded on it. To perform my magic, I will need " + (.zenycost+([email protected] * .percardcost)) + " zeny, a ^0000FFStar Crumb^000000, and a ^0000FFYellow Gemstone^000000."; next; if(select("Very well. Do it.:Nevermind.") == 2) { mes "[Wise Old Woman]"; mes "Very well. Return at once if you seek my services."; close; } if((zeny < (.zenycost+([email protected] * .percardcost))) || (countitem(1000) < 1) || (countitem(715) < 1)) { mes "[Wise Old Woman]"; mes "You do not have all the items I require to work my magic, child. Come again when you do."; close; } mes "[Wise Old Woman]"; mes "Before I begin, I must warn you--I may fail. If I do, I may destroy the cards, the item, or both. I do not give refunds. That being said, which is more important to you: The cards, or the item?"; next; switch(select("I changed my mind about this.:The item.:The cards.")) { case 1: mes "[Wise Old Woman]"; mes "Very well. Return at once if you seek my services."; close; case 2: set [email protected],1; break; case 3: set [email protected],2; } mes "[Wise Old Woman]"; mes "Very well. I shall begin."; set Zeny, Zeny - (.zenycost+([email protected] * .percardcost)); delitem 1000,1; //Star_Crumb delitem 715,1; //Yellow_Gemstone // Replace the constants in the next 3 lines with failure chance values defined in refine_db.txt // First value = Total failure chance (item and cards destroyed) // Second value = Partial failure chance (one or the other is destroyed, player decides which one is safe) // Third value = Harmless failure chance (all that's lost is your investment) set [email protected],rand(100); if (.faildestroy==1) { if([email protected] < 2) { next; failedremovecards [email protected],0; mes "[Wise Old Woman]"; mes "The process was a total failure. I am afraid the item and the cards were destroyed."; close; } if([email protected] < 8) { if ([email protected] == 1) { next; failedremovecards [email protected],1; mes "[Wise Old Woman]"; mes "While I have managed to remove the cards from the item, they were destroyed in the process. The item, however, is okay."; close; } if ([email protected] == 2) { next; failedremovecards [email protected],2; mes "[Wise Old Woman]"; mes "Most unfortunate. I succeeded at removing the cards, but the item itself was destroyed in the process."; close; } } } if([email protected] < 10) { next; failedremovecards [email protected],3; mes "[Wise Old Woman]"; mes "I have failed to remove the cards. Luckily, however, both the item and the cards are still okay."; close; } next; successremovecards [email protected]; mes "[Wise Old Woman]"; mes "The process was a success. Here are your cards and your item. Farewell."; close; case 2: mes "[Wise Old Woman]"; mes "I charge a flat fee of "+callfunc("F_InsertComma",.zenycost)+" zeny, plus "+callfunc("F_InsertComma",.percardcost)+" zeny for each card I remove from the item. In addition, I need a star crumb and a yellow gemstone to work my magic."; close; case 3: mes "[Wise Old Woman]"; mes "Very well. Return at once if you seek my services."; close; } } thanks to emistry.. please help me. thanskkk