Тема: М: Уроки скриптологии
Показать сообщение отдельно
Старый 09.08.2005, 09:16   #226
Vam

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

По умолчанию Re: Уроки скриптологии
* *6. Функции входа в Яркендар.

Файл B_Enter_AddonWorld.d

// Вход в Яркендар в Главе 1
func void B_ENTER_ADDONWORLD_Kapitel_1()
{
* *// если Равен убит
* *if(RavenIsDead == TRUE)
* *{
* * * *// удалить Миксира из Яркендара
* * * *B_RemoveNpc(KDW_14030_Addon_Myxir_ADW);
* *};
* *// если Пропавшие люди найдены и не удалены из Яркендара
* *if(Sklaven_weg == TRUE) && (RemoveSklaven == FALSE)
* *{ *
* * * *// удалить найденных людей
* * * *B_RemoveNpc(STRF_1118_Addon_Patrick);
* * * *B_RemoveNpc(STRF_1119_Addon_Monty);
* * * *B_RemoveNpc(STRF_1120_Addon_Tonak);
* * * *B_RemoveNpc(STRF_1121_Addon_Telbor);
* * * *B_RemoveNpc(STRF_1122_Addon_Pardos);
* * * *// установить флаг удаления
* * * *RemoveSklaven = TRUE;
* *};
};

// Вход в Яркендар в Главе 2
// Примечание: функция не используется, можно удалить вместе с флагом

var int EnterADW_Kapitel2; *// флаг одноразовости

func void B_ENTER_ADDONWORLD_Kapitel_2()
{
* *if(EnterADW_Kapitel2 == FALSE)
* *{
* * * *EnterADW_Kapitel2 = TRUE;
* *};
};

// Вход в Яркендар в Главе 3
// Примечание: функция не используется, можно удалить вместе с флагом

var int EnterADW_Kapitel3; *// флаг одноразовости

func void B_ENTER_ADDONWORLD_Kapitel_3()
{
* *if (EnterADW_Kapitel3 == FALSE)
* *{
* * * *EnterADW_Kapitel3 = TRUE;
* *};
};

// Вход в Яркендар в Главе 4

var int EnterADW_Kapitel4; *// флаг одноразовости

func void B_ENTER_ADDONWORLD_Kapitel_4()
{
* *if(EnterADW_Kapitel4 == FALSE)
* *{
* * * *// респавн живности
* * * *Wld_InsertNpc(Giant_DesertRat,"ADW_CANYON_TELEPOR T_PATH_03");
* * * *Wld_InsertNpc(Giant_DesertRat,"ADW_CANYON_TELEPOR T_PATH_03");
* * * *Wld_InsertNpc(Giant_DesertRat,"ADW_CANYON_TELEPOR T_PATH_04");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_PATH_TO_L IBRARY_36");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_PATH_TO_L IBRARY_36");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_PATH_TO_B ANDITS_31");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_PATH_TO_M INE2_04");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_PATH_TO_M INE2_04");
* * * *Wld_InsertNpc(Troll,"ADW_CANYON_ORCS_02");
* * * *Wld_InsertNpc(Troll,"ADW_CANYON_PATH_TO_MINE2_09" );
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_PATH_TO_M INE2_06");
* * * *Wld_InsertNpc(MinecrawlerWarrior,"ADW_CANYON_PATH _TO_BANDITS_26");
* * * *Wld_InsertNpc(MinecrawlerWarrior,"ADW_CANYON_PATH _TO_BANDITS_24");
* * * *Wld_InsertNpc(MinecrawlerWarrior,"ADW_CANYON_PATH _TO_BANDITS_66");
* * * *Wld_InsertNpc(SkeletonMage,"ADW_CANYON_LIBRARY_ST ONIE_01");
* * * *Wld_InsertNpc(Skeleton,"ADW_CANYON_LIBRARY_STONIE _02");
* * * *Wld_InsertNpc(Skeleton,"ADW_CANYON_LIBRARY_STONIE _03");
* * * *Wld_InsertNpc(Skeleton,"ADW_CANYON_LIBRARY_STONIE _04");
* * * *Wld_InsertNpc(Skeleton,"ADW_CANYON_LIBRARY_STONIE _05");
* * * *Wld_InsertNpc(FireWaran,"ADW_ENTRANCE_2_VALLEY_05 ");
* * * *Wld_InsertNpc(Waran,"ADW_ENTRANCE_2_VALLEY_11");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_ENTRANCE_PATH2BA NDITS_10");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_ENTRANCE_BEHINDA KROPOLIS_04");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_ENTRANCE_BEHINDA KROPOLIS_04");
* * * *Wld_InsertNpc(Swamprat,"ADW_ENTRANCE_PATH2BANDITS _03");
* * * *Wld_InsertNpc(SkeletonMage,"ADW_PORTALTEMPEL_08B" );
* * * *Wld_InsertNpc(Skeleton,"ADW_PORTALTEMPEL_08A");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_ENTRANCE_2_PIRAT ECAMP_22");
* * * *Wld_InsertNpc(Swampshark,"ADW_SWAMP_SHARKSTREET_0 2");
* * * *Wld_InsertNpc(Swampshark,"ADW_SWAMP_SHARKSTREET_0 7");
* * * *Wld_InsertNpc(Swampshark,"ADW_SWAMP_SHARKSTREET_0 9");
* * * *Wld_InsertNpc(Swampshark,"ADW_SWAMP_SHARKSTREET_1 0");
* * * *Wld_InsertNpc(SwampGolem,"ADW_SWAMP_LITTLE_SEA_01 ");
* * * *Wld_InsertNpc(Bloodfly,"ADW_SWAMP_LITTLE_SEA_01") ;
* * * *Wld_InsertNpc(SwampGolem,"ADW_SWAMP_LITTLE_SEA_02 ");
* * * *Wld_InsertNpc(Bloodfly,"ADW_SWAMP_LITTLE_SEA_02") ;
* * * *Wld_InsertNpc(SwampGolem,"ADW_SWAMP_LITTLE_SEA_03 ");
* * * *Wld_InsertNpc(Bloodfly,"ADW_SWAMP_LITTLE_SEA_03") ;
* * * *Wld_InsertNpc(MayaZombie01,"ADW_PFUETZE_01");
* * * *Wld_InsertNpc(MayaZombie02,"ADW_PFUETZE_02");
* * * *Wld_InsertNpc(MayaZombie03,"ADW_PFUETZE_03");
* * * *Wld_InsertNpc(MayaZombie04,"ADW_PFUETZE_04");
* * * *Wld_InsertNpc(MayaZombie04,"ADW_BANDIT_VP1_07_D") ;
* * * *Wld_InsertNpc(MayaZombie01,"ADW_BANDIT_VP1_07_E") ;
* * * *Wld_InsertNpc(MayaZombie02,"ADW_BANDIT_VP1_07_F") ;
* * * *Wld_InsertNpc(MayaZombie03,"ADW_SWAMP_LITTLE_SEA_ 03_B");
* * * *Wld_InsertNpc(MayaZombie04,"ADW_SWAMP_09_C");
* * * *Wld_InsertNpc(SwampGolem,"ADW_SWAMP_10");
* * * *Wld_InsertNpc(SwampGolem,"ADW_SWAMP_13");
* * * *Wld_InsertNpc(SwampGolem,"ADW_SWAMP_14");
* * * *Wld_InsertNpc(Swampshark,"ADW_SWAMP_HOHLWEG_03");
* * * *Wld_InsertNpc(Swampshark,"ADW_SWAMP_HOHLWEG_04");
* * * *Wld_InsertNpc(Skeleton,"ADW_SENAT_SIDE_01");
* * * *Wld_InsertNpc(Skeleton,"ADW_SENAT_SIDE_02");
* * * *Wld_InsertNpc(MayaZombie04,"ADW_SENAT_SIDE_03");
* * * *Wld_InsertNpc(Skeleton,"ADW_SENAT_GUARDIAN_01");
* * * *Wld_InsertNpc(MayaZombie01,"ADW_SENAT_GUARDIAN_02 ");
* * * *Wld_InsertNpc(SwampDrone,"ADW_SWAMP_HILLS_DOWN_03 ");
* * * *Wld_InsertNpc(SwampDrone,"ADW_SWAMP_15");
* * * *Wld_InsertNpc(Swamprat,"ADW_HOHLWEG_CENTER");
* * * *Wld_InsertNpc(SwampGolem,"FP_ROAM_BF_NEST_26");
* * * *Wld_InsertNpc(Swamprat,"ADW_BANDITSCAMP_RAKEPLACE _03");
* * * *Wld_InsertNpc(SwampDrone,"ADW_CANYON_PATH_TO_BAND ITS_02");
* * * *Wld_InsertNpc(SwampDrone,"ADW_PFUETZE_02");
* * * *Wld_InsertNpc(SwampDrone,"ADW_SWAMP_LOCH_05");
* * * *Wld_InsertNpc(SwampDrone,"ADW_SWAMP_LOCH_06");
* * * *Wld_InsertNpc(Demon,"ADW_PIRATECAMP_LONEBEACH_CAV E_03");
* * * *Wld_InsertNpc(FireWaran,"ADW_PIRATECAMP_LONEBEACH _05");
* * * *Wld_InsertNpc(Lurker,"ADW_PIRATECAMP_WATERHOLE_04 ");
* * * *Wld_InsertNpc(Gobbo_Warrior_Visir,"ADW_VALLEY_BIG CAVE_06");
* * * *Wld_InsertNpc(Gobbo_Warrior,"ADW_VALLEY_BIGCAVE_0 6");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_VALLEY_BIGCAVE_1 5");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_VALLEY_PATH_110" );
* * * *Wld_InsertNpc(DragonSnapper,"ADW_VALLEY_PATH_110" );
* * * *Wld_InsertNpc(Warg,"ADW_ENTRANCE_2_PIRATECAMP_13" );
* * * *Wld_InsertNpc(Warg,"ADW_ENTRANCE_2_PIRATECAMP_13" );
* * * *Wld_InsertNpc(Gobbo_Warrior_Visir,"ADW_ENTRANCE_2 _PIRATECAMP_13");
* * * *Wld_InsertNpc(Gobbo_Warrior,"ADW_ENTRANCE_2_PIRAT ECAMP_13");
* * * *Wld_InsertNpc(Gobbo_Warrior_Visir,"ADW_ENTRANCE_2 _PIRATECAMP_13");
* * * *Wld_InsertNpc(Gobbo_Warrior,"ADW_ENTRANCE_2_PIRAT ECAMP_13");
* * * *Wld_InsertNpc(Gobbo_Warrior_Visir,"ADW_ENTRANCE_2 _VALLEY_10");
* * * *Wld_InsertNpc(Gobbo_Warrior,"ADW_ENTRANCE_2_VALLE Y_10");
* * * *Wld_InsertNpc(Gobbo_Warrior,"ADW_ENTRANCE_2_VALLE Y_10");
* * * *Wld_InsertNpc(Gobbo_Warrior,"ADW_ENTRANCE_2_VALLE Y_10");
* * * *Wld_InsertNpc(Gobbo_Warrior,"ADW_ENTRANCE_2_VALLE Y_02A");
* * * *Wld_InsertNpc(Gobbo_Warrior,"ADW_ENTRANCE_2_VALLE Y_02A");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_VALLEY_PATH_020" );
* * * *Wld_InsertNpc(DragonSnapper,"ADW_VALLEY_BIGCAVE_0 1");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_VALLEY_PATH_048_ A");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_VALLEY_PATH_047_ D");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_VALLEY_PATH_047_ D");
* * * *Wld_InsertNpc(Scavenger_Demon,"ADW_VALLEY_PATH_04 7_G");
* * * *Wld_InsertNpc(Scavenger_Demon,"ADW_VALLEY_PATH_04 7_G");
* * * *Wld_InsertNpc(Scavenger_Demon,"ADW_VALLEY_PATH_03 8_E");
* * * *Wld_InsertNpc(Scavenger_Demon,"ADW_VALLEY_PATH_03 8_E");
* * * *Wld_InsertNpc(Scavenger_Demon,"ADW_VALLEY_PATH_03 8_J");
* * * *Wld_InsertNpc(SkeletonMage,"ADW_VALLEY_PATH_131") ;
* * * *Wld_InsertNpc(SkeletonMage,"ADW_VALLEY_PATH_132_A ");
* * * *Wld_InsertNpc(Skeleton,"ADW_VALLEY_PATH_132_A");
* * * *Wld_InsertNpc(Skeleton,"ADW_VALLEY_PATH_134");
* * * *Wld_InsertNpc(Skeleton,"ADW_VALLEY_PATH_134");
* * * *Wld_InsertNpc(Skeleton,"ADW_VALLEY_PATH_135");
* * * *Wld_InsertNpc(Shadowbeast_Addon_Fire,"ADW_VALLEY_ PATH_072");
* * * *Wld_InsertNpc(Skeleton,"ADW_VALLEY_PATH_072");
* * * *Wld_InsertNpc(Skeleton,"ADW_VALLEY_PATH_073");
* * * *Wld_InsertNpc(Shadowbeast_Addon_Fire,"ADW_VALLEY_ PATH_072");
* * * *Wld_InsertNpc(Skeleton,"ADW_VALLEY_PATH_073");
* * * *Wld_InsertNpc(Skeleton,"ADW_VALLEY_PATH_073");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_PATH_TO_M INE1_05");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_PATH_TO_M INE1_05");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_MINE1_01" );
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_MINE1_01" );
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_MINE1_01" );
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_PATH_TO_L IBRARY_31A");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_CANYON_PATH_TO_L IBRARY_31A");
* * * *Wld_InsertNpc(FireWaran,"ADW_CANYON_PATH_TO_BANDI TS_55");
* * * *Wld_InsertNpc(FireWaran,"ADW_CANYON_PATH_TO_BANDI TS_55");
* * * *Wld_InsertNpc(OrcBiter,"ADW_CANYON_PATH_TO_BANDIT S_52");
* * * *Wld_InsertNpc(OrcBiter,"ADW_CANYON_PATH_TO_BANDIT S_52");
* * * *Wld_InsertNpc(Troll,"ADW_CANYON_PATH_TO_LIBRARY_1 7");
* * * *Wld_InsertNpc(Troll,"ADW_CANYON_PATH_TO_LIBRARY_1 6A");
* * * *Wld_InsertNpc(OrcBiter,"ADW_CANYON_ORCS_09");
* * * *Wld_InsertNpc(OrcBiter,"ADW_CANYON_ORCS_09");
* * * *Wld_InsertNpc(FireWaran,"ADW_CANYON_PATH_TO_LIBRA RY_07A");
* * * *Wld_InsertNpc(FireWaran,"ADW_CANYON_PATH_TO_LIBRA RY_07A");
* * * *Wld_InsertNpc(Blattcrawler,"ADW_CANYON_TELEPORT_P ATH_09");
* * * *Wld_InsertNpc(Blattcrawler,"ADW_CANYON_TELEPORT_P ATH_09");
* * * *Wld_InsertNpc(Blattcrawler,"ADW_CANYON_TELEPORT_P ATH_09");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_ENTRANCE_PATH2BA NDITS_05P");
* * * *Wld_InsertNpc(DragonSnapper,"ADW_ENTRANCE_PATH2BA NDITS_05P");
* * * *Wld_InsertNpc(SwampGolem,"ADW_ENTRANCE_PATH2BANDI TS_05");
* * * *Wld_InsertNpc(Troll,"ADW_CANYON_PATH_TO_BANDITS_2 0");
* * * *Wld_InsertNpc(MinecrawlerWarrior,"ADW_CANYON_PATH _TO_BANDITS_21");
* * * *Wld_InsertNpc(MinecrawlerWarrior,"ADW_CANYON_PATH _TO_BANDITS_17");
* * * *Wld_InsertNpc(MinecrawlerWarrior,"ADW_CANYON_PATH _TO_BANDITS_14");
* * * *Wld_InsertNpc(MinecrawlerWarrior,"ADW_CANYON_PATH _TO_BANDITS_62");
* * * *Wld_InsertNpc(MinecrawlerWarrior,"ADW_CANYON_PATH _TO_BANDITS_19");
* * * *EnterADW_Kapitel4 = TRUE;
* *};
};

// Вход в Яркендар в Главе 5
// Примечание: функция не используется, можно удалить вместе с флагом

var int EnterADW_Kapitel5; *// флаг одноразовости

func void B_ENTER_ADDONWORLD_Kapitel_5()
{
* *if (EnterADW_Kapitel5 == FALSE)
* *{
* * * *EnterADW_Kapitel5 = TRUE;
* *};
};

// Вход в Яркендар в Главе 6
// Примечание: функция не используется, можно удалить вместе с флагом

var int EnterADW_Kapitel6; *// флаг одноразовости

func void B_ENTER_ADDONWORLD_Kapitel_6()
{
* *if (EnterADW_Kapitel6 == FALSE)
* *{
* * * *EnterADW_Kapitel6 = TRUE;
* *};
};

// Общая функция входа в Яркендар
func void B_ENTER_ADDONWORLD() *
{
* *// инициализация глобальных НПС
* *B_InitNpcGlobals();
* *// в зависимости от главы вызвать соответствующую функцию
* *if(Kapitel >= 1) * *{ B_ENTER_ADDONWORLD_Kapitel_1(); };
* *if(Kapitel >= 2) * *{ B_ENTER_ADDONWORLD_Kapitel_2(); };
* *if(Kapitel >= 3) * *{ B_ENTER_ADDONWORLD_Kapitel_3(); };
* *if(Kapitel >= 4) * *{ B_ENTER_ADDONWORLD_Kapitel_4(); };
* *if(Kapitel >= 5) * *{ B_ENTER_ADDONWORLD_Kapitel_5(); };
* *if(Kapitel >= 6) * *{ B_ENTER_ADDONWORLD_Kapitel_6(); };
* *CurrentLevel = ADDONWORLD_ZEN;
* *// инициализация глобальных НПС (уже было, можно удалить)
* *B_InitNpcGlobals();
};


* *7. Функции инициализации Острова Драконов.

Файл B_Enter_DragonIsland.d

// Расстановка живности на карте острова
func void STARTUP_NEWWORLD_PART_DRAGON_ISLAND_01()
{
* *Wld_InsertNpc(FireWaran,"FP_ROAM_DI_WARAN_01");
* *Wld_InsertNpc(FireWaran,"FP_ROAM_DI_WARAN_02");
* *Wld_InsertNpc(FireWaran,"FP_ROAM_DI_WARAN_03");
* *Wld_InsertNpc(Troll_DI,"DI_ORKAREA_TROLL");
* *Wld_InsertItem(ItMi_DarkPearl,"FP_ITEM_DI_ENTER_0 3");
* *Wld_InsertItem(ItMi_Sulfur,"FP_ITEM_DI_ENTER_07") ;
* *Wld_InsertItem(ItWr_ZugBruecke_MIS,"FP_ITEM_DI_EN TER_09");
* *Wld_InsertNpc(OrcWarrior_Rest,"FP_ROAM_DI_ORK_01" );
* *Wld_InsertNpc(OrcWarrior_Rest,"FP_ROAM_DI_ORK_02" );
* *Wld_InsertNpc(Warg,"FP_ROAM_DI_ORK_03");
* *Wld_InsertNpc(OrcElite_Rest,"FP_ROAM_DI_ORK_04");
* *Wld_InsertNpc(OrcShaman_Sit,"FP_ROAM_DI_ORK_05");
* *Wld_InsertNpc(Warg,"FP_ROAM_DI_ORK_06");
* *Wld_InsertNpc(OrcWarrior_Rest,"FP_ROAM_DI_ORK_07" );
* *Wld_InsertNpc(OrcElite_Rest,"FP_ROAM_DI_ORK_08");
* *Wld_InsertNpc(OrcWarrior_Rest,"FP_ROAM_DI_ORK_09" );
* *Wld_InsertNpc(Warg,"FP_ROAM_DI_ORK_11");
* *Wld_InsertNpc(OrcElite_Rest,"FP_ROAM_DI_ORK_14");
* *Wld_InsertNpc(OrcShaman_Sit,"FP_ROAM_DI_ORK_15");
* *Wld_InsertNpc(OrcElite_Rest,"FP_ROAM_DI_ORK_16");
* *Wld_InsertNpc(Warg,"FP_ROAM_DI_ORK_17");
* *Wld_InsertNpc(Warg,"FP_ROAM_DI_ORK_18");
* *Wld_InsertNpc(OrcWarrior_Rest,"FP_ROAM_DI_ORK_19" );
* *Wld_InsertNpc(OrcShaman_Sit,"FP_ROAM_DI_ORK_20");
* *Wld_InsertNpc(OrcElite_Rest,"FP_ROAM_DI_ORK_21");
* *Wld_InsertNpc(OrcElite_Rest,"FP_ROAM_DI_ORK_22");
* *Wld_InsertNpc(OrcElite_Rest,"FP_ROAM_DI_ORK_23");
* *Wld_InsertNpc(OrcWarrior_Roam,"FP_ROAM_DI_ORK_28" );
* *Wld_InsertNpc(OrcElite_Roam,"FP_ROAM_DI_ORK_29");
* *Wld_InsertNpc(OrcWarrior_Roam,"FP_ROAM_DI_ORK_30" );
* *Wld_InsertNpc(OrcElite_Roam,"FP_ROAM_DI_ORK_33");
* *Wld_InsertNpc(OrcElite_Roam,"FP_ROAM_DI_ORK_34");
* *Wld_InsertNpc(OrcWarrior_Roam,"FP_ROAM_DI_ORK_35" );
* *Wld_InsertNpc(Warg,"FP_ROAM_DI_ORK_12");
* *Wld_InsertNpc(OrcShaman_Sit,"FP_ROAM_DI_ORK_13");
* *Wld_InsertNpc(OrkElite_AntiPaladinOrkOberst_DI,"D I_ORKOBERST");
* *Wld_InsertNpc(OrcElite_DIOberst1_Rest,"FP_ROAM_DI _ORK_24");
* *Wld_InsertNpc(OrcElite_DIOberst2_Rest,"FP_ROAM_DI _ORK_26");
* *Wld_InsertNpc(OrcElite_DIOberst3_Rest,"FP_ROAM_DI _ORK_27");
* *Wld_InsertNpc(DMT_DementorAmbientSpeaker,"DI_ORKA REA_24");
* *Wld_InsertNpc(DMT_DementorAmbientSpeaker,"DI_DRAC ONIANAREA_22");
* *Wld_InsertNpc(DMT_DementorAmbientSpeaker,"DI_DRAC ONIANAREA_08");
* *Wld_InsertNpc(Dragon_Fire_Island,"DI_DRACONIANARE A_FIREDRAGON");
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_01" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_02" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_03" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_04" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_05" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_06" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_07" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_08" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_09" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_10" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_11" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_12" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_13" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_14" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_15" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_16" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_17" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_18" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_19" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_20" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_21" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_22" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_23" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_24" );
* *Wld_InsertNpc(Draconian,"FP_ROAM_DI_DRACONIAN_25" );
};

// INIT_ секция - инициализация Острова (не будет ниоткуда вызвана, можно удалить)
func void INIT_NEWWORLD_PART_DRAGON_ISLAND_01()
{
* *B_InitMonsterAttitudes();
* *B_InitGuildAttitudes();
* *B_InitNpcGlobals();
};

// Расстановка живности в Пещерах
func void STARTUP_NEWWORLD_PART_DRAGON_UNDEAD_01()
{
* *Wld_InsertItem(ItWr_Rezept_MegaDrink_MIS,"FP_ITEM _DI_BLACKNOV_01");
* *Wld_InsertItem(ItWr_Diary_BlackNovice_MIS,"FP_ITE M_DI_BLACKNOV_02");
* *Wld_InsertNpc(Skeleton_Lord_Archol,"DI_ARCHOL");
* *Wld_InsertNpc(Skeleton_Archol1,"DI_ARCHOL_SKELETO N_01");
* *Wld_InsertNpc(Skeleton_Archol2,"DI_ARCHOL_SKELETO N_02");
* *Wld_InsertNpc(Skeleton_Archol3,"DI_ARCHOL_SKELETO N_03");
* *Wld_InsertNpc(Skeleton_Archol4,"DI_ARCHOL_SKELETO N_04");
* *Wld_InsertNpc(Skeleton_Archol5,"DI_ARCHOL_SKELETO N_05");
* *Wld_InsertNpc(Skeleton_Archol6,"DI_ARCHOL_SKELETO N_06");
* *Wld_InsertNpc(DMT_DementorAmbient,"DI_DRACONIANAR EA_53");
* *Wld_InsertNpc(DMT_DementorAmbient,"DI_DRACONIANAR EA_52");
* *Wld_InsertNpc(Lesser_Skeleton,"DI_DRACONIANAREA_5 5");
* *Wld_InsertNpc(Lesser_Skeleton,"DI_DRACONIANAREA_5 5");
* *Wld_InsertNpc(Skeleton,"DI_DRACONIANAREA_56");
* *Wld_InsertNpc(Lesser_Skeleton,"DI_DRACONIANAREA_5 6");
* *Wld_InsertNpc(Skeleton,"DI_DRACONIANAREA_51");
* *Wld_InsertNpc(Lesser_Skeleton,"DI_DRACONIANAREA_5 1");
* *Wld_InsertNpc(Skeleton,"DI_DRACONIANAREA_51");
* *Wld_InsertNpc(Shadowbeast_Skeleton,"WP_UNDEAD_SPA WN_POINT_01");
* *Wld_InsertNpc(Skeleton_Lord,"WP_UNDEAD_LEFT_DOWN_ 06");
* *Wld_InsertNpc(OrcElite_Rest,"WP_UNDEAD_SPAWN_POIN T_02");
* *Wld_InsertNpc(OrcElite_Rest,"WP_UNDEAD_SPAWN_POIN T_03");
* *Wld_InsertNpc(OrcShaman_Sit,"WP_UNDEAD_SPAWN_POIN T_04");
* *Wld_InsertNpc(Zombie01,"WP_UNDEAD_SPAWN_POINT_05" );
* *Wld_InsertNpc(Zombie02,"WP_UNDEAD_SPAWN_POINT_06" );
* *Wld_InsertNpc(Zombie03,"WP_UNDEAD_SPAWN_POINT_07" );
* *Wld_InsertNpc(Zombie04,"WP_UNDEAD_SPAWN_POINT_08" );
* *Wld_InsertNpc(Skeleton,"DRAGONISLAND_UNDEAD_04_01 ");
* *Wld_InsertNpc(Skeleton,"DRAGONISLAND_UNDEAD_04_02 ");
* *Wld_InsertNpc(Skeleton,"DRAGONISLAND_UNDEAD_08_01 ");
* *Wld_InsertNpc(Skeleton_Lord,"DRAGONISLAND_UNDEAD_ 08_02");
* *Wld_InsertNpc(Skeleton_Lord,"DRAGONISLAND_UNDEAD_ 08_03");
* *Wld_InsertNpc(Skeleton,"DRAGONISLAND_UNDEAD_08_04 ");
};

// INIT_ секция - инициализация Пещер (не будет ниоткуда вызвана, можно удалить)
func void INIT_NEWWORLD_PART_DRAGON_UNDEAD_01()
{
* *B_InitMonsterAttitudes();
* *B_InitGuildAttitudes();
* *B_InitNpcGlobals();
};

// Расстановка живности в Залах Ирдората
func void STARTUP_NEWWORLD_PART_DRAGON_FINAL_01()
{
* *Wld_InsertNpc(DMT_DementorAmbientWalker_DI_01,"DI _UNDEADDRAGONTEMPEL_01");
* *Wld_InsertNpc(DMT_DementorAmbientWalker_DI_02,"DI _UNDEADDRAGONTEMPEL_01");
* *Wld_InsertNpc(DMT_DementorAmbientWalker_DI_03,"DI _UNDEADDRAGONTEMPEL_01");
* *Wld_InsertNpc(DMT_DementorAmbientWalker_DI_04,"DI _UNDEADDRAGONTEMPEL_01");
* *Wld_InsertNpc(DMT_DementorAmbientWalker_DI_05,"DI _UNDEADDRAGONTEMPEL_01");
* *Wld_InsertNpc(DMT_DementorAmbientWalker_DI_06,"DI _UNDEADDRAGONTEMPEL_01");
* *Wld_InsertNpc(DMT_DementorAmbient,"DI_UNDEADDRAGO NTEMPEL_20");
* *Wld_InsertNpc(DMT_DementorAmbient,"DI_UNDEADDRAGO NTEMPEL_23");
* *Wld_InsertNpc(DMT_1299_OberDementor_DI,"DI_SCHWAR ZMAGIER");
* *Wld_InsertNpc(Dragon_Undead,"DI_UNDEADDRAGON");
* *Wld_InsertNpc(UndeadOrcWarrior,"DI_UNDEADDRAGON_T RAP_01");
* *Wld_InsertNpc(UndeadOrcWarrior,"DI_UNDEADDRAGON_T RAP_02");
* *Wld_InsertNpc(UndeadOrcWarrior,"DI_UNDEADDRAGON_T RAP_03");
};

// INIT_ секция - инициализация Залов Ирдората (не будет ниоткуда вызвана, можно удалить)
func void INIT_NEWWORLD_PART_DRAGON_FINAL_01()
{
* *B_InitMonsterAttitudes();
* *B_InitGuildAttitudes();
* *B_InitNpcGlobals();
};

// STARTUP_ секция Острова Драконов
func void STARTUP_DRAGONISLAND()
{
* *// вставка капитана корабля
* *if(JorgenIsCaptain == TRUE) // Йорген
* *{
* * * *Wld_InsertNpc(VLK_4250_Jorgen_DI,"SHIP_DECK_01");
* *};
* *if(TorlofIsCaptain == TRUE) // Торлоф
* *{
* * * *Wld_InsertNpc(SLD_801_Torlof_DI,"SHIP_DECK_01");
* *};
* *if(JackIsCaptain == TRUE) * // Джек
* *{
* * * *Wld_InsertNpc(VLK_444_Jack_DI,"SHIP_DECK_01");
* *};
* *// размещение команды на корабле
* *if(Lee_IsOnBoard == LOG_SUCCESS) * * * *// Ли
* *{
* * * *Wld_InsertNpc(SLD_800_Lee_DI,"SHIP_DECK_01");
* *};
* *if(MiltenNW_IsOnBoard == LOG_SUCCESS) * // Мильтон
* *{
* * * *Wld_InsertNpc(PC_Mage_DI,"SHIP_DECK_01");
* * * *// если Лестера на корабле нет
* * * *if(Lester_IsOnBoard != LOG_SUCCESS)
* * * *{
* * * * * *// Мильтон сидит на лавке
* * * * * *B_StartOtherRoutine(PC_Mage_DI,"SittingShipDI");
* * * *};
* *};
* *if(Lester_IsOnBoard == LOG_SUCCESS) * * // Лестер
* *{
* * * *Wld_InsertNpc(PC_Psionic_DI,"SHIP_DECK_01");
* * * *// если Мильтона на корабле нет
* * * *if(MiltenNW_IsOnBoard != LOG_SUCCESS)
* * * *{
* * * * * *// Лестер сидит на лавке
* * * * * *B_StartOtherRoutine(PC_Psionic_DI,"SittingShipDI" );
* * * *};
* *};
* *if(Mario_IsOnBoard == LOG_SUCCESS) * * *// Марио
* *{
* * * *Wld_InsertNpc(None_101_Mario_DI,"SHIP_DECK_01");
* *};
* *if(Wolf_IsOnBoard == LOG_SUCCESS) * * * // Волк
* *{
* * * *Wld_InsertNpc(SLD_811_Wolf_DI,"SHIP_DECK_01");
* *};
* *if(Vatras_IsOnBoard == LOG_SUCCESS) * * // Ватрас
* *{
* * * *Wld_InsertNpc(VLK_439_Vatras_DI,"SHIP_DECK_01");
* *}; *
* *if(Bennet_IsOnBoard == LOG_SUCCESS) * * // Беннет
* *{
* * * *Wld_InsertNpc(SLD_809_Bennet_DI,"SHIP_DECK_01");
* *}; *
* *if(Diego_IsOnBoard == LOG_SUCCESS) * * *// Диего
* *{
* * * *Wld_InsertNpc(PC_Thief_DI,"SHIP_DECK_01");
* * * *// если Лареса на корабле нет
* * * *if(Lares_IsOnBoard != LOG_SUCCESS)
* * * *{
* * * * * *// Диего сидит на лавке
* * * * * *B_StartOtherRoutine(PC_Thief_DI,"SittingShipDI");
* * * *};
* *};
* *if(Gorn_IsOnBoard == LOG_SUCCESS) * * * // Горн
* *{
* * * *Wld_InsertNpc(PC_Fighter_DI,"SHIP_DECK_01");
* *}; *
* *if(Lares_IsOnBoard == LOG_SUCCESS) * * *// Ларес
* *{
* * * *Wld_InsertNpc(VLK_449_Lares_DI,"SHIP_DECK_01");
* * * *// если Диего на корабле нет
* * * *if(Diego_IsOnBoard != LOG_SUCCESS)
* * * *{
* * * * * *// Ларес сидит на лавке
* * * * * *B_StartOtherRoutine(VLK_449_Lares_DI,"SittingShip DI");
* * * *};
* *}; *
* *if(Biff_IsOnBoard == LOG_SUCCESS) * * * // Бифф
* *{
* * * *Wld_InsertNpc(DJG_713_Biff_DI,"SHIP_DECK_01");
* *}; *
* *if(Angar_IsOnBoard == LOG_SUCCESS) * * *// Ангар
* *{
* * * *Wld_InsertNpc(DJG_705_Angar_DI,"SHIP_DECK_01");
* *}; *
* *if(Girion_IsOnBoard == LOG_SUCCESS) * * // Гирион
* *{
* * * *Wld_InsertNpc(Pal_207_Girion_DI,"SHIP_DECK_01");
* *};
* *// вставить Педро
* *Wld_InsertNpc(NOV_600_Pedro_DI,"SHIP_DECK_01");
* *// вставка предметов
* *Wld_InsertItem(ItMi_Flask,"FP_ITEM_SHIP_03");
* *Wld_InsertItem(ItMi_Flask,"FP_ITEM_SHIP_07");
* *// вставка прочей живности
* *STARTUP_NEWWORLD_PART_DRAGON_ISLAND_01();
* *STARTUP_NEWWORLD_PART_DRAGON_UNDEAD_01();
* *STARTUP_NEWWORLD_PART_DRAGON_FINAL_01();
* *// видео - прибытие корабля на остров
* *PlayVideo("SHIP.BIK"); *
* *// создать тему - "Залы Ирдората"
* *Log_CreateTopic(TOPIC_HallenVonIrdorath,LOG_MISSI ON);
* *// задать статус - в процессе
* *Log_SetTopicStatus(TOPIC_HallenVonIrdorath,LOG_RU NNING);
* *// добавить в дневник запись
* *Log_AddEntry(TOPIC_HallenVonIrdorath,"Наконец мы достигли логова врага. Только Иннос знает, какие создания будут ждать меня внутри этой огромной горы.");
* *// инициализация 6 главы
* *B_Kapitelwechsel(6,DRAGONISLAND_ZEN);
};

// INIT_ секция Острова Драконов
func void INIT_DRAGONISLAND()
{
* *// инициализация отношений монстров к другим НПС
* *B_InitMonsterAttitudes();
* *// инициализация отношений между гильдиями людей
* *B_InitGuildAttitudes();
* *// инициализация глобальных НПС
* *B_InitNpcGlobals();
* *// задать текущий уровень
* *CurrentLevel = DRAGONISLAND_ZEN;
* *// если ГГ имеет Ключ от каюты капитана
* *if(Npc_HasItems(hero,ITKE_SHIP_LEVELCHANGE_MIS))
* *{
* * * *// отобрать у него ключ
* * * *Npc_RemoveInvItems(hero,ITKE_SHIP_LEVELCHANGE_MIS ,1);
* *};
* *// инициализация глобальных НПС (можно удалить, уже было)
* *B_InitNpcGlobals();
};
Ответить с цитированием