Jump to content

TRN One of the Gang


Nepro

Recommended Posts

Posted

I cannot start the quest. I give coin to the beggar in Waterfront, but he does not give me back note. Can it be because I play non-vanilla Oblivion race? I tried to use CS in order to generate code for note but when I type it it says there's syntax error...

Posted

I changed race via racemenu did the quest as khajiit and changed back to my previous race and imported face from old save via wrye bash.

  • 8 months later...
Posted

I found other way of dealing with custom non-vanilla race problem.

 

Anyone who plays with custom or non-vanilla Oblivion race and can't start the forgery quest. Here's solution:

 

1) Type these in the console:

 

TRNOotGFindForgeryQuest 1

 

2) Go to the beggar in the Waterfront district of the Imperial City and give him a coin. He will give you the note.

 

3) If it doesn't work then type this:

 

TRNOotGFindForgeryQuest 2

 

This will start/update the quest to the stage where you go to the guard house. The markers on the map directing toward the quest point will be added.

  • 8 months later...
Posted

 

 

Scriptname TRNOotGSuspicionScript

 

float fQuestDelayTime

 

short ShouldBeDisguised

 

short suspiciousPersonality

short suspiciousLuck

short suspiciousIllusion

short suspiciousSpeechcraft

short suspiciousBounty

short suspiciousInfamy

 

short suspiciousWeapon

short suspiciousAmmo

short suspiciousRanged

short suspiciousShield

 

short suspiciousHorse

 

ref PlayersWeapon

ref PlayersAmmo

ref PlayersRanged

ref PlayersShield

 

ref horseRef

short checkRiding

short suspiciousRunning

short suspiciousSneaking

short suspiciousWeaponIsOut

 

short showConditions

short adder

short CurrentBounty

 

short NumNPCRefs

ref NPCRef 

short timer2

short i

short j

short Detected

short DispositionVar

short Personality

short Illusion

short Luck

short BartholmLoaded

ref factionRef

 

Begin GameMode

 

if (fQuestDelayTime != 20) ; Improve performance

set fQuestDelayTime to 20

endif

 

If (TRNOotGGlobalVariableScript.PlayerDisguised)

 

if (player.GetActorValue Personality < 50)

set suspiciousPersonality to 1

elseif (player.GetActorValue Personality >= 90)

set suspiciousPersonality to -1

else

set suspiciousPersonality to 0

endif

 

if (player.GetActorValue Luck < 50)

set suspiciousLuck to 1

elseif (player.GetActorValue Luck >= 90)

set suspiciousLuck to -1

else

set suspiciousLuck to 0

endif

 

if (player.GetActorValue Illusion < 50)

set suspiciousIllusion to 1

elseif (player.GetActorValue Illusion >= 90)

set suspiciousIllusion to -1

else

set suspiciousIllusion to 0

endif

 

if (player.GetActorValue Speechcraft < 50)

set suspiciousSpeechcraft to 1

elseif (player.GetActorValue Speechcraft >= 90)

set suspiciousSpeechcraft to -1

else

set suspiciousSpeechcraft to 0

endif

 

if (player.GetActorValue Bounty >= 100)

set suspiciousBounty to 1

else

set suspiciousBounty to 0

endif

 

if (GetPCInfamy >= 50)

set suspiciousInfamy to 1

else

set suspiciousInfamy to 0

endif

 

 

;Check for suspicious weaponry

 

set PlayersWeapon to (Player.GetEquipmentSlotMask 65536)

set PlayersAmmo to (Player.GetEquipmentSlotMask 131072)

set PlayersRanged to (Player.GetEquipmentSlotMask 262144)

set PlayersShield to (Player.GetEquipmentSlotMask 8192)

 

if (PlayersWeapon)

If ((PlayersWeapon.CompareName "Silver" PlayersWeapon == 1) || (PlayersWeapon.CompareName "Steel" PlayersWeapon == 1) || (PlayersWeapon.CompareName "Practice" PlayersWeapon == 1))

; This behaviour is not suspicious.

set suspiciousWeapon to 0

Else

set suspiciousWeapon to 1

Endif

else

set suspiciousWeapon to 0 ;Nothing in this slot

endif

 

if (PlayersAmmo)

If ((PlayersAmmo.CompareName "Silver" PlayersAmmo == 1) || (PlayersAmmo.CompareName "Steel" PlayersAmmo == 1) || (PlayersAmmo.CompareName "Practice" PlayersAmmo == 1))

; This behaviour is not suspicious.

set suspiciousAmmo to 0

Else

set suspiciousAmmo to 1

Endif

else

set suspiciousAmmo to 0 ;Nothing in this slot

endif

 

if (PlayersRanged)

If ((PlayersRanged.CompareName "Silver" PlayersRanged == 1) || (PlayersRanged.CompareName "Steel" PlayersRanged == 1) || (PlayersRanged.CompareName "Practice" PlayersRanged == 1))

; This behaviour is not suspicious.

set suspiciousRanged to 0

Else

set suspiciousRanged to 1

Endif

else

set suspiciousRanged to 0 ;Nothing in this slot

endif

 

if (player.IsShieldOut)

 

; This section is governed by IdentifyArmourScript in more detail

; If (PlayersShield.CompareName "Legion" PlayersShield == 1) || (PlayersShield.CompareName "Imperial" PlayersShield == 1) || (PlayersShield.CompareName "Guard" PlayersShield == 1) || (PlayersShield.CompareName "Anvil" PlayersShield == 1) || (PlayersShield.CompareName "Bravil" PlayersShield == 1) || (PlayersShield.CompareName "Bruma" PlayersShield == 1) || (PlayersShield.CompareName "Cheydinhal" PlayersShield == 1) 

; This behaviour is very normal.

; set suspiciousShield to -1

 

; Elseif (PlayersShield.CompareName "Chorrol" PlayersShield == 1) || (PlayersShield.CompareName "Kvatch" PlayersShield == 1) || (PlayersShield.CompareName "Leyawiin" PlayersShield == 1) || (PlayersShield.CompareName "Skingrad" PlayersShield == 1) || (PlayersShield.CompareName "Bartholm" PlayersShield == 1) || (PlayersShield.CompareName "Stendarr" PlayersShield == 1)

; This behaviour is very normal.

; set suspiciousShield to -1

 

; Else

; This behaviour is suspicious.

; set suspiciousShield to 1

; Endif

 

Else

set suspiciousShield to 0

Endif

 

 

;Check for suspicious behaviour riding a horse

if (checkRiding == 0)

 

if (player.IsRidingHorse)

set horseRef to player.GetHorse

set checkRiding to 1 

if ((horseRef.GetOwner == ImperialLegion) || (horseRef.GetOwner == ImperialLegionBattlemage) || (horseRef.GetOwner == ImperialLegionFriend) || (horseRef.GetOwner == ImperialLegionOutside) || (horseRef.GetOwner == ImperialTradingCo) || (horseRef.GetOwner == ImperialWatch))

; This behaviour is not suspicious.

 

elseif ((TRNOotGGlobalVariableScript.Anvil) && (horseRef.GetOwner == AnvilGuards))

; This behaviour is not suspicious.

elseif ((TRNOotGGlobalVariableScript.Bravil) && (horseRef.GetOwner == BravilGuards))

; This behaviour is not suspicious.

elseif ((TRNOotGGlobalVariableScript.Bruma) && (horseRef.GetOwner == BrumaGuardFaction))

; This behaviour is not suspicious.

elseif ((TRNOotGGlobalVariableScript.Cheydinhal) && (horseRef.GetOwner == CheydinhalGuardFaction))

; This behaviour is not suspicious.

elseif ((TRNOotGGlobalVariableScript.Kvatch) && (horseRef.GetOwner == KvatchGuards))

; This behaviour is not suspicious.

elseif ((TRNOotGGlobalVariableScript.Leyawiin) && (horseRef.GetOwner == LeyawiinGuards))

; This behaviour is not suspicious.

elseif ((TRNOotGGlobalVariableScript.Skingrad) && (horseRef.GetOwner == SkingradGuardFaction))

; This behaviour is not suspicious.

 

elseif ((horseRef.GetOwner == ImperialLegionRiderAleswell) || (horseRef.GetOwner == ImperialLegionRiderAnvil) || (horseRef.GetOwner == ImperialLegionRiderChey) || (horseRef.GetOwner == ImperialLegionRiderChorrol) || (horseRef.GetOwner == ImperialLegionRiderCrossroads) || (horseRef.GetOwner == ImperialLegionRiderFalls) || (horseRef.GetOwner == ImperialLegionRiderGottshaw) || (horseRef.GetOwner == ImperialLegionRiderLey))

; This behaviour is not suspicious.

elseif ((horseRef.GetOwner == ImperialLegionRiderNikel) || (horseRef.GetOwner == ImperialLegionRiderRidge) || (horseRef.GetOwner == ImperialLegionRiderRock) || (horseRef.GetOwner == ImperialLegionRiderRoxey) || (horseRef.GetOwner == ImperialLegionRiderSardavar) || (horseRef.GetOwner == ImperialLegionRiderSlope) || (horseRef.GetOwner == ImperialLegionRiderVirtue) || (horseRef.GetOwner == ImperialLegionRiderWell) || (horseRef.GetOwner == ImperialLegionRiderWellspring))

; This behaviour is not suspicious.

else

; This behaviour is suspicious

set suspiciousHorse to 1

endif

 

endif

 

elseif (checkRiding == 1)

if (player.IsRidingHorse == 0)

set checkRiding to 0

set suspiciousHorse to 0

endif

 

endif

 

;Check for suspicious behaviour

 

if (player.IsRunning)

set suspiciousRunning to 0

else ; walking

; This behaviour is very normal 

set suspiciousRunning to -1

endif

 

if (player.IsSneaking)

; This behaviour is suspicious

set suspiciousSneaking to 1

set suspiciousRunning to 0 ; Overwrite any buff given by not running

else ; walking

; This behaviour is normal 

set suspiciousSneaking to 0

endif

 

if (player.IsWeaponOut)

set suspiciousWeaponIsOut to 0

else ; weapon sheathed

; This behaviour is very normal 

set suspiciousWeaponIsOut to -1

endif

 

set adder to (suspiciousPersonality + suspiciousLuck + suspiciousIllusion + suspiciousSpeechcraft + suspiciousBounty + suspiciousInfamy + suspiciousWeapon + suspiciousAmmo + suspiciousRanged + suspiciousShield + suspiciousHorse + suspiciousRunning + suspiciousSneaking + suspiciousWeaponIsOut)

 

if (showConditions)

printc "suspiciousPersonality %g", suspiciousPersonality

printc "suspiciousLuck %g", suspiciousLuck

printc "suspiciousIllusion %g", suspiciousIllusion

printc "suspiciousSpeechcraft %g", suspiciousSpeechcraft

printc "suspiciousBounty %g", suspiciousBounty

printc "suspiciousInfamy %g", suspiciousInfamy

 

printc "suspiciousWeapon %g", suspiciousWeapon

printc "suspiciousAmmo %g", suspiciousAmmo

printc "suspiciousRanged %g", suspiciousRanged

printc "suspiciousShield %g", suspiciousShield

 

printc "suspiciousHorse %g", suspiciousHorse

printc "suspiciousRunning %g", suspiciousRunning

printc "suspiciousSneaking %g", suspiciousSneaking

printc "suspiciousWeaponIsOut %g", suspiciousWeaponIsOut

 

printc "adder %g", adder

endif

 

if (adder <= 3)

; Not too suspicious

 

if (Player.GetCrimeGold > 0)

 

; Is the player detected?

; What mods are loaded?

set BartholmLoaded to IsModLoaded "bartholm.esp"

; End of checking for loaded mods

 

set Detected to 0

set NPCRef to Quill01

set NPCRef to (GetFirstRef 35 1)

 

set NumNPCRefs to (GetNumRefs 35 1)

set i to 0

 

Label 0 ; top of loop, equivalent to SaveIP 0

 

If (NPCRef.GetDead == 1)

;NPC is dead

Else

If (NPCRef.GetDetectionLevel Player  >= 3) && (NPCRef.GetDistance Player <= 5000)

 

If ((NPCRef.GetInFaction ImperialLegion) || (NPCRef.GetInFaction ImperialLegionBattlemage) || (NPCRef.GetInFaction ImperialLegionFriend) || (NPCRef.GetInFaction ImperialLegionOutside) || (NPCRef.GetInFaction ImperialWatch))

set Detected to 1

 

Elseif ((NPCRef.GetInFaction AnvilCastleFaction) || (NPCRef.GetInFaction AnvilGuards) || (NPCRef.GetInFaction BravilCastleFaction) || (NPCRef.GetInFaction BravilGuards) || (NPCRef.GetInFaction BrumaCastleFaction) || (NPCRef.GetInFaction BrumaGuardFaction) || (NPCRef.GetInFaction CheydinhalCastleFaction) || (NPCRef.GetInFaction CheydinhalGuardFaction))

set Detected to 1

 

Elseif ((NPCRef.GetInFaction ChorrolCastleFaction) || (NPCRef.GetInFaction ChorrolGuardFaction) || (NPCRef.GetInFaction KvatchGuards) || (NPCRef.GetInFaction LeyawiinCastleFaction) || (NPCRef.GetInFaction LeyawiinGuards) || (NPCRef.GetInFaction SkingradCastleFaction) || (NPCRef.GetInFaction SkingradGuardFaction))

set Detected to 1

 

Else

 

set Personality to player.GetActorValue Personality

set Illusion to player.GetActorValue Illusion

set Luck to player.GetActorValue Luck

 

set DispositionVar to Personality

set DispositionVar to (DispositionVar + Illusion)

set DispositionVar to (DispositionVar + Luck)

set DispositionVar to (DispositionVar/3)

set DispositionVar to (DispositionVar/2)

set DispositionVar to (100 - DispositionVar)

 

If (BartholmLoaded)

set factionRef to GetFormFromMod "bartholm.esp" "0100C989" ; BartholmCastleFaction

if (NPCRef.GetInFaction factionRef)

set Detected to 1

endif

set factionRef to GetFormFromMod "bartholm.esp" "0100C988" ; BartholmGuardFaction

if (NPCRef.GetInFaction factionRef)

set Detected to 1

endif

Elseif (NPCRef.GetDisposition Player > DispositionVar)

;PrintToConsole "Actors Disposition is more than %g" DispositionVar

Elseif (NPCRef.GetInFaction ThievesGuild) && (Player.GetInFaction ThievesGuild)

;PrintToConsole "Thief friend"

Elseif (NPCRef.GetInFaction DarkBrotherhood) && (Player.GetInFaction DarkBrotherhood) 

;PrintToConsole "DB friend"

Elseif (NPCRef.GetActorValue Responsibility < 10)

;PrintToConsole "Actors Responsibility is less than 10"

Else

set Detected to 1

Endif

 

Endif

Else

;PrintToConsole "Not detected"

Endif

 

Endif

 

set i to (i + 1)

 

if (i <= NumNPCRefs)

set NPCRef to Quill01

set NPCRef to GetNextRef

GoTo 0

endif

 

if (showConditions)

PrintToConsole "Detected? (1 = yes, 0 = no) %g" Detected

endif

 

if (Detected == 0)

 

if (TRNOotGGlobalVariableScript.Anvil == 1)

Player.SetFactionRank AnvilCastleFaction, 0

Player.SetFactionRank AnvilGuards, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Bravil == 1)

Player.SetFactionRank BravilCastleFaction, 0

Player.SetFactionRank BravilGuards, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Bruma == 1)

Player.SetFactionRank BrumaCastleFaction, 0

Player.SetFactionRank BrumaGuardFaction, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Cheydinhal == 1)

Player.SetFactionRank CheydinhalCastleFaction, 0

Player.SetFactionRank CheydinhalGuardFaction, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Chorrol == 1)

Player.SetFactionRank ChorrolCastleFaction, 0

Player.SetFactionRank ChorrolGuardFaction, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Kvatch == 1)

Player.SetFactionRank KvatchGuards, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Leyawiin == 1)

Player.SetFactionRank LeyawiinCastleFaction, 0

Player.SetFactionRank LeyawiinGuards, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Skingrad == 1)

Player.SetFactionRank SkingradCastleFaction, 0

Player.SetFactionRank SkingradGuardFaction, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Bartholm == 1)

if (BartholmLoaded)

set factionRef to GetFormFromMod "bartholm.esp" "0100C989" ; BartholmCastleFaction

Player.SetFactionRank factionRef , 0

set factionRef to GetFormFromMod "bartholm.esp" "0100C988" ; BartholmGuardFaction

Player.SetFactionRank factionRef , 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

endif

else

; Default

Player.SetFactionRank ImperialLegion, 0

Player.SetFactionRank ImperialWatch, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

endif

 

player.StopCombatAlarmOnActor

player.SetCrimeGold 0

message "You have successfully disguised yourself as a guard of the Imperial Legion."

player.AddSpellNS TRNOotGGuardCharm

player.EquipItemNS TRNOotGSpoonConcept

if (Player.GetEquipmentSlotMask 32768 == 0)

player.EquipItemNS TRNOotGTailHider

endif

player.StopCombatAlarmOnActor

PlaySound TRNOotGDisguiseSuccess

set TRNOotGGlobalVariableScript.PlayerDisguised to 1

endif

 

endif

 

else

 

; Is the player detected?

 

; What mods are loaded?

 

set BartholmLoaded to IsModLoaded "bartholm.esp"

 

; End of checking for loaded mods

 

set Detected to 0

set NPCRef to Quill01

set NPCRef to (GetFirstRef 35 1)

 

set NumNPCRefs to (GetNumRefs 35 1)

set i to 0

 

Label 0 ; top of loop, equivalent to SaveIP 0

 

If (NPCRef.GetDead == 1)

;NPC is dead

Else

If (NPCRef.GetDetectionLevel Player  >= 3) && (NPCRef.GetDistance Player <= 300)

 

If ((NPCRef.GetInFaction ImperialLegion) || (NPCRef.GetInFaction ImperialLegionBattlemage) || (NPCRef.GetInFaction ImperialLegionFriend) || (NPCRef.GetInFaction ImperialLegionOutside) || (NPCRef.GetInFaction ImperialWatch))

set Detected to 1

 

Elseif ((NPCRef.GetInFaction AnvilCastleFaction) || (NPCRef.GetInFaction AnvilGuards) || (NPCRef.GetInFaction BravilCastleFaction) || (NPCRef.GetInFaction BravilGuards) || (NPCRef.GetInFaction BrumaCastleFaction) || (NPCRef.GetInFaction BrumaGuardFaction) || (NPCRef.GetInFaction CheydinhalCastleFaction) || (NPCRef.GetInFaction CheydinhalGuardFaction))

set Detected to 1

 

Elseif ((NPCRef.GetInFaction ChorrolCastleFaction) || (NPCRef.GetInFaction ChorrolGuardFaction) || (NPCRef.GetInFaction KvatchGuards) || (NPCRef.GetInFaction LeyawiinCastleFaction) || (NPCRef.GetInFaction LeyawiinGuards) || (NPCRef.GetInFaction SkingradCastleFaction) || (NPCRef.GetInFaction SkingradGuardFaction))

set Detected to 1

 

Else

 

set Personality to player.GetActorValue Personality

set Illusion to player.GetActorValue Illusion

set Luck to player.GetActorValue Luck

 

set DispositionVar to Personality

set DispositionVar to (DispositionVar + Illusion)

set DispositionVar to (DispositionVar + Luck)

set DispositionVar to (DispositionVar/3)

set DispositionVar to (DispositionVar/2)

set DispositionVar to (100 - DispositionVar)

 

If (BartholmLoaded)

set factionRef to GetFormFromMod "bartholm.esp" "0100C989" ; BartholmCastleFaction

if (NPCRef.GetInFaction factionRef)

set Detected to 1

endif

set factionRef to GetFormFromMod "bartholm.esp" "0100C988" ; BartholmGuardFaction

if (NPCRef.GetInFaction factionRef)

set Detected to 1

endif

Elseif (NPCRef.GetDisposition Player > DispositionVar)

;PrintToConsole "Actors Disposition is more than %g" DispositionVar

Elseif (NPCRef.GetInFaction ThievesGuild) && (Player.GetInFaction ThievesGuild)

;PrintToConsole "Thief friend"

Elseif (NPCRef.GetInFaction DarkBrotherhood) && (Player.GetInFaction DarkBrotherhood) 

;PrintToConsole "DB friend"

Elseif (NPCRef.GetActorValue Responsibility < 10)

;PrintToConsole "Actors Responsibility is less than 10"

Else

set Detected to 1

Endif

 

Endif

Else

;PrintToConsole "Not detected"

Endif

 

Endif

 

set i to (i + 1)

 

if (i <= NumNPCRefs)

set NPCRef to Quill01

set NPCRef to GetNextRef

GoTo 0

endif

 

if (showConditions)

PrintToConsole "Detected? (1 = yes, 0 = no) %g" Detected

endif

 

if (Detected)

 

; Become undisguised

 

message "Someone has realised that you are not a guard!"

set ShouldBeDisguised to 1

 

; Remove from Factions

 

Player.SetFactionRank AnvilCastleFaction, -1

Player.SetFactionRank AnvilGuards, -1

 

Player.SetFactionRank BravilCastleFaction, -1

Player.SetFactionRank BravilGuards, -1

 

Player.SetFactionRank BrumaCastleFaction, -1

Player.SetFactionRank BrumaGuardFaction, -1

 

Player.SetFactionRank CheydinhalCastleFaction, -1

Player.SetFactionRank CheydinhalGuardFaction, -1

 

Player.SetFactionRank ChorrolCastleFaction, -1

Player.SetFactionRank ChorrolGuardFaction, -1

 

Player.SetFactionRank KvatchGuards, -1

 

Player.SetFactionRank LeyawiinCastleFaction, -1

Player.SetFactionRank LeyawiinGuards, -1

 

Player.SetFactionRank SkingradCastleFaction, -1

Player.SetFactionRank SkingradGuardFaction, -1

 

Player.SetFactionRank ImperialLegion, -1

Player.SetFactionRank ImperialWatch, -1

Player.SetFactionRank TRNOotGRegionalGuardsDisp, -1

 

if (BartholmLoaded)

set factionRef to GetFormFromMod "bartholm.esp" "0100C989" ; BartholmCastleFaction

Player.SetFactionRank factionRef , -1

set factionRef to GetFormFromMod "bartholm.esp" "0100C988" ; BartholmGuardFaction

Player.SetFactionRank factionRef , -1

endif

 

set CurrentBounty to Player.GetCrimeGold

set CurrentBounty to (CurrentBounty + TRNOotGGlobalVariableScript.TRNOotGStartBounty)

set CurrentBounty to (CurrentBounty + 500)

player.SetCrimeGold CurrentBounty

set TRNOotGGlobalVariableScript.TRNOotGStartBounty to 0

set TRNOotGGlobalVariableScript.PlayerDisguised to 0

 

player.removespellNS TRNOotGGuardCharm

player.UnequipItemNS TRNOotGSpoonConcept

player.UnequipItemNS TRNOotGTailHider

PlaySound TRNOotGDisguiseFailure

player.SendTrespassAlarm Player

 

endif

 

endif

 

Elseif (TRNOotGGlobalVariableScript.PlayerDisguised == 0)

 

printC "TRNOotGGlobalVariableScript.PlayerDisguised = %g", TRNOotGGlobalVariableScript.PlayerDisguised

printc "ShouldBeDisguised %g", ShouldBeDisguised

 

if (ShouldBeDisguised)

 

; Is the player detected?

; What mods are loaded?

set BartholmLoaded to IsModLoaded "bartholm.esp"

; End of checking for loaded mods

 

set Detected to 0

set NPCRef to Quill01

set NPCRef to (GetFirstRef 35 1)

 

set NumNPCRefs to (GetNumRefs 35 1)

set i to 0

 

Label 0 ; top of loop, equivalent to SaveIP 0

 

If (NPCRef.GetDead == 1)

;NPC is dead

Else

If (NPCRef.GetDetectionLevel Player  >= 3) && (NPCRef.GetDistance Player <= 5000)

 

If ((NPCRef.GetInFaction ImperialLegion) || (NPCRef.GetInFaction ImperialLegionBattlemage) || (NPCRef.GetInFaction ImperialLegionFriend) || (NPCRef.GetInFaction ImperialLegionOutside) || (NPCRef.GetInFaction ImperialWatch))

set Detected to 1

 

Elseif ((NPCRef.GetInFaction AnvilCastleFaction) || (NPCRef.GetInFaction AnvilGuards) || (NPCRef.GetInFaction BravilCastleFaction) || (NPCRef.GetInFaction BravilGuards) || (NPCRef.GetInFaction BrumaCastleFaction) || (NPCRef.GetInFaction BrumaGuardFaction) || (NPCRef.GetInFaction CheydinhalCastleFaction) || (NPCRef.GetInFaction CheydinhalGuardFaction))

set Detected to 1

 

Elseif ((NPCRef.GetInFaction ChorrolCastleFaction) || (NPCRef.GetInFaction ChorrolGuardFaction) || (NPCRef.GetInFaction KvatchGuards) || (NPCRef.GetInFaction LeyawiinCastleFaction) || (NPCRef.GetInFaction LeyawiinGuards) || (NPCRef.GetInFaction SkingradCastleFaction) || (NPCRef.GetInFaction SkingradGuardFaction))

set Detected to 1

 

Else

 

set Personality to player.GetActorValue Personality

set Illusion to player.GetActorValue Illusion

set Luck to player.GetActorValue Luck

 

set DispositionVar to Personality

set DispositionVar to (DispositionVar + Illusion)

set DispositionVar to (DispositionVar + Luck)

set DispositionVar to (DispositionVar/3)

set DispositionVar to (DispositionVar/2)

set DispositionVar to (100 - DispositionVar)

 

If (BartholmLoaded)

set factionRef to GetFormFromMod "bartholm.esp" "0100C989" ; BartholmCastleFaction

if (NPCRef.GetInFaction factionRef)

set Detected to 1

endif

set factionRef to GetFormFromMod "bartholm.esp" "0100C988" ; BartholmGuardFaction

if (NPCRef.GetInFaction factionRef)

set Detected to 1

endif

Elseif (NPCRef.GetDisposition Player > DispositionVar)

;PrintToConsole "Actors Disposition is more than %g" DispositionVar

Elseif (NPCRef.GetInFaction ThievesGuild) && (Player.GetInFaction ThievesGuild)

;PrintToConsole "Thief friend"

Elseif (NPCRef.GetInFaction DarkBrotherhood) && (Player.GetInFaction DarkBrotherhood) 

;PrintToConsole "DB friend"

Elseif (NPCRef.GetActorValue Responsibility < 10)

;PrintToConsole "Actors Responsibility is less than 10"

Else

set Detected to 1

Endif

 

Endif

Else

;PrintToConsole "Not detected"

Endif

 

Endif

 

set i to (i + 1)

 

if (i <= NumNPCRefs)

set NPCRef to Quill01

set NPCRef to GetNextRef

GoTo 0

endif

 

if (showConditions)

PrintToConsole "Detected? (1 = yes, 0 = no) %g" Detected

endif

 

if (Detected == 0)

 

if (TRNOotGGlobalVariableScript.Anvil == 1)

Player.SetFactionRank AnvilCastleFaction, 0

Player.SetFactionRank AnvilGuards, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Bravil == 1)

Player.SetFactionRank BravilCastleFaction, 0

Player.SetFactionRank BravilGuards, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Bruma == 1)

Player.SetFactionRank BrumaCastleFaction, 0

Player.SetFactionRank BrumaGuardFaction, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Cheydinhal == 1)

Player.SetFactionRank CheydinhalCastleFaction, 0

Player.SetFactionRank CheydinhalGuardFaction, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Chorrol == 1)

Player.SetFactionRank ChorrolCastleFaction, 0

Player.SetFactionRank ChorrolGuardFaction, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Kvatch == 1)

Player.SetFactionRank KvatchGuards, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Leyawiin == 1)

Player.SetFactionRank LeyawiinCastleFaction, 0

Player.SetFactionRank LeyawiinGuards, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Skingrad == 1)

Player.SetFactionRank SkingradCastleFaction, 0

Player.SetFactionRank SkingradGuardFaction, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

elseif (TRNOotGGlobalVariableScript.Bartholm == 1)

if (BartholmLoaded)

set factionRef to GetFormFromMod "bartholm.esp" "0100C989" ; BartholmCastleFaction

Player.SetFactionRank factionRef , 0

set factionRef to GetFormFromMod "bartholm.esp" "0100C988" ; BartholmGuardFaction

Player.SetFactionRank factionRef , 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

endif

else

; Default

Player.SetFactionRank ImperialLegion, 0

Player.SetFactionRank ImperialWatch, 0

Player.SetFactionRank TRNOotGRegionalGuardsDisp, 0

endif

 

player.StopCombatAlarmOnActor

player.SetCrimeGold 0

message "You have successfully disguised yourself as a guard of the Imperial Legion."

player.AddSpellNS TRNOotGGuardCharm

player.EquipItemNS TRNOotGSpoonConcept

if (Player.GetEquipmentSlotMask 32768 == 0)

player.EquipItemNS TRNOotGTailHider

endif

player.StopCombatAlarmOnActor

PlaySound TRNOotGDisguiseSuccess

set TRNOotGGlobalVariableScript.PlayerDisguised to 1

endif

 

endif

 

Endif

 

End

 

 

 

This is TRNOotGSuspicionsScript. Should I increase the number or decrease it to improve the performance? I think I should increase the number, but I am still unsure about it. 

 

 

if (fQuestDelayTime != 20)  ; Improve performance

set fQuestDelayTime to 20

Guest ThatOne
Posted

Increasing it means it will run less often, so yes it will improve performance.

  • 7 months later...
Posted

How could I edit/make a new script to hook up simple ini file that would control:

 

fQuestDelayTime

 

Archived

This topic is now archived and is closed to further replies.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...