Автор: Cutlet: Дата: 08.17.2009

//===== eAthena Script===========================================

//= Reset NPC

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

//= Dis[IP] (modifed by Cutlet)

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

//= 1.4

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

//= eAthena SVN

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

//= ресет статов и скилов, а также рандом бонус (не под хай рейты)

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

// 1.0 - Первая версия [Dis[IP]]

// 1.1 - Появилась возможность брать добавочные стат поинты [Dis[IP]]

// 1.2 - Небольшая оптимизация [Dis[IP]]

// 1.3 - Финальная версия [Dis[IP]]

// 1.4 - небольшие исправления [Cutlet]

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

prontera,150,193,4	script	Reset	124,{

set @price, 1000;

if(BaseLevel == 99) goto lvl;

mes "[Reset NPC]";

mes "Ты еще молод.Приходи ко мне когда подрастешь до 99.Буду ждать!";

close;

lvl:

mes "[Reset NPC]";

mes "Здраствуйте,"+strcharinfo(0)+"!Желаете скинуть скилы или статы или все вместе?";

mes "Вот цены на мои услуги:";

mes "^FF0000Статы: ^000000" + @price + " z.";

mes "^FF0000Скилы: ^000000" + @price + " z.";

mes "^FF0000Всё: ^000000" + @price /2 * 3 + " z.";

switch(select("^FF0000Скинуть статы^000000",

		"^FF0000Скинуть скилы^000000",

		"^FF0000Все вместе^000000","Взять добавку"))

{

	case 1:

		if (Zeny < 10000)

		{

			mes "у тебя нет денег -_-";

			close;

		} else {

			resetstatus;

			set StatusPoint, 0;

			atcommand strcharinfo(0) + ":@stpoint 1325";

			set #b_point, 1;

			set zeny, zeny - @price;

			close;

		}

	case 2:

		if (Zeny < 10000)

		{

			mes "у тебя нет денег -_-";

			close;

		} else {

			resetskill;

			set zeny, zeny - @price;

			close;

		}

	case 3:

		if (Zeny < 15000)

		{

			mes "у тебя нет денег -_-";

			close;

		} else {

			resetskill;

			resetstatus;

			set StatusPoint, 0;

			atcommand strcharinfo(0) + ":@stpoint 1325";

			set #b_point, 1;

			mes "Незабудь взять добавку.";

			set zeny, zeny - @price /2 * 3;

			mes "Незабудь взять добавку " + #b_point + " очков.";

			close;

		}

	case 4:

		if(#b_point == 1)

		{

			set StatusPoint, StatusPoint + rand(900,1100);

			set #b_point, 0;

			mes "Такс,держи свои очки)Больше не теряй)";

			close;

		} else {

			mes "У тебя нет оставленных очков";

			close;

		}

}

close;

}

небольшая модификация скрипта + устранение некоторых ошибок

оффтоп {
мозила почему то орет на ваш сайт,типо он атачит компы о_О
}

Автор: : Дата: 01.01.1970