Start unifying drawn cursors

2022-11-03 10:00:41 +00:00
parent 0872a2dd40
commit e6e5427f44
9 changed files with 129 additions and 44 deletions
@@ -32,6 +32,7 @@ splashMenuOptions :: [MenuOption]
 splashMenuOptions =
    basicKeyOptions
        [ Toggle ( loadSaveSlot (SaveSlotNum 0)) displaycontinue
+        , Toggle id (\u -> MODString $ show $ u ^? uvScreenLayers . _head . scSelPos . _Just)
        , Toggle ( startNewGameInSlot 0) (opText "NEW WITH RANDOM SEED")
        , Toggle reloadLevelStart (displaywhenseed "NEW WITH LAST SEED")
        , Toggle (pushScreen $ seedStartMenu "START FROM SEED") (opText "NEW WITH SPECIFIC SEED")