Safe Haskell	None
Language	Haskell2010

Types

Synopsis

type Position = (Float, Float)
type Velocity = (Float, Float)
type Restitution = Float
type Speed = Float
type Coords = (Float, Float)
data PlayerBall = PlayerBall {
- playerPosition :: Position
- velocity :: Velocity
- restitution :: Restitution
- speed :: Speed
- playerRadius :: Float
}
data EnemyBallType
- = Destructible Int
- | Indestructible
data EnemyPeg = EnemyPeg {
- enemyPosition :: Position
- enemyRadius :: Float
- ballType :: EnemyBallType
}
data MapInfo = MapInfo {
- enemyBalls :: [EnemyPeg]
- cannonPosition :: Position
- leftWallX :: Float
- rightWallX :: Float
- floorY :: Float
- ceilingY :: Float
- backgroundPictureId :: Int
- backgroundTrackId :: Int
}
data Sprites = Sprites {
- cannonSprite :: Picture
- backgrounds :: [Maybe Picture]
}
data MetaInfo = MetaInfo {
- currentLevel :: Int
- soundList :: SoundList
- soundRequestList :: [String]
- currentBackgroundTrackId :: Int
- requestedBackgroundTrackId :: Int
- sprites :: Sprites
- preloadedLevels :: [MapInfo]
- userMousePosition :: Coords
}
type SoundList = [(String, Chunk)]

Documentation

type Position = (Float, Float) #

Position type.

type Velocity = (Float, Float) #

Velocity type.

type Restitution = Float #

Restitution type.

type Speed = Float #

Speed type.

type Coords = (Float, Float) #

Coords type.

data PlayerBall #

Player ball info.

Constructors

PlayerBall
Fields playerPosition :: Position Coordinates of player ball. velocity :: Velocity Velocity of player ball. restitution :: Restitution Resitution of player ball. speed :: Speed Speed of player ball. playerRadius :: Float Radius of player ball.

Instances

Instances details

Read PlayerBall #	default `Read` instance.
Instance details Defined in Types Methods readsPrec :: Int -> ReadS PlayerBall # readList :: ReadS [PlayerBall] # readPrec :: ReadPrec PlayerBall # readListPrec :: ReadPrec [PlayerBall] #
Show PlayerBall #	default `Show` instance.
Instance details Defined in Types Methods showsPrec :: Int -> PlayerBall -> ShowS # show :: PlayerBall -> String # showList :: [PlayerBall] -> ShowS #

data EnemyBallType #

Enemy ball type.

Constructors

Destructible Int	Destructible ball type with durability `Int` value.
Indestructible	Indestructible ball type.

Instances

Instances details

Eq EnemyBallType #	default `Eq` instance.
Instance details Defined in Types Methods (==) :: EnemyBallType -> EnemyBallType -> Bool # (/=) :: EnemyBallType -> EnemyBallType -> Bool #
Read EnemyBallType #	default `Read` instance.
Instance details Defined in Types Methods readsPrec :: Int -> ReadS EnemyBallType # readList :: ReadS [EnemyBallType] # readPrec :: ReadPrec EnemyBallType # readListPrec :: ReadPrec [EnemyBallType] #
Show EnemyBallType #	default `Show` instance.
Instance details Defined in Types Methods showsPrec :: Int -> EnemyBallType -> ShowS # show :: EnemyBallType -> String # showList :: [EnemyBallType] -> ShowS #
Generic EnemyBallType #	default `Generic` instance.
Instance details Defined in Types Associated Types type Rep EnemyBallType :: Type -> Type # Methods from :: EnemyBallType -> Rep EnemyBallType x # to :: Rep EnemyBallType x -> EnemyBallType #
Binary EnemyBallType #	Binary instance of `EnemyBallType`.
Instance details Defined in Types Methods put :: EnemyBallType -> Put # get :: Get EnemyBallType # putList :: [EnemyBallType] -> Put #
type Rep EnemyBallType #
Instance details Defined in Types type Rep EnemyBallType = D1 ('MetaData "EnemyBallType" "Types" "main" 'False) (C1 ('MetaCons "Destructible" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)) :+: C1 ('MetaCons "Indestructible" 'PrefixI 'False) (U1 :: Type -> Type))

data EnemyPeg #

Constructors

EnemyPeg
Fields enemyPosition :: Position `Coords` of `EnemyPeg`. enemyRadius :: Float Radius of `EnemyPeg`. ballType :: EnemyBallType Type of `EnemyPeg`.

Instances

Instances details

Eq EnemyPeg #	default `Eq` instance.
Instance details Defined in Types Methods (==) :: EnemyPeg -> EnemyPeg -> Bool # (/=) :: EnemyPeg -> EnemyPeg -> Bool #
Read EnemyPeg #	default `Read` instance.
Instance details Defined in Types Methods readsPrec :: Int -> ReadS EnemyPeg # readList :: ReadS [EnemyPeg] # readPrec :: ReadPrec EnemyPeg # readListPrec :: ReadPrec [EnemyPeg] #
Show EnemyPeg #	default `Show` instance.
Instance details Defined in Types Methods showsPrec :: Int -> EnemyPeg -> ShowS # show :: EnemyPeg -> String # showList :: [EnemyPeg] -> ShowS #
Generic EnemyPeg #	default `Generic` instance.
Instance details Defined in Types Associated Types type Rep EnemyPeg :: Type -> Type # Methods from :: EnemyPeg -> Rep EnemyPeg x # to :: Rep EnemyPeg x -> EnemyPeg #
Binary EnemyPeg #	Binary instance of `EnemyPeg`.
Instance details Defined in Types Methods put :: EnemyPeg -> Put # get :: Get EnemyPeg # putList :: [EnemyPeg] -> Put #
type Rep EnemyPeg #
Instance details Defined in Types type Rep EnemyPeg = D1 ('MetaData "EnemyPeg" "Types" "main" 'False) (C1 ('MetaCons "EnemyPeg" 'PrefixI 'True) (S1 ('MetaSel ('Just "enemyPosition") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Position) :: (S1 ('MetaSel ('Just "enemyRadius") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Float) :: S1 ('MetaSel ('Just "ballType") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EnemyBallType))))

data MapInfo #

Constructors

MapInfo
Fields enemyBalls :: [EnemyPeg] List of enemy balls. cannonPosition :: Position Cannon position `Coords`. leftWallX :: Float Left wall X coordinate. rightWallX :: Float Right wall X coordinate. floorY :: Float Floor Y coordinate. ceilingY :: Float Ceiling Y coordinate. backgroundPictureId :: Int Id of background picture. backgroundTrackId :: Int Id of track.

Instances

Instances details

Read MapInfo #	default `Read` instance.
Instance details Defined in Types Methods readsPrec :: Int -> ReadS MapInfo # readList :: ReadS [MapInfo] # readPrec :: ReadPrec MapInfo # readListPrec :: ReadPrec [MapInfo] #
Show MapInfo #	default `Show` instance.
Instance details Defined in Types Methods showsPrec :: Int -> MapInfo -> ShowS # show :: MapInfo -> String # showList :: [MapInfo] -> ShowS #
Generic MapInfo #	default `Generic` instance.
Instance details Defined in Types Associated Types type Rep MapInfo :: Type -> Type # Methods from :: MapInfo -> Rep MapInfo x # to :: Rep MapInfo x -> MapInfo #
Binary MapInfo #	Binary instance of `MapInfo`.
Instance details Defined in Types Methods put :: MapInfo -> Put # get :: Get MapInfo # putList :: [MapInfo] -> Put #
type Rep MapInfo #
Instance details Defined in Types type Rep MapInfo = D1 ('MetaData "MapInfo" "Types" "main" 'False) (C1 ('MetaCons "MapInfo" 'PrefixI 'True) (((S1 ('MetaSel ('Just "enemyBalls") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [EnemyPeg]) :: S1 ('MetaSel ('Just "cannonPosition") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Position)) :: (S1 ('MetaSel ('Just "leftWallX") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Float) :: S1 ('MetaSel ('Just "rightWallX") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Float))) :: ((S1 ('MetaSel ('Just "floorY") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Float) :: S1 ('MetaSel ('Just "ceilingY") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Float)) :: (S1 ('MetaSel ('Just "backgroundPictureId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: S1 ('MetaSel ('Just "backgroundTrackId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)))))

data Sprites #

Constructors

Sprites
Fields cannonSprite :: Picture backgrounds :: [Maybe Picture]

Instances

Instances details

Show Sprites #	default `Show` instance.
Instance details Defined in Types Methods showsPrec :: Int -> Sprites -> ShowS # show :: Sprites -> String # showList :: [Sprites] -> ShowS #

data MetaInfo #

Game meta info.

Constructors

MetaInfo

Fields

currentLevel :: Int
Index of current level.
soundList :: SoundList
List of sounds.
soundRequestList :: [String]
List of sounds that game requests to play.
currentBackgroundTrackId :: Int
Id of currently playing track.
requestedBackgroundTrackId :: Int
Id of track reuqested by game.
sprites :: Sprites
All sprites of game.
preloadedLevels :: [MapInfo]
List of loaded leveles from files.
userMousePosition :: Coords
Player mouse coordinates.

Instances

Instances details

Show MetaInfo #
Instance details Defined in Types Methods showsPrec :: Int -> MetaInfo -> ShowS # show :: MetaInfo -> String # showList :: [MetaInfo] -> ShowS #

type SoundList = [(String, Chunk)] #