我在vb.net上制作迷宫生成器。 fullstop(。)表示路径,hashtag(#)表示墙。我的代码打印每个路径,但同时删除以前的路径。我希望它保留以前的路径,以便它可以制作一个完整的迷宫。以下是显示我的意思的屏幕截图:http://prntscr.com/jhsyox
答案 0 :(得分:1)
在DrawFirstGrid中,不要打印“#”
grid(i, j) = "#"
Console.Write(grid(i, j))
在UpdateGrid中,删除先前执行的所有操作并打印上一个值。
Sub UpdateGrid(ByVal newX, ByVal newY) 'refresh grid when changes are made
grid(newX, newY) = "."
For i = 0 To maxColumn
For j = 0 To maxRow
Console.Write(grid(i, j))
Next
Console.WriteLine()
Next
End Sub
现在,您应该注意到DrawFirstGrid和UpdateGrid有类似的东西。您可以删除绘图逻辑并改为使用DrawGrid。
Directions数组是无用的,CreatePassage将永远被调用。