IPB

Welcome Guest ( Log In | Register )



6 Pages V   1 2 3 > »   
Closed TopicStart new topic
Hidden Enchant Slot, eAthena release posted too
Rokimoki
post Oct 18 2009, 09:57 AM
Post #1


Trying to be scripter (?)
Group Icon

Group: Spanish Forum Moderators
Posts: 2,879
Joined: 6-December 06
From: Canary Islands
Member No.: 203,840



NOTE: This doesn't need client modification to works like official release!!!

NOTE2: L0ne_W0lf official release http://svn.eathena.ws/svn/ea/trunk/npc/mer.../enchan_arm.txt

This release is made by ZeroZapiens and Rokimoki from Spanish Athena section.

The official release from kRO was 2/25/2009 update. There is not eA released yet so we decided to make another one. Really works 100%

What the script can do?
The Hidden Slot Enchant NPC can add special properties to 57 different types of armors.
Unlike the regular slot enchant NPC, the Hidden enchant unlocks special properties in the armor.
The gear is randomly given randomly +1 ~ +3 of one of the 6 stats.
The NPC is located near the south gate of prontera.
(When enchanting an armor, all previous enchantments, upgrades, and cards are lost. There is a chance of failure, in which the item is destroyed.)

Also read script comments to understand better.

Requiriments:
- Sakexe 2009+ OR Ragnarok Renewal Client
- SVN 14000+ (didn't tested previous SVN)

Hidden Enchant Slot 1.0 Release
CODE

//================================================================================
=====================
//= Hidden Slot Enchant
//==== Creditos ================================================================================
========
//= ZeroZapiens (Whole Script)
//= Rokimoki (Probabilities, Arrays, Optimizaion and Translated)
//==== Version ================================================================================
========
//= 1.0
//===== Compatible con ===============================================================================
//= eAthena SVN Trunk +14000rev
//= Ragnarok RE and Ragnarok Sakray 2009+ clients
//==== Descripcion ================================================================================
====
//= NPC Added in kRO at 25th February 2009, enchant armours +1 to +3 randomnly with percent.
//= Copyright of distribution, you can implement but to redistribute ask us, just for free.
//================================================================================
=====================
prontera,147,64,5 script Shiriublem 84,{
mes "[Hidden Slot Enchant]";
mes "Hello I can enchant your armor";
mes "and give them +1 to +3 depending";
mes "of your luk. However, the armor could";
mes "break, and this if you have sloted or refined";
mes "armor you will loose then so I advice you";
mes "to use a clean sloted armor.";
mes "Remember this procces will cost you 400,000z";
next;
mes "If you have same armor in the inventory";
mes "same as you have equiped, those will";
mes "loose refinement effects, cards and status too.";
mes "So, make sure you bring me one by one armors equiped.";
next;
menu
"Slotless Armor",Lsin,
"Armor Sloted",Lcon,
"High Quality Armor",Lhigh;

Lsin:
if( zeny < 400000 ) {
mes "[Hidden Slot Enchant]";
mes "Hey sorry not enough money.";
close;
}
for (set .@c, 0; .@c < getarraysize(.ids); set .@c, .@c + 1) {
if (isequipped(.ids[.@c]) == 1) {
mes "[Hidden Slot Enchant]";
mes "I see you have ^FF0000[" +getitemname(.ids[.@c]) +"]^000000 equiped.";
next;
mes "[Hidden Slot Enchant]";
mes "Let's go, will go to procces..";
mes "Good luck!...";
next;
callfunc("Enchant");
close; // Close, no more loop if armor detected
} // End if
} // End loop
mes "[Hidden Slot Enchant]";
mes "You should equip your armor first.";
close;

Lcon:
if( zeny < 400000 ) {
mes "[Hidden Slot Enchant]";
mes "Hey sorry not enough money.";
close;
}
for (set .@c, 0; .@c < getarraysize(.ids2); set .@c, .@c + 1) {
if (isequipped(.ids2[.@c]) == 1) {
mes "[Hidden Slot Enchant]";
mes "I see you have ^FF0000[" +getitemname(.ids2[.@c]) +"]^000000 equiped.";
next;
mes "[Hidden Slot Enchant]";
mes "Let's go, will go to procces..";
mes "Good luck!...";
next;
callfunc("Enchant");
close; // Close, no more loop if armor detected
} // End if
} // End loop
mes "[Hidden Slot Enchant]";
mes "You should equip your armor first.";
close;

Lhigh:
if( zeny < 400000 ) {
mes "[Hidden Slot Enchant]";
mes "Hey sorry not enough money.";
close;
}
for (set .@c, 0; .@c < getarraysize(.ids3); set .@c, .@c + 1) {
if (isequipped(.ids3[.@c]) == 1) {
mes "[Hidden Slot Enchant]";
mes "I see you have ^FF0000[" +getitemname(.ids3[.@c]) +"]^000000 equiped.";
next;
mes "[Hidden Slot Enchant]";
mes "Let's go, will go to procces..";
mes "Good luck!...";
next;
callfunc("Enchant");
close; // Close, no more loop if armor detected
} // End if
} // End loop
mes "[Hidden Slot Enchant]";
mes "You should equip your armor first.";
close;

OnInit:
// Big part I know, but I wanted you to know wich armor is every ID, this will make your life easier when you want to post a guide how this work in your private RO forum
setarray .ids[0],2307, // Mantle
2309, // Coat
2314, // Chain Mail
2316, // Plate Armor
2321, // Silk Robe
2325, // Saint Robe
2327, // Holy Robe
2330, // Tights
2332, // Silver Robe
2334, // Magic Coat
2335, // Thief Clothes
2341, // Legion Full Plate
2344, // Pierce Armor of Volcano
2348, // Saphien's armor of ocean
2346, // Aebeecee's Raging Typhoon Armor
2350, // Claytos Cracking Earth Armor
2395, // Glorious Suit type 2
2396, // Glorious Suit type 3
2394, // Glorious Suit type 1
2337, // Ninja Suit
2386; // Chameleon Armor

setarray .ids2[0],2311, // Mink Coat[1]
2318, // Lord Clothes[1]
2319, // Glitering Jacket[1]
2320, // Formal Suit[1]
2308, // Mantle[1]
2310, // Coat [1]
2315, // Chain Mail[1]
2317, // Plate Armor[1]
2322, // Silk Robe[1]
2323, // Scapulare[1]
2326, // Saint Robe[1]
2331, // Tights[1]
2333, // Silver Robe[1]
2336, // Thief Clothes[1]
2342, // Legion's Full Plate[1]
2345, // Pierce Armor of Volcano[1]
2347, // Saphien's Armor of ocean[1]
2349, // Aebecee's Raging Typhoon Armor[1]
2351; // Claytos Cracking Earth Armor[1]

setarray .ids3[0],2364, // Meteo Plate[1]
2365, // Orlean's Uniform[1]
2375, // Diabolus Robe[1]
2374, // Diabolus Armor[1]
2387, // Sprint Mail[1]
2389, // Kandra[1] || Gandora[1]
2388, // Naga Scale Armor[1]
2391, // Life Link[1]
2390, // Refined Tights[1]
2376, // Assaulter Plate[1]
2377, // Elite Engineer Armor[1]
2378, // Assassin Robe[1]
2379, // Warlock Battle Robe[1]
2380, // Robe of Order[1]
2381, // Elite Archer Suit[1]
2382; // Elite Shooter Suit[1]
end;
} // End Script

function script Enchant {
set @itemid,getequipid(EQI_ARMOR);
set zeny, zeny - 400000;
set @porcentaje, rand(0,100);
if (@porcentaje >= 0 && @porcentaje <= 10) { // 10% break
delitem @itemid, 1;
mes "[Hidden Slot Enchant]";
mes "You have loose your armor I'm sorry.";
} else if (@porcentaje >= 11 && @porcentaje <= 19) { // 9% + 2 stat X
delitem @itemid,1;
setarray .@level[0],4701,4711,4721,4731,4741,4751;
set @enchant_id, .@level[rand(0,5)];
getitem2 @itemid, 1, 1, 0, 0, 0, 0, 0, @enchant_id;
mes "[Hidden Slot Enchant]";
mes "Hooray ~ Here you are your enchanted armor !";
} else if (@porcentaje >= 20 && @porcentaje <= 99) { // 80% + 1 stat X
delitem @itemid,1;
setarray .@level[0],4700,4710,4720,4730,4740,4750;
set @enchant_id, .@level[rand(0,5)];
getitem2 @itemid, 1, 1, 0, 0, 0, 0, 0, @enchant_id;
mes "[Hidden Slot Enchant]";
mes "Hooray ~ Here you are your enchanted armor !";
} else if (@porcentaje == 100) { // 1% + 3 stat X
delitem @itemid,1;
setarray .@level[0],4702,4712,4722,4732,4742,4752;
set @enchant_id, .@level[rand(0,5)];
getitem2 @itemid, 1, 1, 0, 0, 0, 0, 0, @enchant_id;
mes "[Hidden Slot Enchant]";
mes "Hooray ~ Here you are your enchanted armor !";
} // End if
return;
} // End function


Download link:
Download ver 1.0 English
Download ver 1.0 Spanish
Download ver 1.0 Portuguese -- Translated by TecnoCronus
Download ver 1.0 Portuguese -- Translated by _Okuz_
Download ver 1.0 Russian -- Translated by Sanasol

PD: There is a spanish release too and now in portuguese and russian !!, check this post spanish version and portuguese version and this the russian version

Post feedback and bugs.

EDIT: Screenshots about the final result.
(IMG:http://www.cineoseries.es/descargas/guias/location.jpg)

(IMG:http://i.creativecommons.org/l/by-nc-sa/3.0/88x31.png)
Under license including translations: Creative Commons Attribution-Noncommercial-Share Alike 3.0 Unported License

This post has been edited by Rokimoki: Dec 12 2009, 10:04 AM
Attached File(s)
Attached File  enchanted_slot_pt.txt ( 7.09K ) Number of downloads: 169
Attached File  Hidden_Slot_Enchant_Portuguese.txt ( 6.8K ) Number of downloads: 61
Attached File  hidden_rus.txt ( 7.25K ) Number of downloads: 47
Attached File  enchant.txt ( 6.89K ) Number of downloads: 235
Attached File  enchant_es.txt ( 6.99K ) Number of downloads: 155
 
Go to the top of the page
 
+Quote Post
Viktus
post Oct 18 2009, 10:21 AM
Post #2


Where is my Angeling _
*****

Group: eA Level 5 (Super)
Posts: 512
Joined: 27-February 09
From: Macei - Brasil
Member No.: 281,993



I tested it, and the enchanted itens aren't giving any status bonus, but if I put them manually (into a card slot) it works.
D:
Go to the top of the page
 
+Quote Post
Rokimoki
post Oct 18 2009, 10:30 AM
Post #3


Trying to be scripter (?)
Group Icon

Group: Spanish Forum Moderators
Posts: 2,879
Joined: 6-December 06
From: Canary Islands
Member No.: 203,840



Nope dude, it works 100% I have re tested, again vit+1 and check:

First Unequiped:
(IMG:http://www.cineoseries.es/descargas/guias/unequiped.jpg)

Second Equiped:
(IMG:http://www.cineoseries.es/descargas/guias/equiped.jpg)

+1 vit bonus. Works 100% ^^

This post has been edited by Rokimoki: Oct 18 2009, 10:31 AM
Go to the top of the page
 
+Quote Post
Lamex
post Oct 18 2009, 10:39 AM
Post #4


eA Apprentice
***

Group: eA Level 3 (Normal)
Posts: 64
Joined: 23-September 09
Member No.: 300,919



Tested right now... but when you're clicking the right mouse button the client broke (

(IMG:http://s1.uploads.su/preview/wlop.jpg)

Where I can find lost sprite or something?

P.S. But that also giving bonus...

P.S.S. Sorry for my English (

This post has been edited by Lamex: Oct 18 2009, 10:41 AM
Go to the top of the page
 
+Quote Post
Rokimoki
post Oct 18 2009, 10:50 AM
Post #5


Trying to be scripter (?)
Group Icon

Group: Spanish Forum Moderators
Posts: 2,879
Joined: 6-December 06
From: Canary Islands
Member No.: 203,840



Requiriments:
- Sakexe 2009+ OR Ragnarok Renewal Client
- SVN 14000+ (didn't tested previous SVN)

If you fill those requirements, update your DATA files.

This post has been edited by Rokimoki: Oct 18 2009, 10:52 AM
Go to the top of the page
 
+Quote Post
Lamex
post Oct 18 2009, 11:00 AM
Post #6


eA Apprentice
***

Group: eA Level 3 (Normal)
Posts: 64
Joined: 23-September 09
Member No.: 300,919



QUOTE (Rokimoki @ Oct 18 2009, 04:50 PM) *
Requiriments:
- Sakexe 2009+ OR Ragnarok Renewal Client
- SVN 14000+ (didn't tested previous SVN)

If you fill those requirements, update your DATA files.


Oh... Yeah captain obvious... I did not ask what I need to do ... I asked where I get it. (IMG:style_emoticons/default/sleep.gif) But anyway thanks for the power spent on typing. I mean Sak or Rag or Ragre update?

This post has been edited by Lamex: Oct 18 2009, 11:10 AM
Go to the top of the page
 
+Quote Post
Rokimoki
post Oct 18 2009, 11:09 AM
Post #7


Trying to be scripter (?)
Group Icon

Group: Spanish Forum Moderators
Posts: 2,879
Joined: 6-December 06
From: Canary Islands
Member No.: 203,840



Ironies enough...

Client tools forum: forum
Link post of data translation: post
Lastest data translated (english): download Revision 112 [ 2009-08-24 ]

Just search a bit, and post back if fixed.
Go to the top of the page
 
+Quote Post
Viktus
post Oct 18 2009, 11:22 AM
Post #8


Where is my Angeling _
*****

Group: eA Level 5 (Super)
Posts: 512
Joined: 27-February 09
From: Macei - Brasil
Member No.: 281,993



Well, take a look... I tested with ipek's Rev 72 (it is +14000).
Attached File(s)
Attached File  01.png ( 66.16K ) Number of downloads: 15
Attached File  02.png ( 79.78K ) Number of downloads: 12
 
Go to the top of the page
 
+Quote Post
Rokimoki
post Oct 18 2009, 11:24 AM
Post #9


Trying to be scripter (?)
Group Icon

Group: Spanish Forum Moderators
Posts: 2,879
Joined: 6-December 06
From: Canary Islands
Member No.: 203,840



Well that's weird, @Lamex told that he has the bonus.
Go to the top of the page
 
+Quote Post
Viktus
post Oct 18 2009, 11:33 AM
Post #10


Where is my Angeling _
*****

Group: eA Level 5 (Super)
Posts: 512
Joined: 27-February 09
From: Macei - Brasil
Member No.: 281,993



Could be interesting if he post screens with/without the bonus.
Go to the top of the page
 
+Quote Post
Lamex
post Oct 18 2009, 12:01 PM
Post #11


eA Apprentice
***

Group: eA Level 3 (Normal)
Posts: 64
Joined: 23-September 09
Member No.: 300,919



Without Coat:
(IMG:http://s1.uploads.su/preview/gj2f0gh.jpg)

With Coat:
(IMG:http://s1.uploads.su/preview/vgzodn.jpg)
Go to the top of the page
 
+Quote Post
Pwner
post Oct 18 2009, 12:05 PM
Post #12


Leaning eA
**

Group: eA Level 3 (Normal)
Posts: 28
Joined: 16-May 07
Member No.: 228,793



Theses porcentajes rates are oficial or custom?
Go to the top of the page
 
+Quote Post
Rokimoki
post Oct 18 2009, 12:06 PM
Post #13


Trying to be scripter (?)
Group Icon

Group: Spanish Forum Moderators
Posts: 2,879
Joined: 6-December 06
From: Canary Islands
Member No.: 203,840



=] works, and try the lastest data ! =] if you want to keep russian data, just make a backup but try.
Go to the top of the page
 
+Quote Post
Lamex
post Oct 18 2009, 12:09 PM
Post #14


eA Apprentice
***

Group: eA Level 3 (Normal)
Posts: 64
Joined: 23-September 09
Member No.: 300,919



Yeah I try T_T

Now it looks like:

(IMG:http://s1.uploads.su/preview/zvc6c.jpg)

T_T

This post has been edited by Lamex: Oct 18 2009, 01:58 PM
Go to the top of the page
 
+Quote Post
Viktus
post Oct 18 2009, 02:18 PM
Post #15


Where is my Angeling _
*****

Group: eA Level 5 (Super)
Posts: 512
Joined: 27-February 09
From: Macei - Brasil
Member No.: 281,993



Lamex, put it into your idnum2itemresnametable.txt and the card will become the red orb.
CODE
// -------- 2009-02-20 ----------
4700#Ǻ_ȫ#
4701#Ǻ_ȫ#
4702#Ǻ_ȫ#
4703#Ǻ_ȫ#
4704#Ǻ_ȫ#
4705#Ǻ_ȫ#
4706#Ǻ_ȫ#
4707#Ǻ_ȫ#
4708#Ǻ_ȫ#
4709#Ǻ_ȫ#
4710#Ǻ_ȫ#
4711#Ǻ_ȫ#
4712#Ǻ_ȫ#
4713#Ǻ_ȫ#
4714#Ǻ_ȫ#
4715#Ǻ_ȫ#
4716#Ǻ_ȫ#
4717#Ǻ_ȫ#
4718#Ǻ_ȫ#
4719#Ǻ_ȫ#
4720#Ǻ_ȫ#
4721#Ǻ_ȫ#
4722#Ǻ_ȫ#
4723#Ǻ_ȫ#
4724#Ǻ_ȫ#
4725#Ǻ_ȫ#
4726#Ǻ_ȫ#
4727#Ǻ_ȫ#
4728#Ǻ_ȫ#
4729#Ǻ_ȫ#
4730#Ǻ_ȫ#
4731#Ǻ_ȫ#
4732#Ǻ_ȫ#
4733#Ǻ_ȫ#
4734#Ǻ_ȫ#
4735#Ǻ_ȫ#
4736#Ǻ_ȫ#
4737#Ǻ_ȫ#
4738#Ǻ_ȫ#
4739#Ǻ_ȫ#
4740#Ǻ_ȫ#
4741#Ǻ_ȫ#
4742#Ǻ_ȫ#
4743#Ǻ_ȫ#
4744#Ǻ_ȫ#
4745#Ǻ_ȫ#
4746#Ǻ_ȫ#
4747#Ǻ_ȫ#
4748#Ǻ_ȫ#
4749#Ǻ_ȫ#
4750#Ǻ_ȫ#
4751#Ǻ_ȫ#
4752#Ǻ_ȫ#
4753#Ǻ_ȫ#
4754#Ǻ_ȫ#
4755#Ǻ_ȫ#
4756#Ǻ_ȫ#
4757#Ǻ_ȫ#
4758#Ǻ_ȫ#
4759#Ǻ_ȫ#


This post has been edited by Viktus: Oct 18 2009, 02:31 PM
Go to the top of the page
 
+Quote Post

6 Pages V   1 2 3 > » 
Closed TopicStart new topic
1 User(s) are reading this topic (1 Guests and 0 Anonymous Users)
0 Members:

 



Lo-Fi Version Time is now: 19th December 2014 - 07:58 AM
Bridged By IpbWiki: Integration Of Invision Power Board and MediaWiki © GlobalSoft