hendra814

i'm already made it. it's simple, i'm make it from refine.txt here my example script. i'm made refine for safe refine from +5 and +10 if failed will lose 1 refine level using downrefitem //===================================================================================== // Refine from +5 to +10 //===================================================================================== prontera,164,171,3 script Ferre#ferre 826,{ callfunc "refinenew2","Safety Upgrade",0; end; } //============================================================ //= To allow auto safe refining/multiple refining set the //= second argument to '1' in the function call. //============================================================ function script refinenew2 { set [email protected],getarg(1); mes "[" + getarg(0) + "]"; mes "I'm Bestri brother."; mes "I can refine all kinds of weapons, armor and equipment, so let me"; mes "know what you want me 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] <= 7; 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 "[" + getarg(0) + "]"; mes "You're not wearing"; mes "anything there that"; mes "I can refine."; emotion 6; close; } //Check if the item is refinable... if(!getequipisenableref([email protected])) { mes "[" + getarg(0) + "]"; mes "I don't think I can"; mes "refine this item at all..."; close; } //Check if the item is identified... (Don't know why this is in here... but kept it anyway) if(!getequipisidentify([email protected])) { mes "[" + getarg(0) + "]"; mes "You can't refine this"; mes "if you haven't appraised"; mes "it first. Make sure your"; mes "stuff is identified before"; mes "I can refine it."; close; } //Check to see if the items is between +5 and +10 if(getequiprefinerycnt([email protected]) >= 10) { mes "[" + getarg(0) + "]"; mes "I can't refine this"; mes "any more. This is as"; mes "refined as it gets!"; close; } if(getequiprefinerycnt([email protected]) <= 4) { mes "[" + getarg(0) + "]"; mes "I can't refine this yet."; mes "Upgrade it to ^0000FFatleast +4^000000"; mes "before you bring it to me."; close; } set [email protected], getequipid([email protected]); // save id of the item set [email protected], getequiprefinerycnt([email protected]); //save refinery count switch(getequipweaponlv([email protected])){ case 0: //Refine Armor set [email protected],20000; set [email protected],7620; set [email protected],4; break; case 1: //Refine Level 1 Weapon set [email protected],20000; set [email protected],7620; set [email protected],7; break; case 2: //Refine Level 2 Weapon set [email protected],20000; set [email protected],7620; set [email protected],6; break; case 3: //Refine Level 3 Weapon set [email protected],20000; set [email protected],7620; set [email protected],5; break; case 4: //Refine Level 4 Weapon set [email protected],20000; set [email protected],7620; set [email protected],4; break; case 5: //Refine other stuff? set [email protected],20000; set [email protected],7620; set [email protected],4; break; } if([email protected] != 1) { mes "[" + getarg(0) + "]"; mes "To refine this I need"; mes "one ^003366"+getitemname([email protected])+"^000000 and"; mes "a service fee of " + [email protected] + " Zeny."; mes "Do you really wish to continue?"; next; if(select("Yes:No") == 2){ mes "[" + getarg(0) + "]"; mes "Yeah..."; mes "There's no need to"; mes "rush. Take your time."; close; } if(getequippercentrefinery([email protected]) < 100) { mes "[" + getarg(0) + "]"; mes "Oh no! If I continue to"; mes "refine this, there's a risk it could"; mes "be ^FF0000downgraded by 1 levels!^000000"; mes "Do you still want to refine?"; next; if(select("Yes:No") == 2){ mes "[" + getarg(0) + "]"; mes "I completely agree..."; mes "I might be a great refiner, but sometimes even I make mistakes."; close; } } if((countitem([email protected]) < 1) || (Zeny < [email protected])) { mes "[" + getarg(0) + "]"; mes "You don't seem to have"; mes "enough Zeny or "+getitemname([email protected])+"..."; mes "Go get some more. I'll be"; mes "here all day if you need me."; close; } set Zeny,[email protected]; delitem [email protected],1; if(getequipisequiped([email protected]) == 0) { // hacker has removed the item (not changed, why?) mes "[" + getarg(0) + "]"; mes "Look here... you don't have any Items on..."; close; } if(getequiprefinerycnt([email protected]) != [email protected] || getequipid([email protected]) != [email protected]) { // hacker has changed the item mes "[" + getarg(0) + "]"; Emotion e_an; mes "Wait a second..."; mes "Do you think I'm stupid?!"; mes "You switched the item while I wasn't looking! Get out of here!"; close; } if(getequippercentrefinery([email protected]) <= rand(100)) { //getitem2 getequipid([email protected]),1,1,getequiprefinerycnt([email protected])-1,0,getequipcardid([email protected],0),getequipcardid([email protected],1),getequipcardid([email protected],2),getequipcardid([email protected],3); downrefitem [email protected]; mes "[" + getarg(0) + "]"; set [email protected],rand(1,5); if ([email protected] == 1) { Emotion e_cash; } else { Emotion e_swt; } set [email protected],rand(1,2); if ([email protected] == 1) { mes "OH! MY GOD!"; mes "Damn it! Not again!"; mes "I'm terribly sorry, but you know practice does make perfect."; mes "Um, right? Heh heh..."; } else { mes "Crap!"; mes "It couldn't take"; mes "much more tempering!"; mes "Sorry about this..."; } close; } mes "["+getarg(0)+"]"; successrefitem [email protected]; Emotion e_heh; set [email protected],rand(1,3); if ([email protected] == 1) { mes "Perfect!"; mes "Heh heh!"; mes "Once again,"; mes "flawless work"; mes "from the master~"; } else if([email protected] == 2) { mes "Success...!"; mes "Yet again, my amazing"; mes "talent truly dazzles"; mes "and shines today."; } else { mes "Heh heh!"; mes "I'm all done."; mes "No doubt, my work is"; mes "to your satisfaction."; mes "Sheer, utter perfection~"; } close; } // New Refining Functions ======================== mes "[" + getarg(0) + "]"; mes "I can refine this to the limit or a desired number of times... it's your choice..."; next; switch(select("I'll decide how many times.","I've changed my mind...")) { case 1: mes "[" + getarg(0) + "]"; mes "So how many times would you like me to refine your item?"; next; input [email protected]; set [email protected],[email protected] + getequiprefinerycnt([email protected]); if ([email protected] < 1 || [email protected] > 20) { mes "[" + getarg(0) + "]"; mes "I can't refine this item that many times."; close; } if([email protected] > [email protected]) { set [email protected],[email protected] - [email protected]; mes "[" + getarg(0) + "]"; mes "This will try to refine the equipment " + [email protected] + " times past the safe limit. Your equipment may be ^FF0000downgraded by 1 levels^000000 if i fail... is that ok?"; next; if(select("Yes...","No...") == 2){ mes "[" + getarg(0) + "]"; mes "You said so..Hmm so be it..."; close; } } break; case 2: mes "[" + getarg(0) + "]"; mes "You said so..Hmm so be it..."; close; } set [email protected],[email protected] * [email protected]; mes "[" + getarg(0) + "]"; mes "That will cost you " + [email protected] + " " + getitemname([email protected]) + " and " + [email protected] + " Zeny. Is that ok?"; next; if(select("Yes","No...") == 2){ mes "[" + getarg(0) + "]"; mes "You said so..Hmm so be it..."; close; } if(countitem([email protected]) < [email protected] || Zeny < [email protected]) { mes "[" + getarg(0) + "]"; mes "Is that all you got? Unfortunately I can't work for you at a lower price. Try putting yourself in my shoes."; close; } set Zeny,Zeny - [email protected]; delitem [email protected],[email protected]; while([email protected]){ if (getequipisequiped([email protected]) == 0) { mes "[" + getarg(0) + "]"; mes "Look here... you don't have any Items on..."; close; } if (getequipid([email protected]) != [email protected] || ([email protected] == 1 && getequippercentrefinery([email protected]) < 100)) { mes "[" + getarg(0) + "]"; mes "Clan... No, but Did you imagine I could be so stupid !?!"; mes "You have changed it..."; mes "Go out before I stun you with my Hammer!!!"; close; } mes "Clang, clang!!!"; if(getequippercentrefinery([email protected]) <= rand(100)) { //getitem2 getequipid([email protected]),1,1,getequiprefinerycnt([email protected])-1,0,getequipcardid([email protected],0),getequipcardid([email protected],1),getequipcardid([email protected],2),getequipcardid([email protected],3); downrefitem [email protected]; emotion 23; mes "[" + getarg(0) + "]"; mes "WAHHHH!!! I'm so sorry... I warned you this could happen..."; set [email protected],[email protected] - 1; if([email protected] == 0) close; mes "Here's the unused Zeny and Material back..."; getitem [email protected],[email protected]; set [email protected],[email protected] * [email protected]; set Zeny,Zeny + [email protected]; close; } successrefitem [email protected]; emotion 21; set [email protected],[email protected] - 1; next; } mes "[" + getarg(0) + "]"; mes "All finished... Come again soon."; close; }

http://pastebin.com/9VWjMi3t sory for waiting so long

i'm have it, but with multi in 1 npc

like in this image, i'm take from IRO player.

i'm doesn't get from those website

any body please help me... i'm need wing of pegasus sprite and other file. Thanks

What is the error? People are having issues with windows xp and I'm still trying to find what's causing the problem but to be honest... all my virtual machines with windows xp are able to run the program perfectly fine. I don't know what happened, but after i'm instaled AVG PC tune up 2013 and tune up my laptop, and now GRF Editor application working fine. edited: i'm found the main issue why this application not running at windows XP. the problem is when using other or custom "Appearance", I'm try to swicth into windows clasic or windows default style this application could be opened. but when i'm choose other style this application gone crash when i'm opened.

@Tokei : using 1.1.3 success at instalation but when i'm run the program it showed Error

why, i'm can't instal this program with my netbook even i'm already installed net framework 4.0

please check your clientinfo.xml at packet and ip address

use this data folder. http://rathena.org/board/topic/66962-basic-complete-renewal-data-english-folder/ your problem at idnum2renametable.txt

it's perfect idea Thank you so much, Olrox

keep those sizes

really great job, i will waiting for this update..

check this part remove

need + before strcharinfo(0). please look at my first reply

please change mapannounce "pvp_y_8-2", strcharinfo(0)+" ist in die PvP Arena eingetreten!", bc_map; into announce "pvp_y_8-2,"+strcharinfo(0)+" ist in die PvP Arena eingetreten!", bc_map; mapannounce "hard_pvp", strcharinfo(0)+" ist in die Hardcore PvP Arena eingetreten!", bc_map; into announce "hard_pvp,"+strcharinfo(0)+" ist in die Hardcore PvP Arena eingetreten!", bc_map;

* edited Already done

Anyone please help, how to make this script giving prize for winning summon monster. Is it possible. Thanks

part 2 protected

masukkan kedalam folder data, kalau sudah pakai npc hair style untuk mencoba pallete cloth yang sudah anda download

already update into v 1.1 - support read data folder first - not auto close if input a wrong password - already show "Create Player" when make new character - removes the gravity ads and logo - skip license screen

http://rathena.org/board/topic/66962-basic-complete-renewal-data-english-folder/

try use this client http://rathena.org/board/files/file/2669-client-2012-04-10/