Jump to content

BeeingFemale

milzschnitte

Recommended Posts

darkmatter86

darkmatter86

Posted
Posted

 

 

 

The creatures are still not allowed. I disabled the lore friendly option just in case (my char is a nord) and that didn't help. Is there a way to make creatures sperm allow again?

 

There is one click box, right under the LORE, that says Creature sperm or something like that. Click in that.

 

The problem is that "allow creatures sperm" click box doesn't appear in the MCM menu. It was there in the previous versions though.

 

 

Use the hotfix addon patch, it would be pop up right after you use console command "bf:addon refresh"

 

 

It worked. Thanks

Link to comment
milzschnitte

milzschnitte

Posted
  • Author
Posted

About the updating - You just need to overwrite the files - that's all.

That's why I have to do, too when I'm compiling the scripts.... and I must compile very often - i compile for around 50 times a day - would be realy annoying if I had to uninstall BeeingFemale for each compiling process, don't you think so :)

When I compile a script, it will overwrite the existing pex file.... so overwriting is everything. The .esm file doesn't realy chance often and the Form IDs should stay

Link to comment
velvetsanity

velvetsanity

Posted
Posted

About the updating - You just need to overwrite the files - that's all.

That's why I have to do, too when I'm compiling the scripts.... and I must compile very often - i compile for around 50 times a day - would be realy annoying if I had to uninstall BeeingFemale for each compiling process, don't you think so :)

When I compile a script, it will overwrite the existing pex file.... so overwriting is everything. The .esm file doesn't realy chance often and the Form IDs should stay

Ok, thanks. I know a number of mods have an uninstall function to remove script data that's no longer needed from the saves when an update is released, so I needed to make sure. :)
Link to comment
MoonSpot

MoonSpot

Posted
Posted

Currently running 2.7.2 Patch v07 and I'm getting log bloat, 30+ GB.

 

Just repeating this forever.  Did see a comment on page 195 that there was a patch uploaded somewhere, but I don't see it.

 

 

[BF_Config (1A001828)].fwsystemconfig.OnOptionSelect() - "FWSystemConfig.psc" Line 2546
    [BF_Config (1A001828)].fwsystemconfig.SelectOption() - "SKI_ConfigBase.psc" Line 1069
    [SKI_ConfigManagerInstance (7E000802)].SKI_ConfigManager.OnOptionSelect() - "SKI_ConfigManager.psc" Line 157
[01/16/2017 - 12:28:24PM] ERROR: Cannot call AddOnVisible() on a None object, aborting function ca

 

Thinking of updating to 2.8 on this playthrough but not sure if that's wise.

Link to comment
milzschnitte

milzschnitte

Posted
  • Author
Posted

Currently running 2.7.2 Patch v07 and I'm getting log bloat, 30+ GB.

 

Just repeating this forever.  Did see a comment on page 195 that there was a patch uploaded somewhere, but I don't see it.

[BF_Config (1A001828)].fwsystemconfig.OnOptionSelect() - "FWSystemConfig.psc" Line 2546
    [BF_Config (1A001828)].fwsystemconfig.SelectOption() - "SKI_ConfigBase.psc" Line 1069
    [SKI_ConfigManagerInstance (7E000802)].SKI_ConfigManager.OnOptionSelect() - "SKI_ConfigManager.psc" Line 157
[01/16/2017 - 12:28:24PM] ERROR: Cannot call AddOnVisible() on a None object, aborting function ca

Thinking of updating to 2.8 on this playthrough but not sure if that's wise.

 

That was the bug I've reported already. It will make an infinit log spam when you click on around in the AddOn Menu - I think this bug was raised from the Patch - but not sure what destroyed the AddOn Manager. The new AddOn Manager is way better, it's a complete overhaul and speeded it up a lot

 

There shouldn't be a problem with updating - up to now, no one has reported a problem except the "Sex Lab Compatibility" that is already fixed.

Link to comment
hamthe3rd

hamthe3rd

Posted
Posted

 

 

Heya peoples - to celebrate the fresh new year, have some BFAP v1.3 :)
 
Updated / Fixed Features:

  • Separate armor restriction checks for players and NPCs. 'Too tight' messages are different for player and NPCs as well.
Note: Not really sure how to handle NPC re-dressing. Would their vanilla behavior cause them to automatically re-dress once the armor check script removes it? Companion inventory control is well and good for your companions, but I'm none too keen on manipulating NPC inventories.
  • MCM Options to control NPC comment tones to avoid busting some people's immersion when one of their friends practically calls them a dumb knocked up slut. 0% will omit meant comments, 100% will cause no changes to the original comment spectrum.

 
New Features:

  • Idle NPC / Companion comments when they are pregnant. Separate MCM variable slider included to control frequency of NPC comments. These comments will more commonly fire with companions; not really sure about regular NPCs though, as they are running on vanilla scripts most of the time, and are hardly considered idle. Either way, greeting subtype dialouges will typically override them.
  • Apprentice Restoration Self and Target Spell to heal your unborn by 25%. I believe Beeing Female was supposed to heal the baby whenever you drank a potion or cast a healing spell on yourself. If it does, then the magnitude is too low to be practical, and resting until the baby is healed takes too much time. This spell should serve as a good placeholder until something formal is released.
  • NPC Belly Node Update touch spell. Not sure if it does accelerate the node updating process, but it doesn't appear to be instant.

 

As most changes alter scripts baked into saves, will require a clean save.

 

 

Thank you :)

I will test if it works to install in one current game :)

Same as the last time.

It is not hard to restart BF and reset it as it was before.

 

 

Is this still needed or now a part of the new update?

 

I believe the tampons came from this?

Link to comment
dldrzz000

dldrzz000

Posted
Posted

 

Currently running 2.7.2 Patch v07 and I'm getting log bloat, 30+ GB.

 

Just repeating this forever.  Did see a comment on page 195 that there was a patch uploaded somewhere, but I don't see it.

[BF_Config (1A001828)].fwsystemconfig.OnOptionSelect() - "FWSystemConfig.psc" Line 2546
    [BF_Config (1A001828)].fwsystemconfig.SelectOption() - "SKI_ConfigBase.psc" Line 1069
    [SKI_ConfigManagerInstance (7E000802)].SKI_ConfigManager.OnOptionSelect() - "SKI_ConfigManager.psc" Line 157
[01/16/2017 - 12:28:24PM] ERROR: Cannot call AddOnVisible() on a None object, aborting function ca

Thinking of updating to 2.8 on this playthrough but not sure if that's wise.

 

That was the bug I've reported already. It will make an infinit log spam when you click on around in the AddOn Menu - I think this bug was raised from the Patch - but not sure what destroyed the AddOn Manager. The new AddOn Manager is way better, it's a complete overhaul and speeded it up a lot

 

There shouldn't be a problem with updating - up to now, no one has reported a problem except the "Sex Lab Compatibility" that is already fixed.

 

 

I DO agree that the floods come from the unofficial patch, probably in edits of Main scripts' updating function FWAbilityBeeingBase, FWAbilityBeeingFemale and FWAbilityBeeingMale. 

Just after I installed the unofficial patch 2,7.2 V6/v7 and SL Inflation Framework for BF 2.7.2, the floods began to trouble me until I changed back to 2.7.2fix and rewrote FWAbilityBeeingFemale for SL Inflation Framework myself. 

 

Example of FWAbilityBeeingBase: Except the Nio part, only the updating function differs. 

Before edit:

 

 

Scriptname FWAbilityBeeingFemale extends FWAbilityBeeingBase
 
FWTextContents property Contents auto
 
;--------------------------------------------------------------------------------
; Variables & Properties
;--------------------------------------------------------------------------------
; State Variables
int property currentState = 0 auto hidden
float property stateEnterTime auto hidden
;float statePercentage ; (0.0 to FF100.0)
float _onUpdateGameTimeDelay = 1.0
float property stateDamageScale = 1.0 auto hidden
float CurrentStatePercent=0.0
float StateDaysRemaining=0.0
int property nextState = 1 auto hidden
 
bool property canBecomePregnantThisCycle = false auto hidden
bool property canBecomePMSThisCycle = false auto hidden
bool bHasPMS = false
float property LH = 0.0 auto hidden
 
; Baby Variables
float property UnbornHealth=0.0 auto hidden
int property NumChilds=0 auto hidden
 
float oldUpdateDelay=0.0
float property UpdateDelay=0.0 auto hidden
float property PauseStartTime=0.0 auto hidden
 
; Contraception
float ContraceptionPill=0.0
float ContraceptionTime=0.0
 
; Measurements
Float[] property BaseBellySize auto hidden
Float[] property BaseBreastSize auto hidden
Float property BaseWeight auto hidden
Float AddedBellySize = 0.0
Float AddedBreastSize = 0.0
Float AddedWeight = 0.0
int lastTypeOfScaling = -1
 
int property abortus = 0 auto hidden
float property AbortusTime = 0.0 auto hidden
bool Abortus_Fiber = false ; Player only
bool Abortus_Infection = false ; Player only
float LastBabyHealing
 
 
; Labor Pains step
; 0 - None
; 1 - Vorwehen
; 2 - Eröffnungswehen
; 3 - Presswehen
; 4 - Nachwehen
int property LaborPainsStep = 0 auto
Form[] dropedItems
 
;--------------------------------------------------------------------------------
; Events
;--------------------------------------------------------------------------------
Event OnEffectStart(Actor target, Actor caster)
float startTime = Utility.GetCurrentGameTime()
ActorRef = target
ActorRefBase = target.GetLeveledActorBase()
IsPlayer = (target==Game.GetPlayer())
 
if target==none || System.ModEnabled.GetValueInt()!=1
ActorRef.RemoveSpell(System.BeeingFemaleSpell)
ActorRef.DispelSpell(System.BeeingFemaleSpell)
return
elseif target.GetLeveledActorBase()==none
ActorRef.RemoveSpell(System.BeeingFemaleSpell)
ActorRef.DispelSpell(System.BeeingFemaleSpell)
return
endif
 
if System.IsValidateFemaleActor(ActorRef)<0
;System.Message("Beeing Female missed on " + ActorRefBase.GetName() + " Not validated",1)
ActorRef.RemoveSpell(System.BeeingFemaleSpell)
ActorRef.DispelSpell(System.BeeingFemaleSpell)
return
endIf
if (! System.NpcMentruation()) && (! isPlayer)
;System.Message("Beeing Female missed on " + ActorRefBase.GetName() + " NpcMenstruation deactivated",1)
System.Message( FWUtility.StringReplace( Contents.BeeingFemaleMissedOn2,"{0}",ActorRefBase.GetName()), System.MSG_Debug)
ActorRef.RemoveSpell(System.BeeingFemaleSpell)
ActorRef.DispelSpell(System.BeeingFemaleSpell)
return
endIf
if IsPlayer==true
System.PlayerMale = none
System.Player = self
endIf
 
IsFollower = target.IsInFaction(System.FollowerFaction) && IsPlayer == false
 
GetBaseMeasurements(True)
bInitSpell=true
System.RegisterFWCache(self)
if self as ActiveMagicEffect != none
(self as ActiveMagicEffect).RegisterForUpdate(5)  ;Edit by Bane
(self as ActiveMagicEffect).RegisterForModEvent("BeeingFemale", "BeeingFemale") ;Edit by Bane
(self as ActiveMagicEffect).RegisterForSleep() ;Edit by Bane
if oldUpdateDelay>0
(self as ActiveMagicEffect).RegisterForUpdateGameTime(oldUpdateDelay) ;Edit by Bane
else
InitState()
endif
endif
 
equipChild()
 
CheckRandomSexPartner()
InitValues()
;System.Message("Beeing Female casted on " + ActorRefBase.GetName(),0)
if Contents!=none
System.Message( FWUtility.StringReplace( Contents.BeeingFemaleCastedOn ,"{0}", ActorRef.GetLeveledActorBase().GetName() ), System.MSG_All)
endif
getLastSeenNPCs()
parent.OnEffectStart(target, caster)
System.Message("FWAbilityBeeingFemale::OnEffectStart("+ActorRef.GetLeveledActorBase().GetName()+") " + (Utility.GetCurrentRealTime() - startTime) + " sec", System.MSG_All, System.MSG_Trace)
endEvent
 
Event OnPlayerLoadGame()
float startTime = Utility.GetCurrentGameTime()
if bInit==true && bInitSpell==true && (self as ActiveMagicEffect) != none && isFormValid()
Utility.WaitMenuMode(2)
SetBelly()
UnregisterForUpdate()
RegisterForUpdate(5)
UnregisterForModEvent("BeeingFemale")
RegisterForModEvent("BeeingFemale", "BeeingFemale")
if oldUpdateDelay>0
UnregisterForUpdateGameTime()
RegisterForUpdateGameTime(oldUpdateDelay)
else
InitState()
endif
getLastSeenNPCs()
endif
;equipChild()
;parent.OnPlayerLoadGame()
System.Message("FWAbilityBeeingFemale::OnPlayerLoadGame() " + (Utility.GetCurrentRealTime() - startTime) + " sec", System.MSG_All, System.MSG_Trace)
endEvent
 
Event OnEffectFinish(Actor akTarget, Actor akCaster)
if bInitSpell==true && isFormValid() ; ***Edit by Bane
ResetBelly()
onExitState()
endif
;parent.OnEffectFinish(akTarget, akCaster) ;***Edit by Bane
parent.DispelEffectIfAble()
endEvent
 
event OnUpdate()
if ActorRef.IsSwimming()
System.Controller.WashOutSperm(ActorRef, 1, 0.8)
endif
parent.OnUpdate()
endEvent
 
event BeeingFemale(string eventName, string strArg, float numArg, Form sender)
if eventName=="BeeingFemale" && (numArg== ActorRef.GetFormID() || sender==ActorRef)
if strArg=="CheckAbortus"
checkAbortus()
elseif strArg=="Update"
InitValues()
elseif strArg=="Belly"
SetBelly()
elseif strArg=="Birth"
SetBelly()
elseif strArg=="ConceptionChance"
if (numArg==1 && IsPlayer==true) || (numArg==2 && IsFollower==true) || (numArg==3 && IsFollower==false)
System.Controller.setAutoFlag(ActorRef)
endif
elseif strArg=="Dispel"
Dispel()
endIf
endIf
endEvent
 
event OnUpdateGameTime()
float startTime = Utility.GetCurrentGameTime()
float currentTime = Utility.GetCurrentGameTime()
if System.IsActorPregnantByChaurus(ActorRef)
System.Controller.Pause(ActorRef,true)
;System.setObjective(21)
GoToState("PregnantChaurus_State")
return
endIf
 
GetStorageVariable()
 
float stateDuration = System.getStateDuration(CurrentState, ActorRef)
if stateDuration > 0
CurrentStatePercent = ((currentTime - stateEnterTime) * 100) / stateDuration
StateDaysRemaining = stateDuration - (currentTime - stateEnterTime)
if currentTime >= stateEnterTime + stateDuration
changeState(NextState)
endIf
System.Manager.onUpdateFunction(ActorRef,CurrentState,CurrentStatePercent)
else
CurrentStatePercent=0.0
System.Manager.onUpdateFunction(ActorRef,CurrentState,0)
endIf
if IsPlayer
System.Message("OnUpdateGameTime "+ActorRef.GetLeveledActorBase().GetName()+": "+CurrentState+" at "+CurrentStatePercent+"% (Dur: "+stateDuration+")",System.MSG_Debug)
else
System.Message("OnUpdateGameTime "+ActorRef.GetLeveledActorBase().GetName()+": "+CurrentState+" at "+CurrentStatePercent+"% (Dur: "+stateDuration+")",System.MSG_All)
endIf
if currentState>=4 && currentState <20
SetBelly();
AbortusPains()
endif
if IsPlayer
if System.Player==none
System.Player=self
System.PlayerMale=none
endif
System.GlobalPlayerState.SetValue(currentState)
System.GlobalPlayerStatePercent.SetValue(CurrentStatePercent)
endif
OnUpdateFunction()
System.Message("FWAbilityBeeingFemale::OnUpdateGameTime("+ActorRef.GetLeveledActorBase().GetName()+") " + (Utility.GetCurrentRealTime() - startTime) + " sec", System.MSG_All, System.MSG_Trace)
endEvent
 
Event onHit(ObjectReference akAggressor, Form akSource, Projectile akProjectile, bool abPowerAttack, bool abSneakAttack, bool abBashAttack, bool abHitBlocked)
onHitFunction(akAggressor,akSource,akProjectile,abPowerAttack,abSneakAttack,abBashAttack,abHitBlocked)
parent.onHit(akAggressor, akSource, akProjectile, abPowerAttack, abSneakAttack, abBashAttack, abHitBlocked)
endEvent
 
Event OnSpellCast(Form akSpell)
if (akSpell as Spell) != none
onCastSpellFunction(akSpell as Spell)
elseif (akSpell as potion) != none
potion p = akSpell as potion
onPotionFunction(p)
endif
If System.BadSpellList && System.BadSpellList.Find(akSpell)>0 && currentState>=4 && currentState<20
If IsPlayer
System.Message( FWUtility.StringReplace( Contents.AlcoholNotGoodForYourBaby,"{0}",ActorRefBase.GetName()), System.MSG_Low)
Else
System.Message( FWUtility.StringReplace( Contents.AlcoholNotGoodForNPCBaby,"{0}",ActorRefBase.GetName()), System.MSG_High)
EndIf
System.Controller.DamageBaby(ActorRef, 8.0)
EndIf
parent.OnSpellCast(akSpell)
EndEvent
 
 
;--------------------------------------------------------------------------------
; General Functions
;--------------------------------------------------------------------------------
 
Bool Function is_slif_installed()
Return Game.GetModbyName("SexLab Inflation Framework.esp") != 255
Endfunction
 
bool Function isFormValid()
return (ActorRef as form) != none && (ActorRefBase as ActorBase) != none
endfunction
 
function CheckRandomSexPartner()
 
endFunction
 
function InitValues()
System.Data.Update(ActorRef)
GetStorageVariable()
InitState()
endFunction
 
function GetStorageVariable()
stateEnterTime= StorageUtil.GetFloatValue(ActorRef, "FW.StateEnterTime", Utility.GetCurrentGameTime())
currentState= StorageUtil.GetIntValue(ActorRef, "FW.CurrentState",0)
UnbornHealth = StorageUtil.GetFloatValue(ActorRef,"FW.UnbornHealth",100.0)
NumChilds = StorageUtil.GetIntValue(ActorRef,"FW.NumChilds",0)
AbortusTime = StorageUtil.GetFloatValue(ActorRef,"FW.AbortusTime",0.0)
abortus = StorageUtil.GetIntValue(ActorRef, "FW.Abortus",0)
endFunction
 
function InitState()
string StateName
int ObjectiveID
bool bStateFound=true
if currentState==0
UpdateDelay=4.0 ; Less activity - lower update rate
StateName="Follicular_State"
ObjectiveID=0
nextState = 1
elseif currentState==1
UpdateDelay=1.0
StateName="Ovulation_State"
ObjectiveID=1
nextState = 2
elseif currentState==2
UpdateDelay=1.0
StateName="Luteal_State"
ObjectiveID=2
nextState = 3
elseif currentState==3
UpdateDelay=1.0
StateName="Menstruation_State"
ObjectiveID=3
nextState = 0
elseif currentState==4
UpdateDelay=3.0
StateName="PregnancyFirst_State"
ObjectiveID=4
nextState = 5
elseif currentState==5
UpdateDelay=3.0
StateName="PregnancySecond_State"
ObjectiveID=5
nextState = 6
elseif currentState==6
UpdateDelay=1.0
StateName="PregnancyThird_State"
ObjectiveID=6
nextState = 7
elseif currentState==7
UpdateDelay=0.2
StateName="LaborPains_State"
ObjectiveID=7
nextState = 8
elseif currentState==8
UpdateDelay=1.0
StateName="Replanish_State"
ObjectiveID=8
nextState = 0
else
bStateFound=false
endIf
 
if IsPlayer
System.GlobalPlayerState.SetValue(currentState)
endif
 
if (self as ActiveMagicEffect) != none
if oldUpdateDelay!=UpdateDelay && bInit==true && bInitSpell==true
UnregisterForUpdateGameTime() 
if UpdateDelay > 0 && System.cfg.PlayerTimer
RegisterForUpdateGameTime(UpdateDelay) 
endIf
oldUpdateDelay = UpdateDelay
endIf
if bStateFound
onExitState()
if isPlayer
;System.setObjective(ObjectiveID)
endif
stateEnterTime = Utility.GetCurrentGameTime()
CurrentStatePercent=0.0
StateDaysRemaining = System.getStateDuration(currentState, ActorRef)
GoToState(StateName)
castStateSpell()
onEnterState()
System.raiseModEvent("stateChanged",self)
Else
;System.Message("State not found: " + StateName, System.MSG_Error);
System.Message( FWUtility.StringReplace( Contents.StateNotFound,"{0}",StateName), System.MSG_Error)
endIf
endif
endFunction
 
function changeState(int NewState)
if (abortus > 1 && (NewState==4 || NewState==5 || NewState==6)) || (abortus > 2 && NewState==7)
return
endif
currentState=NewState
StorageUtil.SetIntValue(ActorRef,"FW.CurrentState",currentState)
StorageUtil.SetFloatValue(ActorRef,"FW.StateEnterTime", Utility.GetCurrentGameTime())
StorageUtil.SetFloatValue(ActorRef,"FW.LastUpdate",Utility.GetCurrentGameTime())
InitState()
endFunction
 
function castStateSpell()
int i=0
if !ActorRef
return
endif
while i<=8
if currentState == i
if ActorRef.HasSpell(System.StatCycleID_List) == false
ActorRef.AddSpell(System.StatCycleID_List,false)
endif
else
if ActorRef.HasSpell(System.StatCycleID_List)
ActorRef.RemoveSpell(System.StatCycleID_List)
endif
endif
i+=1
endWhile
if currentState>=0 && currentState<4
; Cycle
if ActorRef.HasSpell(System.StatMenstruationCycle)==false
ActorRef.AddSpell(System.StatMenstruationCycle,false)
endIf
if ActorRef.HasSpell(System.StatPregnancyCycle)
ActorRef.RemoveSpell(System.StatPregnancyCycle)
endIf
elseif currentState>=4 && currentState<20
; Pregnant
if ActorRef.HasSpell(System.StatMenstruationCycle)
ActorRef.RemoveSpell(System.StatMenstruationCycle)
endIf
if ActorRef.HasSpell(System.StatPregnancyCycle)==false
ActorRef.AddSpell(System.StatPregnancyCycle,false)
endIf
else
; Pregnant by other mod?
if ActorRef.HasSpell(System.StatMenstruationCycle)
ActorRef.RemoveSpell(System.StatMenstruationCycle)
endIf
if ActorRef.HasSpell(System.StatPregnancyCycle)
ActorRef.RemoveSpell(System.StatPregnancyCycle)
endIf
endif
endFunction
 
float function timeRemaining()
if System.getStateDuration(currentState, ActorRef) > 0
return System.getStateDuration(currentState, ActorRef) - (Utility.getCurrentGameTime() - stateEnterTime)
else
return Utility.getCurrentGameTime() - stateEnterTime
endIf
endFunction
 
function getLastSeenNPCs()
int Searches = 5
actor p = Game.GetPlayer()
actor a = Game.FindClosestActorFromRef(ActorRef, 2500)
if a!=p
if System.IsValidateMaleActor(a)>0
addLastSeenNPC(a)
endif
endif
while Searches>0
Searches -=1
a = Game.FindRandomActorFromRef(ActorRef, 2500)
if a!=p
if System.IsValidateMaleActor(a)>0
addLastSeenNPC(a)
endif
endif
endWhile
; Clear old values
int c = StorageUtil.FormListCount(ActorRef,"FW.LastSeenNPCs")
float t = Utility.GetCurrentGameTime()
while c>0
c-=1
; Remove all actors that are older then 2 Days and not in the same location
float tt = StorageUtil.FloatListGet(ActorRef,"FW.LastSeenNPCsTime",c)
actor ta = StorageUtil.FormListGet(ActorRef,"FW.LastSeenNPCs",c) as actor
if ta==none || ta.IsDead()
StorageUtil.FormListRemoveAt(ActorRef, "FW.LastSeenNPCsTime", c)
StorageUtil.FormListRemoveAt(ActorRef, "FW.LastSeenNPCs", c)
elseif tt < t - 2
if !ActorRef.IsInLocation(ta.GetCurrentLocation())
StorageUtil.FloatListRemoveAt(ActorRef, "FW.LastSeenNPCsTime", c)
StorageUtil.FormListRemoveAt(ActorRef, "FW.LastSeenNPCs", c)
endif
endif
endWhile
endFunction
function addLastSeenNPC(actor a)
int pos=StorageUtil.FormListFind(ActorRef,"FW.LastSeenNPCs", a)
if pos==-1
StorageUtil.FormListAdd(ActorRef,"FW.LastSeenNPCs",a)
StorageUtil.FloatListAdd(ActorRef,"FW.LastSeenNPCsTime", Utility.GetCurrentGameTime())
else
StorageUtil.FloatListSet(ActorRef,"FW.LastSeenNPCsTime", pos, Utility.GetCurrentGameTime())
endif
endFunction
 
 
 
 
;--------------------------------------------------------------------------------
; Abortus Functions
;--------------------------------------------------------------------------------
;   0 None
;   1 Abortus_imminens // drohender abortus
;   2 Abortus_incipiens // beginnender Abortus
;   3 Abortus_incompletus // unvollständiger Abort
;   4 Abortus_completus // vollständiger Abortus
;   5 Missed_Abortion // verhaltener Abort
;   6 Miscarriage // Totgeburt
bool function checkAbortus() ; SensebilityPercent - 20 = up to 20% Chances to losing child, 50 = up to 50% chance to lossingchild
if System.cfg.abortus==false
return false
endif
float hp = StorageUtil.GetFloatValue(ActorRef, "FW.UnbornHealth",100.0)
numChilds = StorageUtil.GetIntValue(ActorRef, "FW.NumChilds",0)
AbortusTime = StorageUtil.GetFloatValue(ActorRef,"FW.AbortusTime",0.0)
abortus = StorageUtil.GetIntValue(ActorRef, "FW.Abortus",0)
 
float trimesterTimeDay=System.GetStateDuration(currentState,ActorRef) / 89
 
 
if hp < 8 && numChilds>0 && abortus<=2 ; Init abortus
if abortus == 0 && hp>0
; Abortus_imminens // drohender abortus
StorageUtil.SetIntValue(ActorRef, "FW.Abortus",1)
StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
elseif abortus==0 && hp<=0
StorageUtil.SetIntValue(ActorRef, "FW.Abortus",2)
StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
StorageUtil.SetFloatValue(ActorRef, "FW.UnbornHealth",0.0)
elseif (abortus == 1 && ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*2 && AbortusTime>0) && hp<=4
; Abortus_incipiens // beginnender Abortus
StorageUtil.SetIntValue(ActorRef, "FW.Abortus",2)
StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
StorageUtil.SetFloatValue(ActorRef, "FW.UnbornHealth",0.0)
elseif abortus == 2 && ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*3 && AbortusTime>0
; Abortus variance
int randomAbortus=Utility.RandomInt(0,50)
float infectChance=0
float fiberChance=0
 
if randomAbortus < 13 && CurrentStatePercent<14 && CurrentState==4
; Abortus_completus // vollständiger Abortus
StorageUtil.SetIntValue(ActorRef, "FW.Abortus",4)
StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
fiberChance = 0.2
infectChance = 0.1
elseif randomAbortus<41 && CurrentState==4
; Abortus_incompletus // unvollständiger Abort
StorageUtil.SetIntValue(ActorRef, "FW.Abortus",3)
StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
fiberChance = 8.1
infectChance = 0.62
elseif CurrentState==4
; Missed_Abortion // verhaltener Abort
StorageUtil.SetIntValue(ActorRef, "FW.Abortus",5)
StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
fiberChance = 0.35
infectChance = 0.21
elseif CurrentState>4 && CurrentState<20
; Miscarriage // Totgeburt
StorageUtil.SetIntValue(ActorRef, "FW.Abortus",6)
StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
fiberChance = 0.71
infectChance = 0.43
endif
Abortus_Fiber = fiberChance> Utility.RandomFloat(0.0,1.0)
Abortus_Infection = infectChance> Utility.RandomFloat(0.0,1.0)
;elseif abortus>2 && ( Utility.GetCurrentGameTime() - AbortusTime)>1.20 && AbortusTime>0
; changeState(8)
endif
return true
 
; Abortus_incompletus
elseif abortus==3 &&  ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*12 && AbortusTime>0
castAbortus(5,true)
return true
 
; Abortus_completus
elseif abortus==4 &&  ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*11 && AbortusTime>0
castAbortus(3,true)
return true
 
; Missed_Abortion
elseif abortus==5 &&  ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*13 && AbortusTime>0
castAbortus(4,true)
return true
 
; still birth
elseif abortus==6 &&  ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*16 && AbortusTime>0
castAbortus(4,true)
return true
 
; Baby got some life again
elseif hp>=10 && abortus<2
StorageUtil.UnsetIntValue(ActorRef,"FW.Abortus")
StorageUtil.UnsetFloatValue(ActorRef,"FW.AbortusTime")
endIf
return false
endFunction
 
function AbortusPains()
if System.cfg.abortus==false
return
endif
if abortus >0
float Abortus_DamageScale = System.getDamageScale(5, ActorRef)
if abortus==2 && Utility.RandomInt(0,10)>6
System.Blur(Utility.RandomFloat(0.3,1.0), System.iModPainLow)
elseif abortus==3 && Utility.RandomInt(0,10)>3
System.Blur(Utility.RandomFloat(0.4,1.0), System.iModPainMiddle)
System.PlayPainSound(ActorRef)
System.DoDamage(ActorRef,3*Abortus_DamageScale,14)
elseif abortus==4 && Utility.RandomInt(0,10)>7
System.Blur(Utility.RandomFloat(0.4,0.8), System.iModPainMiddle)
System.PlayPainSound(ActorRef)
System.DoDamage(ActorRef,2*Abortus_DamageScale,14)
elseif abortus==5 && Utility.RandomInt(0,10)>5
System.Blur(Utility.RandomFloat(0.4,0.8), System.iModPainMiddle)
System.PlayPainSound(ActorRef)
System.DoDamage(ActorRef,4*Abortus_DamageScale,14)
elseif abortus==6 && Utility.RandomInt(0,10)>4
if Utility.RandomInt(0,10)>7
System.Blur(Utility.RandomFloat(0.4,0.6), System.iModPainHigh)
else
System.Blur(Utility.RandomFloat(0.4,0.8), System.iModPainMiddle)
endif
System.PlayPainSound(ActorRef)
System.DoDamage(ActorRef,2*Abortus_DamageScale,14)
Utility.Wait(5)
endif
if Abortus_Fiber==true
FWUtility.ActorAddSpell(ActorRef, System.FeverSpell)
endIf
if Abortus_Infection==true
FWUtility.ActorAddSpell(ActorRef, System.InfectionSpell)
endIf
 
if System.GlobalMenstruating.GetValueInt() == 1
if Utility.RandomInt(0,10)>8
;System.Effect_VaginalBloodHigh.cast(ActorRef,ActorRef)
FWUtility.ActorAddSpell(ActorRef,System.Effect_VaginalBloodHigh)
else
;System.Effect_VaginalBloodLow.cast(ActorRef,ActorRef)
FWUtility.ActorAddSpell(ActorRef,System.Effect_VaginalBloodLow)
endif
endif
 
Utility.Wait(1)
checkAbortus()
endif
endfunction
 
 
function castAbortus(float Strength, bool AllowBleedOut = false)
if System.cfg.abortus==false
return
endif
if IsPlayer
FWUtility.LockPlayer()
endif
 
bool bIsVaginalBleedingEmitter=false
System.Blur(1,System.AbortusImod)
Utility.Wait(1)
if AllowBleedOut
Debug.SendAnimationEvent(ActorRef, "IdleForceDefaultState")
Debug.SendAnimationEvent(ActorRef, "BleedOutStart")
Utility.Wait(2)
if ActorRef.WornHasKeyword(Keyword.GetKeyword("ArmorCuirass"))==false && ActorRef.WornHasKeyword(Keyword.GetKeyword("ClothingBody"))
; Actor is naked - start bleeding effect
FWUtility.EquipItem(ActorRef,System.VaginalBleeding)
bIsVaginalBleedingEmitter=true
endif
endif
System.Effect_VaginalBloodBig.cast(ActorRef,ActorRef)
 
int i = Utility.RandomInt(6,9)
float Abortus_DamageScale = System.getDamageScale(5, ActorRef)
while i > 0
i-=1
System.PlayPainSound(ActorRef)
System.DoDamage(ActorRef,Strength*Abortus_DamageScale,14)
Utility.Wait(1.5)
endWhile
 
if bIsVaginalBleedingEmitter==true
FWUtility.UnEquipItem(ActorRef, System.VaginalBleeding)
Utility.Wait(2)
endif
 
if ActorRef == Game.GetPlayer()
System.Message( FWUtility.StringReplace( Contents.YouHaveLostYourChild,"{0}",ActorRef.GetLeveledActorBase().GetName()), System.MSG_Immersive)
Utility.Wait(1)
else
System.Message( FWUtility.StringReplace( Contents.NPCHasLostItsChild,"{0}",ActorRef.GetLeveledActorBase().GetName()), System.MSG_Immersive)
endif
 
if AllowBleedOut
Debug.SendAnimationEvent(ActorRef, "BleedOutStop");
endif
 
StorageUtil.SetIntValue(ActorRef,"FW.NumChilds",0)
StorageUtil.UnsetFloatValue(ActorRef,"FW.UnbornHealth")
StorageUtil.FormListClear(ActorRef,"FW.ChildFather")
StorageUtil.UnsetFloatValue(ActorRef,"FW.AbortusTime")
StorageUtil.UnsetIntValue(ActorRef,"FW.Abortus")
 
Utility.Wait(1)
if IsPlayer
FWUtility.UnlockPlayer()
endif
changeState(8)
endFunction
 
 
;--------------------------------------------------------------------------------
; Belly and Brust Size functions
;--------------------------------------------------------------------------------
Function GetBaseMeasurements(Bool bInitMeasurements = False)
If bInitMeasurements || (BaseBellySize.Length != 2)
BaseBellySize = New Float[2]
BaseBellySize[0] = 1.0
BaseBellySize[1] = 1.0
EndIf
If bInitMeasurements || (BaseBreastSize.Length != 8)
BaseBreastSize = New Float[8]
BaseBreastSize[0] = 1.0
BaseBreastSize[1] = 1.0
BaseBreastSize[2] = 1.0
BaseBreastSize[3] = 1.0
BaseBreastSize[4] = 1.0
BaseBreastSize[5] = 1.0
BaseBreastSize[6] = 1.0
BaseBreastSize[7] = 1.0
EndIf
 
If NetImmerse.HasNode(ActorRef, "NPC Belly", True)
BaseBellySize[0] = NetImmerse.GetNodeScale(ActorRef, "NPC Belly", True)
EndIf
If NetImmerse.HasNode(ActorRef, "NPC Belly", False)
BaseBellySize[1] = NetImmerse.GetNodeScale(ActorRef, "NPC Belly", False)
EndIf
 
If NetImmerse.HasNode(ActorRef, "NPC L Breast", True)
BaseBreastSize[0] = NetImmerse.GetNodeScale(ActorRef, "NPC L Breast", True)
EndIf
If NetImmerse.HasNode(ActorRef, "NPC L Breast", False)
BaseBreastSize[1] = NetImmerse.GetNodeScale(ActorRef, "NPC L Breast", False)
EndIf
 
If NetImmerse.HasNode(ActorRef, "NPC R Breast", True)
BaseBreastSize[2] = NetImmerse.GetNodeScale(ActorRef, "NPC R Breast", True)
EndIf
If NetImmerse.HasNode(ActorRef, "NPC R Breast", False)
BaseBreastSize[3] = NetImmerse.GetNodeScale(ActorRef, "NPC R Breast", False)
EndIf
 
If NetImmerse.HasNode(ActorRef, "NPC L Breast01", True)
BaseBreastSize[4] = NetImmerse.GetNodeScale(ActorRef, "NPC L Breast01", True)
EndIf
If NetImmerse.HasNode(ActorRef, "NPC L Breast01", False)
BaseBreastSize[5] = NetImmerse.GetNodeScale(ActorRef, "NPC L Breast01", False)
EndIf
 
If NetImmerse.HasNode(ActorRef, "NPC R Breast01", True)
BaseBreastSize[6] = NetImmerse.GetNodeScale(ActorRef, "NPC R Breast01", True)
EndIf
If NetImmerse.HasNode(ActorRef, "NPC R Breast01", False)
BaseBreastSize[7] = NetImmerse.GetNodeScale(ActorRef, "NPC R Breast01", False)
EndIf
 
BaseWeight = ActorRefBase.GetWeight()
 
If (! bInitMeasurements)
BaseBellySize[0] = BaseBellySize[0] - AddedBellySize
BaseBellySize[1] = BaseBellySize[1] - AddedBellySize
 
BaseBreastSize[0] = BaseBreastSize[0] - AddedBreastSize
BaseBreastSize[1] = BaseBreastSize[1] - AddedBreastSize
BaseBreastSize[2] = BaseBreastSize[2] - AddedBreastSize
BaseBreastSize[3] = BaseBreastSize[3] - AddedBreastSize
 
BaseBreastSize[4] = BaseBreastSize[4] - AddedBreastSize
BaseBreastSize[5] = BaseBreastSize[5] - AddedBreastSize
BaseBreastSize[6] = BaseBreastSize[6] - AddedBreastSize
BaseBreastSize[7] = BaseBreastSize[7] - AddedBreastSize
 
BaseWeight -= AddedWeight
EndIf
EndFunction
 
;function UpdateNodes3(float afBellySize, float afBreastSize)
; If ActorRef!=none
; CANS_Framework cans = System.CANS as CANS_Framework
; If System.cfg.BellyScale==true
; cans.Belly(ActorRef, "BeeingFemale", afBellySize)
; EndIf
;
; If System.cfg.BreastScale==true
; cans.Breast(ActorRef, "BeeingFemale", afBreastSize)
; EndIf
; EndIf
;endfunction
 
Function UpdateNodes2(Float afAddedBellySize, Float afAddedBreastSize)
If ActorRef!=none
 
bool slif_installed = is_slif_installed()
 
If System.cfg.BellyScale==true
If (slif_installed)
SLIF_Main.inflate(ActorRef, "Beeing Female", "NPC Belly", afAddedBellySize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
else
if(afAddedBellySize>0)  ;Patched by qotsafan was ->  if(afAddedBreastSize>0)
NiOverride.AddNodeTransformScale(ActorRef, true, true, "NPC Belly", "BeeingFemale", afAddedBellySize +1)
NiOverride.AddNodeTransformScale(ActorRef, false, true, "NPC Belly", "BeeingFemale", afAddedBellySize +1)
else
NiOverride.RemoveNodeTransformScale(ActorRef, true, true, "NPC Belly", "BeeingFemale")
NiOverride.RemoveNodeTransformScale(ActorRef, false, true, "NPC Belly", "BeeingFemale")
endif
 
NiOverride.UpdateNodeTransform(ActorRef, true, true, "NPC Belly")
NiOverride.UpdateNodeTransform(ActorRef, false, true, "NPC Belly")
endif
EndIf
 
If System.cfg.BreastScale==true
If (slif_installed)
SLIF_Main.inflateBoth(ActorRef, "Beeing Female", "slif_breast",   afAddedBreastSize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
SLIF_Main.inflateBoth(ActorRef, "Beeing Female", "slif_breast01", afAddedBreastSize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
else
if(afAddedBreastSize>0)
NiOverride.AddNodeTransformScale(ActorRef, true, true, "NPC L Breast", "BeeingFemale", afAddedBreastSize +1)
NiOverride.AddNodeTransformScale(ActorRef, false, true, "NPC L Breast", "BeeingFemale", afAddedBreastSize +1)
 
NiOverride.AddNodeTransformScale(ActorRef, true, true, "NPC R Breast", "BeeingFemale", afAddedBreastSize +1)
NiOverride.AddNodeTransformScale(ActorRef, false, true, "NPC R Breast", "BeeingFemale", afAddedBreastSize +1)
 
NiOverride.UpdateNodeTransform(ActorRef, true, true, "NPC L Breast")
NiOverride.UpdateNodeTransform(ActorRef, false, true, "NPC R Breast")
else
NiOverride.RemoveNodeTransformScale(ActorRef, true, true, "NPC L Breast", "BeeingFemale")
NiOverride.RemoveNodeTransformScale(ActorRef, false, true, "NPC L Breast", "BeeingFemale")
 
NiOverride.RemoveNodeTransformScale(ActorRef, true, true, "NPC R Breast", "BeeingFemale")
NiOverride.RemoveNodeTransformScale(ActorRef, false, true, "NPC R Breast", "BeeingFemale")
endif
 
NiOverride.UpdateNodeTransform(ActorRef, true, true, "NPC L Breast")
NiOverride.UpdateNodeTransform(ActorRef, false, true, "NPC L Breast")
NiOverride.UpdateNodeTransform(ActorRef, true, true, "NPC R Breast")
NiOverride.UpdateNodeTransform(ActorRef, false, true, "NPC R Breast")
endif
EndIf
 
EndIf
EndFunction
 
Function UpdateNodes(Float afAddedBellySize, Float afAddedBreastSize)
If ActorRef!=none
 
bool slif_installed = is_slif_installed()
 
;Debug.Trace(afAddedBellySize + " + " + BaseBellySize[0])
 
; b3lisario Body Scaling
If System.cfg.BellyScale==true
If (slif_installed)
SLIF_Main.inflate(ActorRef, "Beeing Female", "slif_belly", afAddedBellySize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
elseIf BaseBellySize.Length == 2
If NetImmerse.HasNode(ActorRef, "NPC Belly", True)
NetImmerse.SetNodeScale(ActorRef, "NPC Belly", afAddedBellySize + BaseBellySize[0], True)
EndIf
If NetImmerse.HasNode(ActorRef, "NPC Belly", False)
NetImmerse.SetNodeScale(ActorRef, "NPC Belly", afAddedBellySize + BaseBellySize[1], False)
EndIf
EndIf
AddedBellySize = afAddedBellySize
EndIf
 
If System.cfg.BreastScale==true
If (slif_installed)
SLIF_Main.inflateBoth(ActorRef, "Beeing Female", "slif_breast",   afAddedBreastSize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
SLIF_Main.inflateBoth(ActorRef, "Beeing Female", "slif_breast01", afAddedBreastSize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
elseIf BaseBreastSize.Length == 8
If NetImmerse.HasNode(ActorRef, "NPC L Breast", True)
NetImmerse.SetNodeScale(ActorRef, "NPC L Breast", afAddedBreastSize + BaseBreastSize[0], True)
EndIf
If NetImmerse.HasNode(ActorRef, "NPC L Breast", False)
NetImmerse.SetNodeScale(ActorRef, "NPC L Breast", afAddedBreastSize + BaseBreastSize[1], False)
EndIf
 
If NetImmerse.HasNode(ActorRef, "NPC R Breast", True)
NetImmerse.SetNodeScale(ActorRef, "NPC R Breast", afAddedBreastSize + BaseBreastSize[2], True)
EndIf
If NetImmerse.HasNode(ActorRef, "NPC R Breast", False)
NetImmerse.SetNodeScale(ActorRef, "NPC R Breast", afAddedBreastSize + BaseBreastSize[3], False)
EndIf
 
; For Torpedo-Fix
If NetImmerse.HasNode(ActorRef, "NPC L Breast01", True)
NetImmerse.SetNodeScale(ActorRef, "NPC L Breast01", afAddedBreastSize + BaseBreastSize[4], True)
EndIf
If NetImmerse.HasNode(ActorRef, "NPC L Breast01", False)
NetImmerse.SetNodeScale(ActorRef, "NPC L Breast01", afAddedBreastSize + BaseBreastSize[5], False)
EndIf
 
If NetImmerse.HasNode(ActorRef, "NPC R Breast01", True)
NetImmerse.SetNodeScale(ActorRef, "NPC R Breast01", afAddedBreastSize + BaseBreastSize[6], True)
EndIf
If NetImmerse.HasNode(ActorRef, "NPC R Breast01", False)
NetImmerse.SetNodeScale(ActorRef, "NPC R Breast01", afAddedBreastSize + BaseBreastSize[7], False)
EndIf
EndIf
AddedBreastSize = afAddedBreastSize
EndIf
 
If (! ActorRef.IsOnMount())
ActorRef.QueueNiNodeUpdate()
EndIf
EndIf
EndFunction
 
Function UpdateWeight(Float afAddedWeight)
Float NewWeight = FWUtility.ClampFloat(BaseWeight + afAddedWeight, 0.0, 100.0)
Float NeckDelta = (ActorRefBase.GetWeight() - NewWeight) / 100
 
If NeckDelta && (! ActorRef.IsOnMount())
ActorRefBase.SetWeight(NewWeight)
ActorRef.UpdateWeight(NeckDelta)
ActorRef.QueueNiNodeUpdate()
 
AddedWeight = NewWeight - BaseWeight
EndIf
EndFunction
 
Function ResetBelly()
if lastTypeOfScaling == 1
UpdateNodes(0, 0)
elseif lastTypeOfScaling == 2
UpdateNodes2(0, 0)
elseif lastTypeOfScaling == 3
UpdateWeight(0)
;elseif lastTypeOfScaling == 4
;UpdateNodes3(0, 0)
endif
EndFunction
 
Function SetBelly()
float startTime = Utility.GetCurrentGameTime()
if currentState<4 || currentState>=20
return
endif
If (System.cfg.VisualScaling > 0)
Int stateID = currentState
 
float ScaleBelly = 0.0
float ScaleBreast = 0.0
 
; Scale up belly and breasts depending on how far along actor is in her
; pregnancy
If stateID == 4
; Add scale value of current trimester
ScaleBelly = System.GetPhaseScale(0, 0) * (CurrentStatePercent / 100)
ScaleBreast = System.GetPhaseScale(1, 0) * (CurrentStatePercent / 100)
ElseIf stateID == 5
ScaleBelly = System.GetPhaseScale(0, 0) + (System.GetPhaseScale(0, 1) * (CurrentStatePercent / 100))
ScaleBreast = System.GetPhaseScale(1, 0) + (System.GetPhaseScale(1, 1) * (CurrentStatePercent / 100))
ElseIf stateID == 6
ScaleBelly = System.GetPhaseScale(0, 0) + System.GetPhaseScale(0, 1) + (System.GetPhaseScale(0, 2) * (CurrentStatePercent / 100))
ScaleBreast = System.GetPhaseScale(0, 0) + System.GetPhaseScale(1, 1) + (System.GetPhaseScale(1, 2) * (CurrentStatePercent / 100))
 
; Set to maximum scale in labor pains phase and later
ElseIf stateID == 7
ScaleBelly = 1.0
ScaleBreast = 1.0
 
; Scale back belly and breasts over the course of recovery  phase
ElseIf stateID == 8
;ScaleBelly = FWUtility.MaxFloat(0.0, ((System.GetPhaseScale(0, 0) + System.GetPhaseScale(0, 1)) / 2.0) - (CurrentStatePercent / 3))
ScaleBelly = FWUtility.MaxFloat(0.0, (33 - CurrentStatePercent) / 100)
ScaleBreast = FWUtility.MaxFloat(0.0, (100 - CurrentStatePercent) / 100)
EndIf
 
; Scale with number of children
If NumChilds > 1 && stateID<8
ScaleBelly *= Math.Pow(1.15, NumChilds - 1)
ScaleBreast *= Math.Pow(1.08, NumChilds - 1)
EndIf
 
; Race specific scaling
;ScaleBelly *= System.Manager.ActorSizeScaler(0, ActorRef)
;ScaleBreast *= System.Manager.ActorSizeScaler(1, ActorRef)
 
If System.cfg.VisualScaling == 1
if lastTypeOfScaling == 2
UpdateNodes2(0, 0)
elseif lastTypeOfScaling == 3
UpdateWeight(0.0)
elseif lastTypeOfScaling == 4
;UpdateNodes3(0, 0)
endif
;Debug.Trace(ActorRef.GetLeveledActorBase().GetName()+".UpdateNodes( "+ScaleBelly+" * "+System.cfg.BellyMaxScale+", "+ScaleBreast+" * ("+System.cfg.BreastsMaxScale+" - 1))")
UpdateNodes(ScaleBelly * System.cfg.BellyMaxScale, ScaleBreast * System.cfg.BreastsMaxScale)
ElseIf System.cfg.VisualScaling == 2
if lastTypeOfScaling == 1
UpdateNodes(0, 0)
elseif lastTypeOfScaling == 3
UpdateWeight(0.0)
elseif lastTypeOfScaling == 4
;UpdateNodes3(0, 0)
endif
;Debug.Trace(ActorRef.GetLeveledActorBase().GetName()+".UpdateNodes( "+ScaleBelly+" * "+System.cfg.BellyMaxScale+", "+ScaleBreast+" * ("+System.cfg.BreastsMaxScale+" - 1))")
UpdateNodes2(ScaleBelly * System.cfg.BellyMaxScale, ScaleBreast * System.cfg.BreastsMaxScale)
ElseIf System.cfg.VisualScaling == 3
if lastTypeOfScaling == 1
UpdateNodes(0, 0)
elseif lastTypeOfScaling == 2
UpdateNodes2(0, 0)
elseif lastTypeOfScaling == 4
;UpdateNodes3(0, 0)
endif
Float MaxAdditionalWeight = FWUtility.MinFloat(System.cfg.WeightGainMax, 100 - BaseWeight)
Float addWeight = (ScaleBelly * MaxAdditionalWeight)
UpdateWeight(addWeight)
;ElseIf System.cfg.VisualScaling == 4
;if lastTypeOfScaling == 1
; UpdateNodes(0, 0)
;elseif lastTypeOfScaling == 2
; UpdateNodes2(0, 0)
;elseif lastTypeOfScaling == 3
; UpdateWeight(0.0)
;endif
;UpdateNodes3(ScaleBelly * System.cfg.BellyMaxScale, ScaleBreast * System.cfg.BreastsMaxScale)
EndIf
 
lastTypeOfScaling = System.cfg.VisualScaling
Elseif lastTypeOfScaling != System.cfg.VisualScaling
ResetBelly()
lastTypeOfScaling = System.cfg.VisualScaling
EndIf
System.Message("FWAbilityBeeingFemale::SetBelly("+ActorRef.GetLeveledActorBase().GetName()+") " + (Utility.GetCurrentRealTime() - startTime) + " sec", System.MSG_All, System.MSG_Trace)
EndFunction
 
 
 
function castMentrualBlood()
if !ActorRef || System.GlobalMenstruating.GetValueInt() != 1
return
endif
if ActorRef.IsEquipped(System.Sanitary_Napkin_Normal) || ActorRef.IsEquipped(System.Tampon_Normal)
; Panty or Tampon is equipped
if ActorRef.IsEquipped(System.Sanitary_Napkin_Normal)
if IsPlayer==true
System.Message( System.Content.YourPantys, System.MSG_Low)
ActorRef.UnequipItem(System.Sanitary_Napkin_Normal, false, true)
ActorRef.RemoveItem(System.Sanitary_Napkin_Normal, 1, true)
ActorRef.addItem(System.Sanitary_Napkin_Bloody, 1, true)
ActorRef.EquipItem(System.Sanitary_Napkin_Bloody, false, true)
else
System.Message( FWUtility.StringReplace( System.Content.NPCPantys , "{0}", ActorRef.GetLeveledActorBase().GetName()), System.MSG_Debug)
ActorRef.UnequipItem(System.Sanitary_Napkin_Normal, false, true)
ActorRef.RemoveItem(System.Sanitary_Napkin_Normal, 1, true)
ActorRef.addItem(System.Sanitary_Napkin_Bloody, 1, true)
ActorRef.EquipItem(System.Sanitary_Napkin_Bloody, false, true)
Utility.WaitGameTime(0.5) ; Wait some time till redress another sani napkin
EquipNapkin()
endif
else
if IsPlayer==true
System.Message( System.Content.YourTampon, System.MSG_Low)
ActorRef.UnequipItem(System.Tampon_Normal, false, true)
ActorRef.RemoveItem(System.Tampon_Normal, 1, true)
ActorRef.addItem(System.Tampon_Bloody, 1, true)
ActorRef.EquipItem(System.Tampon_Bloody, false, true)
else
System.Message( FWUtility.StringReplace( System.Content.NPCTampon , "{0}", ActorRef.GetLeveledActorBase().GetName()), System.MSG_Debug)
ActorRef.UnequipItem(System.Tampon_Normal, false, true)
ActorRef.RemoveItem(System.Tampon_Normal, 1, true)
ActorRef.addItem(System.Tampon_Bloody, 1, true)
ActorRef.EquipItem(System.Tampon_Bloody, false, true)
Utility.WaitGameTime(0.5) ; Wait some time till redress another sani napkin
EquipTampon()
endif
endif
else
; Cast blood
if Utility.RandomInt(0,10)>8 && System.Effect_VaginalBloodHigh
;System.Effect_VaginalBloodHigh.cast(ActorRef,ActorRef)
FWUtility.ActorAddSpell(ActorRef,System.Effect_VaginalBloodHigh, false, true)
elseif System.Effect_VaginalBloodLow
;System.Effect_VaginalBloodLow.cast(ActorRef,ActorRef)
FWUtility.ActorAddSpell(ActorRef,System.Effect_VaginalBloodLow, false, true)
endif
endif
endFunction
 
function EquipNapkin()
if System.GlobalMenstruating.GetValueInt() == 1
if ActorRef.GetItemCount(System.Sanitary_Napkin_Normal)>1 && ActorRef.IsEquipped(System.Sanitary_Napkin_Normal)==false
form ax = ActorRef.GetWornForm(System.Sanitary_Napkin_Normal.GetSlotMask())
if ax!=none
ActorRef.UnequipItem(ax)
endif
ActorRef.EquipItem(System.Sanitary_Napkin_Bloody, false, true)
endif
endif
endfunction
 
function EquipTampon()
if System.GlobalMenstruating.GetValueInt() == 1
if ActorRef.GetItemCount(System.Tampon_Normal)>1 && ActorRef.IsEquipped(System.Tampon_Normal)==false
form ax = ActorRef.GetWornForm(System.Tampon_Normal.GetSlotMask())
if ax!=none
ActorRef.UnequipItem(ax)
endif
ActorRef.EquipItem(System.Tampon_Bloody, false, true)
endif
endif
endfunction
 
float SleepingStart
Event OnSleepStart(float afSleepStartTime, float afDesiredSleepEndTime)
SleepingStart=Utility.GetCurrentGameTime()
parent.OnSleepStart(afSleepStartTime, afDesiredSleepEndTime)
endEvent
Event OnSleepStop(bool abInterrupted)
float SleepDur
if SleepingStart>0.0
SleepDur = Utility.GetCurrentGameTime() - SleepingStart
System.Controller.HealBaby(ActorRef,SleepDur*1.3)
endif
SleepingStart=0.0
parent.OnSleepStop(abInterrupted)
endEvent
float SitStart
Event OnSit(ObjectReference akFurniture)
SitStart=Utility.GetCurrentGameTime()
endEvent
Event OnGetUp(ObjectReference akFurniture)
float SitDur
if SitStart>0.0
SitDur = Utility.GetCurrentGameTime() - SitStart
System.Controller.HealBaby(ActorRef,SitDur*0.5)
endif
SitStart=0.0
endEvent
 
Event OnDeath(Actor akKiller)
if ActorRef==Game.GetPlayer()
System.Controller.DamageBaby(ActorRef,92)
else
FWSaveLoad.Delete(ActorRef)
endif
parent.OnDeath(akKiller)
endEvent
 
 
 
 
 
;--------------------------------------------------------------------------------
; StateFunctions
;--------------------------------------------------------------------------------
function onEnterState()
endFunction
function onExitState()
endFunction
function onUpdateFunction()
endFunction
function onHitFunction(ObjectReference akAggressor, Form akSource, Projectile akProjectile, bool abPowerAttack, bool abSneakAttack, bool abBashAttack, bool abHitBlocked)
endFunction
function onPotionFunction(potion Item)
endFunction
function onCastSpellFunction(spell SpellID)
endFunction
 
;--------------------------------------------------------------------------------
; State - Follicular
;--------------------------------------------------------------------------------
state Follicular_State
function onEnterState()
if ActorRef==Game.GetPlayer()
System.Controller.setAutoFlag(ActorRef)
endIf
System.Manager.CastCME(ActorRef,0,System.cfg.PMSEffects)
bHasPMS==false
endFunction
 
function onExitState()
ActorRef.removeSpell(System.Effect_Vorwehen)
System.Manager.RemoveCME(ActorRef,1)
bHasPMS==false
endfunction
endState
 
;--------------------------------------------------------------------------------
; State - Ovulation
;--------------------------------------------------------------------------------
state Ovulation_State
 
function onEnterState()
FWUtility.ActorAddSpell(ActorRef,System.Effect_Mittelschmerz)
System.Manager.CastCME(ActorRef,1,System.cfg.PMSEffects)
System.Manager.removeCME(ActorRef)
bHasPMS==false
endfunction
 
function onUpdateFunction()
if CurrentStatePercent > 40
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Mittelschmerz)
else
FWUtility.ActorAddSpell(ActorRef,System.Effect_Mittelschmerz)
endif
if CurrentStatePercent >= 50
; Check for Pregnancy
int rnd = Utility.RandomInt(0,15)
if rnd<7
; Actor is pregnant!
if System.Controller.ActiveSpermImpregnation(ActorRef)==true
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Mittelschmerz)
changeState(4)
endif
endIf
endif
endfunction
 
function onExitState()
; Make sure Mittelschmerz was removed
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Mittelschmerz)
System.Manager.removeCME(ActorRef,1)
bHasPMS==false
endfunction
endState
 
;--------------------------------------------------------------------------------
; State - Luteal
;--------------------------------------------------------------------------------
state Luteal_State
function onUpdateFunction()
if CurrentStatePercent < 65
; Check for Pregnancy
; Simulate FH Hormones
Float rnd = Utility.RandomFloat(0,100)
float chance = System.LutealImpregnationTime(CurrentStatePercent)
if chance > rnd
if System.Controller.ActiveSpermImpregnation(ActorRef)==true
; Actor is pregnant!
System.Manager.removeCME(ActorRef,3)
changeState(4)
return
endif
endIf
endIf
if CurrentStatePercent > 75
; Check for PMS
if bHasPMS==false && System.Controller.canBecomePMS(ActorRef)==true
System.Message("Cast PMS for "+ActorRef.GetLeveledActorBase().GetName(), System.MSG_Debug )
System.Manager.castCME(ActorRef,3,System.cfg.PMSEffects)
bHasPMS=true
endIf
 
; Check for Tampons
if !isPlayer && ActorRef.GetItemCount(System.Tampon_Normal)<=2  ;***Edit by Bane
ActorRef.AddItem(System.Tampon_Normal,6)
endif
endif
endFunction
 
function onEnterState()
System.Manager.CastCME(ActorRef,2,System.cfg.PMSEffects)
System.Manager.removeCME(ActorRef,1)
bHasPMS=false
if CurrentStatePercent > 75
; Check for PMS
if bHasPMS==false && System.Controller.canBecomePMS(ActorRef)==true
bHasPMS=true
System.Message("Cast PMS for "+ActorRef.GetLeveledActorBase().GetName(), System.MSG_Debug )
System.Manager.castCME(ActorRef,3,System.cfg.PMSEffects)
System.Message("Casted", System.MSG_Debug )
endIf
endif
endFunction
 
function onExitState()
; Remove PMS
System.Manager.RemoveCME(ActorRef,2)
System.Manager.removeCME(ActorRef,3)
bHasPMS=false
endFunction
endState
 
;--------------------------------------------------------------------------------
; State - Menstruation
;--------------------------------------------------------------------------------
state Menstruation_State
function onEnterState()
EquipNapkin()
FWUtility.ActorAddSpell(ActorRef,System.Effect_MenstruationCramps)
System.Manager.removeCME(ActorRef,3)
System.Manager.removeCME(ActorRef,2)
System.Manager.CastCME(ActorRef,4,System.cfg.PMSEffects)
bHasPMS=false
endfunction
 
function onUpdateFunction()
EquipNapkin()
if Utility.RandomInt(1,24)<=6
castMentrualBlood()
endif
if !isPlayer && ActorRef.GetItemCount(System.Tampon_Normal)<=2 ;***Edit by Bane
ActorRef.AddItem(System.Tampon_Normal,6)
endif
EquipNapkin()
endfunction
 
function onExitState()
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_MenstruationCramps)
System.Controller.setAutoFlag(ActorRef)
System.Manager.RemoveCME(ActorRef,4)
endfunction
endState
 
;--------------------------------------------------------------------------------
; State 1. Trimester
;--------------------------------------------------------------------------------
state PregnancyFirst_State
function onHitFunction(ObjectReference akAggressor, Form akSource, Projectile akProjectile, bool abPowerAttack, bool abSneakAttack, bool abBashAttack, bool abHitBlocked)
if (abPowerAttack || abSneakAttack || abBashAttack) && !abHitBlocked
System.Controller.DamageBaby(ActorRef, Utility.RandomFloat(2,7))
endIf
endfunction
 
function onEnterState()
System.Manager.CastCME(ActorRef,5,System.cfg.PMSEffects)
System.Manager.RemoveCME(ActorRef,4)
endFunction
 
function onExitState()
System.Manager.RemoveCME(ActorRef,5)
endFunction
 
function onPotionFunction(potion p)
int c = p.GetNumEffects()
while c>0
c-=1
if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchRestoreHealth")
System.Controller.HealBaby(ActorRef, p.GetNthEffectMagnitude© / 5)
endif
if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchHarmful")
System.Controller.DamageBaby(ActorRef, p.GetNthEffectMagnitude© / 10)
endif
endwhile
endFunction
 
function onUpdateFunction()
checkAbortus()
float GT = Utility.GetCurrentGameTime()
int HealAmount = Math.Floor( GT - LastBabyHealing)
if HealAmount >0
System.Controller.HealBaby(ActorRef, HealAmount )
LastBabyHealing=GT
endif
endFunction
endState
 
;--------------------------------------------------------------------------------
; State 2. Trimester
;--------------------------------------------------------------------------------
state PregnancySecond_State
function onHitFunction(ObjectReference akAggressor, Form akSource, Projectile akProjectile, bool abPowerAttack, bool abSneakAttack, bool abBashAttack, bool abHitBlocked)
if (abPowerAttack || abSneakAttack || abBashAttack) && !abHitBlocked
System.Controller.DamageBaby(ActorRef, Utility.RandomFloat(0,3))
endIf
endfunction
 
function onEnterState()
System.Manager.RemoveCME(ActorRef,5)
System.Manager.CastCME(ActorRef,6,System.cfg.PMSEffects)
endFunction
 
function onExitState()
System.Manager.RemoveCME(ActorRef,6)
endFunction
 
function onPotionFunction(potion p)
int c = p.GetNumEffects()
while c>0
c-=1
if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchRestoreHealth")
System.Controller.HealBaby(ActorRef, p.GetNthEffectMagnitude© / 10)
endif
if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchHarmful")
System.Controller.DamageBaby(ActorRef, p.GetNthEffectMagnitude© / 10)
endif
endwhile
endFunction
 
function onUpdateFunction()
checkAbortus()
float GT = Utility.GetCurrentGameTime()
int HealAmount = Math.Floor( GT - LastBabyHealing) * 3
if HealAmount >0
System.Controller.HealBaby(ActorRef, HealAmount )
LastBabyHealing=GT
endif
endFunction
endState
 
;--------------------------------------------------------------------------------
; State 3. Trimester
;--------------------------------------------------------------------------------
state PregnancyThrid_State
function onUpdateFunction()
if CurrentStatePercent > 90
; Vorwehen
FWUtility.ActorAddSpell(ActorRef,System.Effect_Vorwehen)
endIf
if CurrentStatePercent > 75 && Utility.RandomInt(0,10)>4
; Breast milk
int rnd= Utility.RandomInt(0,10)
if rnd<6
System.Message("Breast Milk1 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk1,false,true)
;System.Effect_BreastMilk1.cast(ActorRef, ActorRef)
elseif rnd<10
System.Message("Breast Milk2 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk2,false,true)
;System.Effect_BreastMilk2.cast(ActorRef, ActorRef)
else
System.Message("Breast Milk3 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk3,false,true)
;System.Effect_BreastMilk3.cast(ActorRef, ActorRef)
endif
endIf
checkAbortus()
 
; Baby hits - let the controler vibrate
if Utility.RandomInt(0, 100) > 60
float intensity = Utility.RandomFloat(0.5, 1.0)
game.shakeController(intensity, intensity, Utility.RandomFloat(0.2, 1.0))
endif
 
float GT = Utility.GetCurrentGameTime()
int HealAmount = Math.Floor( GT - LastBabyHealing) * 5
if HealAmount >0
System.Controller.HealBaby(ActorRef, HealAmount )
LastBabyHealing=GT
endif
endFunction
 
function onEnterState()
System.Manager.RemoveCME(ActorRef,6)
System.Manager.CastCME(ActorRef,7,System.cfg.PMSEffects)
endFunction
 
function onHitFunction(ObjectReference akAggressor, Form akSource, Projectile akProjectile, bool abPowerAttack, bool abSneakAttack, bool abBashAttack, bool abHitBlocked)
if (abPowerAttack || abSneakAttack || abBashAttack) && !abHitBlocked
System.Controller.DamageBaby(ActorRef, Utility.RandomFloat(0,2))
endIf
endfunction
 
function onPotionFunction(potion p)
int c = p.GetNumEffects()
while c>0
c-=1
if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchRestoreHealth")
System.Controller.HealBaby(ActorRef, p.GetNthEffectMagnitude© / 10)
endif
if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchHarmful")
System.Controller.DamageBaby(ActorRef, p.GetNthEffectMagnitude© / 10)
endif
endwhile
endFunction
 
function onExitState()
; Remove Vorwehen
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Vorwehen)
System.Manager.RemoveCME(ActorRef,7)
endFunction
endState
 
;--------------------------------------------------------------------------------
; State Labor Pains
;--------------------------------------------------------------------------------
state LaborPains_State
function onEnterState()
System.Manager.RemoveCME(ActorRef,7)
System.Manager.CastCME(ActorRef,8,System.cfg.PMSEffects)
if CurrentStatePercent >=50 && CurrentStatePercent<95 && ActorRef.HasSpell(System.Effect_Presswehen)==false
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Eroeffnungswehen)
FWUtility.ActorAddSpell(ActorRef,System.Effect_Presswehen)
System.Controller.GiveBirth(ActorRef)
return
elseif CurrentStatePercent>=95
System.InstantBornChilds(ActorRef)
changeState(8)
return
elseif CurrentStatePercent < 50
FWUtility.ActorAddSpell(ActorRef,System.Effect_Eroeffnungswehen)
if ActorRef==Game.GetPlayer()
FWUtility.LockPlayer()
System.Message(Contents.YourPregnantWaterBreaks,System.MSG_Immersive)
else
System.Message( FWUtility.StringReplace(Contents.NPCPregnantWaterBreaks,"{0}",ActorRef.GetLeveledActorBase().GetName()) ,System.MSG_Low)
endif
FWUtility.EquipItem(ActorRef,System.AmnioticFluid)
Utility.Wait(8)
FWUtility.UnequipItem(ActorRef,System.AmnioticFluid)
if ActorRef==Game.GetPlayer()
FWUtility.UnlockPlayer()
endif
endif
endFunction
 
function onUpdateFunction()
;Debug.Trace(CurrentStatePercent+"% at Labor Pains for "+ActorRef.GetLeveledActorBase().GetName())
if CurrentStatePercent >=50 && CurrentStatePercent<95 && ActorRef.HasSpell(System.Effect_Presswehen)==false
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Eroeffnungswehen)
FWUtility.ActorAddSpell(ActorRef,System.Effect_Presswehen)
System.Controller.GiveBirth(ActorRef)
return
elseif CurrentStatePercent>=95
System.InstantBornChilds(ActorRef)
changeState(8)
return
elseif CurrentStatePercent<50 && ActorRef.HasSpell(System.Effect_Eroeffnungswehen)==false
FWUtility.ActorAddSpell(ActorRef,System.Effect_Eroeffnungswehen)
endif
endFunction
 
function onExitState()
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Eroeffnungswehen)
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Presswehen)
System.Manager.RemoveCME(ActorRef,8)
;System.InstantBornChilds(ActorRef)
endFunction
endState
 
;--------------------------------------------------------------------------------
; State - Replanish
;--------------------------------------------------------------------------------
state Replanish_State
function onEnterState()
System.Manager.RemoveCME(ActorRef,8)
System.Manager.CastCME(ActorRef,9,System.cfg.PMSEffects)
SetBelly()
 
equipChild()
 
if ActorRef.GetItemCount(System.ContraceptionLow)<=1 && IsPlayer==false
ActorRef.AddItem(System.ContraceptionLow, 10, false)
endif
 
;FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Eroeffnungswehen)
;FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Presswehen)
if CurrentStatePercent < 4
FWUtility.ActorAddSpell(ActorRef,System.Effect_Nachwehen)
endif
endFunction
 
function onUpdateFunction()
if CurrentStatePercent >=4
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Nachwehen)
else
FWUtility.ActorAddSpell(ActorRef,System.Effect_Nachwehen)
endif
if CurrentStatePercent >= 2 && ActorRef.HasSpell(System.FeverSpell)
FWUtility.ActorRemoveSpell(ActorRef, System.FeverSpell)
endif
if CurrentStatePercent < 20 && Utility.RandomInt(0,10)>4
; Breast milk
int rnd= Utility.RandomInt(0,10)
if rnd<6
System.Message("Breast Milk1 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk1,false,true)
;System.Effect_BreastMilk1.cast(ActorRef, ActorRef)
elseif rnd<10
System.Message("Breast Milk2 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk2,false,true)
;System.Effect_BreastMilk2.cast(ActorRef, ActorRef)
else
System.Message("Breast Milk3 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk3,false,true)
;System.Effect_BreastMilk3.cast(ActorRef, ActorRef)
endif
endIf
endFunction
 
function onExitState()
FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Nachwehen)
FWUtility.ActorRemoveSpell(ActorRef,System.FeverSpell)
FWUtility.ActorRemoveSpell(ActorRef,System.InfectionSpell)
ResetBelly()
System.Controller.setAutoFlag(ActorRef)
endFunction
endState
 
;--------------------------------------------------------------------------------
; State - Pregnant by unknown Mod
;--------------------------------------------------------------------------------
state PregnantUnknown_State
function SetBelly()
endFunction
endState
 
;--------------------------------------------------------------------------------
; State - Pregnant by Chaurus
;--------------------------------------------------------------------------------
state PregnantChaurus_State
 
; THANK YOU CORUM FOR THE FIX!
; A lot of respect to figure out how FWController and FWSystem works without having a guide!
 
function OnUpdateFunction()
if System.IsActorPregnantByChaurus(ActorRef)==false
System.Controller.Pause(ActorRef,false)
 
If (currentstate <4 || currentState == 8) ;If actor was not pregnant force menstruation after EC completes
changeState(3)
elseif (currentState == 4)
castAbortus(3,true)
elseif (currentState == 5)
castAbortus(4,true)
elseif (currentState == 6 || currentState == 7)
castAbortus(5,true)
else
changeState(3) ; If everything fails force menstruation
endif
endIf
endFunction
endState

 

 

 

after edit

 

 

Scriptname FWAbilityBeeingFemale extends FWAbilityBeeingBase
 
FWTextContents property Contents auto
 
;--------------------------------------------------------------------------------
; Variables & Properties
;--------------------------------------------------------------------------------
; State Variables
int property currentState = 0 auto hidden
float property stateEnterTime auto hidden
;float statePercentage ; (0.0 to FF100.0)
float _onUpdateGameTimeDelay = 0.1
float property stateDamageScale = 1.0 auto hidden
float CurrentStatePercent=0.0
float StateDaysRemaining=0.0
int property nextState = 1 auto hidden
 
bool property canBecomePregnantThisCycle = false auto hidden
bool property canBecomePMSThisCycle = false auto hidden
bool bHasPMS = false
float property LH = 0.0 auto hidden
 
; Baby Variables
float property UnbornHealth=0.0 auto hidden
int property NumChilds=0 auto hidden
 
float oldUpdateDelay=0.0
float property UpdateDelay=0.0 auto hidden
float property PauseStartTime=0.0 auto hidden
 
; Contraception
float ContraceptionPill=0.0
float ContraceptionTime=0.0
 
; Measurements
Float[] property BaseBellySize auto hidden
Float[] property BaseBreastSize auto hidden
Float property BaseWeight auto hidden
Float AddedBellySize = 0.0
Float AddedBreastSize = 0.0
Float AddedWeight = 0.0
int lastTypeOfScaling = -1
 
int property abortus = 0 auto hidden
float property AbortusTime = 0.0 auto hidden
bool Abortus_Fiber = false ; Player only
bool Abortus_Infection = false ; Player only
float LastBabyHealing
 
 
; Labor Pains step
; 0 - None
; 1 - Vorwehen
; 2 - Eröffnungswehen
; 3 - Presswehen
; 4 - Nachwehen
int property LaborPainsStep = 0 auto
Form[] dropedItems
 
;--------------------------------------------------------------------------------
; Events
;--------------------------------------------------------------------------------
Event OnEffectStart(Actor target, Actor caster)
    float startTime = Utility.GetCurrentGameTime()
    ActorRef = target
    ActorRefBase = target.GetLeveledActorBase()
    IsPlayer = (target==Game.GetPlayer())
    
    if target==none || System.ModEnabled.GetValueInt()!=1
        ActorRef.RemoveSpell(System.BeeingFemaleSpell)
        ActorRef.DispelSpell(System.BeeingFemaleSpell)
        return
    elseif target.GetLeveledActorBase()==none
        ActorRef.RemoveSpell(System.BeeingFemaleSpell)
        ActorRef.DispelSpell(System.BeeingFemaleSpell)
        return
    endif
    
    if System.IsValidateFemaleActor(ActorRef)<0
        ;System.Message("Beeing Female missed on " + ActorRefBase.GetName() + " Not validated",1)
        ActorRef.RemoveSpell(System.BeeingFemaleSpell)
        ActorRef.DispelSpell(System.BeeingFemaleSpell)
        return
    endIf
    if (! System.NpcMentruation()) && (! isPlayer)
        ;System.Message("Beeing Female missed on " + ActorRefBase.GetName() + " NpcMenstruation deactivated",1)
        System.Message( FWUtility.StringReplace( Contents.BeeingFemaleMissedOn2,"{0}",ActorRefBase.GetName()), System.MSG_Debug)
        ActorRef.RemoveSpell(System.BeeingFemaleSpell)
        ActorRef.DispelSpell(System.BeeingFemaleSpell)
        return
    endIf
    if IsPlayer==true
        System.PlayerMale = none
        System.Player = self
    endIf
    
    IsFollower = target.IsInFaction(System.FollowerFaction) && IsPlayer == false
    
    GetBaseMeasurements(True)
    bInitSpell=true
    System.RegisterFWCache(self)
    
    if self as ActiveMagicEffect != none
        RegisterForUpdate(5)
        RegisterForModEvent("BeeingFemale", "BeeingFemale")
        RegisterForSleep()
        if oldUpdateDelay>0
            RegisterForUpdateGameTime(oldUpdateDelay)
        else
            InitState()
        endif
    endif
    
    equipChild()
    
    CheckRandomSexPartner()
    InitValues()
    ;System.Message("Beeing Female casted on " + ActorRefBase.GetName(),0)
    if Contents!=none
        System.Message( FWUtility.StringReplace( Contents.BeeingFemaleCastedOn ,"{0}", ActorRef.GetLeveledActorBase().GetName() ), System.MSG_All)
    endif
    getLastSeenNPCs()
    parent.OnEffectStart(target, caster)
    System.Message("FWAbilityBeeingFemale::OnEffectStart("+ActorRef.GetLeveledActorBase().GetName()+") " + (Utility.GetCurrentRealTime() - startTime) + " sec", System.MSG_All, System.MSG_Trace)
endEvent
 
function OnGameLoad()
    float startTime = Utility.GetCurrentGameTime()
    if bInit==true && bInitSpell==true && self as ActiveMagicEffect != none
        Utility.WaitMenuMode(2)
        SetBelly()
        UnregisterForUpdate()
        RegisterForUpdate(5)
        UnregisterForModEvent("BeeingFemale")
        RegisterForModEvent("BeeingFemale", "BeeingFemale")
        if oldUpdateDelay>0
            UnregisterForUpdateGameTime()
            RegisterForUpdateGameTime(oldUpdateDelay)
        else
            InitState()
        endif
        getLastSeenNPCs()
    endif
    equipChild()
    parent.OnGameLoad()
    System.Message("FWAbilityBeeingFemale::OnGameLoad() " + (Utility.GetCurrentRealTime() - startTime) + " sec", System.MSG_All, System.MSG_Trace)
endFunction
 
Event OnEffectFinish(Actor akTarget, Actor akCaster)
    if bInitSpell==true
        ResetBelly()
        onExitState()
    endif
    parent.OnEffectFinish(akTarget, akCaster)
endEvent
 
event OnUpdate()
    if ActorRef.IsSwimming()
        System.Controller.WashOutSperm(ActorRef, 1, 0.8)
    endif
    parent.OnUpdate()
endEvent
 
event BeeingFemale(string eventName, string strArg, float numArg, Form sender)
    if eventName=="BeeingFemale" && (numArg== ActorRef.GetFormID() || sender==ActorRef)
        if strArg=="CheckAbortus"
            checkAbortus()
        elseif strArg=="Update"
            InitValues()
        elseif strArg=="Belly"
            SetBelly()
        elseif strArg=="Birth"
            SetBelly()
        elseif strArg=="ConceptionChance"
            if (numArg==1 && IsPlayer==true) || (numArg==2 && IsFollower==true) || (numArg==3 && IsFollower==false)
                System.Controller.setAutoFlag(ActorRef)
            endif
        elseif strArg=="Dispel"
            Dispel()
        endIf
    endIf
endEvent
 
event OnUpdateGameTime()
    float startTime = Utility.GetCurrentGameTime()
    float currentTime = Utility.GetCurrentGameTime()
    if System.IsActorPregnantByChaurus(ActorRef)
        System.Controller.Pause(ActorRef,true)
        System.setObjective(21) 
        GoToState("PregnantChaurus_State")
        return
    endIf
    
    GetStorageVariable()
    
    float stateDuration = System.getStateDuration(CurrentState, ActorRef)
    if stateDuration > 0
        CurrentStatePercent = ((currentTime - stateEnterTime) * 100) / stateDuration
        StateDaysRemaining = stateDuration - (currentTime - stateEnterTime)
        if currentTime >= stateEnterTime + stateDuration
            changeState(NextState)
        endIf
        System.Manager.onUpdateFunction(ActorRef,CurrentState,CurrentStatePercent)
    else
        CurrentStatePercent=0.0
        System.Manager.onUpdateFunction(ActorRef,CurrentState,0)
    endIf
    if IsPlayer
        System.Message("OnUpdateGameTime "+ActorRef.GetLeveledActorBase().GetName()+": "+CurrentState+" at "+CurrentStatePercent+"% (Dur: "+stateDuration+")",System.MSG_Debug)
    else
        System.Message("OnUpdateGameTime "+ActorRef.GetLeveledActorBase().GetName()+": "+CurrentState+" at "+CurrentStatePercent+"% (Dur: "+stateDuration+")",System.MSG_All)
    endIf
    if currentState>=4 && currentState <20
        SetBelly();
        AbortusPains()
    endif
    if IsPlayer
        if System.Player==none
            System.Player=self
            System.PlayerMale=none
        endif
        System.GlobalPlayerState.SetValue(currentState)
        System.GlobalPlayerStatePercent.SetValue(CurrentStatePercent)
    endif
    OnUpdateFunction()
    System.Message("FWAbilityBeeingFemale::OnUpdateGameTime("+ActorRef.GetLeveledActorBase().GetName()+") " + (Utility.GetCurrentRealTime() - startTime) + " sec", System.MSG_All, System.MSG_Trace)
endEvent
 
Event onHit(ObjectReference akAggressor, Form akSource, Projectile akProjectile, bool abPowerAttack, bool abSneakAttack, bool abBashAttack, bool abHitBlocked)
    onHitFunction(akAggressor,akSource,akProjectile,abPowerAttack,abSneakAttack,abBashAttack,abHitBlocked)
    parent.onHit(akAggressor, akSource, akProjectile, abPowerAttack, abSneakAttack, abBashAttack, abHitBlocked)
endEvent
 
Event OnSpellCast(Form akSpell)
    if (akSpell as Spell) != none
        onCastSpellFunction(akSpell as Spell)
    elseif (akSpell as potion) != none
        potion p = akSpell as potion
        onPotionFunction(p)
    endif
    If System.BadSpellList && System.BadSpellList.Find(akSpell)>0 && currentState>=4 && currentState<20
        If IsPlayer
            System.Message( FWUtility.StringReplace( Contents.AlcoholNotGoodForYourBaby,"{0}",ActorRefBase.GetName()), System.MSG_Low)
        Else
            System.Message( FWUtility.StringReplace( Contents.AlcoholNotGoodForNPCBaby,"{0}",ActorRefBase.GetName()), System.MSG_High)
        EndIf
        System.Controller.DamageBaby(ActorRef, 8.0)
    EndIf
    parent.OnSpellCast(akSpell)
EndEvent
 
 
;--------------------------------------------------------------------------------
; General Functions
;--------------------------------------------------------------------------------
 
Bool Function is_slif_installed()
    Return Game.GetModbyName("SexLab Inflation Framework.esp") != 255
Endfunction
 
bool Function isFormValid()
    return (ActorRef as form) != none && (ActorRefBase as ActorBase) != none
endfunction
 
function CheckRandomSexPartner()
    
endFunction
 
 
function InitValues()
    System.Data.Update(ActorRef)
    GetStorageVariable()
    InitState()
endFunction
 
function GetStorageVariable()
    stateEnterTime= StorageUtil.GetFloatValue(ActorRef, "FW.StateEnterTime", Utility.GetCurrentGameTime())
    currentState= StorageUtil.GetIntValue(ActorRef, "FW.CurrentState",0)
    UnbornHealth = StorageUtil.GetFloatValue(ActorRef,"FW.UnbornHealth",100.0)
    NumChilds = StorageUtil.GetIntValue(ActorRef,"FW.NumChilds",0)
    AbortusTime = StorageUtil.GetFloatValue(ActorRef,"FW.AbortusTime",0.0)
    abortus = StorageUtil.GetIntValue(ActorRef, "FW.Abortus",0)
endFunction
 
function InitState()
    string StateName
    int ObjectiveID
    bool bStateFound=true
    if currentState==0
        UpdateDelay=4.0 ; Less activity - lower update rate
        StateName="Follicular_State"
        ObjectiveID=0
        nextState = 1
    elseif currentState==1
        UpdateDelay=1.0
        StateName="Ovulation_State"
        ObjectiveID=1
        nextState = 2
    elseif currentState==2
        UpdateDelay=1.0
        StateName="Luteal_State"
        ObjectiveID=2
        nextState = 3
    elseif currentState==3
        UpdateDelay=1.0
        StateName="Menstruation_State"
        ObjectiveID=3
        nextState = 0
    elseif currentState==4
        UpdateDelay=3.0
        StateName="PregnancyFirst_State"
        ObjectiveID=4
        nextState = 5
    elseif currentState==5
        UpdateDelay=3.0
        StateName="PregnancySecond_State"
        ObjectiveID=5
        nextState = 6
    elseif currentState==6
        UpdateDelay=1.0
        StateName="PregnancyThird_State"
        ObjectiveID=6
        nextState = 7
    elseif currentState==7
        UpdateDelay=0.2
        StateName="LaborPains_State"
        ObjectiveID=7
        nextState = 8
    elseif currentState==8
        UpdateDelay=1.0
        StateName="Replanish_State"
        ObjectiveID=8
        nextState = 0
    else
        bStateFound=false
    endIf
    
    if IsPlayer
        System.GlobalPlayerState.SetValue(currentState)
    endif
    
    if self as ActiveMagicEffect!=none
        if oldUpdateDelay!=UpdateDelay && bInit==true && bInitSpell==true
            UnregisterForUpdateGameTime() 
            if UpdateDelay > 0 && System.cfg.PlayerTimer
                RegisterForUpdateGameTime(UpdateDelay) 
            endIf
            oldUpdateDelay = UpdateDelay
        endIf
        if bStateFound
            onExitState()
            if isPlayer
                System.setObjective(ObjectiveID)
            endif
            stateEnterTime = Utility.GetCurrentGameTime()
            CurrentStatePercent=0.0
            StateDaysRemaining = System.getStateDuration(currentState, ActorRef)
            GoToState(StateName)
            castStateSpell()
            onEnterState()
            System.raiseModEvent("stateChanged",self)
        Else
            ;System.Message("State not found: " + StateName, System.MSG_Error);
            System.Message( FWUtility.StringReplace( Contents.StateNotFound,"{0}",StateName), System.MSG_Error)
        endIf
    endif
endFunction
 
function changeState(int NewState)
    if (abortus > 1 && (NewState==4 || NewState==5 || NewState==6)) || (abortus > 2 && NewState==7)
        return
    endif
    currentState=NewState
    StorageUtil.SetIntValue(ActorRef,"FW.CurrentState",currentState)
    StorageUtil.SetFloatValue(ActorRef,"FW.StateEnterTime", Utility.GetCurrentGameTime())
    StorageUtil.SetFloatValue(ActorRef,"FW.LastUpdate",Utility.GetCurrentGameTime())
    InitState()
endFunction
 
function castStateSpell()
    int i=0
    if !ActorRef
        return
    endif
    while i<=8
        if currentState == i
            if ActorRef.HasSpell(System.StatCycleID_List) == false
                ActorRef.AddSpell(System.StatCycleID_List,false)
            endif
        else
            if ActorRef.HasSpell(System.StatCycleID_List)
                ActorRef.RemoveSpell(System.StatCycleID_List)
            endif
        endif
        i+=1
    endWhile
    if currentState>=0 && currentState<4
        ; Cycle
        if ActorRef.HasSpell(System.StatMenstruationCycle)==false
            ActorRef.AddSpell(System.StatMenstruationCycle,false)
        endIf
        if ActorRef.HasSpell(System.StatPregnancyCycle)
            ActorRef.RemoveSpell(System.StatPregnancyCycle)
        endIf
    elseif currentState>=4 && currentState<20
        ; Pregnant
        if ActorRef.HasSpell(System.StatMenstruationCycle)
            ActorRef.RemoveSpell(System.StatMenstruationCycle)
        endIf
        if ActorRef.HasSpell(System.StatPregnancyCycle)==false
            ActorRef.AddSpell(System.StatPregnancyCycle,false)
        endIf
    else
        ; Pregnant by other mod?
        if ActorRef.HasSpell(System.StatMenstruationCycle)
            ActorRef.RemoveSpell(System.StatMenstruationCycle)
        endIf
        if ActorRef.HasSpell(System.StatPregnancyCycle)
            ActorRef.RemoveSpell(System.StatPregnancyCycle)
        endIf
    endif
endFunction
 
float function timeRemaining()
    if System.getStateDuration(currentState, ActorRef) > 0
        return System.getStateDuration(currentState, ActorRef) - (Utility.getCurrentGameTime() - stateEnterTime)
    else
        return Utility.getCurrentGameTime() - stateEnterTime
    endIf
endFunction
 
function getLastSeenNPCs()
    int Searches = 5
    actor p = Game.GetPlayer()
    actor a = Game.FindClosestActorFromRef(ActorRef, 2500)
    if a!=p
        if System.IsValidateMaleActor(a)>0
            addLastSeenNPC(a)
        endif
    endif
    while Searches>0
        Searches -=1
        a = Game.FindRandomActorFromRef(ActorRef, 2500)
        if a!=p
            if System.IsValidateMaleActor(a)>0
                addLastSeenNPC(a)
            endif
        endif
    endWhile
    ; Clear old values
    int c = StorageUtil.FormListCount(ActorRef,"FW.LastSeenNPCs")
    float t = Utility.GetCurrentGameTime()
    while c>0
        c-=1
        ; Remove all actors that are older then 2 Days and not in the same location
        float tt = StorageUtil.FloatListGet(ActorRef,"FW.LastSeenNPCsTime",c)
        actor ta = StorageUtil.FormListGet(ActorRef,"FW.LastSeenNPCs",c) as actor
        if ta==none || ta.IsDead()
            StorageUtil.FormListRemoveAt(ActorRef, "FW.LastSeenNPCsTime", c)
            StorageUtil.FormListRemoveAt(ActorRef, "FW.LastSeenNPCs", c)
        elseif tt < t - 2
            if !ActorRef.IsInLocation(ta.GetCurrentLocation())
                StorageUtil.FloatListRemoveAt(ActorRef, "FW.LastSeenNPCsTime", c)
                StorageUtil.FormListRemoveAt(ActorRef, "FW.LastSeenNPCs", c)
            endif
        endif
    endWhile
endFunction
function addLastSeenNPC(actor a)
    int pos=StorageUtil.FormListFind(ActorRef,"FW.LastSeenNPCs", a)
    if pos==-1
        StorageUtil.FormListAdd(ActorRef,"FW.LastSeenNPCs",a)
        StorageUtil.FloatListAdd(ActorRef,"FW.LastSeenNPCsTime", Utility.GetCurrentGameTime())
    else
        StorageUtil.FloatListSet(ActorRef,"FW.LastSeenNPCsTime", pos, Utility.GetCurrentGameTime())
    endif
endFunction
 
 
 
 
;--------------------------------------------------------------------------------
; Abortus Functions
;--------------------------------------------------------------------------------
;   0   None
;   1   Abortus_imminens // drohender abortus
;   2   Abortus_incipiens // beginnender Abortus
;   3   Abortus_incompletus // unvollständiger Abort
;   4   Abortus_completus // vollständiger Abortus
;   5   Missed_Abortion // verhaltener Abort
;   6   Miscarriage // Totgeburt
bool function checkAbortus() ; SensebilityPercent - 20 = up to 20% Chances to losing child, 50 = up to 50% chance to lossingchild
    if System.cfg.abortus==false
        return false
    endif
    float hp = StorageUtil.GetFloatValue(ActorRef, "FW.UnbornHealth",100.0)
    numChilds = StorageUtil.GetIntValue(ActorRef, "FW.NumChilds",0)
    AbortusTime = StorageUtil.GetFloatValue(ActorRef,"FW.AbortusTime",0.0)
    abortus = StorageUtil.GetIntValue(ActorRef, "FW.Abortus",0)
    
    float trimesterTimeDay=System.GetStateDuration(currentState,ActorRef) / 89
    
    
    if hp < 8 && numChilds>0 && abortus<=2 ; Init abortus
        if abortus == 0 && hp>0
            ; Abortus_imminens // drohender abortus
            StorageUtil.SetIntValue(ActorRef, "FW.Abortus",1)
            StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
        elseif abortus==0 && hp<=0
            StorageUtil.SetIntValue(ActorRef, "FW.Abortus",2)
            StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
            StorageUtil.SetFloatValue(ActorRef, "FW.UnbornHealth",0.0)
        elseif (abortus == 1 && ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*2 && AbortusTime>0) && hp<=4
            ; Abortus_incipiens // beginnender Abortus
            StorageUtil.SetIntValue(ActorRef, "FW.Abortus",2)
            StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
            StorageUtil.SetFloatValue(ActorRef, "FW.UnbornHealth",0.0)
        elseif abortus == 2 && ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*3 && AbortusTime>0
            ; Abortus variance
            int randomAbortus=Utility.RandomInt(0,50)
            float infectChance=0
            float fiberChance=0
            
            if randomAbortus < 13 && CurrentStatePercent<14 && CurrentState==4
                ; Abortus_completus // vollständiger Abortus
                StorageUtil.SetIntValue(ActorRef, "FW.Abortus",4)
                StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
                fiberChance = 0.2
                infectChance = 0.1
            elseif randomAbortus<41 && CurrentState==4
                ; Abortus_incompletus // unvollständiger Abort
                StorageUtil.SetIntValue(ActorRef, "FW.Abortus",3)
                StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
                fiberChance = 8.1
                infectChance = 0.62
            elseif CurrentState==4
                ; Missed_Abortion // verhaltener Abort
                StorageUtil.SetIntValue(ActorRef, "FW.Abortus",5)
                StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
                fiberChance = 0.35
                infectChance = 0.21
            elseif CurrentState>4 && CurrentState<20
                ; Miscarriage // Totgeburt
                StorageUtil.SetIntValue(ActorRef, "FW.Abortus",6)
                StorageUtil.SetFloatValue(ActorRef, "FW.AbortusTime",Utility.GetCurrentGameTime())
                fiberChance = 0.71
                infectChance = 0.43
            endif
            Abortus_Fiber = fiberChance> Utility.RandomFloat(0.0,1.0)
            Abortus_Infection = infectChance> Utility.RandomFloat(0.0,1.0)
        ;elseif abortus>2 && ( Utility.GetCurrentGameTime() - AbortusTime)>1.20 && AbortusTime>0
        ;   changeState(8)
        endif
        return true
    
    ; Abortus_incompletus
    elseif abortus==3 &&  ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*12 && AbortusTime>0
        castAbortus(5,true)
        return true
        
    ; Abortus_completus
    elseif abortus==4 &&  ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*11 && AbortusTime>0
        castAbortus(3,true)
        return true
    
    ; Missed_Abortion
    elseif abortus==5 &&  ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*13 && AbortusTime>0
        castAbortus(4,true)
        return true
    
    ; still birth
    elseif abortus==6 &&  ( Utility.GetCurrentGameTime() - AbortusTime)>trimesterTimeDay*16 && AbortusTime>0
        castAbortus(4,true)
        return true
    
    ; Baby got some life again
    elseif hp>=10 && abortus<2
        StorageUtil.UnsetIntValue(ActorRef,"FW.Abortus")
        StorageUtil.UnsetFloatValue(ActorRef,"FW.AbortusTime")
    endIf
    return false
endFunction
 
function AbortusPains()
    if System.cfg.abortus==false
        return
    endif
    if abortus >0
        float Abortus_DamageScale = System.getDamageScale(5, ActorRef)
        if abortus==2 && Utility.RandomInt(0,10)>6
            System.Blur(Utility.RandomFloat(0.3,1.0), System.iModPainLow)
        elseif abortus==3 && Utility.RandomInt(0,10)>3
            System.Blur(Utility.RandomFloat(0.4,1.0), System.iModPainMiddle)
            System.PlayPainSound(ActorRef)
            System.DoDamage(ActorRef,3*Abortus_DamageScale,14)
        elseif abortus==4 && Utility.RandomInt(0,10)>7
            System.Blur(Utility.RandomFloat(0.4,0.8), System.iModPainMiddle)
            System.PlayPainSound(ActorRef)
            System.DoDamage(ActorRef,2*Abortus_DamageScale,14)
        elseif abortus==5 && Utility.RandomInt(0,10)>5
            System.Blur(Utility.RandomFloat(0.4,0.8), System.iModPainMiddle)
            System.PlayPainSound(ActorRef)
            System.DoDamage(ActorRef,4*Abortus_DamageScale,14)
        elseif abortus==6 && Utility.RandomInt(0,10)>4
            if Utility.RandomInt(0,10)>7
                System.Blur(Utility.RandomFloat(0.4,0.6), System.iModPainHigh)
            else
                System.Blur(Utility.RandomFloat(0.4,0.8), System.iModPainMiddle)
            endif
            System.PlayPainSound(ActorRef)
            System.DoDamage(ActorRef,2*Abortus_DamageScale,14)
            Utility.Wait(5)
        endif
        if Abortus_Fiber==true
            FWUtility.ActorAddSpell(ActorRef, System.FeverSpell)
        endIf
        if Abortus_Infection==true
            FWUtility.ActorAddSpell(ActorRef, System.InfectionSpell)
        endIf
        
        if System.GlobalMenstruating.GetValueInt() == 1
            if Utility.RandomInt(0,10)>8
                ;System.Effect_VaginalBloodHigh.cast(ActorRef,ActorRef)
                FWUtility.ActorAddSpell(ActorRef,System.Effect_VaginalBloodHigh)
            else
                ;System.Effect_VaginalBloodLow.cast(ActorRef,ActorRef)
                FWUtility.ActorAddSpell(ActorRef,System.Effect_VaginalBloodLow)
            endif
        endif
        
        Utility.Wait(1)
        checkAbortus()
    endif
endfunction
 
 
function castAbortus(float Strength, bool AllowBleedOut = false)
    if System.cfg.abortus==false
        return
    endif
    if IsPlayer
        FWUtility.LockPlayer()
    endif
    
    bool bIsVaginalBleedingEmitter=false
    System.Blur(1,System.AbortusImod)
    Utility.Wait(1)
    if AllowBleedOut
        Debug.SendAnimationEvent(ActorRef, "IdleForceDefaultState")
        Debug.SendAnimationEvent(ActorRef, "BleedOutStart")
        Utility.Wait(2)
        if ActorRef.WornHasKeyword(Keyword.GetKeyword("ArmorCuirass"))==false && ActorRef.WornHasKeyword(Keyword.GetKeyword("ClothingBody"))
            ; Actor is naked - start bleeding effect
            FWUtility.EquipItem(ActorRef,System.VaginalBleeding)
            bIsVaginalBleedingEmitter=true
        endif
    endif
    System.Effect_VaginalBloodBig.cast(ActorRef,ActorRef)
    
    int i = Utility.RandomInt(6,9)
    float Abortus_DamageScale = System.getDamageScale(5, ActorRef)
    while i > 0
        i-=1
        System.PlayPainSound(ActorRef)
        System.DoDamage(ActorRef,Strength*Abortus_DamageScale,14)
        Utility.Wait(1.5)
    endWhile
    
    if bIsVaginalBleedingEmitter==true
        FWUtility.UnEquipItem(ActorRef, System.VaginalBleeding)
        Utility.Wait(2)
    endif
    
    if ActorRef == Game.GetPlayer()
        System.Message( FWUtility.StringReplace( Contents.YouHaveLostYourChild,"{0}",ActorRef.GetLeveledActorBase().GetName()), System.MSG_Immersive)
        Utility.Wait(1)
    else
        System.Message( FWUtility.StringReplace( Contents.NPCHasLostItsChild,"{0}",ActorRef.GetLeveledActorBase().GetName()), System.MSG_Immersive)
    endif
    
    if AllowBleedOut
        Debug.SendAnimationEvent(ActorRef, "BleedOutStop");
    endif
    
    StorageUtil.SetIntValue(ActorRef,"FW.NumChilds",0)
    StorageUtil.UnsetFloatValue(ActorRef,"FW.UnbornHealth")
    StorageUtil.FormListClear(ActorRef,"FW.ChildFather")
    StorageUtil.UnsetFloatValue(ActorRef,"FW.AbortusTime")
    StorageUtil.UnsetIntValue(ActorRef,"FW.Abortus")
    
    Utility.Wait(1)
    if IsPlayer
        FWUtility.UnlockPlayer()
    endif
    changeState(8)
endFunction
 
 
;--------------------------------------------------------------------------------
; Belly and Brust Size functions
;--------------------------------------------------------------------------------
Function GetBaseMeasurements(Bool bInitMeasurements = False)
    If bInitMeasurements || (BaseBellySize.Length != 2)
        BaseBellySize = New Float[2]
        BaseBellySize[0] = 1.0
        BaseBellySize[1] = 1.0
    EndIf
    If bInitMeasurements || (BaseBreastSize.Length != 8)
        BaseBreastSize = New Float[8]
        BaseBreastSize[0] = 1.0
        BaseBreastSize[1] = 1.0
        BaseBreastSize[2] = 1.0
        BaseBreastSize[3] = 1.0
        BaseBreastSize[4] = 1.0
        BaseBreastSize[5] = 1.0
        BaseBreastSize[6] = 1.0
        BaseBreastSize[7] = 1.0
    EndIf
    
    If NetImmerse.HasNode(ActorRef, "NPC Belly", True)
        BaseBellySize[0] = NetImmerse.GetNodeScale(ActorRef, "NPC Belly", True)
    EndIf
    If NetImmerse.HasNode(ActorRef, "NPC Belly", False)
        BaseBellySize[1] = NetImmerse.GetNodeScale(ActorRef, "NPC Belly", False)
    EndIf
    
    If NetImmerse.HasNode(ActorRef, "NPC L Breast", True)
        BaseBreastSize[0] = NetImmerse.GetNodeScale(ActorRef, "NPC L Breast", True)
    EndIf
    If NetImmerse.HasNode(ActorRef, "NPC L Breast", False)
        BaseBreastSize[1] = NetImmerse.GetNodeScale(ActorRef, "NPC L Breast", False)
    EndIf
    
    If NetImmerse.HasNode(ActorRef, "NPC R Breast", True)
        BaseBreastSize[2] = NetImmerse.GetNodeScale(ActorRef, "NPC R Breast", True)
    EndIf
    If NetImmerse.HasNode(ActorRef, "NPC R Breast", False)
        BaseBreastSize[3] = NetImmerse.GetNodeScale(ActorRef, "NPC R Breast", False)
    EndIf
    
    If NetImmerse.HasNode(ActorRef, "NPC L Breast01", True)
        BaseBreastSize[4] = NetImmerse.GetNodeScale(ActorRef, "NPC L Breast01", True)
    EndIf
    If NetImmerse.HasNode(ActorRef, "NPC L Breast01", False)
        BaseBreastSize[5] = NetImmerse.GetNodeScale(ActorRef, "NPC L Breast01", False)
    EndIf
    
    If NetImmerse.HasNode(ActorRef, "NPC R Breast01", True)
        BaseBreastSize[6] = NetImmerse.GetNodeScale(ActorRef, "NPC R Breast01", True)
    EndIf
    If NetImmerse.HasNode(ActorRef, "NPC R Breast01", False)
        BaseBreastSize[7] = NetImmerse.GetNodeScale(ActorRef, "NPC R Breast01", False)
    EndIf
    
    BaseWeight = ActorRefBase.GetWeight()
    
    If (! bInitMeasurements)
        BaseBellySize[0] = BaseBellySize[0] - AddedBellySize
        BaseBellySize[1] = BaseBellySize[1] - AddedBellySize
        
        BaseBreastSize[0] = BaseBreastSize[0] - AddedBreastSize
        BaseBreastSize[1] = BaseBreastSize[1] - AddedBreastSize
        BaseBreastSize[2] = BaseBreastSize[2] - AddedBreastSize
        BaseBreastSize[3] = BaseBreastSize[3] - AddedBreastSize
        
        BaseBreastSize[4] = BaseBreastSize[4] - AddedBreastSize
        BaseBreastSize[5] = BaseBreastSize[5] - AddedBreastSize
        BaseBreastSize[6] = BaseBreastSize[6] - AddedBreastSize
        BaseBreastSize[7] = BaseBreastSize[7] - AddedBreastSize
        
        BaseWeight -= AddedWeight
    EndIf
EndFunction
 
;function UpdateNodes3(float afBellySize, float afBreastSize)
;   If ActorRef!=none
;       CANS_Framework cans = System.CANS as CANS_Framework
;       If System.cfg.BellyScale==true
;           cans.Belly(ActorRef, "BeeingFemale", afBellySize)
;       EndIf
;       
;       If System.cfg.BreastScale==true
;           cans.Breast(ActorRef, "BeeingFemale", afBreastSize)
;       EndIf
;   EndIf
;endfunction
 
Function UpdateNodes2(Float afAddedBellySize, Float afAddedBreastSize)
    If ActorRef!=none
        
        bool slif_installed = is_slif_installed()
        
        If System.cfg.BellyScale==true
            If (slif_installed)
                SLIF_Main.inflate(ActorRef, "Beeing Female", "NPC Belly", afAddedBellySize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
            else
                if(afAddedBellySize>0)  ;Patched by qotsafan was ->  if(afAddedBreastSize>0)
                    NiOverride.AddNodeTransformScale(ActorRef, true, true, "NPC Belly", "BeeingFemale", afAddedBellySize +1)
                    NiOverride.AddNodeTransformScale(ActorRef, false, true, "NPC Belly", "BeeingFemale", afAddedBellySize +1)
                else
                    NiOverride.RemoveNodeTransformScale(ActorRef, true, true, "NPC Belly", "BeeingFemale")
                    NiOverride.RemoveNodeTransformScale(ActorRef, false, true, "NPC Belly", "BeeingFemale")
                endif
                
                NiOverride.UpdateNodeTransform(ActorRef, true, true, "NPC Belly")
                NiOverride.UpdateNodeTransform(ActorRef, false, true, "NPC Belly")
            endif
        EndIf
        
        If System.cfg.BreastScale==true
            If (slif_installed)
                SLIF_Main.inflateBoth(ActorRef, "Beeing Female", "slif_breast",   afAddedBreastSize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
                SLIF_Main.inflateBoth(ActorRef, "Beeing Female", "slif_breast01", afAddedBreastSize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
            else
                if(afAddedBreastSize>0)
                    NiOverride.AddNodeTransformScale(ActorRef, true, true, "NPC L Breast", "BeeingFemale", afAddedBreastSize +1)
                    NiOverride.AddNodeTransformScale(ActorRef, false, true, "NPC L Breast", "BeeingFemale", afAddedBreastSize +1)
                    
                    NiOverride.AddNodeTransformScale(ActorRef, true, true, "NPC R Breast", "BeeingFemale", afAddedBreastSize +1)
                    NiOverride.AddNodeTransformScale(ActorRef, false, true, "NPC R Breast", "BeeingFemale", afAddedBreastSize +1)
                    
                    NiOverride.UpdateNodeTransform(ActorRef, true, true, "NPC L Breast")
                    NiOverride.UpdateNodeTransform(ActorRef, false, true, "NPC R Breast")
                else
                    NiOverride.RemoveNodeTransformScale(ActorRef, true, true, "NPC L Breast", "BeeingFemale")
                    NiOverride.RemoveNodeTransformScale(ActorRef, false, true, "NPC L Breast", "BeeingFemale")
                    
                    NiOverride.RemoveNodeTransformScale(ActorRef, true, true, "NPC R Breast", "BeeingFemale")
                    NiOverride.RemoveNodeTransformScale(ActorRef, false, true, "NPC R Breast", "BeeingFemale")
                endif
                
                NiOverride.UpdateNodeTransform(ActorRef, true, true, "NPC L Breast")
                NiOverride.UpdateNodeTransform(ActorRef, false, true, "NPC L Breast")
                NiOverride.UpdateNodeTransform(ActorRef, true, true, "NPC R Breast")
                NiOverride.UpdateNodeTransform(ActorRef, false, true, "NPC R Breast")
            endif
        EndIf
        
    EndIf
EndFunction
 
Function UpdateNodes(Float afAddedBellySize, Float afAddedBreastSize)
    If ActorRef!=none
        
        bool slif_installed = is_slif_installed()
        
        ;Debug.Trace(afAddedBellySize + " + " + BaseBellySize[0])
        
        ; b3lisario Body Scaling
        If System.cfg.BellyScale==true
            If (slif_installed)
                SLIF_Main.inflate(ActorRef, "Beeing Female", "slif_belly", afAddedBellySize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
            elseIf BaseBellySize.Length == 2
                If NetImmerse.HasNode(ActorRef, "NPC Belly", True)
                    NetImmerse.SetNodeScale(ActorRef, "NPC Belly", afAddedBellySize + BaseBellySize[0], True)
                EndIf
                If NetImmerse.HasNode(ActorRef, "NPC Belly", False)
                    NetImmerse.SetNodeScale(ActorRef, "NPC Belly", afAddedBellySize + BaseBellySize[1], False)
                EndIf
            EndIf
            AddedBellySize = afAddedBellySize
        EndIf
        
        If System.cfg.BreastScale==true
            If (slif_installed)
                SLIF_Main.inflateBoth(ActorRef, "Beeing Female", "slif_breast",   afAddedBreastSize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
                SLIF_Main.inflateBoth(ActorRef, "Beeing Female", "slif_breast01", afAddedBreastSize + 1, -1, -1, "BeeingFemale", 0.0, 100.0, 1.0, 0.1)
            elseIf BaseBreastSize.Length == 8
                If NetImmerse.HasNode(ActorRef, "NPC L Breast", True)
                    NetImmerse.SetNodeScale(ActorRef, "NPC L Breast", afAddedBreastSize + BaseBreastSize[0], True)
                EndIf
                If NetImmerse.HasNode(ActorRef, "NPC L Breast", False)
                    NetImmerse.SetNodeScale(ActorRef, "NPC L Breast", afAddedBreastSize + BaseBreastSize[1], False)
                EndIf
                
                If NetImmerse.HasNode(ActorRef, "NPC R Breast", True)
                    NetImmerse.SetNodeScale(ActorRef, "NPC R Breast", afAddedBreastSize + BaseBreastSize[2], True)
                EndIf
                If NetImmerse.HasNode(ActorRef, "NPC R Breast", False)
                    NetImmerse.SetNodeScale(ActorRef, "NPC R Breast", afAddedBreastSize + BaseBreastSize[3], False)
                EndIf
                
                ; For Torpedo-Fix
                If NetImmerse.HasNode(ActorRef, "NPC L Breast01", True)
                    NetImmerse.SetNodeScale(ActorRef, "NPC L Breast01", afAddedBreastSize + BaseBreastSize[4], True)
                EndIf
                If NetImmerse.HasNode(ActorRef, "NPC L Breast01", False)
                    NetImmerse.SetNodeScale(ActorRef, "NPC L Breast01", afAddedBreastSize + BaseBreastSize[5], False)
                EndIf
                
                If NetImmerse.HasNode(ActorRef, "NPC R Breast01", True)
                    NetImmerse.SetNodeScale(ActorRef, "NPC R Breast01", afAddedBreastSize + BaseBreastSize[6], True)
                EndIf
                If NetImmerse.HasNode(ActorRef, "NPC R Breast01", False)
                    NetImmerse.SetNodeScale(ActorRef, "NPC R Breast01", afAddedBreastSize + BaseBreastSize[7], False)
                EndIf
            EndIf
            AddedBreastSize = afAddedBreastSize
        EndIf
        
        If (! ActorRef.IsOnMount())
            ActorRef.QueueNiNodeUpdate()
        EndIf
    EndIf
EndFunction
 
Function UpdateWeight(Float afAddedWeight)
    Float NewWeight = FWUtility.ClampFloat(BaseWeight + afAddedWeight, 0.0, 100.0)
    Float NeckDelta = (ActorRefBase.GetWeight() - NewWeight) / 100
    
    If NeckDelta && (! ActorRef.IsOnMount())
        ActorRefBase.SetWeight(NewWeight)
        ActorRef.UpdateWeight(NeckDelta)
        ActorRef.QueueNiNodeUpdate()
        
        AddedWeight = NewWeight - BaseWeight
    EndIf
EndFunction
 
Function ResetBelly()
    if lastTypeOfScaling == 1
        UpdateNodes(0, 0)
    elseif lastTypeOfScaling == 2
        UpdateNodes2(0, 0)
    elseif lastTypeOfScaling == 3
        UpdateWeight(0)
    ;elseif lastTypeOfScaling == 4
        ;UpdateNodes3(0, 0)
    endif
EndFunction
 
Function SetBelly()
    float startTime = Utility.GetCurrentGameTime()
    if currentState<4 || currentState>=20
        return
    endif
    If (System.cfg.VisualScaling > 0)
        Int stateID = currentState
        
        float ScaleBelly = 0.0
        float ScaleBreast = 0.0
        
        ; Scale up belly and breasts depending on how far along actor is in her
        ; pregnancy
        If stateID == 4
            ; Add scale value of current trimester
            ScaleBelly = System.GetPhaseScale(0, 0) * (CurrentStatePercent / 100)
            ScaleBreast = System.GetPhaseScale(1, 0) * (CurrentStatePercent / 100)
        ElseIf stateID == 5
            ScaleBelly = System.GetPhaseScale(0, 0) + (System.GetPhaseScale(0, 1) * (CurrentStatePercent / 100))
            ScaleBreast = System.GetPhaseScale(1, 0) + (System.GetPhaseScale(1, 1) * (CurrentStatePercent / 100))
        ElseIf stateID == 6
            ScaleBelly = System.GetPhaseScale(0, 0) + System.GetPhaseScale(0, 1) + (System.GetPhaseScale(0, 2) * (CurrentStatePercent / 100))
            ScaleBreast = System.GetPhaseScale(0, 0) + System.GetPhaseScale(1, 1) + (System.GetPhaseScale(1, 2) * (CurrentStatePercent / 100))
            
        ; Set to maximum scale in labor pains phase and later
        ElseIf stateID == 7
            ScaleBelly = 1.0
            ScaleBreast = 1.0
        
        ; Scale back belly and breasts over the course of recovery  phase
        ElseIf stateID == 8
            ;ScaleBelly = FWUtility.MaxFloat(0.0, ((System.GetPhaseScale(0, 0) + System.GetPhaseScale(0, 1)) / 2.0) - (CurrentStatePercent / 3))
            ScaleBelly = FWUtility.MaxFloat(0.0, (33 - CurrentStatePercent) / 100)
            ScaleBreast = FWUtility.MaxFloat(0.0, (100 - CurrentStatePercent) / 100)
        EndIf
        
        ; Scale with number of children
        If NumChilds > 1 && stateID<8
            ScaleBelly *= Math.Pow(1.15, NumChilds - 1)
            ScaleBreast *= Math.Pow(1.08, NumChilds - 1)
        EndIf
        
        ; Race specific scaling
        ;ScaleBelly *= System.Manager.ActorSizeScaler(0, ActorRef)
        ;ScaleBreast *= System.Manager.ActorSizeScaler(1, ActorRef)
        
        If System.cfg.VisualScaling == 1
            if lastTypeOfScaling == 2
                UpdateNodes2(0, 0)
            elseif lastTypeOfScaling == 3
                UpdateWeight(0.0)
            elseif lastTypeOfScaling == 4
                ;UpdateNodes3(0, 0)
            endif
            ;Debug.Trace(ActorRef.GetLeveledActorBase().GetName()+".UpdateNodes( "+ScaleBelly+" * "+System.cfg.BellyMaxScale+", "+ScaleBreast+" *("+System.cfg.BreastsMaxScale+" - 1))")
            UpdateNodes(ScaleBelly * System.cfg.BellyMaxScale, ScaleBreast * System.cfg.BreastsMaxScale)
        ElseIf System.cfg.VisualScaling == 2
            if lastTypeOfScaling == 1
                UpdateNodes(0, 0)
            elseif lastTypeOfScaling == 3
                UpdateWeight(0.0)
            elseif lastTypeOfScaling == 4
                ;UpdateNodes3(0, 0)
            endif
            ;Debug.Trace(ActorRef.GetLeveledActorBase().GetName()+".UpdateNodes( "+ScaleBelly+" * "+System.cfg.BellyMaxScale+", "+ScaleBreast+" *("+System.cfg.BreastsMaxScale+" - 1))")
            UpdateNodes2(ScaleBelly * System.cfg.BellyMaxScale, ScaleBreast * System.cfg.BreastsMaxScale)
        ElseIf System.cfg.VisualScaling == 3
            if lastTypeOfScaling == 1
                UpdateNodes(0, 0)
            elseif lastTypeOfScaling == 2
                UpdateNodes2(0, 0)
            elseif lastTypeOfScaling == 4
                ;UpdateNodes3(0, 0)
            endif
            Float MaxAdditionalWeight = FWUtility.MinFloat(System.cfg.WeightGainMax, 100 - BaseWeight)
            Float addWeight = (ScaleBelly * MaxAdditionalWeight)
            UpdateWeight(addWeight)
        ;ElseIf System.cfg.VisualScaling == 4
            ;if lastTypeOfScaling == 1
            ;   UpdateNodes(0, 0)
            ;elseif lastTypeOfScaling == 2
            ;   UpdateNodes2(0, 0)
            ;elseif lastTypeOfScaling == 3
            ;   UpdateWeight(0.0)
            ;endif
            ;UpdateNodes3(ScaleBelly * System.cfg.BellyMaxScale, ScaleBreast * System.cfg.BreastsMaxScale)
        EndIf
        
        lastTypeOfScaling = System.cfg.VisualScaling
    Elseif lastTypeOfScaling != System.cfg.VisualScaling
        ResetBelly()
        lastTypeOfScaling = System.cfg.VisualScaling
    EndIf
    System.Message("FWAbilityBeeingFemale::SetBelly("+ActorRef.GetLeveledActorBase().GetName()+") " + (Utility.GetCurrentRealTime() - startTime) + " sec", System.MSG_All, System.MSG_Trace)
EndFunction
 
 
 
function castMentrualBlood()
    if !ActorRef || System.GlobalMenstruating.GetValueInt() != 1
        return
    endif
    if ActorRef.IsEquipped(System.Sanitary_Napkin_Normal) || ActorRef.IsEquipped(System.Tampon_Normal)
        ; Panty or Tampon is equipped       
        if ActorRef.IsEquipped(System.Sanitary_Napkin_Normal)
            if IsPlayer==true
                System.Message( System.Content.YourPantys, System.MSG_Low)
                ActorRef.UnequipItem(System.Sanitary_Napkin_Normal, false, true)
                ActorRef.RemoveItem(System.Sanitary_Napkin_Normal, 1, true)
                ActorRef.addItem(System.Sanitary_Napkin_Bloody, 1, true)
                ActorRef.EquipItem(System.Sanitary_Napkin_Bloody, false, true)
            else
                System.Message( FWUtility.StringReplace( System.Content.NPCPantys , "{0}", ActorRef.GetLeveledActorBase().GetName()), System.MSG_Debug)
                ActorRef.UnequipItem(System.Sanitary_Napkin_Normal, false, true)
                ActorRef.RemoveItem(System.Sanitary_Napkin_Normal, 1, true)
                ActorRef.addItem(System.Sanitary_Napkin_Bloody, 1, true)
                ActorRef.EquipItem(System.Sanitary_Napkin_Bloody, false, true)
                Utility.WaitGameTime(0.5) ; Wait some time till redress another sani napkin
                EquipNapkin()
            endif
        else
            if IsPlayer==true
                System.Message( System.Content.YourTampon, System.MSG_Low)
                ActorRef.UnequipItem(System.Tampon_Normal, false, true)
                ActorRef.RemoveItem(System.Tampon_Normal, 1, true)
                ActorRef.addItem(System.Tampon_Bloody, 1, true)
                ActorRef.EquipItem(System.Tampon_Bloody, false, true)
            else
                System.Message( FWUtility.StringReplace( System.Content.NPCTampon , "{0}", ActorRef.GetLeveledActorBase().GetName()), System.MSG_Debug)
                ActorRef.UnequipItem(System.Tampon_Normal, false, true)
                ActorRef.RemoveItem(System.Tampon_Normal, 1, true)
                ActorRef.addItem(System.Tampon_Bloody, 1, true)
                ActorRef.EquipItem(System.Tampon_Bloody, false, true)
                Utility.WaitGameTime(0.5) ; Wait some time till redress another sani napkin
                EquipTampon()
            endif
        endif
    else
        ; Cast blood
        if Utility.RandomInt(0,10)>8 && System.Effect_VaginalBloodHigh
            ;System.Effect_VaginalBloodHigh.cast(ActorRef,ActorRef)
            FWUtility.ActorAddSpell(ActorRef,System.Effect_VaginalBloodHigh, false, true)
        elseif System.Effect_VaginalBloodLow
            ;System.Effect_VaginalBloodLow.cast(ActorRef,ActorRef)
            FWUtility.ActorAddSpell(ActorRef,System.Effect_VaginalBloodLow, false, true)
        endif
    endif
endFunction
 
function EquipNapkin()
    if System.GlobalMenstruating.GetValueInt() == 1
        if ActorRef.GetItemCount(System.Sanitary_Napkin_Normal)>1 && ActorRef.IsEquipped(System.Sanitary_Napkin_Normal)==false
            form ax = ActorRef.GetWornForm(System.Sanitary_Napkin_Normal.GetSlotMask())
            if ax!=none
                ActorRef.UnequipItem(ax)
            endif
            ActorRef.EquipItem(System.Sanitary_Napkin_Bloody, false, true)
        endif
    endif
endfunction
 
function EquipTampon()
    if System.GlobalMenstruating.GetValueInt() == 1
        if ActorRef.GetItemCount(System.Tampon_Normal)>1 && ActorRef.IsEquipped(System.Tampon_Normal)==false
            form ax = ActorRef.GetWornForm(System.Tampon_Normal.GetSlotMask())
            if ax!=none
                ActorRef.UnequipItem(ax)
            endif
            ActorRef.EquipItem(System.Tampon_Bloody, false, true)
        endif
    endif
endfunction
 
float SleepingStart
Event OnSleepStart(float afSleepStartTime, float afDesiredSleepEndTime)
    SleepingStart=Utility.GetCurrentGameTime()
    parent.OnSleepStart(afSleepStartTime, afDesiredSleepEndTime)
endEvent
Event OnSleepStop(bool abInterrupted)
    float SleepDur
    if SleepingStart>0.0
        SleepDur = Utility.GetCurrentGameTime() - SleepingStart
        System.Controller.HealBaby(ActorRef,SleepDur*1.3)
    endif
    SleepingStart=0.0
    parent.OnSleepStop(abInterrupted)
endEvent
float SitStart
Event OnSit(ObjectReference akFurniture)
    SitStart=Utility.GetCurrentGameTime()
endEvent
Event OnGetUp(ObjectReference akFurniture)
    float SitDur
    if SitStart>0.0
        SitDur = Utility.GetCurrentGameTime() - SitStart
        System.Controller.HealBaby(ActorRef,SitDur*0.5)
    endif
    SitStart=0.0
endEvent
 
Event OnDeath(Actor akKiller)
    if ActorRef==Game.GetPlayer()
        System.Controller.DamageBaby(ActorRef,92)
    else
        FWSaveLoad.Delete(ActorRef)
    endif
    parent.OnDeath(akKiller)
endEvent
 
 
 
 
 
;--------------------------------------------------------------------------------
; StateFunctions
;--------------------------------------------------------------------------------
function onEnterState()
endFunction
function onExitState()
endFunction
function onUpdateFunction()
endFunction
function onHitFunction(ObjectReference akAggressor, Form akSource, Projectile akProjectile, bool abPowerAttack, bool abSneakAttack, bool abBashAttack, bool abHitBlocked)
endFunction
function onPotionFunction(potion Item)
endFunction
function onCastSpellFunction(spell SpellID)
endFunction
 
;--------------------------------------------------------------------------------
; State - Follicular
;--------------------------------------------------------------------------------
state Follicular_State
    function onEnterState()
        if ActorRef==Game.GetPlayer()
            System.Controller.setAutoFlag(ActorRef)
        endIf
        System.Manager.CastCME(ActorRef,0,System.cfg.PMSEffects)
        bHasPMS==false
    endFunction
        
    function onExitState()
        ActorRef.removeSpell(System.Effect_Vorwehen)
        System.Manager.RemoveCME(ActorRef,1)
        bHasPMS==false
    endfunction
endState
 
;--------------------------------------------------------------------------------
; State - Ovulation
;--------------------------------------------------------------------------------
state Ovulation_State
 
    function onEnterState()
        FWUtility.ActorAddSpell(ActorRef,System.Effect_Mittelschmerz)
        System.Manager.CastCME(ActorRef,1,System.cfg.PMSEffects)
        System.Manager.removeCME(ActorRef)
        bHasPMS==false
    endfunction
    
    function onUpdateFunction()
        if CurrentStatePercent > 40
            FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Mittelschmerz)
        else
            FWUtility.ActorAddSpell(ActorRef,System.Effect_Mittelschmerz)
        endif
        if CurrentStatePercent >= 50
            ; Check for Pregnancy
            int rnd = Utility.RandomInt(0,15)
            if rnd<7
                ; Actor is pregnant!
                if System.Controller.ActiveSpermImpregnation(ActorRef)==true
                    FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Mittelschmerz)
                    changeState(4)
                endif
            endIf
        endif
    endfunction
    
    function onExitState()
        ; Make sure Mittelschmerz was removed
        FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Mittelschmerz)
        System.Manager.removeCME(ActorRef,1)
        bHasPMS==false
    endfunction
endState
 
;--------------------------------------------------------------------------------
; State - Luteal
;--------------------------------------------------------------------------------
state Luteal_State
    function onUpdateFunction()
        if CurrentStatePercent < 65
            ; Check for Pregnancy
            ; Simulate FH Hormones
            Float rnd = Utility.RandomFloat(0,100)
            float chance = System.LutealImpregnationTime(CurrentStatePercent)
            if chance > rnd
                if System.Controller.ActiveSpermImpregnation(ActorRef)==true
                    ; Actor is pregnant!
                    System.Manager.removeCME(ActorRef,3)
                    changeState(4)
                    return
                endif
            endIf
        endIf
        if CurrentStatePercent > 75
            ; Check for PMS
            if bHasPMS==false && System.Controller.canBecomePMS(ActorRef)==true
                System.Message("Cast PMS for "+ActorRef.GetLeveledActorBase().GetName(), System.MSG_Debug )
                System.Manager.castCME(ActorRef,3,System.cfg.PMSEffects)
                bHasPMS=true
            endIf
            
            ; Check for Tampons
            if ActorRef.GetItemCount(System.Tampon_Normal)<=2
                ActorRef.AddItem(System.Tampon_Normal,6)
            endif
        endif
    endFunction
    
    function onEnterState()
        System.Manager.CastCME(ActorRef,2,System.cfg.PMSEffects)
        System.Manager.removeCME(ActorRef,1)
        bHasPMS=false
        if CurrentStatePercent > 75
            ; Check for PMS
            if bHasPMS==false && System.Controller.canBecomePMS(ActorRef)==true
                bHasPMS=true
                System.Message("Cast PMS for "+ActorRef.GetLeveledActorBase().GetName(), System.MSG_Debug )
                System.Manager.castCME(ActorRef,3,System.cfg.PMSEffects)
                System.Message("Casted", System.MSG_Debug )
            endIf
        endif
    endFunction
    
    function onExitState()
        ; Remove PMS
        System.Manager.RemoveCME(ActorRef,2)
        System.Manager.removeCME(ActorRef,3)
        bHasPMS=false
    endFunction
endState
 
;--------------------------------------------------------------------------------
; State - Menstruation
;--------------------------------------------------------------------------------
state Menstruation_State
    function onEnterState()
        EquipNapkin()
        FWUtility.ActorAddSpell(ActorRef,System.Effect_MenstruationCramps)
        System.Manager.removeCME(ActorRef,3)
        System.Manager.removeCME(ActorRef,2)
        System.Manager.CastCME(ActorRef,4,System.cfg.PMSEffects)
        bHasPMS=false
    endfunction
    
    function onUpdateFunction()
        EquipNapkin()
        if Utility.RandomInt(1,24)<=6
            castMentrualBlood()
        endif
        if ActorRef.GetItemCount(System.Tampon_Normal)<=2
            ActorRef.AddItem(System.Tampon_Normal,6)
        endif
        EquipNapkin()
    endfunction
    
    function onExitState()
        FWUtility.ActorRemoveSpell(ActorRef,System.Effect_MenstruationCramps)
        System.Controller.setAutoFlag(ActorRef)
        System.Manager.RemoveCME(ActorRef,4)
    endfunction
endState
 
;--------------------------------------------------------------------------------
; State 1. Trimester
;--------------------------------------------------------------------------------
state PregnancyFirst_State
    function onHitFunction(ObjectReference akAggressor, Form akSource, Projectile akProjectile, bool abPowerAttack, bool abSneakAttack, bool abBashAttack, bool abHitBlocked)
        if (abPowerAttack || abSneakAttack || abBashAttack) && !abHitBlocked
            System.Controller.DamageBaby(ActorRef, Utility.RandomFloat(2,7))
        endIf
    endfunction
    
    function onEnterState()
        System.Manager.CastCME(ActorRef,5,System.cfg.PMSEffects)
        System.Manager.RemoveCME(ActorRef,4)
    endFunction
    
    function onExitState()
        System.Manager.RemoveCME(ActorRef,5)
    endFunction
    
    function onPotionFunction(potion p)
        int c = p.GetNumEffects()
        while c>0
            c-=1
            if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchRestoreHealth")
                System.Controller.HealBaby(ActorRef, p.GetNthEffectMagnitude© / 5)
            endif
            if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchHarmful")
                System.Controller.DamageBaby(ActorRef, p.GetNthEffectMagnitude© / 10)
            endif
        endwhile
    endFunction
    
    function onUpdateFunction()
        checkAbortus()
        float GT = Utility.GetCurrentGameTime()
        int HealAmount = Math.Floor( GT - LastBabyHealing)
        if HealAmount >0
            System.Controller.HealBaby(ActorRef, HealAmount )
            LastBabyHealing=GT
        endif
    endFunction
endState
 
;--------------------------------------------------------------------------------
; State 2. Trimester
;--------------------------------------------------------------------------------
state PregnancySecond_State
    function onHitFunction(ObjectReference akAggressor, Form akSource, Projectile akProjectile, bool abPowerAttack, bool abSneakAttack, bool abBashAttack, bool abHitBlocked)
        if (abPowerAttack || abSneakAttack || abBashAttack) && !abHitBlocked
            System.Controller.DamageBaby(ActorRef, Utility.RandomFloat(0,3))
        endIf
    endfunction
    
    function onEnterState()
        System.Manager.RemoveCME(ActorRef,5)
        System.Manager.CastCME(ActorRef,6,System.cfg.PMSEffects)
    endFunction
    
    function onExitState()
        System.Manager.RemoveCME(ActorRef,6)
    endFunction
    
    function onPotionFunction(potion p)
        int c = p.GetNumEffects()
        while c>0
            c-=1
            if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchRestoreHealth")
                System.Controller.HealBaby(ActorRef, p.GetNthEffectMagnitude© / 10)
            endif
            if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchHarmful")
                System.Controller.DamageBaby(ActorRef, p.GetNthEffectMagnitude© / 10)
            endif
        endwhile
    endFunction
    
    function onUpdateFunction()
        checkAbortus()
        float GT = Utility.GetCurrentGameTime()
        int HealAmount = Math.Floor( GT - LastBabyHealing) * 3
        if HealAmount >0
            System.Controller.HealBaby(ActorRef, HealAmount )
            LastBabyHealing=GT
        endif
    endFunction
endState
 
;--------------------------------------------------------------------------------
; State 3. Trimester
;--------------------------------------------------------------------------------
state PregnancyThrid_State
    function onUpdateFunction()
        if CurrentStatePercent > 90
            ; Vorwehen
            FWUtility.ActorAddSpell(ActorRef,System.Effect_Vorwehen)
        endIf
        if CurrentStatePercent > 75 && Utility.RandomInt(0,10)>4
            ; Breast milk
            int rnd= Utility.RandomInt(0,10)
            if rnd<6
                System.Message("Breast Milk1 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
                FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk1,false,true)
                ;System.Effect_BreastMilk1.cast(ActorRef, ActorRef)
            elseif rnd<10
                System.Message("Breast Milk2 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
                FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk2,false,true)
                ;System.Effect_BreastMilk2.cast(ActorRef, ActorRef)
            else
                System.Message("Breast Milk3 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
                FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk3,false,true)
                ;System.Effect_BreastMilk3.cast(ActorRef, ActorRef)
            endif
        endIf
        checkAbortus()
        
        ; Baby hits - let the controler vibrate
        if Utility.RandomInt(0, 100) > 60
            float intensity = Utility.RandomFloat(0.5, 1.0)
            game.shakeController(intensity, intensity, Utility.RandomFloat(0.2, 1.0))
        endif
        
        float GT = Utility.GetCurrentGameTime()
        int HealAmount = Math.Floor( GT - LastBabyHealing) * 5
        if HealAmount >0
            System.Controller.HealBaby(ActorRef, HealAmount )
            LastBabyHealing=GT
        endif
    endFunction
    
    function onEnterState()
        System.Manager.RemoveCME(ActorRef,6)
        System.Manager.CastCME(ActorRef,7,System.cfg.PMSEffects)
    endFunction
    
    function onHitFunction(ObjectReference akAggressor, Form akSource, Projectile akProjectile, bool abPowerAttack, bool abSneakAttack, bool abBashAttack, bool abHitBlocked)
        if (abPowerAttack || abSneakAttack || abBashAttack) && !abHitBlocked
            System.Controller.DamageBaby(ActorRef, Utility.RandomFloat(0,2))
        endIf
    endfunction
    
    function onPotionFunction(potion p)
        int c = p.GetNumEffects()
        while c>0
            c-=1
            if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchRestoreHealth")
                System.Controller.HealBaby(ActorRef, p.GetNthEffectMagnitude© / 10)
            endif
            if p.GetNthEffectMagicEffect©.HasKeywordString("MagicAlchHarmful")
                System.Controller.DamageBaby(ActorRef, p.GetNthEffectMagnitude© / 10)
            endif
        endwhile
    endFunction
    
    function onExitState()
        ; Remove Vorwehen
        FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Vorwehen)
        System.Manager.RemoveCME(ActorRef,7)
    endFunction
endState
 
;--------------------------------------------------------------------------------
; State Labor Pains
;--------------------------------------------------------------------------------
state LaborPains_State
    function onEnterState()
        System.Manager.RemoveCME(ActorRef,7)
        System.Manager.CastCME(ActorRef,8,System.cfg.PMSEffects)
        if CurrentStatePercent >=50 && CurrentStatePercent<95 && ActorRef.HasSpell(System.Effect_Presswehen)==false
            FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Eroeffnungswehen)
            FWUtility.ActorAddSpell(ActorRef,System.Effect_Presswehen)
            System.Controller.GiveBirth(ActorRef)
            return
        elseif CurrentStatePercent>=95
            System.InstantBornChilds(ActorRef)
            changeState(8)
            return
        elseif CurrentStatePercent < 50
            FWUtility.ActorAddSpell(ActorRef,System.Effect_Eroeffnungswehen)
            if ActorRef==Game.GetPlayer()
                FWUtility.LockPlayer()
                System.Message(Contents.YourPregnantWaterBreaks,System.MSG_Immersive)
            else
                System.Message( FWUtility.StringReplace(Contents.NPCPregnantWaterBreaks,"{0}",ActorRef.GetLeveledActorBase().GetName()) ,System.MSG_Low)
            endif
            FWUtility.EquipItem(ActorRef,System.AmnioticFluid)
            Utility.Wait(8)
            FWUtility.UnequipItem(ActorRef,System.AmnioticFluid)
            if ActorRef==Game.GetPlayer()
                FWUtility.UnlockPlayer()
            endif
        endif
    endFunction
    
    function onUpdateFunction()
        ;Debug.Trace(CurrentStatePercent+"% at Labor Pains for "+ActorRef.GetLeveledActorBase().GetName())
        if CurrentStatePercent >=50 && CurrentStatePercent<95 && ActorRef.HasSpell(System.Effect_Presswehen)==false
            FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Eroeffnungswehen)
            FWUtility.ActorAddSpell(ActorRef,System.Effect_Presswehen)
            System.Controller.GiveBirth(ActorRef)
            return
        elseif CurrentStatePercent>=95
            System.InstantBornChilds(ActorRef)
            changeState(8)
            return
        elseif CurrentStatePercent<50 && ActorRef.HasSpell(System.Effect_Eroeffnungswehen)==false
            FWUtility.ActorAddSpell(ActorRef,System.Effect_Eroeffnungswehen)
        endif
    endFunction
    
    function onExitState()
        FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Eroeffnungswehen)
        FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Presswehen)
        System.Manager.RemoveCME(ActorRef,8)
        ;System.InstantBornChilds(ActorRef)
    endFunction
endState
 
;--------------------------------------------------------------------------------
; State - Replanish
;--------------------------------------------------------------------------------
state Replanish_State
    function onEnterState()
        System.Manager.RemoveCME(ActorRef,8)
        System.Manager.CastCME(ActorRef,9,System.cfg.PMSEffects)
        SetBelly()
        
        equipChild()
        
        if ActorRef.GetItemCount(System.ContraceptionLow)<=1 && IsPlayer==false
            ActorRef.AddItem(System.ContraceptionLow, 10, false)
        endif
        
        ;FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Eroeffnungswehen)
        ;FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Presswehen)
        if CurrentStatePercent < 4
            FWUtility.ActorAddSpell(ActorRef,System.Effect_Nachwehen)
        endif
    endFunction
    
    function onUpdateFunction()
        if CurrentStatePercent >=4
            FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Nachwehen)
        else
            FWUtility.ActorAddSpell(ActorRef,System.Effect_Nachwehen)
        endif
        if CurrentStatePercent >= 2 && ActorRef.HasSpell(System.FeverSpell)
            FWUtility.ActorRemoveSpell(ActorRef, System.FeverSpell)
        endif
        if CurrentStatePercent < 20 && Utility.RandomInt(0,10)>4
            ; Breast milk
            int rnd= Utility.RandomInt(0,10)
            if rnd<6
                System.Message("Breast Milk1 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
                FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk1,false,true)
                ;System.Effect_BreastMilk1.cast(ActorRef, ActorRef)
            elseif rnd<10
                System.Message("Breast Milk2 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
                FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk2,false,true)
                ;System.Effect_BreastMilk2.cast(ActorRef, ActorRef)
            else
                System.Message("Breast Milk3 ("+ActorRef.GetLeveledActorBase().GetName()+")",System.MSG_All)
                FWUtility.ActorAddSpell(ActorRef,System.Effect_BreastMilk3,false,true)
                ;System.Effect_BreastMilk3.cast(ActorRef, ActorRef)
            endif
        endIf
    endFunction
    
    function onExitState()
        FWUtility.ActorRemoveSpell(ActorRef,System.Effect_Nachwehen)
        FWUtility.ActorRemoveSpell(ActorRef,System.FeverSpell)
        FWUtility.ActorRemoveSpell(ActorRef,System.InfectionSpell)
        ResetBelly()
        System.Controller.setAutoFlag(ActorRef)
    endFunction
endState
 
;--------------------------------------------------------------------------------
; State - Pregnant by unknown Mod
;--------------------------------------------------------------------------------
state PregnantUnknown_State
    function SetBelly()
    endFunction
endState
 
;--------------------------------------------------------------------------------
; State - Pregnant by Chaurus
;--------------------------------------------------------------------------------
state PregnantChaurus_State
 
    ; THANK YOU CORUM FOR THE FIX!
    ; A lot of respect to figure out how FWController and FWSystem works without having a guide!
    
    function OnUpdateFunction()
        if System.IsActorPregnantByChaurus(ActorRef)==false
            System.Controller.Pause(ActorRef,false)
            
            If (currentstate <4 || currentState == 8) ;If actor was not pregnant force menstruation after EC completes
                changeState(3)
            elseif (currentState == 4)
                castAbortus(3,true)
            elseif (currentState == 5)
                castAbortus(4,true)
            elseif (currentState == 6 || currentState == 7)
                castAbortus(5,true)
            else
                changeState(3) ; If everything fails force menstruation
            endif
        endIf       
    endFunction
endState

 
I don't know whether the updating function of that patch is included in ver2.8, but I notice that Sladen2019 has reported this bug. 
 
Link to comment
milzschnitte

milzschnitte

Posted
  • Author
Posted

 

 

Question: Does anyone knows, how to get the CurrentGameTime in a skse Plugin?

 

 

There's a utility script function for that, is that what you mean, or something else?

 

 

Well, I need it for an SKSE Plugin in C++, not in Papyrus. With this function I would move one step closer to raise the BeeingFemale performance

 

Couldn't find a way :( it must be one of the yet 'Unknown' variables.

And I don't know where to call the CALL_MEMBER_FN

Link to comment
Sladen2019

Sladen2019

Posted
Posted

 

 

 

I don't know whether the updating function of that patch is included in ver2.8, but I notice that Sladen2019 has reported this bug. 

 

 

The bug shouldn't exist in 2.8 anymore.

Just give it a try ;)

 

 

Question: Does anyone knows, how to get the CurrentGameTime in a skse Plugin?

 

I am getting the log flood using 2.8+hotfix for Sexlab No Compatibilty which was installed over 2.7.2 v7 using Mod Organizer.

I am also noticing that Beeing Female Animation Compatibility is resetting itself to None upon cell changes. I have to switch between 1st/3rd person view quite often.

Link to comment
Deviljho-san

Deviljho-san

Posted
Posted

I know you probably heard this many times. but is there a way to have pc character gender have a overwrite/swap. Like if people play as futanari's, shemales, transgender or w/e people perfer. Because i know with my female gender(futanari) and i put the apply female cum from sexlab. When she do a sex scene where she's the pin not the cushion it registers her as getting the sperm. I do got Sexlab inflammation framework and register that and sexlab as male for her. So idk if i have a mod that contradicts this mod or i did something wrong. (the 2.7 i had little to no problem on that part but it never registered the last sleeped npc)

 

Then i know when i had immersive wench mod on it haves unique npc on it; so when i use the show stat spell it would let me see their stats but for some reason the bards wenches aren't consider unique. So i don't know if that's on your part or the modder for the wench mod part.

 

Oh i wonder why does the debug have a cheat section too it been disabled for the longest for all i know.

 

When i updated from 2.7 to 2.8 i check its compatibility and "bathing and skyrim and SL frameworks" says they are not compatible. So i would check if i need to update those but i know SLFW never got a new and recent update.

 

(hmm i do want to know if i can make a male npc pregnant on this mod. I'm really tempted now.)

Link to comment
milzschnitte

milzschnitte

Posted
  • Author
Posted

I thought about M/M pregnancy, but it's not possible. The detection where spam comes from would be horrible in many parts. For example when 2 male + 1 female have sex, it may impregnate all 3. Then it would have many problems when a mod calls "SendModEvent("BeeingFemale", "AddSperm", ....)" It wouldn't be possible to detect who on who.

Then, there is no Belly Node for males... no body support something like that.

And at least, the most important thing - Males don't have a menstruation cycle and it would be a horrible performance leak to make this possible.

 

So M/M pregnancy won't be implementated, sorry for that.

 

About the SexLab and Bathing in Skyrim is not compatible, take a look back, this problem was already fixed.

I will make the "Fix 1" now and upload it - There are realy less bugs left. It seems the new AddOn System made a great job :D

It was realy time for that update and the new AddOn Manager.

If BF will get an update somedays again, it will only be a performance update, I guess.

There is still a lot to do, to optimace the performance.... But I have to talk to Ashal first. I would need the source code of PapyrusUtil, to implement it in the native BF code. And I need the code to get the "CurrentGameTime" in native C++.

 

 

// Edit: I'm fixing some old known bugs, too. The Blue Squads will be fixed, the BasicAddOn will be fixed (so the names will be displayed correctly) ... and for some reason, I found another bug, where the de-/buffs won't be removed - will fix it.

I think I've also forgot to export the BasicAddOn :D will also be fixed

Link to comment
Uncle64

Uncle64

Posted
Posted (edited)

Milz I think Beeing Female have issues whit this mod.

http://www.nexusmods.com/skyrim/mods/63354/? Disparity -- Player Character Class - Race and Gender Diversity

 

Done some testing since I did have odd errors in my Papyrus. So I did start one new game and did not have this mod installed and those errors did go away.

Installed the mod and, guess what there they come again.

 

And the fill up the Papyrus log.

 

 

 

 

Edit I did noticed that there seems to be one patch for races there, must test that one.

Will check after work.

Edited by Uncle64
Link to comment
milzschnitte

milzschnitte

Posted
  • Author
Posted

Have tted and forme, everything wred... but I couldn't test everything for sure. Just installed the mod, edited the menu in Disparity (setting rae, class and stuff....) and then I gave birth to a little girl.

Up to there, there was no papyrus error.

 

Can you post a line of the papyrus error?

 

If the log file is to big to open in Notepad or another programm, you can do following (but only if you want)

- Start Internet Explorer or another Web-Browser

- Drag and Drop the file in there

- IMPORTANT: abort the loading after 1 - 2 seconds!!! (the X next to the URL Field, it's often there, where the "Reload" button is)

 

Now the errors should be displayed

 

//Edit

Wow Huili, you are realy fast with the russian translation! Thanks for your hard work.

 

//Edit 2:

Before someone ask - I won't make the RCOTS AddOn compatible with the new AddOnManager. The RCOTS version I've downloaded on LL one ore two years ago, was ok. Before I've released 2.8 I've downloaded RCOTS again to check for changes, and what I've seen wasn't ok anymore! So no RCOTS support from my side, anymore. The problem isn't "Child Pregnancy" or something like that - this is blocked very well. The problem is that they are nude or you can edit the nif filles to be nude. This wasn't possible when I've created the RCOTS AddOn.

Realy to bad that something like that exists. Without the nudity it would be a realy great mod and it contains all races.

 

//Edit 3:

Uploaded the Fix 1 (after 2.8 had exactly 2000 downloads)

Link to comment
MoonSpot

MoonSpot

Posted
Posted

 

Currently running 2.7.2 Patch v07 and I'm getting log bloat, 30+ GB.

 

Just repeating this forever.  Did see a comment on page 195 that there was a patch uploaded somewhere, but I don't see it.

[BF_Config (1A001828)].fwsystemconfig.OnOptionSelect() - "FWSystemConfig.psc" Line 2546
    [BF_Config (1A001828)].fwsystemconfig.SelectOption() - "SKI_ConfigBase.psc" Line 1069
    [SKI_ConfigManagerInstance (7E000802)].SKI_ConfigManager.OnOptionSelect() - "SKI_ConfigManager.psc" Line 157
[01/16/2017 - 12:28:24PM] ERROR: Cannot call AddOnVisible() on a None object, aborting function ca

Thinking of updating to 2.8 on this playthrough but not sure if that's wise.

 

That was the bug I've reported already. It will make an infinit log spam when you click on around in the AddOn Menu - I think this bug was raised from the Patch - but not sure what destroyed the AddOn Manager. The new AddOn Manager is way better, it's a complete overhaul and speeded it up a lot

 

There shouldn't be a problem with updating - up to now, no one has reported a problem except the "Sex Lab Compatibility" that is already fixed.

 

 

Well, for what its worth.  I did install 2.8 on the ongoing save and the MCM menu went to pot.  After waiting a few mins I checked again a couple of times and the beeing female information in the MCM still wouldn't display.(was listed but empty in the MCM menu list)

Tried saving and reloading a few times to try and get things the "catch" to no avail.

Then opened console inserted "setstage ski_configManagerInstance 1" and beeing female disappeared altogether.  Still had the show stat spell in my favourites and it somewhat worked.  The spell equips and fires but the game then gets stuck because it is unable (I assume) to grab stats cause something got borked.

Not sure what went wrong.

 

So I came on back here to try a redownload in case the one I did earlier got pooched, but have to try 2.8.1fix instead.  Problem now is that the daownload keeps failing at the end (I assume during a chksum/anti-virus).

 

Link to comment
Uncle64

Uncle64

Posted
Posted

Milz did you start and activated Disparity?

You must start it, and you get one warning notice before.

 

 

This is the lines I get in my Papyrus, if you check the time stamps it fires every second.

And it dont stop.

It is from one redguard female, not pregnant and ovulating.

 

The same lines do appear when I play male. No differ more the it seems to try to add menstruation on the male.

 

 

[01/18/2017 - 08:33:10AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 10 on (130062D6)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 10 on (130062D6)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:11AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 11 on (130062D5)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 11 on (130062D5)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:11AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 8 on (360140D1)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 8 on (360140D1)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:12AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 11 on (4600AC0F)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 11 on (4600AC0F)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:12AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 7 on (0002C928)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 7 on (0002C928)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:15AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 10 on (130062D6)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 10 on (130062D6)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:16AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 11 on (130062D5)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 11 on (130062D5)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:16AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 8 on (360140D1)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 8 on (360140D1)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:17AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 11 on (4600AC0F)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 11 on (4600AC0F)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:17AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 7 on (0002C928)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 7 on (0002C928)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:20AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 10 on (130062D6)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 10 on (130062D6)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:21AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 11 on (130062D5)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 11 on (130062D5)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:21AM] Error: Unable to call RegisterForSingleUpdate - no native object bound to the script object, or object is of incorrect type
stack:
[Active effect 8 on (360140D1)].fwabilitybeeingfemale.RegisterForSingleUpdate() - "" Line ?
[Active effect 8 on (360140D1)].fwabilitybeeingfemale.OnUpdate() - "FWAbilityBeeingFemale.psc" Line 162
[01/18/2017 - 08:33:22AM] Error: U

 

 

Link to comment

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.

View Community Rules

Help Support LoversLab

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue. For more information, see our Privacy Policy & Terms of Use