Автор: dimjke: Дата: 12.28.2009

prontera,167,211,0	script	Примерочная	832,{

set $@name$,"[Примерщик]";

set @topview, getlook(4);

addtimer 1000, strnpcinfo(3)+"::OnLeave";

BEGIN:

mes $@name$;

mes "Здравствуй, "+strcharinfo(0)+".";

mes "Только у меня ты можешь примерить всякие шапочки!";

mes "Пожалуйста, введите ID предмета:";next;

input @id;

set @view, getiteminfo(@id,11);

atcommand "@changelook 1 " + @view;next;

mes $@name$;

mes "Хотите примерить что то ещё?";

if(select("Да,хочу", "Уйти") == 2) {close;}

goto BEGIN;

end;



OnLeave:

atcommand "@changelook 1 " + @topview;

close;

}

Автор: JaneAir: Дата: 12.29.2009

Неплохо , мне понравилось)

Автор: MaxxWell: Дата: 01.09.2010

Нпц полезное, но кривое, примерить дает, но сразу снимает=)