Patrunjelu's Modding Tutorials

Code:

instance BAU_903_Rufus (Npc_Default)

{

    //-------- primary data --------

    

    name         =    "Rufus";

    npctype        =    npctype_main;

    guild         =    GIL_BAU;      

    level         =    4;

    voice         =    2;

    id             =    903;



    //-------- abilities --------

    attribute[ATR_STRENGTH] =        20;

    attribute[ATR_DEXTERITY] =        10;

    attribute[ATR_MANA_MAX] =        0;

    attribute[ATR_MANA] =            0;

    attribute[ATR_HITPOINTS_MAX] =    88;

    attribute[ATR_HITPOINTS] =        88;



    //-------- visuals --------

    //                 animations

    Mdl_SetVisual        (self,"HUMANS.MDS");

    Mdl_ApplyOverlayMds    (self,"Humans_Tired.mds");

    //            body mesh     ,bdytex,skin,head mesh     ,headtex,teethtex,ruestung    

    Mdl_SetVisualBody (self,"hum_body_Naked0",2,2,"Hum_Head_Bald", 2, 1, -1);

    

    B_Scale (self);

    Mdl_SetModelFatness(self,0);

    

    fight_tactic    =    FAI_HUMAN_COWARD; 

                                    

    //-------- Talente --------                                       

    Npc_SetTalentSkill    (self,NPC_TALENT_1H,1);        

    

    

    //-------- inventory --------                                    



        

    EquipItem (self, ItMw_1H_Scythe_01);

    CreateInvItems (self, ItFoRice,3);

    

    



    //-------------Daily Routine-------------

    daily_routine = Rtn_start_903;

};







FUNC VOID Rtn_start_903 ()

{

    TA_PickRice        (07,10,20,10,"NC_PATH83_MOVEMENT"); 

    TA_SitCampfire    (20,10,07,10,"NC_PATH_PEASANT_OUTSIDE5");

};

Code:

instance PAT_001_Tutie (Npc_Default)

{

    //-------- primary data --------

    

    name         =    "Tutie";

    npctype        =    npctype_main;

    guild         =    GIL_BAU;      

    level         =    4;

    voice         =    2;

    id             =    903;



    //-------- abilities --------

    attribute[ATR_STRENGTH] =        20;

    attribute[ATR_DEXTERITY] =        10;

    attribute[ATR_MANA_MAX] =        0;

    attribute[ATR_MANA] =            0;

    attribute[ATR_HITPOINTS_MAX] =    88;

    attribute[ATR_HITPOINTS] =        88;



    //-------- visuals --------

    //                 animations

    Mdl_SetVisual        (self,"HUMANS.MDS");

    Mdl_ApplyOverlayMds    (self,"Humans_Tired.mds");

    //            body mesh     ,bdytex,skin,head mesh     ,headtex,teethtex,ruestung    

    Mdl_SetVisualBody (self,"hum_body_Naked0",2,2,"Hum_Head_Bald", 2, 1, -1);

    

    B_Scale (self);

    Mdl_SetModelFatness(self,0);

    

    fight_tactic    =    FAI_HUMAN_COWARD; 

                                    

    //-------- Talente --------                                       

    Npc_SetTalentSkill    (self,NPC_TALENT_1H,1);        

    

    

    //-------- inventory --------                                    



        

    EquipItem (self, ItMw_1H_Scythe_01);

    CreateInvItems (self, ItFoRice,3);

    

    



    //-------------Daily Routine-------------

    daily_routine = Rtn_start_001;

};







FUNC VOID Rtn_start_001 ()

{

    TA_PickRice        (07,10,20,10,"NC_PATH83_MOVEMENT"); 

    TA_SitCampfire    (20,10,07,10,"NC_PATH_PEASANT_OUTSIDE5");

};

Code:

// ************************************************************

//                         Kann ich helfen?

// ************************************************************

// ************************************************************



INSTANCE DIA_Hunkor_WannaHelp (C_INFO)

{

    npc            = PAT_001_Hunkor;

    nr            = 1;

    condition    = DIA_Hunkor_WannaHelp_Condition;

    information    = DIA_Hunkor_WannaHelp_Info;

    permanent    = 0;

    description = "Te pot ajuta cu ceva?";

};                       



FUNC INT DIA_Hunkor_WannaHelp_Condition()

{

    if (Npc_KnowsInfo(hero, DIA_Hunkor_Hello))

    {

        return 1;

    };

};



FUNC VOID DIA_Hunkor_WannaHelp_Info()

{    

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_15_00"); //Pot sa te ajut cu ceva?

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_01"); //Categoric. Vreau sa ies din acest loc. 

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_02_02"); //Bariera e magica, nu cred ca se poate distruge asa usor.

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_03"); //Trebuie sa fie o metoda. Nu am venit singur aici. Si ceilalti prieteni ai mei au fost aruncati aici.

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_04"); //Unul din prietenii mei se numea Arcus. Este un mag puternic, si foarte intelept. Sunt sigur ca va gasi o solutie la aceasta problema.

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_02_05"); //Si trebuie sa il gasesc pe acest Arcus?

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_06"); //Exact. Gaseste-l si intreaba-l daca stie ceva despre ceilalti cu care am venit. Jorkan si Rhem.

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_02_07"); //Si cam, pe unde l-as putea gasi pe acest Arcus?

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_08"); //De unde sa stiu? Pe aici pe undeva...

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_02_09"); //Asa... O sa incerc sa dau de el... cumva...

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_10"); //Mult noroc.

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_02_11"); //Sper sa nu fie nevoie...

    

    Hunkor_Buttsecs = LOG_RUNNING;

    

    Log_CreateTopic        (PAT_Hunkor, LOG_MISSION);

    Log_SetTopicStatus    (PAT_Hunkor, LOG_RUNNING);

    B_LogEntry            (PAT_Hunkor,"Azi m-am intalnit cu un personaj foarte ciudat... pe nume Hunkor. Mi-a spus ca vine dintr-o lume numita Aeophia, care este in pericol. Mi-a mai zis ca i-a cerut ajutorul lui Rhobar, care pana la urma l-a aruncat in aceasta vale, la un loc cu prietenii lui. M-am oferit sa il ajut sa scape de aici, iar el mi-a spus sa vorbesc cu unul din prietenii lui, pe nume 'Arcus'. Nu a spus unde il pot gasi insa... Va trebui sa il intreb pe acest Arcus daca stie ceva despre ceilalti prieteni al lui Hunkor, 'Jorkan' si 'Rhem' ");



};

Code:

// ************************************************************

//                                  EXIT 

// ************************************************************



INSTANCE DIA_Hunkor_EXIT (C_INFO)

{

    npc            = PAT_001_Hunkor;

    nr            = 999;

    condition    = DIA_Hunkor_EXIT_Condition;

    information    = DIA_Hunkor_EXIT_Info;

    permanent    = 1;

    description = DIALOG_ENDE;

};                       



FUNC INT DIA_Hunkor_EXIT_Condition()

{

    return 1;

};



FUNC VOID DIA_Hunkor_EXIT_Info()

{    

    AI_StopProcessInfos    (self);

};

// ************************************************************

//                         Hallo

// ************************************************************



INSTANCE DIA_Hunkor_Hello (C_INFO)

{

    npc            = PAT_001_Hunkor;

    nr            = 1;

    condition    = DIA_Hunkor_Hello_Condition;

    information    = DIA_Hunkor_Hello_Info;

    permanent    = 0;

    description = "Ce faci aici?";

};                       



FUNC INT DIA_Hunkor_Hello_Condition()

{

    return 1;

};



FUNC VOID DIA_Hunkor_Hello_Info()

{    

    AI_Output (other, self,"DIA_Hunkor_Hello_15_00"); //Ce faci aici?

    AI_Output (self, other,"DIA_Hunkor_Hello_02_01"); //Stau! Nu se vede? Sau esti la fel de orb ca idiotul ala pe care il considerati lider?!

    AI_Output (other, self,"DIA_Hunkor_Hello_02_02"); //... 

    AI_Output (self, other,"DIA_Hunkor_Hello_02_03"); //M-am saturat de lumea asta!

};// ************************************************************

//                         Kann ich helfen?

// ************************************************************

// ************************************************************



INSTANCE DIA_Hunkor_WannaHelp (C_INFO)

{

    npc            = PAT_001_Hunkor;

    nr            = 1;

    condition    = DIA_Hunkor_WannaHelp_Condition;

    information    = DIA_Hunkor_WannaHelp_Info;

    permanent    = 0;

    description = "Te pot ajuta cu ceva?";

};                       



FUNC INT DIA_Hunkor_WannaHelp_Condition()

{

    if (Npc_KnowsInfo(hero, DIA_Hunkor_Hello))

    {

        return 1;

    };

};



FUNC VOID DIA_Hunkor_WannaHelp_Info()

{    

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_15_00"); //Pot sa te ajut cu ceva?

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_01"); //Categoric. Vreau sa ies din acest loc. 

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_02_02"); //Bariera e magica, nu cred ca se poate distruge asa usor.

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_03"); //Trebuie sa fie o metoda. Nu am venit singur aici. Si ceilalti prieteni ai mei au fost aruncati aici.

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_04"); //Unul din prietenii mei se numea Arcus. Este un mag puternic, si foarte intelept. Sunt sigur ca va gasi o solutie la aceasta problema.

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_02_05"); //Si trebuie sa il gasesc pe acest Arcus?

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_06"); //Exact. Gaseste-l si intreaba-l daca stie ceva despre ceilalti cu care am venit. Jorkan si Rhem.

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_02_07"); //Si cam, pe unde l-as putea gasi pe acest Arcus?

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_08"); //De unde sa stiu? Pe aici pe undeva...

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_02_09"); //Asa... O sa incerc sa dau de el... cumva...

    AI_Output (self, other,"DIA_Hunkor_WannaHelp_02_10"); //Mult noroc.

    AI_Output (other, self,"DIA_Hunkor_WannaHelp_02_11"); //Sper sa nu fie nevoie...

    

    Hunkor_Quest = LOG_RUNNING;

    

    Log_CreateTopic        (PAT_Hunkor, LOG_MISSION);

    Log_SetTopicStatus    (PAT_Hunkor, LOG_RUNNING);

    B_LogEntry            (PAT_Hunkor,"Azi m-am intalnit cu un personaj foarte ciudat... pe nume Hunkor. Mi-a spus ca vine dintr-o lume numita Aeophia, care este in pericol. Mi-a mai zis ca i-a cerut ajutorul lui Rhobar, care pana la urma l-a aruncat in aceasta vale, la un loc cu prietenii lui. M-am oferit sa il ajut sa scape de aici, iar el mi-a spus sa vorbesc cu unul din prietenii lui, pe nume 'Arcus'. Nu a spus unde il pot gasi insa... Va trebui sa il intreb pe acest Arcus daca stie ceva despre ceilalti prieteni al lui Hunkor, 'Jorkan' si 'Rhem' ");



};

Code:

// ************************************************************

//                         Kann ich helfen?

// ************************************************************

// ************************************************************



INSTANCE DIA_Arcus_WannaHelp (C_INFO)

{

    npc            = PAT_002_Arcus;

    nr            = 1;

    condition    = DIA_Arcus_WannaHelp_Condition;

    information    = DIA_Arcus_WannaHelp_Info;

    permanent    = 0;

    description = "Hunkor m-a trimis la tine!";

};                       



FUNC INT DIA_Arcus_WannaHelp_Condition()

{

    if (Npc_KnowsInfo(hero, DIA_Arcus_Hello) && (Hunkor_Quest == LOG_RUNNING))

    {

        return 1;

    };

};



FUNC VOID DIA_Arcus_WannaHelp_Info()

{    

    AI_Output (other, self,"DIA_Arcus_WannaHelp_15_00"); //Hunkor m-a trimis la tine! A spus sa te intreb daca stii ceva despre prietenii lui, Jorkham si Rhem.

    AI_Output (self, other,"DIA_Arcus_WannaHelp_02_01"); //Asa deci, el unde e?

    AI_Output (other, self,"DIA_Arcus_WannaHelp_02_02"); //E intr-o pestera langa tabara asta!

    AI_Output (self, other,"DIA_Arcus_WannaHelp_02_03"); //Stiu despre Jorkhan si Rhem. 

    AI_Output (self, other,"DIA_Arcus_WannaHelp_02_04"); //Cred ca stiu si ce plan are Hunkor... vrea sa scape... m-am uitat mai bine la bariera si se pare ca e... indestructibila...

    AI_Output (self, other,"DIA_Arcus_WannaHelp_02_05"); //Dar oricum, Jorkhan si Rhem au plecat impreuna in padure, nu au vrut sa vina cu mine in tabara.

    AI_Output (other, self,"DIA_Arcus_WannaHelp_02_06"); //De ce?

    AI_Output (self, other,"DIA_Arcus_WannaHelp_02_07"); //Eu de unde sa stiu? Poate ca nu le-ar fi placut sa traiasca aici.

    AI_Output (self, other,"DIA_Arcus_WannaHelp_02_08"); //Oricum, i-am vazut plecand spre ceea ce numiti voi, Tabara din Mlastina. Sau Tabara Sectei.

    AI_Output (self, other,"DIA_Arcus_WannaHelp_02_09"); //Spune-i lui Rhem sa mearga in pestera lui Hunkor. Deindata ce i-ai spus acest lucru, vino inapoi si spune-mi. O sa continuam atunci. Jorkham NU trebuie sa afle despre acest lucru in NICI UN FEL... nu intreba de ce, am motivele mele.

    AI_Output (other, self,"DIA_Arcus_WannaHelp_02_10"); //Am inteles... O sa incerc sa il gasesc.

    AI_Output (self, other,"DIA_Arcus_WannaHelp_02_11"); //Inca ceva... Ia aceasta carte... e pentru Rhem... zi-i ca e din partea mea... e ziua lui de nastere azi... isi dorea de mult aceasta carte...

    AI_Output (other, self,"DIA_Arcus_WannaHelp_02_12"); //Bun... o sa vad ce pot face...

    

    CreateInvItem   (self, ArcusBook);

    B_GiveInvItems  (self,other, ArcusBook,1);

    

    Hunkor_Quest = LOG_SUCCESS;

    Log_SetTopicStatus            (PAT_Hunkor,    LOG_SUCCESS);

    B_LogEntry            (PAT_Hunkor,"M-am intalnit cu Arcus. Desi acesta mi-a dat alta insarcinare, am decis sa inchei acest 'capitol'");

        B_GiveXP            (200);

};

Code:

// ************************************************************

//                         tutorial3

// ************************************************************

// ************************************************************



INSTANCE DIA_Hunkor_Obiect (C_INFO)

{

    npc            = PAT_001_Hunkor;

    nr            = 1;

    condition    = DIA_Hunkor_Obiect_Condition;

    information    = DIA_Hunkor_Obiect_Info;

    permanent    = 0;

    description = "Poftim obiectul tau!";

};                       



FUNC INT DIA_Hunkor_Obiect_Condition()

{

    if (Npc_HasItems ( hero, ItKeLockpick ) && (Hunkor_Quest == LOG_RUNNING))

    {

        return 1;

    };

};



FUNC VOID DIA_Hunkor_Obiect_Info()

{    

    AI_Output (other, self,"DIA_Hunkor_Obiect_15_00"); //Ti-am adus obiectul acesta!

    AI_Output (self, other,"DIA_Hunkor_Obiect_02_01"); //Multumesc!



    

    CreateInvItem       (other, ItKeLockpick);

    B_GiveInvItems      (other, self, ItKeLockpick,1);

    Npc_RemoveInvItem    (other,    ItKeLockpick);

    

    B_LogEntry            (PAT_Hunkor,"I-am dat obiectul lui Hunkor");

    B_GiveXP            (500);

};

Show Content

Spoiler

Code:
INSTANCE ItMi_Amulet_Psi_01(C_Item)

{

    name             =    NAME_Amulett;

    mainflag         =    ITEM_KAT_MAGIC;

    flags             =    ITEM_AMULET;

    value             =    5;

    visual             =    "ItMi_Amulet_Psi_01.3ds";

    visual_skin     =    0;

    material         =    MAT_METAL;

    description        = "Sign of the Brotherhood";

    //TEXT[0]            = "";

    //TEXT[2]            = "";

    ////COUNT[2]        = ;

    //TEXT[3]         = "";

    ////COUNT[3]        = ;

    TEXT[5]            = NAME_Value;

    COUNT[5]        = value;

};

Code:
INSTANCE ItFoApple(C_Item)

{    

    name                 =    "Apple";

    mainflag             =    ITEM_KAT_FOOD;

    flags                 =    ITEM_MULTI;

    value                 =    Value_Apfel;

    visual                 =    "ItFo_Apple_01.3ds"; 

    material             =    MAT_LEATHER;

    scemeName            =    "FOOD";

    on_state[0]            =    UseApple;

    description            = name;

    TEXT[1]                = NAME_Bonus_HP;                COUNT[1]    = HP_Apfel;

    TEXT[5]                = NAME_Value;                    COUNT[5]    = Value_Apfel;

};

    FUNC VOID UseApple()

    {

        Npc_ChangeAttribute    (self,    ATR_HITPOINTS,    HP_Apfel);

    };

Code:
INSTANCE Thorus_Schwert (C_Item)

{

    name                 =    "Thorus' Sword";

    mainflag             =    ITEM_KAT_NF;

    flags                 =    ITEM_2HD_SWD;

    material             =    MAT_METAL;

    value                 =    500;

    damageTotal            =     90;

    damagetype            =    DAM_EDGE;

    range                =      150;

    cond_atr[2]           =     ATR_STRENGTH;

    cond_value[2]          =     75;

    owner                 =     GRD_200_THORUS;

    visual                 =    "ItMw_2H_Sword_01.3DS";

    description            = name;

    TEXT[2]                = NAME_Damage;                    COUNT[2]    = damageTotal;

    TEXT[3]             = NAME_Str_needed;                COUNT[3]    = cond_value[2];

    TEXT[4]             = NAME_TwoHanded;

    TEXT[5]                = NAME_Value;                    COUNT[5]    = value;

};

Code:
INSTANCE ItFo_Potion_Mana_01(C_Item)

{

    name             =    NAME_Trank;

    mainflag         =    ITEM_KAT_POTIONS;

    flags             =    ITEM_MULTI;

    value             =    Value_ManaEssenz;    

    visual             =    "ItFo_Potion_Mana_01.3ds";

    material         =    MAT_GLAS;

    on_state[0]        =    UseManaPotion;

    scemeName        =    "POTIONFAST";

    description            = "Essence of Magic Energy";

    TEXT[1]                = NAME_Bonus_Mana;                COUNT[1]    = Mana_Essenz;

    TEXT[5]                = NAME_Value;                    COUNT[5]    = Value_ManaEssenz;

};

    FUNC VOID UseManaPotion()

    {

        PrintDebugNpc        (PD_ITEM_MOBSI, "UseManaPotion");

        Npc_ChangeAttribute    (self,    ATR_MANA,    Mana_Essenz);

    };

Code:
INSTANCE VLK_ARMOR_L(C_Item)

{

    name                     =    "Light Digger's Trousers";

    mainflag                 =    ITEM_KAT_ARMOR;

    flags                     =    0;

    protection [PROT_EDGE]    =    10;

    protection [PROT_BLUNT] =     10;

    protection [PROT_POINT] =     0;

    protection [PROT_FIRE]     =     5;

    protection [PROT_MAGIC] =     0;

    value                     =    VALUE_VLK_ARMOR_L;

    wear                     =    WEAR_TORSO;

    visual                     =    "vlkl.3ds";

    visual_change             =    "Hum_VLKL_ARMOR.asc";

    visual_skin             =    0;

    material                 =    MAT_LEATHER;

    description                =    name;

    //TEXT[0]                =    "";

    TEXT[1]                    =    NAME_Prot_Edge;            COUNT[1]    = protection    [PROT_EDGE];

    TEXT[2]                    =    NAME_Prot_Point;        COUNT[2]    = protection    [PROT_POINT];

    TEXT[3]                 =    NAME_Prot_Fire;            COUNT[3]    = protection    [PROT_FIRE];

    TEXT[4]                    =    NAME_Prot_Magic;        COUNT[4]    = protection    [PROT_MAGIC];

    TEXT[5]                    =    NAME_Value;                COUNT[5]    = value;

};