单机泡泡堂 程序及源代码

地表只记录地面，不影响任何事物 建筑是不可逾越和摧毁的 物品是不可逾越但可被摧毁的 地图结构为： TileIndex:Integer; //保存地表的信息 ObjIndex:Integer; //保存地表之上的处于人物之下的建筑或者物品 CanMove:Boolean; //可以移动的 CanDestroy:Boolean; //可以摧毁的 const Cnt_TileWidth = 40; //Tile 宽 Cnt_TileHeight = 40; //Tile 高 Cnt_TileWidthCount = 14; // 0..14 =15 ，屏幕列数 ，宽度=600 Cnt_TileHeightCount = 12; //0..12 =13 ，屏幕行数 ，高度=520 1:07 04-6-5