code:
;--------------------------------------------------
;	맵내 이동 처리 확장 패치 부속
;	죽림 MAP용 함수
;--------------------------------------------------

@MAP_PLACENAME_4(ARG)
#FUNCTIONS
IF GET_MAPID(ARG) == MAIN_MAP
	SELECTCASE ARG
		CASE 401 TO (MAXROOM - 1)
			RETURNF STR:(ARG + 8000)
		CASE 498
			RETURNF OMANEKI_PLACE()
		CASE 499
			RETURNF "스키마 공간"
		CASE MAXROOM
			RETURNF "죽림의 밖"
		CASEELSE
			RETURNF "불명"
	ENDSELECT
ELSE
	RETURNF "불명"
ENDIF

;@MAP_VIEWING_4
;
;IF CHK_FOCUS(402, CFLAG:MASTER:현재위치, 430)
;	CALL MAP_EIENTEI
;ELSEIF INRANGE(CFLAG:MASTER:현재위치, 450,466)
;	CALL MAP_MUGENKAN
;ELSE
;	CALL MAP_EIEN_FRONT
;	CALL MAP_BAMBOO
;ENDIF
;RETURN 1

@MAP_VIEWING_4(AA)
#DIMS REF AA, 0
IF !TFLAG:맵변환
	IF CHK_FOCUS(402, CFLAG:MASTER:현재위치, 430)
		TFLAG:맵변환 = 1
	ELSEIF CHK_FOCUS(450, CFLAG:MASTER:현재위치, 466)
		TFLAG:맵변환 = 2
	ELSE
		TFLAG:맵변환 = 3
	ENDIF
ENDIF
CALL DRAW_INFORMATIONLINE(@"%MAPNAME:(TFLAG:맵변환)%")
PRINTFORML
TRYCALLFORM MAP_NEW_TIKURIN_{TFLAG:맵변환}(AA)

@MAP_CAN_MOVE_4(ARG, ARG:1)
#FUNCTION
SELECTCASE ARG
	;안쪽노원판정
	CASE 407 TO 430
		;제외
		SIF GROUPMATCH(ARG:1, [[우동게]], [[테위]], [[카구야]], [[에이린]])
			RETURNF 1
		;달의 백성도 좋지요
		SIF GROUPMATCH(ARG:1, [[요리히메]], [[토요히메]], [[레이센]], [[사구메]])
			RETURNF 1
		;안으로부터는 움직일 수 있다
		SIF INRANGE(CFLAG:(ARG:1):현재위치, 407,430)
			RETURNF 1
		;당신
		IF ARG:1 == MASTER
			IF 영원정침입허가() || INRANGE(CFLAG:MASTER:초기위치, 401,430) || FLAG:시간정지
				RETURNF 1
			ELSE
				TFLAG:이동불능메시지 = 401
				RETURNF 0
			ENDIF
		;그 이외
		ELSE
			RETURNF 0
		ENDIF
	CASEELSE
		RETURNF 1
ENDSELECT

@MAP_CANNOT_WORD_4(ARG)
IF TFLAG:이동불능메시지 == 401
	PRINTW 친한 사람이 없는 동안은 영원정의 안쪽에는 들어갈 수 있게 해 주지 않다
	CLEARLINE 2
	REUSELASTLINE
	RETURN
ENDIF

@영원정침입허가()
#FUNCTION
SIF TALENT:52:연모 || TALENT:53:연모 || TALENT:62:연모 || TALENT:72:연모
	RETURNF 1
SIF GROUPMATCH(FLAG:데이트상대, 52,53,62,72)
	RETURNF 1
SIF GROUPMATCH(FLAG:역극, 52,53,62,72)
	RETURNF 1
SIF CFLAG:52:동행 || CFLAG:53:동행 || CFLAG:62:동행 || CFLAG:72:동행
	RETURNF 1
SIF FLAG:연회개최플래그 == 3 && TIME >= FLAG:33
	RETURNF 1
RETURNF 0


code:
;FileName_MOVEMENT.ERB ----------------------------- Rev1. 00
;지점 관련성 응답 처리
;CALL		USER
;ARG		0:현재지점, 1:비교처 지점
;RETURN		1:이동가능/안보이는 2:이동 불가/보이는 3:이동가능/보인다
;COMMENT
;-----------------------------------------------------------
@CAN_MOVE_4(ARG, ARG:1)
#FUNCTION
#DIM 참조처
참조처 = ARG:1 % 100
SELECTCASE ARG % 100
	CASE 1
		SIF 참조처 == 2
			RETURNF 3
		SIF 참조처 == 5
			RETURNF 1
		SIF 참조처 == 31
			RETURNF 1
		SIF 참조처 == 33
			RETURNF 1
		SIF 참조처 == 35
			RETURNF 1
	CASE 2
		SIF 참조처 == 1
			RETURNF 3
		SIF 참조처 == 3
			RETURNF 1
		SIF 참조처 == 6
			RETURNF 1
		SIF 참조처 == 7
			RETURNF 1
	CASE 3
		SIF 참조처 == 2
			RETURNF 1
		SIF 참조처 == 4
			RETURNF 1
	CASE 4
		SIF 참조처 == 3
			RETURNF 1
		SIF 참조처 == 5
			RETURNF 1
	CASE 5
		SIF 참조처 == 1
			RETURNF 1
		SIF 참조처 == 4
			RETURNF 1
		SIF 참조처 == 17
			RETURNF 1
		SIF 참조처 == 22
			RETURNF 1
	CASE 6
		SIF 참조처 == 2
			RETURNF 1
	CASE 7
		SIF 참조처 == 2
			RETURNF 1
		SIF 참조처 == 8
			RETURNF 1
		SIF 참조처 == 9
			RETURNF 1
		SIF 참조처 == 18
			RETURNF 1
		SIF 참조처 == 19
			RETURNF 1
		SIF 참조처 == 25
			RETURNF 1
		SIF 참조처 == 29
			RETURNF 1
	CASE 8
		SIF 참조처 == 7
			RETURNF 1
		SIF 참조처 == 10
			RETURNF 1
		SIF 참조처 == 11
			RETURNF 1
		SIF 참조처 == 12
			RETURNF 1
		SIF 참조처 == 13
			RETURNF 1
		SIF 참조처 == 14
			RETURNF 1
		SIF 참조처 == 15
			RETURNF 1
		SIF 참조처 == 16
			RETURNF 1
	CASE 9
		SIF 참조처 == 7
			RETURNF 1
		SIF 참조처 == 12
			RETURNF 1
		SIF 참조처 == 13
			RETURNF 1
		SIF 참조처 == 14
			RETURNF 1
		SIF 참조처 == 16
			RETURNF 1
		SIF 참조처 == 21
			RETURNF 3
		SIF 참조처 == 24
			RETURNF 1
	CASE 10
		SIF 참조처 == 8
			RETURNF 1
		SIF 참조처 == 11
			RETURNF 1
	CASE 11
		SIF 참조처 == 8
			RETURNF 1
		SIF 참조처 == 10
			RETURNF 1
	CASE 12
		SIF 참조처 == 8
			RETURNF 1
		SIF 참조처 == 9
			RETURNF 1
		SIF 참조처 == 13
			RETURNF 1
	CASE 13
		SIF 참조처 == 8
			RETURNF 1
		SIF 참조처 == 9
			RETURNF 1
		SIF 참조처 == 12
			RETURNF 1
		SIF 참조처 == 14
			RETURNF 1
	CASE 14
		SIF 참조처 == 8
			RETURNF 1
		SIF 참조처 == 9
			RETURNF 1
		SIF 참조처 == 13
			RETURNF 1
	CASE 15
		SIF 참조처 == 8
			RETURNF 1
		SIF 참조처 == 16
			RETURNF 1
		SIF 참조처 == 17
			RETURNF 1
	CASE 16
		SIF 참조처 == 8
			RETURNF 1
		SIF 참조처 == 9
			RETURNF 1
		SIF 참조처 == 15
			RETURNF 1
		SIF 참조처 == 17
			RETURNF 1
		SIF 참조처 == 23
			RETURNF 1
	CASE 17
		SIF 참조처 == 5
			RETURNF 1
		SIF 참조처 == 15
			RETURNF 1
		SIF 참조처 == 16
			RETURNF 1
		SIF 참조처 == 22
			RETURNF 1
	CASE 18
		SIF 참조처 == 7
			RETURNF 1
	CASE 19
		SIF 참조처 == 7
			RETURNF 1
		SIF 참조처 == 20
			RETURNF 1
	CASE 20
		SIF 참조처 == 19
			RETURNF 1
	CASE 21
		SIF 참조처 == 9
			RETURNF 3
		SIF 참조처 == 22
			RETURNF 1
	CASE 22
		SIF 참조처 == 5
			RETURNF 1
		SIF 참조처 == 17
			RETURNF 1
		SIF 참조처 == 21
			RETURNF 1
	CASE 23
		SIF 참조처 == 16
			RETURNF 1
	CASE 24
		SIF 참조처 == 9
			RETURNF 1
	CASE 25
		SIF 참조처 == 7
			RETURNF 1
		SIF 참조처 == 26
			RETURNF 1
	CASE 26
		SIF 참조처 == 25
			RETURNF 1
		SIF 참조처 == 27
			RETURNF 1
		SIF 참조처 == 28
			RETURNF 1
	CASE 27
		SIF 참조처 == 26
			RETURNF 1
	CASE 28
		SIF 참조처 == 26
			RETURNF 1
	CASE 29
		SIF 참조처 == 7
			RETURNF 1
		SIF 참조처 == 30
			RETURNF 1
	CASE 30
		SIF 참조처 == 29
			RETURNF 1
	CASE 31
		SIF 참조처 == 1
			RETURNF 1
		SIF 참조처 == 33
			RETURNF 1
	CASE 32
		SIF 참조처 == 33
			RETURNF 1
	CASE 33
		SIF 참조처 == 1
			RETURNF 1
		SIF 참조처 == 31
			RETURNF 1
		SIF 참조처 == 32
			RETURNF 1
		SIF 참조처 == 34
			RETURNF 1
		SIF 참조처 == 42
			RETURNF 1
		SIF 참조처 == 43
			RETURNF 1
		SIF 참조처 == 44
			RETURNF 1
	CASE 34
		SIF 참조처 == 33
			RETURNF 1
		SIF 참조처 == 35
			RETURNF 1
		SIF 참조처 == 40
			RETURNF 1
		SIF 참조처 == 41
			RETURNF 1
		SIF 참조처 == 45
			RETURNF 1
		SIF 참조처 == 46
			RETURNF 1
		SIF 참조처 == 47
			RETURNF 1
	CASE 35
		SIF 참조처 == 1
			RETURNF 1
		SIF 참조처 == 34
			RETURNF 1
		SIF 참조처 == 36
			RETURNF 1
		SIF 참조처 == 38
			RETURNF 1
	CASE 36
		SIF 참조처 == 35
			RETURNF 1
		SIF 참조처 == 37
			RETURNF 1
	CASE 37
		SIF 참조처 == 36
			RETURNF 1
	CASE 38
		SIF 참조처 == 35
			RETURNF 1
		SIF 참조처 == 39
			RETURNF 1
		SIF 참조처 == 50
			RETURNF 1
		SIF 참조처 == 66
			RETURNF 3
	CASE 39
		SIF 참조처 == 38
			RETURNF 1
	CASE 40
		SIF 참조처 == 34
			RETURNF 1
		SIF 참조처 == 45
			RETURNF 1
		SIF 참조처 == 46
			RETURNF 1
		SIF 참조처 == 47
			RETURNF 1
	CASE 41
		SIF 참조처 == 34
			RETURNF 1
	CASE 42
		SIF 참조처 == 33
			RETURNF 1
		SIF 참조처 == 43
			RETURNF 1
		SIF 참조처 == 44
			RETURNF 1
	CASE 43
		SIF 참조처 == 33
			RETURNF 1
		SIF 참조처 == 42
			RETURNF 1
		SIF 참조처 == 44
			RETURNF 1
	CASE 44
		SIF 참조처 == 33
			RETURNF 1
		SIF 참조처 == 42
			RETURNF 1
		SIF 참조처 == 43
			RETURNF 1
		SIF 참조처 == 46
			RETURNF 1
		SIF 참조처 == 47
			RETURNF 1
	CASE 45
		SIF 참조처 == 34
			RETURNF 1
		SIF 참조처 == 40
			RETURNF 1
		SIF 참조처 == 46
			RETURNF 1
		SIF 참조처 == 47
			RETURNF 1
	CASE 46
		SIF 참조처 == 34
			RETURNF 1
		SIF 참조처 == 40
			RETURNF 1
		SIF 참조처 == 44
			RETURNF 1
		SIF 참조처 == 45
			RETURNF 1
		SIF 참조처 == 47
			RETURNF 3
	CASE 47
		SIF 참조처 == 34
			RETURNF 1
		SIF 참조처 == 40
			RETURNF 1
		SIF 참조처 == 44
			RETURNF 1
		SIF 참조처 == 45
			RETURNF 1
		SIF 참조처 == 46
			RETURNF 3
	CASE 50
		SIF GROUPMATCH(참조처, 38,51,52,65,66)
			RETURNF 1
	CASE 51
		SIF 참조처 == 50
			RETURNF 1
	CASE 52
		SIF 참조처 == 50
			RETURNF 1
	CASE 53
		SIF 참조처 == 65
			RETURNF 1
	CASE 54
		SIF 참조처 == 65
			RETURNF 1
	CASE 55
		SIF 참조처 == 65
			RETURNF 1
	CASE 56
		SIF 참조처 == 65
			RETURNF 1
	CASE 57
		SIF 참조처 == 58
			RETURNF 1
	CASE 58
		SIF GROUPMATCH(참조처, 57,59,61,66)
			RETURNF 1
	CASE 59
		SIF 참조처 == 58
			RETURNF 1
	CASE 60
		SIF GROUPMATCH(참조처, 62,65)
			RETURNF 1
	CASE 61
		SIF GROUPMATCH(참조처, 58,62,65)
			RETURNF 1
	CASE 62
		SIF GROUPMATCH(참조처, 60,61,66)
			RETURNF 1
	CASE 63
		SIF GROUPMATCH(참조처, 64,65)
			RETURNF 1
	CASE 64
		SIF 참조처 == 63
			RETURNF 1
	CASE 65
		SIF GROUPMATCH(참조처, 50,53,54,55,56,60,61,63)
			RETURNF 1
	CASE 66
		SIF GROUPMATCH(참조처, 38,50,58,62,64,65)
			RETURNF 1
	;죽림의 밖
	;죽림입구에의 보고 일방통행, EX캐릭터 대기용
	CASE MAXROOM % 100
		SIF 참조처 == 47
			RETURNF 1
ENDSELECT
RETURNF 0

repo_name: purugi/eraTWKR

license: mit


code:
@KICKOUT_4()
#FUNCTION
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
	CASE 20
		RETURNF 419
	CASE 41
		RETURNF 434
	CASE 54
		RETURNF 465
ENDSELECT

@BATHROOM_4()
#FUNCTION
IF CFLAG:MASTER:현재위치 >= 401 && CFLAG:MASTER:현재위치 <= 430
	RETURNF 420
ELSE
	RETURNF 441
ENDIF
RETURNF 0

@BATHCHECK_4(ARG)
#FUNCTION
SELECTCASE CHK_INHOME(ARG)
	CASE 20,41,54
		RETURNF 1
	CASEELSE
		RETURNF 0
ENDSELECT
RETURNF 0

@MAP_UNIQUEMESSAGE_4
CALL DRAW_INFORMATIONLINE("Info", 1)
IF WITH_MOB()
	IF FLAG:70
		PRINTFORML 이나바들이 정지하고 있다
	ELSEIF GROUPMATCH(TIME:2, 1,6,7)
		PRINTFORML 이나바들이 자고 있다…
	ELSEIF !DAY:3 % 10
		IF !TALENT:MASTER:2 & 2
			PRINTFORML 발정중의 이나바들은 괴로워하고 있다……
		ELSE
			PRINTFORML 발정중의 이나바들로부터 강렬한 시선을 느낀다……
		ENDIF
	ELSE
		SELECTCASE RAND:5
			CASE 0
				PRINTFORML 이나바들이 배회하고 있다
			CASE 1
				PRINTFORML 이나바들이 놀고 있다
			CASE 2
				PRINTFORML 이나바들이 서로 이야기하고 있다
			CASE 3
				PRINTFORML 이나바와 이나바가 개응 넘고 있다
			CASE 4
				PRINTFORML 이나바들이 겹겹이 쌓이고 있다
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF

;-----------------------------------------
;비자택시에 갈아넣는 장소 ID를 돌려주는 함수
;ARG, 대상ID
;RETURNF, 갈아넣고가 끝난 대상ID
;-----------------------------------------

@MAP_SEARCH_REPLACEMENT_4(ARG)
#FUNCTION
SELECTCASE ARG
	CASE 401 TO 406
		RETURNF 450
	CASE 407 TO 430
		RETURNF 480
	CASE 431
		RETURNF 440
	CASE 432,433,442,445
		RETURNF 430
	CASE 434,435,440,441
		RETURNF 420
	CASE 436,437
		RETURNF 460
	CASE 438,439
		RETURNF 470
	CASE 450 TO 466
		RETURNF 490
	CASE 443,444,446,447
		RETURNF 410
ENDSELECT
RETURNF 0

@MAP4_AREANAME(PLACE_ID)
#FUNCTIONS
#LOCALSIZE 1
#LOCALSSIZE 1
#DIM PLACE_ID
IF MAIN_MAP == 4
	SIF INRANGE(PLACE_ID, 401, 430)
		RETURNF "영원정"
	SIF INRANGE(PLACE_ID, 436, 437)
		RETURNF "무명의언덕"
	SIF PLACE_ID == 438
		RETURNF "태양의밭"
	SIF INRANGE(PLACE_ID, 450, 466)
		RETURNF "몽환관"
	RETURNF "미혹의 죽림"
ELSE
	SELECTCASE PLACE_ID
	CASE 450, 480
		RETURNF "영원정"
	CASE 460
		RETURNF "무명의언덕"
	CASE 470
		RETURNF "태양의밭"
	CASE 490
		RETURNF "몽환관"
	CASEELSE
		RETURNF "미혹의 죽림"
	ENDSELECT
ENDIF


code:
@ROOMSETTING_4
VARSET ROOMDATA
FOR LOCAL, 1,100
	SIF GROUPMATCH(LOCAL, 10,11,12,13,14,23,24,27,28,30,32,37,39,40,42,43,45,51,52,57,59,60,63)
		ROOMDATA:LOCAL |= 장소_이불

	SIF GROUPMATCH(LOCAL, 2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,23,24,25,26,27,28,29,30,31,32,37,39,40,41,42,43,44,45,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65)
		ROOMDATA:LOCAL |= 장소_옥내

	SIF GROUPMATCH(LOCAL, 20,41,54)
		ROOMDATA:LOCAL |= 장소_목욕탕

	SIF GROUPMATCH(LOCAL, 17,53)
		ROOMDATA:LOCAL |= 장소_주방

	SIF GROUPMATCH(LOCAL, 1,21,22,27,31,33,34,35,36,38,47,66)
		ROOMDATA:LOCAL |= 장소_훈련

	SIF GROUPMATCH(LOCAL, 16,28,30,32,37,39,40,42,43,45,51,52,57,59,60,63)
		ROOMDATA:LOCAL |= 장소_공부

	;SIF GROUPMATCH(LOCAL, x, x, x)
	;	ROOMDATA:LOCAL |= 장소_휴식
	SIF GROUPMATCH(LOCAL, 6,18,55)
		ROOMDATA:LOCAL |= 장소_화장실

	SIF GROUPMATCH(LOCAL, 1,21,22,33,34,35,36,38,46,47,66)
		ROOMDATA:LOCAL |= 장소_창공

	SIF GROUPMATCH(LOCAL, 21,31,33,62,64,66)
		ROOMDATA:LOCAL |= 장소_달구경

	SIF GROUPMATCH(LOCAL, 46)
		ROOMDATA:LOCAL |= 장소_하늘의소리

	SIF GROUPMATCH(LOCAL, 21)
		ROOMDATA:LOCAL |= 장소_채소밭

	SIF GROUPMATCH(LOCAL, 9,66)
		ROOMDATA:LOCAL |= 장소_빨래너는곳

	SIF GROUPMATCH(LOCAL, 35,66)
		ROOMDATA:LOCAL |= 장소_물긷기

	SIF GROUPMATCH(LOCAL, 1,9,21,36,38,46,47,66)
		ROOMDATA:LOCAL |= 장소_전망

	SIF GROUPMATCH(LOCAL, 6,28,23,24,25,29,66)
		ROOMDATA:LOCAL |= 장소_좁다

	;SIF GROUPMATCH(LOCAL, x, x, x)
	;	ROOMDATA:LOCAL |= 장소_넓다

	SIF GROUPMATCH(LOCAL, 3,4,5,9,10,11,12,13,14,15,16,20,27,28,32,37,39,40,42,43,45,51,52,57,59,60,63)
		ROOMDATA:LOCAL |= 장소_선잠_가능

	SIF GROUPMATCH(LOCAL, 3,4,19,54)
		ROOMDATA:LOCAL |= 장소_신체측정

	SIF GROUPMATCH(LOCAL, 2,7,8,19,25,26,29,50,58)
		ROOMDATA:LOCAL |= 장소_머물지않는다

	SIF GROUPMATCH(LOCAL, 32,37,39,43,45)
		ROOMDATA:LOCAL |= 장소_원룸

	SIF GROUPMATCH(LOCAL, 23,24,27,29,30,46,56)
		ROOMDATA:LOCAL |= 장소_과소

	SIF GROUPMATCH(LOCAL, 5,7,8,9,10,11,12,13,14,15,16,17,18,19,20,23,24,25,26,27,28,29,30,32,37,39,40,42,43,45,51,52,54,55,57,59,60,63)
		ROOMDATA:LOCAL |= 장소_Private
NEXT
MAXROOM = 467
ENTRANCE = 447
피난처 = 446
SIF GET_MAPID(거점_술벌레) != MAIN_MAP
	거점_술벌레 = 417
MAP_PAGES = 3
MAPNAME:1 = 영원정
MAPNAME:2 = 몽환관
MAPNAME:3 = 미혹의 죽림

@DEFAULT_OWNER_4
Default초기위치 = 442
거점_주인 = 72


code:
@SKIP_MOVE_4(ARG:0, ARG:1)
;LOCAL 일람
;0	현재위치

;현재위치 취득
LOCAL:0 = CFLAG:MASTER:현재위치
SIF ARG:1
	LOCAL = ARG:1
;잠정 목적지에 직접 이동할 수 있는 경우
IF CAN_MOVE(LOCAL, ARG) & 1
	;거기에 이동
	RETURN ARG
ENDIF
[IF_DEBUG]
	PRINTFORML 스킵무브 개시
[ENDIF]
;막다른 골목으로부터 갈 수 있는 장소는 고정이므로, 거기를 목표로 한다

SELECTCASE LOCAL:0
CASE 406
	RETURN 402
CASE 418
	RETURN 407
CASE 420
	RETURN 419
CASE 423
	RETURN 416
CASE 424
	RETURN 409
CASE 427,428
	RETURN 426
CASE 430
	RETURN 429
CASE 432
	RETURN 433
CASE 437
	RETURN 436
CASE 439
	RETURN 438
CASE 441
	RETURN 434
CASE 451,452
	RETURN 450
CASE 453,454,455,456
	RETURN 465
CASE 457,459
	RETURN 458
CASE 464
	RETURN 463
CASE MAXROOM
	RETURN 447
ENDSELECT
[IF_DEBUG]
	PRINTFORML 막다른 곳 처리를 통과
[ENDIF]
;몽환관2층으로부터는 객실에
SIF GROUPMATCH(LOCAL:0, 463,464) && !GROUPMATCH(ARG, 463,464)
	RETURN 465
;몽환 관내로부터 밖으로 가는 경우, 태양의밭
SIF INRANGE(LOCAL:0, 450,466) && !INRANGE(ARG, 450,466) && LOCAL:0 != 438 && ARG != 438
	RETURN 438

;몽환관외에서 관내로 가는 경우, 태양의밭
SIF !INRANGE(LOCAL:0, 450,466) && INRANGE(ARG, 450,466) && LOCAL:0 != 438
	RETURN 438
[IF_DEBUG]
	PRINTFORML 특수 이동 처리를 통과
[ENDIF]

;직접 이동할 수 없는 경우,  1개가까운 위치를 잠정 목적지로 다시 설정해 루프
;지점 추가시 요점 보충(전케이스 수정하는 것)
SELECTCASE ARG
	CASE 401
		SELECTCASE LOCAL:0
		CASE 403 TO 430
			RETURN 402
		CASE 432,442,443,444
			RETURN 433
		CASEELSE
			RETURN 435
		ENDSELECT
	CASE 402
		SELECTCASE LOCAL:0
		CASE 404,405,422
			RETURN 403
		CASE 408 TO 421,423 TO 430
			RETURN 407
		CASEELSE
			RETURN 401
		ENDSELECT
	CASE 403
		SELECTCASE LOCAL:0
		CASE 405,422
			RETURN 404
		CASEELSE
			RETURN 402
		ENDSELECT
	CASE 404
		SELECTCASE LOCAL:0
		CASE 408,414,415,416,417,422,423,424
			RETURN 405
		CASEELSE
			RETURN 403
		ENDSELECT
	CASE 405
		SELECTCASE LOCAL:0
		CASE 408,409,414,415,416,421,423,424
			RETURN 417
		CASEELSE
			RETURN 404
		ENDSELECT
	CASE 406
		RETURN 402
	CASE 407
		SELECTCASE LOCAL:0
		CASE 420
			RETURN 419
		CASE 410 TO 417,423
			RETURN 408
		CASE 421,424
			RETURN 409
		CASE 426,427,428
			RETURN 425
		CASE 430
			RETURN 429
		CASEELSE
			RETURN 402
		ENDSELECT
	CASE 408
		SELECTCASE LOCAL:0
		CASE 417,422,423,424
			RETURN 416
		CASE 409,421
			RETURN 412
		CASEELSE
			RETURN 407
		ENDSELECT
	CASE 409
		SELECTCASE LOCAL:0
		CASE 417,422,423
			RETURN 416
		CASE 408,410,411,415
			RETURN 412
		CASEELSE
			RETURN 407
		ENDSELECT
	CASE 410
		RETURN 408
	CASE 411
		RETURN 408
	CASE 412
		SELECTCASE LOCAL:0
		CASE 421,424
			RETURN 409
		CASEELSE
			RETURN 408
		ENDSELECT
	CASE 413
		SELECTCASE LOCAL:0
		CASE 421,424
			RETURN 409
		CASEELSE
			RETURN 408
		ENDSELECT
	CASE 414
		SELECTCASE LOCAL:0
		CASE 421,424
			RETURN 409
		CASEELSE
			RETURN 408
		ENDSELECT
	CASE 415
		SELECTCASE LOCAL:0
		CASE 409,421,423,424
			RETURN 416
		CASE 403,404,405,422
			RETURN 417
		CASEELSE
			RETURN 408
		ENDSELECT
	CASE 416
		SELECTCASE LOCAL:0
		CASE 421,424
			RETURN 409
		CASE 403,404,405,422
			RETURN 417
		CASEELSE
			RETURN 408
		ENDSELECT
	CASE 417
		SELECTCASE LOCAL:0
		CASE 407 TO 414,418,419,420,421,423 TO 430
			RETURN 416
		CASEELSE
			RETURN 405
		ENDSELECT
	CASE 418
		RETURN 407
	CASE 419
		RETURN 407
	CASE 420
		RETURN 419
	CASE 421
		RETURN 409
	CASE 422
		SELECTCASE LOCAL:0
		CASE 407 TO 416,418 TO 420,423 TO 430
			RETURN 417
		CASEELSE
			RETURN 405
		ENDSELECT
	CASE 423
		RETURN 416
	CASE 424
		RETURN 409
	CASE 425
		SELECTCASE LOCAL:0
		CASE 427,428
			RETURN 426
		CASEELSE
			RETURN 407
		ENDSELECT
	CASE 426
		RETURN 425
	CASE 427
		RETURN 426
	CASE 428
		RETURN 426
	CASE 429
		RETURN 407
	CASE 430
		RETURN 429
	CASE 431
		SELECTCASE LOCAL:0
		CASE 432,434,440 TO 447
			RETURN 433
		CASEELSE
			RETURN 401
		ENDSELECT
	CASE 432
		RETURN 433
	CASE 433
		SELECTCASE LOCAL:0
		CASE 434,440,441,445,446,447
			RETURN 434
		CASEELSE
			RETURN 401
		ENDSELECT
	CASE 434
		SELECTCASE LOCAL:0
		CASE 432,442,443,444
			RETURN 433
		CASEELSE
			RETURN 435
		ENDSELECT
	CASE 435
		SELECTCASE LOCAL:0
		CASE 437
			RETURN 436
		CASE 439
			RETURN 438
		CASE 402 TO 431
			RETURN 401
		CASEELSE
			RETURN 434
		ENDSELECT
	CASE 436
		RETURN 435
	CASE 437
		RETURN 436
	CASE 438
		;몽환관현관에
		IF GROUPMATCH(LOCAL:0, 451,452,453,454,455,456,460,463,464,465)
			RETURN 450
		;몽환관정에
		ELSEIF GROUPMATCH(LOCAL:0, 458,461,462)
			RETURN 466
		ELSE
			RETURN 435
		ENDIF
	CASE 439
		RETURN 438
	CASE 440
		SELECTCASE LOCAL:0
		CASE 443,444
			RETURN 447
		CASEELSE
			RETURN 434
		ENDSELECT
	CASE 441
		RETURN 434
	CASE 442
		SELECTCASE LOCAL:0
		CASE 446,447
			RETURN 444
		CASEELSE
			RETURN 433
		ENDSELECT
	CASE 443
		SELECTCASE LOCAL:0
		CASE 446,447
			RETURN 444
		CASEELSE
			RETURN 433
		ENDSELECT
	CASE 444
		SELECTCASE LOCAL:0
		CASE 440,445
			RETURN 447
		CASEELSE
			RETURN 433
		ENDSELECT
	CASE 445
		SELECTCASE LOCAL:0
		CASE 443
			RETURN 444
		CASEELSE
			RETURN 434
		ENDSELECT
	CASE 446
		SELECTCASE LOCAL:0
		CASE 443
			RETURN 444
		CASEELSE
			RETURN 434
		ENDSELECT
	CASE 447
		SELECTCASE LOCAL:0
		CASE 443
			RETURN 444
		CASEELSE
			RETURN 434
		ENDSELECT
	CASE 450
		SELECTCASE LOCAL:0
		;뜰로부터
		CASE 458,462
			RETURN 466
		CASEELSE
			RETURN 465
		ENDSELECT
	CASE 451
		RETURN 450
	CASE 452
		RETURN 450
	CASE 453
		RETURN 465
	CASE 454
		RETURN 465
	CASE 455
		RETURN 465
	CASE 456
		RETURN 465
	CASE 457
		RETURN 458
	CASE 458
		SELECTCASE LOCAL:0
		;뜰로부터
		CASE 450
			RETURN 466
		CASEELSE
			RETURN 461
		ENDSELECT
	CASE 459
		RETURN 458
	CASE 460
		SELECTCASE LOCAL:0
		;테라스로부터
		CASE 461,466
			RETURN 462
		CASEELSE
			RETURN 465
		ENDSELECT
	CASE 461
		SELECTCASE LOCAL:0
		;테라스로부터
		CASE 460,466
			RETURN 462
		CASEELSE
			RETURN 465
		ENDSELECT
	CASE 462
		SELECTCASE LOCAL:0
		;거실로부터
		CASE 458,465
			RETURN 461
		CASE 438
			RETURN 466
		CASEELSE
			RETURN 465
		ENDSELECT
	CASE 463
		RETURN 465
	CASE 464
		RETURN 463
	CASE 465
		SELECTCASE LOCAL:0
		CASE 458,462
			RETURN 461
		;현관으로부터
		CASEELSE
			RETURN 450
		ENDSELECT
	CASE 466
		SELECTCASE LOCAL:0
		CASE 458,462
			RETURN 461
		;현관으로부터
		CASEELSE
			RETURN 450
		ENDSELECT
	CASE MAXROOM
		RETURN 447
ENDSELECT


code:
@GETMAP_5(ARG)
KEHAI = 0
IF TALENT:MASTER:위치짐작 && FLAG:짐작모드 == 1
	SIF ROOMDATA:(ARG % 100) & 장소_모브
		SETCOLOR C_D_PINK
	FOR LOCAL, 1, CHARANUM
		IF CFLAG:LOCAL:현재위치 == ARG
			IF CFLAG:LOCAL:행동 == 5
				KEHAI = 2
			ELSEIF CFLAG:LOCAL:수면
				KEHAI = 3
			ENDIF
			SIF KEHAI > 1
				BREAK
			KEHAI = 1
		ENDIF
		IF ARG == 525
			CALL GETMAP_BUILDING(LOCAL, 521,531)
		ELSEIF ARG == 510
			CALL GETMAP_BUILDING(LOCAL, 510,515)
		ELSEIF ARG == 534
			CALL GETMAP_BUILDING(LOCAL, 534,537)
		ENDIF
		SIF KEHAI > 1
			BREAK
	NEXT
	IF KEHAI == 1
		SETCOLOR 255, 100, 200
	ELSEIF KEHAI == 2
		SETCOLOR 255, 100, 0
	ELSEIF KEHAI == 3
		SETCOLOR 0, 120, 180
	ENDIF
ENDIF
CALL GETMAP_YOGORE(ARG)


code:
@MAP_FOREST_1(AA)
#DIMS REF AA, 0

AA:00 = 森森林木木　木　　　　Ψ　ΨΨΨ　ΨΨ　ΨΨ　　　ΨΨ　ΨΨ　　　Ψ　П　　木　　木　∩　木　　П　木
AA:01 = 林林林木　木　　ΨΨ　　Ψ　Ψ　Ψ제 　사Ψ　ΨΨΨ　　Ψ　ΨΨ　П　　Ψ∩　　Ψ　П　　∩　木　　∩　木
AA:02 = 木　木　　　　　　　　　　　　　　Ψ　Ψ　　　　　　　　　　　　　　　　　Ψ　　　　　　　П　П　木
AA:03 = 木林木　木　　　Ψ　ΨΨΨ　Ψ　　　09　　　　ΨΨ　ΨПΨΨ　　　　　　　　　　　∩　　　　　∩　　П
AA:04 = 木木　木　　　　　ΨΨ　　Ψ　ΨΨΨ　ΨΨΨΨ　ΨΨ　ΨΨ　∩Ψ　　　Ψ　　　무영총 　　　　∩　∩　　木
AA:05 = 木　木　木　　　　木　Ψ木　木　　木ΨΨ木Ψ　Ψ木　木木　　木　　ΨП　　П　　06　　　　　　∩　∩　　木
AA:06 = 林　木　　　　　木木林　木　　木木　木　林　木木林木　林木　木　П　　　　　　　　　　П　　П　　　木
AA:07 = 　木　木　　　　　　木　木林木木　林　木木　林　#m#m木木　木　木木　　　　　　　　　　　　　　　П∩　П
AA:08 = 木　　　마법광장　　　　木　　　木木木　　木　#M　　#m　　木木木林　木　木П　　∩　　　　　　П　　П　木
AA:09 = 林　木　　 08 　　木　　　　　　　木　　木#m　　　　木　林森林木木木　　木　　П　　∩　　　　　∩　　木
AA:10 = 木林木　　　　　　　木　　　木　　　　　　　　07　#M　#M木林林木林木木木　　∩　　　　　　　　　　∩　　木
AA:11 = 林木木木　　　　　木　　　木　木木　　木　　　　　　#m木木　林森森木林木　木　　∩П　П　　　∩　　木
AA:12 = 林林木　　　　　　　木　木　木　林　木　木木　　　　　木木林木林林林木木　木　　　　　　　∩П　木
AA:13 = 森林木木　木　　木　　木　林林木　林　■■　 대수 木　　木ル木林林森林木　木木　П　　木П　　　　　П　木
AA:14 = 林林木　林　　　　　■■■■木木林木■　41■　40　木　　木43林森林木木木　　　　木　　　　木　　木
AA:15 = 森森林木　　　　　　｜10　■林森木林■토키■　　　　　木　木林木林木木木　　木　　木　　木　　木
AA:16 = 森森林　木　木　　　■마리■木森森林木■■木　木　　　木　　木　木林　木木　　木　木　　　木
AA:17 = 森林　木　　　　　　■■■■林森森林林42森　木　　木　　木木　木　　木林木木　　　　　木
AA:18 = 林木林　　　木　　木　■15■林林林森森リ林　　木　　　　　　木木木　木　木　　　木
AA:19 = 林木　木　木　　　　木　　林林林木林森林木　　　　　　木　　　木　林　木　木木
AA:20 = 木木　林　　　　　　　木木　木木　　林木　　木　木　木　木　20　木林木　木　　木
AA:21 = 　林木나루미　木　　　　　　　　木　木木　　　　　　木林■■―■■林林木　木　木
AA:22 = 木林木■44■木木木木　　　木　　　　분기　　木　木　林　■　25　■木林木　　木　木
AA:23 = 林木林■■■林木林　木木木　　木　　　03　　木木林森森林■ 인형 ■林林林林木木　木木
AA:24 = 森林木林森林林木木木木木木木　　　　木　　木　林木林森林■■■■■林木林木　林林　木　木
AA:25 = 林林林森林森森木林　森林林　木　　木　　　　木林林森　森林林　森林林林森林林林木　　木
AA:26 = 森森林森林森林森木林林木　林木木林木　　　　木木林　森森　森森森森森林林林木木林　林　木木　木
AA:27 = 林森森森林林森林林木木木木　林木　木木　　木■■■■林林森林林林森林林森林森林木　林林木
AA:28 = 林森林森森林木木木林　木■■■■■■　　　　　 34 ■木林林木林林森森森林森林木木林林木木林木　木
AA:29 = 森林森森林森森林　木　　■ 향림당 ■木　　木■엘렌■木林林林森林森林森林森林森林林木林木林木　木
AA:30 = 林森林森森林林林木　木　■　　02　■木　　　■■■■木森森林林林森林森森林林　木林林林木　木
AA:31 = 木林森林林林木木木木　木■■■―■■　　　木　木　　木林森森森林林森森林林森森木林木林木
AA:32 = 林森林林木林木林木木林木森森林　　　입　구　木林木　木林林木林林森森森林森林木木林林木木
AA:33 = 林林林森林森森木林木木木木林林木木　　01　木　木　　木林森森森林林森森林木木林林林木
AA:34 = 林木林　木　木　　木　林　林林　　　　#E　　林　　木　木　　木木木　木　木　　　木

@MAP_FOREST_2(AA)
#DIMS REF AA, 0
AA:00 = 　　　　　　　　　　　　　일층　　　　　　　　　　　　　　　　　　｜　　　　　　　이층
AA:01 = 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜
AA:02 = ■■■■■■■■■■■■■■■■■■■■■　■■■■■■　　　　　｜　┏━━━■　■■■■■■
AA:03 = ■　　　　■｜주　　┣∩┫　　　　　｜29■■■■■■■■■　　　　｜　┃　｜25■■■■■■■■■
AA:04 = ■　욕탕　■｜방　　　形　形　形　　┴┴■■■■　　　　■■　　　｜　┃　┴┴■■　　　■□□■■
AA:05 = ■　　26　■｜　　　┌─────┐　　　　　　■　　　　　■■　　｜　┃　　　■■빈　방■□□□■■
AA:06 = ■■■■─■┘　　　│　　　　　│　　　　　　■　　　　　　■■　｜　┃　　■■■　31　■□　□□■■
AA:07 = ■탈의　　■　　25　└─────┘　　　　　　｜　연구실　　■■　｜　┃　　■■■■─■■　 28 □■■
AA:08 = ■■■■─■　　　　　形　形　形　　　　　　　｜　　　　　　■■　｜　┃ 29 ■　　　　　■　창고□■■
AA:09 = ■WC│　　　　　　　　　　　　　　　　　　　　■　　24　　　■■　｜　┃　　｜　　　　　｜　　　□■■
AA:10 = ■■■■■■■■　　■■■■■■■■■■■　　■　　　　　　■■　｜　┃　　■　　30　　■　□□□■■
AA:11 = ■　　　　　　｜　　｜　　　　　■　　　■　　■■■■■■■■　　｜　┃　　■■　　　　■■■■■■
AA:12 = ■　　신키　　■　　■　앨리스　■ 유메 ｜　　　　｜｜30■■　　　｜　┗━■■■■　　　｜｜25■■
AA:13 = ■　　22　　　■──■　　21　　■　23　■■■　　┴┴■■　　　　｜　　　　　　■■　　┴┴■■
AA:14 = ■　　　　　　■현관■　　　　　■　　　■　■■■■■■　　　　　｜　　　　　　　■■■■■■
AA:15 = ■■■■■■■■──■■■■■■■■■■■　　　　　　　　　　　　｜
AA:16 = 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｜
AA:17 = 　　━　　　　　　　　　　                                        ｜
AA:18 = 　┃井┃       관전20                                             ｜
AA:19 = 　　━　　                                                        ｜

@MAP_FOREST_3(AA)
#DIMS REF AA, 0
AA:00 = 　　　　■■■■■■■■■■■■■
AA:01 = 　 마법 ■　　｜｜　■　　■연구■
AA:02 = 　 광장 ■　　｜｜　■　　■장소■
AA:03 = 　←08　｜　10｜｜　｜　　　 13 ■
AA:04 = 　　　　■　　｜｜　■　　■　　■
AA:05 = 　　　　■　　｜｜　■　　■■■■
AA:06 = 　　　　■■■■■■■　　■침실■
AA:07 = 　　　　■부｜　　　　　　｜ 12 ■
AA:08 = 　　　　■엌｜　　거실　　■■■■
AA:09 = 　　　　■■■　　 11 　　■욕실■
AA:10 = 　　　　■측｜　　　　　　｜ 14 ■
AA:11 = 　　　　■■■―■■■■■■■■■
AA:12 = 　　　　━　　　　　　　■창고15■
AA:13 = 　　　┃井┃　　　　　　■―――■
AA:14 = 　　　　━
AA:15 = 　　　　　　갈림길↓03

@MAP_FOREST_4(AA)
#DIMS REF AA, 0
AA:00 = ■■■■■■■■■■■■■■■
AA:01 = ■욕실■탈■WC■창고■　각방■
AA:02 = ■37　■의■─■ 36 ■　35　■
AA:03 = ■　　│실│　■　　■　　　■
AA:04 = ■■■■■■─■■─■─■■■
AA:05 = ■난│부　　　└┘　　　└─■
AA:06 = ■─┘　　　○　　　　　　　■
AA:07 = ■＝＝＝＝＝＝＝＝＝＝＝＝＝■
AA:08 = ■　　　　　○　　　　　　┌■
AA:09 = ■──┐　　34　　┌───┘■
AA:10 = ■　棚│　　　　　│棚　　　■
AA:11 = ■■■■■─■■■■■■■■■
AA:12 = 　━　　　　　　薪薪薪
AA:13 = ┃井┃
AA:14 = 　━
AA:15 = 　　　　입구↓01

@ODEKAKEMAP_5(AA)
#DIMS REF AA, 0

AA:00 = 林林林[향림당]林林林林林││林林■■■■林■■■■林林林林Ψ　Ψ林林森森林林
AA:01 = 林林林■　　■林　　林林││林林■　　■林■　　■林林　　　　　林 Π　Π 林
AA:02 = 林林林■──■林　　林　││　林■─■■林■■─■林林　林Ψ　Ψ林Π Π Π林
AA:03 = 　 01 　 02 　　　　　　 03 　　　04　　　　　05　　　　林　06　　　 07 　林
AA:04 = 林林林林林林林林林林林林　　林林林林林林林林林林林林林林林Ψ　Ψ林林林林林林

SIF CFLAG:MASTER:현재위치 == 무연총 && (ABL:MASTER:교양 >= 2 || ABL:(FLAG:데이트상대):교양 >= 2)
	AA:00 = 林林林[향림당]林　　林林││林林■■■■林■■■■林林林林Ψ　Ψ林林 68 林林

@DRAW_MAP_BG_5(SLICED)
#DIMS SLICED
SELECTCASE SLICED
;채색 싶을 때는 이런 느낌
CASE "목","숲","숲"
	SETCOLOR C_TEAL
	PRINTS SLICED
	RESETCOLOR
;다른 문자를 표시시키는 예
CASE "#W"
	SETCOLOR 0x90EE90
	PRINT 목
	RESETCOLOR
;황색 원색
CASE "#M"
	SETCOLOR C_YELLOW
	PRINT 포
	RESETCOLOR
;적색 원색
CASE "#m"
	SETCOLOR C_RED
	PRINT 포
	RESETCOLOR
CASE "#E"
	SIF TALENT:MASTER:위치짐작 && COUNTCHARA:(MAXROOM) > 0 && FLAG:짐작모드 == 1
		SETCOLOR 255,100,200
	PRINT ↓
	RESETCOLOR
;보통의
CASEELSE
	PRINTS SLICED
ENDSELECT


code:
;--------------------------------------------------
;	맵내 이동 처리 확장 패치 부속
;	명련사MAP용 함수
;--------------------------------------------------

@MAP_PLACENAME_5(ARG)
#FUNCTIONS
#DIM PLACEID

IF GET_MAPID(ARG) == MAIN_MAP
	SELECTCASE ARG
		CASE 501 TO (MAXROOM - 1)
			RETURNF STR:(ARG + 8000)
		CASE 598
			RETURNF OMANEKI_PLACE()
		CASE 599
			RETURNF "스키마 공간"
		CASE MAXROOM
			RETURNF "숲의 밖"
		CASEELSE
			RETURNF "불명"
	ENDSELECT
ELSE
	RETURNF "불명"
ENDIF

@MAP_VIEWING_5(AA)
#DIMS REF AA, 0
IF !TFLAG:맵변환
	SELECTCASE CFLAG:MASTER:현재위치
		CASE 510 TO 515
			TFLAG:맵변환 = 3
		CASE 521 TO 533
			TFLAG:맵변환 = 2
		CASE 534 TO 537
			TFLAG:맵변환 = 4
		CASEELSE
			TFLAG:맵변환 = 1
	ENDSELECT
ENDIF
CALL DRAW_INFORMATIONLINE(@"%MAPNAME:(TFLAG:맵변환)%")
PRINTFORML
TRYCALLFORM MAP_FOREST_{TFLAG:맵변환}(AA)

@MAP_CAN_MOVE_5(ARG, ARG:1)
#FUNCTION
#DIM 재택
SELECTCASE ARG
	;개-―
	CASE 502
		IF !INRANGE(TIME, 600,1080)
			TFLAG:이동불능메시지 = ARG
			RETURNF 0
		ENDIF
ENDSELECT
RETURNF 1

@MAP_CANNOT_WORD_5(ARG)
SELECTCASE TFLAG:이동불능메시지
	CASE 502
		PRINTFORMW 영업 시간외다
	CASEELSE
ENDSELECT


code:
;지점 관련성 응답 처리
;-----------------------------------------------------------
@CAN_MOVE_5(ARG, ARG:1)
#FUNCTION
SELECTCASE ARG
	;입구
	;2향림당,  34엘렌 마법의 가게에 이동 가능, 3 갈림길과 직통, 숲의 밖이 보인다
	CASE 501
		SIF GROUPMATCH(ARG:1, 503)
			RETURNF 3
		SIF GROUPMATCH(ARG:1, 502,534)
			RETURNF 1
		SIF ARG:1 == MAXROOM
			RETURNF 2
	;개-―
	;1마법의숲 입구에 이동 가능
	CASE 502
		SIF ARG:1 == 501
			RETURNF 1
	;갈림길
	;11거실, 8 마법의 광장, 15 창고, 20 인형의 관앞, 40 고목의큰나무에 이동 가능, 1 마법의숲 입구와 직통
	CASE 503
		SIF GROUPMATCH(ARG:1, 501)
			RETURNF 3
		SIF GROUPMATCH(ARG:1, 508,511,515,520,540)
			RETURNF 1
	;무연총
	;9재고의길과 직통
	CASE 506
		SIF ARG:1 == 509
			RETURNF 3
	;버섯
	;8마법의 광장, 20 인형의 관앞, 40 고목의큰나무에 이동 가능
	CASE 507
		SIF GROUPMATCH(ARG:1, 508,520,540)
			RETURNF 1
	;광장
	;3갈림길, 7 버섯 군생지, 9 재고의길,  10키리사메마법점, 44 나루미의 집에 이동 가능
	CASE 508
		SIF GROUPMATCH(ARG:1, 503,507,509,510,544)
			RETURNF 1
	;재고
	;8마법의 광장에 이동 가능, 6 무연총과 직통
	CASE 509
		SIF GROUPMATCH(ARG:1, 506)
			RETURNF 3
		SIF GROUPMATCH(ARG:1, 508)
			RETURNF 1
;마리사하우스
	;마법점
	;8마법의 광장, 11 거실에 이동 가능
	CASE 510
		SIF GROUPMATCH(ARG:1, 508,511)
			RETURNF 1
	;거실
	;3갈림길, 10 마법점, 12 침실, 13 연구부가게, 14 목욕탕, 15 창고에 이동 가능
	CASE 511
		SIF GROUPMATCH(ARG:1, 503,510,512,513,514,515)
			RETURNF 1
	;각부가게
	;11거실에 이동 가능
	CASE 512, 513, 514
		SIF ARG:1 == 511
			RETURNF 1
	;souko
	;3갈림길, 11 거실에 이동 가능
	CASE 515
		SIF GROUPMATCH(ARG:1, 503,511)
			RETURNF 1
;인형의 관
	;관앞
	;3갈림길, 7 버섯 군생지, 21 앨리스의 방, 22신키의 방, 25 리빙, 40 고목의큰나무에 이동 가능
	CASE 520
		SIF GROUPMATCH(ARG:1, 503,507,521,522,525,540)
			RETURNF 1
	;목욕탕
	;25리빙에 이동 가능
	CASE 526
		SIF ARG:1 == 525
			RETURNF 1
	;앨리스, 신키의 방
	;20관앞, 25 리빙에 이동 가능
	CASE 521,522
		SIF GROUPMATCH(ARG:1, 525,520)
			RETURNF 1
	;유메코의 방, 연구실,
	;25리빙에 이동 가능, 30 2층에는 일방통행
	CASE 523,524
		SIF GROUPMATCH(ARG:1, 525,530)
			RETURNF 1
	;리빙
	;20관앞, 21 앨리스의 방, 22신키의 방,  23유메코의 방, 24 연구실, 26 목욕탕, 29 발코니, 30 2층에 이동 가능
	CASE 525
		SIF GROUPMATCH(ARG:1, 520,521,522,523,524,526,529,530)
			RETURNF 1
	;창고, 빈 방
	;302층에 이동 가능
	CASE 528,531
		SIF GROUPMATCH(ARG:1, 530)
			RETURNF 1
	;발코니
	;25리빙, 30 2층에 이동 가능
	CASE 529
		SIF GROUPMATCH(ARG:1, 525,530)
			RETURNF 1
	;2층
	;25리빙, 28 창고, 29 발코니, 31 빈 방에 이동 가능
	CASE 530
		SIF GROUPMATCH(ARG:1, 525,528,529,531)
			RETURNF 1
;엘렌 하우스
	;점
	;1입구, 35 엘렌방, 36 창고, 37 목욕탕에 이동 가능
	CASE 534
		SIF GROUPMATCH(ARG:1, 501,535,536,537)
			RETURNF 1
	;엘렌방, 창고, 목욕탕
	;34가게에 이동 가능
	CASE 535 TO 537
		SIF ARG:1 == 534
			RETURNF 1
	;고목의큰나무
	;3갈림길, 7 버섯 군생지, 20관앞,  41토키코, 42 리글, 43 루미아의 사는 곳에 이동 가능
	CASE 540
		SIF GROUPMATCH(ARG:1, 503,507,520,541,542,543)
			RETURNF 1
	;토키코, 리글, 루미아의 사는 곳
	;40고목의큰나무에 이동 가능
	CASE 541 TO 543
		SIF ARG:1 == 540
			RETURNF 1
	;나루미의 집
	;8마법의 광장에 이동 가능
	CASE 544
		SIF ARG:1 == 508
			RETURNF 1
	;숲의 밖
	;1입구에 일방통행
	CASE MAXROOM
		SIF ARG:1 == 501
			RETURNF 1
ENDSELECT
RETURNF 0


code:
@KICKOUT_5()
#FUNCTION
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
	CASE 14
		RETURNF 511
	CASE 37
		RETURNF 534
	CASE 26
		RETURNF 525
ENDSELECT
;RETURNF 101

@BATHCHECK_5(ARG)
#FUNCTION
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
ENDSELECT
RETURNF 0

@BATHROOM_5(ARG)
#FUNCTION
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
ENDSELECT
RETURNF 0

@MAP_UNIQUEMESSAGE_5
SELECTCASE CFLAG:MASTER:현재위치
	CASE 502
		CALL DRAW_INFORMATIONLINE("Info", 1)
		PRINTFORML 잡다한 물건이 소협 해와 함께 있다
		PRINTFORML 「비매품」의 표시가 몹시 많다……
	CASE 503
		CALL DRAW_INFORMATIONLINE("Info", 1)
		PRINTFORML 마리사의 집의 뒷문과 우물이 보인다
;	CASE 520
;		CALL DRAW_INFORMATIONLINE("Info", 1)
;		PRINTFORML 「신축 축하해」라고 쓰여진 큰 하나와가 줄지어 있다
	CASE 524
		CALL DRAW_INFORMATIONLINE("Info", 1)
		PRINTFORML 선반에 약병과 인형이 줄지어 있다
	CASE 543
		CALL DRAW_INFORMATIONLINE("Info", 1)
		PRINTFORML 구석에는 정체의 모르는 뼈가 흩어져 있다
ENDSELECT

RETURN 1
;-----------------------------------------
;비자택시에 갈아넣는 장소 ID를 돌려주는 함수
;ARG, 대상ID
;RETURNF, 갈아넣고가 끝난 대상ID
;-----------------------------------------

@MAP_SEARCH_REPLACEMENT_5(ARG)
#FUNCTION
SELECTCASE ARG
;숲의입구
	CASE 501,534 TO 537, 544
		RETURNF 510
;향림당
	CASE 502
		RETURNF 520
;고목의큰나무
	CASE 540 TO 545
		RETURNF 530
;키리사메마법점
	CASE 510 TO 515
		RETURNF 540
;인형양관
	CASE 520 TO 533
		RETURNF 550
;무연총
	CASE 506
		RETURNF 570
;재고의길
	CASEELSE
		RETURNF 560
ENDSELECT
RETURNF 0

@MAP5_AREANAME(PLACE_ID)
#FUNCTIONS
#LOCALSIZE 1
#LOCALSSIZE 1
#DIM PLACE_ID
IF MAIN_MAP == 5
	SIF INRANGE(PLACE_ID, 510, 515)
		RETURNF "마리사의 가게"
	SIF INRANGE(PLACE_ID, 520, 531)
		RETURNF "인형양관"
	SIF INRANGE(PLACE_ID, 534, 537)
		RETURNF "엘렌의 가게"
	SIF PLACE_ID == 502
		RETURNF "향림당"
	SIF PLACE_ID == 506
		RETURNF "무연총"
	SIF PLACE_ID == 509
		RETURNF "재고의길"
	;SIF INRANGE(PLACE_ID, 343, 348)
	RETURNF "마법의숲"
ELSE
	SELECTCASE PLACE_ID
	CASE 520
		RETURNF "향림당"
	CASE 540
		RETURNF "마리사의 가게"
	CASE 550
		RETURNF "인형양관"
	CASE 560
		RETURNF "재고의길"
	CASE 570
		RETURNF "무연총"
	CASEELSE
		RETURNF "마법의숲"
	ENDSELECT
ENDIF


code:
@ROOMSETTING_5
VARSET ROOMDATA
FOR LOCAL, 1,100
	SIF GROUPMATCH(LOCAL, 12,21,22,23,35,41,42,43,44)
		ROOMDATA:LOCAL |= 장소_이불
	SIF GROUPMATCH(LOCAL, 2)
		ROOMDATA:LOCAL |= 장소_옥내
	SIF INRANGE(LOCAL, 10,15) || INRANGE(LOCAL, 21,31) || INRANGE(LOCAL, 34,37)|| INRANGE(LOCAL, 41,44)
		ROOMDATA:LOCAL |= 장소_옥내
	SIF GROUPMATCH(LOCAL, 14,26,37)
		ROOMDATA:LOCAL |= 장소_목욕탕
	SIF GROUPMATCH(LOCAL, 11,25,34)
		ROOMDATA:LOCAL |= 장소_주방
	SIF GROUPMATCH(LOCAL, 8)
		ROOMDATA:LOCAL |= 장소_훈련
	SIF GROUPMATCH(LOCAL, 13, 21, 22, 23, 24, 34, 41, 44)
		ROOMDATA:LOCAL |= 장소_공부
	SIF GROUPMATCH(LOCAL, 11,12,15,21,22,23,25,34,41,42,43,44)
		ROOMDATA:LOCAL |= 장소_휴식
	;SIF GROUPMATCH(LOCAL, 36)
	;	ROOMDATA:LOCAL |= 장소_화장실
	SIF GROUPMATCH(LOCAL, 1,3,4,5,6,7,8,9,29,40)
		ROOMDATA:LOCAL |= 장소_창공
	SIF GROUPMATCH(LOCAL, 1,3,4,5,6,7,8,9,29,40)
		ROOMDATA:LOCAL |= 장소_달구경
	;SIF GROUPMATCH(LOCAL, )
	;	ROOMDATA:LOCAL |= 장소_하늘의소리
	SIF GROUPMATCH(LOCAL, 8)
		ROOMDATA:LOCAL |= 장소_채소밭
	SIF GROUPMATCH(LOCAL, 3,20,34)
		ROOMDATA:LOCAL |= 장소_물긷기
	SIF GROUPMATCH(LOCAL, 1,6,8)
		ROOMDATA:LOCAL |= 장소_전망
	SIF GROUPMATCH(LOCAL, 15)
		ROOMDATA:LOCAL |= 장소_좁다
	SIF GROUPMATCH(LOCAL, 12,21,22,23,35,41,42,43,44)
		ROOMDATA:LOCAL |= 장소_선잠_가능
	SIF GROUPMATCH(LOCAL, 1,3)
		ROOMDATA:LOCAL |= 장소_머물지않는다
	SIF GROUPMATCH(LOCAL, 14,26,37)
		ROOMDATA:LOCAL |= 장소_신체측정
	SIF GROUPMATCH(LOCAL, 41,42,43,44)
		ROOMDATA:LOCAL |= 장소_원룸
	SIF GROUPMATCH(LOCAL, 6,9,15,28,31,36)
		ROOMDATA:LOCAL |= 장소_과소
	SIF GROUPMATCH(LOCAL, 11,12,13,14,15,21,22,23,24,25,26,28,29,30,31,35,36,37,41,42,43,44)
		ROOMDATA:LOCAL |= 장소_Private
	SIF GROUPMATCH(LOCAL, 2)
		ROOMDATA:LOCAL |= 장소_공공장소
NEXT

MAXROOM = 546
ENTRANCE = 501
피난처 = 506

SIF GET_MAPID(거점_술벌레) != MAIN_MAP
	거점_술벌레 = 511
MAP_PAGES = 4
MAPNAME:1 = 마법의숲
MAPNAME:2 = 인형저택
MAPNAME:3 = 마리사 댁
MAPNAME:4 = 폭신폭신 엘렌의 가게

@DEFAULT_OWNER_5
Default초기위치 = 515
거점_주인 = 11


code:
@SKIP_MOVE_5(ARG:0, ARG:1)

;현재위치 취득
LOCAL:0 = CFLAG:MASTER:현재위치
SIF ARG:1
	LOCAL = ARG:1

;잠정 목적지에 직접 이동할 수 있는 경우
IF CAN_MOVE(LOCAL, ARG) & 1
	;거기에 이동
	RETURN ARG
ENDIF

;막다른 골목으로부터 갈 수 있는 장소는 고정이므로, 거기를 목표로 한다
SELECTCASE LOCAL
;향림당으로부터는 마법의숲 입구만
CASE 502
	RETURN 501
;무연총으로부터는 재고의길만
CASE 506
	RETURN 509
CASE 512 TO 514
	RETURN 511
CASE 526
	RETURN 525
CASE 528,531
	RETURN 530
CASE 534
	RETURN 501
CASE 535 TO 537
	RETURN 534
CASE 541 TO 543
	RETURN 540
CASE 544
	RETURN 508
ENDSELECT

SIF INRANGE(LOCAL, 521, 533) && !INRANGE(ARG, 520, 533)
	RETURN 520

;직접 이동할 수 없는 경우,  1개가까운 위치를 잠정 목적지로 다시 설정해 루프
;지점 추가시 요점 보충(전케이스 수정하는 것)
SELECTCASE ARG
	CASE 501
		;마법의숲 입구에 직접 안 되면 갈림길을 목표로 한다
		RETURN 503
	CASE 502
		;향림당에 직접 안 되면 마법의숲 입구를 목표로 한다
		RETURN 501
	CASE 503
		IF INRANGE(LOCAL, 521,533)
			RETURN 520
		ELSEIF INRANGE(LOCAL, 534,537)
			RETURN 501
		ELSE
		;마법의숲 광장을 목표로 한다
			RETURN 508
		ENDIF
	CASE 506
		RETURN 509
	CASE 507
		SELECTCASE LOCAL:0
			CASE 501 TO 503, 520 TO 530, 540 TO 545
				RETURN 540
			CASE 534
				RETURN 501
			CASEELSE
				RETURN 508
		ENDSELECT
	CASE 508
		SELECTCASE LOCAL:0
			CASE 511 TO 514
				RETURN 510
			CASE 506
				RETURN 509
			CASE 515,501, 502
				RETURN 503
			CASEELSE
				RETURN 507
		ENDSELECT
	CASE 509
		RETURN 508
	CASE 510
		SELECTCASE LOCAL:0
			CASE 512 TO 515
				RETURN 511
			CASEELSE
				RETURN 508
		ENDSELECT
	CASE 511
		RETURN 510
	CASE 512 TO 514
		RETURN 511
	CASE 515
		SELECTCASE LOCAL:0
			CASE 510 TO 514
				RETURN 511
			CASEELSE
				RETURN 503
		ENDSELECT
	CASE 520
		SELECTCASE LOCAL:0
			CASE 506 TO 509, 540 TO 545
				RETURN 540
			CASE 523 TO 531
				RETURN 525
			CASEELSE
				RETURN 503
		ENDSELECT
	CASE 521,522
		SELECTCASE LOCAL:0
			CASE 521 TO 533
				RETURN 525
			CASEELSE
				RETURN 520
		ENDSELECT
	CASE 523,524
		SELECTCASE LOCAL:0
			CASE 528,531
				RETURN 530
			CASE 520 TO 527,529,530
				RETURN 525
			CASEELSE
				RETURN 520
		ENDSELECT
	CASE 525
		SELECTCASE LOCAL:0
			CASE 528,531
				RETURN 530
			CASEELSE
				RETURN 520
		ENDSELECT
	CASE 526
		RETURN 525
	CASE 528,531
		RETURN 530
	CASE 529
		SELECTCASE LOCAL:0
			CASE 528,531
				RETURN 530
			CASEELSE
				RETURN 525
		ENDSELECT
	CASE 530
		RETURN 525
	CASE 534
		RETURN 501
	CASE 535 TO 537
		RETURN 534
	CASE 540
		SELECTCASE LOCAL:0
			CASE 506 TO 509
				RETURN 507
			CASE 521 TO 533
				RETURN 520
			CASEELSE
				RETURN 503
		ENDSELECT
	CASE 541 TO 543
		RETURN 540
	;나루미의 집
	CASE 544
		RETURN 508
ENDSELECT


code:
@GETMAP_6(ARG)
#DIM 기색
기색 = 0
IF TALENT:MASTER:위치짐작 && FLAG:짐작모드 == 1
	SIF ROOMDATA:(ARG % 100) & 장소_모브
		SETCOLOR C_D_PINK
	FOR LOCAL, 1, CHARANUM
		IF CFLAG:LOCAL:현재위치 == ARG
			IF CFLAG:LOCAL:행동 == 5
				기색 = 2
				BREAK
			ELSEIF CFLAG:LOCAL:수면
				기색 = 3
				BREAK
			ENDIF
			기색 = 1
		ENDIF
		IF ARG == 603 && !GROUPMATCH(CFLAG:MASTER:현재위치, 603,610,611,612,613,614)
			IF GROUPMATCH(CFLAG:LOCAL:현재위치, 603,610,611,612,613,614)
				IF CFLAG:LOCAL:행동 == 5
					기색 = 2
					BREAK
				ELSEIF CFLAG:LOCAL:수면
					기색 = 3
					BREAK
				ENDIF
				기색 = 1
			ENDIF
		ELSEIF ARG == 605 && !GROUPMATCH(CFLAG:MASTER:현재위치, 605,618)
			IF GROUPMATCH(CFLAG:LOCAL:현재위치, 605,618)
				IF CFLAG:LOCAL:행동 == 5
					기색 = 2
					BREAK
				ELSEIF CFLAG:LOCAL:수면
					기색 = 3
					BREAK
				ENDIF
				기색 = 1
			ENDIF
		ELSEIF ARG == 606 && !GROUPMATCH(CFLAG:MASTER:현재위치, 606,615,616,617)
			IF GROUPMATCH(CFLAG:LOCAL:현재위치, 606,615,616,617)
				IF CFLAG:LOCAL:행동 == 5
					기색 = 2
					BREAK
				ELSEIF CFLAG:LOCAL:수면
					기색 = 3
					BREAK
				ENDIF
				기색 = 1
			ENDIF
		ELSEIF ARG == 609 && !GROUPMATCH(CFLAG:MASTER:현재위치,619,620,621,622,623,624)
			IF GROUPMATCH(CFLAG:LOCAL:현재위치,619,620,621,622,623,624)
				IF CFLAG:LOCAL:행동 == 5
					기색 = 2
					BREAK
				ELSEIF CFLAG:LOCAL:수면
					기색 = 3
					BREAK
				ENDIF
				기색 = 1
			ENDIF
		ENDIF
		IF ARG == 603
			CALL GETMAP_BUILDING(LOCAL,610,614)
		ELSEIF ARG == 607
			CALL GETMAP_BUILDING(LOCAL,615,618)
		ELSEIF ARG == 608 || 609
			CALL GETMAP_BUILDING(LOCAL,619,624)
		ENDIF
		SIF 기색 > 1
			BREAK
	NEXT
	IF 기색 == 1
		SETCOLOR 255, 100, 200
	ELSEIF 기색 == 2
		SETCOLOR 255, 100, 0
	ELSEIF 기색 == 3
		SETCOLOR 0, 120, 180
	ENDIF
ENDIF
CALL GETMAP_YOGORE(ARG)


code:
@MAP_MEIKAI_1(AA)
#DIMS REF AA, 0

AA:00 = 林林林林林林林林林林林林林　林林林林林林林林林林林林林林　　_/_/ ~_/　∫∫林林　林林林林林林林林林林林林林
AA:01 = 林林林林林林林林林林林林林林林林林林林林林林林林林林林　　_/_/ ~_/　林∫∫林林林林林林林林林林林林林林林林
AA:02 = 林林林　林林林林林林林　　林林林林林林林林林林林林林　　_/_/ ~_/　　林∫∫林林林　　　　　　　　　林林林林
AA:03 = 林林林林林林林　林林林林林林林林林林林林林林林林林林　_/_/ ~_/　　林林∫∫林林林　■■■■■■■　林林林林
AA:04 = 林林林林林林林林林林林林林林林林林　林林林林林林林　_/_/ ~_/　　林林林∫∫林林　　■　백옥루　■　林　林林
AA:05 = 林林　　　　　　　　　　　　林林林林林林林林林林　_/_/ ~_/　　林林林林∫∫林　　　■　　　　　■　林林林林
AA:06 = 林林林　■■■■■■■■　林林林林林　　　林林林_/_/ ~_/　　林■■■■∫∫　　　　■　09　　　■　林林林林
AA:07 = 林林林　■　마요히가　■　　林林林林林　　　　_/_/　_/　　■■■　　■∫∫　　　　■■─■■■■　林林林林
AA:08 = 林林林　■　　　　　　■　　林林林林林　　　_/_/ ~_/　　　■　　06　■──　　　　　　　　　　■　林林　林
AA:09 = 林林林　■　　　　　　■　　林林林林　　　_/_/~ _/　　　　■　　　　｜　　　　　08　　　　　　■　林林林林
AA:10 = 林林林　■■■─■■■■　　　林林　　　_/_/ ~_/　　　　　■■■■─■──■■●　●■■■■■■　林林林林
AA:11 = 林林　　　　　03　　　　　　　　　　　　_/ ~_/_/　　　　　　　■　　■∫∫　　│三│　　　　　　　林　林林
AA:12 = 林　　　　　　　　　　　　　　　　　　_/_/~ _/　　　　　　　　■피안■∫∫　　　　　　　　　　　林林林林林
AA:13 = 林林林林　　　　　　　　　　　　　　　_/ ~_/_/　　　　　　　■■──■∫∫　　　　　　　　　　林林林林林林
AA:14 = 林林　　　　　　　　　　　02　　　　_/_/~ _/　　　　07　　　　　　　■──　　　　　　　　林林林林林林林林
AA:15 = 　　　　　　　　　　　　　　　　　　_/ ~_/_/　　　　　　　　　　　　　││　　　　　　　　林林林林林林　林
AA:16 = ←01　　　　　　　　　　　　　　　_/_/~ _/　　　　　　　　　■■■■■──　　　　　林林林林林林林林林林林
AA:17 = 　　　　林林林林■─■∫　　　　　_/　_/_/　　　　　　　　　　　　　　∫∫　　　　林林林林　林林林林林林林
AA:18 = 林林林林林林林林■04■∫　　　　_/ ~_/_/　　　│三│　林林林林林林林林∫∫林林林林林林林林林林林林林林林林
AA:19 = 林林林林林林林林■■■∫　　　 //　 _/　　∫■■　■■　林林林林林林林∫∫林林林林林林林林林林　林林林林林
AA:20 = 林林林林林林林林　　　∫　　　/ 　~ _/　　∫■　05　■　林林　林林林林∫∫林林林林林林林林林林林林林林林林
AA:21 = 林林林林林林林林林林∫　　　　 / 　~_/　　∫■코마치■林林林林林林林林∫∫林林林林林林　林林林林林林林林林
AA:22 = 林林林林林林林林林林林林林　　 /　 /_/　　∫■■■■林林林林林林林林林∫∫林林林林林林林林林林林林林林林林
AA:23 = 林林林林林林林林林林林林林　　/ ~　/　　∫　　　　　林林林林林林林林林∫∫林林　林林林林林林林林林林林林林
AA:24 = 林林林林林林林林林林林林　　/　~　/_/ 　∫　林林林林林林林　林林林林林∫∫林林林林林林林林林林林林林林林林
AA:25 = 林林林林林林林林林林林林　_/_/　_/_/　　林林林林林林林林林林林林林林林∫∫林林林林林林林林林　林林林林林林

@MAP_MEIKAI_2(AA)
#DIMS REF AA, 0
AA:00 =
AA:01 =
AA:02 = ■■■■■■■■■■■■■■■■■■■■■
AA:03 = ■　　　　■｜　　　　　　　　　　　│　■
AA:04 = ■　목욕탕■｜부　　　　　形　形　　│　■
AA:05 = ■　　14　■｜엌　　　　┌───┐　└─■
AA:06 = ■■■■─■┘　　객실　│　　　│　　　■
AA:07 = ■탈의실　■　　　　10　└───┘　　　■
AA:08 = ■■■■─■　　　　　　　形　形　　　　■
AA:09 = ■WC│　　　　　　　　　　　　　　　┌─■
AA:10 = ■■■■─■　　■■■─■■─■■■■■■
AA:11 = ■　　　　■　　■　　　■　　　　　　　■
AA:12 = ■　란　　■　　■　첸　■　유카리┌─┐■
AA:13 = ■　12┌┐■──■　11　■　　13　│　│■
AA:14 = ■　　└┘■현관■○　　■　　　　└─┘■
AA:15 = ■■■■■■──■■■■■■■■■■■■■
AA:16 =
AA:17 = 　　━　　　　　03
AA:18 = 　┃井┃
AA:19 = 　　━
AA:20 = 　　　　01　　　　　　　　02
AA:21 = 　　←중유의 길　　　　　삼도천→

@MAP_MEIKAI_3(AA)
#DIMS REF AA, 0
AA:00 = 　　　　　　　　　　　　　　　　　　■■■■■■■■■
AA:01 = 　　　　　　　　　　　　　　　　　　■　　　｜　　WC■
AA:02 = 　　　　　　　　　　　　■■■■■■■　　　■■■■■
AA:03 = 　　　　　　　　　　　　■　에이키｜　　　　｜　17　■
AA:04 = 　　　　　　　　　　　　■　  　　■　　　　■목욕탕■
AA:05 = 　　　　　　　　　　　　■　　15　■　거실　■■■■■
AA:06 = 　　　　　　　　　　　　■■■■■■　　　　■　　　■
AA:07 = 　　　　　　　　　　　　■부｜　　｜　16　　■　　　■
AA:08 = 　　　　　　　　　　　　■엌｜　　｜　　　　｜　　　■
AA:09 = 　　　　　　　　　　　　■■■　　｜　　　■■■―■■　　08
AA:10 = 　　　　　　　　　　　　■井｜　　｜　　　■　　　　｜→백옥루 정원へ
AA:11 = 　　　　　　　　　　　　■■■■―■■■■■―■■■■
AA:12 = 　　　　　　　　　　　　　　　――■　　　　　　　　■
AA:13 = 　　　　　　　　　　　　　　　――■　　　　　　　　■
AA:14 = 　　　　　　　　　　　　　　　　　■　　　　　　　　■
AA:15 = 　　　피안　　　　　　　　　　　　■　　└―┘　　　■
AA:16 = 　　　　07　　　　　　　　　　　　■　　　06　　　　■
AA:17 = 　　　　　　　　　　　　　　　　　■――――――――■
AA:18 = 　　　　　　　　　　　　　　　■■■――――――――■
AA:19 = 　　　　　　　　　　　　　　　　　　　　　　　　　■　　　　↑
AA:20 = 　　　　　　　　　　　　┌――――――――――――――→백옥루 정원へ
AA:21 = 　　　　　　　　　　　　｜
AA:22 = 　　　　　　　　　　━　｜
AA:23 = 　　　　　　　　　┃井┃｜
AA:24 = 　　　　　　　　　　━　｜
AA:25 = 　　　■■■■―■■■　｜
AA:26 = 　　　■헛간｜　　　■　｜　　　　　省略
AA:27 = 　　　■■■■　05　■　｜
AA:28 = 　　　■　　｜　　　■　｜
AA:29 = 　　　■18　■■■―■　｜
AA:30 = 　　　■침실　■WC　■　｜
AA:31 = 　　　■■■■■■■■　｜

@MAP_MEIKAI_4(AA)
#DIMS REF AA, 0
AA:00 = 　■■■■■■■■■■■■■■■■■
AA:01 = 　■弁｜22　24｜雷■유우코■요우무■
AA:02 = 　■■■　　　■■■  　　■　　　■
AA:03 = 　■八｜23　　　　■　20　■　19　■
AA:04 = 　■■■　　　　　■　　　■　　　■
AA:05 = 　■　　　　　　　■■■─■─■■■
AA:06 = 　■　　　09　　　│　　　　　　　│
AA:07 = 　■＝＝＝＝＝＝＝■■■　　■■■■
AA:08 = 　■　　　　　　　■헛간　　　│WC■
AA:09 = 　■＝＝＝＝＝■■■■■─■■■■■
AA:10 = 　■　　　　　│WC■탈의실│목욕탕■←21
AA:11 = 　■■■■─　■■■■■■■■■■■
AA:12 = 　　　　　　　　　　薪薪薪　　━
AA:13 = 　　　　　　　　　　　　　　┃井┃
AA:14 = 　　　　　　　　　　　　　　　━
AA:15 = 　　　　정원↓08

@ODEKAKEMAP_6(AA)
#DIMS REF AA, 0

AA:00 = 林林林林林林林■03■∫／／／／／／／／／∫∫[피안]■■∫∫[명계]　■　09　　　■
AA:01 = ρρρρρρρ■─■∫／／／／／／／／／∫∫　　　■■∫∫　心、　■■─■■■■
AA:02 = 　　　　　　　　　　∫／／／／／／／／／∫∫　　　■■∫∫´仆　　　　　　　　■
AA:03 = 　　01　　　　　02　∫／／／／／／／／／∫∫　07　│　∫∫　　　08　　　　　　■
AA:04 = ρρρρρρρ　　　∫／／／／／／／／／∫∫　　　■■∫∫■■●　●■■■■■■
AA:05 = 林林林林林林□04　　∫／／／／／／／／／∫∫　　　■■∫∫　　│三│

@DRAW_MAP_BG_6(SLICED)
#DIMS SLICED
SELECTCASE SLICED
;色つけたいときはこんな感じ
CASE "木","林"
	SETCOLOR 0x90EE90
	PRINTS SLICED
	RESETCOLOR
;違う文字を表示させる例
CASE "#W"
	SETCOLOR 0x90EE90
	PRINT 木
	RESETCOLOR
CASE "#E"
	SIF TALENT:MASTER:위치짐작 && COUNTCHARA:(MAXROOM) > 0 && FLAG:짐작모드 == 1
		SETCOLOR 255,100,200
	PRINT ↓
	RESETCOLOR
;ふつうの
CASEELSE
	PRINTS SLICED
ENDSELECT


code:
;--------------------------------------------------
;	マップ内이동処理拡張パッチ付属
;	명련사MAP用関数
;--------------------------------------------------

@MAP_PLACENAME_6(ARG)
#FUNCTIONS
#DIM PLACEID

IF GET_MAPID(ARG) == MAIN_MAP
	SELECTCASE ARG
		CASE 601 TO (MAXROOM - 1)
			RETURNF STR:(ARG + 8000)
		CASE 698
			RETURNF OMANEKI_PLACE()
		CASE 699
			RETURNF "스키마"
		CASE MAXROOM
			RETURNF "길 건너편"
		CASEELSE
			RETURNF "불명"
	ENDSELECT
ELSE
	RETURNF "불명"
ENDIF

@MAP_VIEWING_6(AA)
#DIMS REF AA, 0
IF !TFLAG:맵변환
	SELECTCASE CFLAG:MASTER:현재위치
		CASE 603, 610 TO 614
			TFLAG:맵변환 = 2
		CASE 605 TO 607, 615 TO 618
			TFLAG:맵변환 = 3
		CASE 608, 609, 619 TO 624
			TFLAG:맵변환 = 4
		CASEELSE
			TFLAG:맵변환 = 1
	ENDSELECT
ENDIF
CALL DRAW_INFORMATIONLINE(@"%MAPNAME:(TFLAG:맵변환)%")
PRINTFORML
TRYCALLFORM MAP_MEIKAI_{TFLAG:맵변환}(AA)

@MAP_CAN_MOVE_6(ARG, ARG:1)
#FUNCTION
RETURNF 1

@MAP_CANNOT_WORD_6(ARG)
SELECTCASE TFLAG:이동불능메시지
ENDSELECT


code:
;地点関連性응답処理
;-----------------------------------------------------------
@CAN_MOVE_6(ARG, ARG:1)
#FUNCTION
SELECTCASE ARG
	;중유의 길
	;3마요히가、4掘立오두막に이동可能、2삼도천と直通、중유의 길の向こうが見える
	CASE 601
		SIF GROUPMATCH(ARG:1,602)
			RETURNF 3
		SIF GROUPMATCH(ARG:1,603,604)
			RETURNF 1
		SIF ARG:1 == MAXROOM
			RETURNF 2
	;삼도천
	;3마요히가、4掘立오두막、7피안に이동可能、1중유의 길と直通
	CASE 602
		SIF GROUPMATCH(ARG:1,601)
			RETURNF 3
		SIF GROUPMATCH(ARG:1,603,604,607)
			RETURNF 1
	;마요히가
	;1중유의 길、2삼도천、객실に이동可能
	CASE 603
		SIF GROUPMATCH(ARG:1,601,602)
			RETURNF 3
		SIF GROUPMATCH(ARG:1,610)
			RETURNF 1
	;掘立오두막
	;1중유의 길、2삼도천に이동可能
	CASE 604
		SIF GROUPMATCH(ARG:1,601,602)
			RETURNF 1
	;死神の오두막
	;7피안、18寝床に이동可能
	CASE 605
		SIF GROUPMATCH(ARG:1,607,618)
			RETURNF 1
	;閻魔の屋敷
	;7피안、8백옥루 정원、16거실に이동可能
	CASE 606
		SIF GROUPMATCH(ARG:1,607,608)
			RETURNF 3
		SIF GROUPMATCH(ARG:1,616)
			RETURNF 1
	;피안
	;2삼도천、5死神の오두막、6閻魔の屋敷、8백옥루 정원、16거실に이동可能
	CASE 607
		SIF GROUPMATCH(ARG:1,602,605,606,608)
			RETURNF 3
		SIF GROUPMATCH(ARG:1,616)
			RETURNF 1
	;백옥루 정원
	;6閻魔の屋敷、7피안、9백옥루、16거실に이동可能
	CASE 608
		SIF GROUPMATCH(ARG:1,606,607,609)
			RETURNF 3
		SIF GROUPMATCH(ARG:1,616)
			RETURNF 1
	;백옥루
	;19妖夢の部屋、20幽々子の部屋、21목욕탕に이동可能、8백옥루 정원と直通
	CASE 609
		SIF GROUPMATCH(ARG:1,608)
			RETURNF 3
		SIF GROUPMATCH(ARG:1,619,620,621,622,623,624)
			RETURNF 1
	;객실
	;3마요히가、11橙の部屋、12藍の部屋、13紫の部屋、14목욕탕に이동可能
	CASE 610
		SIF GROUPMATCH(ARG:1,603,611,612,613,614)
			RETURNF 1
	;마요히가・各部屋
	;10객실に이동可能
	CASE 611 TO 614
		SIF ARG:1 == 610
			RETURNF 1
	;閻魔の屋敷・各部屋
	;16거실に이동可能
	CASE 615, 617
		SIF ARG:1 == 616
			RETURNF 1
	;閻魔の屋敷・거실
	;6、7피안、8백옥루 정원、15映姫の寝室、17목욕탕に이동可能
	CASE 616
		SIF GROUPMATCH(ARG:1,606,607,608)
			RETURNF 3
		SIF GROUPMATCH(ARG:1,615,617)
			RETURNF 1
	;死神の寝床
	;5死神の오두막と直通
	CASE 618
		SIF ARG:1 == 605
			RETURNF 1
	;各部屋
	;9백옥루に이동可能
	CASE 619, 620, 621,622,623,624
		SIF ARG:1 == 609
			RETURNF 1
	;森の外
	;1入り口へ一方通行
	CASE MAXROOM
		SIF ARG:1 == 601
			RETURNF 1
ENDSELECT
RETURNF 0


code:
@KICKOUT_6()
#FUNCTION
;목욕탕の位置と손前の部屋
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
	CASE 14
		RETURNF 610
	CASE 17
		RETURNF 616
	CASE 21
		RETURNF 609
ENDSELECT
;RETURNF 101

@BATHCHECK_6(ARG)
#FUNCTION
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
ENDSELECT
RETURNF 0

@BATHROOM_6(ARG)
#FUNCTION
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
ENDSELECT
RETURNF 0

@MAP_UNIQUEMESSAGE_6
SELECTCASE CFLAG:MASTER:현재위치
	CASE 606
		CALL DRAW_INFORMATIONLINE("Info",1)
		PRINTFORML 엄숙한 분위기다……
	CASE 611
		CALL DRAW_INFORMATIONLINE("Info",1)
		PRINTFORML 여기저기 긁힌 자국이 있다……
		PRINTFORML 약간의 짐승 냄새가 난다……
	CASE 612
		CALL DRAW_INFORMATIONLINE("Info",1)
		PRINTFORML 긴 머리카락이 곳곳에 떨어져 있다……
		PRINTFORML ……꼬리털인가？
	CASE 615
		CALL DRAW_INFORMATIONLINE("Info",1)
		PRINTFORML 은은한 꽃과 선향 냄새가 난다……
	CASE 618
		CALL DRAW_INFORMATIONLINE("Info",1)
		PRINTFORML 무언가 불온한 기운이 감돈다……
ENDSELECT

RETURN 1
;-----------------------------------------
;非自宅時に差し替える場所IDを返す関数
;ARG,対象ID
;RETURNF,差し替え済み対象ID
;-----------------------------------------

@MAP_SEARCH_REPLACEMENT_6(ARG)
#FUNCTION
SELECTCASE ARG
;삼도천
	CASE 602
		RETURNF 620
;마요히가
	CASE 603,610 TO 614
		RETURNF 630
;오두막
	CASE 604
		RETURNF 640
;피안
	CASE 605 TO 607,615 TO 618
		RETURNF 670
;백옥루 정원
	CASE 608
		RETURNF 680
;백옥루
	CASE 609,619 TO 624
		RETURNF 690
;중유의 길
	CASEELSE
		RETURNF 610
ENDSELECT
RETURNF 0

@MAP6_AREANAME(PLACE_ID)
#FUNCTIONS
#LOCALSIZE 1
#LOCALSSIZE 1
#DIM PLACE_ID
IF MAIN_MAP == 6
	SIF INRANGE(PLACE_ID, 610, 614)
		RETURNF "마요히가"
	SIF INRANGE(PLACE_ID, 615, 618)
		RETURNF "피안"
	SIF INRANGE(PLACE_ID, 619, 624)
		RETURNF "백옥루"
	SIF PLACE_ID == 602
		RETURNF "삼도천"
	SIF PLACE_ID == 604
		RETURNF "오두막"
	SIF PLACE_ID == 608
		RETURNF "백옥루 정원"
	RETURNF "명계"
ELSE
	SELECTCASE PLACE_ID
	CASE 630
		RETURNF "마요히가"
	CASE 640
		RETURNF "오두막"
	CASE 670
		RETURNF "피안"
	CASE 680
		RETURNF "백옥루 정원"
	CASE 690
		RETURNF "백옥루"
	CASEELSE
		RETURNF "명계"
	ENDSELECT
ENDIF


code:
@ROOMSETTING_6
VARSET ROOMDATA
FOR LOCAL,1,100
	SIF GROUPMATCH(LOCAL,4,11,12,13,16,18,19,20,22,23,24)
		ROOMDATA:LOCAL |= 장소_이불
	SIF GROUPMATCH(LOCAL,4,5,6,9)
		ROOMDATA:LOCAL |= 장소_옥내
	SIF INRANGE(LOCAL,10,14) || INRANGE(LOCAL,15,18) || INRANGE(LOCAL,19,24)
		ROOMDATA:LOCAL |= 장소_옥내
	SIF GROUPMATCH(LOCAL,14,17,21)
		ROOMDATA:LOCAL |= 장소_목욕탕
	SIF GROUPMATCH(LOCAL,4,10,16)
		ROOMDATA:LOCAL |= 장소_주방
	SIF GROUPMATCH(LOCAL,2,7,8)
		ROOMDATA:LOCAL |= 장소_훈련
	SIF GROUPMATCH(LOCAL,4, 10, 16)
		ROOMDATA:LOCAL |= 장소_공부
	SIF GROUPMATCH(LOCAL,4,10,11,12,13,16)
		ROOMDATA:LOCAL |= 장소_휴식
	;SIF GROUPMATCH(LOCAL,36)
	;	ROOMDATA:LOCAL |= 장소_화장실
	SIF GROUPMATCH(LOCAL,1,2,3,7,8)
		ROOMDATA:LOCAL |= 장소_창공
	SIF GROUPMATCH(LOCAL,1,2,3,7,8)
		ROOMDATA:LOCAL |= 장소_달구경
	SIF GROUPMATCH(LOCAL,6)
		ROOMDATA:LOCAL |= 장소_하늘의소리
	SIF GROUPMATCH(LOCAL,8)
		ROOMDATA:LOCAL |= 장소_채소밭
	SIF GROUPMATCH(LOCAL,3,5,8,16)
		ROOMDATA:LOCAL |= 장소_물긷기
	SIF GROUPMATCH(LOCAL,1,2,7,8)
		ROOMDATA:LOCAL |= 장소_전망
	SIF GROUPMATCH(LOCAL,4)
		ROOMDATA:LOCAL |= 장소_좁다
	SIF GROUPMATCH(LOCAL,4,11,12,13,15,18,19,20,22,23,24)
		ROOMDATA:LOCAL |= 장소_선잠_가능
	SIF GROUPMATCH(LOCAL,1,2,7)
		ROOMDATA:LOCAL |= 장소_머물지않는다
	SIF GROUPMATCH(LOCAL,14,17,21)
		ROOMDATA:LOCAL |= 장소_신체측정
	SIF GROUPMATCH(LOCAL,4)
		ROOMDATA:LOCAL |= 장소_원룸
	SIF GROUPMATCH(LOCAL,6,22,23,24)
		ROOMDATA:LOCAL |= 장소_과소
	SIF GROUPMATCH(LOCAL,4,11,12,13,14,15,17,18,19,20,21,22,23,24)
		ROOMDATA:LOCAL |= 장소_Private
NEXT

MAXROOM = 625
ENTRANCE = 601
피난처 = 608

SIF GET_MAPID(거점_술벌레) != MAIN_MAP
	거점_술벌레 = 610
MAP_PAGES = 4
MAPNAME:1 = 명계
MAPNAME:2 = 마요히가
MAPNAME:3 = 피안
MAPNAME:4 = 백옥루

@DEFAULT_OWNER_6
Default초기위치 = 604
거점_주인 = 26


code:
@SKIP_MOVE_6(ARG,ARG:1)

;현재위치取得
LOCAL = CFLAG:MASTER:현재위치
SIF ARG:1
	LOCAL = ARG:1

;暫定目的地に直接이동できる場合
IF CAN_MOVE(LOCAL, ARG) & 1
	;そこに이동
	RETURN ARG
ENDIF

;袋小路から行ける場所は固定なので、そこを目손가락す
SELECTCASE LOCAL
CASE 611 TO 614
	RETURN 610
CASE 615,617
	RETURN 616
CASE 618
	RETURN 605
CASE 619 TO 624
	RETURN 609
ENDSELECT

SIF INRANGE(LOCAL,611, 614) && !INRANGE(ARG,610, 614)
	RETURN 603

;直接이동できない場合、1つ近い位置を暫定目的地に設定し直してループ
;地点追加時要フォロー（全ケース修正すること）
SELECTCASE ARG
	CASE 601
		;중유의 길に直接いけないなら삼도천を目손가락す
		RETURN 602
	CASE 602
		SELECTCASE LOCAL
			CASE 610 TO 614
				RETURN 603
			CASE 619 TO 621
				RETURN 608
			CASEELSE
				RETURN 607
		ENDSELECT
	CASE 603
		IF INRANGE(LOCAL,611,614)
			RETURN 610
		ELSEIF INRANGE(LOCAL,610,614)
			RETURN 602
		ELSE
			RETURN 601
		ENDIF
	CASE 604
		SELECTCASE LOCAL
			CASE 605,606,609,615 TO 624
				RETURN 607
			CASEELSE
				RETURN 602
		ENDSELECT
	CASE 605
		RETURN 607
	CASE 606
		RETURN 607
	CASE 607
		SELECTCASE LOCAL
			CASE 601 TO 604, 610 TO 614
				RETURN 602
			CASEELSE
				RETURN 608
		ENDSELECT
	CASE 608
		SELECTCASE LOCAL
			CASE 611 TO 614
				RETURN 610
			CASE 605,606,615 TO 618
				RETURN 607
			CASE 619 TO 624
				RETURN 609
			CASEELSE
				RETURN 602
		ENDSELECT
	CASE 609
		SELECTCASE LOCAL
			CASE 601 TO 605, 610 TO 614
				RETURN 607
			CASEELSE
				RETURN 608
		ENDSELECT
	CASE 610
		RETURN 603
	CASE 611 TO 614
		RETURN 610
	CASE 615,617
		SELECTCASE LOCAL
			CASE 610 TO 614
				RETURN 606
			CASEELSE
				RETURN 616
		ENDSELECT
	CASE 616
		SELECTCASE LOCAL
			CASE 610 TO 614,608,609
				RETURN 607
			CASEELSE
				RETURN 606
		ENDSELECT
	CASE 618
		SELECTCASE LOCAL
			CASE 610 TO 614
				RETURN 607
			CASEELSE
				RETURN 605
		ENDSELECT
	CASE 619 TO 624
		SELECTCASE LOCAL
			CASE 610 TO 614
				RETURN 607
			CASE 615 TO 618
				RETURN 608
			CASEELSE
				RETURN 609
		ENDSELECT
ENDSELECT


code:
@GETMAP_7(ARG)
#DIM 기색
기색 = 0
IF TALENT:MASTER:위치짐작 && FLAG:짐작모드 == 1
	SIF ROOMDATA:(ARG % 100) & 장소_모브
		SETCOLOR C_D_PINK
	FOR LOCAL, 1, CHARANUM
		IF CFLAG:LOCAL:현재위치 == ARG
			IF CFLAG:LOCAL:행동 == 5
				기색 = 2
				BREAK
			ELSEIF CFLAG:LOCAL:수면
				기색 = 3
				BREAK
			ENDIF
			기색 = 1
		ENDIF
		IF ARG == 716 && !GROUPMATCH(CFLAG:MASTER:현재위치, 715,716,717,718,719)
			IF GROUPMATCH(CFLAG:LOCAL:현재위치, 716,717,718,719)
				IF CFLAG:LOCAL:행동 == 5
					기색 = 2
					BREAK
				ELSEIF CFLAG:LOCAL:수면
					기색 = 3
					BREAK
				ENDIF
				기색 = 1
			ENDIF
		ELSEIF ARG == 729 && !INRANGE(CFLAG:MASTER:현재위치, 720,730)
			IF INRANGE(CFLAG:LOCAL:현재위치, 720,729)
				IF CFLAG:LOCAL:행동 == 5
					기색 = 2
					BREAK
				ELSEIF CFLAG:LOCAL:수면
					기색 = 3
					BREAK
				ENDIF
				기색 = 1
			ENDIF
		ENDIF
	NEXT
	IF 기색 == 1
		SETCOLOR 255, 100, 200
	ELSEIF 기색 == 2
		SETCOLOR 255, 100, 0
	ELSEIF 기색 == 3
		SETCOLOR 0, 120, 180
	ENDIF
ENDIF
CALL GETMAP_YOGORE(ARG)


code:
@MAP_SANROKU_1(AA)
#DIMS REF AA, 0

AA:00 = 林林林林林林林林││林林林林林林林林林林林林林林林■■■林林林林林林林林林林　↑　林
AA:01 = 林林林林林林林林││林林林林林林林林林林林林林林林■─■林林林林林林林林　　　32　林
AA:02 = 林■■■■林　　││　　　林林林林林林林　　　　　　11　　　　林林林　　　林林林林林
AA:03 = 林■ 29 ■林　林 31 林林　林林林林　　　　林林林林林林林林林　　　　　林林林林林林林
AA:04 = 林■■─■林　林林林林　　林林　　　林林林林林林林林林林林林林林　林林林林林林林林林
AA:05 = 林林　　　林　林林林　　林林林　林林林林林林林林林林林36林林林林　　　　　　林林林林
AA:06 = 林林　30　　　林林林　林林　　　林林林林林　10　林林林林林林林林林林林林| 12 |林林林
AA:07 = 林林林林林林林林林林　林　　　林林林林林林　묘　林林林林林林林林林林林林■||■林_/_/
AA:08 = 林林林林林林林林　　　　　林林林林林　　　　　林林林林林林林林林林林林林■■■_/_/ ~
AA:09 = 林林林林林林　　　林林林　林林林林林　林林林林林林林林林林林林林林林林林林■_/_/~ _/
AA:10 = 林林林　　　　　林林林林　林林　　　　　　　　　林■■■■林林林林林林林林_/_/ ~_/林
AA:11 = 林林　　林林　　　　　林07　　　林林林林林林林　　│액06■林林■■■■林林_/ ~_/_/林
AA:12 = 林　　林林林林林林　　　　　林林林林林林林林林林林■■■■林林■릴09■林_/_/~ _/林林
AA:13 = 林林 08 林林林林林林林林　　　　　　林林林林林林林林林林林林林■■─■林_/ ~_/_/林林
AA:14 = 林林　γ⌒ヽ林林林林林林林林林林　　　　　林林林林林林林林林林林林　林_/_/~ _/林林林
AA:15 = 林林林ゝ__ノ林林林林林林林林林林林林林林05　　　　林林林林林林林林　林_/ ~_/_/林林林
AA:16 = 林林林林林林林林林林林■■■■ v v林林林林林林　　　　林林林林林林　_/_/~ _/林林林林
AA:17 = 林林林林林林林林林林林■ 16 ■v v 林林林林林林林林　　　　　　　　　_/　_/_/林林林林
AA:18 = 林林林林林林林林林林林■─■■ 15 林林林林林33林林林林林林林林　　　_/ ~_/林林林林林
AA:19 = 林林林林■■■林林林林林　　　　林林林林林林林林林林林林林林林　　 //　 _/林■■■■
AA:20 = 林林林林■34■林林林林林林林　林林林林林林林林林林林林林林林　 03　/　~ _/林■갓　■
AA:21 = 林林林林■─■林林林林林林林　　　林林林林林林林林林林林　　　　　 / 　~_/林■파　■
AA:22 = 林林林林林　林林林　　　林林林林　林林林林林林林林林　　　　林林　 /　 /_/林■04　■
AA:23 = 林林林　　　　　　　　　　　　　02　　　　　　　　　　　　林林　　/ ~　/∥∥∥　　■
AA:24 = 林林　01　　　　　林林林　　　　　　　林林林林林林林林林林林　35/　~　/_/ ■■■■■
AA:25 = 林林　↓　林林林林林林林林林林林林林林林林林林林林林林林林林林_/_/　_/_/林林林林林林

@MAP_SANROKU_2(AA)
#DIMS REF AA, 0
AA:00 = ■■■■■■■■■■■
AA:01 = ■┌─┐｜　　　　　//
AA:02 = ■└─┘｜　　19　　//　　　　　v v v v v v v v v v v v v v
AA:03 = ■ -17- ｜　　객실　//　　　　　v v v v v v v v v v v v v v
AA:04 = ■┌─┐｜　　　　　//　　　　　v v v v v v v v v v v v v v
AA:05 = ■└─┘｜　　　　　//　　　　　v v v v v v v v v v v v v v
AA:06 = ■ーーーーーーーーー■　　　　　v v v v v v v v v v v v v v
AA:07 = ■　　　　　　　　　■
AA:08 = ■　　　　위　　　　■　　　　　　　　　　밭15
AA:09 = ■　　　　18　　　　■
AA:10 = ■　　　　　　　　　■　　　　　v v v v v v v v v v v v v v
AA:11 = ■━┯━━━━━━━■　　　　　v v v v v v v v v v v v v v
AA:12 = ■부│　　　　　　　■　　　　　v v v v v v v v v v v v v v
AA:13 = ■엌│　　16　　　　■　　　　　v v v v v v v v v v v v v v
AA:14 = ■─┘　　봉당　　　■　　　　　v v v v v v v v v v v v v v
AA:15 = ■　　　　　　　　　■　　　　　v v v v v v v v v v v v v v
AA:16 = ■■■■■■■■ーー■
AA:17 =
AA:18 =
AA:19 = 　　　　　　　　　　산길로↓02
AA:20 =

@MAP_SANROKU_3(AA)
#DIMS REF AA, 0
AA:00 = 　　　　　　　　　　　일층　　　　　　　　　　　　　　｜　　　　　　　　　　　이층
AA:01 = 　　　　　　　　　　　　　　　　　　　　　　　　　　　｜
AA:02 = ■■■■■■■■■■■■■■■■■■■■■■■■■■　｜　■■■■■■■■■■■■■■■■■■■■■■■■■
AA:03 = ■　　　　　　　　　　　　　　■　　　　　■└┘┌■　｜　■삼층｜　　　　　　　　　　　　　　■　　　　　｝　이
AA:04 = ■　　　　　　　　　　　　　　■ 　펫　 　■부엌｜■　｜　■┴┴┴　　　　23객간　　　　　　　｜　텐구　　｝　층
AA:05 = ■　　　　　　도장　　　　　　■　　　　　■ 20 └■　｜　■　　　　　　┌────┐　　　　　｜　 25　 　｝　출
AA:06 = ■　　　 　　　22　　 　　　　■■──■■■──■■　｜　■　　　　　　｜　　　　｜　　　　　■　　　　　｝　입
AA:07 = ■　　　　　　　　　　　　　　■□　　□□□　　□■　｜　■　　　　　　└────┘　　　　　■■■■■■■　口
AA:08 = ■　　　　　　　　　　　　　　■□□　　　　　□□■　｜　■　　　　　　　　　　　　　　　　　　　　　■　∥
AA:09 = ■■■■■■■■■■■■──■■　　　　　　　　□■　｜　■　　　　┬┬┬■■■■─■　　　　　　　　■　■
AA:10 = ■　　　　■이층｜　　　　　　　 　　　29　 　　□■　｜　■　　　　｜일층■　　　　■■■■■　　　　｜　∥
AA:11 = ■　욕조　■┴┴┴　　　　　　　　┌────┐　□■　｜　■　　　　■■■■□ 서재24　 　　■　　　　｜　∥
AA:12 = ■　 21　 ■　　　　　　　　　　　｜　봉당　｜　□■　｜　■　　　　　　　■□─□□─□　　｜　　　　■　∥
AA:13 = ■　　　　■　　　　　　　　　　　｜　　　　｜　□■　｜　■■──■■■■■■■■■■■■■■■──■■　∥
AA:14 = ■■■──■　■■■■■■■■■■■■━━■■■■■　｜　■　　　　　　　　　　　 회랑 　　　　　　　　　∥
AA:15 = ■측｜　　　　■　　　　　　　　　　　　　　　　　　　｜　■＝＝＝＝＝＝＝＝■＝＝＝＝＝＝＝■＝＝＝＝＝＝■
AA:16 = ■■■■■■■■　━　　　　　　　　　　　　　　　　　｜
AA:17 = 　　　　　　　　┃井┃　　30　　　　　　　　　　　　　｜
AA:18 = 　　　　　　　　　━　　　　　　　　　　　　　　　　　│
AA:19 = 　　　　　　　　　　　　　　　　　　　　　　　　　　　│

@MAP_SANROKU_4(AA)
#DIMS REF AA, 0
AA:00 = 　　　　　　　　　　이층　　　　　　　　　　　　　　　　│　　　　　　　　　　　　　삼층
AA:01 =                                                         │
AA:02 = ■■■■■■■■■■■■■■■■■■■■■■■■■      │　■■■■■■■■■■■■■■■■■■■■■■■■■
AA:03 = ■삼층｜　　　　　　　　　　　　　　■　　　　　｝　이  │　■이층｜　　■□┌─┐　　　　■┌─┐　■　■　∥
AA:04 = ■┴┴┴　　　　　객실23　　　　　　｜　텐구　　｝　층  │　■┴┴┴　　■□└─┘　　　　■└─┘　■　｜　∥
AA:05 = ■　　　　　　┌────┐　　　　　｜　 25　　 ｝　출  │　■　　　　　■□　　카센　　　■ 　　　 ■　｜　∥
AA:06 = ■　　　　　　｜　　　　｜　　　　　■　　　　　｝　입  │　■　　　　　■□ 　　27　 　　■ 　28　 ■　■　∥
AA:07 = ■　　　　　　└────┘　　　　　■■■■■■■　口  │　■　　　　　■■─■■■■■■■■■─■■　■　∥
AA:08 = ■　　　　　　　　　　　　　　　　　　　　　■　∥      │　■　　　　　　　　　　　　　　　　　　　　　■　∥
AA:09 = ■　　　　┬┬┬■■■■─■　　　　　　　　■　■      │　■■■■　　　　　　　　　　　　　　　　　　■　■
AA:10 = ■　　　　｜일층■　　　　■■■■■　　　　｜　∥      │　■□□　　　　　26　　┌────┐　　　　　｜　∥
AA:11 = ■　　　　■■■■□ 서재24　 　　■　　　　｜　∥      │　■□□■　　　 객실 　｜　　　　｜　　　　　｜　∥
AA:12 = ■　　　　　　　■□─□□─□　　｜　　　　■　∥      │　■□□■　　　　　　　└────┘　　　　　■　∥
AA:13 = ■■──■■■■■■■■■■■■■■■──■■　∥      │　■■■■■■──■■■■■■■■■■■──■■　∥
AA:14 = ■　　　　　　　　　　　 회랑 　　　　　　　　　∥      │　■　　　　　　　　　　　 회랑 　　　　　　　　　∥
AA:15 = ■＝＝＝＝＝＝＝＝■＝＝＝＝＝＝＝■＝＝＝＝＝＝■      │　■＝＝＝＝＝＝＝＝■＝＝＝＝＝＝＝■＝＝＝＝＝＝■

@ODEKAKEMAP_7(AA)
#DIMS REF AA, 0

AA:00 = 林林林林林林林林林林林　　林林林林∫／／／∫林林林林林林林林■05■林林
AA:01 = 林林林林林　林林林　　　　　林林林林～～～林林林林林林林林林■─■林林　林■─■
AA:02 = 林林林林林　　　　　　 02 　　林林林　03　　　　　　　　　林林　林林林　林■　■
AA:03 = 林林林林林　林林林　～～～～　林林林　　　　林林林　林林　　　　　林林　林■　■
AA:04 = 　　01　　　林林林∫／／／／∫林林林　　　林林林林林林林林林　　　　　　林■06■
AA:05 = 林林林林林林林林林∫／／／／∫林林林　　林林林林林林林林林林林林林林林林林■■■

;전생에서 정사가 연모 or 연인이라면 장소만은 안다
SIF TALENT:[[세이자]]:연모 || GETBIT (CFLAG:[[세이자]]:인계, 0) || GETBIT (CFLAG:[[세이자]]:인계, 1)
	AA:04 = 　　01　　　林林林∫／／／／∫林林林　　　林林林林04林林林林　　　　　　林■06■

@DRAW_MAP_BG_7(SLICED)
#DIMS SLICED
SELECTCASE SLICED
;채색 싶을 때는 이런 느낌
CASE "나무","숲"
	SETCOLOR 0x90EE90
	PRINTS SLICED
	RESETCOLOR
;다른 문자를 표시시키는 예
CASE "#W"
	SETCOLOR 0x90EE90
	PRINT 나무
	RESETCOLOR
;보통의
CASEELSE
	PRINTS SLICED
ENDSELECT


code:
;--------------------------------------------------
;	맵내 이동 처리 확장 패치 부속
;	명련사MAP용 함수
;--------------------------------------------------
@MAP_PLACENAME_7(ARG)
#FUNCTIONS

IF GET_MAPID(ARG) == MAIN_MAP
	SELECTCASE ARG
		CASE 1 TO (MAXROOM - 1)
			RETURNF STR:(ARG + 8000)
		CASE 798
			RETURNF OMANEKI_PLACE()
		CASE 799
			RETURNF "스키마 공간"
		CASE MAXROOM
			RETURNF "도의 저 편"
		CASEELSE
			RETURNF "불명"
	ENDSELECT
ELSE
	RETURNF "불명"
ENDIF

@MAP_VIEWING_7(AA)
#DIMS REF AA, 0
IF !TFLAG:맵변환
	SELECTCASE CFLAG:MASTER:현재위치
		CASE 720 TO 725,729,730
			TFLAG:맵변환 = 3
		CASE 715 TO 719
			TFLAG:맵변환 = 2
		CASE 726,727,728
			TFLAG:맵변환 = 4
		CASEELSE
			TFLAG:맵변환 = 1
	ENDSELECT
ENDIF
CALL DRAW_INFORMATIONLINE(@"%MAPNAME:(TFLAG:맵변환)%")
PRINTFORML
TRYCALLFORM MAP_SANROKU_{TFLAG:맵변환}(AA)

@MAP_CAN_MOVE_7(ARG, ARG:1)
#FUNCTION
SELECTCASE ARG
	;카센하우스
	CASE 720 TO 730
		;본인은 제외
		SIF ARG:1 == [[카센]]
			RETURNF 1
		;안으로부터는 움직일 수 있다
		SIF INRANGE(CFLAG:(ARG:1):현재위치, 720,730)
			RETURNF 1
		;연모인가 거주해
		IF ARG:1 == MASTER && (INRANGE(CFLAG:MASTER:초기위치, 720,730) || TALENT:[[카센]]:연모)
			RETURNF 1
		;데이트상대가 텐시나 자신이 텐시
		ELSEIF FLAG:데이트상대 == [[텐시]] || ARG:1 == [[텐시]]
			RETURNF 1
		;교양이 부족하면 가까스로 도착할 수 없다
		ELSEIF ABL:(ARG:1):교양 < 3
			TFLAG:이동불능메시지 = 1
			SIF ARG:1 == MASTER
				TIME += 30
			RETURNF 0
		ELSE
			;전투력 3이상 필요
			IF ABL:(ARG:1):전투능력 < 3 && !FLAG:시간정지
				TFLAG:이동불능메시지 = 2
				;CFLAG:(ARG:1):현재위치 = 731
				SIF ARG:1 == MASTER
					TIME += 15
				RETURNF 0
			ELSE
				RETURNF 1
			ENDIF
		ENDIF
;세이자택
	CASE 733
		;당신은 연모가 있으면 들어갈 수 있어 줄 수 있다
		IF TALENT:[[세이자]]:연모 && ARG:1 == MASTER
			RETURNF 1
		;본인은 들어갈 수 있다
		ELSEIF ARG:1 == [[세이자]]
			RETURNF 1
		ELSE
			TFLAG:이동불능메시지 = ARG
			RETURNF 0
		ENDIF
	CASEELSE
		RETURNF 1
ENDSELECT

@MAP_CANNOT_WORD_7(ARG)
SELECTCASE TFLAG:이동불능메시지
	CASE 1
		PRINTFORMW 조금 전부터 저택과의 거리가 전혀 줄어들지 않는다……
		PRINTFORMW 같은 곳을 빙빙 돌아 있는 것과 같다
		;CALL TARGETSET_CHACK
	CASE 2
		PRINTFORMW 뜰에 웅크리고 있던 경시하는 범이, %CALLNAME:MASTER%의 모습을 인정해 신음소리를 내 소리를 높였다
		PRINTFORMW 가까워지지 않는 것이 좋은 것 같다
		;CALL TARGETSET_CHACK
	CASE 733
		PRINTFORMW 어디에 있을지 모른다…
ENDSELECT


code:
;지점 관련성 응답 처리
;-----------------------------------------------------------
@CAN_MOVE_7(ARG, ARG:1)
#FUNCTION
SELECTCASE ARG
;수해도 입구
CASE 701
	SIF GROUPMATCH(ARG:1, 702,734)
		RETURNF 1
	SIF ARG:1 == MAXROOM
		RETURNF 2
CASE 702
	SIF GROUPMATCH(ARG:1, 701,703,715,716)
		RETURNF 1
;현무의늪
CASE 703
	SIF GROUPMATCH(ARG:1, 702,704,705,709,735)
		RETURNF 1
CASE 704,735
	SIF ARG:1 == 703
		RETURNF 1
CASE 705
	SIF GROUPMATCH(ARG:1, 703,707)
		RETURNF 3
	SIF ARG:1 == 733
		RETURNF 1
CASE 706,708,710
	SIF ARG:1 == 707
		RETURNF 1
CASE 707
	SIF GROUPMATCH(ARG:1, 705,706,708,710,711,731)
		RETURNF 1
CASE 709
	SIF GROUPMATCH(ARG:1, 703)
		RETURNF 1
CASE 711
	SIF GROUPMATCH(ARG:1, 707,712,732,736)
		RETURNF 1
CASE 712,732
	SIF GROUPMATCH(ARG:1, 711,736)
		RETURNF 1
CASE 715
	SIF GROUPMATCH(ARG:1, 702,716)
		RETURNF 1
CASE 716
	SIF GROUPMATCH(ARG:1, 702,715,717,718,719)
		RETURNF 1
CASE 717
	SIF GROUPMATCH(ARG:1, 716,718,719)
		RETURNF 1
CASE 718
	SIF GROUPMATCH(ARG:1, 716,717,719)
		RETURNF 1
CASE 719
	SIF GROUPMATCH(ARG:1, 715,716,717,718)
		RETURNF 1
;선인의저택카센!
;부엌으로부터는 현관, 도장과 목욕탕, 2층 응접실
CASE 720
	SIF GROUPMATCH(ARG:1, 721,722,723,729)
		RETURNF 1
;목욕탕으로부터는 도장과 부엌 현관, 2층 응접실
CASE 721
	SIF GROUPMATCH(ARG:1, 720,722,723,729)
		RETURNF 1
;도장으로부터는 목욕탕과 부엌 현관, 2층 응접실
CASE 722
	SIF GROUPMATCH(ARG:1, 720,721,723,729)
		RETURNF 1
;2층 응접실로부터는 도장과 부엌, 현관, 목욕탕, 서재, 2층 출입구, 3층 거실
CASE 723
	SIF GROUPMATCH(ARG:1, 720,721,722,724,725,726,729)
		RETURNF 1
;서재
CASE 724
	SIF GROUPMATCH(ARG:1, 723,725)
		RETURNF 1
CASE 725
	SIF GROUPMATCH(ARG:1, 723,724,730)
		RETURNF 1
CASE 726
	SIF GROUPMATCH(ARG:1, 723,727,728)
		RETURNF 1
CASE 727
	SIF GROUPMATCH(ARG:1, 726,728)
		RETURNF 1
CASE 728
	SIF GROUPMATCH(ARG:1, 726,727)
		RETURNF 1
;선인의 뜰과 직통
CASE 729
	SIF ARG:1 == 730
		RETURNF 3
	SIF GROUPMATCH(ARG:1, 720,721,722,723)
		RETURNF 1
;선인의 뜰
CASE 730
	SIF GROUPMATCH(ARG:1, 729,731)
		RETURNF 1
;목
CASE 731
	SIF ARG:1 == 730
		RETURNF 1
	SIF ARG:1 == 707
		RETURNF 1
CASE 733
	SIF ARG:1 == 705
		RETURNF 1
CASE 734
	SIF ARG:1 == 701
		RETURNF 1
CASE 736
	SIF ARG:1 == 711
		RETURNF 1
CASE MAXROOM
	SIF ARG:1 == 701
		RETURNF 1
ENDSELECT

RETURNF 0


code:
@KICKOUT_7()
#FUNCTION
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
	CASE 35
		RETURNF 703
	CASE 21
		RETURNF 729
ENDSELECT

@BATHCHECK_7(ARG)
#FUNCTION
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
ENDSELECT
RETURNF 0

@MAP_UNIQUEMESSAGE_7
CALL DRAW_INFORMATIONLINE("Info", 1)
SELECTCASE CFLAG:MASTER:현재위치
	CASE 703
		IF DAY:2 == 2 && TALENT:MASTER:형상 == 4 && GROUPMATCH(TIME:2, 5,6,7)
			PRINTFORML 고간의 빛에 매료된 반디들이 %CALLNAME:MASTER%의 주위를 난무하고 있다
			PRINTFORML 환상적인 광경이다……
		ENDIF
ENDSELECT

;-----------------------------------------
;비자택시에 갈아넣는 장소 ID를 돌려주는 함수
;ARG, 대상ID
;RETURNF, 갈아넣고가 끝난 대상ID
;-----------------------------------------

@MAP_SEARCH_REPLACEMENT_7(ARG)
#FUNCTION
SELECTCASE ARG
	CASE 703,704,735
	;현무의늪
		RETURNF 720
	CASE 708
	;큰두꺼비의연못
		RETURNF 730
	CASE 733
	;세이자은신처앞
		RETURNF 740
	CASE 720 TO 730
	;선인의저택
		RETURNF 750
	CASE 712
	;간헐천지하센터
		RETURNF 760
	CASEELSE
	;산록의수해
		RETURNF 710
ENDSELECT
RETURNF 0

@MAP7_AREANAME(PLACE_ID)
#FUNCTIONS
#LOCALSIZE 1
#LOCALSSIZE 1
#DIM PLACE_ID
IF MAIN_MAP == 7
	SIF INRANGE(PLACE_ID, 715, 719)
		RETURNF "아키 자매의 집"
	SIF INRANGE(PLACE_ID, 720, 730)
		RETURNF "선인의저택"
	RETURNF "요괴의 산의 산록"
ELSE
	SELECTCASE PLACE_ID
	CASE 740
		RETURNF "세이자은신처앞"
	CASE 750
		RETURNF "선인의저택"
	CASEELSE
		RETURNF "요괴의 산의 산록"
	ENDSELECT
ENDIF


code:
@ROOMSETTING_7
VARSET ROOMDATA
FOR LOCAL, 1,100
	SIF GROUPMATCH(LOCAL, 4,6,9,17,27,28,33,34,36)
		ROOMDATA:LOCAL |= 장소_이불
	SIF GROUPMATCH(LOCAL, 4,6,9,11,12,16,17,18,19,20,21,22,23,24,25,26,27,28,29,33,34,36)
		ROOMDATA:LOCAL |= 장소_옥내
	SIF GROUPMATCH(LOCAL, 21,35)
		ROOMDATA:LOCAL |= 장소_목욕탕
	SIF GROUPMATCH(LOCAL, 4,6,9,16,20,33,34,36)
		ROOMDATA:LOCAL |= 장소_주방
	SIF GROUPMATCH(LOCAL, 3,22,30)
		ROOMDATA:LOCAL |= 장소_훈련
	SIF GROUPMATCH(LOCAL, 4,6,9,18,24,27,28,33,34,36)
		ROOMDATA:LOCAL |= 장소_공부
	SIF GROUPMATCH(LOCAL, 4,6,9,11,17,27,28,33,34,36)
		ROOMDATA:LOCAL |= 장소_휴식
	SIF GROUPMATCH(LOCAL, 1,2,3,5,7,8,10,11,13,15,30,31,32,35)
		ROOMDATA:LOCAL |= 장소_창공
	SIF GROUPMATCH(LOCAL, 1,2,3,5,7,8,10,11,13,15,30,31,32,35)
		ROOMDATA:LOCAL |= 장소_달구경
;	SIF GROUPMATCH(LOCAL, 7)
;		ROOMDATA:LOCAL |= 장소_하늘의소리
	SIF GROUPMATCH(LOCAL, 15,30)
		ROOMDATA:LOCAL |= 장소_채소밭
	SIF GROUPMATCH(LOCAL, 3,8,30,35)
		ROOMDATA:LOCAL |= 장소_물긷기
;	SIF GROUPMATCH(LOCAL, 1,2,3,4,5,6,7,20)
;		ROOMDATA:LOCAL |= 장소_전망
;	SIF GROUPMATCH(LOCAL, 21)
;		ROOMDATA:LOCAL |= 장소_좁다
	SIF GROUPMATCH(LOCAL, 4,6,9,17,27,28,33,34,36)
		ROOMDATA:LOCAL |= 장소_선잠_가능
	SIF GROUPMATCH(LOCAL, 21)
		ROOMDATA:LOCAL |= 장소_신체측정
	SIF GROUPMATCH(LOCAL, 1,2,5,7,29)
		ROOMDATA:LOCAL |= 장소_머물지않는다
	SIF GROUPMATCH(LOCAL, 6,36)
		ROOMDATA:LOCAL |= 장소_원룸
	SIF GROUPMATCH(LOCAL, 8,12,25)
		ROOMDATA:LOCAL |= 장소_과소
	SIF GROUPMATCH(LOCAL, 4,6,9,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,33,34,36)
		ROOMDATA:LOCAL |= 장소_Private
NEXT
;좁으면 전망은 게으름 피웠다

MAXROOM = 737
ENTRANCE = 701
피난처 = 712
;Default초기위치 = 734
거점_주인 = 43
SIF GET_MAPID(거점_술벌레) != MAIN_MAP
	거점_술벌레 = 734
MAP_PAGES = 4
MAPNAME:1 = 요괴의 산·산록
MAPNAME:2 = 아키 자매의 집
MAPNAME:3 = 선인의저택　1-2F
MAPNAME:4 = 선인의저택　2-3F

@DEFAULT_OWNER_7
Default초기위치 = 734
거점_주인 = 43


code:
@SKIP_MOVE_7(ARG, ARG:1)
;LOCAL 일람
;0	현재위치

;현재위치 취득
LOCAL = CFLAG:MASTER:현재위치
SIF ARG:1
	LOCAL = ARG:1
;잠정 목적지에 직접 이동할 수 있는 경우
IF CAN_MOVE(LOCAL, ARG) & 1
	;거기에 이동
	RETURN ARG
ENDIF

;막다른 골목으로부터 갈 수 있는 장소는 고정이므로, 거기를 목표로 한다
SELECTCASE ARG
	;캇파의 아지트, 릴리 하우스, 수영장은 현무의늪만
	CASE 704,709,735
		RETURN 703
	;히나 하우스, 고양이의 마을, 큰두꺼비의연못은 수해 중부만
	CASE 706,708,710
		RETURN 707
	CASE 712,732
		RETURN 711
	CASE 733
		RETURN 705
	;하늘 오두막
	CASE 734
		RETURN 701
	CASE 736
		RETURN 711
	CASE 720 TO 729
		SIF !GROUPMATCH(LOCAL:0, 720,721,722,723,724,725,726,727,728,729,730)
			RETURN 730
ENDSELECT

;직접 이동할 수 없는 경우,  1개가까운 위치를 잠정 목적지로 다시 설정해 루프
;지점 추가시 요점 보충(전케이스 수정하는 것)
SELECTCASE ARG
	CASE 701
		RETURN 702
	CASE 702
		IF GROUPMATCH(LOCAL:0, 717,718,719)
			RETURN 716
		ELSEIF LOCAL:0 == 734
			RETURN 701
		ELSE
			RETURN 703
		ENDIF
	;현무의늪
	CASE 703
		IF GROUPMATCH(LOCAL:0, 701,715,716,717,718,719,734,735)
			RETURN 702
		ELSE
			RETURN 705
		ENDIF
	CASE 704
		RETURN 703
	;산 중턱
	CASE 705
		IF GROUPMATCH(LOCAL:0, 701,702,704,709,715,716,717,718,719,734,735)
			RETURN 703
		ELSE
			RETURN 707
		ENDIF
	;분기
	CASE 707
		SELECTCASE LOCAL:0
			CASE 720 TO 730
				RETURN 731
			CASE 712,732,736
				RETURN 711
			CASEELSE
				RETURN 705
		ENDSELECT
	CASE 709
		RETURN 703
	CASE 706,708,710,711
		RETURN 707
	CASE 712
		RETURN 711
	;가을 하우스
	CASE 715
		IF GROUPMATCH(LOCAL:0, 717,718, )
			RETURN 719
		ELSE
			RETURN 702
		ENDIF
	CASE 716
		RETURN 702
	CASE 717 TO 719
		RETURN 716
	;카센하우스1층
	CASE 720 TO 722
		;저택 위의 층이라면 응접실
		IF GROUPMATCH(LOCAL:0, 724,725,726,727,728)
			RETURN 723
		;(이)가 아니면 현관
		ELSE
			RETURN 729
		ENDIF
	CASE 723
		;저택 위의 층이라면 거실
		IF GROUPMATCH(LOCAL:0, 727,728)
			RETURN 726
		;(이)가 아니면 현관
		ELSE
			RETURN 729
		ENDIF
	CASE 724,725,726
		;응접실
		RETURN 723
	CASE 727,728
		RETURN 726
	CASE 729
		;저택 위의 층이라면 거실
		IF GROUPMATCH(LOCAL:0, 724,725,726,727,728)
			RETURN 723
		;(이)가 아니면 선인의 뜰
		ELSE
			RETURN 730
		ENDIF
	;선인의 뜰
	CASE 730
	;zurasita
		;저택이라면 현관
		IF GROUPMATCH(LOCAL:0, 720,721,722,723,724,725,726,727,728)
			RETURN 729
		;(이)가 아니면 대싸리
		ELSE
			RETURN 731
		ENDIF
	;대싸리
	CASE 731
		;저택이라면 뜰
		IF GROUPMATCH(LOCAL:0, 720,721,722,723,724,725,726,727,728,729)
			RETURN 730
			;zurasita
		ELSE
			RETURN 707
		ENDIF
	CASE 732
		RETURN 711
	CASE 733
		RETURN 705
	CASE 734
		RETURN 702
	CASE 735
		RETURN 703
	CASE 736
		RETURN 711
ENDSELECT


code:
@GETMAP_8(ARG)
KEHAI = 0
IF TALENT:MASTER:위치짐작 && FLAG:짐작모드 == 1
	SIF ROOMDATA:(ARG % 100) & 장소_모브
		SETCOLOR C_D_PINK
	FOR LOCAL, 1, CHARANUM
		IF CFLAG:LOCAL:현재위치 == ARG
			IF CFLAG:LOCAL:행동 == 5
				KEHAI = 2
			ELSEIF CFLAG:LOCAL:수면
				KEHAI = 3
			ENDIF
			SIF KEHAI > 1
				BREAK
			KEHAI = 1
		ENDIF
		IF ARG == 830
			CALL GETMAP_BUILDING(LOCAL, 830,842)
		ELSEIF ARG == 811
			CALL GETMAP_BUILDING(LOCAL, 811,826)
		ENDIF
		SIF KEHAI > 1
			BREAK
	NEXT
	IF KEHAI == 1
		SETCOLOR 255, 100, 200
	ELSEIF KEHAI == 2
		SETCOLOR 255, 100, 0
	ELSEIF KEHAI == 3
		SETCOLOR 0, 120, 180
	ENDIF
ENDIF
CALL GETMAP_YOGORE(ARG)


code:
@MAP_SUMMIT_1(AA)
#DIMS REF AA, 0
AA:00 =
AA:01 = 　　　　　　　　　　　　　　　　　　　　　30　지천계
AA:02 = 　　　　　　　　　　　　　　　　　　　　　↑　　　　　　　　　　_모리야신사_
AA:03 = 　　　　　　　　　　　　　　　　　　　　　05　산 정　　　　　　　정상11
AA:04 = 　　　　　　　　　　　　　岩岩岩ｒγ～～丘丘丘
AA:05 = 　　　　　　　　　　　木岩岩#P#P#P#P#P丘丘丘丘丘丘　　　　　　　　#I#H#I
AA:06 = 　　　　　　　　　　岩岩岩#N#O#O#O#O岩岩丘丘丘丘丘丘丘　　　　　　#K#H#K
AA:07 = 　　　　　　　　　巌岩岩岩#F#S#S#F#M岩岩岩岩岩岩岩岩岩岩岩　　　　#J　#J
AA:08 = 　　　　　　　　　巌岩岩岩#G#L #S#Fi岩岩岩岩岩岩岩岩岩岩岩岩岩岩　　↑　　木
AA:09 = 　　　　　　木木木巌岩岩岩#F#G06 l#M岩岩岩岩岩■■■岩　　　　　　　04　岩木木
AA:10 = 　　　木木木木木木木岩岩岩#G#L #S#Fi岩岩岩岩岩■10｜　　岩岩岩岩岩岩岩巌巌木木木
AA:11 = 木木木木木木木木木木木岩岩#F#S#S#F#M岩岩木木木■■■　　　　　　　岩巌巌巌岩木木
AA:12 = 木木木木木木木木木木木木岩#G#L #S#Fi岩木木木木木巌巌巌岩木木木木　　　　　木木木
AA:13 = 木木木木木■모■木木木木岩シ#R#R#Rシ木木■아■木巌巌巌木木木木岩巌巌巌岩　　　木
AA:14 = 木木木木木■07■木木木岩岩./#Q^ #Q^/木木■08■木木木木木木岩岩岩　　　　　03　木
AA:15 = 木木木木木■─■木木木岩./~/. #Q./木木木■─■木木木木　　　　　　木木木干┳干木
AA:16 = 木木木木木　　　　《┯┯┯┯┯┯┯┯》　　　　　　　　　　木木木木木木木木┃木木
AA:17 = 木木木木　　01　　　/ / / / 02/ / / 　　　　　　　木木木木木木木木木木木木┃木木
AA:18 = 木木木　　　　　《┯┯┯┯┯┯┯┯》　　　　■─■木木木木木木木木木木木干╋干木
AA:19 = 木木　　　　　木木木#N#N~ #N木木木木木木木木■09■木木木木木木木木木木木木┃木木
AA:20 = 木　기슭　木木木木#N#N~ #N巌木木木木木木木木■하■木木木木木木木木木木木木┃木木
AA:21 = 木　#E　木木木木#N#N~ #N巌巌木木木木木木木木木木木木木木木木木木木木木木木┃木木

@MAP_SUMMIT_2(AA)
#DIMS REF AA, 0
AA:00 =
AA:01 = 　　　　　　　　　　　　　　　　■─────────■■■─■■■■
AA:02 = 　　　　　　　　　　　　　　　　│　　　마 루16　　　│21봉당│ 23■
AA:03 = 　　　　　　　　　　　　　　　　│　■───■───■───■　　■
AA:04 = 　　　　　　　　　　　　#A　　　│16│　17　│　18　│　　　■빈방■
AA:05 = 　　　　　　　　　　　　#B　15　│　│카나코│스와코│　22　■■■■
AA:06 = ～～～-、 　　　　　　　#C　　　│　■───■───■ 부엌 │24측■
AA:07 = 　 *　　 `ヾ　　　　　　#D　　　│　│　19　│　20　│　　　■■■■
AA:08 = 　　　+ 　  ﾞ、 　　　　　　　　│　│ 거실 │ 사나 │　　　■　　■
AA:09 = 　　　　　　　`ヾ 　　　　　　　│　■───■───■　　　│ 25 ■
AA:10 = 　　～～　　　　 ﾞ、　　　　　　│　　　26복도　　　│　　　■욕실■
AA:11 = 　　　　　　* 　　 `ヾ　　　　　■■■───■■■■■■■─■■■■
AA:12 = 　　　　　　　　　　  ﾞ、 　　　■　　　　　　　■
AA:13 = 　　　　+ 　　　　　　　`ヾ 　　■■　　12　　■■
AA:14 = 　　　　　～～　　　　　　∫　　　■三三三三三■
AA:15 = 　　　　　　　　　 +　　　ヾ　　　●■三三三■●
AA:16 = 　　　　　　　　　　　　　ﾉ 　　　　 i　　　i 　　　　■■
AA:17 = 　　　　　　　　　　　　_ﾉ　14　　　 i　11　i 　　　13│■
AA:18 = 　　　　　　　　　　　ﾉ 　　　　　　 i　　　i 　　　　■■
AA:19 = 　　　　　　　　　　_ﾉ　　　　　　　■　04　■

@MAP_SUMMIT_3(AA)
#DIMS REF AA, 0
AA:00 =
AA:01 = 　　　　　　　　　　　林林林林林林林林林林林林林林林林林林
AA:02 = 　　　　　　林林林林林林林林林林林林林林林林林林林林林林林林林林林林
AA:03 = 　　　林林林林林林林林林林林林林林林林林林林林林林林林林林林林林林林林林林
AA:04 = 　　林林林林　■■■■■　林林　　　　　　　　　　林　　　桃桃桃桃　林林林林
AA:05 = 　林林林林林　■텐　시■　林林　街街街街街街街街　林　　　　　　　　林林林林林
AA:06 = 　林林林林林　■■─■■31　　　　　　　32　　　　　　33　桃桃桃桃　林林林林林
AA:07 = 　""林林林林　　　　　　　林林　街街街街　街街街　林　　　　　　　　林林林林""
AA:08 = 　　""─林林林林林林林林林林林　　　　　　　　　　林　　　桃桃桃桃　林林─""
AA:09 = 　　　　　""─＿＿林林林林林林林林林林林　林林林林林林林林林林＿＿─""／
AA:10 = 　　　　　　＼　　　""──＿＿林林林林　　　林林林林＿＿──""　　　／
AA:11 = 　　　　　　　ヽ　入　〈　　l"ヽ""──＿　＿＿──""　　ﾘ　ﾉ　ﾉ　／"
AA:12 = 　　　　　　　　ソ　ヽ　∧　ヽ　＼　　|.**　／　　 ﾉ　　ヽ입〈　ﾉ"
AA:13 = 　　　　　　　　　　　ヽ　＼　〉　〉　ヽ"*::*　　　〉.／""ヽ＼ノ
AA:14 = 　　　　　　　　　　　　　　〈　　ヽ　,ハ'*::::'*.∧√　　　ソ
AA:15 = 　　　　　　　　　　　　　　　ヽ　　＼ﾉ　｜"*::::::*
AA:16 = 　　　　　　　　　　　　　　　　∨＼　|　ﾉ　'*::30::'*
AA:17 = 　　　　　　　　　　　　　　　　　　＼ﾉ∨l／　*::::::::*
AA:18 = 　　　　　　　　　　　　　　　　　　　ヽ|ﾉ　　'*::::::::::'*
AA:19 = 　　　　　　　　　　　　　　　　　　　　""　　　*:::::↓:::::*
AA:20 = 　　　　　　　　　　　　　　　　　　　　　　　　'*::산정 05 ::::'*

@MAP_SUMMIT_4(AA)
#DIMS REF AA, 0
AA:00 = 　　　　　　　　　　　일층　　　　　　　　　　　　　　｜　　　　　　　　　　　이층
AA:01 = 　　　　　　　　　　　　　　　　　　　　　　　　　　　｜
AA:02 = ■■■■■■■■■■■■■■■■■■■■■■■■■■　｜　■■■■■■■■■■■■■■■■■■■■■■■■■
AA:03 = ■□□□□■　　　　　　　　　　　　　■　　　　　■　｜　■　　　　　　　■　　　　■　　　　　■　　　　■
AA:04 = ■□　　□■　　　　┌────┐　　　■　37욕실　■　｜　■　　┌─┐　　■　　　　■　　　　　■　　　　■
AA:05 = ■　　　　｜　　　　｜　　　　｜　　　■　　　　　■　｜　■　　｜　｜　　■　　　　■　　　　　■　　　　■
AA:06 = ■ 36주방 ｜　　　　└────┘　　　■■■─■■■　｜　■　　｜　｜　　｜ 39안방 ｜　40텐시　■ 41이쿠 ■
AA:07 = ■　　　　■　　　　　35응접실　　　　■　　　　┌■　｜　■　　└─┘　　｜　　　　｜　　　　　■　　　　■
AA:08 = ■□　　□■　　　　　　　　　　　　　■　　　　└■　｜　■　　38거실　　■　　　　■　　　　　■　　　　■
AA:09 = ■■──■■■■■■■■──■■■■■■──■■■■　｜　■　　　　　　　■　　　　■　　　　　■　　　　■
AA:10 = ■　　　　　　　　　　　 34 　　　　　　　　　　　■　｜　■　　　　　　　■■──■■■■─■■■■─■■■
AA:11 = ■　　　　　　　　　┌────┐　　　　　　■──■　｜　■　　　　　　　　　　　　　　　　　　　　　■42■
AA:12 = ■┬┬┬　　　　　　｜　봉당　｜　　　　　　■ 　 ■　｜　■┬┬┬　　　　　　　　　　　　　　　　　　■헛■
AA:13 = ■이층｜　　　　　　｜　　　　｜　　　　　　■　　■　｜　■일층｜　　　　　　　　　　　　　　　　　　｜간■
AA:14 = ■■■■■■■■■■■■━━■■■■■■■■■■■■　｜　■■■■■■■■■■■■■■■■■■■■■■■■■
AA:15 = 　　　　　　　　　　　　　　　　　　　　　　　　　　　｜
AA:16 = 　　　　　　　　　　　　　　　　　　　　　　　　　　　｜
AA:17 = 　　　　　　　　　　　　 31 　　　유정천거리에→ 32 　　｜

@ODEKAKEMAP_8(AA)
#DIMS REF AA, 0

AA:00 = 　∫／／／／∫　　林／／／／／／／／林■　　　■05　∫∫　　　∫∫[천계]
AA:01 = 　∫／ 01 ／∫　　林／／／／／／／／林■　　　■─■∫∫　　　∫∫＿～～　～～
AA:02 = 林∫／／／／∫林　林林～～～～～～林林■　04　　　　∫∫　　　∫∫／
AA:03 = 林∫／／／／∫林　林林林　 03 　林林林■●　●■■■∫∫　　　∫∫　　＿09＿　◇
AA:04 = 林∫／／／／∫林　　　　　　　　　　　　　　　　　　∫∫　　　∫∫　 ＼　　／
AA:05 = 林川川川川川川林　02　　林林林林林林林林林林林林林林∫∫　　　∫∫～～ ＼／ ～～

SIF CFLAG:MASTER:현재위치 == 천계 && (ABL:MASTER:교양 > 1 || ABL:(FLAG:데이트상대):교양 > 1)
	AA:03 = 林∫／／／／∫林　林林林　 03 　林林林■●　●■■■∫∫　　　∫∫　　＿09＿　67

@DRAW_MAP_BG_8(SLICED)
#DIMS SLICED
SELECTCASE SLICED
;채색 싶을 때는 이런 느낌
CASE "나무","숲"
	SETCOLOR 0x90EE90
	PRINTS SLICED
	RESETCOLOR
CASE "복숭아"
	SETCOLOR C_PINK
	PRINTS SLICED
	RESETCOLOR
CASE "~","γ","シ"
	SETCOLOR C_AQUA
	PRINTS SLICED
	RESETCOLOR
;다른 문자를 표시시키는 예
CASE "#W"
	SETCOLOR 0x90EE90
	PRINT 나무
	RESETCOLOR
CASE "#A"
	IF HATAKE_NAME:0 != ""
		SETCOLOR C_P_GREEN
		PRINT VV
		RESETCOLOR
	ELSE
		PRINT
	ENDIF
CASE "#B"
	IF HATAKE_NAME:1 != ""
		SETCOLOR C_P_GREEN
		PRINT VV
		RESETCOLOR
	ELSE
		PRINT
	ENDIF
CASE "#C"
	IF HATAKE_NAME:2 != ""
		SETCOLOR C_P_GREEN
		PRINT VV
		RESETCOLOR
	ELSE
		PRINT
	ENDIF
CASE "#D"
	IF HATAKE_NAME:3 != ""
		SETCOLOR C_P_GREEN
		PRINT VV
		RESETCOLOR
	ELSE
		PRINT
	ENDIF
CASE "#E"
	SIF TALENT:MASTER:위치짐작 && COUNTCHARA:(MAXROOM) > 0 && FLAG:짐작모드 == 1
		SETCOLOR 255,100,200
	PRINT ↓
	RESETCOLOR
CASE "#F"
	SETCOLOR C_AQUA
	PRINT il
	RESETCOLOR
CASE "#G"
	SETCOLOR C_AQUA
	PRINT ij
	RESETCOLOR
CASE "#L"
	SETCOLOR C_AQUA
	PRINT li
	RESETCOLOR
CASE "#M"
	SETCOLOR C_AQUA
	PRINT ji
	RESETCOLOR
CASE "#N"
	SETCOLOR C_AQUA
	PRINT _/
	RESETCOLOR
CASE "#O"
	SETCOLOR C_AQUA
	PRINT v/
	RESETCOLOR
CASE "#P"
	SETCOLOR C_AQUA
	PRINT _r
	RESETCOLOR
CASE "#Q"
	SETCOLOR C_AQUA
	PRINT */
	RESETCOLOR
CASE "#R"
	SETCOLOR C_AQUA
	PRINT ｻﾞ
	RESETCOLOR
CASE "#S"
	SETCOLOR C_AQUA
	PRINT i
	RESETCOLOR
;토리이 용
;┳━┳
;╋━╋
;┃  ┃
CASE "#H"
	SETCOLOR C_RED
	PRINT ━
	RESETCOLOR
CASE "#I"
	SETCOLOR C_RED
	PRINT ┳
	RESETCOLOR
CASE "#J"
	SETCOLOR C_RED
	PRINT ┃
	RESETCOLOR
CASE "#K"
	SETCOLOR C_RED
	PRINT ╋
	RESETCOLOR
;보통의
CASEELSE
	PRINTS SLICED
ENDSELECT


code:
;--------------------------------------------------
;	맵내 이동 처리 확장 패치 부속
;	명련사MAP용 함수
;--------------------------------------------------
@MAP_PLACENAME_8(ARG)
#FUNCTIONS

IF GET_MAPID(ARG) == MAIN_MAP
	SELECTCASE ARG
		CASE 1 TO (MAXROOM - 1)
			RETURNF STR:(ARG + 8000)
		CASE 898
			RETURNF OMANEKI_PLACE()
		CASE 899
			RETURNF "스키마 공간"
		CASE MAXROOM
			RETURNF "도의 저 편"
		CASEELSE
			RETURNF "불명"
	ENDSELECT
ELSE
	RETURNF "불명"
ENDIF

@MAP_VIEWING_8(AA)
#DIMS REF AA, 0
IF !TFLAG:맵변환
	SELECTCASE CFLAG:MASTER:현재위치
		CASE 830, 832, 833
			TFLAG:맵변환 = 3
		CASE 811 TO 826
			TFLAG:맵변환 = 2
		CASE 831, 834 TO 842
			TFLAG:맵변환 = 4
		CASEELSE
			TFLAG:맵변환 = 1
	ENDSELECT
ENDIF
CALL DRAW_INFORMATIONLINE(@"%MAPNAME:(TFLAG:맵변환)%")
PRINTFORML
TRYCALLFORM MAP_SUMMIT_{TFLAG:맵변환}(AA)

@MAP_CAN_MOVE_8(ARG, ARG:1)
#FUNCTION
RETURNF 1

@MAP_CANNOT_WORD_8(ARG)
SELECTCASE TFLAG:이동불능메시지
ENDSELECT


code:
;-----------------------------------------------------------
;지점 관련성 응답 처리
;-----------------------------------------------------------
@CAN_MOVE_8(ARG, ARG:1)
#FUNCTION
SELECTCASE ARG
;입구
CASE 801
	SIF GROUPMATCH(ARG:1, 802,807)
		RETURNF 1
	SIF ARG:1 == MAXROOM
		RETURNF 2
CASE 802
	SIF GROUPMATCH(ARG:1, 806,807,808,809)
		RETURNF 1
	SIF GROUPMATCH(ARG:1, 801,803)
		RETURNF 3
CASE 803
	SIF GROUPMATCH(ARG:1, 802,804)
		RETURNF 3
	SIF GROUPMATCH(ARG:1, 808,809,810)
		RETURNF 1
CASE 804
	SIF GROUPMATCH(ARG:1, 805,811)
		RETURNF 3
	SIF GROUPMATCH(ARG:1, 803,810)
		RETURNF 1
CASE 805
	SIF GROUPMATCH(ARG:1, 804)
		RETURNF 3
	SIF GROUPMATCH(ARG:1, 801,802,803)
		RETURNF 2
	SIF GROUPMATCH(ARG:1, 830)
		RETURNF 1
CASE 806
	SIF ARG:1 == 802
		RETURNF 1
CASE 807
	SIF GROUPMATCH(ARG:1, 801,802)
		RETURNF 3
CASE 808,809
	SIF GROUPMATCH(ARG:1, 802,803)
		RETURNF 3
CASE 810
	SIF GROUPMATCH(ARG:1, 803,804)
		RETURNF 3
CASE 811
	SIF GROUPMATCH(ARG:1, 804,812,813,814)
		RETURNF 3
	SIF ARG:1 == 822
		RETURNF 1
CASE 812
	SIF ARG:1 == 811
		RETURNF 3
	SIF ARG:1 == 826
		RETURNF 1
CASE 813
	SIF ARG:1 == 811
		RETURNF 3
CASE 814
	SIF ARG:1 == 811
		RETURNF 3
	SIF ARG:1 == 815
		RETURNF 3
CASE 815
	SIF ARG:1 == 814
		RETURNF 3
	SIF ARG:1 == 816
		RETURNF 3
	SIF ARG:1 == 821
		RETURNF 1
CASE 816
	SIF GROUPMATCH(ARG:1, 817,818,819,821)
		RETURNF 1
	SIF GROUPMATCH(ARG:1, 815,826)
		RETURNF 3
CASE 817
	SIF GROUPMATCH(ARG:1, 816,818,819)
		RETURNF 1
CASE 818
	SIF GROUPMATCH(ARG:1, 816,817,820,822)
		RETURNF 1
CASE 819
	SIF GROUPMATCH(ARG:1, 816,817,820,826)
		RETURNF 1
CASE 820
	SIF GROUPMATCH(ARG:1, 818,819,822,826)
		RETURNF 1
CASE 821
	SIF GROUPMATCH(ARG:1, 815,816,822,823)
		RETURNF 1
CASE 822
	SIF GROUPMATCH(ARG:1, 811,818,820,821,824,825,826)
		RETURNF 1
CASE 823
	SIF ARG:1 == 821
		RETURNF 1
CASE 824
	SIF ARG:1 == 822
		RETURNF 1
CASE 825
	SIF ARG:1 == 822
		RETURNF 1
CASE 826
	SIF GROUPMATCH(ARG:1, 812,816,819,820,822)
		RETURNF 1
CASE 830
	SIF GROUPMATCH(ARG:1, 805,832)
		RETURNF 3
CASE 831
	SIF ARG:1 == 832
		RETURNF 3
	SIF ARG:1 == 834
		RETURNF 1
CASE 832
	SIF GROUPMATCH(ARG:1, 830,831,833)
		RETURNF 3
CASE 833
	SIF ARG:1 == 832
		RETURNF 1
CASE 834
	SIF GROUPMATCH(ARG:1, 831,835,836,837,838)
		RETURNF 1
CASE 835
	SIF GROUPMATCH(ARG:1, 834,836)
		RETURNF 1
CASE 836
	SIF GROUPMATCH(ARG:1, 834,835,838)
		RETURNF 1
CASE 837
	SIF GROUPMATCH(ARG:1, 834)
		RETURNF 1
CASE 838
	SIF GROUPMATCH(ARG:1, 834,836,839,840,841,842)
		RETURNF 1
CASE 839
	SIF GROUPMATCH(ARG:1, 838,840)
		RETURNF 1
CASE 840
	SIF GROUPMATCH(ARG:1, 838,839)
		RETURNF 1
CASE 841
	SIF GROUPMATCH(ARG:1, 838)
		RETURNF 1
CASE 842
	SIF GROUPMATCH(ARG:1, 838)
		RETURNF 1
CASE MAXROOM
	SIF ARG:1 == 801
		RETURNF 1
ENDSELECT

RETURNF 0


code:
@KICKOUT_8()
#FUNCTION
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
	CASE 25
		RETURNF 822
	CASE 37
		RETURNF 834
ENDSELECT

@MAP_UNIQUEMESSAGE_8
CALL DRAW_INFORMATIONLINE("Info", 1)
IF WITH_MOB()
	RETURN 1
ELSE
	SELECTCASE CFLAG:MASTER:현재위치
		CASE 803
			IF INRANGE(TIME, 540, 1020)
				PRINTFORML 보기에도 의욕의 없을 것 같은 캇파가 색도의 접수를 하고 있다
			ELSE
				PRINTFORML 삭도역은 닫히고 있다
			ENDIF
	ENDSELECT
ENDIF
RETURN 1
;-----------------------------------------
;비자택시에 갈아넣는 장소 ID를 돌려주는 함수
;ARG, 대상ID
;RETURNF, 갈아넣고가 끝난 대상ID
;-----------------------------------------

@MAP_SEARCH_REPLACEMENT_8(ARG)
#FUNCTION
SELECTCASE ARG
	CASE 805,830 TO 850
	;천계
		RETURNF 890
	CASE 801,802,803,806 TO 809
	;롱
		RETURNF 810
	CASE 805
	;구
		RETURNF 820
	CASE 814
	;호
		RETURNF 830
	CASE 804,811,813,815
	;경내
		RETURNF 840
	CASEELSE
	;본전
		RETURNF 850
ENDSELECT
RETURNF 0

@MAP8_AREANAME(PLACE_ID)
#FUNCTIONS
#LOCALSIZE 1
#LOCALSSIZE 1
#DIM PLACE_ID
IF MAIN_MAP == 8
	SIF PLACE_ID == 804 || INRANGE(PLACE_ID, 811, 826)
		RETURNF "모리야신사"
	SIF PLACE_ID == 805 || INRANGE(PLACE_ID, 830, 842)
		RETURNF "천계"
	;SIF INRANGE(PLACE_ID, 801, 810)
	RETURNF "요괴의 산의 산정"
ELSE
	SELECTCASE PLACE_ID
	CASE 890
		RETURNF "천계"
	;산의호수는 모리야신사의 부지내에 포함있습니다
	CASE 830, 840, 850
		RETURNF "모리야신사"
	CASEELSE
		RETURNF "요괴의 산의 산정"
	ENDSELECT
ENDIF


code:
@ROOMSETTING_8
VARSET ROOMDATA
FOR LOCAL, 1,100
	SIF GROUPMATCH(LOCAL, 7,8,9,10,17,18,20,23,39,40,41)
		ROOMDATA:LOCAL |= 장소_이불
	SIF GROUPMATCH(LOCAL, 3,6,7,8,9,10,13,16,17,18,19,20,21,22,23,24,25,26,34,35,36,37,38,39,40,41,842)
		ROOMDATA:LOCAL |= 장소_옥내
	SIF GROUPMATCH(LOCAL, 25,37)
		ROOMDATA:LOCAL |= 장소_목욕탕
	SIF GROUPMATCH(LOCAL, 7,8,9,10,22,36)
		ROOMDATA:LOCAL |= 장소_주방
	SIF GROUPMATCH(LOCAL, 14,15,30)
		ROOMDATA:LOCAL |= 장소_훈련
	SIF GROUPMATCH(LOCAL, 7,8,9,10,17,18,19,20,23,38,39,40,41)
		ROOMDATA:LOCAL |= 장소_공부
	SIF GROUPMATCH(LOCAL, 3,7,8,9,10,16,17,18,19,20,23,35,38,39,40,41)
		ROOMDATA:LOCAL |= 장소_휴식

	SIF GROUPMATCH(LOCAL, 1,2,4,5,11,12,14,15,30,31,32,33)
		ROOMDATA:LOCAL |= 장소_창공
	SIF GROUPMATCH(LOCAL, 1,2,4,5,11,12,14,15,16,30,31,32,33)
		ROOMDATA:LOCAL |= 장소_달구경
	SIF GROUPMATCH(LOCAL, 12)
		ROOMDATA:LOCAL |= 장소_하늘의소리
	SIF GROUPMATCH(LOCAL, 15)
		ROOMDATA:LOCAL |= 장소_채소밭
	SIF GROUPMATCH(LOCAL, 6,14)
		ROOMDATA:LOCAL |= 장소_물긷기
;	SIF GROUPMATCH(LOCAL, 1,2,5,11,14,15,30)
;		ROOMDATA:LOCAL |= 장소_전망
;	SIF GROUPMATCH(LOCAL, 6,24,42)
;		ROOMDATA:LOCAL |= 장소_좁다
	SIF GROUPMATCH(LOCAL, 7,8,9,10,17,18,19,20,23,38,39,40,41)
		ROOMDATA:LOCAL |= 장소_선잠_가능
	SIF GROUPMATCH(LOCAL, 25,37)
		ROOMDATA:LOCAL |= 장소_신체측정
	SIF GROUPMATCH(LOCAL, 1,2,30,42)
		ROOMDATA:LOCAL |= 장소_머물지않는다
	SIF GROUPMATCH(LOCAL, 7,8,9)
		ROOMDATA:LOCAL |= 장소_원룸
	SIF GROUPMATCH(LOCAL, 6,42)
		ROOMDATA:LOCAL |= 장소_과소
	SIF GROUPMATCH(LOCAL, 7,8,9,10,17,18,20,40,41)
		ROOMDATA:LOCAL |= 장소_Private
	SIF GROUPMATCH(LOCAL, 32)
		ROOMDATA:LOCAL |= 장소_공공장소
NEXT
;좁으면 전망은 게으름 피웠다

MAXROOM = 843
ENTRANCE = 801
피난처 = 824

거점_주인 = 32
SIF GET_MAPID(거점_술벌레) != MAIN_MAP
	거점_술벌레 = 822
MAP_PAGES = 4
MAPNAME:1 = 요괴의 산·산정
MAPNAME:2 = 모리야신사
MAPNAME:3 = 천계
MAPNAME:4 = 히나나위가

@DEFAULT_OWNER_8
Default초기위치 = 810
거점_주인 = 32


code:
@SKIP_MOVE_8(ARG, ARG:1)
;LOCAL 일람
;0	현재위치

;현재위치 취득
LOCAL = CFLAG:MASTER:현재위치
SIF ARG:1
	LOCAL = ARG:1
;잠정 목적지에 직접 이동할 수 있는 경우
IF CAN_MOVE(LOCAL, ARG) & 1
	;거기에 이동
	RETURN ARG
ENDIF

;막다른 골목으로부터 갈 수 있는 장소는 고정이므로, 거기를 목표로 한다
SELECTCASE LOCAL
	CASE 806
		RETURN 802
	CASE 813
		RETURN 811
	CASE 824,825
		RETURN 822
	CASE 823
		RETURN 821
	CASE 833
		RETURN 832
	CASE 837
		RETURN 834
	CASE 841,842
		RETURN 838
ENDSELECT

;직접 이동할 수 없는 경우,  1개가까운 위치를 잠정 목적지로 다시 설정해 루프
;지점 추가시 요점 보충(전케이스 수정하는 것)
SELECTCASE ARG
	CASE 801
		RETURN 802
	CASE 802
		RETURN 803
	CASE 803
		IF GROUPMATCH(LOCAL:0, 801,806,807)
			RETURN 802
		ELSE
			RETURN 804
		ENDIF
	CASE 804
		IF INRANGE(LOCAL:0, 801,810)
			RETURN 803
		ELSEIF INRANGE(LOCAL:0, 830,842)
			RETURN 805
		ELSE
			RETURN 811
		ENDIF
	CASE 805
		IF INRANGE(LOCAL:0, 831,842)
			RETURN 830
		ELSE
			RETURN 804
		ENDIF
	CASE 806
		RETURN 802
	CASE 807
		RETURN 802
	CASE 808,809
		IF GROUPMATCH(LOCAL:0, 801,806,807)
			RETURN 802
		ELSE
			RETURN 803
		ENDIF
	CASE 810
		IF GROUPMATCH(LOCAL:0, 801,802,806,807,808,809)
			RETURN 803
		ELSE
			RETURN 804
		ENDIF
	CASE 811
		IF LOCAL:0 == 815
			RETURN 814
		ELSEIF GROUPMATCH(LOCAL:0, 818,820,821)
			RETURN 822
		ELSEIF GROUPMATCH(LOCAL:0, 816,817,819,826)
			RETURN 812
		ELSE
			RETURN 804
		ENDIF
	CASE 812
		IF INRANGE(LOCAL:0, 816,822)
			RETURN 826
		ELSE
			RETURN 811
		ENDIF
	CASE 813
		RETURN 811
	CASE 814
		IF LOCAL:0 == 821
			RETURN 815
		ELSEIF INRANGE(LOCAL:0, 817,819)
			RETURN 816
		ELSE
			RETURN 811
		ENDIF
	CASE 815
		IF GROUPMATCH(LOCAL:0, 812,817,818,819,826)
			RETURN 816
		ELSEIF GROUPMATCH(LOCAL:0, 820,822)
			RETURN 821
		ELSE
			RETURN 814
		ENDIF
	CASE 816
		IF LOCAL:0 == 814
			RETURN 815
		ELSEIF LOCAL:0 == 822
			RETURN 821
		ELSE
			RETURN 826
		ENDIF
	CASE 817
		RETURN 816
	CASE 818
		IF GROUPMATCH(LOCAL:0, 812,814,815)
			RETURN 816
		ELSE
			RETURN 822
		ENDIF
	CASE 819
		IF GROUPMATCH(LOCAL:0, 814,815,818,821)
			RETURN 816
		ELSE
			RETURN 826
		ENDIF
	CASE 820
		IF GROUPMATCH(LOCAL:0, 814,815,821)
			RETURN 822
		ELSE
			RETURN 826
		ENDIF
	CASE 821
		IF GROUPMATCH(LOCAL:0, 817,819)
			RETURN 816
		ELSEIF LOCAL:0 == 814
			RETURN 815
		ELSE
			RETURN 822
		ENDIF
	CASE 822
		IF LOCAL:0 == 815
			RETURN 821
		ELSEIF GROUPMATCH(LOCAL:0, 812,817,819)
			RETURN 826
		ELSE
			RETURN 811
		ENDIF
	CASE 823
		RETURN 821
	CASE 824,825
		RETURN 822
	CASE 826
		IF GROUPMATCH(LOCAL:0, 815,817)
			RETURN 816
		ELSEIF GROUPMATCH(LOCAL:0, 818,821)
			RETURN 822
		ELSE
			RETURN 812
		ENDIF
	CASE 830
		IF INRANGE(LOCAL:0, 831,842)
			RETURN 832
		ELSE
			RETURN 805
		ENDIF
	CASE 831
		IF INRANGE(LOCAL:0, 835,842)
			RETURN 834
		ELSE
			RETURN 832
		ENDIF
	CASE 832
		IF INRANGE(LOCAL:0, 834,842)
			RETURN 831
		ELSE
			RETURN 830
		ENDIF
	CASE 833
		RETURN 832
	CASE 834
		IF INRANGE(LOCAL:0, 839,842)
			RETURN 838
		ELSE
			RETURN 831
		ENDIF
	CASE 835 TO 837
		RETURN 834
	CASE 838
		RETURN 834
	CASE 839 TO 842
		RETURN 838
ENDSELECT


code:
@GETMAP_9(ARG)
#DIM 기색
기색 = 0
IF TALENT:MASTER:위치짐작 && FLAG:짐작모드 == 1
	FOR LOCAL, 1, CHARANUM
		IF CFLAG:LOCAL:현재위치 == ARG
			IF CFLAG:LOCAL:행동 == 5
				기색 = 2
				BREAK
			ELSEIF CFLAG:LOCAL:수면
				기색 = 3
				BREAK
			ENDIF
			기색 = 1
		ENDIF
		IF ARG == 927 && !GROUPMATCH(CFLAG:MASTER:현재위치, 927,928,929,930)
			IF GROUPMATCH(CFLAG:LOCAL:현재위치, 927,928,929,930)
				IF CFLAG:LOCAL:행동 == 5
					기색 = 2
					BREAK
				ELSEIF CFLAG:LOCAL:수면
					기색 = 3
					BREAK
				ENDIF
				기색 = 1
			ENDIF
		ENDIF
	NEXT
	IF 기색 == 1
		SETCOLOR 255, 100, 200
	ELSEIF 기색 == 2
		SETCOLOR 255, 100, 0
	ELSEIF 기색 == 3
		SETCOLOR 0, 120, 180
	ELSEIF ROOMDATA:(ARG % 100) & 장소_모브
		SETCOLOR C_D_PINK
	ENDIF
ENDIF
CALL GETMAP_YOGORE(ARG)


code:
@MAP_TIREIDEN

PRINTBUTTON "1:지령전 앞 ", 901
PRINTBUTTON "2:현관 ", 902
PRINTBUTTON "3:응접실 ", 903
PRINTBUTTON "4:홀 ", 904
PRINTBUTTON "5:1층복도 ", 905
PRINTBUTTON "6:1층화장실 ", 906
;PRINTBUTTON "7:서쪽계단 ", 907
;PRINTBUTTON "8:동쪽계단 ", 908
PRINTBUTTON "9:주방 ", 909
PRINTBUTTON "10:식료고 ", 910
PRINTBUTTON "11:오쿠방 ", 911
PRINTBUTTON "12:오린방 ", 912
PRINTBUTTON "13:식당 ", 913
PRINTBUTTON "14:2층복도 ", 914
PRINTBUTTON "15:발코니 ", 915
PRINTBUTTON "16:창고 ", 916
PRINTBUTTON "17:2층 화장실 ", 917
PRINTBUTTON "18:코이시방 ", 918
PRINTBUTTON "19:사토리방 ", 919
PRINTBUTTON "20:서재 ", 920
PRINTBUTTON "21:목욕탕 ", 921
PRINTBUTTON "22:탈의실 ", 922
PRINTBUTTON "23:뒷마당 ", 923
;PRINTBUTTON "24:분수 ", 924
PRINTBUTTON "25:장미원 ", 925
PRINTBUTTON "26:안뜰 ", 926
PRINTBUTTON "27:작열지옥터 입구 ", 927
PRINTL

@MAP_OLD_HELL
PRINTL
PRINT ■
CALL GETMAP(926)
PRINTL ■
PRINTL ■■■　■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
PRINTL ■■■↑■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
PRINTL ■■■　■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
PRINT ■■■
CALL GETMAP(927)
PRINTL ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
PRINTL ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
PRINTL ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
PRINTL ■■■　■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
PRINTL ■■　　　■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
PRINTL 　　　　　　　■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
PRINTL 　　　　　　　　　　　　　■■■■■■■■■■■■■■■■■■■■■■■
PRINTL
PRINTL
PRINTL
SETCOLOR 0xff4242
PRINTL 　　　염화화염염 화염불화염염
PRINT 화염불
CALL GETMAP(928)
SETCOLOR 0xff4242
PRINTL 　화염 활활염화화화염 화염염화화화염화화화염화화화염화화화화
RESETCOLOR
PRINTL ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■　■■
PRINTL ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■　■■
PRINTL ■■■■■■■■■■■■■■　　　　　■■■■■■■■■■■■■■　■■
PRINTL ■■■■■■■■■■　　　　　　　　　　　　　■■■■■■■■■■　■■
PRINT ■■■■
CALL GETMAP(929)
PRINTL 　　　　　　　　　　　■■■　■■
SETCOLOR 0xffedab
PRINT 　　　　　　　　　　　, , , , , , , , , , , , , , , , , , , ,
RESETCOLOR
PRINTL 　　　■
SETCOLOR 0xffedab
PRINTL 　　　　　, , , , '''''''';;||||||||||||||||||'''''''', , , , , ,
PRINTL 　, , , , , , '''''''''';;;;||||||||||||||||||||||||||||''''''''''''', , , , , , ,
PRINT '''''''''
CALL GETMAP(930)
SETCOLOR 0xffedab
PRINTL  ''';;;;;|||||||||||||||||||||||||||||||||||||||''''''''''''
RESETCOLOR
PRINTL
PRINTBUTTON "26:안뜰 ", 926
PRINTBUTTON "27:작열지옥터 입구 ", 927
PRINTBUTTON "28:작열지옥터 ", 928
PRINTBUTTON "29:지저 도시 가장 깊은 곳 ", 929
PRINTBUTTON "30:지옥의 인공 태양 ", 930

@MAP_OLD_CITY

PRINTBUTTON "1:지령전 전 ", 901
PRINTBUTTON "2:지령전·현관 ", 902
PRINTBUTTON "31:큰 길 ", 931
PRINTBUTTON "32:뒷골목 ", 932
PRINTBUTTON "33:술집 ", 933
PRINTBUTTON "34:온천 ", 934
PRINTBUTTON "35:러브호텔 ", 935
PRINTBUTTON "36:유기의 집 ", 936
PRINTBUTTON "37:빈 가게 ", 937
PRINTBUTTON "38:오니의 집합소 ", 938
PRINTBUTTON "39:골목길 뒤 ", 939
PRINTBUTTON "40:파르시의 집 ", 940
PRINTBUTTON "41:야마메의 집 ", 941
PRINTBUTTON "42:키스메의 집 ", 942
PRINTBUTTON "43:황폐한 집 ", 943
PRINTBUTTON "44:대로 ", 944
PRINTBUTTON "45:강가 ", 945
PRINTBUTTON "46:다리 ", 946
;PRINTBUTTON "47:지장 ", 947
PRINTBUTTON "48:수혈의 바닥 ", 948
;PRINTBUTTON "49:지상 ", 949
PRINTL

@MAP_CHIREIDEN_1(AA)
#DIMS REF AA, 0

AA:00 = @@@@@@@@@@@@@@@@　　　　＼　　　　　／　　일층┃지령전┃이층
AA:01 = ♯♯♯♯♯♯♯♯　　　　　＼＿＿＿／　　　　　┗━━━┛
AA:02 = @@@@@ 25 @@@@@　　　　　　　　　　　　　　　　　　│
AA:03 = ♯♯♯♯♯♯　　　　　　　　　　　　23　#A#B#C#D　│
AA:04 = 　■■■■■─■■■■─■■■■■■■─■■■■　│　■■■■■■■■■■■■■■■■■■■■■■■
AA:05 = 　■┌──┘　■　　　　 13 　　　　■　■오린■　│　■　코이시　■　사토리　│　서재　■　욕실　■
AA:06 = 　■┘주방09　│　┌┐　┌┐　┌┐　■　■ 12 ■　│　■　　18　　■　　19　　■　 20 　■　 21 　■
AA:07 = 　■　　　　┌■　││　││　││　│　│　　■　│　■　　　　　■　　　　　■　　　　■　　　　■
AA:08 = 　■■─■─■■　└┘　└┘　└┘　■　■■■■　│　■■■■■─■─■■■■■■─■■■■■─■■
AA:09 = 　■ 10 ■　　│　　　　　　　　　　■　│오쿠■　│　■17WC│　　　　　　　14　　　　　　　■탈의■
AA:10 = 　■■■■　■■■■■■■■─■■■■　■ 11 ■　│　■■■■　■■■■■■─■■■■■■　■ 22 ■
AA:11 = 　│　　　　■　　　　　　　　　　　■　■　　■　│　■16헛│　■　　　　　　　　　　　■　│　　■
AA:12 = 　■■■■　■　■　　　■　　　■　■　■■■■　│　■■■■　■　■＝＝＝■＝＝＝■　■　■■■■
AA:13 = 　■　||■　■　　　　　26　　　　　■　■||　■　│　■　||| 　│　∥　　　　　　　∥　│　 |||　■
AA:14 = 　■≡┏■　■　　　　 안뜰 　　　　■　■┓≡■　│　■≡┏┓　■　∥　　　　　　　∥　■　┏┓≡■
AA:15 = 　■≡┗━　■　■　　┏≡┓　　■　■　━┛≡■　│　■≡┗┃　■　■　　　26　　　■　■　┃┛≡■
AA:16 = 　■　 |||　│　　　　┃27┃　　　　│　||| 　■　│　■　||┃　■　∥　　 안뜰 　　∥　■　┃||　■
AA:17 = 　■≡┏━　■　　　　┗━┛　　　　■　━┓≡■　│　■≡┏┃　■　∥　　　　　　　∥　■　┃┓≡■
AA:18 = 　■≡┗■　■　■　　　■　　　■　■　■┛≡■　│　■≡┗┛　■　■＝＝＝■＝＝＝■　■　┗┛≡■
AA:19 = 　■　||■　■　　　　　　　　　　　■　■||　■　│　■　||| 　│　　　　　　　　　　　│　 |||　■
AA:20 = 　■■■■　■■■■─■■■─■■■■　■■■■　│　■■■■■■　　　　　15　　　　　■■■■■■
AA:21 = 　■06WC│　　　　　　　05　　　　　　　■　　■　│　　　　　　∥　　　　　　　　　　　∥
AA:22 = 　■■■■■■■─■─■─■─■─■■─■　　■　│　　　　　　■＝＝＝■＝＝＝■＝＝＝■
AA:23 = 　■ 응접실 ■　　 현관 　　■ 큰　방 ■　│
AA:24 = 　■　 03 　│　　　◎　　　◎　　　│　 04 　■　│
AA:25 = 　■　　　　■　　　　　02　　　　　■　　　　■　│
AA:26 = 　■■■■■■■■■■───■■■■■■■■■■　│
AA:27 = 　　　　　　　　　　　　01　　　　　　　　　　　　│
AA:28 = 　　　　　　　　　　　　↓　　　　　　　　　　　　│

;旧都
@MAP_CHIREIDEN_2(AA)
#DIMS REF AA, 0
AA:00 = ■■■　┃　　┃　　■■■　■　구도변두리∫∫구도번화가■　　■　　■　■　　　■　　　■　　　∫∫지령전
AA:01 = ■■■　┃　　┃　　■　│　■■└────∫∫────┘■　　■　　■　■　　　■　　　■　　　∫∫──┘
AA:02 = ■■　　┃　　┃　　■43■　■　　　■　　∫∫■─■■■■─■■차─■　■■─식■■─■■─■■∫∫　│
AA:03 = 　　　ｉ━━━━ｉ　■■■　■■■─■■■∫∫　　　　　　　　　　　　　　　　　　　　　　　　　∫∫　│
AA:04 = #E　48　　 46 　　　　　　　　　　　　　　∫∫　　　　　　　　　　　31　　　　　　　　　　　　　∫∫　│
AA:05 = 　　　ｉ━━━━ｉ　　　　　　44　　　　　∫∫　　　　　　　　　　　　　　　　　　　　　　　　　∫∫　│
AA:06 = ■■　　┃　　┃　　■■■■■■■■■■■∫∫■■　■■주─■■■■─상■─■■　■잡─■■■■∫∫　│
AA:07 = ■■■　┃　　┃　　■　40　■　　■　　■∫∫　■　■　　　　　■　　　■　　■　■　　■　　　∫∫　◇
AA:08 = ■■■　┃　　┃　　■■─■■─■■─■■∫∫　■　■　　　　　■　　　■ 37 ■　■　　■　　　∫∫
AA:09 = ■■■　┃　　┃　　　　　　　　　　　　　∫∫■■　■　　33　　■■■■■■■■　■■■■　38　∫∫01　02→
AA:10 = ■■■　┃　　┃　　■■■■■■■■■　■∫∫　■　■　　　　　■　　　■　　■　■ 36 ■　　　∫∫
AA:11 = ■■■　┃　　┃45　■　■　　■　　■　■∫∫　■　■　　　　　■　　　■　　■　■　　■　　　∫∫　◇
AA:12 = ■■■■┃　　┃　　■─■─■■─■■　■∫∫■■　■■■─■■■■─■■─■■　■■─■─■■∫∫　│
AA:13 = ■■■■┃　　┃　　　　　　　　　　　　　∫∫　　　　　　　　　　　　　32　　　　　　　　　　　∫∫　│
AA:14 = ■■■■┃　　┃　　■■■　■■■■　■■∫∫　　　　　　　　　　　　　　　　　　　　　　　　　∫∫　│
AA:15 = ■■■■┃　　┃　　■　│　│ 42 ■　│　∫∫■■■■모　텔■■■■　■■─탕■■■■　■■■■∫∫　│
AA:16 = ■■■■┃　　┃　　■41■　■■■■　■■∫∫■　　ラ　街　ラ　　■　■　　　　　　■　■　　　∫∫　│
AA:17 = ■■■■┃　　┃　　■　■　■　　■　■　∫∫■　　│　　　│ 35 ■　■　　34　　　■39■　　　∫∫　│

;旧灼熱地獄
@MAP_CHIREIDEN_3(AA)
#DIMS REF AA, 0
AA:00 =
AA:01 = ■　　　　26■
AA:02 = ■■■　■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
AA:03 = ■■■↑■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
AA:04 = ■■■　■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
AA:05 = ■■■27■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
AA:06 = ～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～
AA:07 = ～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～～
AA:08 = ■■■　■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
AA:09 = ■■　　　■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
AA:10 = 　　　　　　　■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
AA:11 = 　　　　　　　　　　　　　■■■■■■■■■■■■■■■■■■■■■■■
AA:12 =
AA:13 =
AA:14 =
AA:15 = 　　　炎　火　火炎炎火　　　　炎火　　　　　　火炎炎
AA:16 = 火炎火　28　火炎炎炎炎火火火炎火炎炎火　火火炎火火火炎火火火炎火火　火火
AA:17 = ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■　■■
AA:18 = ■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■　■■
AA:19 = ■■■■■■■■■■■■■■　　　　　■■■■■■■■■■■■■■　■■
AA:20 = ■■■■■■■■■■　　　　　　　　　　　　　■■■■■■■■■■　■■
AA:21 = ■■■■　　　　　　　　　　　　　　29　　　　　　　　　　　■■■　■■
AA:22 = 　　　　　　　　　　　,,,,,,,,,,,,,,,,,,,,　　　　　　　　　　　　　　■
AA:23 = 　　　　　,,,,'''''''';;||||||||||||||||||'''''''',,,,,,
AA:24 = 　,,,,,,'''''''''';;;;||||||||||||||||||||||||||||''''''''''''',,,,,,,
AA:25 = ''''''''' 30 ''';;;;;|||||||||||||||||||||||||||||||||||||||''''''''''''

@ODEKAKEMAP_9(AA)
#DIMS REF AA, 0

AA:00 = 　　●●●　　　●●／／●■■■■■■■■■■■■■■■　■　■■■　■■　■■■
AA:01 = 　　　●●●　　　●〓〓●■주■　■식■　■　탕　■Ｈ■　●　■■　　　■　│
AA:02 = ●　01　●●●　　　　　●■─■　■─■　■　　　■　■　　　│　　06　　　■07
AA:03 = ●●　　　●●●　　02　　　　　　　　　　■■─■■─■　　　│　　　　　　■
AA:04 = ●●●　　　●●●　　　　　　　　03　　　　　04　　05　　●　■■　　　■　■炎炎
AA:05 = ●●●●　　　●●●〓〓●■■─■■■─■■─■─■■■　■　■■■　■■　■炎炎

@DRAW_MAP_BG_9(SLICED)
#DIMS SLICED
SELECTCASE SLICED
;채색 싶을 때는 이런 느낌
CASE "나무","대나무"
	SETCOLOR 0x90EE90
	PRINTS SLICED
	RESETCOLOR
CASE "불","불길"
	SETCOLOR 0xff4242
	PRINTS SLICED
	RESETCOLOR
;다른 문자를 표시시키는 예
CASE "#W"
	SETCOLOR 0x90EE90
	PRINT 나무
	RESETCOLOR
CASE "#A"
	IF HATAKE_NAME:0 != ""
		SETCOLOR C_P_GREEN
		PRINT VV
		RESETCOLOR
	ELSE
		PRINT
	ENDIF
CASE "#B"
	IF HATAKE_NAME:1 != ""
		SETCOLOR C_P_GREEN
		PRINT VV
		RESETCOLOR
	ELSE
		PRINT
	ENDIF
CASE "#C"
	IF HATAKE_NAME:2 != ""
		SETCOLOR C_P_GREEN
		PRINT VV
		RESETCOLOR
	ELSE
		PRINT
	ENDIF
CASE "#D"
	IF HATAKE_NAME:3 != ""
		SETCOLOR C_P_GREEN
		PRINT VV
		RESETCOLOR
	ELSE
		PRINT
	ENDIF
CASE "#E"
	SIF TALENT:MASTER:위치짐작 && COUNTCHARA:(MAXROOM) > 0 && FLAG:짐작모드 == 1
		SETCOLOR 255,100,200
	PRINT ←
	RESETCOLOR
;보통의
CASEELSE
	PRINTS SLICED
ENDSELECT


code:
;--------------------------------------------------
;	맵내 이동 처리 확장 패치 부속
;		지저 MAP용 함수
;--------------------------------------------------
@MAP_PLACENAME_9(ARG)
#FUNCTIONS
#DIM PLACEID
IF GET_MAPID(ARG) == MAIN_MAP
	SELECTCASE ARG
		CASE 901 TO (MAXROOM - 1)
			RETURNF STR:(ARG + 8000)
		CASE 998
			RETURNF OMANEKI_PLACE()
		CASE 999
			RETURNF "스키마 공간"
		CASE MAXROOM
			RETURNF "지상"
		CASEELSE
			RETURNF "불명"
	ENDSELECT
ELSE
	RETURNF "불명"
ENDIF

;@MAP_VIEWING_9
;
;SIF CHK_FOCUS(927, CFLAG:MASTER:현재위치, 930)
;	CALL MAP_OLD_HELL
;SIF CHK_FOCUS(902, CFLAG:MASTER:현재위치, 926)
;	CALL MAP_TIREIDEN
;SIF (CFLAG:MASTER:현재위치 == 901) || CHK_FOCUS(931, CFLAG:MASTER:현재위치, 948)
;	CALL MAP_OLD_CITY
;RETURN 1

@MAP_VIEWING_9(AA)
#DIMS REF AA, 0
IF !TFLAG:맵변환
	IF CHK_FOCUS(927, CFLAG:MASTER:현재위치, 930)
		TFLAG:맵변환 = 3
	ELSEIF (CFLAG:MASTER:현재위치 == 901) || CHK_FOCUS(931, CFLAG:MASTER:현재위치, 948)
		TFLAG:맵변환 = 2
	ELSE
		TFLAG:맵변환 = 1
	ENDIF
ENDIF
CALL DRAW_INFORMATIONLINE(@"%MAPNAME:(TFLAG:맵변환)%")
PRINTFORML
TRYCALLFORM MAP_CHIREIDEN_{TFLAG:맵변환}(AA)

@MAP_CAN_MOVE_9(ARG, ARG:1)
#FUNCTION
#DIM 재택
SELECTCASE ARG
	;구서계단, 동쪽 계단, 분수, 지장
	CASE 907, 908, 924, 947
		RETURNF 0
	;러브호텔, 당신 이외는 들어가지 않는다
	CASE 935
		SIF ARG:1 != MASTER
			RETURNF 0
	CASEELSE
		RETURNF 1
ENDSELECT
RETURNF 1

@MAP_CANNOT_WORD_9(ARG)
SELECTCASE TFLAG:이동불능메시지
ENDSELECT
;PRINTW 공사중
;CLEARLINE 2
;REUSELASTLINE
;RETURN


code:
;지점 관련성 응답 처리
;CALL		USER
;ARG		0:현재지점, 1:비교처 지점
;RETURN		1:이동가능/안보이는 2:이동 불가/보이는 3:이동가능/보인다
;-----------------------------------------------------------
@CAN_MOVE_9(ARG, ARG:1)
#FUNCTION
#DIM 참조처
참조처 = ARG:1 % 100
SELECTCASE ARG % 100
	;지령전 전
	;2현관, 31 큰 길에 이동 가능
	CASE 1
		SIF 참조처 == 31
			RETURNF 1
		SIF 참조처 == 2
			RETURNF 1
	;현관
	;1지령전 앞, 3 응접실, 4 넓은 방, 51층복도에 이동 가능
	CASE 2
		SIF 참조처 == 1
			RETURNF 1
		SIF 참조처 == 3
			RETURNF 1
		SIF 참조처 == 4
			RETURNF 1
		SIF 참조처 == 5
			RETURNF 1
	;응접실
	;2현관으로 이동 가능
	CASE 3
		SIF 참조처 == 2
			RETURNF 1
	;넓은 방
	;2현관, 51층복도에 이동 가능
	CASE 4
		SIF 참조처 == 2
			RETURNF 1
		SIF 참조처 == 5
			RETURNF 1
	;1층복도
	;2현관, 4 넓은 방, 61층 화장실, 9 주방, 11오쿠방, 12오린방, 13 식당, 14 2층복도, 23 뒷마당, 26 안뜰에 이동 가능
	CASE 5
		SIF 참조처 == 2
			RETURNF 1
		SIF 참조처 == 4
			RETURNF 1
		SIF 참조처 == 6
			RETURNF 1
		SIF 참조처 == 9
			RETURNF 1
		SIF 참조처 == 11
			RETURNF 1
		SIF 참조처 == 12
			RETURNF 1
		SIF 참조처 == 13
			RETURNF 1
		SIF 참조처 == 14
			RETURNF 1
		SIF 참조처 == 23
			RETURNF 1
		SIF 참조처 == 26
			RETURNF 1
	;1층 화장실
	;1층복도에 이동 가능
	CASE 6
		SIF 참조처 == 5
			RETURNF 1
;	CASE 7
;		SIF GROUPMATCH(참조처, 5,14,15)
;			RETURNF 1
;	CASE 8
;		SIF GROUPMATCH(참조처, 5,14,15)
;			RETURNF 1
	;주방
	;51층복도, 10 식료고, 13 식당, 23 뒷마당, 25 장미원에 이동 가능
	CASE 9
		SIF 참조처 == 5
			RETURNF 1
		SIF 참조처 == 10
			RETURNF 1
		SIF 참조처 == 13
			RETURNF 1
		SIF 참조처 == 23
			RETURNF 1
		SIF 참조처 == 25
			RETURNF 1
	;식료고
	;9주방에 이동 가능
	CASE 10
		SIF 참조처 == 9
			RETURNF 1
	;오쿠 방
	;51층복도에 이동 가능
	CASE 11
		SIF 참조처 == 5
			RETURNF 1
	;오린 방
	;51층복도에 이동 가능
	CASE 12
		SIF 참조처 == 5
			RETURNF 1
	;식당
	;51층복도, 9 주방, 23 뒷마당, 26 안뜰에 이동 가능
	CASE 13
		SIF 참조처 == 5
			RETURNF 1
		SIF 참조처 == 9
			RETURNF 1
		SIF 참조처 == 23
			RETURNF 1
		SIF 참조처 == 26
			RETURNF 1
	;2층복도
	;51층복도, 15 발코니,  16창고, 17 2층 화장실,  18코이시방, 19 사토리방, 20 서재, 22 탈의실에 이동 가능
	CASE 14
		SIF GROUPMATCH(참조처, 5,15,16,17,18,19,20,22)
			RETURNF 1
	;발코니,  16창고, 17 2층 화장실,  18코이시방
	;142층복도에 이동 가능
	CASE 15,16,17,18
		SIF 참조처 == 14
			RETURNF 1
	;사토리방
	;142층복도, 20 서재에 이동 가능
	CASE 19
		SIF 참조처 == 14
			RETURNF 1
		SIF 참조처 == 20
			RETURNF 1
	;서재
	;142층복도, 19 사토리방에 이동 가능
	CASE 20
		SIF GROUPMATCH(참조처, 14,19)
			RETURNF 1
	;목욕탕
	;22탈의실에 이동 가능
	CASE 21
		SIF 참조처 == 22
			RETURNF 1
	;탈의실
	;142층복도, 21 목욕탕에 이동 가능
	CASE 22
		SIF 참조처 == 14
			RETURNF 1
		SIF 참조처 == 21
			RETURNF 1
	;뒷마당
	;51층복도, 9 주방, 13 식당, 25 장미원에 이동 가능
	CASE 23
		SIF 참조처 == 5
			RETURNF 1
		SIF 참조처 == 9
			RETURNF 1
		SIF 참조처 == 13
			RETURNF 1
		SIF 참조처 == 25
			RETURNF 1
	;장미원
	;뒷마당에 이동 가능
	CASE 25
		SIF 참조처 == 23
			RETURNF 1
	;안뜰
	;51층복도, 13 식당, 27 작열지옥터 입구에 이동 가능
	CASE 26
		SIF 참조처 == 5
			RETURNF 1
		SIF 참조처 == 13
			RETURNF 1
		SIF 참조처 == 27
			RETURNF 1
	;작열지옥터 입구
	;26안뜰, 28 작열지옥터에 이동 가능
	CASE 27
		SIF 참조처 == 26
			RETURNF 1
		SIF 참조처 == 28
			RETURNF 1
	;작열지옥터
	;27작열지옥터 입구, 29 지저 도시 가장 깊은 곳에 이동 가능
	CASE 28
		SIF 참조처 == 27
			RETURNF 1
		SIF 참조처 == 29
			RETURNF 1
	;지저 도시 가장 깊은 곳
	;28작열지옥터에 이동 가능, 30 지옥의 인공 태양과 직통
	CASE 29
		SIF 참조처 == 30
			RETURNF 3
		SIF 참조처 == 28
			RETURNF 1
	;지옥의 인공 태양
	;29지저 도시 가장 깊은 곳과 직통
	CASE 30
		SIF 참조처 == 29
			RETURNF 1
	;큰 길
	;1지령전 전, 32 뒷골목, 33 술집, 37 빈 가게, 44방법에 이동 가능
	CASE 31
		SIF 참조처 == 1
			RETURNF 1
		SIF 참조처 == 32
			RETURNF 1
		SIF 참조처 == 33
			RETURNF 1
		SIF 참조처 == 37
			RETURNF 1
		SIF 참조처 == 44
			RETURNF 1
	;뒷골목
	;31큰 길, 33 술집, 34 온천, 35 숙소, 36유기의 집, 38 오니의 집합소,  39골목길 뒤에 이동 가능, 1 지령전 전에 일방통행
	CASE 32
		SIF GROUPMATCH(참조처, 1,31,33,34,35,36,38,39)
			RETURNF 1
	;술집
	;31큰 길, 32 뒷골목에 이동 가능
	CASE 33
		SIF 참조처 == 31
			RETURNF 1
		SIF 참조처 == 32
			RETURNF 1
	;온천, 숙소, 유기의 집, 오니의 집합소, 골목길 뒤
	;32뒷골목에 이동 가능
	CASE 34,35,36,38,39
		SIF 참조처 == 32
			RETURNF 1
	;빈 가게
	;31큰 길에 이동 가능
	CASE 37
		SIF 참조처 == 31
			RETURNF 1
	;파르시, 야마메, 키스메의 집
	;45강가에 이동 가능
	CASE 40,41,42
		SIF 참조처 == 45
			RETURNF 1
	;황폐한 집
	;44대로에 이동 가능
	CASE 43
		SIF 참조처 == 44
			RETURNF 1
	;대로
	;31큰 길, 43 황폐한 집, 45 강가에 이동 가능, 46 다리와 직통
	CASE 44
		SIF 참조처 == 46
			RETURNF 3
		SIF 참조처 == 31
			RETURNF 1
		SIF 참조처 == 43
			RETURNF 1
		SIF 참조처 == 45
			RETURNF 1
	;강가
	;40파르시의 집,  41야마메의 집, 42 키스메의 집, 44방법, 46 다리에 이동 가능
	CASE 45
		SIF 참조처 == 40
			RETURNF 1
		SIF 참조처 == 41
			RETURNF 1
		SIF 참조처 == 42
			RETURNF 1
		SIF 참조처 == 44
			RETURNF 1
		SIF 참조처 == 46
			RETURNF 1
	;교
	;31큰 길에 일방통행, 45 강가에 이동 가능, 44방법,  48수혈의 바닥과 직통
	CASE 46
		SIF 참조처 == 44
			RETURNF 3
		SIF 참조처 == 48
			RETURNF 3
		SIF 참조처 == 31
			RETURNF 1
		SIF 참조처 == 45
			RETURNF 1
	;수혈의 바닥
	;46다리와 직통, 49 지상이 보인다
	CASE 48
		SIF 참조처 == 46
			RETURNF 3
		SIF 참조처 == 49
			RETURNF 2
		;SIF 참조처 == 47
		;	RETURNF 1
	;지상
	;일방통행, EX캐릭터 대기용
	CASE 49
		SIF 참조처 == 48
			RETURNF 1
ENDSELECT
RETURNF 0


code:
@KICKOUT_9()
#FUNCTION
SELECTCASE CHK_INHOME(CFLAG:MASTER:현재위치)
	CASE 21
		RETURNF 922
	CASE 34
		RETURNF 932
ENDSELECT
RETURNF 0

@MAP_UNIQUEMESSAGE_9
CALL DRAW_INFORMATIONLINE("Info", 1)
IF WITH_MOB()
	CALL MOB_MESSAGE_9
	RETURN 1
ELSE
	SELECTCASE CFLAG:MASTER:현재위치
		CASE 944,946
			PRINTFORML 번화가의 소란이 들려 오는 저 너머에는 지령전이 보인다
		CASE 948
			PRINTFORML 도의 구석에서는 작은 지장이 보인다
	ENDSELECT
ENDIF
IF CHK_FOCUS(944, CFLAG:MASTER:현재위치, 948)
	SIF CFLAG:60:행동 == 5
		PRINTFORML 다리 위에서는 파르시가 통행자가 오지 않을까 지키고 있다
ENDIF
RETURN 1
@MOB_MESSAGE_9
IF CHK_FOCUS(927, CFLAG:MASTER:현재위치, 930)
	IF FLAG:70
		PRINTL 원령들이 정지하고 있다
	ELSE
		IF CFLAG:우후후
			PRINTL 원령이 지내기 불편한 것 같게 하고 있다…
		ELSEIF !RAND:2
			PRINTL 원령이 헤매고 있다
		ELSE
			PRINTL 원령이 감돌고 있다
		ENDIF
	ENDIF
ELSEIF CHK_FOCUS(931, CFLAG:MASTER:현재위치, 939)
	IF FLAG:70
		PRINTL 귀들이 정지하고 있다
	ELSEIF GROUPMATCH(TIME:2, 1,6,7)
		PRINTL 귀들이 자고 있다…
	ELSE
		SELECTCASE RAND:6
			CASE 0
				PRINTL 귀들이 술잔치 하고 있다
			CASE 1
				PRINTL 귀들이 모이고 있다
			CASE 2
				PRINTL 귀들이 싸움을 하고 있다
			CASE 3
				PRINTL 귀들이 배회하고 있다
			CASE 4
				PRINTL 귀들이 떠들고 있다
			CASE 5
				PRINTL 오니이 엎드려 눕고 있는…방해 냄새가 나다
		ENDSELECT
	ENDIF
ELSE
	IF FLAG:70
		PRINTFORML %ANIMALNAME()%가 정지하고 있다
	ELSEIF GROUPMATCH(TIME:2, 1,6,7)
		PRINTFORML %ANIMALNAME()%가 자고 있다…
	ELSEIF CFLAG:MASTER:현재위치 == 923
		IF !RAND:2
			PRINTFORML %ANIMALNAME()%가 수영을 하고 있다
		ELSE
			PRINTFORML %ANIMALNAME()%가 헤엄치고 있다
		ENDIF
	ELSE
		IF !RAND:2
			PRINTFORML %ANIMALNAME()%가 배회하고 있다
		ELSE
			PRINTFORML %ANIMALNAME()%가 엎드려 눕고 있는…방해 냄새가 나다
		ENDIF
	ENDIF
ENDIF
;-----------------------------------------
;비자택시에 갈아넣는 장소 ID를 돌려주는 함수
;ARG, 대상ID
;RETURNF, 갈아넣고가 끝난 대상ID
;-----------------------------------------

@MAP_SEARCH_REPLACEMENT_9(ARG)
#FUNCTION
SELECTCASE ARG
	CASE 948
	;환상풍혈
		RETURNF 910
	CASE 940 TO 946
	;지옥의깊은길
		RETURNF 920
	CASE 934
	;옛지옥온천
		RETURNF 940
	CASE 935
	;러브호텔
		RETURNF 950
	CASE 931 TO 939
	;옛지옥큰길
		RETURNF 930
	CASE 901 TO 926
	;지령전
		RETURNF 960
	CASE 927 TO 930
	;작열지옥터
		RETURNF 970
ENDSELECT
RETURNF 0

@MAP9_AREANAME(PLACE_ID)
#FUNCTIONS
#LOCALSIZE 1
#LOCALSSIZE 1
#DIM PLACE_ID
IF MAIN_MAP == 9
	SIF INRANGE(PLACE_ID, 901, 926)
		RETURNF "지령전"
	SIF INRANGE(PLACE_ID, 927, 930)
		RETURNF "옛지옥"
	SIF INRANGE(PLACE_ID, 931, 944)
		RETURNF "구도"
	RETURNF "지저"
ELSE
	SELECTCASE PLACE_ID
	CASE 930, 940, 950
		RETURNF "구도"
	CASE 960
		RETURNF "지령전"
	CASE 970
		RETURNF "옛지옥"
	CASEELSE
		RETURNF "지저"
	ENDSELECT
ENDIF


code:
@ROOMSETTING_9
VARSET ROOMDATA
FOR LOCAL, 1,100
	SIF GROUPMATCH(LOCAL, 11,12,18,19,25,35,36,37,40,41,42,43)
		ROOMDATA:LOCAL |= 장소_이불
	SIF GROUPMATCH(LOCAL, 2,3,4,5,6,7,8,9,10,11,12,13,14,16,17,18,19,20,21,22,28,29,30,33,34,35,36,37,38,40,41,42,43)
		ROOMDATA:LOCAL |= 장소_옥내
	SIF GROUPMATCH(LOCAL, 21)
		ROOMDATA:LOCAL |= 장소_목욕탕
	SIF GROUPMATCH(LOCAL, 9,40,41,42,43)
		ROOMDATA:LOCAL |= 장소_주방
	SIF GROUPMATCH(LOCAL, 1,23,26,45,48)
		ROOMDATA:LOCAL |= 장소_훈련
	SIF GROUPMATCH(LOCAL, 13,20,33,43)
		ROOMDATA:LOCAL |= 장소_공부
	SIF GROUPMATCH(LOCAL, 3,4,11,12,13,15,18,19,20,33,34,35,36,37,38,40,41,42,43)
		ROOMDATA:LOCAL |= 장소_휴식
	SIF GROUPMATCH(LOCAL, 6,17)
		ROOMDATA:LOCAL |= 장소_화장실
	;SIF GROUPMATCH(LOCAL, )
	;	ROOMDATA:LOCAL |= 장소_달구경
	SIF GROUPMATCH(LOCAL, 48)
		ROOMDATA:LOCAL |= 장소_하늘의소리
	SIF GROUPMATCH(LOCAL, 23)
		ROOMDATA:LOCAL |= 장소_채소밭
	SIF GROUPMATCH(LOCAL, 23,45)
		ROOMDATA:LOCAL |= 장소_물긷기
	SIF GROUPMATCH(LOCAL, 1,15,23,44,45,46,47)
		ROOMDATA:LOCAL |= 장소_전망
	SIF GROUPMATCH(LOCAL, 6,10,16,17,39)
		ROOMDATA:LOCAL |= 장소_좁다
	SIF GROUPMATCH(LOCAL, 3,4,11,12,13,15,18,19,20,33,34,35,36,37,38,40,41,42,43)
		ROOMDATA:LOCAL |= 장소_선잠_가능
	SIF GROUPMATCH(LOCAL, 22,34)
		ROOMDATA:LOCAL |= 장소_신체측정
	SIF GROUPMATCH(LOCAL, 5,14,22)
		ROOMDATA:LOCAL |= 장소_머물지않는다
	SIF GROUPMATCH(LOCAL, 36,40,41,42)
		ROOMDATA:LOCAL |= 장소_원룸
	SIF GROUPMATCH(LOCAL, 3,4,10,16,27,28,29,30,38,39)
		ROOMDATA:LOCAL |= 장소_과소
	SIF GROUPMATCH(LOCAL, 6,9,10,11,12,16,17,18,19,20,21,22,27,28,29,30,35,36,37,40,41,42,43)
		ROOMDATA:LOCAL |= 장소_Private
	SIF GROUPMATCH(LOCAL, 33)
		ROOMDATA:LOCAL |= 장소_공공장소
NEXT

MAXROOM = 949
ENTRANCE = 948
피난처 = 943
SIF GET_MAPID(거점_술벌레) != MAIN_MAP
	거점_술벌레 = 943
MAP_PAGES = 3
MAPNAME:1 = 지령전
MAPNAME:2 = 구도
MAPNAME:3 = 구작열 지옥

@DEFAULT_OWNER_9
거점_주인 = 49
Default초기위치 = 943