简易格子地图(DNF/恶魔城式地图)

じ☆ve冰风

做剧情途中又摸鱼搞了个系统.... 感觉某个做恶魔城的貌似要这种地图吧XD@89444640

除了特殊画面外, 这种地图也适合懒得画大地图的家伙偷懒用=.=....

冲突应该没有, 就一个窗口~



可以一个地图重复利用(SAVE房间)=.= 用变量来做区别


要设置大房间也可以哒~


RUBY 代码

1. #------------------------------------
2. # 简易格子地图  by 灯笼菜刀酱
4. MAP_SWI_ID = 1  #地图开关ID
5. MAP_COPY = 1    #重复地图区别变量ID
6. #====================================================================
7. $platmap = []
8. def 打开地图(number)
9.   case number
10. #===============================================================
11. #地图设置,
12.   when0
13.     地图 = "map1"  #地图图片名称
14.     #地图每个格子坐标 [x,y]=> 对应的地图ID.    ↓可以换行,逗号别忘
15.     区号 = {[1,1]=>1.00,[2,1]=> 2,[2,2]=>3,[2,3]=>3,
16.     [2,4]=>3,[3,4]=>1.01,[4,4]=>4,[4,5]=>4,[5,4]=>4,[5,5]=>4}  
18.     #需要不同的地图,就在下面添加
19.     #when 1
20.     #地图 = XXX
21.     #区号 = XXX
22. #然后事件脚本写: 打开地图(1) 就可以打开新的地图,要关掉地图 事件脚本写 : 关闭地图
23. #===============================================================
24.   else
25.     地图 = nil
26.     区号 = nil
27.   end
28.   $platmap.push(地图)
29.   $platmap.push(区号)
30.   $mapshow = Window_plat.new
31. end
32. def 关闭地图
33. if$mapshow != nil
34.   $mapshow.dispose
35.   $mapshow = nil
36. end
37. end
38. class Window_plat < Window_Base
39.   def initialize
40.     super(0, 0, 160, 120)
41.     self.contents = Bitmap.new(width - 32, height - 32)
42.     @mapid = 0
43.     setup if$platmap[0] != nil
44.   end
45.   def setup
46.      self.contents = Bitmap.new("Graphics/gameovers/" + $platmap[0])
47.      @mx = self.contents.width / 16
48.      @my = self.contents.height / 16
49.      refresh
50.   end  
51.   def refresh
52.     self.contents.clear
53.     bitmap = RPG::Cache.gameover($platmap[0])   
54.     cw = bitmap.width  
55.     ch = bitmap.height
56.     src_rect = Rect.new(0, 0, cw, ch)
57.     self.contents.blt(0, 0, bitmap, src_rect)
58.     x,y = 0,0
59.     loopdo
60.       铺块(x,y)
61.       if x < @mx
62.         x += 1
63.       elsif y < @my
64.         y += 1
65.         x = 0
66.       elsif x == @mxand y == @my
67.         break
68.       end
69.     end
70.   end
71.   def 铺块(x,y)
72.     returnif$platmap[1] == nil
73.     b = $game_map.map_id
74.     if$platmap[1][[x,y]].is_a?(Float)
75.       f = $platmap[1][[x,y]] * 100
76.       ifInteger(f) / 100 == b andInteger(f) % 100 == $game_variables[MAP_COPY]
77.         self.ox = x*16 - 57
78.         self.oy = y*16 - 36
79.         return
80.       end
81.     elsif$platmap[1][[x,y]] == b
82.       self.ox = x*16 - 57
83.       self.oy = y*16 - 36
84.       return
85.     end
86.     bitmap = RPG::Cache.gameover("outsize")
87.     src_rect = Rect.new(0, 0, 16, 16)
88.     self.contents.blt(x*16, y*16, bitmap, src_rect,128)
89.   end
90.   def update
91.     if@mapid != $game_map.map_idand$platmap[0] != nil
92.      setup
93.      @mapid = $game_map.map_id
94.     end
95.   end
96. end

复制代码

地图规格: 长宽无限制, 尽量做成16的倍数看起来比较好看=.=,  放到GAME OVER文件夹里(至于为什么放这里? 一般这里就只放一张图片不是么?太浪费了....=v=)

区号坐标设置参考下图, 每小格是16X16
   

当然也可以这样画,认得这个地图的都是砖工


格式 [x,y] => 1 #对应的地图ID, 要多次利用的地图后面加上两位小数, 对应 1号变量的值

范例一只~

---------------------
5.13 修复了超过10位数的地图宽度长度会导致计算错误的BUG....
             本帖来自P1论坛作者灯笼菜刀王，因Project1站服务器在国外有时候访问缓慢不方便作者交流学习，经联系P1站长fux2同意署名转载一起分享游戏制作经验，共同为国内独立游戏作者共同创造良好交流环境，原文地址：https://rpg.blue/forum.php?mod=viewthread&tid=408405  若有侵权，发帖作者可联系底部站长QQ在线咨询功能删除，谢谢。