Commit dfcb053f authored by Peter Achten's avatar Peter Achten
Browse files

(MW): removed old stuff for new stuff

parent f04c671d
BLOCK.000
GROUND.000
GROUND.001
SHADOW.000
SHADOW.001
SHADOW.002
EDGE.000
SHADOW.003
SHADOW.004
SHADOW.006
SHADOW.007
SHADOW.008
definition module L2
import StdEnv, StdGameDef
Level2Bitmap :: GameBitmap
Level2Map :: [{#Int}]
Level2Bounds :: [{#Int}]
implementation module L2
import StdEnv, StdGameDef
Level2Bitmap :: GameBitmap
Level2Bitmap
= { bitmapname = "L2.BMP"
, unitsize = { w = 24, h = 24 }
, dimensions = (13, 2)
, transparent = Nothing
}
Level2Map :: [{#Int}]
Level2Map = [{1,2,3,3,4,3,5,2,5,3,5,3,4,3,5,5,3,4,5,3,2,3,5,4,3,3,2,1},
{1,3,6,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,8,3,1},
{1,3,9,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,
11,12,3,1},
{1,4,9,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,
10,12,4,1},
{1,3,9,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,
10,12,3,1},
{1,5,9,10,11,11,10,10,11,13,13,13,13,13,13,13,13,13,13,10,11,11,10,10,
11,12,5,1},
{1,2,9,10,11,11,10,10,12,3,5,4,2,3,5,4,3,2,3,9,11,11,10,10,11,12,2,1},
{1,5,9,11,10,10,11,11,10,7,7,7,7,7,7,7,7,7,7,11,10,10,11,11,10,12,5,1},
{1,3,9,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,
10,12,3,1},
{1,4,9,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,
11,12,4,1},
{1,3,9,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,
11,12,3,1},
{1,5,9,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,
10,12,5,1},
{1,2,9,11,10,10,11,11,10,13,13,13,13,13,13,13,13,13,13,11,10,10,11,11,
10,12,4,1},
{1,3,9,10,11,11,10,10,12,3,2,5,3,4,3,5,2,5,3,9,11,11,10,10,11,12,3,1},
{1,14,9,10,11,11,10,10,11,7,7,7,7,7,7,7,7,7,7,10,11,11,10,10,11,12,4,1},
{1,3,9,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,
10,12,3,1},
{1,4,9,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,
10,12,4,1},
{1,3,9,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,11,11,10,10,
11,12,3,1},
{1,3,15,13,13,13,13,13,13,13,13,13,13,13,13,13,13,13,13,13,13,13,13,13,
13,16,3,1},
{1,4,3,3,4,3,5,5,2,3,5,3,2,3,3,4,3,5,2,5,3,5,3,4,3,3,14,1}]
Level2Bounds :: [{#Int}]
Level2Bounds = [{15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,
15,15,15,15,15,15,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,32783,32783,32783,32783,32783,32783,32783,32783,
32783,32783,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,32783,32783,32783,32783,32783,32783,32783,32783,
32783,32783,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,4096,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,15,15},
{15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,15,
15,15,15,15}]
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment