diff --git a/.gitignore b/.gitignore index 72987e1..8bd72d6 100644 --- a/.gitignore +++ b/.gitignore @@ -2,4 +2,4 @@ dist-newstyle stack.yaml.lock .stack-work cabal.project.local -*dist* +dist/* diff --git a/Tamagotchi/src/Window.hs b/Tamagotchi/src/Window.hs index 992341d..2af2e88 100644 --- a/Tamagotchi/src/Window.hs +++ b/Tamagotchi/src/Window.hs @@ -20,7 +20,7 @@ background = black -- Janela do jogo window :: Display -window = InWindow "Menu" (width,height) (offset, offset) +window = FullScreen renderText :: Float -> Float -> Float -> Float-> Color -> String -> Picture renderText x y h w cor umaString = translate (x) (y) $ scale h w $ color cor $ text umaString diff --git a/pong-haskell/Main.hs b/pong-haskell/Main.hs index 43a574e..59dbf6d 100644 --- a/pong-haskell/Main.hs +++ b/pong-haskell/Main.hs @@ -9,7 +9,7 @@ import PongMovement import PongEventHandler window :: Display -window = InWindow "Pong" (width, heigth) (screenOffset, screenOffset) +window = FullScreen fps :: Int fps = 60