Jump to content
  • 0

Sunglasses Enchanter NpC please

iraciz

Asked by iraciz,

 Share

Question

iraciz Poporing

iraciz

Posted
  • Group:  Members
  • Topic Count:  140
  • Topics Per Day:  0.03
  • Content Count:  562
  • Reputation:   111
  • Joined:  10/05/12
  • Last Seen:  
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
Link to comment
Share on other sites

15 answers to this question

Recommended Posts

Skorm Metaling

Skorm

Posted
  • Group:  Forum Moderator
  • Topic Count:  33
  • Topics Per Day:  0.01
  • Content Count:  1282
  • Reputation:   393
  • Joined:  02/03/12
  • Last Seen:  
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
Link to comment
Share on other sites
Skorm Metaling

Skorm

Posted
  • Group:  Forum Moderator
  • Topic Count:  33
  • Topics Per Day:  0.01
  • Content Count:  1282
  • Reputation:   393
  • Joined:  02/03/12
  • Last Seen:  
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
Link to comment
Share on other sites
iraciz Poporing

iraciz

Posted
  • Group:  Members
  • Topic Count:  140
  • Topics Per Day:  0.03
  • Content Count:  562
  • Reputation:   111
  • Joined:  10/05/12
  • Last Seen:  
  • Author
Posted

sorry but your script is not working in my server

thanks

Link to comment
Share on other sites
iraciz Poporing

iraciz

Posted
  • Group:  Members
  • Topic Count:  140
  • Topics Per Day:  0.03
  • Content Count:  562
  • Reputation:   111
  • Joined:  10/05/12
  • Last Seen:  
  • 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.

Link to comment
Share on other sites
Skorm Metaling

Skorm

Posted
  • Group:  Forum Moderator
  • Topic Count:  33
  • Topics Per Day:  0.01
  • Content Count:  1282
  • Reputation:   393
  • Joined:  02/03/12
  • Last Seen:  
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
Link to comment
Share on other sites
iraciz Poporing

iraciz

Posted
  • Group:  Members
  • Topic Count:  140
  • Topics Per Day:  0.03
  • Content Count:  562
  • Reputation:   111
  • Joined:  10/05/12
  • Last Seen:  
  • 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.

 

 

 

Link to comment
Share on other sites
iraciz Poporing

iraciz

Posted
  • Group:  Members
  • Topic Count:  140
  • Topics Per Day:  0.03
  • Content Count:  562
  • Reputation:   111
  • Joined:  10/05/12
  • Last Seen:  
  • 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
Link to comment
Share on other sites
Skorm Metaling

Skorm

Posted
  • Group:  Forum Moderator
  • Topic Count:  33
  • Topics Per Day:  0.01
  • Content Count:  1282
  • Reputation:   393
  • Joined:  02/03/12
  • Last Seen:  
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
Link to comment
Share on other sites
iraciz Poporing

iraciz

Posted
  • Group:  Members
  • Topic Count:  140
  • Topics Per Day:  0.03
  • Content Count:  562
  • Reputation:   111
  • Joined:  10/05/12
  • Last Seen:  
  • 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
Link to comment
Share on other sites
caspa Poring

caspa

Posted
  • Group:  Members
  • Topic Count:  194
  • Topics Per Day:  0.04
  • Content Count:  499
  • Reputation:   3
  • Joined:  03/11/12
  • Last Seen:  
Posted (edited)

i have error....

Edited by caspa
Link to comment
Share on other sites
nanakiwurtz Poring

nanakiwurtz

Posted
  • Group:  Members
  • Topic Count:  81
  • Topics Per Day:  0.02
  • Content Count:  1654
  • Reputation:   583
  • Joined:  08/09/12
  • Last Seen:  
Posted

Yes, you have error

Link to comment
Share on other sites
Skorm Metaling

Skorm

Posted
  • Group:  Forum Moderator
  • Topic Count:  33
  • Topics Per Day:  0.01
  • Content Count:  1282
  • Reputation:   393
  • Joined:  02/03/12
  • Last Seen:  
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;
}
Link to comment
Share on other sites
iraciz Poporing

iraciz

Posted
  • Group:  Members
  • Topic Count:  140
  • Topics Per Day:  0.03
  • Content Count:  562
  • Reputation:   111
  • Joined:  10/05/12
  • Last Seen:  
  • Author
Posted

i have error....

yes you do because I am using a custom gem

Link to comment
Share on other sites
caspa Poring

caspa

Posted
  • Group:  Members
  • Topic Count:  194
  • Topics Per Day:  0.04
  • Content Count:  499
  • Reputation:   3
  • Joined:  03/11/12
  • Last Seen:  
Posted

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

Link to comment
Share on other sites
iraciz Poporing

iraciz

Posted
  • Group:  Members
  • Topic Count:  140
  • Topics Per Day:  0.03
  • Content Count:  562
  • Reputation:   111
  • Joined:  10/05/12
  • Last Seen:  
  • 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

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...