legendario2009 Aprendiz


 Edad: 22 Puntos de Actividad: 1241
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, 2: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] |
|