Allow more control over cloud shadows
This commit is contained in:
+12
-11
@@ -129,7 +129,7 @@ logMenu = titleOptionsMenu "OPTIONS:LOG" logOptions
|
||||
|
||||
debugMenuOptions :: [MenuOption]
|
||||
debugMenuOptions =
|
||||
map f [minBound ..] ++ [makeEnumOption debug_view_clip_bounds "SHOW ROOM CLIP" id]
|
||||
map f [minBound ..] ++ [enumOption debug_view_clip_bounds "SHOW ROOM CLIP" id]
|
||||
where
|
||||
f :: DebugBool -> MenuOption
|
||||
f bd =
|
||||
@@ -155,7 +155,7 @@ gameplayMenu :: Universe -> ScreenLayer
|
||||
gameplayMenu = titleOptionsMenu "OPTIONS:GAMEPLAY" gameplayMenuOptions
|
||||
|
||||
gameplayMenuOptions :: [MenuOption]
|
||||
gameplayMenuOptions = [makeBoolOption gameplay_rotate_to_wall "ROTATE TO WALL"]
|
||||
gameplayMenuOptions = [boolOption gameplay_rotate_to_wall "ROTATE TO WALL"]
|
||||
|
||||
soundMenu :: Universe -> ScreenLayer
|
||||
soundMenu = titleOptionsMenu "OPTIONS:VOLUME" soundMenuOptions
|
||||
@@ -187,15 +187,16 @@ graphicsMenu = titleOptionsMenu "OPTIONS:GRAPHICS" graphicsMenuOptions
|
||||
|
||||
graphicsMenuOptions :: [MenuOption]
|
||||
graphicsMenuOptions =
|
||||
[ makeEnumOption gr_world_res "World resolution" (uvIOEffects .~ updatePreload)
|
||||
, makeEnumOption gr_downsize_res "Downsize resolution" (uvIOEffects .~ updatePreload)
|
||||
, makeEnumOption gr_distortion_res "Distortion resolution" (uvIOEffects .~ updatePreload)
|
||||
, makeEnumOption gr_shadow_rendering "SHADOW RENDERING" id
|
||||
, makeEnumOption gr_shadow_size "SHADOW DETAIL" id
|
||||
, makeEnumOption gr_distortions "ENABLE DISTORTIONS" id
|
||||
, makeEnumOption gr_bloom "ENABLE BLOOM" id
|
||||
, makeBoolOption gr_cloud_shadows "CLOUD SHADOWS"
|
||||
, makeEnumOption gr_num_shadow_casters "NUM SHADOW CASTERS" id
|
||||
[ enumOption gr_world_res "World resolution" (uvIOEffects .~ updatePreload)
|
||||
, enumOption gr_downsize_res "Downsize resolution" (uvIOEffects .~ updatePreload)
|
||||
, enumOption gr_distortion_res "Distortion resolution" (uvIOEffects .~ updatePreload)
|
||||
, enumOption gr_shadow_rendering "SHADOW RENDERING" id
|
||||
, enumOption gr_shadows_on_clouds "SHADOW DETAIL ON CLOUDS" id
|
||||
, enumOption gr_shadow_size "SHADOW DETAIL" id
|
||||
, enumOption gr_distortions "ENABLE DISTORTIONS" id
|
||||
, enumOption gr_bloom "ENABLE BLOOM" id
|
||||
, boolOption gr_cloud_shadows "CLOUD SHADOWS TOGGLE"
|
||||
, enumOption gr_num_shadow_casters "NUM SHADOW CASTERS" id
|
||||
]
|
||||
|
||||
gameOverMenu :: Universe -> ScreenLayer
|
||||
|
||||
Reference in New Issue
Block a user