Healer with Identify

[Littlefoot]

Can anyone help me with this script? I want my healer to auto identify unidentified equiptments.

//===== rAthena Script =======================================
//= Healer
//===== By: ==================================================
//= Euphy
//===== Current Version: =====================================
//= 1.1
//===== Compatible With: =====================================
//= rAthena Project
//===== Description: =========================================
//= Basic healer script.
//===== Additional Comments: =================================
//= 1.0 Initial script.
//= 1.1 Aligned coordinates with @go.
//============================================================

-	script	Healer	-1,{

	.@Price = 0;	// Zeny required for heal
	.@Buffs = 1;	// Also buff players? (1: yes / 0: no)
	.@Delay = 0;	// Heal delay, in seconds

	if (@HD > gettimetick(2))
		end;
	if (.@Price) {
		message strcharinfo(0), "Healing costs " + callfunc("F_InsertComma",.@Price) + " Zeny.";
		if (Zeny < .@Price)
			end;
		if (select("^0055FFHeal^000000:^777777Cancel^000000") == 2)
			end;
		Zeny -= .@Price;
	}
	specialeffect2 EF_HEAL2;
	percentheal 100,100;
	if (.@Buffs) {
		specialeffect2 EF_INCAGILITY;
		sc_start SC_INCREASEAGI,240000,10;
		specialeffect2 EF_BLESSING;
		sc_start SC_BLESSING,240000,10;
		//atcommand "@repairall";
	}
	if (.@Delay)
		@HD = gettimetick(2) + .@Delay;
	end;
}


// Duplicates
//============================================================
alberta,25,240,6	duplicate(Healer)	Healer#alb	811
aldebaran,135,118,6	duplicate(Healer)	Healer#alde	811
amatsu,200,79,4	duplicate(Healer)	Healer#ama	811
ayothaya,207,169,6	duplicate(Healer)	Healer#ayo	811
comodo,184,158,6	duplicate(Healer)	Healer#com	811
einbech,57,36,6	duplicate(Healer)	Healer#einbe	811
einbroch,57,202,6	duplicate(Healer)	Healer#einbr	811
geffen,115,72,6	duplicate(Healer)	Healer#gef	811
gonryun,156,122,6	duplicate(Healer)	Healer#gon	811
hugel,89,150,6	duplicate(Healer)	Healer#hug	811
izlude,121,150,6	duplicate(Healer)	Healer#izl	811	//Pre-RE: (125,118)
jawaii,250,139,4	duplicate(Healer)	Healer#jaw	811
lighthalzen,152,100,6	duplicate(Healer)	Healer#lhz	811
louyang,226,103,4	duplicate(Healer)	Healer#lou	811
manuk,272,144,6	duplicate(Healer)	Healer#man	811
mid_camp,203,289,6	duplicate(Healer)	Healer#mid	811
moc_ruins,72,164,4	duplicate(Healer)	Healer#moc	811
morocc,153,97,6	duplicate(Healer)	Healer#mor	811
moscovia,220,191,4	duplicate(Healer)	Healer#mos	811
niflheim,212,182,5	duplicate(Healer)	Healer#nif	811
payon,148,230,5	duplicate(Healer)	Healer#pay	811
prontera,148,176,5	duplicate(Healer)	Healer#prt	811
rachel,125,116,6	duplicate(Healer)	Healer#rac	811
splendide,201,153,4	duplicate(Healer)	Healer#spl	811
thor_camp,249,74,4	duplicate(Healer)	Healer#thor	811
umbala,105,148,3	duplicate(Healer)	Healer#umb	811
veins,217,121,4	duplicate(Healer)	Healer#ve	811
xmas,143,136,4	duplicate(Healer)	Healer#xmas	811
yuno,164,45,4	duplicate(Healer)	Healer#yuno	811
turbo_room,93,117,5	duplicate(Healer)	Healer#turbo	811

// Duplicates (Renewal)
//============================================================
//brasilis,194,221,6	duplicate(Healer)	Healer#bra	811
//dewata,195,187,4	duplicate(Healer)	Healer#dew	811
//dicastes01,201,194,4	duplicate(Healer)	Healer#dic	811
//ecl_in01,45,60,4	duplicate(Healer)	Healer#ecl	811
//malangdo,132,114,6	duplicate(Healer)	Healer#mal	811
//malaya,227,204,6	duplicate(Healer)	Healer#ma	811
//mora,55,152,4	duplicate(Healer)	Healer#mora	811

[benching]

//===== rAthena Script =======================================

//= Healer

//===== By: ==================================================

//= Euphy

//===== Current Version: =====================================

//= 1.1

//===== Compatible With: =====================================

//= rAthena Project

//===== Description: =========================================

//= Basic healer script.

//===== Additional Comments: =================================

//= 1.0 Initial script.

//= 1.1 Aligned coordinates with @go.

//============================================================

- script Healer -1,{

.@Price = 0; // Zeny required for heal

.@Buffs = 1; // Also buff players? (1: yes / 0: no)

.@Delay = 0; // Heal delay, in seconds

if (@HD > gettimetick(2))

end;

if (.@Price) {

message strcharinfo(0), "Healing costs " + callfunc("F_InsertComma",.@Price) + " Zeny.";

if (Zeny < .@Price)

end;

if (select("^0055FFHeal^000000:^777777Cancel^000000") == 2)

end;

Zeny -= .@Price;

}

specialeffect2 EF_HEAL2;

percentheal 100,100;

atcommand "@identifyall";

if (.@Buffs) {

specialeffect2 EF_INCAGILITY;

sc_start SC_INCREASEAGI,240000,10;

specialeffect2 EF_BLESSING;

sc_start SC_BLESSING,240000,10;

//atcommand "@repairall";

}

if (.@Delay)

@HD = gettimetick(2) + .@Delay;

end;

}

// Duplicates

//============================================================

alberta,25,240,6 duplicate(Healer) Healer#alb 811

aldebaran,135,118,6 duplicate(Healer) Healer#alde 811

amatsu,200,79,4 duplicate(Healer) Healer#ama 811

ayothaya,207,169,6 duplicate(Healer) Healer#ayo 811

comodo,184,158,6 duplicate(Healer) Healer#com 811

einbech,57,36,6 duplicate(Healer) Healer#einbe 811

einbroch,57,202,6 duplicate(Healer) Healer#einbr 811

geffen,115,72,6 duplicate(Healer) Healer#gef 811

gonryun,156,122,6 duplicate(Healer) Healer#gon 811

hugel,89,150,6 duplicate(Healer) Healer#hug 811

izlude,121,150,6 duplicate(Healer) Healer#izl 811 //Pre-RE: (125,118)

jawaii,250,139,4 duplicate(Healer) Healer#jaw 811

lighthalzen,152,100,6 duplicate(Healer) Healer#lhz 811

louyang,226,103,4 duplicate(Healer) Healer#lou 811

manuk,272,144,6 duplicate(Healer) Healer#man 811

mid_camp,203,289,6 duplicate(Healer) Healer#mid 811

moc_ruins,72,164,4 duplicate(Healer) Healer#moc 811

morocc,153,97,6 duplicate(Healer) Healer#mor 811

moscovia,220,191,4 duplicate(Healer) Healer#mos 811

niflheim,212,182,5 duplicate(Healer) Healer#nif 811

payon,148,230,5 duplicate(Healer) Healer#pay 811

prontera,148,176,5 duplicate(Healer) Healer#prt 811

rachel,125,116,6 duplicate(Healer) Healer#rac 811

splendide,201,153,4 duplicate(Healer) Healer#spl 811

thor_camp,249,74,4 duplicate(Healer) Healer#thor 811

umbala,105,148,3 duplicate(Healer) Healer#umb 811

veins,217,121,4 duplicate(Healer) Healer#ve 811

xmas,143,136,4 duplicate(Healer) Healer#xmas 811

yuno,164,45,4 duplicate(Healer) Healer#yuno 811

turbo_room,93,117,5 duplicate(Healer) Healer#turbo 811

// Duplicates (Renewal)

//============================================================

//brasilis,194,221,6 duplicate(Healer) Healer#bra 811

//dewata,195,187,4 duplicate(Healer) Healer#dew 811

//dicastes01,201,194,4 duplicate(Healer) Healer#dic 811

//ecl_in01,45,60,4 duplicate(Healer) Healer#ecl 811

//malangdo,132,114,6 duplicate(Healer) Healer#mal 811

//malaya,227,204,6 duplicate(Healer) Healer#ma 811

//mora,55,152,4 duplicate(Healer) Healer#mora 811

[Brian]

Here's another way to do it with script commands:

 

	// Identify all unidentified items
	getinventorylist;
	for( set .@i,0; .@i < @inventorylist_count; set .@i, .@i +1 ) {
		if ( @inventorylist_identify[.@i] == 1 ) continue;
		delitem2 @inventorylist_id[.@i],1,0,0,0,0,0,0,0;
		getitem @inventorylist_id[.@i],1;
		set .@count, .@count +1;
	}
	if (.@count) dispbottom .@count +" items identified.";