Scripts

TR_m1_q_YishiniVamp_Script

TR_Mainland.esm
Variables 4
Local Variables
done
doonce
doonce2
journalonce
Source
1begin TR_m1_q_YishiniVamp_Script 2 3; script on NPC TR_m1_q_YishiniVampDead. This is a dead NPC, so there is no need for most of the standard 4; vampire boilerplate; therefore I've commented it out. 5 6short done 7;short fightset 8;short cattlekilled 9;short nolore 10;short nohello 11;short noflee 12;short noidle 13;short nointruder 14;short nothief 15short doonce 16short doonce2 17short journalonce 18 19if ( GetJournalIndex TR_m1_TT_3 < 30 ) 20 if ( doonce2 == 0 ) 21 disable 22 set doonce2 to 1 23 endif 24endif 25 26if ( GetJournalIndex TR_m1_TT_3 >= 30 ) 27 if ( doonce == 0 ) 28 enable 29 set doonce to 1 30 endif 31endif 32 33if ( OnActivate ) 34 If ( JournalOnce == 0 ) 35 Journal TR_m1_TT_3 40 36 set JournalOnce to 1 37 Endif 38 Activate 39endif 40 41;if ( GetJournalIndex "VA_VampHunter" == 110 ) 42; setFight 100 43; setDisposition 0 44; set cattlekilled to -1 45; return 46;endif 47 48if ( done == -1 ) 49 return 50endif 51; 52;if ( done == 2 ) 53; 54; ;check for PC NO LONGER a Aundae Vampire 55; if ( player->GetSpell "Vampire Aundae Specials" != 1 ) 56; setfight 90 57; setdisposition 20 58; set done to -1 59; endif 60; 61;endif 62; 63;if ( done == 1 ) 64; 65; ;check for PC as a Aundae Vampire 66; if ( player->GetSpell "Vampire Aundae Specials" == 1 ) 67; setfight 30 68; set done to 2 69; elseif ( player->GetSpell "Vampire Aundae Specials" != 1 ) 70; if ( fightset == 0 ) 71; setfight 90 72; setdisposition 20 73; set fightset to 1 74; endif 75; endif 76;return 77; 78;endif 79; 80;if ( done == 0 ) 81 AddSpell, "Vampire Blood Aundae" ;this is the blood disease 82 AddSpell, "Vampire Attributes" 83 AddSpell, "Vampire Skills" 84 AddSpell, "Vampire Immunities" 85 AddSpell, "Vampire Sun Damage" 86; AddSpell, "Vampire Touch" 87; AddSpell, "Vampire Aundae Specials" 88; ModRestoration 75 89 set done to -1 90;endif 91 92end