Показать сообщение отдельно
Старый 20.06.2005, 11:53   #204
Vam

AGFC
Гость
 
Сообщений: n/a

По умолчанию Re: Уроки скриптологии

//--------------------------------------
// Прочитать книгу рун Магов огня (3 круг)
//--------------------------------------
func void Use_Bookstand_Kreise_03_S1()
{
* *var C_Npc her;
* *var int nDocID;
* *her = Hlp_GetNpc(PC_Hero);
* *if(Hlp_GetInstanceID(self) == Hlp_GetInstanceID(her))
* *{
* * * *nDocID = Doc_Create();
* * * *Doc_SetPages * *(nDocID,2);
* * * *Doc_SetPage * * (nDocID,0,"Book_Mage_L.tga",0);
* * * *Doc_SetPage * * (nDocID,1,"Book_Mage_R.tga",0);
* * * *Doc_SetFont * * (nDocID,-1,FONT_Book);
* * * *Doc_SetMargins *(nDocID,0,275,20,30,20,1);
* * * *Doc_PrintLine * (nDocID,0,"DER DRITTE KREIS");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLines *(nDocID,0,"Руны третьего Круга и необходимые для их изготовления ингредиенты: ");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Лечить среднее ранение ");
* * * *Doc_PrintLine * (nDocID,0,"Лечебная трава ");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Малая огненная буря ");
* * * *Doc_PrintLine * (nDocID,0,"Смола");
* * * *Doc_PrintLine * (nDocID,0,"Сера");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Вызвать скелет");
* * * *Doc_PrintLine * (nDocID,0,"Кость скелета");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Страх");
* * * *Doc_PrintLine * (nDocID,0,"Черный жемчуг");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Ледяная глыба ");
* * * *Doc_PrintLine * (nDocID,0,"Кварц");
* * * *Doc_PrintLine * (nDocID,0,"Аквамарин");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Шаровая молния ");
* * * *Doc_PrintLine * (nDocID,0,"Горный хрусталь");
* * * *Doc_PrintLine * (nDocID,0,"Сера");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_SetMargins *(nDocID,-1,30,20,275,20,1);
* * * *Doc_PrintLine * (nDocID,0,"Огненный шар");
* * * *Doc_PrintLine * (nDocID,0,"Смола");
* * * *Doc_PrintLine * (nDocID,0,"Сера");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLines *(nDocID,1,"Для изготовления руны необходим соответственно ОДИН из указанных ингредиентов. ");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Изготовителю должна быть известна формула магии, он должен иметь рунический камень, а также свиток заклинания.");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Только если эти условия выполнены он может приступить к изготовлению руны.");
* * * *Doc_Show * * * *(nDocID);
* *};
};

//--------------------------------------
// Прочитать книгу рун Магов огня (4 круг)
//--------------------------------------
func void Use_Bookstand_Kreise_04_S1()
{
* *var C_Npc her;
* *var int nDocID;
* *her = Hlp_GetNpc(PC_Hero);
* *if(Hlp_GetInstanceID(self) == Hlp_GetInstanceID(her))
* *{
* * * *nDocID = Doc_Create();
* * * *Doc_SetPages * *(nDocID,2);
* * * *Doc_SetPage * * (nDocID,0,"Book_Mage_L.tga",0);
* * * *Doc_SetPage * * (nDocID,1,"Book_Mage_R.tga",0);
* * * *Doc_SetFont * * (nDocID,-1,FONT_Book);
* * * *Doc_SetMargins *(nDocID,0,275,20,30,20,1);
* * * *Doc_PrintLine * (nDocID,0,"DER VIERTE KREIS");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLines *(nDocID,0,"Руны четвертого Круга и необходимые для их изготовления ингредиенты: ");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Большой огненный шар");
* * * *Doc_PrintLine * (nDocID,0,"Сера");
* * * *Doc_PrintLine * (nDocID,0,"Смола");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Удар молнии ");
* * * *Doc_PrintLine * (nDocID,0,"Горный хрусталь");
* * * *Doc_PrintLine * (nDocID,0,"Кварц");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Вызвать голема");
* * * *Doc_PrintLine * (nDocID,0,"Сердце каменного голема");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Уничтожить нежить");
* * * *Doc_PrintLine * (nDocID,0,"Святая вода");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_SetMargins *(nDocID,-1,30,20,275,20,1);
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Для изготовления руны необходим соответственно ОДИН из указанных ингредиентов. ");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Изготовителю должна быть известна формула магии, он должен иметь рунический камень, а также свиток заклинания.");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Только если эти условия выполнены он может приступить к изготовлению руны.");
* * * *Doc_Show * * * *(nDocID);
* *};
};

//--------------------------------------
// Прочитать книгу рун Магов огня (5 круг)
//--------------------------------------
func void Use_Bookstand_Kreise_05_S1()
{
* *var C_Npc her;
* *var int nDocID;
* *her = Hlp_GetNpc(PC_Hero);
* *if(Hlp_GetInstanceID(self) == Hlp_GetInstanceID(her))
* *{
* * * *nDocID = Doc_Create();
* * * *Doc_SetPages * *(nDocID,2);
* * * *Doc_SetPage * * (nDocID,0,"Book_Mage_L.tga",0);
* * * *Doc_SetPage * * (nDocID,1,"Book_Mage_R.tga",0);
* * * *Doc_SetFont * * (nDocID,-1,FONT_Book);
* * * *Doc_SetMargins *(nDocID,0,275,20,30,20,1);
* * * *Doc_PrintLine * (nDocID,0,"DER FЬNFTE KREIS");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLines *(nDocID,0,"Руны пятого Круга и необходимые для их изготовления ингредиенты: ");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Ледяная волна ");
* * * *Doc_PrintLine * (nDocID,0,"Кварц");
* * * *Doc_PrintLine * (nDocID,0,"Аквамарин");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Большая огненная буря ");
* * * *Doc_PrintLine * (nDocID,0,"Сера");
* * * *Doc_PrintLine * (nDocID,0,"Огненный язык");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Вызвать демона");
* * * *Doc_PrintLine * (nDocID,0,"Сердце демона");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Лечить сильное ранение ");
* * * *Doc_PrintLine * (nDocID,0,"Лечебный корень");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_SetMargins *(nDocID,-1,30,20,275,20,1);
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Для изготовления руны необходим соответственно ОДИН из указанных ингредиентов. ");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Изготовителю должна быть известна формула магии, он должен иметь рунический камень, а также свиток заклинания.");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Только если эти условия выполнены он может приступить к изготовлению руны.");
* * * *Doc_Show * * * *(nDocID);
* *};
};

//--------------------------------------
// Прочитать книгу рун Магов огня (6 круг)
//--------------------------------------
func void Use_Bookstand_Kreise_06_S1()
{
* *var C_Npc her;
* *var int nDocID;
* *her = Hlp_GetNpc(PC_Hero);
* *if(Hlp_GetInstanceID(self) == Hlp_GetInstanceID(her))
* *{
* * * *nDocID = Doc_Create();
* * * *Doc_SetPages * *(nDocID,2);
* * * *Doc_SetPage * * (nDocID,0,"Book_Mage_L.tga",0);
* * * *Doc_SetPage * * (nDocID,1,"Book_Mage_R.tga",0);
* * * *Doc_SetFont * * (nDocID,-1,FONT_Book);
* * * *Doc_SetMargins *(nDocID,0,275,20,30,20,1);
* * * *Doc_PrintLine * (nDocID,0,"DER SECHSTE KREIS");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLines *(nDocID,0,"Руны шестого Круга и необходимые для их изготовления ингредиенты: ");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Огненный дождь");
* * * *Doc_PrintLine * (nDocID,0,"Смола");
* * * *Doc_PrintLine * (nDocID,0,"Сера");
* * * *Doc_PrintLine * (nDocID,0,"Огненный язык");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Дым смерти");
* * * *Doc_PrintLine * (nDocID,0,"Уголь");
* * * *Doc_PrintLine * (nDocID,0,"Черный жемчуг");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Волна смерти ");
* * * *Doc_PrintLine * (nDocID,0,"Кость скелета");
* * * *Doc_PrintLine * (nDocID,0,"Черный жемчуг");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLine * (nDocID,0,"Армия мрака");
* * * *Doc_PrintLine * (nDocID,0,"Кость скелета");
* * * *Doc_PrintLine * (nDocID,0,"Черный жемчуг");
* * * *Doc_PrintLine * (nDocID,0,"Сердце каменного голема");
* * * *Doc_PrintLine * (nDocID,0,"Сердце демона");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_SetMargins *(nDocID,-1,30,20,275,20,1);
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLine * (nDocID,1,"Уменьшить монстра");
* * * *Doc_PrintLine * (nDocID,1,"Кость гоблина");
* * * *Doc_PrintLine * (nDocID,1,"Клык тролля");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Для изготовления руны необходим соответственно ОДИН из указанных ингредиентов. ");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Изготовителю должна быть известна формула магии, он должен иметь рунический камень, а также свиток заклинания.");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"Только если эти условия выполнены он может приступить к изготовлению руны.");
* * * *Doc_Show * * * *(nDocID);
* *};
};

//--------------------------------------
// (не используется)
//--------------------------------------
func void Use_Bookstand_Rules_01_S1()
{
* *var C_Npc her;
* *var int nDocID;
* *her = Hlp_GetNpc(PC_Hero);
* *if(Hlp_GetInstanceID(self) == Hlp_GetInstanceID(her))
* *{
* * * *nDocID = Doc_Create();
* * * *Doc_SetPages * *(nDocID,2);
* * * *Doc_SetPage * * (nDocID,0,"Book_Mage_L.tga",0);
* * * *Doc_SetPage * * (nDocID,1,"Book_Mage_R.tga",0);
* * * *Doc_SetFont * * (nDocID,-1,FONT_Book);
* * * *Doc_SetMargins *(nDocID,0,275,20,30,20,1);
* * * *Doc_PrintLine * (nDocID,0,"Страница 1");
* * * *Doc_PrintLine * (nDocID,0,"Правила");
* * * *Doc_PrintLine * (nDocID,0,"");
* * * *Doc_PrintLines *(nDocID,0,"");
* * * *Doc_SetMargins *(nDocID,-1,30,20,275,20,1);
* * * *Doc_PrintLine * (nDocID,1,"Страница 2");
* * * *Doc_PrintLine * (nDocID,1,"");
* * * *Doc_PrintLines *(nDocID,1,"");
* * * *Doc_Show * * * *(nDocID);
* *};
};

Ответить с цитированием