#THDO 자체 제작. 세계지도 그리기 스크립트.
#우선 세계지도 그림을 준비한다. 가로 5등분한 지도.
# 5 * 2 지도 = 10개의 맵 파일을 형성하도록 한다.
#그림 파일은 5개. 가로 200픽셀,세로 420~450 픽셀가량이 적합하다.
#결론적으로 가로 200픽셀, 세로 250픽셀로 잘릴 지도다.
#200*250 타일을 뜻한다.
def draw_세계지도윗맵
@all_map = Sprite.new
@all_map.bitmap = Bitmap.new("Graphics/Pictures/world055")
#지도 파일을 불러온다
# p @overlap
# 약 23칸으로 맞아 떨어진다. 지도크기는 885 픽셀이다.
for m in 1..5
@this_map = load_data("Data/Map010.rxdata")
@overlap = (1000 - @all_map.bitmap.width)/5
for y in 0...250
#문제는 너비다. 5등분을 한 경우 겹치는 건 23 * 5 = 115칸.
#수학적인 규칙을 찾아내자.
#[1, 200), [201-overlap, 400-overlap), [401-2overlap, 600-2overlap)....
for x in (m-1) * (200 - @overlap)...200 + (m-1) * (200 - @overlap)
#2번째: 200-23..199 + 200-23
#3번째: 199 + 400 - 46 = 599 - 46 = 553
#4번째: 199 + 600 - 3overlap = 800 - 69 = 731.
#5번째: 199 + 800 - 4overlap = 1000 - 92 = 908.
#계산이 맞지 않는다.
@tile_num = @all_map.bitmap.get_pixel(x,y)
if (@tile_num.red <255 or @tile_num.green <255) and @tile_num.blue > 0
#검은선과 흰색을 칠하지 않고 파란색만 칠하는 방법이 없을까?
#파랑이 5보다 커야 하기 때문에 검은색은 칠해지지 않음
#빨강, 초록이 255보다 작아야 하기 때문에 흰색은 칠해지지 않음
#타일 아이디의 3차원 배열
@this_map.data[x - (m-1) * (200 - @overlap),y,0] = 96
if @tile_num.blue <= 100 and (@tile_num.red <=150 or @tile_num.green <=150)
@this_map.data[x - (m-1) * (200 - @overlap),y,0] = 48 #검은선은 얕은 물로 장식.
end
end
#타일 아이디를 변환한다.
end
end
#맵을 저장한다.
save_data(@this_map, "Data/Map00#{m}.rxdata")
#위의 경우 1번에서 5번 지도까지다.
end
end
def draw_세계지도아랫맵
@all_map = Sprite.new
@all_map.bitmap = Bitmap.new("Graphics/Pictures/world055")
#지도 파일을 불러온다
# p @overlap
# 약 23칸으로 맞아 떨어진다. 지도크기는 885 픽셀이다.
for m in 1..5
@this_map = load_data("Data/Map010.rxdata")
@overlap = (1000 - @all_map.bitmap.width)/5
for y in @all_map.bitmap.height - 250...@all_map.bitmap.height
for x in (m-1) * (200 - @overlap)...200 + (m-1) * (200 - @overlap)
@tile_num = @all_map.bitmap.get_pixel(x,y)
if (@tile_num.red <255 or @tile_num.green <255) and @tile_num.blue > 0
#타일 아이디의 3차원 배열
@this_map.data[x - (m-1) * (200 - @overlap),y - (@all_map.bitmap.height - 250),0] = 96
if @tile_num.blue <= 100 and (@tile_num.red <=150 or @tile_num.green <=150)
@this_map.data[x - (m-1) * (200 - @overlap),y - (@all_map.bitmap.height - 250),0] = 48
#검은 선은 얕은 물로 장식.
end
end
#타일 아이디를 변환한다.
end
end
save_data(@this_map, "Data/Map00#{m+5}.rxdata")
end
end
#아래 경우 6번에서 10번 지도까지다.
def draw_지도지우기
for m in 1..5
@this_map = load_data("Data/Map010.rxdata") #주의. 백지가 물이 아니게 할 것.
# p @this_map.data[0,0,0]
# exit
save_data(@this_map, "Data/Map00#{m}.rxdata")
save_data(@this_map, "Data/Map00#{m+5}.rxdata")
end
print "지도를 지웁니다"
end
#draw_지도지우기
#draw_세계지도윗맵
draw_세계지도아랫맵
#exit
#세계지도가 다 그려졌으면 나간다.
#Data 폴더에서 Maps001~ Maps005 파일명을 Map001~Map005로 바꿔서 덮어 씌운다.
lklslel 
천무