Jump to content

Old SCR Beta (Redundant)

Halstrom

By Halstrom,
in Downloads - Fallout Sexout

Recommended Posts

RitualClarity

RitualClarity

Posted
Posted

Oh ok, I'll have a look, I didn't think he had outfits in ZAZ

 

The only thing that seems to be conflicting is the Whorebags.nif. I don't see any other clothing etc from ZAZ in SexoutNG current or recent Beta. (93b6) Resources.

post-89432-0-17886300-1427874435_thumb.jpg

Looking closer at it. There are two Whorebags in your WIP. One is the bag I think and the other seems to be an entire outfit.

Left side is NG.. Right side is SCR WIP.

post-89432-0-34428600-1427874455_thumb.jpgpost-89432-0-75956900-1427874464_thumb.jpg

However below show the Whorebags - Copy in your current SCR WIP which is like the Whorebags in NG.

post-89432-0-12089600-1427874473_thumb.jpg

 

Yea.. I have figured out how to view the .nif  :)

This might cause some people trouble if I understand this correctly as it would overwrite the outfit with just the bag the way WIP is set up now. :) I think what happened is you flipped the names from original and copy which makes me wonder if it is possible that it is flipped in the GECK. However I don't know how to view these assets in the GECK yet. :blink: Baby steps..

Link to comment
RitualClarity

RitualClarity

Posted
Posted

Ah yes, now I remember fixing the outfit because it was worn in a non-body slot the skin clipped through anything worn. I'll change thename of my bag only version and the SCR reference to suit.

You also don't really need the full version. The version that brought up this little issue ;). Since it is already part of Sexout..

 

Anyway glad I could give something back :D. It has been awhile.

Link to comment
Halstrom

Halstrom

Posted
  • Author
Posted

Update 20150328.1:

Added DebugLog print option in MCM

Added Message to remove SCRDebug.esp

Took EyeBot Offspring out of Enclave Faction so hopefully people won't attack them

 

Update 20150325.1:

Fix to Lily being in Female Human Compaiion formlist

 

Update 20140324.1:

Nothing, just version number update

 

Update 20150323.1:

Added reseting of some SCRglobals for IsModLoaded DLCflags into GameRestart

 

Update 20150320.1:

Added DLC03AuraStealthsuit, formlist and Preg variations the meshes are in the PregMeshes Download for the beta.

Fixes to some formlist contents

 

Update 20150313.1:

Fixes to some formlists where I had added actors baseforms instead of REFs

Added Assets for preg versions of Armors for PreOrder packs

 

Update 20150311.1:

Change to DeadFetus naming

 

Update 20150310.1:

Some minor fixes to the companion formlist system

 

Update 20150307.1:

Added Aborted fetus asset

Removed Skull Goddess as is no longer downloadable from any ware

Added formlist support for Tribal Armor, ArmoredVaultSuit13, Light Metal Armor & Light Leather Armor from PreOrder packs. Will look into Preg variations, but I can't tell if these are different nif's to their base meshes or not.

 

Update 20150305.1:

Changes to naming of some eggs and pups to allow Male & Female variations to be added into scripts by search/replace, just added a M to the end of a few.

Created female Offspring variations of most creatures (Male in the case of Brahmin), I just used Male mesh models for females. This is just for variety in Pregnancy and a resource for breeding mods. As there are no animations for creature/creature or male/creature sex.

Updated FemaleCreature formlist to include those females creatures which means they shouldn't be available for sex.

Link to comment
Odessa

Odessa

Posted
Posted

Could you add Marisol to the list of 3rd party female companions supported by SCR?

 

ModName: "MarisolMJDJJ.esp"

FormID: "000DBD" / 3517

---

 

I wrote a safe BuildRef UDF for soliciting that I think you may find convenient, usage is:

 

(Safe BuiltRef or 0) call fnSCRGetExternalForm ModName:string, Hex-FormID:string, TypeCode:int

 

Example, to add Marisol you can just do:

 

let rActor := call fnSCRGetExternalForm "MarisolMJDJJ.esp", "000DBD", 200

if rActor

    ;# The mod is loaded, and the form is a valid actor. Safe to add to lists etc

end

 

UDF:

 

 

 

scn fnSCRGetExternalForm

; # Safe BuildRef, passed a mod_name and form_id strings, and int type code.
; # Returns the target form if the mod is loaded, and the form is valid and
; # of the type expected

; # args
string_var mod_name  ; # eg: "FalloutNV.esm"
string_var form_id   ; # eg: "000ADD" - hex string without mod index
int iTypeCode        ; # eg: 200 for actor refs, 42 for NPC, see: http://geck.bethsoft.com/index.php?title=Form_Type_IDs

; # local
int iModIndex
ref BuiltRef
int iFormID
int iBuiltType

Begin Function { mod_name, form_id, iTypeCode }

    PrintD "SCR: call fnGetExternalForm "+mod_name+", "+form_id+", "+$iTypeCode

    if eval !(IsModLoaded $mod_name)
        PrintD " ...Mod not loaded"
        return
    endif

    let iModIndex := GetModIndex $mod_name
    let iFormID   := ToNumber form_id, 1 ; # Convert hex string to int
    let BuiltRef  := BuildRef iModIndex, iFormID

    if eval !(IsFormValid BuiltRef)
        PrintD " ...Aborting. Target form does not exist in mod!"
        return
    endif

    if iTypeCode == 200 ; # Actor is special case, GetType wont work.
        if eval !(IsReference BuiltRef)
            PrintD " ...Aborting. Not a reference!"
            return
        elseif eval !(BuiltRef.IsActor)
            PrintD " ...Aborting. Not an Actor!"
            return
        endif
    else
        let iBuiltType := GetType BuiltRef
        if iBuiltType != iTypeCode
            PrintD " ...Aborting. Got wrong type: "+$iBuiltType+" instead of: "+$iTypeCode+"!"
            return
        endif
    endif

    PrintD " ...Success, got: "+$BuiltRef

    SetFunctionValue BuiltRef

; # You don't need to sv_destruct UDF _arguments_
End

 

 

Link to comment
Halstrom

Halstrom

Posted
  • Author
Posted

Could you add Marisol to the list of 3rd party female companions supported by SCR?

 

ModName: "MarisolMJDJJ.esp"

FormID: "000DBD" / 3517

---

 

I wrote a safe BuildRef UDF for soliciting that I think you may find convenient, usage is:

 

(Safe BuiltRef or 0) call fnSCRGetExternalForm ModName:string, Hex-FormID:string, TypeCode:int

 

Example, to add Marisol you can just do:

 

let rActor := call fnSCRGetExternalForm "MarisolMJDJJ.esp", "000DBD", 200

if rActor

    ;# The mod is loaded, and the form is a valid actor. Safe to add to lists etc

end

 

UDF:

 

 

scn fnSCRGetExternalForm

; # Safe BuildRef, passed a mod_name and form_id strings, and int type code.
; # Returns the target form if the mod is loaded, and the form is valid and
; # of the type expected

; # args
string_var mod_name  ; # eg: "FalloutNV.esm"
string_var form_id   ; # eg: "000ADD" - hex string without mod index
int iTypeCode        ; # eg: 200 for actor refs, 42 for NPC, see: http://geck.bethsoft.com/index.php?title=Form_Type_IDs

; # local
int iModIndex
ref BuiltRef
int iFormID
int iBuiltType

Begin Function { mod_name, form_id, iTypeCode }

    PrintD "SCR: call fnGetExternalForm "+mod_name+", "+form_id+", "+$iTypeCode

    if eval !(IsModLoaded $mod_name)
        PrintD " ...Mod not loaded"
        return
    endif

    let iModIndex := GetModIndex $mod_name
    let iFormID   := ToNumber form_id, 1 ; # Convert hex string to int
    let BuiltRef  := BuildRef iModIndex, iFormID

    if eval !(IsFormValid BuiltRef)
        PrintD " ...Aborting. Target form does not exist in mod!"
        return
    endif

    if iTypeCode == 200 ; # Actor is special case, GetType wont work.
        if eval !(IsReference BuiltRef)
            PrintD " ...Aborting. Not a reference!"
            return
        elseif eval !(BuiltRef.IsActor)
            PrintD " ...Aborting. Not an Actor!"
            return
        endif
    else
        let iBuiltType := GetType BuiltRef
        if iBuiltType != iTypeCode
            PrintD " ...Aborting. Got wrong type: "+$iBuiltType+" instead of: "+$iTypeCode+"!"
            return
        endif
    endif

    PrintD " ...Success, got: "+$BuiltRef

    SetFunctionValue BuiltRef

; # You don't need to sv_destruct UDF _arguments_
End

 

Cool, looks good, will do :)
Link to comment
Halstrom

Halstrom

Posted
  • Author
Posted

I gave you the formid for the wrong version of Marisol :blush: , it should actually be:

 

ModName: "SexOutMarisol.esp"

FormID:  "011B91" / 72593

^ Thanks Odessa and Hal

I also need to know what race she should be treated as and the ref for her custom race if she has one.

 

I'm getting nowhere with this:

		if (IsModLoaded "MarisolMJDJJ.esp") && (IsModLoaded "SexOutMarisol.esp")
			let rBuiltREF := SexoutSCR00UDFGetExternalForm "SexOutMarisol.esp", "000DBD", 200
			if rBuiltREF
;# The mod is loaded, and the form is a valid actor. Safe to add to lists etc
			endif
		endif
getting a too many arguments message trying to compile

 

using this UDF:

 

scn SexoutSCR00UDFGetExternalForm

; # Safe BuildRef, passed a mod_name and form_id strings, and int type code.
; # Returns the target form if the mod is loaded, and the form is valid and
; # of the type expected

; # args
string_var mod_name ; # eg: "FalloutNV.esm"
string_var form_id ; # eg: "000ADD" - hex string without mod index
int iTypeCode ; # eg: 200 for actor refs, 42 for NPC, see: http://geck.bethsoft.com/index.php?title=Form_Type_IDs

; # local
int iModIndex
ref rBuiltREF
int iFormID
int iBuiltType

Begin Function { mod_name, form_id, iTypeCode }

PrintD "SCR: call fnGetExternalForm "+mod_name+", "+form_id+", "+$iTypeCode

let iModIndex := GetModIndex $mod_name
let iFormID := ToNumber form_id, 1 ; # Convert hex string to int
let rBuiltREF := BuildRef iModIndex, iFormID

if eval !(IsFormValid rBuiltREF)
PrintD " ...Aborting. Target form does not exist in mod!"
return
endif

if iTypeCode == 200 ; # Actor is special case, GetType wont work.
if eval !(IsReference rBuiltREF)
PrintD " ...Aborting. Not a reference!"
return
elseif eval !(rBuiltREF.IsActor)
PrintD " ...Aborting. Not an Actor!"
return
endif
else
let iBuiltType := GetType rBuiltREF
if iBuiltType != iTypeCode
PrintD " ...Aborting. Got wrong type: "+$iBuiltType+" instead of: "+$iTypeCode+"!"
return
endif
endif

PrintD " ...Success, got: "+$rBuiltREF

SetFunctionValue rBuiltREF

; # You don't need to sv_destruct UDF _arguments_
End

 

 

I've also been checking companion mods against 42 for quite a while now and it seems to work fine.

 

 

scn SexoutSCR00SAdd3rdPartyStuff

; *** Adds 3rd party stuff, seperated from other SCR incase Refs change

int iModIndex
ref rItem
ref rActorREF
ref rRace
ref rBuiltREF

int iRace
int iNPC
int iARMA

Begin GameMode

	Set iRace to 12
	Set iNPC to 42
	Set iARMA to 96

	if SexoutSQVAR.iAdd3rdPartyStuff

		if (IsModLoaded "SunnyCompanion.esp")
			Set iModIndex to GetModIndex "SunnyCompanion.esp"
			ListAddForm SexoutSLActorDataPossibleCompanions SunnyREF
			Set rItem to BuildRef iModIndex 27067 ; *** Sunny Outfit
			ListAddForm SexoutSLOutfitSunny rItem ; *** Add for swapping
		endif

		if (IsModLoaded "CuteCass.esp")  ; *** Just adds CuteCass race to formlists
			Set iModIndex to GetModIndex "CuteCass.esp"
			Set rRace to BuildRef iModIndex 118360 ; *** Cass Race
			if rRace
;				if rRace.GetType == iRace ; *** Type is Race
					ListAddForm SexoutSFLDataRaceCauc rRace
					DebugPrint "SCR0Add3rdParty: CuteCass: CassRace Added %1.0f, %n" iModIndex rRace
;				else
;					DebugPrint "SCR0Add3rdParty: CuteCass: CassRace Type Error %1.0f, %n" iModIndex rRace
;				endif
			else
				DebugPrint "SCR0Add3rdParty: CuteCass: CassRace NULL Error %1.0f, %n" iModIndex rRace
			endif
		endif

		if (IsModLoaded "ClassyVeronica.esp")
			Set iModIndex to GetModIndex "ClassyVeronica.esp"
			Set rRace to BuildRef iModIndex 8663 ; *** Veronica Race
			if rRace
;				if rRace.GetType == iRace ; *** Type is Race
					ListAddForm SexoutSFLDataRaceCauc rRace
					DebugPrint "SCR0Add3rdParty: ClassyVeronica: VeronicaRace Added %1.0f, %n" iModIndex rRace
;				else
;					DebugPrint "SCR0Add3rdParty: ClassyVeronica: VeronicaRace Type Error %1.0f, %n" iModIndex rRace
;				endif
			else
				DebugPrint "SCR0Add3rdParty: ClassyVeronica: VeronicaRace NULL Error %1.0f, %n" iModIndex rRace
			endif
		endif

		if (IsModLoaded "NVWillow.esp")
			Set iModIndex to GetModIndex "NVWillow.esp"
			Set rActorREF to BuildRef iModIndex 32353 ; *** WillowREF
			if rActorREF
				if rActorREF.GetType == iNPC
					Set SexoutSQActorRefs3rdParty.SCRWillowREF to rActorREF
					Set rRace to BuildRef iModIndex 118360 ; *** Willow Race
					ListAddForm SexoutSFLDataRaceCauc rRace
					Set rRace to BuildRef iModIndex 281494 ; *** WillowGhoul Race
					ListAddForm SexoutSFLDataRaceGhoul rRace
					ListAddForm SexoutSFLDataNewNPCsCauc rActorREF
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsFemale rActorREF
					DebugPrint "SCR0Add3rdParty: WillowMod: Willow REF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: WillowMod: Willow REF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: WillowMod: Willow REF NULL Error %1.0f, %n" iModIndex rActorREF
			endif
			Set rActorREF to BuildRef iModIndex 442157 ; *** JessicaREF
			if rActorREF
				if rActorREF.GetType == iNPC
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsFemale rActorREF
					DebugPrint "SCR0Add3rdParty: WillowMod: Jessica REF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: WillowMod: Jessica REF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: WillowMod: Jessica REF  NULL Error %1.0f, %n" iModIndex rActorREF
			endif
			Set rActorREF to BuildRef iModIndex 108078 ; *** WendyREF
			if rActorREF
				if rActorREF.GetType == iNPC
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsFemale rActorREF
					DebugPrint "SCR0Add3rdParty: WillowMod: Wendy REF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: WillowMod: Wendy REF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: WillowMod: Wendy REF  NULL Error %1.0f, %n" iModIndex rActorREF
			endif
			Set rActorREF to BuildRef iModIndex 776617 ; *** JTREF
			if rActorREF
				if rActorREF.GetType == 43
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsCreatureM rActorREF
					ListAddForm SexoutCListDog rActorREF
					DebugPrint "SCR0Add3rdParty: WillowMod: JT REF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: WillowMod: JT REF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: WillowMod: JT REF  NULL Error %1.0f, %n" iModIndex rActorREF
			endif
		endif

		if (IsModLoaded "GIP_Kirina.esm")
			Set iModIndex to GetModIndex "GIP_Kirina.esm"
			Set rActorREF to BuildRef iModIndex 2786 ; *** KirinaREF xx000AE2
			if rActorREF
				if rActorREF.GetType == iNPC
					Set SexoutSQActorRefs3rdParty.SCRKirinaREF to rActorREF
					Set rRace to BuildRef iModIndex 8719 ; *** Kirina Race
					ListAddForm SexoutSFLDataRaceAsian rRace
					ListAddForm SexoutSFLDataNewNPCsAsian rActorREF
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsFemale rActorREF
					Set rItem to BuildRef iModIndex 19760 ; *** Lorica Outfit
					ListAddForm SexoutSLOutfitVeronicaRobes rItem ; *** Add to swapping list
       					DebugPrint "SCR0Add3rdParty: KirinaMod: KirinaREF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: KirinaMod: KirinaREF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: KirinaMod: KirinaREF NULL Error %1.0f, %n" iModIndex rActorREF
			endif
		endif

		if (IsModLoaded "delilah.esp")
			Set iModIndex to GetModIndex "delilah.esp"
			Set rActorREF to BuildRef iModIndex 2787 ; *** DelilahREF xx000AE3
			if rActorREF
				if rActorREF.GetType == iNPC
                         Set SexoutSQActorRefs3rdParty.SCRDelilahRef to rActorREF
					Set rRace to BuildRef iModIndex 80933 ; *** Delilah Race XX013C25

					ListAddForm SexoutSFLDataRaceCauc rRace
					ListAddForm SexoutSFLDataNewNPCsCauc rActorREF
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsFemale rActorREF
					ListAddForm SexoutSLActorDataIsMedicalFieldMedic rActorREF
					Set rItem to BuildRef iModIndex 82415 ; *** Delilah Outfit XX0141EF
					ListAddForm SexoutSLClothAppearFactionTownDweller rItem
					Set rItem to BuildRef iModIndex 14728 ; *** Delilah LabCoat Oufti XX003988
					ListAddForm SexoutSLClothAppearMedical rItem
					Set rItem to BuildRef iModIndex 82415 ; *** Delilah BackPack XX0141EF
					ListAddForm SexoutSLClothTypeBackPacks rItem
					Set rItem to BuildRef iModIndex 18569 ; *** Delilah BellyRing XX004889
					ListAddForm SexoutSLClothTypeJewelryFancyAccessories rItem
					Set rItem to BuildRef iModIndex 18552 ; *** Delilah Necklace XX004878
					ListAddForm SexoutSLClothTypeJewelryFancyAccessories rItem
					Set rItem to BuildRef iModIndex 34975 ; *** Delilah Choker XX00889F
					ListAddForm SexoutSLClothTypeJewelryFancyAccessories rItem
					DebugPrint "SCR0Add3rdParty: DelilahMod: DelilahREF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: DelilahMod: DelilahREF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: DelilahMod: DelilahREF NULL Error %1.0f, %n" iModIndex rActorREF
			endif
		endif

		if (IsModLoaded "SarahConner.esp")
			Set iModIndex to GetModIndex "SarahConner.esp"
			Set rActorREF to BuildRef iModIndex 2786 ; *** SarahREF xx000AE2
			if rActorREF
				if rActorREF.GetType == iNPC
					Set SexoutSQActorRefs3rdParty.SCRSarahCREF to rActorREF
					Set rRace to BuildRef iModIndex 4456473 ; *** Sarah Race
					ListAddForm SexoutSFLDataRaceCauc rRace
					ListAddForm SexoutSFLDataNewNPCsCauc rActorREF
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsFemale rActorREF
					DebugPrint "SCR0Add3rdParty: SarahConner: SarahREF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: SarahConner: SarahREF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: SarahConner: SarahREF NULL Error %1.0f, %n" iModIndex rActorREF
			endif
		endif

		if (IsModLoaded "ARESproject.esp")
			Set iModIndex to GetModIndex "ARESproject.esp"
			Set rActorREF to BuildRef iModIndex 19684 ; *** AndreaREF
			if rActorREF
				if rActorREF.GetType == iNPC
					Set SexoutSQActorRefs3rdParty.SCRAndreaREF to rActorREF
					Set rRace to BuildRef iModIndex 4985 ; *** ARESAndroid Race
					ListAddForm SexoutSFLDataRaceAndroid rRace
					ListAddForm SexoutSFLDataNewNPCsAndroid rActorREF
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsFemale rActorREF
					DebugPrint "SCR0Add3rdParty: ARESproject: Andrea REF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: ARESproject: Andrea REF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: ARESproject: Andrea REF NULL Error %1.0f, %n" iModIndex rActorREF
			endif
		endif

		if (IsModLoaded "Daughters Of Ares.esp")
			Set iModIndex to GetModIndex "Daughters Of Ares.esp"
			Set rRace to BuildRef iModIndex 136099 ; *** DOA Race
			if rRace
				if rRace.GetType == iRace ; *** Type is Race
					ListAddForm SexoutSFLDataRaceAndroid rRace
					DebugPrint "SCR0Add3rdParty: DaughtersOfAres: AndroidRace Added %1.0f, %n" iModIndex rRace
				else
					DebugPrint "SCR0Add3rdParty: DaughtersOfAres: AndroidRace Type Error %1.0f, %n" iModIndex rRace
				endif
			else
				DebugPrint "SCR0Add3rdParty: DaughtersOfAres: AndroidRace NULL Error %1.0f, %n" iModIndex rRace
			endif
		endif

;		if (IsModLoaded "MarisolMJDJJ.esp") && (IsModLoaded "SexOutMarisol.esp")
;			let rBuiltREF := SexoutSCR00UDFGetExternalForm "SexOutMarisol.esp", "000DBD", 200
;			if rBuiltREF
;# The mod is loaded, and the form is a valid actor. Safe to add to lists etc
;			endif
;		endif

; *** Vanessa too many variations and outfits

		if (IsModLoaded "FNV Starfox.esp")
			Set iModIndex to GetModIndex "FNV Starfox.esp"
			Set rActorREF to BuildRef iModIndex 12328 ; *** KrystalREF
			if rActorREF
				if rActorREF.GetType == iNPC
					Set SexoutSQActorRefs3rdParty.SCRKrystalREF to rActorREF
					Set rRace to BuildRef iModIndex 2781 ; *** Fox Race
					ListAddForm SexoutSFLDataRaceFox rRace
					ListAddForm SexoutSFLDataNewNPCsFox rActorREF
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsFemale rActorREF
					DebugPrint "SCR0Add3rdParty: FNVFoxMod: Krystal REF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: FNVFoxMod: Krystal REF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: FNVFoxMod: Krystal REF NULL Error %1.0f, %n" iModIndex rActorREF
			endif
			Set rActorREF to BuildRef iModIndex 18235 ; *** MiyuREF
			if rActorREF
				if rActorREF.GetType == iNPC
					Set rRace to BuildRef iModIndex 18226 ; *** Fox Race
					ListAddForm SexoutSFLDataRaceFox rRace
					ListAddForm SexoutSFLDataNewNPCsFox rActorREF
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsFemale rActorREF
					DebugPrint "SCR0Add3rdParty: FNVFoxMod: Miyu REF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: FNVFoxMod: Miyu REF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: FNVFoxMod: Miyu REF NULL Error %1.0f, %n" iModIndex rActorREF
			endif
			Set rActorREF to BuildRef iModIndex 18236 ; *** WolfREF
			if rActorREF
				if rActorREF.GetType == iNPC
					Set rRace to BuildRef iModIndex 18228 ; *** Fox Race
					ListAddForm SexoutSFLDataRaceFox rRace
					ListAddForm SexoutSFLDataNewNPCsFox rActorREF
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsMale rActorREF
					DebugPrint "SCR0Add3rdParty: FNVFoxMod: Wolf REF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: FNVFoxMod: Wolf REF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: FNVFoxMod: Wolf REF NULL Error %1.0f, %n" iModIndex rActorREF
			endif
			Set rActorREF to BuildRef iModIndex 18237 ; *** FalcoREF
			if rActorREF
				if rActorREF.GetType == iNPC
					Set rRace to BuildRef iModIndex 18227 ; *** Fox Race
					ListAddForm SexoutSFLDataRaceFox rRace
					ListAddForm SexoutSFLDataNewNPCsFox rActorREF
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsMale rActorREF
					DebugPrint "SCR0Add3rdParty: FNVFoxMod: Falco REF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: FNVFoxMod: Falco REF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: FNVFoxMod: Falco REF NULL Error %1.0f, %n" iModIndex rActorREF
			endif
			Set rActorREF to BuildRef iModIndex 29977 ; *** McCloudREF
			if rActorREF
				if rActorREF.GetType == iNPC
					Set rRace to BuildRef iModIndex 24111 ; *** Fox Race
					ListAddForm SexoutSFLDataRaceFox rRace
					ListAddForm SexoutSFLDataNewNPCsFox rActorREF
					ListAddForm SexoutSLActorDataPossibleCompanions rActorREF
					ListAddForm SexoutSLDataPossCompanionsMale rActorREF
					DebugPrint "SCR0Add3rdParty: FNVFoxMod: McCloud REF Added %1.0f, %n" iModIndex rActorREF
				else
					DebugPrint "SCR0Add3rdParty: FNVFoxMod: McCloud REF Type Error %1.0f, %n" iModIndex rActorREF
				endif
			else
				DebugPrint "SCR0Add3rdParty: FNVFoxMod: McCloud REF NULL Error %1.0f, %n" iModIndex rActorREF
			endif
		endif

; // 2 versions of Rocket with different REFS ? I'm not touching it till it's sorted out

		DebugPrint "SCR03rdParty: 3rd Party FormList content added ok"
		StopQuest SexoutSQAdd3rdPartyStuff
	endif

End

 

Link to comment
DoctaSax

DoctaSax

Posted
Posted

I'm getting nowhere with this:

		if (IsModLoaded "MarisolMJDJJ.esp") && (IsModLoaded "SexOutMarisol.esp")
			let rBuiltREF := SexoutSCR00UDFGetExternalForm "SexOutMarisol.esp", "000DBD", 200
			if rBuiltREF
;# The mod is loaded, and the form is a valid actor. Safe to add to lists etc
			endif
		endif
getting a too many arguments message trying to compile

 

You skipped actually calling that UDF, Hal.

Link to comment
Halstrom

Halstrom

Posted
  • Author
Posted

 

I'm getting nowhere with this:

		if (IsModLoaded "MarisolMJDJJ.esp") && (IsModLoaded "SexOutMarisol.esp")
			let rBuiltREF := SexoutSCR00UDFGetExternalForm "SexOutMarisol.esp", "000DBD", 200
			if rBuiltREF
;# The mod is loaded, and the form is a valid actor. Safe to add to lists etc
			endif
		endif
getting a too many arguments message trying to compile

 

You skipped actually calling that UDF, Hal.

 

Ah ok I was just copying Odessa's script :)
Link to comment
Odessa

Odessa

Posted
Posted

Yeah, should be:

 

let rBuiltREF := call SexoutSCR00UDFGetExternalForm "SexOutMarisol.esp", "000DBD", 200
if rBuiltREF
    ;# The mod is loaded, and the form is a valid actor. Safe to add to lists etc
endif

 

You don't need the IsModLoaded check because the UDF does it for you (returns 0 if mod not loaded) :).

Link to comment
Halstrom

Halstrom

Posted
  • Author
Posted

Yeah, should be:

 

let rBuiltREF := call SexoutSCR00UDFGetExternalForm "SexOutMarisol.esp", "000DBD", 200

if rBuiltREF

    ;# The mod is loaded, and the form is a valid actor. Safe to add to lists etc

endif

 

You don't need the IsModLoaded check because the UDF does it for you (returns 0 if mod not loaded) :).

Cool, easy fix, I didn't want to call the UDF 20 times in the one script to check non-loaded mods :)
Link to comment
  • 2 weeks later...
  • 2 weeks later...
Halstrom

Halstrom

Posted
  • Author
Posted

It seems that sexoutscumgecko was left out when cum was switched from tokens to ingestibles.

Hmm, I'll check it out, though those cum ingestibles aren't actually in use, I've got to work out someway of milking them from SexoutSpunk.
Link to comment
gamedude711

gamedude711

Posted
Posted

 

It seems that sexoutscumgecko was left out when cum was switched from tokens to ingestibles.

Hmm, I'll check it out, though those cum ingestibles aren't actually in use, I've got to work out someway of milking them from SexoutSpunk.

 

Okay, I only noticed because I thought pepertje could use that for his breeder mod since he was using the old cum tokens.

Link to comment
Guest
This topic is now closed to further replies.
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