[remover card (full pvp)]

//===== rAthena Script =======================================
//= Card Removal NPC
//===== By: ==================================================
//= TyrNemesis^
//===== Current Version: =====================================
//= 1.2a
//===== Compatible With: =====================================
//= rAthena Project
//===== Description: =========================================
//= Removes cards from equipped items.
//===== Additional Comments: =================================
//= 1.0 First version. [TyrNemesis^]
//= 1.2 Optimized and fixed getequipname menu. [Kisuka]
//= 1.2a Added 'disable_items' command. [Euphy]
//============================================================

prt_in,28,73,4	script	Wise Old Woman#eAcustom	78,{

	set .zenycost,0;    // base cost of the card remover services (in Zeny)
	set .percardcost,0;  // cost per card of the card remover services (in Zeny)
	set .faildestroy,0;      // should the card remover have a chance of failure that destroys items? (1=yes, 0=no)

	disable_items;
	mes "[Wise Old Woman]";
	mes "Good day, young one. I have the power to remove cards that you have compounded onto your equipment. Does this idea please you?";
	next;
	switch(select("Yes, it does.:What do you charge?:No thanks.")) {
	case 1:
		mes "[Wise Old Woman]";
		mes "Very well. Which item shall I examine for you?";
		next;

		setarray .@indices[1], EQI_HEAD_TOP, EQI_ARMOR, EQI_HAND_L, EQI_HAND_R, EQI_GARMENT, EQI_SHOES, EQI_ACC_L, EQI_ACC_R, EQI_HEAD_MID, EQI_HEAD_LOW;
		for( set .@i,1; .@i <= 10; set .@i,.@i+1 ) {
			if( getequipisequiped(.@indices[.@i]) )
				set .@menu$, .@menu$ + F_getpositionname(.@indices[.@i]) + "-[" + getequipname(.@indices[.@i]) + "]";
			set .@menu$, .@menu$ + ":";
		}
		set .@part, .@indices[ select(.@menu$) ];
		if(!getequipisequiped(.@part)) {
			mes "[Wise Old Woman]";
			mes "Young one... Your not wearing anything there that I can remove cards from.";
			close;
		}
		if(getequipcardcnt(.@part) == 0) {
			mes "[Wise Old Woman]";
			mes "Young one... There are no cards compounded on this item. I can do nothing with it, I'm afraid.";
			close;
		}
		set .@cardcount,getequipcardcnt(.@part);
		
		if (!checkweight(1202,(.@cardcount+1))) { 
			mes "^3355FFJust a minute!";
			mes "I can't offer any of my";
			mes "services to you because";
			mes "you're carrying too much";
			mes "stuff. Put your extra items in";
			mes "Kafra Storage and come again~";
			close;
		}
		mes "[Wise Old Woman]";
		next;
		if(select("Very well. Do it.:Never mind.") == 2) {
			mes "[Wise Old Woman]";
			mes "Very well. Return at once if you seek my services.";
			close;
		}

		mes "[Wise Old Woman]";
		mes "Before I begin, I must warn you--I may fail. If I do, I may destroy the cards, the item, or both. I do not give refunds. That being said, which is more important to you: The cards, or the item?";
		next;
		switch(select("I changed my mind about this.:The item.:The cards.")) {
		case 1:
			mes "[Wise Old Woman]";
			mes "Very well. Return at once if you seek my services.";
			close;
		case 2:
			set .@failtype,1;
			break;
		case 3:
			set .@failtype,2;
		}
		mes "[Wise Old Woman]";
		mes "Very well. I shall begin.";
		
		// Replace the constants in the next 3 lines with failure chance values defined in refine_db.txt
		// First value = Total failure chance (item and cards destroyed)
		// Second value = Partial failure chance (one or the other is destroyed, player decides which one is safe)
		// Third value = Harmless failure chance (all that's lost is your investment)

		set .@failchance,rand(100);
		if (.faildestroy==1) {
			if(.@failchance < 2) {
				next;
				failedremovecards .@part,0;
				mes "[Wise Old Woman]";
				mes "The process was a total failure. I am afraid the item and the cards were destroyed.";
				close;
			}

			if(.@failchance < 8) {
				if (.@failtype == 1) {
					next;
					failedremovecards .@part,1;
					mes "[Wise Old Woman]";
					mes "While I have managed to remove the cards from the item, they were destroyed in the process. The item, however, is okay.";
					close;
				}

				if (.@failtype == 2) {
					next;
					failedremovecards .@part,2;
					mes "[Wise Old Woman]";
					mes "Most unfortunate. I succeeded at removing the cards, but the item itself was destroyed in the process.";
					close;
				}
			}
		}

		if(.@failchance < 10) {
			next;
			failedremovecards .@part,3;
			mes "[Wise Old Woman]";
			mes "I have failed to remove the cards. Luckily, however, both the item and the cards are still okay.";
			close;
		}
		next;
		successremovecards .@part;
		mes "[Wise Old Woman]";
		mes "The process was a success. Here are your cards and your item. Farewell.";
		close;
	case 2:
		mes "[Wise Old Woman]";
		mes "I charge a flat fee of "+callfunc("F_InsertComma",.zenycost)+" zeny, plus "+callfunc("F_InsertComma",.percardcost)+" zeny for each card I remove from the item. In addition, I need a star crumb and a yellow gemstone to work my magic.";
		close;
	case 3:
		mes "[Wise Old Woman]";
		mes "Very well. Return at once if you seek my services.";
		close;
	}
}

 

[Spr Cannot find file sprite\xxxx.spr]

Follow path and add it...

[[WIP] Discord Bot - roCORD]

This Project is Awesome.  

[Neueste Git hat Fehler im ASPD]

Hallo, hast du die Renewal optionen deaktiviert? ^^

[Der Drop von meinem Custom/veränderten Mob funktioniert nicht.]

ok gelöst... selten dähmlicher Fehler ich bin in der mob_db um eine stelle verrutcht und dafür habe ich edliche Stunden verschwendet...

[packet error]

es wird auch gezeigt wie man eine exe difft und eine grf macht,

bin mir nur net mehr sicher ob er auch zeigt wie man ein vollständigen clienten baut.

da kann ich tepoo nur zustimmen, benutz lieber ein kro client sind viel ordentlicher aufgebaut.

und was ich dir für die zukunft empfehle guck dir auch guides an, ich weiss das viele kein nerv dafür haben,

aber man kommt daran nicht vorbei ausser man bekommt alles vorgemacht, aber so lernt man nix,

schau mal hier vorbei, das team hat sich mühe gegeben aber da gucken viele nicht rein =/
http://rathena.org/wiki/Main_Page

[packet error]

hoffe dass hilft dir weiter:
http://www.youtube.com/watch?v=3LTOOEjRtUo

[GRF: GRF Editor]

Nice Tool! =)

[PVP Warper w/ Dota Sound and Ladder (GLOBAL)]

The ghost pvp npc is working.

Have you removed this? //SQL Table for Ghost's PvP System

 

best regards

[Custom hairstyle]

data -> sprite ->  Àΰ£Á· -> ¸Ó¸®Åë

best regards

[[Free Release] Paradichlorobenzene]

Nice =)

[SakuraRO]

sorry not after my fancy >.<

 

best regards

[StarliteRO (PSD ONLY)]

Very, Very, Good.

Thanks for Sharing.

best regards

[mysql acces denied]

Diese Meldung kommt weil du Nicht zu Dein MySQL Acc Connecten kannst...

 

Stay Tuned!

[First Thor Patcher Design]

7/10

Not Bad.

[AliceRo 5k/5k/5k]

"This server is delisted, please notify the server owner."

[Kaizel und WoE]

sry, daran hat ich jetz net gedacht.

mir fällt gerade nix ein >.<

 

tut mir echt leid, vllt. weiss ja jemand anders wie man das machen kann.

 

notfalls, kannst du es ja solange austellen.

 

mfg. xRoxasx

[Kaizel und WoE]

man könnte doch den skill dispel lassen sobald man, das castel betretet, is nur n vorschlag

 

mfg. xRoxasx

[Problem mit der Exe oder Server..?]

@Daisuke hätte da mal ne frage, warum willste dein client älter machen?

also ich persönlich, finde die neuen clienten, besser, aber is ja dein ding^^

mfg. xRoxasx

[Hallow Town]

Nice Collection! I love it =D

best regards

xRoxasx

[【 Emistry © 2015 】E-Scripts Collection]

Nice Scripts! =D
 

best regards

xRoxasx

[Problem mit der Exe oder Server..?]

@Daisuke ich könnte dir da auch weiterhelfen, kannst mich gerne pm.

 

Mfg. xRoxasx

[Custom mobs looks like Poring Oo]

Well, I use the last data of Alexandria and I use a 2012-04-10 exe with the newest kro.

I didn't know that it had a maximum of 10 k, can I change this somehow?

Or am I forced to use a higher exe? That's because I can work well with the 2012-04-10 version.

 

edit: problem is solved!

best regards
xRoxasx

[@go failed]

resnametable?

[Custom mobs looks like Poring Oo]

mobdb2:

10049,Addax,ADDAX,ADDAX,300,34500000,0,4800000,3900000,2,17000,49000,99,75,250,200,250,250,250,250,10,12,2,9,87,0x37B5,150,1596,1620,864,2400000,0,0,0,0,0,0,6091,5000,7444,5000,2610,5000,1484,500,1170,500,1417,500,2554,2000,0,0,0,0,0,0

jobname:

	[jobtbl.JT_ADDAX] = "ADDAX",

NPCIdentity:

	["JT_ADDAX"] = 10049,