diff --git a/src/CATACOMB.TXT b/src/CATACOMB.TXT index 653bf8a..78ae1d5 100644 --- a/src/CATACOMB.TXT +++ b/src/CATACOMB.TXT @@ -1,22 +1,22 @@ -..........................[-]................................. -.........................*...*................................ -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. -.............................................................. +##...$&$&.###......#######[-]####............................T +#.....#######. .&##..*...*..#.##########......*...*....... +.....###..... .###.........#.#.......###...##.....##....# +#........ .####.........#...#####.##&...##.T...##....# +##. ..###.........#.#.#.....####....*...*....... +#### ....######+#####.#.#.##########.........<<<<< +######### ..........#.#&#.#.#.#..........#####....>>>>>> +##########......T.........#.#..#..#.#.########....##...<<<<<<< +.......##############*....#.#####.#.#.#...#.&####..:...>>>>>>> +........############.....T#.......#.#...#T...#.##*.:....<<<<<< +.........................##########.##########.##..#...>>>>>>$ +........................##.....................##..#..<<<<<<.. +.........................#+#########.########.###*.#.>>>>>.... +...........................#..................##...#.<<<<....# +........................####.###################*..#.>>>>...## +...................................................#.<<<....## +...................................................#.>>>...O.# +...................................................#........&# +...........................................................### .............................................................. .............................................................. .............................................................. @@ -59,4 +59,4 @@ .............................................................. .............................................................. ..*...*....................................................... -..#[=]#....................................................... \ No newline at end of file +..#[=]#....................................................... diff --git a/src/samplesrc/rogue.map.pla b/src/samplesrc/rogue.map.pla index 9a6fd95..a9e407e 100644 --- a/src/samplesrc/rogue.map.pla +++ b/src/samplesrc/rogue.map.pla @@ -115,6 +115,7 @@ const maprows = 64 const mapcols = 64 const mapsize = maprows*mapcols +const WALL_TILE = '#' const FLOOR_TILE = '.' const TORCH_TILE = '*' const PIT_TILE = ' ' @@ -186,7 +187,7 @@ word = @linebuffer, @linebuffer, @linebuffer, @linebuffer, @linebuffer // export def loadmap - byte mapref, row + byte mapref, row, l // // Init the view map @@ -206,7 +207,8 @@ export def loadmap if mapref newline(mapref, $7F, $0D) for row = 1 to maprows - 2 - read(mapref, map + (row << 6) + 1, mapcols) + l = read(mapref, map + (row << 6) + 1, mapcols) + ^(map + (row << 6) + l) = WALL_TILE next close(mapref) fin diff --git a/src/samplesrc/rogue.pla b/src/samplesrc/rogue.pla index 1a367be..6a188c5 100755 --- a/src/samplesrc/rogue.pla +++ b/src/samplesrc/rogue.pla @@ -49,7 +49,7 @@ const FALSE = 0 const TRUE = not FALSE const maxlight = 10 -const maxview = 20 +const maxview = 19 word xdir = 0, 1, 1, 1, 0, -1, -1, -1 word ydir = -1, -1, 0, 1, 1, 1, 0, -1