Jump to content
  • 0

+10 refiner

darking123

Asked by darking123,

 Share

Question

darking123 Poring

darking123

Posted
  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  
Posted

i am requesting for a sure +10 refiner for a specific equipment that the player choose..

also the +10 refiner requires 10tcg to refine the item to +10

the refiner will refine the item to +10 immediately to 100% sure..

bump

Link to comment
Share on other sites

16 answers to this question

Recommended Posts

Capuche Poporing

Capuche

Posted
  • Group:  Developer
  • Topic Count:  10
  • Topics Per Day:  0.00
  • Content Count:  2407
  • Reputation:   616
  • Joined:  07/05/12
  • Last Seen:  
Posted

100% sure... +10... need 1 TCG Card per refine... players can choose equipment.

prt_in,57,55,5    script    lkjhgf    63,{
//-
   setarray .@safe[0],        10,        10,        10,        10,        10,        10;
   setarray .@TicketID, 7227;
//-

   mes "[blacksmith]";
   mes "I'm the Blacksmith.";
   mes "I can refine all kinds of weapons, armor and equipment, so let me";
   mes "know what you want me to refine.";
   next;

   setarray .@position$[1], "^0000ffHead^000000","^0000ffBody^000000","^FF0000Left hand^000000","^FF0000Right hand^000000","^0000ffRobe^000000","^0000ffShoes^000000","Accessory 1","Accessory 2","^0000ffHead 2^000000","^0000ffHead 3^000000";
   for( set .@i, 1; .@i <= getarraysize(.@position$); set .@i, .@i+1 ) {
       if( getequipisequiped(.@i) )
           set .@menu$, .@menu$ + .@position$[.@i] + "-" + "[" + getequipname(.@i) + "]";
       set .@menu$, .@menu$+ ":"; }
   set .@part, select( .@menu$ );

   if( !getequipisequiped(.@part) ) {
       mes "[blacksmith]";
       mes "You're not wearing";
       mes "anything there that";
       mes "I can refine.";
       emotion 6;
       close; }
   //Check if the item is refinable...
   if( !getequipisenableref(.@part) ) {
       mes "[blacksmith]";
       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(.@part) ) {
       mes "[blacksmith]";
       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 already +10
   if( getequiprefinerycnt(.@part) >= 10 ) {
       mes "[blacksmith]";
       mes "I can't refine this";
       mes "any more. This is as";
       mes "refined as it gets!";
       close; }

   set .@refineitemid, getequipid(.@part); // save id of the item
   set .@wp, getequipweaponlv(.@part);

   if( ( .@mRn = select( "+10, please.", "I've changed my mind..." )-1 ) > 0 ) {
       next;
       mes "[blacksmith]";
       mes "You said so... So be it.";
       close; }

   .@rcnt = .@safe[.@wp] - getequiprefinerycnt(.@part);
   set .@refinerycnt, getequiprefinerycnt(.@part); //save refinery count

   mes "[blacksmith]";
   mes "To refine this I need";
   mes "^FF0000"+.@rcnt+" "+getitemname( .@TicketID )+"^000000";
   mes "Do you really wish to continue?";
   next;

   if( select( "Yes:No" ) == 2 ) {
       mes "[blacksmith]";
       mes "Yeah...";
       mes "There's no need to";
       mes "rush. Take your time.";
       close; }

   if( countitem(.@TicketID) < .@rcnt ) {
       mes "[blacksmith]";
       mes "You don't seem to have";
       mes "enough ^000000"+getitemname( .@TicketID )+"^000000...";
       mes "Go get some more. I'll be";
       mes "here all day if you need me.";
       close; }

   if(getequipisequiped(.@part) == 0) { // hacker has removed the item (not changed, why?)
       mes "[blacksmith]";
       mes "Look here... you don't have any Items on...";
       close; }
   if(getequiprefinerycnt(.@part) != .@refinerycnt || getequipid(.@part) != .@refineitemid) { // hacker has changed the item
       mes "[blacksmith]";
       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; }
   mes "[blacksmith]";
   delitem .@TicketID, .@rcnt;
   for( .@i = 0; .@i < .@rcnt; .@i++ )
       successrefitem .@part;
   emotion e_heh;
   if( !(.@win = rand(2)) ) {
       mes "[blacksmith]";
       mes "Perfect!";
       mes "Heh heh!";
       mes "Once again,";
       mes "flawless work";
       mes "from the master~";
   } else if( .@win == 1 ) {
       mes "[blacksmith]";
       mes "Success...!";
       mes "Yet again, my amazing";
       mes "talent truly dazzles";
       mes "and shines today.";
   } else {
       mes "[blacksmith]";
       mes "Heh heh!";
       mes "I'm all done.";
       mes "No doubt, my work is";
       mes "to your satisfaction.";
       mes "Sheer, utter perfection~"; }
   close;
}

Link to comment
Share on other sites
  • 0
koneko33 Santa Poring

koneko33

Posted
  • Group:  Members
  • Topic Count:  3
  • Topics Per Day:  0.00
  • Content Count:  10
  • Reputation:   0
  • Joined:  03/26/13
  • Last Seen:  
Posted
On 1/4/2013 at 12:06 AM, Capuche said:

100% sure... +10... need 1 TCG Card per refine... players can choose equipment.

  

prt_in,57,55,5    script    lkjhgf    63,{
//-
   setarray .@safe[0],        10,        10,        10,        10,        10,        10;
   setarray .@TicketID, 7227;
//-

   mes "[blacksmith]";
   mes "I'm the Blacksmith.";
   mes "I can refine all kinds of weapons, armor and equipment, so let me";
   mes "know what you want me to refine.";
   next;

   setarray .@position$[1], "^0000ffHead^000000","^0000ffBody^000000","^FF0000Left hand^000000","^FF0000Right hand^000000","^0000ffRobe^000000","^0000ffShoes^000000","Accessory 1","Accessory 2","^0000ffHead 2^000000","^0000ffHead 3^000000";
   for( set .@i, 1; .@i <= getarraysize(.@position$); set .@i, .@i+1 ) {
       if( getequipisequiped(.@i) )
           set .@menu$, .@menu$ + .@position$[.@i] + "-" + "[" + getequipname(.@i) + "]";
       set .@menu$, .@menu$+ ":"; }
   set .@part, select( .@menu$ );

   if( !getequipisequiped(.@part) ) {
       mes "[blacksmith]";
       mes "You're not wearing";
       mes "anything there that";
       mes "I can refine.";
       emotion 6;
       close; }
   //Check if the item is refinable...
   if( !getequipisenableref(.@part) ) {
       mes "[blacksmith]";
       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(.@part) ) {
       mes "[blacksmith]";
       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 already +10
   if( getequiprefinerycnt(.@part) >= 10 ) {
       mes "[blacksmith]";
       mes "I can't refine this";
       mes "any more. This is as";
       mes "refined as it gets!";
       close; }

   set .@refineitemid, getequipid(.@part); // save id of the item
   set .@wp, getequipweaponlv(.@part);

   if( ( .@mRn = select( "+10, please.", "I've changed my mind..." )-1 ) > 0 ) {
       next;
       mes "[blacksmith]";
       mes "You said so... So be it.";
       close; }

   .@rcnt = .@safe[.@wp] - getequiprefinerycnt(.@part);
   set .@refinerycnt, getequiprefinerycnt(.@part); //save refinery count

   mes "[blacksmith]";
   mes "To refine this I need";
   mes "^FF0000"+.@rcnt+" "+getitemname( .@TicketID )+"^000000";
   mes "Do you really wish to continue?";
   next;

   if( select( "Yes:No" ) == 2 ) {
       mes "[blacksmith]";
       mes "Yeah...";
       mes "There's no need to";
       mes "rush. Take your time.";
       close; }

   if( countitem(.@TicketID) < .@rcnt ) {
       mes "[blacksmith]";
       mes "You don't seem to have";
       mes "enough ^000000"+getitemname( .@TicketID )+"^000000...";
       mes "Go get some more. I'll be";
       mes "here all day if you need me.";
       close; }

   if(getequipisequiped(.@part) == 0) { // hacker has removed the item (not changed, why?)
       mes "[blacksmith]";
       mes "Look here... you don't have any Items on...";
       close; }
   if(getequiprefinerycnt(.@part) != .@refinerycnt || getequipid(.@part) != .@refineitemid) { // hacker has changed the item
       mes "[blacksmith]";
       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; }
   mes "[blacksmith]";
   delitem .@TicketID, .@rcnt;
   for( .@i = 0; .@i < .@rcnt; .@i++ )
       successrefitem .@part;
   emotion e_heh;
   if( !(.@win = rand(2)) ) {
       mes "[blacksmith]";
       mes "Perfect!";
       mes "Heh heh!";
       mes "Once again,";
       mes "flawless work";
       mes "from the master~";
   } else if( .@win == 1 ) {
       mes "[blacksmith]";
       mes "Success...!";
       mes "Yet again, my amazing";
       mes "talent truly dazzles";
       mes "and shines today.";
   } else {
       mes "[blacksmith]";
       mes "Heh heh!";
       mes "I'm all done.";
       mes "No doubt, my work is";
       mes "to your satisfaction.";
       mes "Sheer, utter perfection~"; }
   close;
}
 

 

how do i fix this image.png.e10964fe865766b3c1131cf94b71127b.png

Link to comment
Share on other sites
darking123 Poring

darking123

Posted
  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  
  • Author
Posted

100% sure... +10... need 1 TCG Card per refine... players can choose equipment.

prt_in,57,55,5	script	lkjhgf	63,{
//-
setarray .@safe[0],		10,		10,		10,		10,		10,		10;
setarray .@TicketID, 7227;
//-

mes "[blacksmith]";
mes "I'm the Blacksmith.";
mes "I can refine all kinds of weapons, armor and equipment, so let me";
mes "know what you want me to refine.";
next;

setarray .@position$[1], "^0000ffHead^000000","^0000ffBody^000000","^FF0000Left hand^000000","^FF0000Right hand^000000","^0000ffRobe^000000","^0000ffShoes^000000","Accessory 1","Accessory 2","^0000ffHead 2^000000","^0000ffHead 3^000000";
for( set .@i, 1; .@i <= getarraysize(.@position$); set .@i, .@i+1 ) {
	if( getequipisequiped(.@i) )
		set .@menu$, .@menu$ + .@position$[.@i] + "-" + "[" + getequipname(.@i) + "]";
	set .@menu$, .@menu$+ ":"; }
set .@part, select( .@menu$ );

if( !getequipisequiped(.@part) ) {
	mes "[blacksmith]";
	mes "You're not wearing";
	mes "anything there that";
	mes "I can refine.";
	emotion 6;
	close; }
//Check if the item is refinable...
if( !getequipisenableref(.@part) ) {
	mes "[blacksmith]";
	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(.@part) ) {
	mes "[blacksmith]";
	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 already +10
if( getequiprefinerycnt(.@part) >= 10 ) {
	mes "[blacksmith]";
	mes "I can't refine this";
	mes "any more. This is as";
	mes "refined as it gets!";
	close; }

set .@refineitemid, getequipid(.@part); // save id of the item
set .@wp, getequipweaponlv(.@part);

if( ( .@mRn = select( "+10, please.", "I've changed my mind..." )-1 ) > 0 ) {
	next;
	mes "[blacksmith]";
	mes "You said so... So be it.";
	close; }

.@rcnt = .@safe[.@wp] - getequiprefinerycnt(.@part);
set .@refinerycnt, getequiprefinerycnt(.@part); //save refinery count

mes "[blacksmith]";
mes "To refine this I need";
mes "^FF0000"+.@rcnt+" "+getitemname( .@TicketID )+"^000000";
mes "Do you really wish to continue?";
next;

if( select( "Yes:No" ) == 2 ) {
	mes "[blacksmith]";
	mes "Yeah...";
	mes "There's no need to";
	mes "rush. Take your time.";
	close; }

if( countitem(.@TicketID) < .@rcnt ) {
	mes "[blacksmith]";
	mes "You don't seem to have";
	mes "enough ^000000"+getitemname( .@TicketID )+"^000000...";
	mes "Go get some more. I'll be";
	mes "here all day if you need me.";
	close; }

if(getequipisequiped(.@part) == 0) { // hacker has removed the item (not changed, why?)
	mes "[blacksmith]";
	mes "Look here... you don't have any Items on...";
	close; }
if(getequiprefinerycnt(.@part) != .@refinerycnt || getequipid(.@part) != .@refineitemid) { // hacker has changed the item
	mes "[blacksmith]";
	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; }
mes "[blacksmith]";
delitem .@TicketID, .@rcnt;
for( .@i = 0; .@i < .@rcnt; .@i++ )
	successrefitem .@part;
emotion e_heh;
if( !(.@win = rand(2)) ) {
	mes "[blacksmith]";
	mes "Perfect!";
	mes "Heh heh!";
	mes "Once again,";
	mes "flawless work";
	mes "from the master~";
} else if( .@win == 1 ) {
	mes "[blacksmith]";
	mes "Success...!";
	mes "Yet again, my amazing";
	mes "talent truly dazzles";
	mes "and shines today.";
} else {
	mes "[blacksmith]";
	mes "Heh heh!";
	mes "I'm all done.";
	mes "No doubt, my work is";
	mes "to your satisfaction.";
	mes "Sheer, utter perfection~"; }
close;
}

thank you but i think a script that even if my weapon is +0 when i use the refiner it will jump to +10 already

Link to comment
Share on other sites
Capuche Poporing

Capuche

Posted
  • Group:  Developer
  • Topic Count:  10
  • Topics Per Day:  0.00
  • Content Count:  2407
  • Reputation:   616
  • Joined:  07/05/12
  • Last Seen:  
Posted

thank you but i think a script that even if my weapon is +0 when i use the refiner it will jump to +10 already

Well it refine any equipment +X to +10 immediatly when you talk to the NPC. You need (10 - X ) TCG Card to do it.

Link to comment
Share on other sites
AnnieRuru Drops

AnnieRuru

Posted
  • Group:  Members
  • Topic Count:  18
  • Topics Per Day:  0.00
  • Content Count:  2044
  • Reputation:   682
  • Joined:  10/09/12
  • Last Seen:  
Posted

Capuche's script is working fine in my test server and works according to your concept

unless there's a miscommunication somewhere between us

Link to comment
Share on other sites
darking123 Poring

darking123

Posted
  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  
  • Author
Posted

i have the error


[Error]:  Loading NPC file: npc/custom/donaterefiner.txt
script error on npc/custom/donaterefiner.txt line 53
   parse_simpleexpr: unmatch ')'
   48 :                close; }
   49 :
   50 :        set .@refineitemid, getequipid(.@part); // save id of the item
   51 :        set .@wp, getequipweaponlv(.@part);
   52 :
*   53 :        if( ( .@mRn '=' select( "+10, please.", "I've changed my mind..." )-1 ) > 0 ) {
   54 :                next;
   55 :                mes "[blacksmith]";
   56 :                mes "You said so... So be it.";
   57 :                close;
   58 : }

Link to comment
Share on other sites
goddameit Poring

goddameit

Posted
  • Group:  Members
  • Topic Count:  60
  • Topics Per Day:  0.01
  • Content Count:  562
  • Reputation:   219
  • Joined:  11/22/11
  • Last Seen:  
Posted

i have the error

are you using rA ?

http://rathena.org/board/topic/62395-r15982-script-engine-update/

Link to comment
Share on other sites
goddameit Poring

goddameit

Posted
  • Group:  Members
  • Topic Count:  60
  • Topics Per Day:  0.01
  • Content Count:  562
  • Reputation:   219
  • Joined:  11/22/11
  • Last Seen:  
Posted (edited)

eathena sir

then use traditional script set command

set(<variable>,<expression>)

if( set(.@mRn,select(...)-1) > 0 )

Edited by goddameit
Link to comment
Share on other sites
darking123 Poring

darking123

Posted
  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  
  • Author
Posted

sorry sir but i really have no idea on how to do it

Link to comment
Share on other sites
maynard Poring

maynard

Posted
  • Group:  Members
  • Topic Count:  44
  • Topics Per Day:  0.01
  • Content Count:  159
  • Reputation:   1
  • Joined:  12/21/11
  • Last Seen:  
Posted

i have the error

are you using rA ?

http://rathena.org/b...-engine-update/

I tried to manually put the codes and somehow it compiles without error, Then I put the script and its working fine in my server, Im using eathena, I hope there will be no conflict or so whatever. Its a good thing if this will work without error or conflict to my eathena. Anyway its working the +10 refiner that capuche wrote. Now I can use more of Annieruru script. /no1

Link to comment
Share on other sites
darking123 Poring

darking123

Posted
  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  
  • Author
Posted

teach me how to add that code please i am using eathena svn

Link to comment
Share on other sites
Emistry Deviling

Emistry

Posted
  • Group:  Forum Moderator
  • Topic Count:  93
  • Topics Per Day:  0.02
  • Content Count:  10017
  • Reputation:   2369
  • Joined:  10/28/11
  • Last Seen:  
Posted

try this ?

http://rathena.org/board/topic/53320-%E3%80%90-emistry-%C2%A9-2012-%E3%80%91e-scripts-collection/page__st__40__p__71628#entry71628

Link to comment
Share on other sites
darking123 Poring

darking123

Posted
  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  
  • Author
Posted

sir what i need is it will automatically go to +10 without passing +1 to +9

Link to comment
Share on other sites
Emistry Deviling

Emistry

Posted
  • Group:  Forum Moderator
  • Topic Count:  93
  • Topics Per Day:  0.02
  • Content Count:  10017
  • Reputation:   2369
  • Joined:  10/28/11
  • Last Seen:  
Posted

my script can refine until max refine / any number you specified,......or just one refine...depend on how you configure the settings.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to question listing
×
×
  • Create New...