Jump to content
  • 0

Sunglasses Enchanter NpC please

iraciz

Asked by iraciz,

 Share

Question

iraciz Poporing

iraciz

Posted
Posted

hello I need a NpC Script


to enchant just my slotted sunglasses id(2202)


 


with the item  ID# 4848


 


for a price of 1,000,000


 


I rather the gem to be placed in the fourth hidden slot of the sunglasses


 


 


screenstarlingro014.jpg

15 answers to this question

Recommended Posts

Skorm Metaling

Skorm

Posted
Posted (edited)

Works for me... Try this.

new_1-2,95,71,4	script	Bling	100,{
set .@price,1000000;
if(Zeny<.@price){mes "I'm sorry you don't have enough Zeny to for me to endow your specticals, please come back later."; close;}
set Zeny,Zeny-.@price;
if(getequipid(9)==2202){
	.@id = getequipid(9);
	.@ref = getequiprefinerycnt(9);
	.@card1 = getequipcardid( 9, 0 );
	.@card2 = getequipcardid( 9, 1 );
	.@card3 = getequipcardid( 9, 2 );
	.@card4 = getequipcardid( 9, 3 );
	delitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, .@card4;
	getitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, 4848;
	equip .@id;
}
end;
}
979ab893d95af8a4959f2d87b548230d.png?136

I had the slots wrong and there was an extra curly. lol

Edited by Skorm
Skorm Metaling

Skorm

Posted
Posted (edited) 

prontera,95,71,4    script    Bling    100,{
set .@price,1000000;
if(Zeny<.@price){mes "I'm sorry you don't have enough Zeny to for me to endow your specticals, please come back later."; close;}
set Zeny,Zeny-.@price;
if(getequipid(7)==2202)
	.@id = getequipid(7);
	.@ref = getequiprefinerycnt(7);
	.@card1 = getequipcardid( 7, 0 );
	.@card2 = getequipcardid( 7, 1 );
	.@card3 = getequipcardid( 7, 2 );
	.@card4 = getequipcardid( 7, 3 );
	delitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, .@card4;
	getitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, 4848;
	equip .@id;
	end;
}
}
Why do I feel like you're going to use this for evil...

I can't really remember if sunglasses eq on high or mid. It's set to mid for now.

Edited by Skorm
iraciz Poporing

iraciz

Posted
  • Author
Posted

yess, this one works

I will try to edit this one , because it takes money from you

even if you dont have the required gear in your inventory.

Skorm Metaling

Skorm

Posted
Posted (edited)

Oh I didn't think about that. Just move the price check.

new_1-2,95,71,4	script	Bling	100,{

set .@price,1000000;

if(!countitem(2202)){mes "Sorry come back when you get a pair of "+getitemname(2202)+"."; close;}

mes "I can endow your glasses with mystical powers, but It'll cost ya z"+.@price+".";

if(select("Yes:No")-1){mes "Alright, thanks anyways!"; close;}

if(getequipid(9)==2202){

if(Zeny<.@price){mes "I'm sorry you don't have enough Zeny to for me to endow your specticals, please come back later."; close;}

set Zeny,Zeny-.@price;

.@id = getequipid(9);

.@ref = getequiprefinerycnt(9);

.@card1 = getequipcardid( 9, 0 );

.@card2 = getequipcardid( 9, 1 );

.@card3 = getequipcardid( 9, 2 );

.@card4 = getequipcardid( 9, 3 );

delitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, .@card4;

getitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, 4848;

equip .@id;

mes "All done!";

}

close;

}

Edited by Skorm
iraciz Poporing

iraciz

Posted
  • Author
Posted

It´s Almost done friend.

 

now the last thing we must do is to deny the enchant when you  have not equipped the sunglasses [1]

 

because, he charges the 1m  if you have sunglasses in the inventory, but he doesnt enchant it.

I hope you understand me, 

 

sunglasses must be equipped, otherwise, NPC still reads the ID but in the inventary, still charging the 1m 

but no enchant.

 

 

 

iraciz Poporing

iraciz

Posted
  • Author
Posted (edited)

I hope you can help me to finish it

please

deny the enchant if you are not wearing the sunglasses

new_4-2,83,115,4    script    Bling    100,{
 
set .@price,1000000;
if(Zeny<.@price){mes "Im sorry but you dont have enough zeny to enchant this."; 
next;
mes "if you are interested in my job";
mes "please bring more zeny.";
close;}
 
mes "Hi, you are here";
next;
mes "I can enchant your sunnglasses whit a marvelous gem";
mes "with this gem you will be able to unlock a skill";
mes "and use it anytime you want, remebr to keep equiped your sunglasses"; 
next;
mes "the skill gained will depend on your job";
mes "the gainend skill can vary depending on it, thats why diferent jobs gain different skills ";
next;
mes "Do you wnbt ton enchant your sunnglasses?";
next;
switch (select("Enchant Sunglasses:Not for now")) {
case 1:
mes "Am glad you wish to do this";
mes "ok, Let it Rip Bro!";
next;
if(!countitem(2202)){
mes "ehhh wait a minute dude";
mes "Cant work with this";
next;
mes "Please come back";
mes "when you have a sunglasses[1] equiped."; 
close;
}
set Zeny,Zeny-.@price;
if(getequipid(9)==2202){
    .@id = getequipid(9);
    .@ref = getequiprefinerycnt(9);
    .@card1 = getequipcardid( 9, 0 );
    .@card2 = getequipcardid( 9, 1 );
    .@card3 = getequipcardid( 9, 2 );
    .@card4 = getequipcardid( 9, 3 );
    progressbar "ffff00",4;
    delitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, .@card4;
    specialeffect2 101;
    getitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, 4848;
    equip .@id;
mes "there you go!";
next; 
mes "here, a coupla mob to try your new skills";
next;
atcommand "@monster 1031";
atcommand "@monster 1002";
atcommand "@monster 1062";
atcommand "@monster 1113";
atcommand "@monster 1242";
close;
}
case 2: // not for now
        mes "Ok I got it?";
        mes "if you change your mind remember";
        mes "to equip your sunnies and talk to me!";
        close;
} // End switch
 
end;
}
Edited by iraciz
Skorm Metaling

Skorm

Posted
Posted (edited)

Just replace countitem with isequipped

new_4-2,83,115,4	script	Bling	100,{

set .@price,1000000;

if(Zeny<.@price){mes "Im sorry but you dont have enough zeny to enchant this.";

next;

mes "if you are interested in my job";

mes "please bring more zeny.";

close;}

mes "Hi, you are here";

next;

mes "I can enchant your sunnglasses whit a marvelous gem";

mes "with this gem you will be able to unlock a skill";

mes "and use it anytime you want, remebr to keep equiped your sunglasses";

next;

mes "the skill gained will depend on your job";

mes "the gainend skill can vary depending on it, thats why diferent jobs gain different skills ";

next;

mes "Do you wnbt ton enchant your sunnglasses?";

next;

switch (select("Enchant Sunglasses:Not for now")) {

case 1:

mes "Am glad you wish to do this";

mes "ok, Let it Rip Bro!";

next;

if(!isequipped(2202)){

mes "ehhh wait a minute dude";

mes "Cant work with this";

next;

mes "Please come back";

mes "when you have a sunglasses[1] equiped.";

close;

}

set Zeny,Zeny-.@price;

if(getequipid(9)==2202){

.@id = getequipid(9);

.@ref = getequiprefinerycnt(9);

.@card1 = getequipcardid( 9, 0 );

.@card2 = getequipcardid( 9, 1 );

.@card3 = getequipcardid( 9, 2 );

.@card4 = getequipcardid( 9, 3 );

progressbar "ffff00",4;

delitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, .@card4;

specialeffect2 101;

getitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, 4848;

equip .@id;

mes "there you go!";

next;

mes "here, a coupla mob to try your new skills";

next;

atcommand "@monster 1031";

atcommand "@monster 1002";

atcommand "@monster 1062";

atcommand "@monster 1113";

atcommand "@monster 1242";

close;

}

case 2: // not for now

mes "Ok I got it?";

mes "if you change your mind remember";

mes "to equip your sunnies and talk to me!";

close;

} // End switch

end;

}

Edited by Skorm
  • Upvote 1
iraciz Poporing

iraciz

Posted
  • Author
Posted (edited)

Thank you so much for your time.

 

I will enjoy this

right now is perfect, and I was waiting a couple weeks for this script.

 

I will edit the rest, you now, 1m is cheap,

but it was just to test the functions. 

 

is working pretty good

 

if you still curious, this is the script of the custom gem i used to enchant the sunnglasses

 

{ if(BaseClass==Job_Blacksmith) skill "NC_AXEBOOMERANG",1; if(BaseJob==Job_Monk) skill "SR_SKYNETBLOW",1; if(BaseJob==Job_Priest) skill "AB_JUDEX",1; if(BaseJob==Job_Crusader) skill "LG_CANNONSPEAR",1; },{},{}

 

and I will add other skills for each job. I do this because my server is not using third classes. is pre renewal but due to its difficulty

I am doing this to make it a little more fun.

 

thanks! this request is solved. 

Edited by iraciz
Skorm Metaling

Skorm

Posted
Posted

Normally when like the people who ask for the script want to take it over I just make the modification they asked for...

Tested and working.

new_4-2,83,115,4	script	Bling	100,{
set .@price,1000000;
if(Zeny<.@price){
	mes "Im sorry but you dont have enough zeny to enchant this."; 
	next;
	mes "if you are interested in my job";
	mes "please bring more zeny.";
	close;
}
mes "Hi, you are here";
next;
mes "I can enchant your sunnglasses whit a marvelous gem";
mes "with this gem you will be able to unlock a skill";
mes "and use it anytime you want, remebr to keep equiped your sunglasses"; 
next;
mes "the skill gained will depend on your job";
mes "the gainend skill can vary depending on it, thats why diferent jobs gain different skills ";
next;
mes "Do you wnbt ton enchant your sunnglasses?";
next;
if(select("Enchant Sunglasses:Not for now")==1) {
mes "Am glad you wish to do this";
mes "ok, Let it Rip Bro!";
next;
	if(!isequipped(2202)){
		mes "ehhh wait a minute dude";
		mes "Cant work with this";
		next;
		mes "Please come back";
		mes "when you have a sunglasses[1] equiped."; 
		close;
	}
set Zeny,Zeny-.@price;
	if(getequipid(9)==2202){
		.@id = getequipid(9);
		.@ref = getequiprefinerycnt(9);
		.@card1 = getequipcardid( 9, 0 );
		.@card2 = getequipcardid( 9, 1 );
		.@card3 = getequipcardid( 9, 2 );
		.@card4 = getequipcardid( 9, 3 );
		progressbar "ffff00",4;
		delitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, .@card4;
		specialeffect2 101;
		getitem2 .@id, 1, 1, .@ref, 0, .@card1, .@card2, .@card3, 4848;
		equip .@id;
	mes "there you go!";
	next; 
	mes "here, a coupla mob to try your new skills";
	next;
	atcommand "@monster 1031";
	atcommand "@monster 1002";
	atcommand "@monster 1062";
	atcommand "@monster 1113";
	atcommand "@monster 1242";
	close;
	}
}
mes "Ok I got it?";
mes "if you change your mind remember";
mes "to equip your sunnies and talk to me!";
close; // End switch
end;
}
iraciz Poporing

iraciz

Posted
  • Author
Posted

ohh... haha did not notice that one... thx for the info about the custom gem... LOL!!

Lol

 

not custom at all

the gem really exist in itemdb.txt

 

is the id 4848

I only replaced the slot to be compounded from armor, to headgear

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

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...