glguy/parabox
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fiddle with world map

Browse Source
This commit is contained in:
Eric Mertens 2022-12-02 11:26:00 -08:00
parent f940ce8d75
commit 7f236b0fe2
1 changed files with 33 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

39
app/Main.hs
View File

@ -30,13 +30,13 @@ world0 = World {
boxColor = withForeColor defAttr cyan,
boxLocation = Location '1' 1 1,
boxWalls = makeWalls [
"▓▓▓ ▓▓▓",
"▓ ▓",
"▓ ▓ ▓ ▓",
" ",
"▓ ▓",
" ",
"▓ ▓",
"▓ ▓",
"▓▓▓ ▓▓▓"
" ",
"▓ ▓ ▓ ▓"
]
}),
('3', Box {
@ -68,7 +68,15 @@ world0 = World {
('b', Box {
boxColor = withForeColor defAttr red,
boxLocation = Location '1' 0 1,
boxWalls = solid 7
boxWalls = makeWalls [
"▓▓▓▓▓▓▓",
"▓ ▓",
"▓ ▓ ▓ ▓",
" ",
"▓ ▓▓",
"▓ ▓",
"▓▓▓▓▓▓▓"
]
}),
('x', Box {
boxColor = withForeColor defAttr yellow,
@ -79,8 +87,27 @@ world0 = World {
boxColor = withForeColor defAttr magenta,
boxLocation = Location '1' 0 (-2),
boxWalls = solid 7
}),
('i', Box {
boxColor = withForeColor defAttr black,
boxLocation = Location 'b' 0 (-2),
boxWalls = solid 7
}),
('j', Box {
boxColor = withForeColor defAttr black,
boxLocation = Location 'b' 0 (-1),
boxWalls = solid 7
}),
('k', Box {
boxColor = withForeColor defAttr black,
boxLocation = Location 'b' 0 0,
boxWalls = solid 7
}),
('l', Box {
boxColor = withForeColor defAttr black,
boxLocation = Location 'b' 0 1,
boxWalls = solid 7
})
]
}