Помоги со стоуном., лвл 4 фул скиллы. Опции

[dontkilla]

Может кто помочь хочу реализовать стоун или гейт чтобы выдавал 4 левел и максимальные скиллы. Pol 97.

[PolDev]

Выложу завтра скрипт банальный. А пока что можешь поискать в этом разделе, я его тут где-то видел.

[dontkilla]

Да я весь форум по десять раз перерыл =)
Есть стаф команнды
.setobjproperty level 4 - таргет на игрока и он 4 лвл
.power - таргет и у него максимальные скиллы в зависимости от класса персонажа.
Может они смогу помочь реализовать что я хочу.

[PolDev]

Можно написать скрипт, который будет обращаться к этим командам, но смысла нету, так как прийдется его писать, а вы этого сделать не сможете, поэтому я лучше дам уже готовый скрипт, который позволяет сделать скиллы и статы, его вы сами сможете подправить под что вам будет необходимо.

[PolDev]

Код

use uo;
include "include/client";
include "include/attributes";
program setskill( who )
for i := 0 to 48
SetAttributeBaseValue (who, GetAttributeIDBySkillID (i), 0);
var p;
p := 1048576;
endfor
SetAttributeBaseValue (who,GetAttributeIDBySkillID (4), 1500); //АрмсЛор
SetAttributeBaseValue (who,GetAttributeIDBySkillID (7), 1300); //БС
SetAttributeBaseValue (who, GetAttributeIDBySkillID (8), 1350); //Боукрафт
SetAttributeBaseValue (who, GetAttributeIDBySkillID (25), 900); //Магери
SetAttributeBaseValue (who, GetAttributeIDBySkillID (34), 1200); //Тейлор
SetAttributeBaseValue (who, GetAttributeIDBySkillID (37), 1200); //тинкер
SetAttributeBaseValue (who, GetAttributeIDBySkillID (45), 1200); //Мининг
SetAttributeBaseValue (who, GetAttributeIDBySkillID (44), 1200); //ламбер
SetAttributeBaseValue (who, GetAttributeIDBySkillID (11), 1200); //Карпентри

SetAttributeBaseValue (who, "Strength", 1500);
SetAttributeBaseValue (who, "Intelligence", 400);
SetAttributeBaseValue (who, "Dexterity", 1200);
RecalcVitals (who);
SendSysMessage (who, "You now a Crafter !!!");
endprogram

Сразу скажу код не мой.
Что непонятно спрашивай, я объясню что к чему...

[dontkilla]

Спасибо =)