Jump to content

disappearing NPCs


jonesjoshuar

Recommended Posts

I am trying to adapt Reznod's mannequins for use in my mod. I have studied the code but cannot figure out why if i place the mannequin npc it is invisible. Now i looked into the armory lab mod loaded it and coc the cell and the the mannequins are there just fine. Not a texture or a model issue. I can initiate dialogue (though there is none)

 

I have tried it with just the race, no scripts and still invisible. I can post the script but i dont think its there.

 

Is it possibly a animation issue?

Link to comment
Share on other sites

This is a code applied to the npc Mannequin

Altered by the maker of the armory lab mod which his mannequins work. however if you cut and paste the mannequin it dissappears. if you move it, it returns to its place. Which is good for what i want too, however i have no idea of how to anchor it to the cell, to be visible. I have been studying the functions called but see nothing in it that tips me off.

ScriptName ReznodMannequinScriptTS

; TS 4/24/06  Made manikin immobile (can't pick up or rotate)

Ref MySelf
Short MessageStatus
Short MessageAnswer
Short CurrentState
Short MyAlert

Short Edit
Short Pose
Short Sneak
Short Alert
Short UpdatePose
Float Timer
Short DummyCount

Float MyX
Float MyY
Float MyZ
Float MyRot

Begin OnLoad

; If left in, all manikins will relocate to your entrypoint into the room.
;if ( MyX == 0 )
;if ( MyY == 0 )
;if ( MyZ == 0 )
;if ( MyRot == 0 )
;	set MyX to Player.GetPos X
;	set MyY to Player.GetPos Y
;	set MyZ to Player.GetPos Z
;	set MyRot to Player.GetAngle Z
;	set Pose to 0
;	set Sneak to 0
;	set Alert to 0
;endif
;endif
;endif
;endif

; ?
SetForceSneak Sneak

if ( Pose == 0 )
PlayGroup Idle 1
elseif ( Pose == 1 )
PlayGroup BlockIdle 1
elseif ( Pose == 2 )
PlayGroup CastSelf 1	; left
elseif ( Pose == 3 )
PlayGroup CastSelfAlt 1	; right
elseif ( Pose == 4 )
PlayGroup CastTarget 1	; left
elseif ( Pose == 5 )
PlayGroup CastTargetAlt 1; right
elseif ( Pose == 6 )
PlayGroup CastTouch 1	; two handed
elseif ( Pose == 7 )
PlayGroup CastTouchAlt 1; right	
endif

set Timer to 0

SetGhost 1

End

Begin OnActivate

set MessageStatus to 1
set MyX to GetPos X
set MyY to GetPos Y
set MyZ to GetPos Z
set MyRot to GetAngle Z

End

Begin GameMode

if ( Edit == 0 )
if ( UpdatePose == 1 )
set MySelf to GetSelf
if ( CurrentState == 0 )
	set CurrentState to 1
endif
elseif ( UpdatePose == 2 )
set UpdatePose to 0
set ReznodMannequinPoseActiveRef.MyRef to MySelf
ReznodMannequinPoseActiveRef.MoveTo MySelf
MoveTo ReznodMannequinContainerObject
endif
endif

if ( Timer < 0.8 )
set Timer to ( Timer + GetSecondsPassed )
else
SetUnconscious 1
SkipAnim
endif

if ( GetItemCount ReznodMannequinDummyWeapon > 1 )
set DummyCount to ( GetItemCount ReznodMannequinDummyWeapon - 1 )
RemoveItem ReznodMannequinDummyWeapon DummyCount
elseif ( GetItemCount ReznodMannequinDummyWeapon == 0 )
AddItem ReznodMannequinDummyWeapon 1
endif

if ( CurrentState > 0 )
if ( CurrentState == 1 )
	RemoveAllItems ReznodMannequinContainerObject
	set CurrentState to 2
	Return
elseif ( CurrentState == 2 )
	SetUnconscious 0
	ReznodMannequinContainerObject.RemoveAllItems MySelf
	SetAV Luck 0
	set CurrentState to 3
	Return
elseif ( CurrentState == 3 )
	EvaluatePackage ReznodMannequinActorAIWearable
	set CurrentState to 4
	Return
elseif ( CurrentState == 4 )
	SetAV Luck 1
	set CurrentState to 5
	Return
elseif ( CurrentState == 5 )
	EvaluatePackage ReznodMannequinActorAIArmor
	SetAlert Alert
	set CurrentState to 6
	Return
elseif ( CurrentState < 10 )
	set CurrentState to ( CurrentState + 1 )
	Return
else
	SetUnconscious 1
	set UpdatePose to 2
	set CurrentState to 0
endif
;else
;	SetPos X MyX
;	SetPos Y MyY
;	SetPos Z MyZ
;	SetAngle Z MyRot
endif

if ( MessageStatus == 0 )
Return
elseif ( MessageStatus == 1 )
MessageBox "What would you like to do?" "Return" "Modify Inventory" "Pose"
set Edit to 1
set MessageStatus to 2
elseif ( MessageStatus == 2 )
set MessageAnswer to GetButtonPressed
if ( MessageAnswer == -1 )
	Return
elseif ( MessageAnswer == 0 )
	set Edit to 0
	set MessageStatus to 0
	Return
elseif ( MessageAnswer == 1 )
	RemoveItem ReznodMannequinDummyWeapon 1
	RemoveAllItems ReznodMannequinContainerObject
	ReznodMannequinContainerObject.Activate Player 1
	set UpdatePose to 1
	set MessageStatus to 1
	Return
;	elseif ( MessageAnswer == 2 )
;		RemoveItem ReznodMannequinDummyWeapon 1
;		RemoveAllItems Player
;		Player.AddItem ReznodMannequinWoodMObject 1
;		set MyX to 0
;		set MyY to 0
;		set MyZ to 0
;		set MyRot to 0
;		MoveTo ReznodMannequinContainerObject
;		Return
;	elseif ( MessageAnswer == 3 )
elseif ( MessageAnswer == 2 )
	set MessageStatus to 3
	Return
endif
elseif ( MessageStatus == 3 )
if ( Sneak == 1 )
	if ( Alert == 1 )
		if ( Pose == 1 )
			MessageBox "What pose would you like?" "Return" "* Toggle Sneak" "* Toggle Weapon Drawn" "* Toggle Sheild Raised" "Casting Options"
		elseif ( Pose == 0 )
			MessageBox "What pose would you like?" "Return" "* Toggle Sneak" "* Toggle Weapon Drawn" "Toggle Sheild Raised" "Casting Options"
		else
			MessageBox "What pose would you like?" "Return" "* Toggle Sneak" "* Toggle Weapon Drawn" "Toggle Sheild Raised" "* Casting Options"
		endif
	else
		if ( Pose == 1 )
			MessageBox "What pose would you like?" "Return" "* Toggle Sneak" "Toggle Weapon Drawn" "* Toggle Sheild Raised" "Casting Options"
		elseif ( Pose == 0 )
			MessageBox "What pose would you like?" "Return" "* Toggle Sneak" "Toggle Weapon Drawn" "Toggle Sheild Raised" "Casting Options"
		else
			MessageBox "What pose would you like?" "Return" "* Toggle Sneak" "Toggle Weapon Drawn" "Toggle Sheild Raised" "* Casting Options"
		endif
	endif
else
	if ( Alert == 1 )
		if ( Pose == 1 )
			MessageBox "What pose would you like?" "Return" "Toggle Sneak" "* Toggle Weapon Drawn" "* Toggle Sheild Raised" "Casting Options"
		elseif ( Pose == 0 )
			MessageBox "What pose would you like?" "Return" "Toggle Sneak" "* Toggle Weapon Drawn" "Toggle Sheild Raised" "Casting Options"
		else
			MessageBox "What pose would you like?" "Return" "Toggle Sneak" "* Toggle Weapon Drawn" "Toggle Sheild Raised" "* Casting Options"
		endif
	else
		if ( Pose == 1 )
			MessageBox "What pose would you like?" "Return" "Toggle Sneak" "Toggle Weapon Drawn" "* Toggle Sheild Raised" "Casting Options"
		elseif ( Pose == 0 )
			MessageBox "What pose would you like?" "Return" "Toggle Sneak" "Toggle Weapon Drawn" "Toggle Sheild Raised" "Casting Options"
		else
			MessageBox "What pose would you like?" "Return" "Toggle Sneak" "Toggle Weapon Drawn" "Toggle Sheild Raised" "* Casting Options"
		endif
	endif
endif
set MessageStatus to 4
elseif ( MessageStatus == 4 )
set MessageAnswer to GetButtonPressed
if ( MessageAnswer == -1 )
	Return
elseif ( MessageAnswer == 0 )
	set MessageStatus to 1
	Return
;	elseif ( MessageAnswer == 1 )
;		set MyRot to ( Player.GetAngle Z - 180 )
;		set UpdatePose to 1
;		set MessageStatus to 3
;		Return
elseif ( MessageAnswer == 1 )
	if ( Sneak == 0 )
		set Sneak to 1
	else
		set Sneak to 0
	endif
	set UpdatePose to 1
	set MessageStatus to 3
	Return
elseif ( MessageAnswer == 2 )
	if ( Alert == 0 )
		set Alert to 1
	else
		set Alert to 0
	endif
	set UpdatePose to 1
	set MessageStatus to 3
	Return
elseif ( MessageAnswer == 3 )
	if ( Pose == 1 )
		set Pose to 0
	else
		set Pose to 1
	endif
	set UpdatePose to 1
	set MessageStatus to 3
	Return
elseif ( MessageAnswer == 4 )
	set MessageStatus to 5
	Return
endif
elseif ( MessageStatus == 5 )
if ( Pose == 2 || Pose == 3 )
	MessageBox "What type of casting would you like to pose?" "Return" "* Self" "Target" "Touch"
elseif ( Pose == 4 || Pose == 5 )
	MessageBox "What type of casting would you like to pose?" "Return" "Self" "* Target" "Touch"
elseif ( Pose == 6 || Pose == 7 )
	MessageBox "What type of casting would you like to pose?" "Return" "Self" "Target" "* Touch"
else
	MessageBox "What type of casting would you like to pose?" "Return" "Self" "Target" "Touch"
endif
set MessageStatus to 6
elseif ( MessageStatus == 6 )
set MessageAnswer to GetButtonPressed
if ( MessageAnswer == -1 )
	Return
elseif ( MessageAnswer == 0 )
	set MessageStatus to 3
	Return
elseif ( MessageAnswer == 1 )
	set MessageStatus to 7
	Return
elseif ( MessageAnswer == 2 )
	set MessageStatus to 9
	Return
elseif ( MessageAnswer == 3 )
	set MessageStatus to 11
	Return
endif
elseif ( MessageStatus == 7 )
if ( Pose == 2 )
	MessageBox "What variation of cast on self would you like to pose?" "Return" "* Left Handed" "Right Handed"
elseif ( Pose == 3 )
	MessageBox "What variation of cast on self would you like to pose?" "Return" "Left Handed" "* Right Handed"
else
	MessageBox "What variation of cast on self would you like to pose?" "Return" "Left Handed" "Right Handed"
endif
set MessageStatus to 8
elseif ( MessageStatus == 8 )
set MessageAnswer to GetButtonPressed
if ( MessageAnswer == -1 )
	Return
elseif ( MessageAnswer == 0 )
	set MessageStatus to 5
	Return
elseif ( MessageAnswer == 1 )
	set Pose to 2
	set UpdatePose to 1
	set MessageStatus to 7
	Return
elseif ( MessageAnswer == 2 )
	set Pose to 3
	set UpdatePose to 1
	set MessageStatus to 7
	Return
endif
elseif ( MessageStatus == 9 )
if ( Pose == 4 )
	MessageBox "What variation of cast on target would you like to pose?" "Return" "* Left Handed" "Right Handed"
elseif ( Pose == 5 )
	MessageBox "What variation of cast on target would you like to pose?" "Return" "Left Handed" "* Right Handed"
else
	MessageBox "What variation of cast on target would you like to pose?" "Return" "Left Handed" "Right Handed"
endif
set MessageStatus to 10
elseif ( MessageStatus == 10 )
set MessageAnswer to GetButtonPressed
if ( MessageAnswer == -1 )
	Return
elseif ( MessageAnswer == 0 )
	set MessageStatus to 5
	Return
elseif ( MessageAnswer == 1 )
	set Pose to 4
	set UpdatePose to 1
	set MessageStatus to 9
	Return
elseif ( MessageAnswer == 2 )
	set Pose to 5
	set UpdatePose to 1
	set MessageStatus to 9
	Return
endif
elseif ( MessageStatus == 11 )
if ( Pose == 6 )
	MessageBox "What variation of cast on touch would you like to pose?" "Return" "* Two Handed" "Right Handed"
elseif ( Pose == 7 )
	MessageBox "What variation of cast on touch would you like to pose?" "Return" "Two Handed" "* Right Handed"
else
	MessageBox "What variation of cast on touch would you like to pose?" "Return" "Two Handed" "Right Handed"
endif
set MessageStatus to 12
elseif ( MessageStatus == 12 )
set MessageAnswer to GetButtonPressed
if ( MessageAnswer == -1 )
	Return
elseif ( MessageAnswer == 0 )
	set Mes0sageStatus to 5
	Return
elseif ( MessageAnswer == 1 )
	set Pose to 6
	set UpdatePose to 1
	set MessageStatus to 11
	Return
elseif ( MessageAnswer == 2 )
	set Pose to 7
	set UpdatePose to 1
	set MessageStatus to 11
	Return
endif
endif

End

 

It uses a reference from a holder cell:

ScriptName ReznodMannequinPoseActiveScript

Ref MySelf
Ref MyRef
Short Wait

Begin GameMode

set MySelf to GetSelf

if ( Wait < 5 )
set Wait to ( Wait + 1 )
Return
else
set Wait to 0
MyRef.PlayGroup Idle 1
MyRef.MoveTo MySelf
MoveTo ReznodMannequinContainerObject
endif

End

 

and i dont know if this is anything but for the objects so you can carry a mannequin around. though it is not used i do not think in the armory lab

 

ScriptName ReznodMannequinMarbleMObjectScript

Ref MyContainer
Ref MyMannequin
Short CantPlace
Short ShouldPlace
Short ShouldRemove

Begin OnAdd

set CantPlace to 1

End

Begin OnDrop

set ShouldPlace to 1

End

Begin GameMode

set MyContainer to getContainer
if ( MyContainer != 0 )
set CantPlace to 1
endif

if ( ShouldPlace == 1 )
if ( CantPlace == 0 )
; Huge long block of checks

if ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM001 == 1 )
set MyMannequin to ReznodMannequinMarbleM001.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM002 == 1 )
set MyMannequin to ReznodMannequinMarbleM002.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM003 == 1 )
set MyMannequin to ReznodMannequinMarbleM003.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM004 == 1 )
set MyMannequin to ReznodMannequinMarbleM004.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM005 == 1 )
set MyMannequin to ReznodMannequinMarbleM005.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM006 == 1 )
set MyMannequin to ReznodMannequinMarbleM006.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM007 == 1 )
set MyMannequin to ReznodMannequinMarbleM007.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM008 == 1 )
set MyMannequin to ReznodMannequinMarbleM008.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM009 == 1 )
set MyMannequin to ReznodMannequinMarbleM009.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM010 == 1 )
set MyMannequin to ReznodMannequinMarbleM010.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM011 == 1 )
set MyMannequin to ReznodMannequinMarbleM011.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM012 == 1 )
set MyMannequin to ReznodMannequinMarbleM012.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM013 == 1 )
set MyMannequin to ReznodMannequinMarbleM013.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM014 == 1 )
set MyMannequin to ReznodMannequinMarbleM014.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM015 == 1 )
set MyMannequin to ReznodMannequinMarbleM015.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM016 == 1 )
set MyMannequin to ReznodMannequinMarbleM016.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM017 == 1 )
set MyMannequin to ReznodMannequinMarbleM017.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM018 == 1 )
set MyMannequin to ReznodMannequinMarbleM018.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM019 == 1 )
set MyMannequin to ReznodMannequinMarbleM019.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM020 == 1 )
set MyMannequin to ReznodMannequinMarbleM020.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM021 == 1 )
set MyMannequin to ReznodMannequinMarbleM021.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM022 == 1 )
set MyMannequin to ReznodMannequinMarbleM022.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM023 == 1 )
set MyMannequin to ReznodMannequinMarbleM023.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM024 == 1 )
set MyMannequin to ReznodMannequinMarbleM024.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM025 == 1 )
set MyMannequin to ReznodMannequinMarbleM025.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM026 == 1 )
set MyMannequin to ReznodMannequinMarbleM026.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM027 == 1 )
set MyMannequin to ReznodMannequinMarbleM027.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM028 == 1 )
set MyMannequin to ReznodMannequinMarbleM028.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM029 == 1 )
set MyMannequin to ReznodMannequinMarbleM029.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM030 == 1 )
set MyMannequin to ReznodMannequinMarbleM030.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM031 == 1 )
set MyMannequin to ReznodMannequinMarbleM031.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM032 == 1 )
set MyMannequin to ReznodMannequinMarbleM032.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM033 == 1 )
set MyMannequin to ReznodMannequinMarbleM033.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM034 == 1 )
set MyMannequin to ReznodMannequinMarbleM034.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM035 == 1 )
set MyMannequin to ReznodMannequinMarbleM035.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM036 == 1 )
set MyMannequin to ReznodMannequinMarbleM036.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM037 == 1 )
set MyMannequin to ReznodMannequinMarbleM037.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM038 == 1 )
set MyMannequin to ReznodMannequinMarbleM038.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM039 == 1 )
set MyMannequin to ReznodMannequinMarbleM039.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM040 == 1 )
set MyMannequin to ReznodMannequinMarbleM040.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM041 == 1 )
set MyMannequin to ReznodMannequinMarbleM041.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM042 == 1 )
set MyMannequin to ReznodMannequinMarbleM042.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM043 == 1 )
set MyMannequin to ReznodMannequinMarbleM043.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM044 == 1 )
set MyMannequin to ReznodMannequinMarbleM044.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM045 == 1 )
set MyMannequin to ReznodMannequinMarbleM045.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM046 == 1 )
set MyMannequin to ReznodMannequinMarbleM046.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM047 == 1 )
set MyMannequin to ReznodMannequinMarbleM047.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM048 == 1 )
set MyMannequin to ReznodMannequinMarbleM048.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM049 == 1 )
set MyMannequin to ReznodMannequinMarbleM049.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM050 == 1 )
set MyMannequin to ReznodMannequinMarbleM050.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM051 == 1 )
set MyMannequin to ReznodMannequinMarbleM051.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM052 == 1 )
set MyMannequin to ReznodMannequinMarbleM052.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM053 == 1 )
set MyMannequin to ReznodMannequinMarbleM053.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM054 == 1 )
set MyMannequin to ReznodMannequinMarbleM054.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM055 == 1 )
set MyMannequin to ReznodMannequinMarbleM055.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM056 == 1 )
set MyMannequin to ReznodMannequinMarbleM056.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM057 == 1 )
set MyMannequin to ReznodMannequinMarbleM057.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM058 == 1 )
set MyMannequin to ReznodMannequinMarbleM058.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM059 == 1 )
set MyMannequin to ReznodMannequinMarbleM059.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM060 == 1 )
set MyMannequin to ReznodMannequinMarbleM060.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM061 == 1 )
set MyMannequin to ReznodMannequinMarbleM061.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM062 == 1 )
set MyMannequin to ReznodMannequinMarbleM062.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM063 == 1 )
set MyMannequin to ReznodMannequinMarbleM063.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleM064 == 1 )
set MyMannequin to ReznodMannequinMarbleM064.GetSelf
endif

; End of huge long block of checks

	if ( MyMannequin == 0 )
		Message "No Mannequins avaliable"
	else
		MyMannequin.MoveTo Player
		Activate Player
		set ShouldRemove to 1
	endif
endif
endif

if ( ShouldRemove == 1 )
if ( GetContainer != 0 )
	RemoveMe
endif
endif

set ShouldPlace to 0
set CantPlace to 0

End

Link to comment
Share on other sites

Archived

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

  • Recently Browsing   0 members

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