Scripts

TR_m3_NPC_Tynachos_scr

TR_Mainland.esm
Variables 17
Local Variables
TR_Map
control
controlQ
NoLore
T_Local_NPC
T_Local_NoLore
doOnceCast
doOnceSummon
doOnceDispel
doOnceActivator
scampenable
scampalive
scampkill
scampdispell
Hlanas
soulgreatpower
time
Source
1Begin TR_m3_NPC_Tynachos_scr 2 3short TR_Map 4short control 5short controlQ 6short NoLore 7short T_Local_NPC 8short T_Local_NoLore 9 10short doOnceCast 11short doOnceSummon 12short doOnceDispel 13short doOnceActivator 14float time 15short scampenable 16short scampalive 17short scampkill 18short scampdispell 19short Hlanas 20short soulgreatpower 21 22if ( MenuMode == 1 ) 23 Return 24endif 25 26if ( scampenable == 1 ) 27 set scampalive to 1 28 set time to ( time + GetSecondsPassed ) 29 if ( doOnceCast == 0 ) 30 TR_m3_Tynachos->cast "TR_m3_q_AT_MG01_summon" player 31 set doOnceCast to 1 32 endif 33 if ( time > 1.5 ) 34 if ( doOnceActivator == 0 ) 35 PlaceItemCell T_Glb_Var_SummonFX "Almas Thirr, Guild of Mages" 218 -227 -63 15060 36 set doOnceActivator to 1 37 endif 38 endif 39 if ( time > 2.2 ) 40 if ( doOnceSummon == 0 ) 41 PlaySound "scamp scream" 42 PlaceItemCell TR_m3_ATMG01_scamp "Almas Thirr, Guild of Mages" 218 -227 -63 15060 43 set doOnceSummon to 1 44 set scampenable to 0 45 set doOnceCast to 0 46 set doOnceActivator to 0 47 set doOnceSummon to 0 48 set time to 0 49 endif 50 endif 51endif 52 53if ( GetJournalIndex TR_m3_AT_MG01 == 100 ) 54 if ( scampdispell == 1 ) 55 if ( doOnceDispel == 0 ) 56 cast "TR_m3_q_AT_MG01_summon" player 57 set doOnceDispel to 1 58 endif 59 endif 60endif 61 62if ( GetJournalIndex TR_m3_AT_MG03 == 10 ) 63 if ( GetDeadCount "TR_m3_Hlanas Arthalen" < 1 ) 64 if ( "TR_m3_Hlanas Arthalen".PositionInitial ) 65 set Hlanas to 1 66 endif 67 endif 68endif 69 70if ( player->HasSoulGem "vivec_god" >= 1 ) 71 set soulgreatpower to 1 72elseif ( player->HasSoulGem "almalexia" >= 1 ) 73 set soulgreatpower to 1 74elseif ( player->HasSoulGem "almalexia_warrior" >= 1 ) 75 set soulgreatpower to 1 76else 77 set soulgreatpower to 0 78endif 79 80if ( TR_Map ) 81 return 82endif 83 84set TR_Map to 3 85 86End