Idee Romance_v37English&BT_Whitewolf_2_1

Roterbaron

Roterbaron

Neuankömmling
folgene frage ist es möglich die Scrips
begin _TLR_sexe02_s
; scene d'amour, partie 2
　
float Timer
short Step
short Ranum
float Disposition
float PnjX
float PnjY
float PnjZ
float PjZ
float PnjChute
if ( MenuMode == 1 )
return
endif
if ( Step == 0 )
Set Disposition to GetDisposition
SetDisposition 100
Set PnjX to ( GetPos, X )
Set PnjY to ( GetPos, Y )
Set PjZ to ( player->GetPos, Z )
Set Step to ( Step + 1 )
Set PnjZ to ( PjZ + 60 )
endif
;bruit + placement PNJ + nouvelle chambre
if ( Step == 1 )
Set "_TLR_room_placer" to -1 ; efface chambre 01
;PlaceAtMe, "_TLR_Chambre02", 1, 0, 0
Set PnjChute to ( GetFatigue ) ; Allonge le PNJ
Set PnjChute to ( -1 * PnjChute - 100 )
ModCurrentFatigue, PnjChute
Set Step to ( Step + 1 )
return
endif
if ( Step == 2 )
if ( Timer < 18 )
Set Timer to ( Timer + GetSecondsPassed )
return
endif
Set Step to ( Step + 1 )
Set Timer to 0
SetPos, X , PnjX
SetPos, Y , PnjY
SetPos, Z, PnjZ
Fall
return
endif
; FadeIn ( allumage ) + tempo pour observer la scene
if ( Step == 3 )
FadeIn, 1
Set Step to ( Step + 1 )
return
endif
if ( Step == 4 )
if ( Timer < 3 )
Set Timer to ( Timer + GetSecondsPassed )
return
endif
Set Step to ( Step + 1 )
Set Timer to 0
return
endif
; Fadeout
if ( Step == 5 )
Fadeout, 1
Set Step to ( Step + 1 )
return
endif
if ( Step == 6 )
if ( Timer < 1 )
Set Timer to ( Timer + GetSecondsPassed )
return
endif
Set Step to ( Step + 1 )
Set Timer to 0
return
endif
; reveil
if ( Step == 7 )
ModCurrentFatigue, 100
;rhabiller le PNJ & PJ
additem, "_TLR_anneau_rem", 1
Removeitem, "_TLR_anneau_rem", 1
if ( "_TLR_PJ_Enceinte" >= 3 )
; robe
if ( ( player->GetItemCount, "_TLR_robe01_3m" ) >= 1 )
player->Equip, "_TLR_robe01_3m"
elseif ( ( player->GetItemCount, "_TLR_robe01_4m" ) >= 1 )
player->Equip, "_TLR_robe01_4m"
elseif ( ( player->GetItemCount, "_TLR_robe01_5m" ) >= 1 )
player->Equip, "_TLR_robe01_5m"
elseif ( ( player->GetItemCount, "_TLR_robe01_6m" ) >= 1 )
player->Equip, "_TLR_robe01_6m"
elseif ( ( player->GetItemCount, "_TLR_robe01_7m" ) >= 1 )
player->Equip, "_TLR_robe01_7m"
elseif ( ( player->GetItemCount, "_TLR_robe01_8m" ) >= 1 )
player->Equip, "_TLR_robe01_8m"
elseif ( ( player->GetItemCount, "_TLR_robe01_9m" ) >= 1 )
player->Equip, "_TLR_robe01_9m"
elseif ( ( player->GetItemCount, "_TLR_robe02_3m" ) >= 1 )
player->Equip, "_TLR_robe02_3m"
elseif ( ( player->GetItemCount, "_TLR_robe02_4m" ) >= 1 )
player->Equip, "_TLR_robe02_4m"
elseif ( ( player->GetItemCount, "_TLR_robe02_5m" ) >= 1 )
player->Equip, "_TLR_robe02_5m"
elseif ( ( player->GetItemCount, "_TLR_robe02_6m" ) >= 1 )
player->Equip, "_TLR_robe02_6m"
elseif ( ( player->GetItemCount, "_TLR_robe02_7m" ) >= 1 )
player->Equip, "_TLR_robe02_7m"
elseif ( ( player->GetItemCount, "_TLR_robe02_8m" ) >= 1 )
player->Equip, "_TLR_robe02_8m"
elseif ( ( player->GetItemCount, "_TLR_robe02_9m" ) >= 1 )
player->Equip, "_TLR_robe02_9m"
endif
　
if ( ( player->GetItemCount, "_TLR_tunique01_3m" ) >= 1 )
player->Equip, "_TLR_tunique01_3m"
elseif ( ( player->GetItemCount, "_TLR_tunique01_4m" ) >= 1 )
player->Equip, "_TLR_tunique01_4m"
elseif ( ( player->GetItemCount, "_TLR_tunique01_5m" ) >= 1 )
player->Equip, "_TLR_tunique01_5m"
elseif ( ( player->GetItemCount, "_TLR_tunique01_6m" ) >= 1 )
player->Equip, "_TLR_tunique01_6m"
elseif ( ( player->GetItemCount, "_TLR_tunique01_7m" ) >= 1 )
player->Equip, "_TLR_tunique01_7m"
elseif ( ( player->GetItemCount, "_TLR_tunique01_8m" ) >= 1 )
player->Equip, "_TLR_tunique01_8m"
elseif ( ( player->GetItemCount, "_TLR_tunique01_9m" ) >= 1 )
player->Equip, "_TLR_tunique01_9m"
elseif ( ( player->GetItemCount, "_TLR_tunique02_3m" ) >= 1 )
player->Equip, "_TLR_tunique02_3m"
elseif ( ( player->GetItemCount, "_TLR_tunique02_4m" ) >= 1 )
player->Equip, "_TLR_tunique02_4m"
elseif ( ( player->GetItemCount, "_TLR_tunique02_5m" ) >= 1 )
player->Equip, "_TLR_tunique02_5m"
elseif ( ( player->GetItemCount, "_TLR_tunique02_6m" ) >= 1 )
player->Equip, "_TLR_tunique02_6m"
elseif ( ( player->GetItemCount, "_TLR_tunique02_7m" ) >= 1 )
player->Equip, "_TLR_tunique02_7m"
elseif ( ( player->GetItemCount, "_TLR_tunique02_8m" ) >= 1 )
player->Equip, "_TLR_tunique02_8m"
elseif ( ( player->GetItemCount, "_TLR_tunique02_9m" ) >= 1 )
player->Equip, "_TLR_tunique02_9m"
elseif ( ( player->GetItemCount, "_TLR_tunique03_3m" ) >= 1 )
player->Equip, "_TLR_tunique03_3m"
elseif ( ( player->GetItemCount, "_TLR_tunique03_4m" ) >= 1 )
player->Equip, "_TLR_tunique03_4m"
elseif ( ( player->GetItemCount, "_TLR_tunique03_5m" ) >= 1 )
player->Equip, "_TLR_tunique03_5m"
elseif ( ( player->GetItemCount, "_TLR_tunique03_6m" ) >= 1 )
player->Equip, "_TLR_tunique03_6m"
elseif ( ( player->GetItemCount, "_TLR_tunique03_7m" ) >= 1 )
player->Equip, "_TLR_tunique03_7m"
elseif ( ( player->GetItemCount, "_TLR_tunique03_8m" ) >= 1 )
player->Equip, "_TLR_tunique03_8m"
elseif ( ( player->GetItemCount, "_TLR_tunique03_9m" ) >= 1 )
player->Equip, "_TLR_tunique03_9m"
elseif ( ( player->GetItemCount, "_TLR_tunique04_3m" ) >= 1 )
player->Equip, "_TLR_tunique04_3m"
elseif ( ( player->GetItemCount, "_TLR_tunique04_4m" ) >= 1 )
player->Equip, "_TLR_tunique04_4m"
elseif ( ( player->GetItemCount, "_TLR_tunique04_5m" ) >= 1 )
player->Equip, "_TLR_tunique04_5m"
elseif ( ( player->GetItemCount, "_TLR_tunique04_6m" ) >= 1 )
player->Equip, "_TLR_tunique04_6m"
elseif ( ( player->GetItemCount, "_TLR_tunique04_7m" ) >= 1 )
player->Equip, "_TLR_tunique04_7m"
elseif ( ( player->GetItemCount, "_TLR_tunique04_8m" ) >= 1 )
player->Equip, "_TLR_tunique04_8m"
elseif ( ( player->GetItemCount, "_TLR_tunique04_9m" ) >= 1 )
player->Equip, "_TLR_tunique04_9m"
endif
else
if ( ( player->GetItemCount, extravagant_shirt_02 ) == 0 )
player->AddItem, extravagant_shirt_02, 1
endif
player->Equip, extravagant_shirt_02
if ( ( player->GetItemCount, extravagant_shoes_02 ) == 0 )
player->AddItem, extravagant_shoes_02, 1
endif
player->Equip, extravagant_shoes_02
endif
if ( "_TLR_PCsex" == 1 )
if ( ( player->GetItemCount, extravagant_skirt_01 ) == 0 )
player->AddItem, extravagant_skirt_01, 1
endif
player->Equip, extravagant_skirt_01
else
if ( ( player->GetItemCount, extravagant_pants_02 ) == 0 )
player->AddItem, extravagant_pants_02, 1
endif
player->Equip, extravagant_pants_02
endif
player->RemoveItem, "_TLR_bague_diam", 1
　
;replacer tout le monde
EnablePlayerControls
Set PnjZ to ( "_TLR_PnjZ" + 2 )
Set PjZ to ( PjZ - 4998 )
SetPos, X , PnjX
SetPos, Y , PnjY
SetPos, Z, PnjZ
player->SetPos, Z, PjZ
;supprimer la chambre 02
Set "_TLR_room_placer" to -2
Set Step to ( Step + 1 )
return
endif
if ( Step == 8 )
if ( Timer < 3 )
Set Timer to ( Timer + GetSecondsPassed )
return
endif
Set Step to ( Step + 1 )
Set Timer to 0
return
endif
if ( Step == 9 )
;Fadein
Set GameHour to ( GameHour + 1 )
FadeIn, 1
Set Step to ( Step + 1 )
endif
if ( Step == 10 )
if ( Timer < 1 )
Set Timer to ( Timer + GetSecondsPassed )
return
endif
Set "_TLR_sperme" to 5 ; semence :)
Set Ranum to ( Random 100 )
if ( "_TLR_PCsex" == 2 )
if ( "_TLR_LoverSex" == 1 )
if ( Player->HasItemEquipped "_TLR_feconde_amulet" )
if ( "_TLR_PNJ_Enceinte" == 0 )
Set "_TLR_PNJ_Enceinte" to 1
Startscript "_TLR_sc_Grossesse_PNJ"
MessageBox "I think I'm going to get pregnant..."
endif
elseif ( Ranum > 90 )
if ( "_TLR_PNJ_Enceinte" == 0 )
if ( Player->HasItemEquipped "_TLR_sterile_amulet" == 0 )
Set "_TLR_PNJ_Enceinte" to 1
Startscript "_TLR_sc_Grossesse_PNJ"
MessageBox "I think I'm going to get pregnant..."
endif
endif
endif
endif
endif
Set Step to ( Step + 1 )
Set Timer to 0
RemoveItem, "_TLR_poids", 10
return
endif
SetDisposition Disposition
Set Step to 0
StopScript, "_TLR_sexe02_s"
end
Begin AA_WuLove
;1.1
If ( Wu_follow >= 0 )
If (MenuMode == 1 )
If ( GetPCSleep == 1 )
If ( ( "AA_Wulfren"-> GetDistance "Player" ) <= 500 )
"AA_Wulfren"->Say "Vo\h\m\hit_HM007.mp3" "Oooh!!"
MessageBox "You spend some memorable hours together with Wulfren"
Set "AA_Wulfren".wulove To 0
StopScript "AA_WuLove"
EndIf
EndIf
EndIf
else
Set "AA_Wulfren".wulove To 0
StopScript "AA_WuLove"
EndIf
End
ich meine die stelle wo man schwanger wird.
was meint ihr ist das überhaubt möglich den Script so hin zu krigen
 
Ich versteht irgendwie deine Frage nicht richtig:huh:.
Fehlt etwas von deiner Frage?

Oder sind das Scripts die du selber erstellt hast,von denen du wissen willst
ob sie funktionieren?

Wenn ja, muss ich anmerken das da einige fehler drin sind...
Am Besten ist es, wenn du deine Anfrage in den Script-Thread stellst.
 
der script AA_WuLove ist aus The White Wolf of the Lokken Mountain der TLR_sexe02_s ist aus Romance v37 English nun meine frage beim script TLR_sexe02_s kann man schwanger werden jets wohlte ich wiessen ob man das ind den script AA_WuLove einfügen kan um auch da von schwanger zu werden.
 
Achso jetzt hab ich's verstanden...

Also eigentlich dürfte es möglich sein,ist aber eine ziehmlich Bastelei.
Wie gesagt wenn du es nicht selber kannst,stell mal eine Anfrage in den
Script-Thread.
 
Du musst dich einloggen oder registrieren, um hier zu antworten.

Ähnliche Themen

L
Problem Fertigkeiten ändern
Antworten
4
Aufrufe
976
[MW] Plugins und Mods
lim dul
L
Xezog42
Idee Charakteransicht beim Laden eines Spielstandes
Antworten
1
Aufrufe
849
[Skyrim] Modideen und -suche
Tywele
Tywele
Retrak
Problem wie funktioniert "Complete Morrowind"
Antworten
2
Aufrufe
1K
[MW] Plugins und Mods
Retrak
Retrak
LiDui
Suche Schaden an Rüstungen
Antworten
5
Aufrufe
706
[Obl] Modideen und -suche
der_fisch
der_fisch
Illidan_00
  • Geschlossen
Construction Set Einsturz
Antworten
3
Aufrufe
741
[MW] Plugins und Mods
Teridan
Teridan
Oben Unten
Zurück