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

func void ZS_Intercept()
{
     Npc_PercEnable(self,PERC_ASSESSPLAYER,B_AssessSCM ad);
     Npc_PercEnable(self,PERC_ASSESSDAMAGE,B_Intercept MadAssessDamage);
     Npc_PercEnable(self,PERC_ASSESSMAGIC,B_InterceptM adAssessMagic);
     Npc_PercEnable(self,PERC_ASSESSCASTER,B_AssessSCM ad);
     Npc_PercEnable(self,PERC_ASSESSTHREAT,B_AssessSCM ad);
     self.senses = SENSE_HEAR | SENSE_SEE;
     self.senses_range = 1300;
     Npc_SetPercTime(self,0.5);
     AI_Standup(self);
     AI_SetWalkMode(self,NPC_WALK);
     AI_GotoWP(self,self.wp);
     AI_AlignToWP(self);
};

func int ZS_Intercept_Loop()
{
     AI_Wait(self,1);
     return LOOP_CONTINUE;
};

func void ZS_Intercept_End()
{
};

func void B_AssessSCMad()
{
     if(Npc_CheckInfo(self,1))
     {
           hero.aivar[AIV_IMPORTANT] = TRUE;
           B_FullStop(self);
           AI_StartState(self,ZS_Talk,1,"");
           return;
     };
};

func void B_InterceptMadAssessDamage()
{
     if(Npc_CheckInfo(self,1))
     {
           hero.aivar[AIV_IMPORTANT] = TRUE;
           B_FullStop(self);
           AI_StartState(self,ZS_Talk,1,"");
           return;
     }
     else
     {
           B_FullStop(self);
           AI_StartState(self,ZS_ReactToDamage,0,"");
     };
};

func void B_InterceptMadAssessMagic()
{
     if(Npc_CheckInfo(self,1))
     {
           hero.aivar[AIV_IMPORTANT] = TRUE;
           B_FullStop(self);
           AI_StartState(self,ZS_Talk,1,"");
           return;
     }
     else
     {
           B_FullStop(self);
           B_AssessMagic();
     };
};

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

instance Info_HighPriest1(C_Info)
{
     npc = ORC_Priest_1;
     nr = 1;
     condition = Info_HighPriest1_Condition;
     information = Info_HighPriest1_Info;
     permanent = 0;
     important = 1;
};


func int Info_HighPriest1_Condition()
{
     return TRUE;
};

func void Info_HighPriest1_Info()
{
     B_SelectWeapon(self,other);
     AI_SetWalkMode(self,NPC_WALK);
     AI_GotoNpc(self,other);
     AI_Output(self,other,"Info_HighPriest1_17_01" );      //СМЕЕЕЕЕЕЕРТНЫЫЫЙ!
     AI_Output(self,other,"Info_HighPriest1_17_02" );      //КАК ОСМЕЕЕЛИЛСЯ ТЫ ПОТРЕВОЖИТЬ МЕНЯ???!!!
     AI_Output(self,other,"Info_HighPriest1_17_03" );      //ГОТОВЬСЯ УМЕРЕТЬ!
     AI_Output(other,self,"Info_HighPriest1_15_04" );      //Мы еще посмотрим, кому нужно готовиться, ты, сгнивший кусок мяса!
     B_LogEntry(CH4_EnterTemple,"Я стою перед Варраг-Нашором, одним из пяти орочьих шаманов, которые привели Спящего в наш мир. Я положу конец его существованию.");
     AI_StopProcessInfos(self);
     Npc_SetAttitude(self,ATT_HOSTILE);
     Npc_SetTempAttitude(self,ATT_HOSTILE);
     Npc_SetTarget(self,hero);
     B_Attack(self,other,AR_NONE,1);
};

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

Npc_SetAttitude(self,ATT_HOSTILE);
Npc_SetTempAttitude(self,ATT_HOSTILE);
Npc_SetTarget(self,hero);
B_Attack(self,other,AR_NONE,1);

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

mkf    = make float
truncf = truncate float
roundf = round float
addf   = add floats
subf   = subtract floats
negf   = negate float
mulf   = multiply floats
divf   = divide floats
invf   = inverse float
gf     = greater
gef    = greater or equal
lf     = lower
lef    = lower or equal
sqrtf  = square root of float
printf = print float

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

//* функция из скрипт пакета ikarus
func void MEMINT_PrepareAssignments() {
   /* sorgt dafьr, dass MEMINT_Assign und MEMINT_StrAssign
    * genau die Funktion von zPAR_OP_IS bzw. zPAR_TOK_ASSIGNSTR
    * erfьllen.
    * Diese Funktion wird nach Start von Gothic genau einmal aufgerufen. */

   var int symTab; var int MEMINT_Assign_Sym; var int MEMINT_Assign_StackPos; var int stackStart;

   //Navigation zum Code dieser Funktionen:
   symTab                  = MEM_ReadInt (ContentParserAddress + zCParser_symtab_table_array_offset);
   stackStart              = MEM_ReadInt (ContentParserAddress + zCParser_stack_offset);
   MEMINT_Assign_Sym       = MEM_ReadInt (symTab + 4 * (MEMINT_AssignPredecessor + 1));
   MEMINT_Assign_StackPos  = MEM_ReadInt (MEMINT_Assign_Sym + zCParSymbol_content_offset);

   //alte Lesemethode braucht Npc
   MEMINT_GetMemHelper();
   var C_NPC othBak;
   othBak = Hlp_GetNpc (other);

   //Code ьberschreiben. Vorsicht: Der erste Aufruf soll auch klappen!
   MEMINT_OldWriteInt (stackStart + MEMINT_Assign_StackPos     , (zPAR_OP_IS          << 0) | (zPAR_TOK_RET       << 8) | (zPAR_TOK_RET << 16) | (zPAR_TOK_RET << 24));
   MEMINT_OldWriteInt (stackStart + MEMINT_Assign_StackPos +  4, (zPAR_TOK_RET        << 0) | (zPAR_OP_IS         << 8) | (zPAR_TOK_RET << 16) | (zPAR_TOK_RET << 24));
   MEMINT_OldWriteInt (stackStart + MEMINT_Assign_StackPos +  8, (zPAR_TOK_ASSIGNSTR  << 0) | (zPAR_TOK_RET       << 8) | (zPAR_TOK_RET << 16) | (zPAR_TOK_RET << 24));
   MEMINT_OldWriteInt (stackStart + MEMINT_Assign_StackPos + 12, (zPAR_TOK_RET        << 0) | (zPAR_TOK_ASSIGNSTR << 8) | (zPAR_TOK_RET << 16) | (zPAR_TOK_RET << 24));

   //alte Lesemethode muss aufrдumen
   MEM_Helper.enemy = 0;
   other = Hlp_GetNpc (othBak);
};

var MEMINT_HelperClass MEMINT_AssignPredecessor;
*/