vicimer Posted September 16 Share Posted September 16 I want to modify the script VStripSS1ControlScript that controls the 3 ncr women who dance in the fountain in front of the Ultra Luxe, so they do not leave and disappear from the game, is there any way to do this? Scn VStripSS1ControlScript ; Scripted scene with drunk trooper girls in the Ultra-Luxe's fountain. Unlike the other scripted scenes in the Strip, this one uses code attached to an object, rather than a quest. ; - Jorge Ref Girl01 Ref MP01 Float Timer Float Timer2 Float DistanceCheck Short bAdmirersMove Short bTroopersMove Short bTroopersIn Short bTroopersAtAprox Short KillCode Short BeginSS Short LineCount Short nTrooperLine Short iCount ;For Press Demo only: Short bMrHoldoutTalked Short bMrHoldoutFailSafe Begin GameMode If KillCode == 1 Return Else If VStreetSS1.bStartOkay == 1 If VStreetFluffNPC.iPlayerInArea != 2 Set VStripSS00RandomHolder01REF.fDaysToEvent to GameDaysPassed Set VStripSS00RandomHolder02REF.fDaysToEvent to GameDaysPassed Set VStripSS00RandomHolder01REF.bTriggered to 0 Set VStripSS00RandomHolder02REF.bTriggered to 0 Set VStripSS00RandomHolder03REF.bTriggered to 0 Set VStripSS00RandomHolder04REF.bTriggered to 0 Set VStripSS00RandomHolder05REF.bTriggered to 0 VStripSS1GirlAREF.Disable VStripSS1GirlBREF.Disable VStripSS1GirlCREF.Disable VStripSS1SecuritronAREF.Disable VStripSS1SecuritronBREF.Disable VStripSS1MPAREF.Disable VStripSS1MPBREF.Disable VStripSS1AdmirerAREF.Disable VStripSS1AdmirerBREF.Disable VStripSS1AdmirerCREF.Disable VStripSS1AdmirerDREF.Disable Set KillCode to 1 Return Else If BeginSS != 1 VStripSS1StarterREF.Enable 1 If iCount < 1 VStripSS1GirlAREF.Enable Set iCount to 1 Return Elseif iCount == 1 VStripSS1GirlBREF.Enable Set iCount to 2 Return Elseif iCount == 2 VStripSS1GirlCREF.Enable Set iCount to 3 Return Elseif iCount == 3 VStripSS1SecuritronAREF.Enable Set iCount to 4 Return Elseif iCount == 4 VStripSS1SecuritronBREF.Enable Set iCount to 5 Return Elseif iCount == 5 VStripSS1MPAREF.Enable Set iCount to 6 Return Elseif iCount == 6 VStripSS1MPBREF.Enable Set iCount to 7 Return Elseif iCount == 7 VStripSS1AdmirerAREF.Enable Set iCount to 8 Return Elseif iCount == 8 VStripSS1AdmirerBREF.Enable Set iCount to 9 Return Elseif iCount == 9 VStripSS1AdmirerCREF.Enable Set iCount to 10 Return Elseif iCount == 10 VStripSS1AdmirerDREF.Enable Set iCount to 11 Return Elseif iCount == 11 Set DistanceCheck to GetDistance Player If DistanceCheck <= 1200 VStripSS1AdmirerDREF.AddScriptPackage VStripSS1AdmirerDTravelFountD VStripSS1AdmirerBREF.AddScriptPackage VStripSS1AdmirerBTravelFountB VStripSS1AdmirerCREF.AddScriptPackage VStripSS1AdmirerCTravelFountC VStripSS1AdmirerAREF.AddScriptPackage VStripSS1AdmirerATravelFountA VStripSS1AdmirerAREF.Look VStripSS1GirlAREF VStripSS1AdmirerBREF.Look VStripSS1GirlCREF VStripSS1AdmirerCREF.Look VStripSS1GirlAREF VStripSS1AdmirerDREF.Look VStripSS1GirlBREF VStripSS1SecuritronBREF.Look VStripSS1GirlBREF VStripSS1SecuritronAREF.Look VStripSS1GirlAREF Set VStripSS00RandomHolder01REF.fDaysToEvent to GameDaysPassed Set VStripSS00RandomHolder02REF.fDaysToEvent to GameDaysPassed Set BeginSS to 1 Endif Endif Elseif BeginSS == 1 Set Timer to Timer + GetSecondsPassed If Timer > 1 && LineCount < 1 VStripSS1GirlAREF.AddScriptPackage VStripSS1FemDialPack01 VStripSS1MPAREF.AddScriptPackage VStripSS1MPATravelAproxA VStripSS1MPBREF.AddScriptPackage VStripSS1MPBTravelAproxB Set LineCount to 1 Elseif Timer > 4 && LineCount == 1 VStripSS1GirlBREF.AddScriptPackage VStripSS1FemDialPack02 Set LineCount to 2 Elseif Timer > 7 && LineCount == 2 VStripSS1SecuritronAREF.AddScriptPackage VStripSS1SecDialPack01 Set LineCount to 3 Elseif Timer > 10 && LineCount == 3 VStripSS1SecuritronBREF.AddScriptPackage VStripSS1SecDialPack10 Set LineCount to 4 Elseif Timer > 13 && LineCount == 4 VStripSS1GirlCREF.AddScriptPackage VStripSS1FemDialPack03 Set LineCount to 5 Elseif Timer > 17 && LineCount == 5 VStripSS1SecuritronAREF.AddScriptPackage VStripSS1SecDialPack11 Set LineCount to 6 Elseif Timer > 22 && LineCount == 6 ;VStripSS1SecuritronBREF.AddScriptPackage VStripSS1SecDialPack03 Set LineCount to 7 Elseif Timer > 20 && LineCount == 7 VStripSS1SecuritronAREF.AddScriptPackage VStripSS1SecDialPack04 Set LineCount to 8 Elseif Timer > 26 && LineCount == 8 VStripSS1SecuritronAREF.AddScriptPackage VStripSS1SecDialPack05 Set LineCount to 9 Elseif Timer > 26 && LineCount == 9 ;VStripSS1GirlBREF.AddScriptPackage VStripSS1FemDialPack05 Set LineCount to 10 Elseif Timer > 29 && LineCount == 10 VStripSS1GirlAREF.AddScriptPackage VStripSS1FemDialPack04 Set LineCount to 11 Elseif Timer > 34 && LineCount == 11 ;VStripSS1SecuritronAREF.AddScriptPackage VStripSS1SecDialPack03 Set LineCount to 12 Elseif Timer > 34 && LineCount == 12 VStripSS1GirlCREF.AddScriptPackage VStripSS1FemDialPack06 Set LineCount to 13 Elseif Timer > 39 && LineCount == 13 ;VStripSS1SecuritronBREF.AddScriptPackage VStripSS1SecDialPack08 Set LineCount to 14 Elseif Timer > 43 && LineCount == 14 VStripSS1GirlAREF.AddScriptPackage VStripSS1FemDialPack07 Set LineCount to 15 Elseif Timer > 47 && LineCount == 15 ;VStripSS1SecuritronAREF.AddScriptPackage VStripSS1SecDialPack09 Set LineCount to 16 Elseif Timer > 49 && LineCount == 16 VStripSS1GirlBREF.AddScriptPackage VStripSS1FemDialPack08 ;VStripSS1GirlAREF.PlayIdle LooseWaveHello ;VStripSS1GirlCREF.PlayIdle LooseWaveHello Set LineCount to 17 Elseif Timer > 53 && LineCount == 17 VStripSS1SecuritronBREF.AddScriptPackage VStripSS1SecDialPack08 Set LineCount to 18 Elseif Timer > 54 && LineCount == 18 VStripSS1GirlBREF.AddScriptPackage VStripSS1GirlsEscapeTops VStripSS1GirlAREF.AddScriptPackage VStripSS1GirlsEscapeTops VStripSS1GirlCREF.AddScriptPackage VStripSS1GirlsEscapeTops VStripSS1SecuritronBREF. StopLook VStripSS1GirlBREF VStripSS1SecuritronAREF. StopLook VStripSS1GirlAREF ;VStripSS1SecuritronBREF.AddScriptPackage VStripSS1SecDialPack12 Set LineCount to 19 Elseif Timer > 57 && LineCount == 19 VStripSS1MPAREF.AddScriptPackage VStripSS1MPATravelTopsA VStripSS1MPAREF.StopLook VStripSS1GirlAREF Set LineCount to 20 Endif If bTroopersMove != 1 && bTroopersIn != 1 If bTroopersAtAprox == 1 VStripSS1MPBREF.PlayIdle LoosePointingAllert VStripSS1MPAREF.AddScriptPackage VStripSS1MPATravelFountA Set Timer2 to 4 Set bTroopersMove to 1 Set bTroopersAtAprox to 0 Endif Elseif bTroopersMove == 1 && bTroopersIn != 1 Set Timer2 to Timer2 - GetSecondsPassed If Timer2 <= 0 VStripSS1MPBREF.AddScriptPackage VStripSS1MPBTravelFountB Set bTroopersIn to 1 Endif Elseif bTroopersMove == 1 && bTroopersIn == 1 Set Timer2 to Timer2 + GetSecondsPassed If Timer2 > 3 && nTrooperLine < 1 VStripSS1MPAREF.AddScriptPackage VStripSS1MPDialPack01 VStripSS1MPAREF.PlayIdle LooseFingerShakeWarning VStripSS1MPAREF.Look VStripSS1GirlAREF ;ShowWarning "MPA speaks 1st" Set nTrooperLine to 1 Elseif Timer2 > 5 && nTrooperLine == 1 VStripSS1MPBREF.AddScriptPackage VStripSS1MPDialPack02 VStripSS1MPBREF.Look VStripSS1GirlCREF ;ShowWarning "MPB speaks 1st" Set nTrooperLine to 2 Elseif Timer2 > 8 && nTrooperLine == 2 VStripSS1MPBREF.AddScriptPackage VStripSS1MPDialPack04 ;ShowWarning "MPA speaks 2nd" Set nTrooperLine to 3 Elseif Timer2 > 11 && nTrooperLine == 3 ;VStripSS1MPBREF.AddScriptPackage VStripSS1MPDialPack04 ;ShowWarning "MPB speaks 2nd" Set nTrooperLine to 4 Elseif Timer2 > 22 && nTrooperLine == 4 VStripSS1MPBREF.AddScriptPackage VStripSS1MPDialPack05 ;ShowWarning "MPA speaks 3rd" Set nTrooperLine to 5 Elseif Timer2 > 25 && nTrooperLine == 5 VStripSS1MPBREF.AddScriptPackage VStripSS1MPBTravelTopsB VStripSS1MPBREF.StopLook VStripSS1GirlCREF VStripSS1AdmirerDREF.AddScriptPackage VStripSS1AdmirersFollowGirls VStripSS1AdmirerBREF.AddScriptPackage VStripSS1AdmirersFollowGirls VStripSS1AdmirerCREF.AddScriptPackage VStripSS1AdmirersFollowGirls VStripSS1AdmirerAREF.AddScriptPackage VStripSS1AdmirersFollowGirls Set nTrooperLine to 6 Elseif Timer2 > 26 && nTrooperLine == 6 VStripSS1SecuritronAREF.AddScriptPackage VStripSS1SecuritronAPatrol Set nTrooperLine to 7 Elseif Timer2 > 29 && nTrooperLine == 7 VStripSS1SecuritronBREF.AddScriptPackage VStripSS1SecuritronBPatrol Set nTrooperLine to 8 Endif Endif Endif Endif Endif Endif End Link to comment Share on other sites More sharing options...
Recommended Posts