Reznods Mannequins auch in anderen Rassen

**Dunmer-Karateka** · 15.07.2008, 19:35

Also heißt das, dass ich mein eigenheim in der ReznodMannequin.esp speichern muss wenn ich mir wyre Bash nich runnerladen will?

hier mal der Mannequin-Script
für Item

Zitat

ScriptName ReznodMannequinMarbleFObjectScript

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 ReznodMannequinMarbleF001 == 1 )
set MyMannequin to ReznodMannequinMarbleF001.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF002 == 1 )
set MyMannequin to ReznodMannequinMarbleF002.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF003 == 1 )
set MyMannequin to ReznodMannequinMarbleF003.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF004 == 1 )
set MyMannequin to ReznodMannequinMarbleF004.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF005 == 1 )
set MyMannequin to ReznodMannequinMarbleF005.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF006 == 1 )
set MyMannequin to ReznodMannequinMarbleF006.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF007 == 1 )
set MyMannequin to ReznodMannequinMarbleF007.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF008 == 1 )
set MyMannequin to ReznodMannequinMarbleF008.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF009 == 1 )
set MyMannequin to ReznodMannequinMarbleF009.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF010 == 1 )
set MyMannequin to ReznodMannequinMarbleF010.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF011 == 1 )
set MyMannequin to ReznodMannequinMarbleF011.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF012 == 1 )
set MyMannequin to ReznodMannequinMarbleF012.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF013 == 1 )
set MyMannequin to ReznodMannequinMarbleF013.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF014 == 1 )
set MyMannequin to ReznodMannequinMarbleF014.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF015 == 1 )
set MyMannequin to ReznodMannequinMarbleF015.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF016 == 1 )
set MyMannequin to ReznodMannequinMarbleF016.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF017 == 1 )
set MyMannequin to ReznodMannequinMarbleF017.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF018 == 1 )
set MyMannequin to ReznodMannequinMarbleF018.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF019 == 1 )
set MyMannequin to ReznodMannequinMarbleF019.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF020 == 1 )
set MyMannequin to ReznodMannequinMarbleF020.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF021 == 1 )
set MyMannequin to ReznodMannequinMarbleF021.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF022 == 1 )
set MyMannequin to ReznodMannequinMarbleF022.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF023 == 1 )
set MyMannequin to ReznodMannequinMarbleF023.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF024 == 1 )
set MyMannequin to ReznodMannequinMarbleF024.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF025 == 1 )
set MyMannequin to ReznodMannequinMarbleF025.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF026 == 1 )
set MyMannequin to ReznodMannequinMarbleF026.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF027 == 1 )
set MyMannequin to ReznodMannequinMarbleF027.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF028 == 1 )
set MyMannequin to ReznodMannequinMarbleF028.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF029 == 1 )
set MyMannequin to ReznodMannequinMarbleF029.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF030 == 1 )
set MyMannequin to ReznodMannequinMarbleF030.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF031 == 1 )
set MyMannequin to ReznodMannequinMarbleF031.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF032 == 1 )
set MyMannequin to ReznodMannequinMarbleF032.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF033 == 1 )
set MyMannequin to ReznodMannequinMarbleF033.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF034 == 1 )
set MyMannequin to ReznodMannequinMarbleF034.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF035 == 1 )
set MyMannequin to ReznodMannequinMarbleF035.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF036 == 1 )
set MyMannequin to ReznodMannequinMarbleF036.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF037 == 1 )
set MyMannequin to ReznodMannequinMarbleF037.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF038 == 1 )
set MyMannequin to ReznodMannequinMarbleF038.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF039 == 1 )
set MyMannequin to ReznodMannequinMarbleF039.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF040 == 1 )
set MyMannequin to ReznodMannequinMarbleF040.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF041 == 1 )
set MyMannequin to ReznodMannequinMarbleF041.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF042 == 1 )
set MyMannequin to ReznodMannequinMarbleF042.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF043 == 1 )
set MyMannequin to ReznodMannequinMarbleF043.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF044 == 1 )
set MyMannequin to ReznodMannequinMarbleF044.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF045 == 1 )
set MyMannequin to ReznodMannequinMarbleF045.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF046 == 1 )
set MyMannequin to ReznodMannequinMarbleF046.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF047 == 1 )
set MyMannequin to ReznodMannequinMarbleF047.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF048 == 1 )
set MyMannequin to ReznodMannequinMarbleF048.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF049 == 1 )
set MyMannequin to ReznodMannequinMarbleF049.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF050 == 1 )
set MyMannequin to ReznodMannequinMarbleF050.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF051 == 1 )
set MyMannequin to ReznodMannequinMarbleF051.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF052 == 1 )
set MyMannequin to ReznodMannequinMarbleF052.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF053 == 1 )
set MyMannequin to ReznodMannequinMarbleF053.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF054 == 1 )
set MyMannequin to ReznodMannequinMarbleF054.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF055 == 1 )
set MyMannequin to ReznodMannequinMarbleF055.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF056 == 1 )
set MyMannequin to ReznodMannequinMarbleF056.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF057 == 1 )
set MyMannequin to ReznodMannequinMarbleF057.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF058 == 1 )
set MyMannequin to ReznodMannequinMarbleF058.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF059 == 1 )
set MyMannequin to ReznodMannequinMarbleF059.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF060 == 1 )
set MyMannequin to ReznodMannequinMarbleF060.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF061 == 1 )
set MyMannequin to ReznodMannequinMarbleF061.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF062 == 1 )
set MyMannequin to ReznodMannequinMarbleF062.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF063 == 1 )
set MyMannequin to ReznodMannequinMarbleF063.GetSelf
elseif ( GetInCellParam ReznodMannequinHolderCell ReznodMannequinMarbleF064 == 1 )
set MyMannequin to ReznodMannequinMarbleF064.GetSelf
endif

; End of huge long block of checks

if ( MyMannequin == 0 )
Message "Keine Rüstungspuppen mehr verfügbar"
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

für NPC

Zitat

ScriptName ReznodMannequinMarbleFScript

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 ( 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 "Was möchtet Ihr tun?" "Beenden" "Ausrüstung ändern" "Puppe nehmen" "Aussehen ändern"
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 ReznodMannequinMarbleFObject 1
set MyX to 0
set MyY to 0
set MyZ to 0
set MyRot to 0
MoveTo ReznodMannequinContainerObject
Return
elseif ( MessageAnswer == 3 )
set MessageStatus to 3
Return
endif
elseif ( MessageStatus == 3 )
if ( Sneak == 1 )
if ( Alert == 1 )
if ( Pose == 1 )
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "* Schleichmodus" "* Waffe einstecken" "* Parieren" "Zauber darstellen"
elseif ( Pose == 0 )
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "* Schleichmodus" "* Waffe einstecken" "Parieren" "Zauber darstellen"
else
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "* Schleichmodus" "* Waffe einstecken" "Parieren" "* Zauber darstellen"
endif
else
if ( Pose == 1 )
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "* Schleichmodus" "Waffe ziehen" "* Parieren" "Zauber darstellen"
elseif ( Pose == 0 )
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "* Schleichmodus" "Waffe ziehen" "Parieren" "Zauber darstellen"
else
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "* Schleichmodus" "Waffe ziehen" "Parieren" "* Zauber darstellen"
endif
endif
else
if ( Alert == 1 )
if ( Pose == 1 )
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "Schleichmodus" "* Waffe einstecken" "* Parieren" "Zauber darstellen"
elseif ( Pose == 0 )
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "Schleichmodus" "* Waffe einstecken" "Parieren" "Zauber darstellen"
else
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "Schleichmodus" "* Waffe einstecken" "Parieren" "* Zauber darstellen"
endif
else
if ( Pose == 1 )
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "Schleichmodus" "Waffe ziehen" "* Parieren" "Zauber darstellen"
elseif ( Pose == 0 )
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "Schleichmodus" "Waffe ziehen" "Parieren" "Zauber darstellen"
else
MessageBox "Was wollt Ihr am Aussehen ändern?" "Zurück" "Zu mir drehen" "Schleichmodus" "Waffe ziehen" "Parieren" "* Zauber darstellen"
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 == 2 )
if ( Sneak == 0 )
set Sneak to 1
else
set Sneak to 0
endif
set UpdatePose to 1
set MessageStatus to 3
Return
elseif ( MessageAnswer == 3 )
if ( Alert == 0 )
set Alert to 1
else
set Alert to 0
endif
set UpdatePose to 1
set MessageStatus to 3
Return
elseif ( MessageAnswer == 4 )
if ( Pose == 1 )
set Pose to 0
else
set Pose to 1
endif
set UpdatePose to 1
set MessageStatus to 3
Return
elseif ( MessageAnswer == 5 )
set MessageStatus to 5
Return
endif
elseif ( MessageStatus == 5 )
if ( Pose == 2 || Pose == 3 )
MessageBox "Welcher Zauber soll dargestellt werden?" "Zurück" "* Arm nach oben gestreckt" "Auf ein Ziel gerichtet" "Berührung"
elseif ( Pose == 4 || Pose == 5 )
MessageBox "Welcher Zauber soll dargestellt werden?" "Zurück" "Arm nach oben gestreckt" "* Auf ein Ziel gerichtet" "Berührung"
elseif ( Pose == 6 || Pose == 7 )
MessageBox "Welcher Zauber soll dargestellt werden?" "Zurück" "Arm nach oben gestreckt" "Auf ein Ziel gerichtet" "* Berührung"
else
MessageBox "Welcher Zauber soll dargestellt werden?" "Zurück" "Arm nach oben gestreckt" "Auf ein Ziel gerichtet" "Berührung"
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 "Welcher Arm soll nach oben gestreckt werden?" "Zurück" "* Linker Arm" "Rechter Arm"
elseif ( Pose == 3 )
MessageBox "Welcher Arm soll nach oben gestreckt werden?" "Zurück" "Linker Arm" "* Rechter Arm"
else
MessageBox "Welcher Arm soll nach oben gestreckt werden?" "Zurück" "Linker Arm" "Rechter Arm"
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 "Mit welcher Hand soll die Puppe auf ein Ziel zeigen?" "Zurück" "* Linke Hand" "Rechte Hand"
elseif ( Pose == 5 )
MessageBox "Mit welcher Hand soll die Puppe auf ein Ziel zeigen?" "Zurück" "Linke Hand" "* Rechte Hand"
else
MessageBox "Mit welcher Hand soll die Puppe auf ein Ziel zeigen?" "Zurück" "Linke Hand" "Rechte Hand"
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 "Wie soll die Berührung dargestellt werden?" "Zurück" "* Beide Hände" "Rechte Hand"
elseif ( Pose == 7 )
MessageBox "Wie soll die Berührung dargestellt werden?" "Zurück" "Beide Hände" "* Rechte Hand"
else
MessageBox "Wie soll die Berührung dargestellt werden?" "Zurück" "Beide Hände" "Rechte Hand"
endif
set MessageStatus to 12
elseif ( MessageStatus == 12 )
set MessageAnswer to GetButtonPressed
if ( MessageAnswer == -1 )
Return
elseif ( MessageAnswer == 0 )
set MessageStatus 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

**Low Post** · 15.07.2008, 21:14

Zitat von Dunmer-Karateka

Also heißt das, dass ich mein eigenheim in der ReznodMannequin.esp speichern muss wenn ich mir wyre Bash nich runnerladen will?

Du hast noch die Alternative alles Relevante in deine *.esp zu kopieren, ich wüsste aber nicht was gegen eine Verwendung von Wrye Bash spricht.
Und da das relevante in dem Fall wahrscheinlich fast die ganze *.esp wäre ist das abspeichern in der Reznod.esp ohne WB das einfachste.

Ich hab btw. das Problem in den Scripten gefunden:
In dem Objekt-Script werden Referenzen abgefragt (GetInCellParam). Damit deine Puppen auch funktionieren musst du das Script dementsprechend erweitern und die Referenzen dafür auch erstellen.
So wie ich das Script verstanden habe gibt's davon aber für jede Rasse ein eigenes, so dass du für deine Puppen ein neues Script auf Basis der vorhanden erstellen musst, da es sonst bei den Puppen zu ungewollten Resultaten kommt (Rasse der Puppe betreffend).

**Dunmer-Karateka** · 17.07.2008, 13:13

ok... hab jetzt wrye bash
wie kann ich 2 pi's verbinden?

**Low Post** · 17.07.2008, 14:58

Du machst einen Rechtsklick auf die Reznod.esp und wählst esmify self. Die Endung bleibt zwar gleich, von Spiel & CS wird die aber jetzt wie eine *.esm behandelt.

Jetzt erstellst du deine Änderungen, speicherst die in einer neuen *.esp ab. Die Reznod.esp sollte jetzt in der Masterliste auftauchen.
Danach noch espify self auf die Reznod.esp und ausprobieren, ob das auch so funktioniert.

**Dunmer-Karateka** · 18.07.2008, 19:34

jetzt gehts erstmal...
ABER
Ich hab ne weibliche Marmorpuppe genommen, ID geändert und ne argonierin draus gemacht.
Die Marmorpuppe und die Argonierinnen Puppe ins zimmer auf je einen Sockel gestellt, gespeichert und Oblivion gestartet... ich komm in den Raum und renn voll gegen die 2 Mädls, weil die direkt vor der Tür standen anstatt auf ihren sockeln... wie kann ich die da festnageln wo se stehen sollen??

So siehts im CS aus

Und so im Spiel

ich pfusch grad in den scripts rum...
jetzt sagt s CS mir:

Zitat

Non-persistent reference 'AWa" cannot be used in a script

Zitat

Item 'AWa' not found for a parameter ObjectReferenceID. Compiled script not saved!

sagt mir bitte was das heißt.
hier der script (kursives ist das was geändert wurde)

Original-Script im Post #16 (oberer gespoilter Script)

(habs auch schon mit anderen Varianten versucht AW001, AW002; 1AWa, 1AWb; AWa, AWb; AW)

**Low Post** · 19.07.2008, 22:00

Das (Referenzen stehen nicht dort, wo sie im CS plaziert wurden) ist leider ein Bug in Oblivion.

Du könntest folgendes als WorkAround verwenden (zumindest wenn deine Statuen noch kein Parent haben):

Code:

ref Parent

Begin Gamemode
 set Parent to GetParentRef
 if ( GetDistance Parent > 25 )     ;Wert muss evtl. noch angepasst werden
  MoveTo Parent
 endif
End

Dabei muss jeder Statue der jeweilige Sockel als Parent zugewiesen werden.

Dat janze in dein Script gedrückt sieht dann so aus:

Code:

ScriptName 2AWScript

Ref MyContainer
Ref MyMannequin
ref Parent
Short CantPlace
Short ShouldPlace
Short ShouldRemove

Begin OnAdd
 set CantPlace to 1
End

Begin OnDrop
 set ShouldPlace to 1
End

Begin GameMode
 set Parent to GetParentRef
 if ( GetDistance Parent > 25 )     ;Wert muss evtl. noch angepasst werden
  MoveTo Parent
 endif
 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 PuppenCell AWa == 1 )
    set MyMannequin to AWa.GetSelf
   elseif ( GetInCellParam PuppenCell AWb == 1 )
    set MyMannequin to AWb.GetSelf
   endif
; End of huge long block of checks
   if ( MyMannequin == 0 )
    Message "Keine Rüstungspuppen mehr verfügbar"
   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

**Dunmer-Karateka** · 20.07.2008, 02:02

immer noch:

Zitat

Non-persistent reference 'AWa" cannot be used in a script

Zitat

Item 'AWa' not found for a parameter ObjectReferenceID. Compiled script not saved!

**Low Post** · 20.07.2008, 03:17

Oh, übersehen. Mein Post bezog sich hauptsächlich auf das Bild.

Der Scriptfehler bezieht sich darauf, dass in Scripten verwendete Referenzen einen Hacken bei Persistent Reference brauchen.

**Dunmer-Karateka** · 20.07.2008, 11:03

Aaaaaaaaaaahhhhhhhhhhhhhh.....
man 3 tage ärger für ein Häckchen?? eieiei
na egal

Jaaaa endlich es geht

Jedenfalls klappts jetzt ein Puppenobjekt hinzustellen dass die puppe dann da steht...
Problem... die Puppe redet mit mir....
muss ich da in den eigenschaften iwas einstellen dass die nich mit mir redet, sonder dass sich die MessegeBox öffnet wo ich wählen kann was ich mit der puppe machen will
Also hier:

**Low Post** · 26.07.2008, 13:14

Zitat von Dunmer-Karateka

Jedenfalls klappts jetzt ein Puppenobjekt hinzustellen dass die puppe dann da steht...
Problem... die Puppe redet mit mir....
muss ich da in den eigenschaften iwas einstellen dass die nich mit mir redet, sonder dass sich die MessegeBox öffnet wo ich wählen kann was ich mit der puppe machen will
Also hier:

Hast du den Puppen auch so ein Script wie den Standardpuppen verpasst?
Der hat nämlich einen OnActivate-Block womit ein ansprechen eigentlich unmöglich wird.

Aber jetzt was anderes: ich hab auf TesNexus etwas zu dem Thema gefunden: TLS Modded Mannequins
Kannst ja mal probieren, ob es damit besser geht.

**Dunmer-Karateka** · 26.07.2008, 16:15

Naja... ich nutze seit kurzem BestMates... das geht genauso gut und es is noch ne schöne quest dazu

Aber ich hätt hier noch n kleines Problem

Thema: Reznods Mannequins auch in anderen Rassen

Themen-Optionen

Anzeige

Hybrid-Darstellung

Berechtigungen