Untitled

prontera.gat,154,184,4	script	Black Kafra::bkafra	115,{
	mes "Hola! Yo soy la ^3355FFBlack Kafra^000000";
	mes "Puedo hacer muchas cosas por ti! Que deseas?";
	next;
	menu "Guardar",save,
	"Abrir el Storage",openstor,
	"Rentame un peco",rentpeco,
	"Rentame un Falcon",rentfalcon,
	"Rentame un carro",rentcar,
	"Nada por ahora",nothing;

	nothing:
	mes "Bueno, puedes volver cuando quieras! ^-^";
	close;

// Save
	save:
	savepoint "prontera.gat",160,190;
	mes "Has guardado correctamente";
	close;

// Open Storage
	openstor:
	mes "De acuerdo, abribe tu storage personal...";
	openstorage;
	close;
// Peco
	rentpeco:
	if (Class == 7 && checkriding(0) == 0) goto L_Peco_Ok;
	if (Class == 14 && checkriding(0) == 0) goto L_Peco_Ok;
	if (Class == 4008 && checkriding(0) == 0) goto L_Peco_Ok;
	if (Class == 4015 && checkriding(0) == 0) goto L_Peco_Ok;
	if(getskilllv(63)<1) goto Need_Skill;
	mes "Lo siento" + strcharinfo(0) + "! Pero solo los Knights pueden rentar un peco.";

	L_Peco_Ok:
	setriding;
	close;

	 Need_Skill:
	mes "Lo siento " + strcharinfo(0) + "! Pero no tienes el skill para montar el pecos aún.";
	close;

// Falcon
	rentfalcon:
	if(Class == 11 && checkfalcon(0) == 0) goto L_falc;
	if(Class == 4012 && checkfalcon(0) == 0) goto L_falc;
	if(getskilllv(127)<1) goto Need_Skill2;
	mes "Lo siento" + strcharinfo(0) + "! Pero solo los Hunters pueden rentar un falcon.";
	close;

	L_falc:
	setfalcon;
	close;

	Need_Skill2:
	mes "Lo siento " + strcharinfo(0) + "! Pero no tienes el skill para montar el pecos aún.";
	close;

//Cart
	rentcar:
	if(Class == 5 && checkcart(0) == 0) goto L_Cart_Ok;
	if(Class == 10 && checkcart(0) == 0) goto L_Cart_Ok;
	if(Class == 18 && checkcart(0) == 0) goto L_Cart_Ok;
	if(Class == 4006 && checkcart(0) == 0) goto L_Cart_Ok;
	if(Class == 4011 && checkcart(0) == 0) goto L_Cart_Ok;
	if(Class == 4019 && checkcart(0) == 0) goto L_Cart_Ok;
	if(getskilllv(39)<1) goto Need_Skill3;
	mes "Lo siento " + strcharinfo(0) + "! Pero solo los merchants pueden rentar un carro.";
	close;

	L_Cart_Ok:
	setcart;
	close;

	Need_Skill3:
	mes "Lo siento " + strcharinfo(0) + "! Pero no tienes el skill para poder usar un carro aún.";
	close;