thallada/RowYourBoat
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Typo fix & add drag encumberance setting

Browse Source
This commit is contained in:
Tyler Hallada
2025-06-23 20:43:13 -04:00
parent f81be1833b
commit 86f7311254
7 changed files with 32 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
Scripts/RYBMenuScript.psc
View File

@@ -93,7 +93,7 @@ begin GameMode
elseif (Choice == 6)
set ChoosingInit to 0
set ChoosingSettings to 1
MessageBox "Settings", "Toggle Rocking", "Toggle Player Weight", "Cancel"
MessageBox "Settings", "Toggle Drag Encumberance", "Toggle Rocking", "Toggle Player Weight", "Cancel"
set Choice to GetButtonPressed
elseif (Choice == 7)
set ChoosingInit to 0
@@ -185,7 +185,7 @@ begin GameMode
elseif (Choice == 4)
set ChoosingOnLand to 0
set ChoosingSettings to 1
MessageBox "Settings", "Toggle Rocking", "Toggle Player Weight", "Cancel"
MessageBox "Settings", "Toggle Drag Encumberance", "Toggle Rocking", "Toggle Player Weight", "Cancel"
set Choice to GetButtonPressed
elseif (Choice == 5)
set ChoosingOnLand to 0
@@ -216,20 +216,33 @@ begin GameMode
set Choice to GetButtonPressed
if (Choice == 0)
set ChoosingSettings to 0
if (RYB.RockingEnabled == 0)
set RYB.RockingEnabled to 1
if (RYB.DragEncumberanceEnabled == 0)
set RYB.DragEncumberanceEnabled to 1
Message "Drag encumberance enabled. You will be encumbered by the weight of the boat when dragging it."
else
set RYB.RockingEnabled to 0
set RYB.DragEncumberanceEnabled to 0
Message "Drag encumberance disabled. You will not be encumbered by the weight of the boat when dragging it."
endif
elseif (Choice == 1)
set ChoosingSettings to 0
if (RYB.PlayerWeightEnabled == 0)
set RYB.PlayerWeightEnabled to 1
if (RYB.RockingEnabled == 0)
set RYB.RockingEnabled to 1
Message "Rocking enabled. The boat will experience wave rocking motion when nearby and not grounded."
else
set RYB.PlayerWeightEnabled to 0
set RYB.RockingEnabled to 0
Message "Rocking disabled. The boat will not experience wave rocking motion."
endif
elseif (Choice == 2)
set ChoosingSettings to 0
if (RYB.PlayerWeightEnabled == 0)
set RYB.PlayerWeightEnabled to 1
Message "Player weight enabled. The boat rocking will react to the player's position on the boat."
else
set RYB.PlayerWeightEnabled to 0
Message "Player weight disabled. The boat rocking will not react to the player's position."
endif
elseif (Choice == 3)
set ChoosingSettings to 0
endif
endif
end

6
Scripts/RYBQuestScript.psc
View File

@@ -129,6 +129,7 @@ float DragTargetPitchMovingSmoothingFactor ; Additional smoothing factor on pitc
float DragTargetPitchStoppedSmoothingFactor ; Additional smoothing factor on pitch applied while stopped (default: 0.02)
float DragUphillZAdjustmentFactor ; How much to adjust Z based on angle when going uphill (default: 6.0)
float DragDownhillZAdjustmentFactor ; How much to adjust Z based on angle when going downhill (default: 4.5)
short DragEncumberanceEnabled ; 0 = disabled, 1 = enabled (default: 1)
; Boat drag angle calculation variables
float dX
float dY
@@ -313,6 +314,7 @@ begin GameMode
set ModVersion to 0.2
set ColliderPosThreshold to 1.0
set LandZThreshold to 40.0
set DragEncumberanceEnabled to 1
endif
if (Resetting == -1)
@@ -437,7 +439,9 @@ begin GameMode
if (Dragging == 0)
set Dragging to 1
set DragTargetPitchAngle to 0 ; smooth reset to 0 pitch
Player.AddItem RYBBoatToken 1
if (DragEncumberanceEnabled == 1)
Player.AddItem RYBBoatToken 1
endif
set fQuestDelayTime to HighUpdateRate ; High update rate while dragging
Seat.SetDestroyed 1
BoatMarker.Disable