homunculus and pet Intimacy command?

[themon]

is there a gm command or skill to increase intimacy of Homunculus or pet?

like example

  Id: 7224
 AegisName: "Stone_Of_Intelligence"
 Name: "Stone of Sage"
 Type: 11
 Buy: 0
 Weight: 10
 Script: <" itemskill "PET_INTIMATE",91000; ">

or gm command

@h_intimate 1000

@p_intimate 1000

 

[quesoph]

@petfriendly <0-1000>Sets the intimacy level of your pet, with 1000 being "Loyal". @homfriendly <0-1000>Sets the intimacy level of your homunculus, with 1000 being "Loyal".

?

 

[themon]

@petfriendly <0-1000>Sets the intimacy level of your pet, with 1000 being "Loyal". @homfriendly <0-1000>Sets the intimacy level of your homunculus, with 1000 being "Loyal".

?

is that existing? where to find it?

 

[Mhalicot]

yes it still exists 

doc/atcommand.txt

---------------------------------------@petfriendly <0-1000>Sets the intimacy level of your pet, with 1000 being "Loyal".---------------------------------------@homfriendly <0-1000>Sets the intimacy level of your homunculus, with 1000 being "Loyal".--------------------------------------- 

src/map/atcommand.c

ACMD(petfriendly){	int friendly;	struct pet_data *pd;		if (!message || !*message || (friendly = atoi(message)) < 0) {		clif->message(fd, msg_txt(1016)); // Please enter a valid value (usage: @petfriendly <0-1000>).		return false;	}		pd = sd->pd;	if (!pd) {		clif->message(fd, msg_txt(184)); // Sorry, but you have no pet.		return false;	}		if (friendly < 0 || friendly > 1000)	{		clif->message(fd, msg_txt(37)); // An invalid number was specified.		return false;	}		if (friendly == pd->pet.intimate) {		clif->message(fd, msg_txt(183)); // Pet intimacy is already at maximum.		return false;	}		pet->set_intimate(pd, friendly);	clif->send_petstatus(sd);	clif->message(fd, msg_txt(182)); // Pet intimacy changed.	return true;}ACMD(homfriendly){	int friendly = 0;			if ( !homun_alive(sd->hd) ) {		clif->message(fd, msg_txt(1254)); // You do not have a homunculus.		return false;	}		if (!message || !*message) {		clif->message(fd, msg_txt(1258)); // Please enter a friendly value (usage: @homfriendly <friendly value [0-1000]>).		return false;	}		friendly = atoi(message);	friendly = cap_value(friendly, 0, 1000);		sd->hd->homunculus.intimacy = friendly * 100 ;	clif->send_homdata(sd,SP_INTIMATE,friendly);	return true;}

 

[themon]

thanks! Mhalicot

now how can I make it to be use as an item?

  Id: 7224

 AegisName: "Stone_Of_Intelligence"

 Name: "Stone of Sage"

 Type: 11

 Buy: 0

 Weight: 10

 Script: <" itemskill "@homfriendly",1000; ">

 

[Mhalicot]

try to use 

atcommand "@homfriendly 1000";

 

[themon]

try to use 

atcommand "@homfriendly 1000";

nope don't work

 

[Leecher]

try to use 

atcommand "@homfriendly 1000";

nope don't work

when i use that command, nothing happens.

EDIT: Sorry about that, it does work.