legendario2009
Aprendiz
Edad: 23
Puntos de Actividad: 1758
Cantidad de envíos: 71
Fecha de inscripción: 21/02/2009
Nº. de Miembro: 49
Respeto por el Foro:
 |  Tema: Más Scripts  Vie 12 Jun 2009, 1:44 pm | |
| Bueno este script es para sentar varios pnj con un solo script, problema que lo pnj se sienta mirando al sur no se porque, he probado con la rotación de las sillas y nada :S | Código: |
//OnConversation
del pnj
void main()
{
object oPNJ = OBJECT_SELF;
if(GetCommandable(oPNJ))
{BeginConversation();}
AssignCommand(oPNJ, ClearAllActions());
string sMyTagName = GetTag(oPNJ);
string sSittableTagName = "CHAIR_" + sMyTagName;
object oChair = GetNearestObjectByTag(sSittableTagName, oPNJ);
ActionSit(oChair);
}
//OnSpawn del pnj
void main()
{
string sMyTagName = GetTag(OBJECT_SELF);
string sSittableTagName = "CHAIR_" + sMyTagName;
object oChair = GetNearestObjectByTag(sSittableTagName, OBJECT_SELF);
ActionSit(oChair);
}
|
Y este hace que en un ubicado (caldero queda bien) te de oro según la calidad del objeto (este lo pille buscando en google asi que no se muy bien como va configurado)
| Código: |
[color=blue][font=Arial]void[/font][/color][font=Arial] main[color=black]()[/color][/font][color=black][font=Arial]{[/font][/color][color=#339900][font=Arial]//------------------------------------------------------------------------------[/font][/color][color=#339900][font=Arial]//----------------------------------CONFIGURADOR--------------------------------[/font][/color][color=#339900][font=Arial]//------------------------------------------------------------------------------[/font][/color] [color=blue][font=Arial]int[/font][/color][font=Arial] iDadoCnf = [color=red]15[/color]; [color=#339900]//CD de Convertir el Objeto en Oro.[/color][/font] [color=#339900][font=Arial]//------------------------------------------------------------------------------[/font][/color] [color=blue][font=Arial]object[/font][/color][font=Arial] oPJ = GetLastClosedBy[color=black]()[/color];[/font][color=blue][font=Arial]object[/font][/color][font=Arial] oObjeto = GetFirstItemInInventory[color=black]()[/color];[/font][color=blue][font=Arial]int[/font][/color][font=Arial] iPeso = GetWeight[color=black]([/color]oObjeto[color=black])[/color];[/font] [font=Arial]DestroyObject[color=black]([/color]oObjeto[color=black])[/color];[/font] [color=blue][font=Arial]int[/font][/color][font=Arial] iOro = d3[color=black]([/color]iPeso[color=black])[/color];[/font][color=blue][font=Arial]int[/font][/color][font=Arial] iValor = GetGoldPieceValue[color=black]([/color]oObjeto[color=black])[/color];[/font][color=blue][font=Arial]if[/font][/color][font=Arial] [color=black]([/color]iOro > iValor[color=black])[/color] iOro = iValor - d12[color=black]()[/color];[/font][color=blue][font=Arial]int[/font][/color][font=Arial] iDado = d20[color=black]()[/color] + GetSkillRank[color=black]([/color]SKILL_SPELLCRAFT, oPJ[color=black])[/color] + GetAbilityModifier[color=black]([/color]ABILITY_DEXTERITY, oPJ[color=black])[/color];[/font] [color=blue][font=Arial]if[/font][/color][font=Arial] [color=black]([/color]iDado <= iDadoCnf[color=black])[/color][/font][font=Arial] [color=black]{[/color][/font][font=Arial] SpeakString[color=black]([/color][color=#990000]"El objeto se ha fundido, sin conseguir oro..."[/color][color=black])[/color];[/font] [color=blue][font=Arial]return[/font][/color][font=Arial];[/font][font=Arial] [color=black]}[/color][/font] [font=Arial] [color=blue]int[/color] i = [color=red]1[/color];[/font][font=Arial] [color=blue]while[/color][color=black]([/color]i <= iOro[color=black])[/color][/font][font=Arial] [color=black]{[/color][/font][font=Arial] CreateItemOnObject[color=black]([/color][color=#990000]"NW_IT_GOLD001"[/color][color=black])[/color];[/font][font=Arial] i++;[/font] [color=black][font=Arial]}[/font][/color]
[color=black][font=Arial]}
|
[/font][/color] |
|
