するときにノイズみたいなのが混じってしまうのですがどうすれば解消
されるでしょうか?
一応マップの方で移動プログラムだけを抜いてみました。
wx=640:wy=520 screen 0,wx,wy,4,150,80 kmt=1+2+4+8 kyid=2 buffer 10,80,40 picload "map1.bmp" gsel 0 dim map_data,100 dim map_set,6 map_set=10,10,40,40,1 map_data.0=1,1,1,1,1,1,1,1,1,1 map_data.10=1,1,1,1,1,1,1,1,1,1 map_data.20=1,1,1,1,1,1,1,1,1,1 map_data.30=1,1,1,1,1,1,1,1,1,1 map_data.40=1,1,1,1,1,1,1,1,1,1 map_data.50=1,1,1,1,1,1,1,1,1,1 map_data.60=1,1,1,1,1,1,1,1,1,1 map_data.70=1,1,1,1,1,1,1,1,1,1 map_data.80=1,1,1,1,1,1,1,1,1,1 map_data.90=1,1,1,1,1,1,1,1,1,1 i=0 buffer 2,map_set.0*map_set.2,map_set.1*map_set.3 repeat map_set.1 cn=cnt repeat map_set.0 pos cnt*map_set.2,cn*map_set.3:gcopy 10,map_data.i*40,0,map_set.2,map_set.3 i++ loop loop gsel 0 repeat redraw 0 wait 1 color:boxf pos 0,0:gcopy 2,kyx,kyy,wx,wy switch km case 1 kyx-=kyid swbreak case 2 kyy-=kyid swbreak case 4 kyx+=kyid swbreak case 8 kyy+=kyid swbreak swend stick km,kmt redraw 1 loop