HSPTV!掲示板

ローグライクのようなダンジョン自動生成のプログラムを作りたいのですが
区画分けと部屋の生成がよくわかりません。
その他の言語のサイトでもいいので初心者でもわかりやすいアルゴリズムが乗っている
サイトなどを教えていただけないでしょうか？
よろしくお願いします。

っ
http://www40.atwiki.jp/spellbound/pages/904.html

　やり方は前述のGemma氏のサイトの解説通り。コメントは書いてないので、分からない部分があったら質問してください。以下は一例。

	#define CX 64
	#define CY 36
	#define SX 16
	#define SY 16
	
	
	randomize
	screen 0, 1024, 576, 0
	makemap map, CX, CY, 7
	redraw 0
	for x, 0, length(map)
		for y, 0, length2(map)
			pos x*16, y*16
			if map(x,y) {
				box x*16, y*16, 16, 16, $000000, $404040
			} else {
				box x*16, y*16, 16, 16, $D0A080, $FFD0B0
			}
		next
	next
	redraw 1
	stop
	
	#module
	#deffunc makemap array map, int cx, int cy, int count
	dim map, cx, cy
	repeat cx
		map(cnt,0) = 1
		map(cnt,cy-1) = 1
	loop
	repeat cy
		map(0,cnt) = 1
		map(cx-1,cnt) = 1
	loop
	makebrock map, 1, 1, cx-2, cy-2, count
	return
	
	#define IX 3
	#define IY 3
	#deffunc makebrock array map, int bx, int by, int cx, int cy, int count \
	, local div, local size1, local size2, local hole
	if (count+2<rnd(5)) | ((cx < IX*2+1) & (cy < IY*2+1)) : return
	div = rnd(2)
	if cx < IX*2+1 : div = 1
	if cy < IY*2+1 : div = 0
	if div = 0 {
		size1 = IX+rnd(cx-IX*2)
		size2 = cx-1-size1
		repeat cy, by
			map(bx+size1,cnt) = 1
		loop
		makebrock map, bx, by, size1, cy, count-1
		makebrock map, bx+size1+1, by, size2, cy, count-1
		repeat rnd(1+(cy-IY)/IY/2)+1
			hole = by+rnd(cy)
			map(bx+size1-1,hole) = 0
			map(bx+size1,hole) = 0
			map(bx+size1+1,hole) = 0
		loop
	} else {
		size1 = IY+rnd(cy-IY*2)
		size2 = cy-1-size1
		repeat cx, bx
			map(cnt,by+size1) = 1
		loop
		makebrock map, bx, by, cx, size1, count-1
		makebrock map, bx, by+size1+1, cx, size2, count-1
		repeat rnd(1+(cx-IX)/IX/2)+1
			hole = bx+rnd(cx)
			map(hole,by+size1-1) = 0
			map(hole,by+size1) = 0
			map(hole,by+size1+1) = 0
		loop
	}
	return
	
	#define global alargb(%1) color ((%1)&$FF0000)>>16, ((%1)&$FF00)>>8, (%1)&$FF
	#deffunc box int px, int py, int sx, int sy, int oc, int ic
	alargb oc
	boxf px, py, px+sx-1, py+sy-1
	alargb ic
	boxf px+1, py+1, px+sx-2, py+sy-2
	return
	#global

　……にしても良いサイトを教えてもらいました。wass氏には感謝です。

皆さまご回答ありがとうございました。
ソースコードまで頂き
とても参考になりました！

自分が昔作ったときは、
１：部屋のシードとなる点を２次元座標にいくつか（10〜20）無作為に配置する
２：上記座標の連結順を無作為に決める(例：2→9→3→7→…)
３：連結順に、点を結ぶ。詳細は以下
　-１：出発点から連結先の点のx,y座標の差を取る
　-２：タテ/ヨコ のいずれかを無作為に選び、
　　　 タテならタテ→ヨコ の順番で、ヨコならヨコ→タテの順番で
　　　 -１で求めた差に基づき出発点から通路を掘る
　　　・・・鈎（『 ）型の通路になります。
４：通路を結び終わったら　点ごとに順番に部屋を作ります。詳細は以下
　-１：部屋のタテヨコの辺の長さを無作為に決めます。
　　　 自分はint(sqrt(100-rnd(100)))+4 で決めました
　　　 これだと一辺の長さは4〜14になり、大きな部屋ほど作られにくくなります。
-２：点を含み、かつ、-１：で求めた大きさの部屋を
　　　 他の部屋と１マス以上カベで隔てられたところに配置可能なパターンの
　　　 右上カドの座標を全て求めます。
　　　 ※既に掘った通路と重なってもかまいません
-３：-２で求めた座標のうち、１つを無作為に選び、
　　　 その座標を最右上マスとして-１で求めた大きさの部屋を掘ります。
　　　 なお、この時部屋が配置できない場合がよくあります。
　　　 その場合、部屋は生成しません。
　　　 部屋を生成しないことにより、鈎型の通路が続き、
　　　 複雑な進路の通路が生成されます。

かなりめんどくさい生成方法ですが、
区画分けにたよった方法よりバラエティ豊かなダンジョンができる割には、
他の無作為すぎる方法よりも、
区画分けによって作られたような整然とした雰囲気のダンジョンができます。
一例としては、マップを大回りさせられた末に元の部屋に戻ってくるような
一種の罠のようなダンジョンも稀に生成されます。

ソースが残ってたので、いくつかスクショとってみました。
ダンジョン生成がんばってください。
ttp://bbs.2ch2.net/freedom_uploader/img/1221745526/0181.jpg

さらなるご回答を有難うございます。
スクリーンショットが自分の作りたいものそっくりで驚きました。
詳しい解説を教えてくださりとても参考になりました。