Scripts

TR_m7_NPC_NsCQSewersVamp

TR_Mainland.esm
Variables 16
Local Variables
done
fightset
cattlekilled
nolore
nohello
noflee
noidle
nointruder
nothief
TR_Map
T_Local_Vampire
control
controlQ
T_Local_NPC
T_Local_NoLore
T_Local_Khajiit
Source
1begin TR_m7_NPC_NsCQSewersVamp 2 3short done 4short fightset 5short cattlekilled 6short nolore 7short nohello 8short noflee 9short noidle 10short nointruder 11short nothief 12short TR_Map 13short T_Local_Vampire 14short control 15short controlQ 16short T_Local_NPC 17short T_Local_NoLore 18short T_Local_Khajiit 19 20if ( GetJournalIndex "VA_VampHunter" == 110 ) 21 setFight 100 22 setDisposition 0 23 set cattlekilled to -1 24endif 25 26if ( OnDeath == 1 ) 27 if ( GetJournalIndex "VA_VampCountess" == 50 ) 28 if ( VampClan == 1 ) 29 set VampKills to ( VampKills - 1 ) 30 elseif ( VampClan == 2 ) 31 set VampKills to ( VampKills + 1 ) 32 elseif ( VampClan == 3 ) 33 set VampKills to ( VampKills + 1 ) 34 endif 35 elseif ( GetJournalIndex "VA_VampAmulet" == 30 ) 36 if ( VampClan == 1 ) 37 set VampKills to ( VampKills - 1 ) 38 elseif ( VampClan == 2 ) 39 set VampKills to ( VampKills + 1 ) 40 elseif ( VampClan == 3 ) 41 set VampKills to ( VampKills + 1 ) 42 endif 43 endif 44 AddItem "ingred_vampire_dust_01" 1 45 if ( GetJournalIndex "TR_m7_VA_DaedricOrigin" >= 20 ) 46 if ( GetJournalIndex "TR_m7_VA_DaedricOrigin" < 50 ) 47 if ( GetDeadCount TR_m7_V_Modogail > 0 ) 48 Journal TR_m7_VA_DaedricOrigin 60 49 endif 50 endif 51 endif 52endif 53 54if ( done == -1 ) 55 return 56endif 57 58if ( done > 0 ) 59 if ( GetJournalIndex "TR_m7_VA_DaedricOrigin" == 10 ) 60 setfight 100 61 setdisposition 20 62 set fightset to 1 63 set done to -1 64 endif 65endif 66 67if ( done == 2 ) 68 ;check for PC NO LONGER a Vampire 69 if ( PCVampire == -1 ) 70 if ( GetJournalIndex "TR_m7_VA_DaedricOrigin" < 80 ) 71 setfight 90 72 setdisposition 20 73 endif 74 set done to -1 75 endif 76 return 77endif 78 79if ( done == 1 ) 80 ;check for PC as a Vampire 81 if ( PCVampire == 1 ) 82 setfight 30 83 set done to 2 84 elseif ( PCVampire != 1 ) 85 if ( fightset == 0 ) 86 setfight 90 87 setdisposition 20 88 set fightset to 1 89 endif 90 endif 91 return 92endif 93 94if ( done == 0 ) 95 AddSpell "Vampire Blood Aundae" ;this is the blood disease 96 AddSpell "Vampire Attributes" 97 AddSpell "Vampire Skills" 98 AddSpell "Vampire Immunities" 99 AddSpell "Vampire Sun Damage" 100 AddSpell "Vampire Touch" 101 AddSpell "Vampire Aundae Specials" 102 ModRestoration 75 103 set TR_Map to 7 104 set done to 1 105 set T_Local_Khajiit to -1 106 107 if ( GetRace "T_Els_Cathay" ) 108 set T_Local_Khajiit to 1 109 elseif ( GetRace "T_Els_Cathay-raht" ) 110 set T_Local_Khajiit to 1 111 elseif ( GetRace "T_Els_Dagi-raht" ) 112 set T_Local_Khajiit to 1 113 elseif ( GetRace "T_Els_Ohmes" ) 114 set T_Local_Khajiit to 1 115 elseif ( GetRace "T_Els_Ohmes-raht" ) 116 set T_Local_Khajiit to 1 117 elseif ( GetRace "T_Els_Suthay" ) 118 set T_Local_Khajiit to 1 119 elseif ( GetRace "T_Els_Tojay" ) 120 set T_Local_Khajiit to 1 121 elseif ( GetRace "Khajiit" ) 122 set T_Local_Khajiit to 1 123 endif 124endif 125 126end