Cпойлер(щелкните, чтобы прочесть):

func void B_KillNpc(var int npcInstance)
{
* * *var C_Npc npc;
* * *var int itemInstance;
* * *PrintDebugNpc(PD_ZS_DETAIL,"B_KillNpc");
* * *npc = Hlp_GetNpc(npcInstance);
* * *npc.flags = 0;
* * *CreateInvItem(npc,ItMi_Stuff_OldCoin_02);
* * *Npc_ChangeAttribute(npc,ATR_HITPOINTS,-npc.attribute[ATR_HITPOINTS_MAX]);
* * *if(Npc_GetInvItemBySlot(npc,INV_WEAPON,1))
* * *{
* * * * * *PrintDebugNpc(PD_ZS_DETAIL,"...Waffe in Slot 1 gefunden!");
* * * * * *itemInstance = Hlp_GetInstanceID(item);
* * * * * *Npc_RemoveInvItem(npc,itemInstance);
* * *};
* * *if(Npc_GetInvItemBySlot(npc,INV_WEAPON,2))
* * *{
* * * * * *PrintDebugNpc(PD_ZS_DETAIL,"...Waffe in Slot 2 gefunden!");
* * * * * *itemInstance = Hlp_GetInstanceID(item);
* * * * * *Npc_RemoveInvItem(npc,itemInstance);
* * *};
};

Cпойлер(щелкните, чтобы прочесть):

instance GUR_1208_BaalCadar(Npc_Default)
{
* * *name[0] = "Идол Кадар";
* * *npcType = npctype_main;
* * *guild = GIL_GUR;
* * *level = 28;
* * *voice = 2;
* * *id = 1208;
* * *attribute[ATR_STRENGTH] = 70;
* * *attribute[ATR_DEXTERITY] = 55;
* * *attribute[ATR_MANA_MAX] = 50;
* * *attribute[ATR_MANA] = 50;
* * *attribute[ATR_HITPOINTS_MAX] = 376;
* * *attribute[ATR_HITPOINTS] = 376;
* * *Mdl_SetVisual(self,"HUMANS.MDS");
* * *Mdl_ApplyOverlayMds(self,"Humans_Mage.mds");
* * *Mdl_SetVisualBody(self,"hum_body_Naked0",1,1,"Hum _Head_Psionic",20,1,gur_armor_m);
* * *B_Scale(self);
* * *Mdl_SetModelFatness(self,-1);
* * *Npc_SetTalentSkill(self,NPC_TALENT_MAGE,6);
* * *CreateInvItem(self,ItArRuneWindfist);
* * *B_Give_BaalCadarChapter1Runes();
* * *fight_tactic = FAI_HUMAN_MAGE;
* * *daily_routine = Rtn_start_1208;
};


func void Rtn_start_1208()
{
* * *TA_Sleep(2,0,8,0,"PSI_23_HUT_IN");
* * *TA_Teaching(8,0,2,0,"PSI_TEACH_CADAR");
};

Cпойлер(щелкните, чтобы прочесть):

в функции Rtn_start_1208(): с 2:00 до 8:00 он спит в своей хижине (waypoint PSI_23_HUT_IN), а с 8:00 до 2:00 обучает послушников магии Спящего под тренировочной площадкой для храмовников (waypoint PSI_TEACH_CADAR)

Cпойлер(щелкните, чтобы прочесть):

TA_PracticeMagic(2,0,8,0,"PSI_TEACH_CADAR");

Cпойлер(щелкните, чтобы прочесть):

instance BAU_930_Sekob(Npc_Default)
{
* * *name[0] = "Секоб";
* * *guild = GIL_OUT;
* * *id = 930;
* * *voice = 1;
* * *flags = NPC_FLAG_IMMORTAL;
* * *npcType = npctype_main;
* * *aivar[AIV_ToughGuy] = TRUE;
* * *B_SetAttributesToChapter(self,1);
* * *fight_tactic = FAI_HUMAN_COWARD;
* * *EquipItem(self,ItMw_1h_Bau_Mace);
* * *B_CreateAmbientInv(self);
* * *B_SetNpcVisual(self,MALE,"Hum_Head_Fatbald",Face_ P_OldMan_Gravo,BodyTex_P,ITAR_Vlk_H);
* * *Mdl_SetModelFatness(self,0);
* * *Mdl_ApplyOverlayMds(self,"Humans_Arrogance.mds");
* * *B_GiveNpcTalents(self);
* * *B_SetFightSkills(self,20);
* * *daily_routine = Rtn_Start_930;
};


func void Rtn_Start_930()
{
* * *TA_Sit_Throne(8,0,22,0,"NW_FARM4_SEKOB");
* * *TA_Sleep(22,0,8,0,"NW_FARM4_IN_BED");
};

func void Rtn_FleeDMT_930()
{
* * *TA_Stand_WP(8,0,22,0,"NW_BIGFARM_FARM4_PATH_01");
* * *TA_Stand_WP(22,0,8,0,"NW_BIGFARM_FARM4_PATH_01");
};

func void Rtn_Obsessed_930()
{
* * *TA_Stand_Guarding(8,0,22,0,"NW_FARM4_02");
* * *TA_Stand_Guarding(22,0,8,0,"NW_FARM4_02");
};

Cпойлер(щелкните, чтобы прочесть):

в функции Rtn_Start_930(): с 8:00 до 22:00 сидит в кресле (NW_FARM4_SEKOB), а с 22:00 до 8:00 спит на кровати (NW_FARM4_IN_BED). Затем в 3-й главе, когда ищущие выгоняют его семью из дома, Секоб круглые сутки стоит на улице (функция Rtn_FleeDMT_930()) до тех пор, пока ГГ не уничтожит ищущих. А когда Секоб становится одержимым, тогда от него сбегают жена и сын, а сам он круглые сутки стоит на waypoint NW_FARM4_02 (функция Rtn_Obsessed_930()).

Cпойлер(щелкните, чтобы прочесть):

apply overlaymds humans_drunken

Cпойлер(щелкните, чтобы прочесть):

Mdl_ApplyOverlayMds(self,"Humans_drunken.mds");

Cпойлер(щелкните, чтобы прочесть):

var int Player;
instance NPC_Game(C_Info)
{
* * *npc = VLK_454_Buerger;
* * *nr = 3;
* * *condition = PC_Game_Condition;
* * *information = PC_Game_Info;
* * *permanent = TRUE;
* * *description = "Сыграем в кости?";
};
func int PC_Game_Condition()
{
* * *if(Npc_KnowsInfo(other,DIA_VLK_454_Hello))
* * *{
* * * * * *return TRUE;
* * *};
};

func void PC_Game_Info()

{
*AI_Output(other,self,"DIA_PlayGame_15_01"); //Сыграем в кости?
*AI_Output(self,other,"DIA_PlayGame_15_02"); //Не терпится расстаться с золотом? (смеется) Хорошо.Какая ставка?
*Info_ClearChoices(PC_Game);
*Info_AddChoice(PC_Game,"20 золотых",PC_Game_1);
*Info_AddChoice(PC_Game,"30 золотых",PC_Game_2);
*Info_AddChoice(PC_Game,"50 золотых",PC_Game_3);
*Info_AddChoice(PC_Game,"100 золотых",PC_Game_4);
};

var int Round;
func void PC_Game_1()
{
* * *AI_Output(other,self,"DIA_PlayGame_15_03"); *// 20золотых
* * *Round = 20;
};

func void PC_Game_2()
{
* ** * *AI_Output(other,self,"DIA_PlayGame_15_04"); *//30 золотых
* * *Round = 30;
};

func void PC_Game_3()
{
* * *AI_Output(other,self,"DIA_PlayGame_15_05"); *//50 золотых
* * *Round = 50;
};

func void PC_Game_4()
{
* * *AI_Output(other,self,"DIA_PlayGame_15_06"); *//100 золотых
* * *Round = 100;
};


instance NPC_Game_Start(C_Info)
{
* * *npc = VLK_454_Buerger;
* * *nr = 3;
* * *condition = PC_Game_Start_Condition;
* * *information = PC_Game_Start_Info;
* * *permanent = TRUE;
* * *
};
func int PC_Game_Start_Condition()
{
* * *if(Npc_KnowsInfo(other,NPC_Game))
* * *{
* * * * * *return TRUE;
* * *};
};
var int Game;
var int MyGame;
func void PC_Game_Start_Info()

{ * * *Game = Hlp_Random(12);
* if(Game <= 2)
*{
* * *AI_Output(other,self,"DIA_BigGame_15_01"); * * *//Проклятье! Двойка.
*}
else if(Game = 3)
*{
* * *AI_Output(other,self,"DIA_BigGame_15_02"); * * *//Три очка. * * *
*}

else if(Game = 4)
*{
* * *AI_Output(other,self,"DIA_BigGame_15_03"); * * *//Четыре, паршиво. * * *
*}
else if(Game = 5)
*{
* * *AI_Output(other,self,"DIA_BigGame_15_04"); * * *//Пять. * * *
*}
else if(Game = 6)
*{
* * *AI_Output(other,self,"DIA_BigGame_15_05"); * * *//Шесть, хоть что-то. * * *
*}
else if(Game = 7)
{
* * *AI_Output(other,self,"DIA_BigGame_15_06"); * * *//Семь. * * *
}
else if(Game = 8)
{
* * *AI_Output(other,self,"DIA_BigGame_15_07"); * * *//Восемь, неплохо, совсем неплохо. * * *
}
else if(Game = 9)
{
* * *AI_Output(other,self,"DIA_BigGame_15_08"); * * *//Девять. Посмотрим, что ты на это скажешь. * * *
}
else if(Game = 10) * * * * * * * * * * * * * * * * * * * * * * * * * * * * * Нельзя выполнить присвоение if. Прикол в том, что стоило перенести if строкой ниже, а потом вернуть на место, эта ошибка пропала, но два нижних условия по прежнему считаются ошибочными. Если же убрать if, начинает выдавать ошибки в строках с условиями ранее признанные программой как правильные.
*{
* * *AI_Output(other,self,"DIA_BigGame_15_09"); * * *//Десятка, разрази меня гром! Я сегодня в ударе.
*}
else if(Game = 11)
*{
* * *AI_Output(other,self,"DIA_BigGame_15_10"); // Одинадцать.(хвастливо) Попробуй кинуть лучше! * * * * * *
*}
else if(Game = 12)
*{
* * *AI_Output(other,self,"DIA_BigGame_15_11"); // Двенадцать.Ха-ха, теперь твои деньги уплывут в мой карман!
*};
};


instance NPC_HGame(C_Info)
{
* * *npc = VLK_454_Buerger;
* * *nr = 3;
* * *condition = PC_HGame_Condition;
* * *information = PC_HGame_Info;
* * *permanent = TRUE;
* * *description = "Моя очередь";
};


func int PC_HGame_Condition()
{
* * *if(Npc_KnowsInfo(other,NPC_Game_Start))
* * *{
* * * * * *return TRUE;
* * *};
};

func void PC_HGame_Info()
{
MyGame = Hlp_Random(12);
if(MyGame <= 2) && (Game > 2)
{
* * *AI_Output(other,self,"DIA_BigGame_16_01"); * * *//Двойка. (усмехается) Тебе невезет приятель.
* * *B_GiveInvItems(other,self,ItMi_Gold,Round);
}
else if(MyGame <= 2) && (Game <= 2)
{
* * *AI_Output(other,self,"DIA_BigGame_17_01"); * * *//Двойка. Ничья.
}
else if(MyGame > 2) && (Game <= 2) || (MyGame = 3) && (Game <= 2) || (MyGame > 3) && (Game <= 3) || (MyGame = 4) && (Game <= 3) *|| (MyGame > 4) && (Game <= 4) * || (MyGame = 5) && (Game <= 4) ||
Ошибка синтаксиса.|| (MyGame > 5) && (Game <= 5) || (MyGame = 6) && (Game <= 5) || (MyGame > 6) && (Game <= 6) || (MyGame = 7) && (Game <= 6) || (MyGame > 7) && (Game <= 7) || (MyGame = 8) && (Game <= 7) || (MyGame > 8) && (Game <= 8) ||
||(MyGame = 9) && (Game <= 8) *||(MyGame > 9) && (Game <= 9) ||(MyGame = 10) && (Game <= 9) ||(MyGame > 10) && (Game <= 10) ||(MyGame = 11) && (Game <= 10) ||(MyGame > 11) && (Game <= 11) || (MyGame = 12) && (Game <= 11)
Здесь не очень хорошо видно, ситуация такова: условие было слишком длинным, и я решил разделить его в три строки. Такое встречается в скриптах готики, однако в данном случае это не сработало. Попытка удаления "лишних палочек" также как попытка написать условие в одну строку, без переносов приводят к вылету программы на рабочий стол.

{
* * *AI_Output(other,self,"DIA_BigGame_16_02"); * * *//Зараза, ты победил!
* * *B_GiveInvItems(self,other,ItMi_Gold,Round);
}

else if(MyGame = 3) && (Game > 3)
{
* * *AI_Output(other,self,"DIA_BigGame_17_02"); * * *//Три очка. * * *Твои деньги стали моими.
* * *B_GiveInvItems(other,self,ItMi_Gold,Round);
}
else if(MyGame = 3) && (Game = 3)
{
* * *AI_Output(other,self,"DIA_BigGame_17_03"); * * *//Ничья.
}

else if(MyGame = 4) && (Game > 4)
{
* * *AI_Output(other,self,"DIA_BigGame_16_03"); * * *//Четыре, гони золотишко.
* *B_GiveInvItems(other,self,ItMi_Gold,Round); * * *
}

else if(MyGame = 4) && (Game = 4)
{
* * *AI_Output(other,self,"DIA_BigGame_17_03"); * * *//Ни тебе, ни мне. Ничья.
}
else if(MyGame = 5) && (Game > 5)
{
* * *AI_Output(other,self,"DIA_BigGame_16_04"); * * *//Пять, золото гони опять. (ржет)
* *B_GiveInvItems(other,self,ItMi_Gold,Round); * * *
}
else if(MyGame = 5) && (Game = 5) || *(MyGame = 6) && (Game = 6)
{
* * *AI_Output(other,self,"DIA_BigGame_16_05"); * * *//Одинаковый результат тоже результат. Вот только карман от него не тяжелеет.
}
else if(MyGame = 6) && (Game > 6)
{
* * *AI_Output(other,self,"DIA_BigGame_16_06"); * * *//Шесть,отличная попытка, но до меня далеко.
* *B_GiveInvItems(other,self,ItMi_Gold,Round); * * *
}
else if(MyGame = 7) && (Game > 7)
{
* * *AI_Output(other,self,"DIA_BigGame_16_07"); * * *//Семь. * * *Хороший бросок,но мой лучше.
* * *B_GiveInvItems(other,self,ItMi_Gold,Round); * * *
}
else if(MyGame = 7) && (MyGame = 7) || (MyGame = 7) && (Game = 7) *|| (MyGame = 8) && (Game = 8) || (MyGame = 9) && (Game = 9) *|| (MyGame = 10) && (Game = 10) || (MyGame = 11) && (Game = 11)
{
* * *AI_Output(other,self,"DIA_BigGame_16_08"); * * *//Однако, счет равный.
}
else if(MyGame = 8) && (Game > 8)
{
* * *AI_Output(other,self,"DIA_BigGame_16_09"); * * *//Восемь. Совсем неплохо. А теперь гони мои деньги. * * *
* * *B_GiveInvItems(other,self,ItMi_Gold,Round); * * *
}
else if(MyGame = 9) && (Game > 9)
{
* * *AI_Output(other,self,"DIA_BigGame_16_10"); * * *//Девять. Для новичка ты хорош, однако удача на моей стороне.
* *B_GiveInvItems(other,self,ItMi_Gold,Round); * * * * * *
}
else if(MyGame = 10) && (Game > 10)
{
* * *AI_Output(other,self,"DIA_BigGame_16_11"); * * *//Десятка.
* * *B_GiveInvItems(other,self,ItMi_Gold,Round); * * *
}
else if(MyGame = 11) && (Game > 11)
{
* * *AI_Output(other,self,"DIA_BigGame_16_12"); // Одинадцать.Ты почти достал меня.
B_GiveInvItems(other,self,ItMi_Gold,Round); * * * * * *
}
else if(MyGame = 12) && (Game = 12)
{
* * *AI_Output(other,self,"DIA_BigGame_16_13"); // Двенадцать! Чтоб тебя! Вот это везение, я уж думал тебе не отвертеться.
}



*

Cпойлер(щелкните, чтобы прочесть):

var C_Item itmpick;

func int C_Beklauen(var C_Item itm,var int TheftGold)
{
     if((Npc_GetTalentSkill(other,NPC_TALENT_PICKPOCKE T) == TRUE) && (self.aivar[AIV_PlayerHasPickedMyPocket] == FALSE) && (NpcObsessedByDMT == FALSE))
     {
           TheftGoldGlob = 0;
           if((Npc_IsInState(self,ZS_Talk)) && (Hlp_IsValidItem(itm)))
           {
                 if((Hlp_IsItem(itm,ItMi_Gold)) || (Hlp_IsItem(itm,ItRw_Arrow)))
                 {
                       TheftGoldGlob = 25 + Hlp_Random(TheftGold);
                 };
                 if(Hlp_IsItem(itm,ItMi_Nugget))
                 {
                       TheftGoldGlob = 1 + Hlp_Random(TheftGold);
                 };
                 if((Npc_HasItems(self,itm) == 0) && (TheftGold < 0))
                 {
                       TheftGoldGlob = 1;
                 };
                 if((TheftGoldGlob > 0) || (Npc_HasItems(self,itm) > 0))
                 {
                       itmpick = Npc_GetInvItem(self,itm);
                       return TRUE;
                 };
                 return FALSE;
           };
     };
     return FALSE;
};