code:
;-------------------------------------------------
;贈り物본체のデータを設定・出力する関数
;GIFT_ID   XX.Y
;          XX=カテゴリ
;          Y=贈り物본체
;RESULT        1=出現する 2=出現しない
;NAME_MAIN     名称(RESULTS:0)
;BASIC_PRICE   基本となる値段(RESULT:1)
;SELL_AREA     出現する지저域(RESULT:2)
;SENSE         贈り物본체のGIFTSENSE(RESTLTS:1)
;-------------------------------------------------
@GIFTDATA_MAIN(GIFT_MAIN, NOW_AREA)
#DIM NOW_AREA
#DIM GIFT_MAIN
#DIMS NAME_MAIN
#DIM BASIC_PRICE
#DIM SELL_AREA
#DIMS SENSE

SELECTCASE GIFT_MAIN
CASE 11
	NAME_MAIN = 리본
	BASIC_PRICE = 600
	SENSE = 움켜쥠/옷감/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 12
	NAME_MAIN = 머리끈
	BASIC_PRICE = 240
	SENSE = 움켜쥠/옷감/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 13
	NAME_MAIN = 헤어핀
	BASIC_PRICE = 480
	SENSE = 움켜쥠/철제/장식/
	SELL_AREA = AREA_SETBIT("전부")

CASE 21
	NAME_MAIN = 머리 장식
	BASIC_PRICE = 850
	SENSE = 움켜쥠/장식/
	SELL_AREA = AREA_SETBIT("신사절호수지저")
CASE 22
	NAME_MAIN = 비녀
	BASIC_PRICE = 4800
	SENSE = 움켜쥠/장식/일본풍/
	SELL_AREA = AREA_SETBIT("마을명계달")
CASE 23
	NAME_MAIN = 깃털장식
	BASIC_PRICE = 1250
	SENSE = 움켜쥠/장식/새/
	SELL_AREA = AREA_SETBIT("죽림산록산정")
CASE 24
	NAME_MAIN = 꽃장식
	BASIC_PRICE = 1250
	SENSE = 움켜쥠/장식/식물/
	SELL_AREA = AREA_SETBIT("신사절죽림숲명계산록")
CASE 25
	NAME_MAIN = 바렛타
	BASIC_PRICE = 6400
	SENSE = 움켜쥠/장식/
	SELL_AREA = AREA_SETBIT("호수숲지저")
CASE 26
	NAME_MAIN = 빗
	BASIC_PRICE = 3600
	SENSE = 움켜쥠/철제/장식/도구/
	SELL_AREA = AREA_SETBIT("신사마을산정달")

CASE 31
	NAME_MAIN = 귀고리
	BASIC_PRICE = 9800
	SENSE = 움켜쥠/철제/장식/
	SELL_AREA = AREA_SETBIT("신사절마을산록산정")
CASE 32
	NAME_MAIN = 귀걸이
	BASIC_PRICE = 36500
	SENSE = 움켜쥠/철제/장식/
	SELL_AREA = AREA_SETBIT("호수숲죽림명계지저")
CASE 33
	NAME_MAIN = 피어스
	BASIC_PRICE = 14400
	SENSE = 움켜쥠/철제/장식/
	SELL_AREA = AREA_SETBIT("숲산록달")

CASE 41
	NAME_MAIN = 목걸이
	BASIC_PRICE = 16000
	SENSE = 움켜쥠/장식/
	SELL_AREA = AREA_SETBIT("신사절마을")
CASE 42
	NAME_MAIN = 네크리스
	BASIC_PRICE = 25000
	SENSE = 움켜쥠/장식/
	SELL_AREA = AREA_SETBIT("죽림숲산록")
CASE 43
	NAME_MAIN = 초커
	BASIC_PRICE = 4800
	SENSE = 움켜쥠/장식/
	SELL_AREA = AREA_SETBIT("호수산정달")
CASE 44
	NAME_MAIN = 개목걸이
	BASIC_PRICE = 7800
	SENSE = 움켜쥠/장식/
	SELL_AREA = AREA_SETBIT("명계지저")
CASE 45
	NAME_MAIN = 염주
	BASIC_PRICE = 5500
	SENSE = 움켜쥠/철제/장식/법구/일본풍/대륙풍/
	SELL_AREA = AREA_SETBIT("절마을명계")

CASE 51
	NAME_MAIN = 가락지
	BASIC_PRICE = 240000
	SENSE = 움켜쥠/철제/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 52
	NAME_MAIN = 반지
	BASIC_PRICE = 220000
	SENSE = 움켜쥠/철제/장식/
	SELL_AREA = AREA_SETBIT("전부")

CASE 61
	NAME_MAIN = 팔찌
	BASIC_PRICE = 6500
	SENSE = 바라봄/철제/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 62
	NAME_MAIN = 브레슬릿
	BASIC_PRICE = 3800
	SENSE = 바라봄/철제/장식/
	SELL_AREA = AREA_SETBIT("호수숲산록지저")
CASE 63
	NAME_MAIN = 뱅글
	BASIC_PRICE = 4200
	SENSE = 바라봄/철제/장식/
	SELL_AREA = AREA_SETBIT("절호수명계산정달")
CASE 64
	NAME_MAIN = 슈슈
	BASIC_PRICE = 200
	SENSE = 움켜쥠/옷감/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 65
	NAME_MAIN = 미산가
	BASIC_PRICE = 300
	SENSE = 움켜쥠/옷감/장식/
	SELL_AREA = AREA_SETBIT("마을숲산정")
CASE 66
	NAME_MAIN = 앵클릿
	BASIC_PRICE = 4800
	SENSE = 움켜쥠/철제/장식/
	SELL_AREA = AREA_SETBIT("절호수지저달")

CASE 71
	NAME_MAIN = 펜던트
	BASIC_PRICE = 5000
	SENSE = 움켜쥠/철제/장식/
	SELL_AREA = AREA_SETBIT("마을호수죽림숲산록지저")
CASE 72
	NAME_MAIN = 아뮬릿
	BASIC_PRICE = 8600
	SENSE = 움켜쥠/철제/장식/부적/주술/
	SELL_AREA = AREA_SETBIT("신사절명계산정달")

CASE 81
	NAME_MAIN = 스카프
	BASIC_PRICE = 3200
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 82
	NAME_MAIN = 머플러
	BASIC_PRICE = 2400
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 83
	NAME_MAIN = 목도리
	BASIC_PRICE = 1800
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("신사절마을죽림명계달")
CASE 84
	NAME_MAIN = 스톨
	BASIC_PRICE = 4500
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("호수숲산록산정지저")
CASE 85
	NAME_MAIN = 넥타이
	BASIC_PRICE = 3000
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("호수숲산록산정지저")

CASE 91
	NAME_MAIN = 케이프
	BASIC_PRICE = 4800
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("신사호수숲지저")
CASE 92
	NAME_MAIN = 로브
	BASIC_PRICE = 6800
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("절호수숲지저")
CASE 93
	NAME_MAIN = 하오리
	BASIC_PRICE = 5400
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("신사절마을죽림명계산록산정달")
CASE 94
	NAME_MAIN = 날개옷
	BASIC_PRICE = 7700
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("신사죽림산정달")
CASE 95
	NAME_MAIN = 망토
	BASIC_PRICE = 4000
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("절숲명계산록지저")

CASE 101
	NAME_MAIN = 띠
	BASIC_PRICE = 4000
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("신사절마을호수죽림숲명계산록산정지저달")
CASE 102
	NAME_MAIN = 벨트
	BASIC_PRICE = 3000
	SENSE = 몸에걸침/옷감/장식/
	SELL_AREA = AREA_SETBIT("신사절마을호수죽림숲명계산록산정지저달")

CASE 111
	NAME_MAIN = 장갑
	BASIC_PRICE = 2200
	SENSE = 바라봄/옷감/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 112
	NAME_MAIN = 손목호구
	BASIC_PRICE = 4500
	SENSE = 바라봄/철제/장식/
	SELL_AREA = AREA_SETBIT("절명계산정지저달")
CASE 113
	NAME_MAIN = 글러브
	BASIC_PRICE = 1800
	SENSE = 바라봄/옷감/장식/
	SELL_AREA = AREA_SETBIT("절호수숲산록지저")

CASE 121
	NAME_MAIN = 안경
	BASIC_PRICE = 12000
	SENSE = 몸에걸침/철제/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 122
	NAME_MAIN = 글래시스
	BASIC_PRICE = 12000
	SENSE = 몸에걸침/철제/장식/안경/
	SELL_AREA = AREA_SETBIT("전부")
CASE 123
	NAME_MAIN = 선글라스
	BASIC_PRICE = 6500
	SENSE = 몸에걸침/철제/장식/안경/
	SELL_AREA = AREA_SETBIT("호수산정지저달")
CASE 124
	NAME_MAIN = 렌즈
	BASIC_PRICE = 4000
	SENSE = 바라봄/철제/도구/안경/
	SELL_AREA = AREA_SETBIT("마을죽림숲산록달")

CASE 131
	NAME_MAIN = 탈
	BASIC_PRICE = 4800
	SENSE = 몸에걸침/철제/장식/
	SELL_AREA = AREA_SETBIT("신사절마을산정")
CASE 132
	NAME_MAIN = 가면
	BASIC_PRICE = 4000
	SENSE = 몸에걸침/철제/장식/탈/
	SELL_AREA = AREA_SETBIT("숲명계산록지저")
CASE 133
	NAME_MAIN = 마스크
	BASIC_PRICE = 2200
	SENSE = 몸에걸침/장식/탈/
	SELL_AREA = AREA_SETBIT("전부")

;CASE 141
;	NAME_MAIN = 신발
;	BASIC_PRICE = 5000
;	SENSE = 몸에걸침/장식/
;	SELL_AREA = AREA_SETBIT("신사절마을호수죽림숲명계산록산정지저달")
;CASE 142
;	NAME_MAIN = 부츠
;	BASIC_PRICE = 7000
;	SENSE = 몸에걸침/장식/신발/
;	SELL_AREA = AREA_SETBIT("신사절마을호수죽림숲명계산록산정지저달")

CASE 151
	NAME_MAIN = 문장
	BASIC_PRICE = 4500
	SENSE = 바라봄/철제/장식/
	SELL_AREA = AREA_SETBIT("절호수숲명계지저달")
CASE 152
	NAME_MAIN = 브로치
	BASIC_PRICE = 3600
	SENSE = 바라봄/철제/장식/
	SELL_AREA = AREA_SETBIT("신사마을호수죽림산록산정")
CASE 153
	NAME_MAIN = 와팬
	BASIC_PRICE = 980
	SENSE = 바라봄/철제/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 154
	NAME_MAIN = 씰
	BASIC_PRICE = 100
	SENSE = 바라봄/철제/장식/로리타/
	SELL_AREA = AREA_SETBIT("전부")
CASE 155
	NAME_MAIN = 캔뱃지
	BASIC_PRICE = 120
	SENSE = 바라봄/철제/장식/로리타/
	SELL_AREA = AREA_SETBIT("전부")

CASE 161
	NAME_MAIN = 스트랩
	BASIC_PRICE = 200
	SENSE = 움켜쥠/초상/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 162
	NAME_MAIN = 키홀더
	BASIC_PRICE = 200
	SENSE = 움켜쥠/초상/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 163
	NAME_MAIN = 경쇠
	BASIC_PRICE = 600
	SENSE = 움켜쥠/철제/장식/법구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 164
	NAME_MAIN = 네츠케
	BASIC_PRICE = 1400
	SENSE = 움켜쥠/초상/장식/일본풍/
	SELL_AREA = AREA_SETBIT("전부")
CASE 165
	NAME_MAIN = 오비도메
	BASIC_PRICE = 1800
	SENSE = 움켜쥠/초상/장식/
	SELL_AREA = AREA_SETBIT("전부")

CASE 171
	NAME_MAIN = 부적
	BASIC_PRICE = 4800
	SENSE = 움켜쥠/장식/
	SELL_AREA = AREA_SETBIT("전부")
CASE 172
	NAME_MAIN = 호부
	BASIC_PRICE = 1000
	SENSE = 움켜쥠/장식/부적/
	SELL_AREA = AREA_SETBIT("전부")
CASE 173
	NAME_MAIN = 종이부적
	BASIC_PRICE = 1500
	SENSE = 움켜쥠/장식/부적/주술/일본풍/
	SELL_AREA = AREA_SETBIT("신사절죽림명계산록산정달")
CASE 174
	NAME_MAIN = 참
	BASIC_PRICE = 2500
	SENSE = 움켜쥠/장식/부적/
	SELL_AREA = AREA_SETBIT("호수숲지저")
CASE 175
	NAME_MAIN = 액막이
	BASIC_PRICE = 2500
	SENSE = 움켜쥠/장식/부적/
	SELL_AREA = AREA_SETBIT("신사절마을죽림명계산록산정달")

CASE 181
	NAME_MAIN = 묵주
	BASIC_PRICE = 8000
	SENSE = 움켜쥠/철제/장식/부적/법구/서양풍/
	SELL_AREA = AREA_SETBIT("호수숲명계산록지저")
CASE 182
	NAME_MAIN = 로켓
	BASIC_PRICE = 7200
	SENSE = 움켜쥠/철제/장식/
	SELL_AREA = AREA_SETBIT("마을호수죽림숲지저달")
CASE 183
	NAME_MAIN = 곡옥
	BASIC_PRICE = 9900
	SENSE = 움켜쥠/철제/장식/부적/주술/일본풍/
	SELL_AREA = AREA_SETBIT("신사절명계산록산정")

CASE 201
	NAME_MAIN = ハンカチ
	BASIC_PRICE = 600
	SENSE = 움켜쥠/옷감/도구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 202
	NAME_MAIN = タオル
	BASIC_PRICE = 300
	SENSE = 움켜쥠/옷감/도구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 203
	NAME_MAIN = 手ぬぐい
	BASIC_PRICE = 300
	SENSE = 움켜쥠/옷감/도구/
	SELL_AREA = AREA_SETBIT("신사절마을산록산정")

CASE 211
	NAME_MAIN = 시계
	BASIC_PRICE = 9800
	SENSE = 바라봄/철제/도구/
	SELL_AREA = AREA_SETBIT("마을호수죽림숲명계산록지저달")
CASE 212
	NAME_MAIN = 손목시계
	BASIC_PRICE = 32000
	SENSE = 바라봄/철제/도구/시계/
	SELL_AREA = AREA_SETBIT("마을호수산록지저")
CASE 213
	NAME_MAIN = 회중시계
	BASIC_PRICE = 24800
	SENSE = 바라봄/철제/도구/시계/
	SELL_AREA = AREA_SETBIT("호수숲")

CASE 221
	NAME_MAIN = 財布
	BASIC_PRICE = 9800
	SENSE = 바라봄/도구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 222
	NAME_MAIN = がま口
	BASIC_PRICE = 300
	SENSE = 바라봄/도구/
	SELL_AREA = AREA_SETBIT("신사절마을산록산정")

CASE 231
	NAME_MAIN = 巾着
	BASIC_PRICE = 1200
	SENSE = 바라봄/옷감/도구/일본풍/
	SELL_AREA = AREA_SETBIT("신사절마을죽림명계지저달")
CASE 232
	NAME_MAIN = 印籠
	BASIC_PRICE = 8200
	SENSE = 바라봄/철제/도구/일본풍/
	SELL_AREA = AREA_SETBIT("신사죽림명계달")
CASE 233
	NAME_MAIN = ポーチ
	BASIC_PRICE = 1800
	SENSE = 바라봄/옷감/도구/
	SELL_AREA = AREA_SETBIT("호수숲산정")

CASE 241
	NAME_MAIN = 鞄
	BASIC_PRICE = 5000
	SENSE = 바라봄/옷감/도구/
	SELL_AREA = AREA_SETBIT("신사절마을죽림명계산록산정지저달")
CASE 242
	NAME_MAIN = バッグ
	BASIC_PRICE = 6000
	SENSE = 바라봄/옷감/도구/
	SELL_AREA = AREA_SETBIT("마을호수숲")

CASE 251
	NAME_MAIN = 鏡
	BASIC_PRICE = 12500
	SENSE = 바라봄/철제/도구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 252
	NAME_MAIN = 手鏡
	BASIC_PRICE = 4000
	SENSE = 바라봄/철제/도구/
	SELL_AREA = AREA_SETBIT("전부")

CASE 261
	NAME_MAIN = 향수
	BASIC_PRICE = 6000
	SENSE = 바라봄/도구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 262
	NAME_MAIN = 薬瓶
	BASIC_PRICE = 4000
	SENSE = 바라봄/철제/도구/
	SELL_AREA = AREA_SETBIT("마을호수죽림숲명계달")
CASE 263
	NAME_MAIN = 香炉
	BASIC_PRICE = 6800
	SENSE = 바라봄/철제/도구/법구/
	SELL_AREA = AREA_SETBIT("신사절죽림명계산정지저달")
CASE 264
	NAME_MAIN = 法輪
	BASIC_PRICE = 10000
	SENSE = 바라봄/철제/도구/법구/대륙풍/
	SELL_AREA = AREA_SETBIT("절명계")

CASE 271
	NAME_MAIN = 펜
	BASIC_PRICE = 400
	SENSE = 움켜쥠/철제/도구/문구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 272
	NAME_MAIN = 筆
	BASIC_PRICE = 2400
	SENSE = 움켜쥠/철제/도구/문구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 273
	NAME_MAIN = 万年筆
	BASIC_PRICE = 50000
	SENSE = 움켜쥠/철제/도구/문구/
	SELL_AREA = AREA_SETBIT("마을달")
CASE 274
	NAME_MAIN = 깃털펜
	BASIC_PRICE = 1600
	SENSE = 움켜쥠/철제/도구/문구/
	SELL_AREA = AREA_SETBIT("마을호수죽림숲명계산록산정지저")

CASE 281
	NAME_MAIN = 器
	BASIC_PRICE = 3000
	SENSE = 바라봄/철제/식기/
	SELL_AREA = AREA_SETBIT("마을죽림숲명계")
CASE 282
	NAME_MAIN = 皿
	BASIC_PRICE = 1000
	SENSE = 바라봄/철제/식기/
	SELL_AREA = AREA_SETBIT("절마을호수죽림숲")
CASE 283
	NAME_MAIN = グラス
	BASIC_PRICE = 2000
	SENSE = 바라봄/철제/식기/
	SELL_AREA = AREA_SETBIT("호수죽림숲지저달")
CASE 284
	NAME_MAIN = マグカップ
	BASIC_PRICE = 800
	SENSE = 바라봄/철제/식기/
	SELL_AREA = AREA_SETBIT("신사숲산정지저")
CASE 285
	NAME_MAIN = 酒器
	BASIC_PRICE = 9800
	SENSE = 바라봄/철제/식기/
	SELL_AREA = AREA_SETBIT("신사마을산록지저달")
CASE 286
	NAME_MAIN = 茶器
	BASIC_PRICE = 5500
	SENSE = 바라봄/철제/식기/
	SELL_AREA = AREA_SETBIT("절마을명계달")
CASE 287
	NAME_MAIN = 茶碗
	BASIC_PRICE = 1500
	SENSE = 바라봄/철제/식기/
	SELL_AREA = AREA_SETBIT("신사절마을명계산정")

CASE 291
	NAME_MAIN = 부채
	BASIC_PRICE = 4000
	SENSE = 바라봄/옷감/도구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 292
	NAME_MAIN = 접부채
	BASIC_PRICE = 3000
	SENSE = 바라봄/옷감/도구/부채/
	SELL_AREA = AREA_SETBIT("전부")
CASE 293
	NAME_MAIN = 심판용부채
	BASIC_PRICE = 800
	SENSE = 바라봄/옷감/도구/부채/
	SELL_AREA = AREA_SETBIT("전부")

CASE 301
	NAME_MAIN = 提灯
	BASIC_PRICE = 2000
	SENSE = 바라봄/철제/도구/조명/일본풍/
	SELL_AREA = AREA_SETBIT("신사절마을명계산정지저")
CASE 302
	NAME_MAIN = ランプ
	BASIC_PRICE = 7400
	SENSE = 바라봄/철제/도구/조명/
	SELL_AREA = AREA_SETBIT("호수숲지저달")
CASE 303
	NAME_MAIN = ランタン
	BASIC_PRICE = 4200
	SENSE = 바라봄/철제/도구/조명/
	SELL_AREA = AREA_SETBIT("죽림숲산록지저")

CASE 311
	NAME_MAIN = 傘
	BASIC_PRICE = 2000
	SENSE = 바라봄/옷감/도구/
	SELL_AREA = AREA_SETBIT("신사절마을호수죽림숲명계산록산정")

CASE 321
	NAME_MAIN = キセル
	BASIC_PRICE = 18000
	SENSE = 바라봄/철제/도구/
	SELL_AREA = AREA_SETBIT("절마을지저")

CASE 331
	NAME_MAIN = 鍵
	BASIC_PRICE = 10000
	SENSE = 움켜쥠/철제/도구/
	SELL_AREA = AREA_SETBIT("전부")

CASE 341
	NAME_MAIN = かざぐるま
	BASIC_PRICE = 500
	SENSE = 바라봄/옷감/도구/
	SELL_AREA = AREA_SETBIT("신사절마을명계산정")

CASE 351
	NAME_MAIN = 기계
	BASIC_PRICE = 20000
	SENSE = 바라봄/철제/도구/
	SELL_AREA = AREA_SETBIT("숲산록")

CASE 361
	NAME_MAIN = 書
	BASIC_PRICE = 2400
	SENSE = 품음/초상/서적/
	SELL_AREA = AREA_SETBIT("전부")
CASE 362
	NAME_MAIN = 本
	BASIC_PRICE = 1600
	SENSE = 품음/초상/서적/
	SELL_AREA = AREA_SETBIT("전부")
CASE 363
	NAME_MAIN = 巻物
	BASIC_PRICE = 12000
	SENSE = 품음/초상/서적/일본풍/대륙풍/
	SELL_AREA = AREA_SETBIT("신사절마을죽림명계산정달")
CASE 364
	NAME_MAIN = グリモワール
	BASIC_PRICE = 36000
	SENSE = 품음/초상/서적/마법/서양풍/
	SELL_AREA = AREA_SETBIT("호수숲")
CASE 365
	NAME_MAIN = 経典
	BASIC_PRICE = 8000
	SENSE = 품음/초상/서적/법구/주술/대륙풍/
	SELL_AREA = AREA_SETBIT("신사절마을산정달")
CASE 366
	NAME_MAIN = 手帳
	BASIC_PRICE = 650
	SENSE = 품음/초상/서적/문구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 367
	NAME_MAIN = 記録
	BASIC_PRICE = 6000
	SENSE = 품음/서적/
	SELL_AREA = AREA_SETBIT("전부")
CASE 368
	NAME_MAIN = 事典
	BASIC_PRICE = 8000
	SENSE = 품음/초상/서적/
	SELL_AREA = AREA_SETBIT("마을호수산록지저")
CASE 369
	NAME_MAIN = 妖魔本
	BASIC_PRICE = 29800
	SENSE = 품음/초상/서적/요괴/
	SELL_AREA = AREA_SETBIT("절호수죽림숲명계산록지저")

CASE 381
	NAME_MAIN = 懐剣
	BASIC_PRICE = 125000
	SENSE = 바라봄/철제/날붙이/
	SELL_AREA = AREA_SETBIT("신사절죽림명계산정달")
CASE 382
	NAME_MAIN = ナイフ
	BASIC_PRICE = 3000
	SENSE = 바라봄/철제/날붙이/
	SELL_AREA = AREA_SETBIT("마을호수숲산록지저")
CASE 383
	NAME_MAIN = 護刀
	BASIC_PRICE = 80000
	SENSE = 바라봄/철제/날붙이/
	SELL_AREA = AREA_SETBIT("신사절죽림명계달")
CASE 384
	NAME_MAIN = 宝剣
	BASIC_PRICE = 200000
	SENSE = 바라봄/철제/날붙이/법구/보석/
	SELL_AREA = AREA_SETBIT("신사절죽림명계산정달")

CASE 391
	NAME_MAIN = 杖
	BASIC_PRICE = 6000
	SENSE = 바라봄/철제/도구/
	SELL_AREA = AREA_SETBIT("전부")
CASE 392
	NAME_MAIN = ステッキ
	BASIC_PRICE = 3000
	SENSE = 바라봄/철제/도구/서양풍/
	SELL_AREA = AREA_SETBIT("호수숲지저")
CASE 393
	NAME_MAIN = 笏
	BASIC_PRICE = 10000
	SENSE = 바라봄/철제/도구/일본풍/
	SELL_AREA = AREA_SETBIT("절명계달")
CASE 394
	NAME_MAIN = 枝
	BASIC_PRICE = 1200
	SENSE = 바라봄/철제/도구/자연/
	SELL_AREA = AREA_SETBIT("신사절마을죽림숲명계산록산정달")
CASE 395
	NAME_MAIN = 箒
	BASIC_PRICE = 1000
	SENSE = 바라봄/철제/도구/
	SELL_AREA = AREA_SETBIT("신사절마을숲산정지저")
CASE 396
	NAME_MAIN = 錫杖
	BASIC_PRICE = 8000
	SENSE = 바라봄/철제/도구/법구/대륙풍/
	SELL_AREA = AREA_SETBIT("절명계달")
CASE 397
	NAME_MAIN = お祓い棒
	BASIC_PRICE = 10000
	SENSE = 바라봄/철제/도구/법구/주술/일본풍/
	SELL_AREA = AREA_SETBIT("신사산정달")

CASE 401
	NAME_MAIN = 탄환
	BASIC_PRICE = 5000
	SENSE = 바라봄/
	SELL_AREA = AREA_SETBIT("전부")
CASE 402
	NAME_MAIN = 바늘
	BASIC_PRICE = 1000
	SENSE = 바라봄/철제/탄환/
	SELL_AREA = AREA_SETBIT("신사절마을죽림지저달")
CASE 403
	NAME_MAIN = 화살
	BASIC_PRICE = 3000
	SENSE = 바라봄/철제/탄환/
	SELL_AREA = AREA_SETBIT("신사절산정달")

CASE 411
	NAME_MAIN = 笛
	BASIC_PRICE = 12000
	SENSE = 바라봄/철제/악기/
	SELL_AREA = AREA_SETBIT("신사절마을죽림명계산록산정달")
CASE 412
	NAME_MAIN = オカリナ
	BASIC_PRICE = 6500
	SENSE = 바라봄/철제/악기/
	SELL_AREA = AREA_SETBIT("숲산록달")
CASE 413
	NAME_MAIN = フルート
	BASIC_PRICE = 25000
	SENSE = 바라봄/철제/악기/
	SELL_AREA = AREA_SETBIT("절호수죽림숲산정")
CASE 414
	NAME_MAIN = ビードロ
	BASIC_PRICE = 800
	SENSE = 바라봄/철제/악기/
	SELL_AREA = AREA_SETBIT("신사마을명계산정지저")
CASE 415
	NAME_MAIN = オルゴール
	BASIC_PRICE = 28000
	SENSE = 바라봄/철제/악기/
	SELL_AREA = AREA_SETBIT("마을호수숲명계지저")

CASE 421
	NAME_MAIN = バチ
	BASIC_PRICE = 2800
	SENSE = 움켜쥠/철제/악기/
	SELL_AREA = AREA_SETBIT("절마을")
CASE 422
	NAME_MAIN = ピック
	BASIC_PRICE = 980
	SENSE = 움켜쥠/철제/악기/
	SELL_AREA = AREA_SETBIT("절마을")
CASE 423
	NAME_MAIN = スティック
	BASIC_PRICE = 1250
	SENSE = 움켜쥠/철제/악기/
	SELL_AREA = AREA_SETBIT("절마을")

CASE 451
	NAME_MAIN = 絵画
	BASIC_PRICE = 6800
	SENSE = 바라봄/초상/미술품/
	SELL_AREA = AREA_SETBIT("마을호수명계산록지저달")
CASE 452
	NAME_MAIN = 絵はがき
	BASIC_PRICE = 500
	SENSE = 바라봄/초상/미술품/
	SELL_AREA = AREA_SETBIT("전부")
CASE 453
	NAME_MAIN = 写真
	BASIC_PRICE = 1000
	SENSE = 바라봄/초상/미술품/
	SELL_AREA = AREA_SETBIT("전부")

CASE 461
	NAME_MAIN = コイン
	BASIC_PRICE = 5000
	SENSE = 바라봄/철제/미술품/
	SELL_AREA = AREA_SETBIT("호수숲명계산록지저")
CASE 462
	NAME_MAIN = カメオ
	BASIC_PRICE = 7000
	SENSE = 바라봄/철제/미술품/
	SELL_AREA = AREA_SETBIT("절죽림명계산정지저")

CASE 471
	NAME_MAIN = カード
	BASIC_PRICE = 500
	SENSE = 바라봄/초상/미술품/
	SELL_AREA = AREA_SETBIT("전부")
CASE 472
	NAME_MAIN = レアカード
	BASIC_PRICE = 10000
	SENSE = 바라봄/초상/미술품/로리타/매니악/
	SELL_AREA = AREA_SETBIT("신사산정")
CASE 473
	NAME_MAIN = スペルカード
	BASIC_PRICE = 9999
	SENSE = 바라봄/미술품/도구/
	SELL_AREA = AREA_SETBIT("신사절호수죽림숲명계산록산정지저달")

CASE 481
	NAME_MAIN = 인형
	BASIC_PRICE = 6400
	SENSE = 품음/소형장식물/
	SELL_AREA = AREA_SETBIT("전부")
CASE 482
	NAME_MAIN = ぬいぐるみ
	BASIC_PRICE = 4800
	SENSE = 품음/옷감/인형/소형장식물/로리타/
	SELL_AREA = AREA_SETBIT("신사절마을호수죽림숲산정지저")
CASE 483
	NAME_MAIN = フィギュア
	BASIC_PRICE = 9800
	SENSE = 바라봄/철제/인형/소형장식물/매니악/
	SELL_AREA = AREA_SETBIT("신사절숲명계산정")
CASE 484
	NAME_MAIN = 彫刻
	BASIC_PRICE = 4200
	SENSE = 바라봄/철제/인형/미술품/소형장식물/
	SELL_AREA = AREA_SETBIT("신사호수명계산록산정지저달")
CASE 485
	NAME_MAIN = はにわ
	BASIC_PRICE = 5500
	SENSE = 바라봄/철제/인형/소형장식물/레트로/
	SELL_AREA = AREA_SETBIT("명계")

CASE 501
	NAME_MAIN = 이빨
	BASIC_PRICE = 3600
	SENSE = 움켜쥠/철제/생체품/동물/
	SELL_AREA = AREA_SETBIT("절숲명계산록지저")
CASE 502
	NAME_MAIN = 뿔
	BASIC_PRICE = 4800
	SENSE = 움켜쥠/철제/생체품/동물/
	SELL_AREA = AREA_SETBIT("신사절죽림명계산록산정지저달")
CASE 503
	NAME_MAIN = 손톱
	BASIC_PRICE = 3000
	SENSE = 움켜쥠/철제/생체품/동물/
	SELL_AREA = AREA_SETBIT("신사호수숲명계산록지저")
CASE 504
	NAME_MAIN = 비늘
	BASIC_PRICE = 2400
	SENSE = 움켜쥠/생체품/물고기/
	SELL_AREA = AREA_SETBIT("호수명계산록산정지저")
CASE 505
	NAME_MAIN = 깃털
	BASIC_PRICE = 3200
	SENSE = 움켜쥠/생체품/새/
	SELL_AREA = AREA_SETBIT("죽림숲명계산록산정지저")
CASE 506
	NAME_MAIN = 알
	BASIC_PRICE = 2000
	SENSE = 움켜쥠/철제/생체품/새/
	SELL_AREA = AREA_SETBIT("신사마을명계산록산정지저")
CASE 507
	NAME_MAIN = 꼬리
	BASIC_PRICE = 1800
	SENSE = 움켜쥠/생체품/동물/
	SELL_AREA = AREA_SETBIT("신사절죽림숲명계산록지저")
CASE 508
	NAME_MAIN = 씨앗
	BASIC_PRICE = 5000
	SENSE = 움켜쥠/철제/생체품/식물/
	SELL_AREA = AREA_SETBIT("신사절마을죽림숲명계산록")

CASE 511
	NAME_MAIN = 結晶
	BASIC_PRICE = 7000
	SENSE = 움켜쥠/철제/소형장식물/광물/
	SELL_AREA = AREA_SETBIT("신사호수숲산록산정지저달")
CASE 512
	NAME_MAIN = 宝玉
	BASIC_PRICE = 180000
	SENSE = 움켜쥠/철제/소형장식물/보석/
	SELL_AREA = AREA_SETBIT("전부")
CASE 513
	NAME_MAIN = 宝珠
	BASIC_PRICE = 200000
	SENSE = 움켜쥠/철제/소형장식물/보석/
	SELL_AREA = AREA_SETBIT("전부")
CASE 514
	NAME_MAIN = オーブ
	BASIC_PRICE = 100000
	SENSE = 움켜쥠/철제/소형장식물/보석/
	SELL_AREA = AREA_SETBIT("호수숲지저달")
CASE 515
	NAME_MAIN = 守護石
	BASIC_PRICE = 32000
	SENSE = 움켜쥠/철제/소형장식물/부적/주술/
	SELL_AREA = AREA_SETBIT("신사절산록산정달")
CASE 516
	NAME_MAIN = 마법석
	BASIC_PRICE = 24000
	SENSE = 움켜쥠/철제/소형장식물/마법/
	SELL_AREA = AREA_SETBIT("호수죽림숲지저")
CASE 517
	NAME_MAIN = 妖玉
	BASIC_PRICE = 18000
	SENSE = 움켜쥠/철제/소형장식물/요술/
	SELL_AREA = AREA_SETBIT("절죽림명계산록지저")
CASE 518
	NAME_MAIN = しずく
	BASIC_PRICE = 6000
	SENSE = 움켜쥠/철제/소형장식물/자연/
	SELL_AREA = AREA_SETBIT("호수죽림숲산정지저달")

CASE 521
	NAME_MAIN = 유물
	BASIC_PRICE = 12000
	SENSE = 바라봄/철제/도구/레트로/
	SELL_AREA = AREA_SETBIT("전부")
CASE 522
	NAME_MAIN = 秘宝
	BASIC_PRICE = 160000
	SENSE = 바라봄/철제/소형장식물/유물/레트로/
	SELL_AREA = AREA_SETBIT("전부")
CASE 523
	NAME_MAIN = かけら
	BASIC_PRICE = 3000
	SENSE = 움켜쥠/철제/소형장식물/유물/레트로/
	SELL_AREA = AREA_SETBIT("전부")
CASE 524
	NAME_MAIN = アーティファクト
	BASIC_PRICE = 18000
	SENSE = 바라봄/철제/도구/유물/레트로/
	SELL_AREA = AREA_SETBIT("명계달")
CASE 525
	NAME_MAIN = 화석
	BASIC_PRICE = 4000
	SENSE = 품음/철제/소형장식물/생체품/유물/동물/레트로/광물/
	SELL_AREA = AREA_SETBIT("신사호수숲명계지저")

[SKIPSTART]
CASE
	NAME_MAIN =
	BASIC_PRICE =
	SENSE =
	SELL_AREA = AREA_SETBIT("")
[SKIPEND]
CASEELSE
	VARSET RESULTS
	VARSET RESULT
	RETURN 0
ENDSELECT

VARSET RESULTS
VARSET RESULT
;分布
SIF INRANGE(NOW_AREA, 0, 10) && GETBIT(SELL_AREA, NOW_AREA)
	RESULT:0 = 1

SENSE += NAME_MAIN + "/"

RESULT:1 = BASIC_PRICE
RESULT:2 = SELL_AREA
RESULTS:0 = %NAME_MAIN%
RESULTS:1 = %SENSE%
RETURN RESULT:0

path: ERB/이벤트관련/선물관련/선물데이터_본체.ERB


code:
;-------------------------------------------------
;贈り物の형용사のデータを設定・出力する関数
;GIFT_ID   XX.YY
;          XX=カテゴリ
;          YY=형용사
;RESULT        1=出現する 2=出現しない
;RESULTS:0     名称
;MAGNIF_PRICE  値段の倍率(RESULT:1)
;SELL_AREA     出現する地域(RESULT:2)
;SENSE         형용사のGIFTSENSE(RESTLTS:1)
;-------------------------------------------------
@GIFTDATA_ADJECT(GIFT_ADJECT, NOW_AREA, SENSE_MAIN)
#DIM NOW_AREA
#DIM GIFT_ADJECT
#DIM MAGNIF_PRICE
#DIMS NAME_ADJECT
#DIM SELL_AREA
#DIMS SENSE_MAIN
#DIMS SENSE
MAGNIF_PRICE = 100
SELL_AREA = 0
SENSE =

SELECTCASE GIFT_ADJECT
CASE 101
	NAME_ADJECT = 심플한
	MAGNIF_PRICE = 100
	SENSE = 심플/시크/
	SELL_AREA = AREA_SETBIT("전부")
CASE 102
	NAME_ADJECT = 큐트한
	MAGNIF_PRICE = 100
	SENSE = 귀여운/팝/화려/로리타/
	SELL_AREA = AREA_SETBIT("마을호수숲산록산정")
CASE 103
	NAME_ADJECT = 앤티크한
	MAGNIF_PRICE = 150
	SENSE = 레트로/시크/지적/
	SELL_AREA = AREA_SETBIT("신사절죽림명계지저")
CASE 104
	NAME_ADJECT = 고식한
	MAGNIF_PRICE = 130
	SENSE = 근사함/예술적/서양풍/시크/
	SELL_AREA = AREA_SETBIT("호수숲산록지저")
CASE 105
	NAME_ADJECT = 팝한
	MAGNIF_PRICE = 120
	SENSE = 귀여운/팝/화려/로리타/
	SELL_AREA = AREA_SETBIT("호수죽림산록지저달")
CASE 106
	NAME_ADJECT = 모던한
	MAGNIF_PRICE = 100
	SENSE = 심플/시크/
	SELL_AREA = AREA_SETBIT("절호수숲산록산정달")
CASE 107
	NAME_ADJECT = 레트로한
	MAGNIF_PRICE = 80
	SENSE = 레트로/시크/
	SELL_AREA = AREA_SETBIT("신사마을죽림명계지저")
CASE 108
	NAME_ADJECT = 미스테리어스한
	MAGNIF_PRICE = 130
	SENSE = 근사함/불가사의/
	SELL_AREA = AREA_SETBIT("신사죽림숲명계지저")
CASE 109
	NAME_ADJECT = 오리엔탈한
	MAGNIF_PRICE = 120
	SENSE = 심플/대륙풍/시크/
	SELL_AREA = AREA_SETBIT("절마을숲산록산정달")
CASE 110
	NAME_ADJECT = 유니크한
	MAGNIF_PRICE = 130
	SENSE = 기묘/화려/
	SELL_AREA = AREA_SETBIT("신사절호수숲지저")
CASE 111
	NAME_ADJECT = 브랜드의
	MAGNIF_PRICE = 500
	SENSE = 아름다움/멋쟁이/위엄/
	SELL_AREA = AREA_SETBIT("마을호수산정달")
CASE 112
	NAME_ADJECT = 고져스한
	MAGNIF_PRICE = 250
	SENSE = 아름다움/화려/위엄/
	SELL_AREA = AREA_SETBIT("절호수명계산정달")
CASE 113
	NAME_ADJECT = 팬시한
	MAGNIF_PRICE = 100
	SENSE = 귀여운/팝/로리타/
	SELL_AREA = AREA_SETBIT("신사마을숲지저달")
CASE 114
	NAME_ADJECT = 호러한
	MAGNIF_PRICE = 100
	SENSE = 무서움/팝/
	SELL_AREA = AREA_SETBIT("절죽림숲명계지저")

CASE 201
	NAME_ADJECT = 중세풍의
	MAGNIF_PRICE = 120
	SENSE = 서양풍/
	SELL_AREA = AREA_SETBIT("호수숲산록지저")
CASE 202
	NAME_ADJECT = 일본풍의
	MAGNIF_PRICE = 120
	SENSE = 심플/일본풍/섬세/
	SELL_AREA = AREA_SETBIT("신사마을죽림명계산정")
CASE 203
	NAME_ADJECT = 남국풍의
	MAGNIF_PRICE = 120
	SENSE = 물/서양풍/
	SELL_AREA = AREA_SETBIT("절호수숲산록달")
CASE 204
	NAME_ADJECT = 민족풍의
	MAGNIF_PRICE = 120
	SENSE = 대륙풍/
	SELL_AREA = AREA_SETBIT("신사마을죽림산정지저달")
CASE 205
	NAME_ADJECT = 대륙풍의
	MAGNIF_PRICE = 120
	SENSE = 불/대륙풍/
	SELL_AREA = AREA_SETBIT("절죽림달")
CASE 206
	NAME_ADJECT = 북유럽풍의
	MAGNIF_PRICE = 130
	SENSE = 얼음/서양풍/파워풀/
	SELL_AREA = AREA_SETBIT("호수산록지저")
CASE 207
	NAME_ADJECT = 이계풍의
	MAGNIF_PRICE = 130
	SENSE = 바람/대륙풍/
	SELL_AREA = AREA_SETBIT("절숲명계지저달")

CASE 301
	NAME_ADJECT = 아름다운
	MAGNIF_PRICE = 120
	SENSE = 심플/
	SELL_AREA = AREA_SETBIT("전부")
CASE 302
	NAME_ADJECT = 미려한
	MAGNIF_PRICE = 130
	SENSE = 아름다움/심플/
	SELL_AREA = AREA_SETBIT("죽림명계달")
CASE 303
	NAME_ADJECT = 瀟洒な
	MAGNIF_PRICE = 140
	SENSE = 질서/아름다움/심플/시크/지적/
	SELL_AREA = AREA_SETBIT("호수")
CASE 304
	NAME_ADJECT = 幽玄な
	MAGNIF_PRICE = 150
	SENSE = 아름다움/일본풍/섬세/위엄/
	SELL_AREA = AREA_SETBIT("신사명계")
CASE 305
	NAME_ADJECT = 侘寂な
	MAGNIF_PRICE = 90
	SENSE = 아름다움/예술적/일본풍/섬세/
	SELL_AREA = AREA_SETBIT("신사명계산록")
CASE 306
	NAME_ADJECT = 魅惑の
	MAGNIF_PRICE = 220
	SENSE = 아름다움/멋쟁이/화려/
	SELL_AREA = AREA_SETBIT("마을호수숲지저")
CASE 307
	NAME_ADJECT = 妖艶な
	MAGNIF_PRICE = 240
	SENSE = 아름다움/화려/위엄/
	SELL_AREA = AREA_SETBIT("절죽림명계")
CASE 308
	NAME_ADJECT = イカす
	MAGNIF_PRICE = 140
	SENSE = 근사함/멋쟁이/팝/화려/로리타/
	SELL_AREA = AREA_SETBIT("신사절마을산정")
CASE 309
	NAME_ADJECT = 멋쟁이인
	MAGNIF_PRICE = 140
	SENSE = 귀여운/멋쟁이/팝/
	SELL_AREA = AREA_SETBIT("마을호수죽림명계")
CASE 310
	NAME_ADJECT = ナウい
	MAGNIF_PRICE = 110
	SENSE = 멋쟁이/팝/매니악/
	SELL_AREA = AREA_SETBIT("절마을숲산정지저")
CASE 311
	NAME_ADJECT = 神秘的な
	MAGNIF_PRICE = 150
	SENSE = 아름다움/시크/불가사의/
	SELL_AREA = AREA_SETBIT("신사죽림숲명계산록산정달")
CASE 312
	NAME_ADJECT = 예술적인
	MAGNIF_PRICE = 130
	SENSE = 아름다움/예술적/화려/지적/
	SELL_AREA = AREA_SETBIT("마을죽림명계산록")
CASE 313
	NAME_ADJECT = 絢爛たる
	MAGNIF_PRICE = 200
	SENSE = 아름다움/예술적/화려/파워풀/위엄/
	SELL_AREA = AREA_SETBIT("호수산정지저달")
CASE 314
	NAME_ADJECT = 기묘한
	MAGNIF_PRICE = 125
	SENSE = 근사함/기묘/불가사의/
	SELL_AREA = AREA_SETBIT("마을숲명계지저")
CASE 315
	NAME_ADJECT = 怪奇な
	MAGNIF_PRICE = 135
	SENSE = 혼돈/무서움/기묘/불가사의/
	SELL_AREA = AREA_SETBIT("절마을죽림숲지저")
CASE 316
	NAME_ADJECT = 不気味な
	MAGNIF_PRICE = 125
	SENSE = 무서움/섬세/불가사의/
	SELL_AREA = AREA_SETBIT("마을숲명계지저")
CASE 317
	NAME_ADJECT = 불가사의한
	MAGNIF_PRICE = 135
	SENSE = 귀여운/불가사의/
	SELL_AREA = AREA_SETBIT("신사마을숲산정달")
CASE 318
	NAME_ADJECT = 다크한
	MAGNIF_PRICE = 125
	SENSE = 어둠/무서움/팝/시크/
	SELL_AREA = AREA_SETBIT("호수죽림숲명계지저")
CASE 319
	NAME_ADJECT = 愉快な
	MAGNIF_PRICE = 110
	SENSE = 귀여운/기묘/팝/로리타/
	SELL_AREA = AREA_SETBIT("신사절마을호수산록산정지저")
CASE 320
	NAME_ADJECT = 前衛的な
	MAGNIF_PRICE = 125
	SENSE = 팝/화려/매니악/
	SELL_AREA = AREA_SETBIT("절마을숲산록달")
CASE 321
	NAME_ADJECT = 펑크한
	MAGNIF_PRICE = 130
	SENSE = 어둠/혼돈/무서움/멋쟁이/팝/화려/매니악/
	SELL_AREA = AREA_SETBIT("절명계지저")
CASE 322
	NAME_ADJECT = 코스믹한
	MAGNIF_PRICE = 140
	SENSE = 별/근사함/팝/화려/매니악/
	SELL_AREA = AREA_SETBIT("숲산정지저달")
CASE 323
	NAME_ADJECT = 레트로퓨처한
	MAGNIF_PRICE = 160
	SENSE = 금속/근사함/레트로/미래/매니악/
	SELL_AREA = AREA_SETBIT("신사죽림산록지저달")
CASE 324
	NAME_ADJECT = 근미래풍의
	MAGNIF_PRICE = 180
	SENSE = 금속/근사함/기묘/미래/불가사의/
	SELL_AREA = AREA_SETBIT("명계산록달")
CASE 325
	NAME_ADJECT = オカルティックな
	MAGNIF_PRICE = 150
	SENSE = 혼돈/무서움/팝/불가사의/매니악/
	SELL_AREA = AREA_SETBIT("신사절숲달")
CASE 326
	NAME_ADJECT = クレイジーな
	MAGNIF_PRICE = 222
	SENSE = 혼돈/무서움/기묘/팝/화려/파워풀/매니악/
	SELL_AREA = AREA_SETBIT("호수죽림지저달")
CASE 327
	NAME_ADJECT = パンデモニックな
	MAGNIF_PRICE = 260
	SENSE = 어둠/혼돈/무서움/기묘/팝/파워풀/매니악/
	SELL_AREA = AREA_SETBIT("달")
CASE 328
	NAME_ADJECT = エニグマティクな
	MAGNIF_PRICE = 260
	SENSE = 어둠/혼돈/기묘/섬세/불가사의/지적/
	SELL_AREA = AREA_SETBIT("신사숲")

CASE 401
	NAME_ADJECT = 모노크로의
	MAGNIF_PRICE = 80
	SENSE = 심플/레트로/시크/지적/
	SELL_AREA = AREA_SETBIT("절마을명계달")
CASE 402
	NAME_ADJECT = カラフルな
	MAGNIF_PRICE = 100
	SENSE = 심플/팝/화려/로리타/
	SELL_AREA = AREA_SETBIT("호수숲산록산정")
CASE 403
	NAME_ADJECT = セピアの
	MAGNIF_PRICE = 80
	SENSE = 심플/레트로/시크/지적/
	SELL_AREA = AREA_SETBIT("신사죽림지저")
CASE 404
	NAME_ADJECT = 透明な
	MAGNIF_PRICE = 120
	SENSE = 미래/섬세/불가사의/
	SELL_AREA = AREA_SETBIT("산록산정달")
CASE 405
	NAME_ADJECT = 真紅の
	MAGNIF_PRICE = 110
	SENSE = 불/근사함/심플/파워풀/
	SELL_AREA = AREA_SETBIT("신사호수산록지저")
CASE 406
	NAME_ADJECT = 漆黒の
	MAGNIF_PRICE = 120
	SENSE = 어둠/근사함/심플/파워풀/
	SELL_AREA = AREA_SETBIT("숲명계달")
CASE 407
	NAME_ADJECT = 純白の
	MAGNIF_PRICE = 120
	SENSE = 빛/아름다움/심플/시크/섬세/
	SELL_AREA = AREA_SETBIT("절산정달")
CASE 408
	NAME_ADJECT = 白銀の
	MAGNIF_PRICE = 130
	SENSE = 얼음/아름다움/시크/섬세/
	SELL_AREA = AREA_SETBIT("신사호수숲달")
CASE 409
	NAME_ADJECT = 暗黒の
	MAGNIF_PRICE = 130
	SENSE = 어둠/무서움/시크/
	SELL_AREA = AREA_SETBIT("숲명계지저달")
CASE 410
	NAME_ADJECT = 瑠璃色の
	MAGNIF_PRICE = 110
	SENSE = 물/귀여운/섬세
	SELL_AREA = AREA_SETBIT("호수산정달")
CASE 411
	NAME_ADJECT = 浅葱色の
	MAGNIF_PRICE = 105
	SENSE = 바람/귀여운/섬세
	SELL_AREA = AREA_SETBIT("산록산정달")
CASE 412
	NAME_ADJECT = 橘色の
	MAGNIF_PRICE = 105
	SENSE = 흙/귀여운/섬세
	SELL_AREA = AREA_SETBIT("산록산정달")
CASE 413
	NAME_ADJECT = 일곱빛깔의
	MAGNIF_PRICE = 140
	SENSE = 아름다움/서양풍/화려/
	SELL_AREA = AREA_SETBIT("죽림숲")
CASE 414
	NAME_ADJECT = 極彩の
	MAGNIF_PRICE = 160
	SENSE = 아름다움/예술적/대륙풍/화려/파워풀/
	SELL_AREA = AREA_SETBIT("호수산정달")
CASE 415
	NAME_ADJECT = 永遠に紅い
	MAGNIF_PRICE = 333
	SENSE = 귀여운/서양풍/화려/
	SELL_AREA = AREA_SETBIT("호수")

CASE 501
	NAME_ADJECT = ハートの
	MAGNIF_PRICE = 100
	SENSE = 모양/정신/귀여운/심플/팝/화려/로리타/
	SELL_AREA = AREA_SETBIT("지저")
CASE 502
	NAME_ADJECT = 音符の
	MAGNIF_PRICE = 100
	SENSE = 모양/음악/귀여운/심플/팝/
	SELL_AREA = AREA_SETBIT("마을명계")
CASE 503
	NAME_ADJECT = 十字型の
	MAGNIF_PRICE = 100
	SENSE = 모양/근사함/심플/팝/시크/
	SELL_AREA = AREA_SETBIT("호수명계지저")
CASE 504
	NAME_ADJECT = 星型の
	MAGNIF_PRICE = 100
	SENSE = 모양/별/귀여운/심플/팝/화려/
	SELL_AREA = AREA_SETBIT("마을숲달")
CASE 505
	NAME_ADJECT = うずまきの
	MAGNIF_PRICE = 100
	SENSE = 모양/물/귀여운/심플/팝/
	SELL_AREA = AREA_SETBIT("호수죽림산정")
CASE 506
	NAME_ADJECT = 幾何学模様の
	MAGNIF_PRICE = 111
	SENSE = 모양/근사함/예술적/섬세/지적/
	SELL_AREA = AREA_SETBIT("절숲산록달")
CASE 507
	NAME_ADJECT = 물방울의
	MAGNIF_PRICE = 100
	SENSE = 모양/물/귀여운/심플/팝/
	SELL_AREA = AREA_SETBIT("신사호수산록산정")
CASE 508
	NAME_ADJECT = キャンディの
	MAGNIF_PRICE = 110
	SENSE = 모양/귀여운/멋쟁이/팝/로리타/
	SELL_AREA = AREA_SETBIT("마을호수숲")
CASE 509
	NAME_ADJECT = ドクロの
	MAGNIF_PRICE = 110
	SENSE = 모양/어둠/뼈/무서움/멋쟁이/팝/화려/
	SELL_AREA = AREA_SETBIT("숲명계지저")
CASE 510
	NAME_ADJECT = 瞳の
	MAGNIF_PRICE = 110
	SENSE = 모양/근사함/시크/지적/
	SELL_AREA = AREA_SETBIT("숲지저")
CASE 511
	NAME_ADJECT = タマゴの
	MAGNIF_PRICE = 100
	SENSE = 모양/새/귀여운/심플/팝/시크/섬세/
	SELL_AREA = AREA_SETBIT("죽림숲산정지저")
CASE 512
	NAME_ADJECT = 翼の
	MAGNIF_PRICE = 110
	SENSE = 모양/바람/새/근사함/
	SELL_AREA = AREA_SETBIT("죽림산록산정")
CASE 513
	NAME_ADJECT = 錨の
	MAGNIF_PRICE = 120
	SENSE = 모양/물/근사함/시크/
	SELL_AREA = AREA_SETBIT("절호수달")
CASE 514
	NAME_ADJECT = 鬼形の
	MAGNIF_PRICE = 160
	SENSE = 모양/요괴/혼돈/무서움/기묘/파워풀/위엄/
	SELL_AREA = AREA_SETBIT("명계")

CASE 601
	NAME_ADJECT = 캐릭터의
	MAGNIF_PRICE = 150
	SENSE = 캐릭터/심플/팝/화려/로리타/
	SELL_AREA = AREA_SETBIT("마을")
CASE 602
	NAME_ADJECT = ゆるキャラの
	MAGNIF_PRICE = 130
	SENSE = 캐릭터/귀여운/심플/팝/시크/로리타ー/매니악/
	SELL_AREA = AREA_SETBIT("마을")
CASE 603
	NAME_ADJECT = 怪獣の
	MAGNIF_PRICE = 150
	SENSE = 캐릭터/근사함/팝/파워풀/로리타/매니악/
	SELL_AREA = AREA_SETBIT("마을")
CASE 604
	NAME_ADJECT = 怪物の
	MAGNIF_PRICE = 150
	SENSE = 캐릭터/근사함/팝/파워풀/로리타/
	SELL_AREA = AREA_SETBIT("마을")
CASE 605
	NAME_ADJECT = 마법소녀의
	MAGNIF_PRICE = 175
	SENSE = 캐릭터/마법/질서/귀여운/팝/화려/로리타/매니악/
	SELL_AREA = AREA_SETBIT("숲")
CASE 606
	NAME_ADJECT = 히어로의
	MAGNIF_PRICE = 175
	SENSE = 캐릭터/질서/근사함/팝/화려/로리타/매니악/
	SELL_AREA = AREA_SETBIT("절")
CASE 607
	NAME_ADJECT = ゆきだるまの
	MAGNIF_PRICE = 120
	SENSE = 얼음/캐릭터/귀여운/팝/로리타/
	SELL_AREA = AREA_SETBIT("호수")
CASE 608
	NAME_ADJECT = はにわの
	MAGNIF_PRICE = 110
	SENSE = 흙/캐릭터/귀여운/예술적/팝/레트로/시크/로리타/
	SELL_AREA = AREA_SETBIT("명계")

CASE 701
	NAME_ADJECT = 伝説の
	MAGNIF_PRICE = 500
	SENSE = 레트로/파워풀/위엄/장대/
	SELL_AREA = AREA_SETBIT("호수숲")
CASE 702
	NAME_ADJECT = 古の
	MAGNIF_PRICE = 200
	SENSE = 레트로/시크/지적/
	SELL_AREA = AREA_SETBIT("절명계")
CASE 703
	NAME_ADJECT = 太古の
	MAGNIF_PRICE = 200
	SENSE = 레트로/시크/지적/
	SELL_AREA = AREA_SETBIT("산록지저")
CASE 704
	NAME_ADJECT = 始原の
	MAGNIF_PRICE = 250
	SENSE = 레트로/파워풀/위엄/
	SELL_AREA = AREA_SETBIT("신사")
CASE 705
	NAME_ADJECT = 懐かしき
	MAGNIF_PRICE = 120
	SENSE = 심플/레트로/일본풍/섬세/지적/
	SELL_AREA = AREA_SETBIT("마을")
CASE 706
	NAME_ADJECT = 神さびた
	MAGNIF_PRICE = 250
	SENSE = 레트로/일본풍/시크/위엄/
	SELL_AREA = AREA_SETBIT("산정")
CASE 707
	NAME_ADJECT = 千年の
	MAGNIF_PRICE = 600
	SENSE = 레트로/파워풀/지적/위엄/장대/
	SELL_AREA = AREA_SETBIT("죽림")
CASE 708
	NAME_ADJECT = 神代の
	MAGNIF_PRICE = 500
	SENSE = 레트로/시크/위엄/장대/
	SELL_AREA = AREA_SETBIT("죽림달")
CASE 709
	NAME_ADJECT = 過去の
	MAGNIF_PRICE = 200
	SENSE = 레트로/시크/지적/
	SELL_AREA = AREA_SETBIT("신사절마을명계")

CASE 801
	NAME_ADJECT = 나무제
	MAGNIF_PRICE = 50
	SENSE = 광물/식물/심플/시크/
	SELL_AREA = AREA_SETBIT("죽림지저달이외")
CASE 802
	NAME_ADJECT = 대나무제
	MAGNIF_PRICE = 80
	SENSE = 광물/식물/심플/일본풍/시크/섬세/
	SELL_AREA = AREA_SETBIT("죽림달")
CASE 803
	NAME_ADJECT = 석제
	MAGNIF_PRICE = 30
	SENSE = 광물/흙/심플/시크/
	SELL_AREA = AREA_SETBIT("전부")
CASE 804
	NAME_ADJECT = 青銅の
	MAGNIF_PRICE = 50
	SENSE = 광물/금속/심플/시크/
	SELL_AREA = AREA_SETBIT("전부")
CASE 805
	NAME_ADJECT = 鉄の
	MAGNIF_PRICE = 60
	SENSE = 광물/금속/심플/시크/
	SELL_AREA = AREA_SETBIT("전부")
CASE 806
	NAME_ADJECT = 銀の
	MAGNIF_PRICE = 170
	SENSE = 광물/금속/심플/서양풍/시크/
	SELL_AREA = AREA_SETBIT("전부")
CASE 807
	NAME_ADJECT = 黄金の
	MAGNIF_PRICE = 550
	SENSE = 광물/보석/금속/심플/화려/파워풀/위엄/
	SELL_AREA = AREA_SETBIT("절달")
CASE 808
	NAME_ADJECT = 翠玉の
	MAGNIF_PRICE = 640
	SENSE = 광물/바람/보석/시크/
	SELL_AREA = AREA_SETBIT("마을산록")
CASE 809
	NAME_ADJECT = 紅玉の
	MAGNIF_PRICE = 820
	SENSE = 광물/불/보석/화려/
	SELL_AREA = AREA_SETBIT("신사호수")
CASE 810
	NAME_ADJECT = 青玉の
	MAGNIF_PRICE = 770
	SENSE = 광물/얼음/보석/시크/지적/
	SELL_AREA = AREA_SETBIT("죽림명계")
CASE 811
	NAME_ADJECT = 金剛石の
	MAGNIF_PRICE = 980
	SENSE = 광물/빛/보석/화려/위엄/
	SELL_AREA = AREA_SETBIT("숲지저")
CASE 812
	NAME_ADJECT = 翡翠の
	MAGNIF_PRICE = 175
	SENSE = 광물/물/보석/시크/
	SELL_AREA = AREA_SETBIT("산록산정")
CASE 813
	NAME_ADJECT = 黄玉の
	MAGNIF_PRICE = 320
	SENSE = 광물/천둥/보석/화려/
	SELL_AREA = AREA_SETBIT("산정")
CASE 814
	NAME_ADJECT = 琥珀の
	MAGNIF_PRICE = 240
	SENSE = 광물/흙/보석/식물/시크/섬세/
	SELL_AREA = AREA_SETBIT("숲")
CASE 815
	NAME_ADJECT = 紺珠の
	MAGNIF_PRICE = 360
	SENSE = 광물/물/보석/화려/
	SELL_AREA = AREA_SETBIT("달")
CASE 816
	NAME_ADJECT = 白金の
	MAGNIF_PRICE = 720
	SENSE = 광물/빛/보석/금속/시크/파워풀/
	SELL_AREA = AREA_SETBIT("신사")
CASE 817
	NAME_ADJECT = 猫目石の
	MAGNIF_PRICE = 210
	SENSE = 광물/보석/동물/시크/
	SELL_AREA = AREA_SETBIT("명계")
CASE 818
	NAME_ADJECT = 黒曜石の
	MAGNIF_PRICE = 220
	SENSE = 광물/어둠/보석/시크/
	SELL_AREA = AREA_SETBIT("지저")
CASE 819
	NAME_ADJECT = 黒玉の
	MAGNIF_PRICE = 340
	SENSE = 광물/어둠/보석/시크/파워풀/지적/
	SELL_AREA = AREA_SETBIT("산록")
CASE 820
	NAME_ADJECT = 白亜の
	MAGNIF_PRICE = 160
	SENSE = 광물/보석/시크/
	SELL_AREA = AREA_SETBIT("달")
CASE 821
	NAME_ADJECT = 瑪瑙の
	MAGNIF_PRICE = 215
	SENSE = 광물/보석/시크/지적/
	SELL_AREA = AREA_SETBIT("신사")
CASE 822
	NAME_ADJECT = 真鍮の
	MAGNIF_PRICE = 215
	SENSE = 광물/보석/시크/
	SELL_AREA = AREA_SETBIT("절")
CASE 823
	NAME_ADJECT = 電気石の
	MAGNIF_PRICE = 205
	SENSE = 광물/천둥/보석/시크/
	SELL_AREA = AREA_SETBIT("산록")
CASE 824
	NAME_ADJECT = 柘榴石の
	MAGNIF_PRICE = 205
	SENSE = 광물/보석/시크/
	SELL_AREA = AREA_SETBIT("호수")
CASE 825
	NAME_ADJECT = 蛍石の
	MAGNIF_PRICE = 205
	SENSE = 광물/보석/시크/
	SELL_AREA = AREA_SETBIT("죽림")
CASE 826
	NAME_ADJECT = 월장석의
	MAGNIF_PRICE = 215
	SENSE = 광물/달/보석/시크/
	SELL_AREA = AREA_SETBIT("달")
CASE 827
	NAME_ADJECT = 太陽石の
	MAGNIF_PRICE = 250
	SENSE = 광물/해/보석/화려/
	SELL_AREA = AREA_SETBIT("지저")
CASE 828
	NAME_ADJECT = 보석의
	MAGNIF_PRICE = 300
	SENSE = 광물/보석/심플/화려/
	SELL_AREA = AREA_SETBIT("전부")
CASE 829
	NAME_ADJECT = 뼈로만든
	MAGNIF_PRICE = 50
	SENSE = 광물/뼈/무서움/섬세/
	SELL_AREA = AREA_SETBIT("절숲명계지저")
CASE 830
	NAME_ADJECT = 鋼鉄の
	MAGNIF_PRICE = 150
	SENSE = 광물/금속/심플/파워풀/
	SELL_AREA = AREA_SETBIT("산정지저달")
CASE 831
	NAME_ADJECT = プラスチックの
	MAGNIF_PRICE = 30
	SENSE = 광물/심플/로리타/
	SELL_AREA = AREA_SETBIT("마을산록")
CASE 832
	NAME_ADJECT = ガラスの
	MAGNIF_PRICE = 120
	SENSE = 광물/섬세/
	SELL_AREA = AREA_SETBIT("마을호수명계지저")
CASE 833
	NAME_ADJECT = クリスタルの
	MAGNIF_PRICE = 700
	SENSE = 광물/얼음/보석/섬세/
	SELL_AREA = AREA_SETBIT("호수산록")
CASE 834
	NAME_ADJECT = オリハルコンの
	MAGNIF_PRICE = 850
	SENSE = 광물/보석/금속/화려/섬세/
	SELL_AREA = AREA_SETBIT("죽림명계")
CASE 835
	NAME_ADJECT = メテオライトの
	MAGNIF_PRICE = 450
	SENSE = 광물/별/금속/파워풀/
	SELL_AREA = AREA_SETBIT("숲달")
CASE 836
	NAME_ADJECT = セラミックの
	MAGNIF_PRICE = 110
	SENSE = 광물/흙/레트로/시크/
	SELL_AREA = AREA_SETBIT("명계")
CASE 837
	NAME_ADJECT = ミスリルの
	MAGNIF_PRICE = 320
	SENSE = 광물/금속/시크/
	SELL_AREA = AREA_SETBIT("절지저")
CASE 838
	NAME_ADJECT = 精霊銀の
	MAGNIF_PRICE = 380
	SENSE = 광물/자연/금속/마법/시크/섬세/지적/
	SELL_AREA = AREA_SETBIT("신사산정")
CASE 839
	NAME_ADJECT = 마석의
	MAGNIF_PRICE = 250
	SENSE = 광물/마법/서양풍/
	SELL_AREA = AREA_SETBIT("호수숲")
CASE 840
	NAME_ADJECT = 要石の
	MAGNIF_PRICE = 240
	SENSE = 광물/흙/신령/주술/일본풍/파워풀/
	SELL_AREA = AREA_SETBIT("산정")
CASE 841
	NAME_ADJECT = サンゴの
	MAGNIF_PRICE = 110
	SENSE = 광물/물/자연/귀여운/팝/섬세/
	SELL_AREA = AREA_SETBIT("마을")
CASE 842
	NAME_ADJECT = 貝殻の
	MAGNIF_PRICE = 80
	SENSE = 광물/물/자연/귀여운/섬세/
	SELL_AREA = AREA_SETBIT("신사마을")
CASE 843
	NAME_ADJECT = 真珠の
	MAGNIF_PRICE = 385
	SENSE = 광물/물/자연/보석/시크/섬세/
	SELL_AREA = AREA_SETBIT("호수달")
CASE 844
	NAME_ADJECT = ふにゃふにゃの
	MAGNIF_PRICE = 70
	SENSE = 광물/귀여운/기묘/팝/섬세/로리타/
	SELL_AREA = AREA_SETBIT("절마을명계달")
CASE 845
	NAME_ADJECT = つるつるの
	MAGNIF_PRICE = 90
	SENSE = 광물/귀여운/팝/로리타/
	SELL_AREA = AREA_SETBIT("마을명계산록")

CASE 901
	NAME_ADJECT = 木綿の
	MAGNIF_PRICE = 100
	SENSE = 섬유/섬유/식물/심플/시크/
	SELL_AREA = AREA_SETBIT("신사죽림숲산정")
CASE 902
	NAME_ADJECT = 絹の
	MAGNIF_PRICE = 100
	SENSE = 섬유/심플/시크/
	SELL_AREA = AREA_SETBIT("호수지저달")
CASE 903
	NAME_ADJECT = 麻の
	MAGNIF_PRICE = 100
	SENSE = 섬유/식물/심플/시크/
	SELL_AREA = AREA_SETBIT("절마을명계산록")
CASE 904
	NAME_ADJECT = 蜘蛛糸の
	MAGNIF_PRICE = 115
	SENSE = 섬유/벌레/심플/시크/
	SELL_AREA = AREA_SETBIT("숲지저")
CASE 905
	NAME_ADJECT = 注連縄の
	MAGNIF_PRICE = 320
	SENSE = 섬유/신령/주술/일본풍/화려/파워풀/
	SELL_AREA = AREA_SETBIT("신사산정")
CASE 906
	NAME_ADJECT = フェムトファイバーの
	MAGNIF_PRICE = 680
	SENSE = 섬유/달/미래/시크/섬세/불가사의/
	SELL_AREA = AREA_SETBIT("달")
CASE 907
	NAME_ADJECT = 鎖の
	MAGNIF_PRICE = 110
	SENSE = 섬유/금속/근사함/화려/파워풀/매니악/
	SELL_AREA = AREA_SETBIT("호수명계지저")
CASE 908
	NAME_ADJECT = 茨の
	MAGNIF_PRICE = 120
	SENSE = 섬유/식물/근사함/파워풀
	SELL_AREA = AREA_SETBIT("호수산록지저")
CASE 909
	NAME_ADJECT = ふかふかの
	MAGNIF_PRICE = 120
	SENSE = 섬유/새/귀여운/팝/섬세/로리타/
	SELL_AREA = AREA_SETBIT("신사마을산록")
CASE 910
	NAME_ADJECT = ふわふわの
	MAGNIF_PRICE = 120
	SENSE = 섬유/새/귀여운/팝/섬세/로리타/
	SELL_AREA = AREA_SETBIT("신사さと산정")
CASE 911
	NAME_ADJECT = もこもこの
	MAGNIF_PRICE = 120
	SENSE = 섬유/동물/귀여운/팝/섬세/로리타/
	SELL_AREA = AREA_SETBIT("마을호수산록지저")
CASE 912
	NAME_ADJECT = ふさふさの
	MAGNIF_PRICE = 120
	SENSE = 섬유/동물/귀여운/팝/섬세/로리타/
	SELL_AREA = AREA_SETBIT("마을죽림산록지저")
CASE 913
	NAME_ADJECT = もふもふの
	MAGNIF_PRICE = 120
	SENSE = 섬유/동물/귀여운/팝/섬세/로리타/
	SELL_AREA = AREA_SETBIT("마을죽림산록지저")
CASE 914
	NAME_ADJECT = にょろにょろの
	MAGNIF_PRICE = 90
	SENSE = 섬유/귀여운/팝/섬세/로리타/
	SELL_AREA = AREA_SETBIT("절마을숲산정")

CASE 1001
	NAME_ADJECT = 獣の
	MAGNIF_PRICE = 105
	SENSE = 동물/팝/파워풀/
	SELL_AREA = AREA_SETBIT("신사절마을죽림산록지저")
CASE 1002
	NAME_ADJECT = 새의
	MAGNIF_PRICE = 105
	SENSE = 바람/새/팝/
	SELL_AREA = AREA_SETBIT("마을죽림숲산정지저")
CASE 1003
	NAME_ADJECT = 물고기의
	MAGNIF_PRICE = 105
	SENSE = 물/물고기/팝/섬세/
	SELL_AREA = AREA_SETBIT("마을호수명계산정")
CASE 1004
	NAME_ADJECT = イヌの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/
	SELL_AREA = AREA_SETBIT("신사절호수죽림산정지저")
CASE 1005
	NAME_ADJECT = ネコの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/
	SELL_AREA = AREA_SETBIT("신사마을명계산록지저")
CASE 1006
	NAME_ADJECT = トラの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/파워풀/
	SELL_AREA = AREA_SETBIT("절마을죽림산록지저")
CASE 1007
	NAME_ADJECT = ネズミの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/섬세/
	SELL_AREA = AREA_SETBIT("절마을숲지저")
CASE 1008
	NAME_ADJECT = ウシの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/
	SELL_AREA = AREA_SETBIT("마을죽림지저")
CASE 1009
	NAME_ADJECT = ウサギの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/섬세/
	SELL_AREA = AREA_SETBIT("죽림지저달")
CASE 1010
	NAME_ADJECT = クマの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/
	SELL_AREA = AREA_SETBIT("숲산록산정지저")
CASE 1011
	NAME_ADJECT = ヒツジの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/섬세/
	SELL_AREA = AREA_SETBIT("신사마을지저달")
CASE 1012
	NAME_ADJECT = キツネの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/
	SELL_AREA = AREA_SETBIT("신사명계산록지저")
CASE 1013
	NAME_ADJECT = タヌキの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/
	SELL_AREA = AREA_SETBIT("절숲산록지저")
CASE 1014
	NAME_ADJECT = オオカミの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/파워풀/
	SELL_AREA = AREA_SETBIT("죽림명계산정지저")
CASE 1015
	NAME_ADJECT = ウマの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/파워풀/
	SELL_AREA = AREA_SETBIT("마을명계지저")
CASE 1016
	NAME_ADJECT = バクの
	MAGNIF_PRICE = 110
	SENSE = 동물/팝/불가사의/
	SELL_AREA = AREA_SETBIT("지저달")
CASE 1017
	NAME_ADJECT = カワウソの
	MAGNIF_PRICE = 110
	SENSE = 물/동물/팝/지적/
	SELL_AREA = AREA_SETBIT("호수명계산록지저")
CASE 1018
	NAME_ADJECT = カエルの
	MAGNIF_PRICE = 110
	SENSE = 물/동물/팝/섬세/
	SELL_AREA = AREA_SETBIT("호수산록산정지저")
CASE 1019
	NAME_ADJECT = ヘビの
	MAGNIF_PRICE = 110
	SENSE = 동물/독/팝/
	SELL_AREA = AREA_SETBIT("산록산정지저")
CASE 1020
	NAME_ADJECT = コウモリの
	MAGNIF_PRICE = 110
	SENSE = 어둠/동물/피/팝/
	SELL_AREA = AREA_SETBIT("호수숲지저")
CASE 1021
	NAME_ADJECT = スズメの
	MAGNIF_PRICE = 110
	SENSE = 새/팝/섬세/
	SELL_AREA = AREA_SETBIT("신사죽림지저")
CASE 1022
	NAME_ADJECT = カラスの
	MAGNIF_PRICE = 110
	SENSE = 어둠/새/팝/지적/
	SELL_AREA = AREA_SETBIT("호수숲산정지저")
CASE 1023
	NAME_ADJECT = ワシの
	MAGNIF_PRICE = 110
	SENSE = 바람/새/팝/파워풀/
	SELL_AREA = AREA_SETBIT("신사명계산록지저")
CASE 1024
	NAME_ADJECT = タカの
	MAGNIF_PRICE = 110
	SENSE = 바람/새/팝/파워풀/
	SELL_AREA = AREA_SETBIT("산록산정지저")
CASE 1025
	NAME_ADJECT = ニワトリの
	MAGNIF_PRICE = 110
	SENSE = 새/팝/섬세/
	SELL_AREA = AREA_SETBIT("신사절마을명계산정지저")
CASE 1026
	NAME_ADJECT = ミミズクの
	MAGNIF_PRICE = 110
	SENSE = 새/팝/지적/
	SELL_AREA = AREA_SETBIT("절숲산록지저")
CASE 1027
	NAME_ADJECT = カメの
	MAGNIF_PRICE = 110
	SENSE = 물/동물/팝/섬세/
	SELL_AREA = AREA_SETBIT("신사산록산정지저달")
CASE 1028
	NAME_ADJECT = クラゲの
	MAGNIF_PRICE = 110
	SENSE = 물/물고기/독/팝/섬세/
	SELL_AREA = AREA_SETBIT("명계달")
CASE 1029
	NAME_ADJECT = イルカの
	MAGNIF_PRICE = 110
	SENSE = 물/동물/물고기/팝/
	SELL_AREA = AREA_SETBIT("달")
CASE 1030
	NAME_ADJECT = クジラの
	MAGNIF_PRICE = 110
	SENSE = 물/동물/물고기/팝/파워풀/
	SELL_AREA = AREA_SETBIT("달")
CASE 1031
	NAME_ADJECT = 揚羽蝶の
	MAGNIF_PRICE = 120
	SENSE = 바람/벌레/아름다움/팝/화려/
	SELL_AREA = AREA_SETBIT("신사죽림숲산정")
CASE 1032
	NAME_ADJECT = 蓮花蝶の
	MAGNIF_PRICE = 255
	SENSE = 벌레/주술/질서/아름다움/예술적/일본풍/화려/
	SELL_AREA = AREA_SETBIT("신사")
CASE 1033
	NAME_ADJECT = 黒死蝶の
	MAGNIF_PRICE = 255
	SENSE = 어둠/벌레/독/사생/요술/혼돈/아름다움/예술적/일본풍/화려/
	SELL_AREA = AREA_SETBIT("명계")
CASE 1034
	NAME_ADJECT = 魔界蝶の
	MAGNIF_PRICE = 255
	SENSE = 빛/벌레/마법/아름다움/예술적/서양풍/화려/
	SELL_AREA = AREA_SETBIT("절숲")
CASE 1035
	NAME_ADJECT = 蜘蛛の
	MAGNIF_PRICE = 100
	SENSE = 벌레/독/무서움/팝/시크/
	SELL_AREA = AREA_SETBIT("명계지저")
CASE 1036
	NAME_ADJECT = 毒蛾の
	MAGNIF_PRICE = 110
	SENSE = 어둠/벌레/독/무서움/화려/
	SELL_AREA = AREA_SETBIT("죽림명계")
CASE 1037
	NAME_ADJECT = 深海魚の
	MAGNIF_PRICE = 130
	SENSE = 물/물고기/무서움/기묘/섬세/불가사의/매니악/
	SELL_AREA = AREA_SETBIT("명계달")
CASE 1038
	NAME_ADJECT = 古代魚の
	MAGNIF_PRICE = 150
	SENSE = 물/물고기/근사함/레트로/지적/
	SELL_AREA = AREA_SETBIT("명계달")

CASE 1101
	NAME_ADJECT = サクラの
	MAGNIF_PRICE = 120
	SENSE = 식물/아름다움/일본풍/섬세/
	SELL_AREA = AREA_SETBIT("신사명계")
CASE 1102
	NAME_ADJECT = バラの
	MAGNIF_PRICE = 120
	SENSE = 식물/아름다움/서양풍/파워풀/
	SELL_AREA = AREA_SETBIT("지저")
CASE 1103
	NAME_ADJECT = ヒマワリの
	MAGNIF_PRICE = 120
	SENSE = 해/식물/귀여운/파워풀/
	SELL_AREA = AREA_SETBIT("죽림")
CASE 1104
	NAME_ADJECT = スミレの
	MAGNIF_PRICE = 120
	SENSE = 식물/귀여운/섬세/
	SELL_AREA = AREA_SETBIT("신사마을숲")
CASE 1105
	NAME_ADJECT = ユリの
	MAGNIF_PRICE = 120
	SENSE = 식물/아름다움/섬세/
	SELL_AREA = AREA_SETBIT("신사마을산록달")
CASE 1106
	NAME_ADJECT = キクの
	MAGNIF_PRICE = 120
	SENSE = 식물/아름다움/일본풍/섬세/
	SELL_AREA = AREA_SETBIT("절마을산정달")
CASE 1107
	NAME_ADJECT = アジサイの
	MAGNIF_PRICE = 120
	SENSE = 물/식물/귀여운/섬세/
	SELL_AREA = AREA_SETBIT("절마을숲산록")
CASE 1108
	NAME_ADJECT = スズランの
	MAGNIF_PRICE = 120
	SENSE = 식물/독/귀여운/섬세/
	SELL_AREA = AREA_SETBIT("호수죽림명계")
CASE 1109
	NAME_ADJECT = カエデの
	MAGNIF_PRICE = 120
	SENSE = 바람/식물/아름다움/일본풍/
	SELL_AREA = AREA_SETBIT("산록산정")
CASE 1110
	NAME_ADJECT = キノコの
	MAGNIF_PRICE = 120
	SENSE = 식물/독/귀여운/팝/
	SELL_AREA = AREA_SETBIT("죽림숲지저")
CASE 1111
	NAME_ADJECT = 사과의
	MAGNIF_PRICE = 120
	SENSE = 식물/열매/귀여운/팝/지적/
	SELL_AREA = AREA_SETBIT("마을숲산록")
CASE 1112
	NAME_ADJECT = 복숭아의
	MAGNIF_PRICE = 120
	SENSE = 식물/열매/귀여운/팝/
	SELL_AREA = AREA_SETBIT("마을산정달")
CASE 1113
	NAME_ADJECT = 오렌지의
	MAGNIF_PRICE = 120
	SENSE = 식물/열매/귀여운/팝/
	SELL_AREA = AREA_SETBIT("마을호수명계")
CASE 1114
	NAME_ADJECT = 딸기의
	MAGNIF_PRICE = 120
	SENSE = 식물/열매/귀여운/팝/섬세/로리타/
	SELL_AREA = AREA_SETBIT("마을호수산정")
CASE 1115
	NAME_ADJECT = ブドウの
	MAGNIF_PRICE = 120
	SENSE = 식물/열매/귀여운/팝/
	SELL_AREA = AREA_SETBIT("절마을산록")
CASE 1116
	NAME_ADJECT = サクランボの
	MAGNIF_PRICE = 120
	SENSE = 식물/열매/귀여운/팝/로리타/
	SELL_AREA = AREA_SETBIT("신사마을명계")
CASE 1117
	NAME_ADJECT = 수박의
	MAGNIF_PRICE = 120
	SENSE = 물/식물/열매/귀여운/팝/
	SELL_AREA = AREA_SETBIT("신사마을산록")
CASE 1118
	NAME_ADJECT = キュウリの
	MAGNIF_PRICE = 120
	SENSE = 물/식물/열매/귀여운/팝/
	SELL_AREA = AREA_SETBIT("마을호수산록")
CASE 1119
	NAME_ADJECT = 四葉の
	MAGNIF_PRICE = 120
	SENSE = 식물/귀여운/서양풍/섬세/
	SELL_AREA = AREA_SETBIT("신사마을숲")
CASE 1120
	NAME_ADJECT = 紅葉の
	MAGNIF_PRICE = 120
	SENSE = 흙/식물/자연/아름다움/일본풍/
	SELL_AREA = AREA_SETBIT("산록산정")
CASE 1121
	NAME_ADJECT = 葉っぱの
	MAGNIF_PRICE = 90
	SENSE = 흙/식물/귀여운/섬세/
	SELL_AREA = AREA_SETBIT("절숲산록산정")

CASE 1201
	NAME_ADJECT = 妖精の
	MAGNIF_PRICE = 155
	SENSE = 자연/귀여운/로리타/
	SELL_AREA = AREA_SETBIT("신사호수죽림숲")
CASE 1202
	NAME_ADJECT = 요괴의
	MAGNIF_PRICE = 180
	SENSE = 요괴/
	SELL_AREA = AREA_SETBIT("절숲산록산정지저")
CASE 1203
	NAME_ADJECT = 妖魔の
	MAGNIF_PRICE = 185
	SENSE = 요괴/
	SELL_AREA = AREA_SETBIT("호수죽림명계")
CASE 1204
	NAME_ADJECT = 幻獣の
	MAGNIF_PRICE = 210
	SENSE = 동물/
	SELL_AREA = AREA_SETBIT("신사절달")
CASE 1205
	NAME_ADJECT = 河童の
	MAGNIF_PRICE = 190
	SENSE = 물/요괴/섬세/매니악/
	SELL_AREA = AREA_SETBIT("산록")
CASE 1206
	NAME_ADJECT = 天狗の
	MAGNIF_PRICE = 270
	SENSE = 바람/요괴/일본풍/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1207
	NAME_ADJECT = 오니의
	MAGNIF_PRICE = 350
	SENSE = 요괴/무서움/일본풍/파워풀/
	SELL_AREA = AREA_SETBIT("지저")
CASE 1208
	NAME_ADJECT = 인어의
	MAGNIF_PRICE = 270
	SENSE = 물/요괴/귀여운/서양풍/섬세/
	SELL_AREA = AREA_SETBIT("호수")
CASE 1209
	NAME_ADJECT = 소인의
	MAGNIF_PRICE = 270
	SENSE = 요괴/귀여운/섬세/
	SELL_AREA = AREA_SETBIT("신사")
CASE 1210
	NAME_ADJECT = 얼음요정의
	MAGNIF_PRICE = 180
	SENSE = 얼음/자연/귀여운/
	SELL_AREA = AREA_SETBIT("호수")
CASE 1211
	NAME_ADJECT = 白蛇の
	MAGNIF_PRICE = 180
	SENSE = 동물/아름다움/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1212
	NAME_ADJECT = 獅子の
	MAGNIF_PRICE = 210
	SENSE = 동물/근사함/대륙풍/파워풀/
	SELL_AREA = AREA_SETBIT("산록")
CASE 1213
	NAME_ADJECT = 麒麟の
	MAGNIF_PRICE = 270
	SENSE = 천둥/동물/근사함/대륙풍/
	SELL_AREA = AREA_SETBIT("달")
CASE 1214
	NAME_ADJECT = 鳳凰の
	MAGNIF_PRICE = 390
	SENSE = 불/새/근사함/대륙풍/파워풀/
	SELL_AREA = AREA_SETBIT("죽림")
CASE 1215
	NAME_ADJECT = 天馬の
	MAGNIF_PRICE = 270
	SENSE = 바람/동물/새/질서/아름다움/서양풍/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1216
	NAME_ADJECT = 龍の
	MAGNIF_PRICE = 390
	SENSE = 신령/질서/근사함/일본풍/대륙풍/
	SELL_AREA = AREA_SETBIT("신사호수숲산정")
CASE 1217
	NAME_ADJECT = 海神の
	MAGNIF_PRICE = 450
	SENSE = 물/신령/질서/근사함/위엄/
	SELL_AREA = AREA_SETBIT("달")
CASE 1218
	NAME_ADJECT = 물의 신의
	MAGNIF_PRICE = 450
	SENSE = 물/신령/질서/근사함/위엄/
	SELL_AREA = AREA_SETBIT("호수산록달")
CASE 1219
	NAME_ADJECT = 龍神の
	MAGNIF_PRICE = 450
	SENSE = 신령/질서/근사함/일본풍/대륙풍/파워풀/위엄/
	SELL_AREA = AREA_SETBIT("신사마을산정")
CASE 1220
	NAME_ADJECT = 天使の
	MAGNIF_PRICE = 180
	SENSE = 빛/신령/질서/아름다움/서양풍/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1221
	NAME_ADJECT = 悪魔の
	MAGNIF_PRICE = 180
	SENSE = 어둠/요괴/혼돈/무서움/서양풍/
	SELL_AREA = AREA_SETBIT("호수명계지저")
CASE 1222
	NAME_ADJECT = ドラゴンの
	MAGNIF_PRICE = 180
	SENSE = 불/동물/혼돈/근사함/서양풍/파워풀/
	SELL_AREA = AREA_SETBIT("호수숲산록")
CASE 1223
	NAME_ADJECT = 망령의
	MAGNIF_PRICE = 210
	SENSE = 유령/혼돈/무서움/
	SELL_AREA = AREA_SETBIT("절명계")
CASE 1224
	NAME_ADJECT = 사령의
	MAGNIF_PRICE = 210
	SENSE = 어둠/유령/혼돈/무서움/
	SELL_AREA = AREA_SETBIT("절명계지저")
CASE 1225
	NAME_ADJECT = 地霊の
	MAGNIF_PRICE = 170
	SENSE = 유령/혼돈/무서움/
	SELL_AREA = AREA_SETBIT("지저")
CASE 1226
	NAME_ADJECT = 사신의
	MAGNIF_PRICE = 270
	SENSE = 어둠/유령/뼈/혼돈/무서움/
	SELL_AREA = AREA_SETBIT("명계")
CASE 1227
	NAME_ADJECT = 마녀의
	MAGNIF_PRICE = 270
	SENSE = 요괴/마법/혼돈/무서움/기묘/서양풍/지적/
	SELL_AREA = AREA_SETBIT("호수숲")
CASE 1228
	NAME_ADJECT = 紅魔の
	MAGNIF_PRICE = 230
	SENSE = 요괴/피/마법/혼돈/서양풍/
	SELL_AREA = AREA_SETBIT("호수")
CASE 1229
	NAME_ADJECT = 신령의
	MAGNIF_PRICE = 230
	SENSE = 신령/
	SELL_AREA = AREA_SETBIT("신사절산정달")
CASE 1230
	NAME_ADJECT = 風神の
	MAGNIF_PRICE = 390
	SENSE = 바람/신령/근사함/일본풍/위엄/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1231
	NAME_ADJECT = 雷神の
	MAGNIF_PRICE = 390
	SENSE = 천둥/신령/근사함/일본풍/위엄/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1232
	NAME_ADJECT = 마신의
	MAGNIF_PRICE = 390
	SENSE = 신령/마법/혼돈/근사함/파워풀/위엄/
	SELL_AREA = AREA_SETBIT("절숲지저")
CASE 1233
	NAME_ADJECT = 선인의
	MAGNIF_PRICE = 270
	SENSE = 질서/근사함/대륙풍/지적/
	SELL_AREA = AREA_SETBIT("절산록")
CASE 1234
	NAME_ADJECT = 천인의
	MAGNIF_PRICE = 270
	SENSE = 질서/근사함/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1235
	NAME_ADJECT = 天女の
	MAGNIF_PRICE = 270
	SENSE = 바람/질서/아름다움/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1236
	NAME_ADJECT = 여신의
	MAGNIF_PRICE = 330
	SENSE = 신령/질서/아름다움/위엄/
	SELL_AREA = AREA_SETBIT("달")
CASE 1237
	NAME_ADJECT = 冥王の
	MAGNIF_PRICE = 330
	SENSE = 신령/근사함/파워풀/위엄/
	SELL_AREA = AREA_SETBIT("명계")
CASE 1238
	NAME_ADJECT = 메이드의
	MAGNIF_PRICE = 160
	SENSE = 질서/아름다움/서양풍/시크/
	SELL_AREA = AREA_SETBIT("호수죽림")
CASE 1239
	NAME_ADJECT = 騎士の
	MAGNIF_PRICE = 170
	SENSE = 질서/근사함/서양풍/시크/
	SELL_AREA = AREA_SETBIT("호수")
CASE 1240
	NAME_ADJECT = 왕녀의
	MAGNIF_PRICE = 350
	SENSE = 귀여운/서양풍/섬세/
	SELL_AREA = AREA_SETBIT("호수")
CASE 1241
	NAME_ADJECT = 여왕의
	MAGNIF_PRICE = 390
	SENSE = 아름다움/서양풍/파워풀/위엄/
	SELL_AREA = AREA_SETBIT("호수")
CASE 1242
	NAME_ADJECT = 왕자의
	MAGNIF_PRICE = 310
	SENSE = 근사함/파워풀/위엄/
	SELL_AREA = AREA_SETBIT("마을")
CASE 1243
	NAME_ADJECT = 酔神の
	MAGNIF_PRICE = 280
	SENSE = 신령/술/기묘/위엄/
	SELL_AREA = AREA_SETBIT("신사")
CASE 1244
	NAME_ADJECT = 呑んべぇの
	MAGNIF_PRICE = 190
	SENSE = 술/기묘/매니악/
	SELL_AREA = AREA_SETBIT("신사")
CASE 1245
	NAME_ADJECT = 酔人の
	MAGNIF_PRICE = 210
	SENSE = 술/기묘/
	SELL_AREA = AREA_SETBIT("명계산록지저")
CASE 1246
	NAME_ADJECT = 賢者の
	MAGNIF_PRICE = 270
	SENSE = 근사함/시크/지적/위엄/
	SELL_AREA = AREA_SETBIT("호수죽림달")
CASE 1247
	NAME_ADJECT = 무녀의
	MAGNIF_PRICE = 250
	SENSE = 신령/질서/귀여운/일본풍/
	SELL_AREA = AREA_SETBIT("신사산정")
CASE 1248
	NAME_ADJECT = 式神の
	MAGNIF_PRICE = 190
	SENSE = 요괴/질서/일본풍/대륙풍/
	SELL_AREA = AREA_SETBIT("명계")
CASE 1249
	NAME_ADJECT = 憑坐の
	MAGNIF_PRICE = 170
	SENSE = 기묘/일본풍/
	SELL_AREA = AREA_SETBIT("명계")

CASE 1301
	NAME_ADJECT = 불의
	MAGNIF_PRICE = 120
	SENSE = 불/자연/근사함/심플/
	SELL_AREA = AREA_SETBIT("죽림숲지저")
CASE 1302
	NAME_ADJECT = 물의
	MAGNIF_PRICE = 120
	SENSE = 물/자연/귀여운/심플/
	SELL_AREA = AREA_SETBIT("호수산록달")
CASE 1303
	NAME_ADJECT = 흙의
	MAGNIF_PRICE = 120
	SENSE = 흙/자연/아름다움/심플/
	SELL_AREA = AREA_SETBIT("절산정지저")
CASE 1304
	NAME_ADJECT = 바람의
	MAGNIF_PRICE = 120
	SENSE = 바람/자연/아름다움/심플/
	SELL_AREA = AREA_SETBIT("신사명계산정")
CASE 1305
	NAME_ADJECT = 얼음의
	MAGNIF_PRICE = 120
	SENSE = 얼음/자연/아름다움/
	SELL_AREA = AREA_SETBIT("호수명계")
CASE 1306 ;KR판 / 임의수정
	NAME_ADJECT = 炎の
	MAGNIF_PRICE = 120
	SENSE = 불/자연/근사함/
	SELL_AREA = AREA_SETBIT("죽림지저")
CASE 1307
	NAME_ADJECT = 大地の
	MAGNIF_PRICE = 125
	SENSE = 흙/자연/아름다움/
	SELL_AREA = AREA_SETBIT("신사산록")
CASE 1308
	NAME_ADJECT = 天空の
	MAGNIF_PRICE = 125
	SENSE = 바람/자연/아름다움/
	SELL_AREA = AREA_SETBIT("명계산정")
CASE 1309
	NAME_ADJECT = 光の
	MAGNIF_PRICE = 125
	SENSE = 빛/자연/근사함/심플/
	SELL_AREA = AREA_SETBIT("신사달")
CASE 1310
	NAME_ADJECT = 闇の
	MAGNIF_PRICE = 125
	SENSE = 어둠/자연/근사함/심플/
	SELL_AREA = AREA_SETBIT("명계지저")
CASE 1311
	NAME_ADJECT = 태양의
	MAGNIF_PRICE = 125
	SENSE = 해/자연/근사함/
	SELL_AREA = AREA_SETBIT("지저달")
CASE 1312
	NAME_ADJECT = 별의
	MAGNIF_PRICE = 125
	SENSE = 별/자연/귀여운/
	SELL_AREA = AREA_SETBIT("숲달")
CASE 1313
	NAME_ADJECT = 달의
	MAGNIF_PRICE = 125
	SENSE = 달/자연/아름다움/
	SELL_AREA = AREA_SETBIT("죽림달")
CASE 1314
	NAME_ADJECT = 雲の
	MAGNIF_PRICE = 120
	SENSE = 바람/자연/귀여운/
	SELL_AREA = AREA_SETBIT("절산정")
CASE 1315
	NAME_ADJECT = 雨の
	MAGNIF_PRICE = 120
	SENSE = 물/자연/귀여운/섬세/
	SELL_AREA = AREA_SETBIT("절죽림산록")
CASE 1316
	NAME_ADJECT = 霞の
	MAGNIF_PRICE = 120
	SENSE = 바람/자연/아름다움/섬세/
	SELL_AREA = AREA_SETBIT("명계산록")
CASE 1317
	NAME_ADJECT = 霧の
	MAGNIF_PRICE = 120
	SENSE = 물/자연/아름다움/섬세/
	SELL_AREA = AREA_SETBIT("호수숲")
CASE 1318
	NAME_ADJECT = 雪の
	MAGNIF_PRICE = 120
	SENSE = 얼음/자연/귀여운/섬세/
	SELL_AREA = AREA_SETBIT("신사호수지저")
CASE 1319
	NAME_ADJECT = 雷の
	MAGNIF_PRICE = 120
	SENSE = 천둥/자연/근사함/화려/
	SELL_AREA = AREA_SETBIT("절산정")
CASE 1320
	NAME_ADJECT = 嵐の
	MAGNIF_PRICE = 125
	SENSE = 바람/천둥/자연/근사함/파워풀/
	SELL_AREA = AREA_SETBIT("절숲")
CASE 1321
	NAME_ADJECT = 虹の
	MAGNIF_PRICE = 125
	SENSE = 빛/자연/귀여운/화려/
	SELL_AREA = AREA_SETBIT("절숲산정")
CASE 1322
	NAME_ADJECT = 숲의
	MAGNIF_PRICE = 120
	SENSE = 흙/자연/식물/귀여운/시크/
	SELL_AREA = AREA_SETBIT("숲산록")
CASE 1323
	NAME_ADJECT = 꽃의
	MAGNIF_PRICE = 120
	SENSE = 흙/자연/식물/귀여운/시크/
	SELL_AREA = AREA_SETBIT("마을죽림명계")
CASE 1324
	NAME_ADJECT = 華の
	MAGNIF_PRICE = 125
	SENSE = 흙/자연/식물/아름다움/화려/
	SELL_AREA = AREA_SETBIT("절산록")
CASE 1325
	NAME_ADJECT = 海の
	MAGNIF_PRICE = 120
	SENSE = 물/자연/귀여운/
	SELL_AREA = AREA_SETBIT("달")
CASE 1326
	NAME_ADJECT = 山の
	MAGNIF_PRICE = 120
	SENSE = 흙/자연/아름다움/
	SELL_AREA = AREA_SETBIT("산록산정")
CASE 1327
	NAME_ADJECT = 凍った
	MAGNIF_PRICE = 120
	SENSE = 얼음/자연/아름다움/기묘/섬세/불가사의/
	SELL_AREA = AREA_SETBIT("호수명계달")
CASE 1328
	NAME_ADJECT = 燃える
	MAGNIF_PRICE = 120
	SENSE = 불/자연/근사함/기묘/파워풀/불가사의/
	SELL_AREA = AREA_SETBIT("죽림지저")
CASE 1329
	NAME_ADJECT = 深海の
	MAGNIF_PRICE = 125
	SENSE = 물/자연/무서움/시크/
	SELL_AREA = AREA_SETBIT("달")
CASE 1330
	NAME_ADJECT = 업화의
	MAGNIF_PRICE = 125
	SENSE = 불/자연/근사함/파워풀/
	SELL_AREA = AREA_SETBIT("지저")
CASE 1331
	NAME_ADJECT = 核熱の
	MAGNIF_PRICE = 125
	SENSE = 불/자연/근사함/파워풀/
	SELL_AREA = AREA_SETBIT("지저")
CASE 1332
	NAME_ADJECT = 疾風の
	MAGNIF_PRICE = 125
	SENSE = 바람/자연/근사함/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1333
	NAME_ADJECT = 神風の
	MAGNIF_PRICE = 125
	SENSE = 바람/자연/근사함/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1334
	NAME_ADJECT = 반딧불의
	MAGNIF_PRICE = 125
	SENSE = 빛/자연/벌레/아름다움/섬세/
	SELL_AREA = AREA_SETBIT("죽림숲")
CASE 1335
	NAME_ADJECT = 新緑の
	MAGNIF_PRICE = 125
	SENSE = 흙/자연/식물/귀여운/섬세/
	SELL_AREA = AREA_SETBIT("신사죽림산록산정")
CASE 1336
	NAME_ADJECT = 빙결의
	MAGNIF_PRICE = 125
	SENSE = 얼음/자연/근사함/
	SELL_AREA = AREA_SETBIT("호수")
CASE 1337
	NAME_ADJECT = 빙하의
	MAGNIF_PRICE = 125
	SENSE = 얼음/자연/아름다움/
	SELL_AREA = AREA_SETBIT("호수")
CASE 1338
	NAME_ADJECT = 稲妻の
	MAGNIF_PRICE = 125
	SENSE = 천둥/자연/근사함/파워풀/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1339
	NAME_ADJECT = 晴天の
	MAGNIF_PRICE = 125
	SENSE = 해/자연/귀여운/
	SELL_AREA = AREA_SETBIT("신사")
CASE 1340
	NAME_ADJECT = 暁の
	MAGNIF_PRICE = 135
	SENSE = 해/자연/아름다움/시크/
	SELL_AREA = AREA_SETBIT("절")
CASE 1341
	NAME_ADJECT = 日輪の
	MAGNIF_PRICE = 135
	SENSE = 해/자연/근사함/
	SELL_AREA = AREA_SETBIT("절")
CASE 1342
	NAME_ADJECT = 幻日の
	MAGNIF_PRICE = 135
	SENSE = 해/자연/아름다움/섬세/
	SELL_AREA = AREA_SETBIT("죽림")
CASE 1343
	NAME_ADJECT = 極光の
	MAGNIF_PRICE = 145
	SENSE = 해/자연/아름다움/파워풀/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1344
	NAME_ADJECT = 陽光の
	MAGNIF_PRICE = 145
	SENSE = 해/자연/아름다움/
	SELL_AREA = AREA_SETBIT("죽림")
CASE 1345
	NAME_ADJECT = 黄昏の
	MAGNIF_PRICE = 145
	SENSE = 해/자연/아름다움/섬세/
	SELL_AREA = AREA_SETBIT("명계")
CASE 1346
	NAME_ADJECT = 宵闇の
	MAGNIF_PRICE = 145
	SENSE = 어둠/자연/무서움/
	SELL_AREA = AREA_SETBIT("절숲")
CASE 1347
	NAME_ADJECT = 夜の
	MAGNIF_PRICE = 125
	SENSE = 어둠/자연/무서움/
	SELL_AREA = AREA_SETBIT("호수죽림달")
CASE 1348
	NAME_ADJECT = 夜帳の
	MAGNIF_PRICE = 135
	SENSE = 어둠/자연/아름다움/
	SELL_AREA = AREA_SETBIT("죽림명계")
CASE 1349
	NAME_ADJECT = 永夜の
	MAGNIF_PRICE = 165
	SENSE = 어둠/자연/아름다움/시크/
	SELL_AREA = AREA_SETBIT("죽림")
CASE 1350
	NAME_ADJECT = 星空の
	MAGNIF_PRICE = 135
	SENSE = 별/자연/아름다움/
	SELL_AREA = AREA_SETBIT("숲달")
CASE 1351
	NAME_ADJECT = 星光の
	MAGNIF_PRICE = 125
	SENSE = 별/자연/귀여운/
	SELL_AREA = AREA_SETBIT("신사달")
CASE 1352
	NAME_ADJECT = 칠성의
	MAGNIF_PRICE = 165
	SENSE = 별/자연/아름다움/화려/
	SELL_AREA = AREA_SETBIT("절명계")
CASE 1353
	NAME_ADJECT = 혜성의
	MAGNIF_PRICE = 135
	SENSE = 별/자연/근사함/파워풀/
	SELL_AREA = AREA_SETBIT("숲")
CASE 1354
	NAME_ADJECT = 星座の
	MAGNIF_PRICE = 125
	SENSE = 별/자연/아름다움//
	SELL_AREA = AREA_SETBIT("산록달")
CASE 1355
	NAME_ADJECT = 星屑の
	MAGNIF_PRICE = 125
	SENSE = 별/자연/귀여운/
	SELL_AREA = AREA_SETBIT("숲달")
CASE 1356
	NAME_ADJECT = 客星の
	MAGNIF_PRICE = 135
	SENSE = 별/빛/자연/근사함/화려/파워풀/
	SELL_AREA = AREA_SETBIT("산정")
CASE 1357
	NAME_ADJECT = 星降る
	MAGNIF_PRICE = 155
	SENSE = 별/자연/귀여운/
	SELL_AREA = AREA_SETBIT("숲")
CASE 1358
	NAME_ADJECT = 초승달의
	MAGNIF_PRICE = 125
	SENSE = 달/자연/귀여운/
	SELL_AREA = AREA_SETBIT("신사명계")
CASE 1359
	NAME_ADJECT = 만월의
	MAGNIF_PRICE = 135
	SENSE = 달/자연/아름다움/파워풀/
	SELL_AREA = AREA_SETBIT("호수죽림달")
CASE 1360
	NAME_ADJECT = 월륜의
	MAGNIF_PRICE = 125
	SENSE = 달/자연/근사함/
	SELL_AREA = AREA_SETBIT("죽림달")
CASE 1361
	NAME_ADJECT = 월광의
	MAGNIF_PRICE = 125
	SENSE = 달/자연/아름다움/
	SELL_AREA = AREA_SETBIT("호수죽림달")
CASE 1362
	NAME_ADJECT = 월형의
	MAGNIF_PRICE = 125
	SENSE = 달/자연/근사함/섬세/
	SELL_AREA = AREA_SETBIT("죽림달")
CASE 1363
	NAME_ADJECT = 사계의
	MAGNIF_PRICE = 145
	SENSE = 자연/귀여운/
	SELL_AREA = AREA_SETBIT("마을명계산록")
CASE 1364
	NAME_ADJECT = 봄의
	MAGNIF_PRICE = 125
	SENSE = 바람/자연/귀여운/
	SELL_AREA = AREA_SETBIT("신사명계")
CASE 1365
	NAME_ADJECT = 여름의
	MAGNIF_PRICE = 125
	SENSE = 불/자연/귀여운/
	SELL_AREA = AREA_SETBIT("절죽림")
CASE 1366
	NAME_ADJECT = 가을의
	MAGNIF_PRICE = 125
	SENSE = 바람/자연/귀여운/
	SELL_AREA = AREA_SETBIT("산록산정")
CASE 1367
	NAME_ADJECT = 겨울의
	MAGNIF_PRICE = 125
	SENSE = 얼음/자연/귀여운/
	SELL_AREA = AREA_SETBIT("숲지저")
CASE 1368
	NAME_ADJECT = 바캉스의
	MAGNIF_PRICE = 155
	SENSE = 흙/자연/혼돈/무서움/기묘/
	SELL_AREA = AREA_SETBIT("명계")

[SKIPSTART]
CASE
	NAME_ADJECT =
	MAGNIF_PRICE =
	SENSE =
	SELL_AREA = AREA_SETBIT("")
[SKIPEND]
CASEELSE
	VARSET RESULTS
	VARSET RESULT
	RETURN 0
ENDSELECT

VARSET RESULTS
VARSET RESULT
;分布
SIF INRANGE(NOW_AREA, 0, 10) && GETBIT(SELL_AREA, NOW_AREA)
	RESULT:0 = 1
;옷감品は광물・기술がかからない
SIF STRFIND(SENSE_MAIN, "옷감") >= 0 && STRFIND(SENSE, "광물") + STRFIND(SENSE, "기술") >= -1
	RESULT:0 = 0
;철제品は섬유がかからない
SIF STRFIND(SENSE_MAIN, "철제") >= 0 && STRFIND(SENSE, "섬유") >= 0
	RESULT:0 = 0
;초상物は광물、섬유、기술がかからない
SIF STRFIND(SENSE_MAIN, "초상") >= 0 && STRFIND(SENSE, "광물") + STRFIND(SENSE, "섬유") + STRFIND(SENSE, "기술") >= -2
	RESULT:0 = 0
;향수専用
SIF STRFIND(SENSE_MAIN, "향수") >= 0 && STRFIND(SENSE, "광물") + STRFIND(SENSE, "섬유") + STRFIND(SENSE, "기술") + STRFIND(SENSE, "모양") >= -3
	RESULT:0 = 0
;生体品は식물がかからない
SIF STRFIND(SENSE_MAIN, "생체품") >= 0 && STRFIND(SENSE, "식물") >= 0
	RESULT:0 = 0

SENSE += NAME_ADJECT + "/"

RESULT:1 = MAGNIF_PRICE
RESULT:2 = SELL_AREA
RESULTS:0 = %NAME_ADJECT%
RESULTS:1 = %SENSE%
RETURN RESULT:0

path: ERB/이벤트관련/선물관련/선물데이터_형용사.ERB

license: mit


code:
;==============================================================
;KR판 고유기능 복수연인/아내 관련
;
;Changelog
;20.7.24
;연인플래그 의존성 삭제함. 아내플래그도 의존성 삭제 가능하나 보류
;현재 아내 관련 기능은 TALENT 설정 없이 이곳 함수에만 의존하고 있음
;==============================================================
@SET_연인(ARG)
IF TALENT:ARG:스침
	IF FLAG:스침연인수 < 100
		포말의연인:(FLAG:스침연인수) = %CALLNAME:ARG%
		FLAG:스침연인수 ++
	ELSE
		포말의연인:(RAND:100) = %CALLNAME:ARG%
	ENDIF
ENDIF
SELECTCASE ARG
	CASE -1
		FLAG:스침연인수 = 0
		VARSET 포말의연인
		RETURN -1
	CASE 1 TO CHARANUM
		SIF !TALENT:ARG:연인
			TALENT:ARG:연인 = 1
	CASEELSE
		THROW NO가 부정합니다
ENDSELECT

@IS_연인(ARG)
#FUNCTION
IF TALENT:ARG:스침
	SIF FINDELEMENT(포말의연인, CALLNAME:ARG, , , 1) > 0
		RETURNF 1
	RETURNF 0
ENDIF
SELECTCASE NO:ARG
	CASE 0
		RETURNF 0
	CASE 1 TO CHARANUM
		SIF TALENT:ARG:연인 == 1
			RETURNF 1
	CASEELSE
		THROW NO가 부정합니다
ENDSELECT
RETURNF 0

[SKIPSTART]
;HOW_연인 기능 사용하는 곳이 없어 삭제.
;연인 총 수 필요시 예문.
@HOW_연인()
#FUNCTION
VARSET LOCAL
FOR LOCAL, 1, CHARANUM
	IF LOCAL == FLAG:역극
		CONTINUE
	ELSEIF IS_연인(LOCAL)
		LOCAL:1 ++
	ENDIF
NEXT
;스침상대 연인 스텍기능이 남아있을 때
LOCAL:1 += FLAG:스침연인수
RETURNF LOCAL:1
[SKIPEND]

;;
@SET_아내(ARG)
IF TALENT:ARG:스침
	IF FLAG:스침아내수 < 100
		포말의아내:(FLAG:스침아내수) = %CALLNAME:ARG%
		FLAG:스침아내수 ++
	ELSE
		포말의아내:(RAND:100) = %CALLNAME:ARG%
	ENDIF
ENDIF
SELECTCASE ARG
	CASE -1
		FLAG:아내플래그1 = 0
		FLAG:아내플래그2 = 0
		FLAG:아내플래그3 = 0
		FLAG:아내플래그4 = 0
		FLAG:스침아내수 = 0
		VARSET 포말의아내
		RETURN -1
	CASE 1 TO 35
		LOCAL = ARG
		LOCALS = 아내플래그1
	CASE 36 TO 70
		LOCAL = ARG - 35
		LOCALS = 아내플래그2
	CASE 71 TO 105
		LOCAL = ARG - 70
		LOCALS = 아내플래그3
	CASE 106 TO 140
		LOCAL = ARG - 105
		LOCALS = 아내플래그4
	CASEELSE
		THROW NO가 부정합니다
ENDSELECT
SETBIT FLAG:(LOCALS) , LOCAL

@IS_아내(ARG)
#FUNCTION
IF TALENT:ARG:스침
	SIF FINDELEMENT(포말의아내, CALLNAME:ARG, , , 1) > 0
		RETURNF 1
	RETURNF 0
ENDIF
SELECTCASE NO:ARG
	CASE 0
		RETURNF 0
	CASE 1 TO 35
		LOCAL = ARG
		LOCALS = 아내플래그1
	CASE 36 TO 70
		LOCAL = ARG - 35
		LOCALS = 아내플래그2
	CASE 71 TO 105
		LOCAL = ARG - 70
		LOCALS = 아내플래그3
	CASE 106 TO 140
		LOCAL = ARG - 105
		LOCALS = 아내플래그4
	CASEELSE
		THROW NO가 부정합니다
ENDSELECT
RETURNF (GETBIT (FLAG:(LOCALS) , LOCAL))

@WITH_아내(ARG)
#FUNCTION
;아내의 몇 사람과 ARG가 같은 장소에 있을까를 돌려준다
VARSET LOCAL
SIF ARG == 0
	ARG = MASTER
FOR LOCAL, 1, CHARANUM
	SIF CFLAG:LOCAL:현재위치 == CFLAG:ARG:현재위치
		LOCAL:1 += IS_아내(LOCAL)
NEXT
RETURNF LOCAL:1

@HOW_아내(ARG)
#FUNCTION
;아내이 지금 몇 사람 있을까를 돌려준다
VARSET LOCAL
FOR LOCAL, 1, CHARANUM
	LOCAL:1 += IS_아내(LOCAL)
NEXT
LOCAL:1 += FLAG:스침아내수
RETURNF LOCAL:1


code:
@ENKAI_SETTING
;------------------------------------------------------------------------------------------------------
;연회의 개최 판정
;------------------------------------------------------------------------------------------------------
;1턴으로 마시는 술의 양은 경과시간 * 10 통상은 30분이므로 300, 연회규모 1200이라면 2시간 정도의 연회가 된다
;주최자는 연회의 준비와 정리의 일을 해야 한다
;하루에 복수의 연회를 여는 사양은 아니기 때문에 주의(사람이 분산해 버려서 외롭고…)
;------------------------------------------------------------------------------------------------------
PRINTL

;PRINTFORMW 연회개최플래그 = {FLAG:연회개최플래그}

;개최 판정은 연회 플래그가 서 있지 않은 상태로 밖에 행해지지 않는다(버그 방지)
IF FLAG:연회개최플래그 == 0
	;메인 주최자가 출금이 되어 있다면 개최되지 않는다
	;연회 종별은 98이상에는 설정하지 않는 것
	;2 환상향 망년회 메인 주최자：없음 그믐날의 일주일전에 100%발생한다
	IF DAY:2 == 4 && DAY:3 >= 25 && DAY:3 <= 30
		;연회명
		LOCALS = 환상향 나이 잊고 회
		;연회 종별
		FLAG:연회개최플래그 = 2
		;연회규모
		FLAG:31 = 6000
		;연회회장
		FLAG:32 = 9
		;개시시간
		FLAG:33 = 900
		;개시일
		FLAG:34 = 31 - DAY:3
		;현재의 참가인수를 리셋
		FLAG:35 = 0
		;우천 중지
		FLAG:36 = 0
		PRINTL
		PRINTFORMW 망년회의 시즌이 왔다
	;달을 보면서 술을 마심
	ELSEIF DAY:2 == 3 && DAY:3 >= 1 && DAY:3 < 15
		;연회명
		LOCALS = 달을 보면서 술을 마심
		;연회 종별
		FLAG:연회개최플래그 = 3
		;연회규모
		FLAG:31 = 2000 + RAND:1000
		;회장
		FLAG:32 = 409
		;개시시간
		FLAG:33 = 1140
		;개시일
		FLAG:34 = 15 - DAY:3
		;현재의 참가인수를 리셋
		FLAG:35 = 0
		;우천 중지
		FLAG:36 = 1
		PRINTL
		IF MAIN_MAP == 4
			PRINTFORMW 에이린으로부터 달을 보면서 술을 마심에 이끌렸다
		ELSE
			PRINTFORMW 영원정으로부터 달을 보면서 술을 마심에 초대되었다
		ENDIF
	;수확제
	ELSEIF DAY:2 == 3 && DAY:3 >= 16 && DAY:3 < 27
		;연회 종별
		FLAG:연회개최플래그 = 4
		;연회규모
		FLAG:31 = 2000 + RAND:3000
		;회장
		FLAG:32 = 202
		;개시시간
		FLAG:33 = 540
		;개시일
		FLAG:34 = 27 - DAY:3
		;현재의 참가인수를 리셋
		FLAG:35 = 0
		;우천 중지
		FLAG:36 = 0
		PRINTL
		PRINTFORMW 올해도 수확제의 계절이 왔다
	; 레밀리아의 변덕인 파티 메인 주최자：레밀리아 자택이 홍마관토요일에 50%로 개최 예고, 실시일은 일요일
	ELSEIF CFLAG:16:출금 == 0 && DAY%7 == 6 && MAIN_MAP == 3 && RAND:50 <= 49
		;연회명
		LOCALS = 레밀리아의 변덕인 파티
		;연회 종별
		FLAG:연회개최플래그 = 6
		;연회규모
		FLAG:31 = 1500 + RAND:2500
		;연회회장
		FLAG:32 = 324
		;개시시간
		FLAG:33 = 1140
		;개시일
		FLAG:34 = 1
		;현재의 참가인수를 리셋
		FLAG:35 = 0
		;우천 중지
		FLAG:36 = 1
		PRINTL
		PRINTFORMW %CALLNAME:16%는 파티를 하고 싶어진 것 같다
	;SAMPLE 레이무의 변덕 술잔치 메인 주최자：레이무 토요일에 50%로 개최 예고, 실시일은 일요일
	ELSEIF CFLAG:1:출금 == 0 && DAY%7 == 6 && RAND:100 <= 49
		;연회명
		LOCALS = 레이무의 변덕 술잔치
		;연회 종별
		FLAG:연회개최플래그 = 1
		;연회규모
		FLAG:31 = 1000 + RAND:1500
		;연회회장
		IF RAND:5 <= 3
			FLAG:32 = 11
		ELSEIF RAND:4 == 0
			FLAG:32 = 2
		ELSEIF RAND:4 == 0
			FLAG:32 = 20
		ELSEIF RAND:4 == 0
			FLAG:32 = 21
		ELSE
			FLAG:32 = 218
		ENDIF
		;개시시간
		FLAG:33 = 1360 - (FLAG:31 / 10)
		;개시일
		FLAG:34 = 1
		;현재의 참가인수를 리셋
		FLAG:35 = 0
		;우천 중지
		FLAG:36 = 1
		PRINTL
		PRINTFORMW %CALLNAME:1%는 연회 하고 싶어진 것 같다
;	ELSEIF DAY:3 >= 8 && DAY:3 <= 10
;		;연회명
;		LOCALS = 밤안내 독경 라이브
;		;연회 종별
;		FLAG:연회개최플래그 = 5
;		;연회규모
;		FLAG:31 = 2000 + RAND:30 * 40
;		;연회회장
;		FLAG:32 = 104
;		;개시시간
;		FLAG:33 = 1440 + 240 - (FLAG:31 /10) ;아침 4시까지 연회 한다
;		;개시일
;		FLAG:34 = 10 - DAY:3
;		;현재의 참가인수를 리셋
;		FLAG:35 = 0
;		;우천 중지
;		FLAG:36 = 0
;		PRINTL
;		PRINTFORMW 밤안내 독경 라이브의 시기가 가까워져 왔다
	ENDIF
ENDIF
CALL SET_ENKAI_LOCATIONDISPLAY
SIF FLAG:연회개최플래그
	CALL 연회개요
PRINTL

@ENKAI_ENTRY
#DIM DYNAMIC HOST_LIST  , 캐릭터수상한;주최자 참가
#DIM DYNAMIC GUEST_LIST , 캐릭터수상한;손님 참가
#DIM DYNAMIC NG_LIST    , 캐릭터수상한;오지 않는다
;---   연회의 참가자 결정   -----------------------------------------------------------------------------
;CFLAG:연회참가 0=불참가 1=참가 2=주최자 3=탈락자 4=마시지 않지만 참가
;------------------------------------------------------------------------------------------------------
;플래그 초기화
CVARSET CFLAG, GETNUM(CFLAG, "연회참가"), 0, 1
SELECTCASE FLAG:연회개최플래그
	;2 환상향 나이 잊고 회
	CASE 2
		;1:레이무, 2:루코토 11:마리사
		HOST_LIST  = 1, 2, 11
		;10:스이카
		GUEST_LIST = 10
		;세이자는 참가하지 않는다
		NG_LIST    = 97
		CALL ENKAI_ENTRY_CHARALIST(HOST_LIST, GUEST_LIST, NG_LIST)
		FOR LOCAL, 1, CHARANUM
			IF CFLAG:LOCAL:연회참가
				SIF CFLAG:LOCAL:연회참가 < 0
					CFLAG:LOCAL:연회참가 = 0
				CONTINUE
			ENDIF
			;다른 캐릭터는 랜덤 참가
			SIF RAND:5 == 0
				CFLAG:LOCAL:연회참가 = 1
		NEXT
	;1 레이무의 변덕 술잔치
	CASE 1
		SELECTCASE FLAG:연회차입
			CASE 51
				FLAG:31 += RAND:1000
			CASE 52
				FLAG:31 += RAND:2000
		ENDSELECT
		;1:레이무, 2:루코토 11:마리사
		HOST_LIST  = 1, 2, 11
		;10:스이카
		GUEST_LIST = 10
		;세이자는 참가하지 않는다
		NG_LIST    = 97
		CALL ENKAI_ENTRY_CHARALIST(HOST_LIST, GUEST_LIST, NG_LIST)
		IF FLAG:31 >= 2500
		;규모가 크면 참가 확률대
			FOR LOCAL, 1, CHARANUM
				IF CFLAG:LOCAL:연회참가
					SIF CFLAG:LOCAL:연회참가 < 0
						CFLAG:LOCAL:연회참가 = 0
					CONTINUE
				ENDIF
				;다른 캐릭터는 랜덤 참가
				SIF RAND:7 == 0
					CFLAG:LOCAL:연회참가 = 1
			NEXT
		ELSE
			FOR LOCAL, 1, CHARANUM
				IF CFLAG:LOCAL:연회참가
					SIF CFLAG:LOCAL:연회참가 < 0
						CFLAG:LOCAL:연회참가 = 0
					CONTINUE
				ENDIF
				;다른 캐릭터는 랜덤 참가
				SIF RAND:14 == 0
					CFLAG:LOCAL:연회참가 = 1
			NEXT
		ENDIF
	;달을 보면서 술을 마심
	CASE 3
		;52:우동, 53, 72:네-링　75:메디슨도 돕는다
		HOST_LIST  = 52, 53, 72, 75
		;62:나
		GUEST_LIST = 62
		;세이자는 참가하지 않는다
		NG_LIST    = 97
		CALL ENKAI_ENTRY_CHARALIST(HOST_LIST, GUEST_LIST, NG_LIST)
		FOR LOCAL, 1, CHARANUM
			IF CFLAG:LOCAL:연회참가
				SIF CFLAG:LOCAL:연회참가 < 0
					CFLAG:LOCAL:연회참가 = 0
				CONTINUE
			ENDIF
			;다른 캐릭터는 랜덤 참가이지만, 죽림 방면으로 살고 있다고(면) 확률이 오른다
			IF CFLAG:LOCAL:자택위치 / 100 == 4 && !RAND:3
				CFLAG:LOCAL:연회참가 = 1
			ELSEIF !RAND:11
				CFLAG:LOCAL:연회참가 = 1
			ENDIF
		NEXT
	;수확제
	CASE 4
		;HOST_LIST는 주거 의존 분기이므로 없음으로
		;아키 자매는 반드시 온다
		GUEST_LIST = 77, 78
		;세이자는 참가하지 않는다
		NG_LIST    = 97
		CALL ENKAI_ENTRY_CHARALIST(HOST_LIST, GUEST_LIST, NG_LIST)
		FOR LOCAL, 1, CHARANUM
			IF CFLAG:LOCAL:연회참가
				SIF CFLAG:LOCAL:연회참가 < 0
					CFLAG:LOCAL:연회참가 = 0
				CONTINUE
			ENDIF
			;마을 거주의 캐릭터는 일한다
			IF CFLAG:LOCAL:자택위치 / 100 == 2
				CFLAG:LOCAL:연회참가 = 2
			ELSEIF !RAND:12
				CFLAG:LOCAL:연회참가 = 1
			ENDIF
		NEXT
	;독경 라이브
;	CASE 5
;		;명련사멤버는 일한다
;		HOST_LIST = 39, 40, 41, 55, 85, 86, 87, 88
;		;GUEST_LIST 없음
;		;하쿠레이 신사조는 오지 않는다
;		;세이자도 오지 않는다
;		NG_LIST   = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 97
;		CALL ENKAI_ENTRY_CHARALIST(HOST_LIST, GUEST_LIST, NG_LIST)
;		FOR LOCAL, 1, CHARANUM
;			IF CFLAG:LOCAL:연회참가
;				SIF CFLAG:LOCAL:연회참가 < 0
;					CFLAG:LOCAL:연회참가 = 0
;				CONTINUE
;			ENDIF
;			;외는 술을 마시지 않는다
;			SIF RAND:15 == 0
;				CFLAG:LOCAL:연회참가 = 9
;		NEXT
	;6 레밀리아의 변덕인 파티
	CASE 6
		;15:사쿠야, 58:메이링, 59:소악마는 일한다
		HOST_LIST  = 15, 58, 59
		;16:레밀리아, 50:플랑은 일하지 않는다
		GUEST_LIST = 16, 50
		;54:파츄리, 97:세이자는 참가하지 않는다
		NG_LIST    = 54, 97
		CALL ENKAI_ENTRY_CHARALIST(HOST_LIST, GUEST_LIST, NG_LIST)
		IF FLAG:31 >= 2500
		;규모가 크면 참가 확률대
			FOR LOCAL, 1, CHARANUM
				IF CFLAG:LOCAL:연회참가
					SIF CFLAG:LOCAL:연회참가 < 0
						CFLAG:LOCAL:연회참가 = 0
					CONTINUE
				ENDIF
				;안개의호수 방면으로 살고 있다고(면) 확률이 오른다
				SIF CFLAG:LOCAL:자택위치 / 100 == 3 && !RAND:3
					CFLAG:LOCAL:연회참가 = 1
				;다른 캐릭터는 랜덤 참가
				SIF RAND:7 == 0
					CFLAG:LOCAL:연회참가 = 1
			NEXT
		ELSE
			FOR LOCAL, 1, CHARANUM
				IF CFLAG:LOCAL:연회참가
					SIF CFLAG:LOCAL:연회참가 < 0
						CFLAG:LOCAL:연회참가 = 0
					CONTINUE
				ENDIF
				;안개의호수 방면으로 살고 있다고(면) 확률이 오른다
				SIF CFLAG:LOCAL:자택위치 / 100 == 3 && !RAND:3
					CFLAG:LOCAL:연회참가 = 1
				;다른 캐릭터는 랜덤 참가
				SIF RAND:11 == 0
					CFLAG:LOCAL:연회참가 = 1
			NEXT
		ENDIF
ENDSELECT

;리스트를 이용한 연회 캐릭터의 pre-set 함수
@ENKAI_ENTRY_CHARALIST(HOST_LIST, GUEST_LIST, NG_LIST)
#DIM REF HOST_LIST  ;주최자 참가
#DIM REF GUEST_LIST ;손님 참가
#DIM REF NG_LIST    ;오지 않는다
#DIM L_NUM
#DIM L_ID
L_NUM = FINDELEMENT(HOST_LIST, 0)
IF L_NUM >= 1
	FOR L_ID, 0, L_NUM
		CFLAG:(HOST_LIST:L_ID):연회참가 = 2
	NEXT
ENDIF
L_NUM = FINDELEMENT(GUEST_LIST, 0)
IF L_NUM >= 1
	FOR L_ID, 0, L_NUM
		CFLAG:(GUEST_LIST:L_ID):연회참가 = 1
	NEXT
ENDIF
;설정한 것을 명확화하기 위해서―1으로 합니다
L_NUM = FINDELEMENT(NG_LIST, 0)
IF L_NUM >= 1
	FOR L_ID, 0, L_NUM
		CFLAG:(NG_LIST:L_ID):연회참가 = -1
	NEXT
ENDIF

@ENKAI_WORK(ARG)
;연회의 행동 내용을 입력한다
;NOSAMES:모든 인수가 다르면(자) 1, 1개에서도 일치하고 있으면(자) 0을 돌려준다
IF FLAG:연회개최플래그 > 0 && (NOSAMES(CFLAG:ARG:직종, 48, 49, 50, 51) || CFLAG:ARG:행동 == 0)
	;연회의 시간에 되면(자) 준비 일의 양에 응해 주최자가 움직이기 시작한다
	IF TIME >= FLAG:개시시간 - (FLAG:연회규모 / 30) - 15 && TIME < FLAG:33 && CFLAG:ARG:연회참가 == 2
		CALL ENKAI_PREPARE(ARG)
		RETURN 1
	;놀러 올 뿐(만큼)의 놈은 시간에 되면(자) 놀러 온다
	ELSEIF DAY == FLAG:34 && TIME >= FLAG:33 && CFLAG:ARG:동행 == 0
		CALL ENKAI_START(ARG)
		RETURN 1
	;벌써 시작되어있는 경우
	ELSEIF FLAG:연회개최플래그 >= 98 && CFLAG:ARG:동행 == 0
		CALL ENKAI_START(ARG)
		RETURN 1
	ENDIF
ELSEIF FLAG:연회개최플래그 > 0
	RETURN 1
ENDIF
RETURN 0

@ENKAI_PREPARE(ARG)
;주최자의 준비 일
IF CFLAG:ARG:직종 != 연회준비
	MAXBASE:ARG:일량 = FLAG:31 / 3
	;최대치, 2400
	SIF MAXBASE:ARG:일량 >= 2400
		MAXBASE:ARG:일량 = 2400
	BASE:ARG:일량 = MAXBASE:ARG:일량
	CFLAG:ARG:직종 = 연회준비
	CFLAG:ARG:직장 = TFLAG:연회장
	TCVAR:ARG:315 = 0
	CFLAG:ARG:행동 = 5
ENDIF
RETURN 1

@ENKAI_START(ARG)
;각각이 마시는 페이스를 바꾸므로, 연회의 규모에 응해 일량이 변화
IF CFLAG:ARG:직종 != ENKAI_SANKA && TCVAR:ARG:만취 == 0
	MAXBASE:ARG:일량 = FLAG:31
	;최대치, 통상 7200(반나절)·술통째로 삼킴신이라면 제한 없음
	SIF MAXBASE:ARG:일량 >= 7200 && TALENT:ARG:술내성 != 3
		MAXBASE:ARG:일량 = 7200
	MAXBASE:ARG:일량 += RAND:500
	IF TALENT:ARG:술내성 == -1
		TIMES MAXBASE:ARG:일량, 0.75
	ELSEIF TALENT:ARG:술내성 == 1
		TIMES MAXBASE:ARG:일량, 1.25
	ELSEIF TALENT:ARG:술내성 == 2
		TIMES MAXBASE:ARG:일량, 1.5
	ELSEIF TALENT:ARG:술내성 == 3
		TIMES MAXBASE:ARG:일량, 2.0
	ENDIF
	BASE:ARG:일량 = MAXBASE:ARG:일량
	;일내용·연회에 참가
	CFLAG:ARG:직종 = ENKAI_SANKA
	CFLAG:ARG:직장 = TFLAG:연회장
	CFLAG:ARG:현재위치 = TFLAG:연회장
	TCVAR:ARG:315 = 0
	CFLAG:ARG:행동 = 5
	IF CFLAG:ARG:연회참가 == 2
		;주최자는 정리 예정을 세트(일량은 최대 1200)
		CFLAG:ARG:정리일량 = MIN(FLAG:연회규모 / 6, 1200)
		CFLAG:ARG:정리장소 = FLAG:연회회장
	ENDIF
ENDIF

RETURN 1

@ENKAI_KATAZUKE(ARG)
;주최자의 정리 일
MAXBASE:ARG:일량 = CFLAG:ARG:정리일량
BASE:ARG:일량 = MAXBASE:ARG:일량
;일내용·연회의정리
CFLAG:ARG:직종 = 50
CFLAG:ARG:직장 = GET_MAP_REPLACEMENT(CFLAG:ARG:정리장소)
TCVAR:ARG:도울수없다 = 0
CFLAG:ARG:행동 = 5
RETURN 1

@ENKAI_DRUNK(ARG)
;만취하는 라인을 넘고 있으면(자) 돌아간다
IF BASE:ARG:술기운 > (MAXBASE:ARG:술기운 / 10) * 8
	RETURN 1
ENDIF

;술을 마시지 않으면 취하지 않는다
IF TALENT:ARG:술내성 == -2 || CFLAG:ARG:임신자각상태 == 1
	CFLAG:ARG:직종 = 0
	CFLAG:ARG:연회참가 = 4
	IF CFLAG:MASTER:현재위치 == CFLAG:ARG:현재위치
		PRINTFORMW %CALLNAME:ARG%는 벌써 충분히 즐긴 것 같습니다
	ENDIF
ELSE
	CFLAG:ARG:직종 = 0
	CFLAG:ARG:연회참가 = 3
;	PRINTFORMW %CALLNAME:ARG%취기 기분과 같습니다
	IF CFLAG:MASTER:현재위치 == CFLAG:ARG:현재위치
		PRINTFORMW %CALLNAME:ARG%는 벌써 충분히 즐긴 것 같습니다
	ENDIF
ENDIF
RETURN 1

@ENKAI_STOP
;악천후등에 의한 중지
FOR LOCAL, 0, CHARANUM
	CFLAG:LOCAL:직종 = 0
	MAXBASE:LOCAL:일량 = 0
	BASE:LOCAL:일량 = 0
	CFLAG:LOCAL:연회참가 = 0
	CFLAG:LOCAL:행동 = 0
NEXT
FLAG:연회개최플래그 = 0
FLAG:31 = 0
FLAG:32 = 0
TFLAG:연회장 = 0
FLAG:33 = 0
FLAG:34 = 0
FLAG:35 = 0
FLAG:36 = 0
FLAG:연회차입 = 0
;연회회장표시 =
RETURN 0

@연회예정표시

PRINTFORM {FLAG:33 / 60}:{(FLAG:33 % 60)/10}{(FLAG:33 % 60)%10}로부터%연회장표시()%로%연회명표시()%

@SET_ENKAI_LOCATIONDISPLAY
연회회장표시 =

@연회장표시
#FUNCTIONS
LOCALS = 연회장표시 에러
IF FLAG:연회개최플래그
	IF IN_HOME(FLAG:32)
		LOCALS = %NAME_FROM_PLACE(FLAG:32)%
	ELSE
		LOCALS = %GET_MAPNAME(FLAG:32/100)%의 %GET_PLACENAME(FLAG:32)%
	ENDIF
ENDIF
RETURNF LOCALS

@연회명표시
#FUNCTIONS
SELECTCASE FLAG:연회개최플래그
	CASE 1
		LOCALS = 레이무의 변덕 술잔치
	CASE 2
		LOCALS = 환상향 나이 잊고 회
	CASE 3
		LOCALS = 달을 보면서 술을 마심
	CASE 4
		LOCALS = 수확제
	CASE 5
		LOCALS = 밤안내 독경 라이브
	CASE 6
		LOCALS = 레밀리아의 변덕인 파티
ENDSELECT
RETURNF LOCALS

@연회개요
IF FLAG:34 == 1
	PRINT 내일,
ELSE
	PRINTFORM {FLAG:34}일 후,
ENDIF

PRINTFORML {FLAG:33 / 60}:{(FLAG:33 % 60)/10}{(FLAG:33 % 60)%10}로부터%연회장표시()%에서, 「%연회명표시()%」를 연다고 한다

PRINT 이야기의 모습이라면
IF FLAG:31 >= 5000
	PRINTW ……이것은 장기전이 될 것 같다
ELSEIF FLAG:31 >= 2500
	PRINTW , 맛좋은 음식을 충분히 준비해 있는 것 같다
ELSEIF FLAG:31 >= 1500
	PRINTW , 친목이 깊어지려면  꼭 좋은 것 같다
ELSE
	PRINTW , 자그만 모임을 예정하고 있는 것 같다
ENDIF
IF FLAG:34 == 1
	PRINTFORMW 갑작스러운 행사이지만, 참가해 볼까……
ELSE
	PRINTFORMW 참가한다면 예정을 비워 두자……
ENDIF
SIF FLAG:36 > 0
	PRINTFORMW 덧붙여 우천 중지라는 것이다……
PRINTL
FLAG:34 += DAY

@연회참가인원수재계산
;연회의 참가인수를 세트
FLAG:참가인수 = 0
FOR LOCAL, 0, CHARANUM
	IF (CFLAG:LOCAL:연회참가 == 1 || CFLAG:LOCAL:연회참가 == 2) && !TCVAR:LOCAL:만취
		SIF CFLAG:LOCAL:현재위치 == TFLAG:연회장
			FLAG:참가인수 ++
	ENDIF
NEXT


code:
@BIRTH(ARG)
#DIM CHILDNUM
DRAWLINE
;임신 소거, 출산경험, 성별의 결정, 생일 결정
TALENT:ARG:임신 = 0
EXP:ARG:출산경험 += 1
CHILDNUM = EXP:ARG:출산경험 % 10
SIF !EXP:ARG:출산경험 % 10
	CHILDNUM = 10
IF FLAG:자식의성별
	CHILD_SEX:ARG:CHILDNUM = FLAG:자식의성별
ELSE
	CHILD_SEX:ARG:CHILDNUM = RAND:2 + 1
ENDIF
CHILD_BIRTHDAY:ARG:CHILDNUM = DAY
CHILD_BIRTHDATE:ARG:CHILDNUM = (DAY / 124 + (DAY % 124 ?  1 # 0)) * 1000
CHILD_BIRTHDATE:ARG:CHILDNUM += DAY:2 * 100 + DAY:3
CHILD_WEATHER:ARG:CHILDNUM = %GET_WEATHER()%
IF CFLAG:ARG:무자각임신
	CALL KOJO_MESSAGE_SEND("EVENT", 25, ARG, 4, CHILDNUM)
ELSEIF TALENT:ARG:연모
	CALL KOJO_MESSAGE_SEND("EVENT", 25, ARG, 1, CHILDNUM)
ELSEIF TALENT:ARG:사모
	CALL KOJO_MESSAGE_SEND("EVENT", 25, ARG, 2, CHILDNUM)
ELSE
	CALL KOJO_MESSAGE_SEND("EVENT", 25, ARG, 3, CHILDNUM)
ENDIF
PRINTFORMW %CALLNAME:ARG%는, %CALLNAME:MASTER%의 아이를 무사히 출산했습니다
PRINTFORMW \@ CHILD_SEX:ARG:CHILDNUM == 1 ?  %CALLNAME:ARG%를 닮은 건강한 여자아이 # %마스터를% 닮은 건강한 남자아이 \@ 입니다
PRINTFORMW %CALLNAME:ARG%는 출생한지 얼마 안된 갓난아기를 받으면(자), 상냥하게 껴안고 모유를 먹이기 시작했다
SIF TALENT:ARG:모성 == 0
	PRINTFORMW %CALLNAME:ARG%는[모성]에 눈이 떠졌어!
PRINTL ******************************************************************
PRINTFORML 제{CHILDNUM}자 어머니：%CALLNAME:ARG%　아버지：%CALLNAME:MASTER%
PRINTFORML 　성별：\@ CHILD_SEX:ARG:CHILDNUM == 1 ?  녀 # 남 \@
PRINTFORM 생일：
CALL PRINT_DATE(DAY)
PRINTFORML  %FESTIVAL()% -%GET_WEATHER()%-
;PRINTFORML 　신장：
;PRINTFORML 　체중：
;PRINTFORML 　종족：
;PRINTFORML 머리카락의 색：
;PRINTFORML 눈의 색：
PRINTL ******************************************************************

;육아중·모성 추가
CALL CHILD_NAME(ARG)
CFLAG:ARG:육아인원수 += 1
CFLAG:MASTER:육아인원수 += 1
CFLAG:ARG:출산경과일 = 1
CFLAG:ARG:임신경과일수 = 0
CFLAG:ARG:무자각임신 = 0
CFLAG:ARG:자각사정 = 0
CFLAG:ARG:임신자각상태 = 0
TALENT:ARG:모성 = 1

CFLAG:ARG:출산휴가 = 0

EXP:ARG:애정경험 += 10
CFLAG:ARG:아이인원수 += 1
CFLAG:MASTER:아이인원수 += 1
IF FLAG:생활능력무
	PRINTFORML 우리 아이의 탄생에 %마스터는%
	CALL ASK_YN("부모로서의 책임감이 메이 의 것을 느낀","향후 일어날 수 있는 여러가지 사태에의 불안을 느꼈다")
	IF !RESULT
		PRINTFORMW %마스터는% 생활능력 없이는 없어졌다
	ELSE
		PRINTFORMW 인의 성격이 그렇게 간단하게 바꿀 수 있는 성장할 수 있다면 아무도 고생하지 않습니다
		PRINTFORMW %마스터는% 전이상으로 믿음직스럽지 못한 성격인 채, %CALLNAME:ARG%과 사이 좋게 육아에게 임하므로 했다
	ENDIF
	FLAG:생활능력무 = RESULT
ENDIF

@CHILD_NAME(YOME)
#DIM YOME
#DIM CHILDNUM
CHILDNUM = EXP:YOME:출산경험 % 10
SIF !EXP:YOME:출산경험 % 10
	CHILDNUM = 10
$LOOP0
PRINTL 아이의 이름을 결정합시다
PRINTFORML
CALL ASK_M("스스로 결정하는", 1,"랜덤 후보 일람", 1,"「멕시코에 부는 열풍!」라고 말하는 의미의 「산타나」라고 말하는 것은 어떨까!", 1)

SELECTCASE RESULT
	CASE 0
		$LOOP1
		PRINTL 아이의 이름을 입력해 주세요
		INPUTS
		IF RESULTS == ""
			GOTO LOOP1
		ELSE
			PRINTFORML %RESULTS%로 괜찮겠습니까?
			CALL ASK_YN
			IF RESULT
				GOTO LOOP1
			ELSE
				CHILDNAME:YOME:CHILDNUM = %RESULTS%
			ENDIF
		ENDIF
	CASE 1
		$LOOP2
		FOR LOCAL, 1,10
			LOCALS:LOCAL = %랜덤캐릭터_명명()%
			PRINTFORML [{LOCAL}] - %LOCALS:LOCAL%
		NEXT
		DRAWLINE
		PRINTFORML [99] - 후보 재생성
		PRINTFORML [100] - 돌아간다
		$LOOP3
		INPUT
		SELECTCASE RESULT
			CASE 0 TO 9
				CHILDNAME:YOME:CHILDNUM = %LOCALS:RESULT%
			CASE 99
				GOTO LOOP2
			CASE 100
				GOTO LOOP0
			CASEELSE
				GOTO LOOP3
		ENDSELECT
	CASE 2
		PRINTFORML 화낸%CALLNAME:YOME%가 이름을 결정해 버렸다…
		CHILDNAME:YOME:CHILDNUM = %랜덤캐릭터_명명()%
ENDSELECT

PRINTFORML %CHILDNAME:YOME:CHILDNUM%라는 이름이 되었습니다
TALENT:YOME:육아중 = CHILDNUM
;----------------------------------------------------
;그 캐릭터에게 특정의 연령의 아이가 있으면(자) 돌려주는 함수
;----------------------------------------------------
@CHK_HAVE_CHILD(ARG, ARG:1, ARG:2)
#FUNCTION
#DIM 연령
SIF !CFLAG:ARG:육아인원수
	RETURNF 0

FOR LOCAL, 1, 11
	연령 = DAY - CHILD_BIRTHDAY:ARG:LOCAL
	SIF INRANGE(연령, ARG:1, ARG:2-1)
		RETURNF LOCAL
NEXT

RETURNF 0
;----------------------------------------------------
;생일의 아이가 있을까 돌려주는 함수
;eraTW4. 570 proto_bugfix_m05에서의 사양 변경
;·REF를 사용해, 배열을 고쳐 쓰는 F함수로 했다(인수를 모두 건네주지 않으면 에러가 된다)
;·사양상, 배열의 상정 최대 요소수는10*캐릭터수상한이 된다(=RESULT의 요소수를 돌파해 에러가 나왔으므로 사양 변경)
;·BREAK나 CONTINUE를 사용해 처리를 효율화
;----------------------------------------------------
@CHILD_HAPPY_BIRTHDAY(CNT_BIRTHDAY, NAME_CHILD, AGE_CHILD)
#FUNCTION
#DIM CHARA
#DIM CHILDNUM
#DIM  REF CNT_BIRTHDAY
#DIMS REF NAME_CHILD
#DIM  REF AGE_CHILD
FOR CHARA, 1, CHARANUM
	SIF !CFLAG:CHARA:아이인원수
		CONTINUE
	FOR CHILDNUM, 1, MIN(11, CFLAG:CHARA:아이인원수 + 1)
		;무명≒미등록이라면 다음캐릭터에게
		SIF !STRLENS(CHILDNAME:CHARA:CHILDNUM)
			BREAK
		;생일 이외는 스킵
		SIF (DAY - CHILD_BIRTHDAY:CHARA:CHILDNUM) % 124
			CONTINUE
		CNT_BIRTHDAY ++
		NAME_CHILD:CNT_BIRTHDAY = %CHILDNAME:CHARA:CHILDNUM%
		AGE_CHILD:CNT_BIRTHDAY = (DAY - CHILD_BIRTHDAY:CHARA:CHILDNUM) / 124
	NEXT
NEXT
RETURNF CNT_BIRTHDAY


code:
@ESTRUS_CYCLE(ARG)
#FUNCTION
SELECTCASE CFLAG:(ARG:0):900
	;안전한 날
	CASE 1 TO 2
		LOCAL = 15
	CASE 3 TO 4
		LOCAL = 30
	CASE 5
		LOCAL = 50
	CASE 6
		LOCAL = 70
	;위험일
	CASE 7
		LOCAL = 150
	CASE 8
		LOCAL = 100
	CASE 9
		LOCAL = 60
	CASE 10
		LOCAL = 40
ENDSELECT
RETURNF LOCAL

@REAL_ESTRUS_CYCLE(ARG)
#FUNCTION
	LOCAL = ESTRUS_CYCLE(ARG)
	SIF TCVAR:ARG:강제배란
		LOCAL = MAX(LOCAL, LOCAL / 5 + 100)
RETURNF LOCAL

;생리주기 문자 F함수
;다음날등의 상태를 참조할 수 있다
@ESTRUS_CATEGORY(C_ID, ADD_DAY)
#FUNCTIONS
#DIM C_ID     ;등록 번호
#DIM ADD_DAY  ;며칠 후를 참조하는지, 0이라면 오늘
#DIM CHECK_DAY;실제로 참조되는 날의 주기
SIF ADD_DAY < 0
	ADD_DAY = -(ABS(ADD_DAY) % 10)
CHECK_DAY = (CFLAG:C_ID:생리주기 + ADD_DAY + 10) % 10
SIF !CHECK_DAY
	CHECK_DAY = 10
SIF TCVAR:C_ID:강제배란
	RETURNF "배란유발제 효과 발휘중"
SELECTCASE CHECK_DAY
;안전한 날
CASE 1 TO 2
	RETURNF "안전한 날"
CASE 6
	RETURNF "위험일 전날"
;위험일
CASE 7
	RETURNF "위험일"
CASE 8
	RETURNF "배란"
ENDSELECT

;생리주기 표시 함수
;비슷한의가 몇도 있었으므로 전부 여기서 처리해버린다
@NEW_CYCLE_PRINT(C_ID, ADD_DAY, OP)
#DIM  C_ID    ;등록 번호
#DIM  ADD_DAY ;며칠 후를 참조하는지, 0이라면 오늘
#DIMS OP      ;옵션, 현재 「등폭」마셔
#DIMS 표시문  ;표시되는 내용
VARSET 표시문
IF TALENT:C_ID:임신
	SETCOLOR C_PINK
	표시문 '= CLIP_HEART("임신")
ELSEIF CFLAG:C_ID:임신경과일수
	SETCOLOR C_PINK
	표시문 '= CLIP_HEART("착상제")
ELSEIF !ADD_DAY && TCVAR:C_ID:발정
	SETCOLOR C_PINK
	표시문 '= CLIP_HEART("발정중")
ELSE
	표시문 '= ESTRUS_CATEGORY(C_ID, ADD_DAY)
	SIF !STRLENS(표시문)
		RETURN
	SELECTCASE 표시문
	CASE "위험일"
		SETCOLOR C_PINK
		표시문 '= CLIP_HEART(표시문)
	CASE "배란", "위험일 전날", "배란유발제 효과 발휘중"
		SETCOLOR 0xEE60EE
	CASE "안전한 날"
		SETCOLOR C_AQUA
	ENDSELECT
ENDIF
IF STRCOUNT(OP, "「등폭」")
	PRINTFORM %표시문, 10, LEFT%
ELSE
	PRINTFORM %표시문%
ENDIF
RESETCOLOR

@CYCLE_PRINT(ARG)
CALL NEW_CYCLE_PRINT(ARG)
RETURN

VARSET LOCAL
IF TALENT:ARG:임신
	SETCOLOR C_PINK
	CALL HEART
	PRINTFORM 임신{CFLAG:ARG:임신경과일수}일째
	CALL HEART
ELSEIF CFLAG:ARG:임신경과일수
	SETCOLOR C_PINK
	CALL HEART
	PRINTFORM 착상제
	CALL HEART
ELSEIF ESTRUS_CYCLE(ARG) == 150
	SETCOLOR C_PINK
	CALL HEART
	IF TCVAR:ARG:발정
		PRINTFORM 발정중
	ELSE
		PRINTFORM 위험일
	ENDIF
	CALL HEART
ELSEIF ESTRUS_CYCLE(ARG) == 100
	SETCOLOR 0xEE60EE
	PRINTFORM 배란
ELSEIF ESTRUS_CYCLE(ARG) == 70
	SETCOLOR 0xEE60EE
	PRINTFORM 위험일 전날
ELSEIF ESTRUS_CYCLE(ARG) == 15
	SETCOLOR C_AQUA
	PRINTFORM 안전한 날
ENDIF
RESETCOLOR

@CYCLE_PRINT다음날(ARG)
CALL NEW_CYCLE_PRINT(ARG, 1)
RETURN

VARSET LOCAL
IF TALENT:ARG:임신
	SETCOLOR C_PINK
	CALL HEART
	PRINTFORM 임신
	CALL HEART
ELSEIF CFLAG:ARG:임신경과일수
	SETCOLOR C_PINK
	CALL HEART
	PRINTFORM 착상제
	CALL HEART
ELSEIF CFLAG:ARG:900 == 6
	SETCOLOR C_PINK
	CALL HEART
	IF TCVAR:ARG:발정
		PRINTFORM 발정중
	ELSE
		PRINTFORM 위험일
	ENDIF
	CALL HEART
ELSEIF CFLAG:ARG:900 == 7
	SETCOLOR 0xEE60EE
	PRINTFORM 배란
ELSEIF CFLAG:ARG:900 == 5
	SETCOLOR 0xEE60EE
	PRINTFORM 위험일 전날
ELSEIF CFLAG:ARG:900 == 10 || CFLAG:ARG:900 == 1
	SETCOLOR C_AQUA
	PRINTFORM 안전한 날
ENDIF
RESETCOLOR

;@CYCLE_PRINT다음날()을 표시 무너지고 하지 않게
;텍스트를 같은 폭으로 출력하도록(듯이) 한 것
@PRINT_CYCLE_다음날(캐릭터등록번호)
#DIM 캐릭터등록번호
#DIMS 표시문
CALL NEW_CYCLE_PRINT(캐릭터등록번호, 1, "「등폭」")
RETURN

표시문 =
IF TALENT:캐릭터등록번호:임신
	SETCOLOR C_PINK
	표시문 = %CLIP_HEART("임신")%
ELSE
	SELECTCASE CFLAG:캐릭터등록번호:생리주기
	CASE 6
		SETCOLOR C_PINK
		IF TCVAR:캐릭터등록번호:발정
			표시문 = %CLIP_HEART("발정중")%
		ELSE
			표시문 = %CLIP_HEART("위험일")%
		ENDIF
	CASE 7
		SETCOLOR 0xEE60EE
		표시문 = 배란
	CASE 5
		SETCOLOR 0xEE60EE
		표시문 = 위험일 전날
	CASE 10, 1
		SETCOLOR C_AQUA
		표시문 = 안전한 날
	ENDSELECT
ENDIF
PRINTFORM %표시문, 10, LEFT%
RESETCOLOR


code:
@HININSHITE(ARG)

IF ESTRUS_CYCLE(ARG) == 150
	LOCALS = 위험일
ELSEIF ESTRUS_CYCLE(ARG) != 15
	LOCALS = 안전한 날이 아니다
ENDIF

IF TALENT:ARG:153
	;PRINTL Feed
	IF CFLAG:ARG:임신경과일수 <= 15
		PRINTFORML %CALLNAME:ARG%는 아직 몸이 불안해서 안정기까지 기다렸으면 좋겠다고 말하면서 삽입을 거절했다.
		TFLAG:16 = 1
	ELSEIF CFLAG:ARG:임신경과일수 >= 36
		PRINTFORML %CALLNAME:ARG%는 출산이 가까운 시일내에 되었으므로 출산까지 기다렸으면 좋겠다고 말하면서 삽입을 거절했다.
		TFLAG:16 = 1
	ENDIF
	RETURN 0
ENDIF
;WAIT

IF CFLAG:ARG:육아인원수 >= 1 && CFLAG:ARG:육아인원수 <= 3
	PRINTFORML %CALLNAME:ARG%는 더 이상의 아이를 동시에 기르는 것은 아무래도 무리라며
	PRINTFORML 확실하게 피임해주었으면 한다고 말해 왔다…
ELSE
	PRINTFORML %CALLNAME:ARG%는 오늘은 %LOCALS%가 나오면 와 피임 해 주었으면 한다고 말해 왔다…
ENDIF

IF CFLAG:ARG:생해금 < 2
	CALL KOJO_MESSAGE_SEND("EVENT", 18, TARGET, 1,0)
ELSE
	CALL KOJO_MESSAGE_SEND("EVENT", 31, TARGET, 0,0)
ENDIF

WAIT
PRINTFORML [1] 콘돔을 붙인다(나머지 {ITEM:45}장)
PRINTFORML [2] 피임약을 건네준다(나머지 {ITEM:49}정)
SIF !TCVAR:간절히원함 && !CFLAG:ARG:육아인원수
PRINTL [3] 생으로 하게 해주세요 제발요
SIF (TEQUIP:TARGET:밧줄 || TEQUIP:TARGET:구속) && !CFLAG:ARG:육아인원수
PRINTL [4] 좋아 임신만은 절대 해 받는다
SIF CFLAG:ARG:육아인원수 && CFLAG:ARG:육아중해금 == 0
PRINTL [5] 정말로 피임해주었으면 할까 물어본다

PRINTL [0] 포기한다
$LOOP
INPUT
IF RESULT == 1
	IF !ITEM:45
		PRINTL 콘돔이 없다
		GOTO LOOP
	ELSE
		ITEM:45 -= 1
		PRINTL 콘돔을 씌웠다
		TEQUIP:MASTER:콘돔 = 1
	ENDIF
ELSEIF RESULT == 2
	IF !ITEM:49
		PRINTL 피임약이 없다
		GOTO LOOP
	ELSE
		ITEM:49 -= 1
		TCVAR:ARG:피임약 = 1
		PRINTFORML %CALLNAME:ARG%에 피임약을 먹였다
	ENDIF
ELSEIF RESULT == 3 && !CFLAG:ARG:육아인원수
	TCVAR:ARG:간절히원함 = 1
	CALL OGAMITAOSHI(ARG)
ELSEIF RESULT == 4 && !CFLAG:ARG:육아인원수
	TCVAR:ARG:억지로 = 1
ELSEIF RESULT == 5 && CFLAG:ARG:육아인원수
	CALL NAMA_POISONING(ARG)
ELSE
	TFLAG:16 = 3
	TFLAG:17 = ARG
ENDIF
RETURN 0

@妊娠可否(ARG)
#FUNCTION
SIF TEQUIP:PLAYER:콘돔 || TCVAR:ARG:피임약
	RETURNF 0
SIF TALENT:ARG:유치 && !TALENT:ARG:초경
	RETURNF 0
SIF TALENT:ARG:비생물 || TALENT:ARG:봉래인 || TALENT:ARG:임신
	RETURNF 0
RETURNF 1

@피임요구(ARG)
IF 임신가부(ARG) && TALENT:MASTER:2 & 2 && !TFLAG:16 && !TALENT:ARG:무지 && !TCVAR:ARG:억지로 && !TCVAR:ARG:만취
	IF !CFLAG:ARG:생해금 && ESTRUS_CYCLE(ARG) != 15
		CALL HININSHITE(ARG)
	ELSEIF CFLAG:ARG:생해금 < 2 && ESTRUS_CYCLE(ARG) == 150
		CALL HININSHITE(ARG)
	ELSEIF TALENT:ARG:육아중 && CFLAG:ARG:출산경과일 <= 50 && !TFLAG:16 && ESTRUS_CYCLE(TARGET) != 15 && !CFLAG:ARG:육아중해금
		CALL HININSHITE(ARG)
	ENDIF
ENDIF

@임신가부(ARG)
#FUNCTION
SIF TEQUIP:PLAYER:콘돔 || TCVAR:ARG:피임약
	RETURNF 0
SIF TALENT:ARG:유치 && !TALENT:ARG:초경
	RETURNF 0
SIF TALENT:ARG:임신
	RETURNF 0
IF TALENT:ARG:비생물 || TALENT:ARG:봉래인
	SIF !TALENT:MASTER:만능잉태
		RETURNF 0
ENDIF
RETURNF 1


code:
@CHK_NAMA_POISONING(ARG)
#FUNCTION
LOCAL = 0

;애정경험계보다 질내사정중독등의 (분)편이 물건을 말한다
;여러가지 반응을 일으키는 최소의 물리량이 알지 느낌
;말용 이벤트는, 일단 EVENT31로 설정.
;1：OK
;2：NG
;3：(은)는? (진지한 얼굴)

SIF TALENT:ARG:연인
	LOCAL += 100
SIF TALENT:ARG:걸레
	LOCAL += 300
SIF TALENT:ARG:자기애 == 1
	LOCAL += 50
SIF TALENT:ARG:도착적
	LOCAL += 100
SIF TALENT:ARG:V감도 == 1
	LOCAL += 50
SIF TALENT:ARG:포르치오성감
	LOCAL += 100
SIF TALENT:ARG:음호
	LOCAL += 150

LOCAL:3 += GETPALAMLV(PALAM:욕정, 15) * (10 + TALENT:ARG:쾌감응답 * 2)
LOCAL:3 += GETPALAMLV(PALAM:복종, 15) * (10 - TALENT:ARG:태도 * 2)
IF TALENT:ARG:마조
	LOCAL:3 += GETPALAMLV(PALAM:굴복, 15) * 2
ELSE
	LOCAL:3 += GETPALAMLV(PALAM:굴복, 15)
ENDIF

LOCAL:5 += ABL:ARG:순종 * 5
LOCAL:5 += ABL:ARG:욕망 * (10 + TALENT:ARG:쾌감응답 * 2)
LOCAL:5 += ABL:ARG:봉사정신 * 5
LOCAL:5 += ABL:ARG:V감각 * 10
LOCAL:5 += ABL:ARG:마조끼 * 5
LOCAL:5 += ABL:ARG:정액중독 * 7
LOCAL:5 += ABL:ARG:질내사정중독 * 20
LOCAL:5 += ABL:ARG:질내사정중독 * 15
LOCAL:5 += MARK:ARG:쾌락각인 * 10
LOCAL:5 += MARK:ARG:고통각인 * 10
LOCAL:5 += MARK:ARG:시간각인 * 10

LOCAL = LOCAL:3 * LOCAL:5 / 500

RETURNF LOCAL

@CHK_NAMA_REASON(ARG, ARGS)
#FUNCTION
#DIM 이성판정치
VARSET LOCAL

이성판정치 = 800 + MARK:ARG:반발각인 * 500

SIF ESTRUS_CYCLE(ARG) == 150
	이성판정치 += 1000

IF TCVAR:ARG:발정
	이성판정치 -= 200
ELSEIF TCVAR:ARG:춘약
	이성판정치 -= 50
ENDIF

IF TALENT:ARG:츤데레
	IF TALENT:ARG:연모
		이성판정치 = 이성판정치 / 2
	ELSE
		이성판정치 = 이성판정치 * 3 / 2
	ENDIF
ENDIF

;신뢰도
IF CFLAG:ARG:신뢰도 < 100
	이성판정치 *= 5
ELSEIF CFLAG:ARG:신뢰도 < 300
	이성판정치 *= 5 / 2
ELSEIF CFLAG:ARG:신뢰도 < 500
	이성판정치 *= 5 / 3
ELSEIF CFLAG:ARG:신뢰도 < 1000
	이성판정치 *= 5 / 4
ENDIF

;호감도
SELECTCASE CFLAG:ARG:호감도
CASE 0 TO 2000
	이성판정치 *= 10
CASE 2000 TO 3999
	이성판정치 *= 8
CASE 4000 TO 5999
	이성판정치 *= 6
CASE 6000 TO 7999
	이성판정치 *= 4
CASE 8000 TO 9999
	이성판정치 *= 2
CASEELSE
;	이성판정치 *= 1
ENDSELECT

;카운터라면 여기서 소질 처리해 둔다
IF ARGS == "COUNTER"
	SIF TALENT:ARG:저항
		이성판정치 += 300
	IF TALENT:MASTER:수수께끼의매력
		이성판정치 = 이성판정치 * 9 / 10
	ENDIF
	IF TALENT:ARG:자존심 == 1
		이성판정치 = 이성판정치 * 7 / 5
	ENDIF
	IF OTOKOGIRAI(ARG)
		이성판정치 = 이성판정치 * 3 / 2
	ENDIF
	IF TALENT:ARG:도착적
		이성판정치 = 이성판정치 * 9 / 10
	ENDIF

	IF ABL:ARG:V감각 > 10
		이성판정치 = 이성판정치 * 9 / 10
		SIF TALENT:ARG:V감도 == 1
			이성판정치 = 이성판정치 * 4 / 5
		SIF TALENT:ARG:포르치오성감
			이성판정치 = 이성판정치 * 4 / 5
		SIF TALENT:ARG:음호
			이성판정치 = 이성판정치 / 2
	ENDIF

	IF TALENT:ARG:츤데레
		IF TALENT:ARG:연모
			이성판정치 = 이성판정치 * 2 / 3
		ELSE
			이성판정치 = 이성판정치 * 3 / 2
		ENDIF
	ENDIF
ENDIF

이성판정치 = MAX(이성판정치, 0)
RETURNF 이성판정치

@NAMA_POISONING(ARG)
#DIM 이성판정치
#DIM 욕망판정치
#DIM 호의표시
VARSET LOCAL

PRINTFORMW %CALLNAME:ARG%의 가슴 속

욕망판정치 = CHK_NAMA_POISONING(ARG)
CALL SHOW_NAMAPOWER(욕망판정치)

WAIT
이성판정치 = CHK_NAMA_REASON(ARG)

CALL SHOW_REASONWALL(이성판정치)
IF TALENT:MASTER:수수께끼의매력
	CALL COLORMESSAGE(@"%CALLNAME:ARG%는, %CALLNAME:MASTER%의 수수께끼의매력에 이성이 흔들리는 것을 느낀……", C_PINK, 1,1)
	이성판정치 = 이성판정치 * 9 / 10
	CALL SHOW_REASONWALL(이성판정치)
ENDIF
IF TALENT:ARG:자존심 == -1 || TALENT:ARG:헌신적 == 1
	이성판정치  = 이성판정치 * 9 / 10
	CALL COLORMESSAGE(@"%CALLNAME:ARG%는, 여기까지 신신 부탁해지면 좋겠다고 생각해 버린……", C_PINK, 1,1)
ELSEIF TALENT:ARG:자존심 == 1
	이성판정치 = 이성판정치 * 7 / 5
	CALL COLORMESSAGE(@"자존심의 높은 %CALLNAME:ARG%는, 제멋대로언동에 화를 낸……", C_PINK, 1,1)
	CALL SHOW_REASONWALL(이성판정치)
ENDIF
IF OTOKOGIRAI(ARG)
	이성판정치 = 이성판정치 * 3 / 2
	IF TALENT:ARG:성별기호 == 3
		CALL COLORMESSAGE(@"%CALLNAME:ARG%는 다른 사람 일반적으로 대해 기피 감정 을 가지고 있는……", C_PINK, 1,1)
	ELSEIF TALENT:ARG:성별기호 == 1
		CALL COLORMESSAGE(@"%CALLNAME:ARG%는 남성 일반적으로 대해 기피 감정 을 가지고 있는……", C_PINK, 1,1)
	ENDIF
	CALL SHOW_REASONWALL(이성판정치)
ENDIF
IF TALENT:ARG:도착적
	CALL COLORMESSAGE(@"%CALLNAME:ARG%는, 전후를 생각하지 않는 성교에 도착적인 매력을 느낀……", C_PINK, 1,1)
	이성판정치 = 이성판정치 * 9 / 10
	CALL SHOW_REASONWALL(이성판정치)
ENDIF

IF ABL:ARG:V감각 > 10
	CALL COLORMESSAGE(@"%CALLNAME:ARG%의 자궁이, 비유하자도 없게 쑤셨다……!", C_PINK, 1,1)
	이성판정치 = 이성판정치 * 9 / 10
	SIF TALENT:ARG:V감도 == 1
		이성판정치 = 이성판정치 * 4 / 5
	SIF TALENT:ARG:포르치오성감
		이성판정치 = 이성판정치 * 4 / 5
	SIF TALENT:ARG:음호
		이성판정치 = 이성판정치 / 2
	CALL SHOW_REASONWALL(이성판정치)
ENDIF

IF TALENT:ARG:츤데레
	IF TALENT:ARG:연모
		이성판정치 = 이성판정치 * 2 / 3
		CALL COLORMESSAGE(@"%CALLNAME:ARG%는 데레!", C_PINK, 1,1)
	ELSE
		이성판정치 = 이성판정치 * 3 / 2
		CALL COLORMESSAGE(@"%CALLNAME:ARG%는 반감을 안은……", C_PINK, 1,1)
	ENDIF
	CALL SHOW_REASONWALL(이성판정치)
ENDIF

WAIT
IF CHK_NAMA_POISONING(ARG) > 이성판정치
	PRINTFORMW %CALLNAME:MASTER%로부터의 물음에, %CALLNAME:ARG%의 눈동자가 욕정에 녹는다
	PRINTFORMW %CALLNAME:ARG%는, 끄덕하고 수긍했다……
	CFLAG:ARG:육아중해금 = 1
	;일단 EVENT31로 설정.
	CALL KOJO_MESSAGE_SEND("EVENT", 31, TARGET, 1,0)
ELSE
	PRINTFORML 	%CALLNAME:ARG%는 넌지시 끊었다
	CALL KOJO_MESSAGE_SEND("EVENT", 31, TARGET, 2,0)
	PRINTL [0]상대의 의지를 존중한다
	PRINTL [1]밀어붙인다
	$INPUT2_LOOP
	INPUT

	IF RESULT == 0
		TFLAG:16 =2
		TFLAG:17 = TARGET
	ELSEIF RESULT == 1
	;입의 능숙함과 상대 나름에서는 달라붙으면 어떻게든 된다
		LOCAL = (4 - TALENT:ARG:응답 - TALENT:ARG:담력 - TALENT:ARG:태도) * (ABL:MASTER:화술기능 + 2 * CFLAG:ARG:퇴짜)
		LOCAL:2 = 이성판정치 * (100 - LOCAL) / 200
		CALL SHOW_REASONWALL(LOCAL:2)
		IF CHK_NAMA_POISONING(ARG) > LOCAL:2
			PRINTFORMW %마스터는% 세 치 혓바닥으로 어떻게든%CALLNAME:ARG%의 욕망을 꺼냈다
			PRINTFORMW %CALLNAME:ARG%는, 끄덕하고 수긍했다……
			CFLAG:ARG:육아중해금 = 1
			CALL KOJO_MESSAGE_SEND("EVENT", 31, TARGET, 1,0)
		ELSE
			CALL KOJO_MESSAGE_SEND("EVENT", 31, TARGET, 3,0)
			PRINTFORMW %CALLNAME:ARG%에 마음껏 화가 났다…
			CFLAG:ARG:퇴짜 += 1
			CALL ENDUFUFU(ARG)
			CALL GET_ANGRY(ARG)
			MARK:ARG:반발각인 = MIN(MARK:ARG:반발각인 + 1, 3)
			TFLAG:106 = 0
			TFLAG:16 = 2
		ENDIF
	ELSE
		GOTO INPUT2_LOOP
	ENDIF
ENDIF

@SHOW_NAMAPOWER(욕망판정치, UNIT = 100)
#DIM 욕망판정치
#DIM 욕망표시
#DIM UNIT

PRINTFORM 삽입 하고 싶음:
욕망표시 = MAX(욕망판정치 / UNIT, 0)
LOCALS:1 = %GETFONT()%
SETFONT "Times New Roman"
LOCAL = GETCOLOR()
PRINTFORM %UNICODE(0x2764) * MAX((욕망표시 / 10000 -1), 0)%
RESETCOLOR
SETCOLOR 255,51,153
SIF 욕망표시 >=10000
	PRINTFORM %UNICODE(0x2764) * (9999) %%UNICODE(0x2764)%

PRINTFORM %UNICODE(0x2764) * (욕망표시 % 10000)%
SETCOLOR LOCAL

SIF 욕망판정치 % UNIT > (UNIT / 2)
	PRINTFORML %UNICODE(0x2764)%
SETFONT LOCALS:1
PRINTW


code:
@CHK_HININ_LOVE(ARG)
#FUNCTION
LOCAL = 0
SIF TALENT:ARG:연인
	LOCAL += 300
;애정경험

LOCAL += EXP:ARG:애정경험 / 2

;호감도
SELECTCASE CFLAG:ARG:호감도
CASE 0 TO 499
	LOCAL -= 100
CASE 500 TO 999
	LOCAL += 30
CASE 1000 TO 2999
	LOCAL += 50
CASEELSE
	LOCAL += CFLAG:ARG:호감도 / 30
ENDSELECT

LOCAL += ABL:ARG:친밀 * 20
LOCAL += ABL:ARG:순종 * 7
LOCAL += ABL:ARG:봉사정신 * 7

RETURNF LOCAL

@CHK_HININ_REASON(ARG, ARGS)
#FUNCTION
#DIM 이성판정치
VARSET LOCAL

LOCAL:3 += GETPALAMLV(PALAM:욕정, 15) * (10 + TALENT:ARG:쾌감응답 * 3)
LOCAL:3 += GETPALAMLV(PALAM:복종, 15) * (10 - TALENT:ARG:태도 * 3)
LOCAL:3 += GETPALAMLV(PALAM:호의, 15) * 10

LOCAL:5 += ABL:ARG:질내사정중독 * 15
LOCAL:5 += ABL:ARG:욕망 * (10 + TALENT:ARG:쾌감응답 * 2)
LOCAL:5 += MARK:ARG:쾌락각인 * 10
LOCAL:5 += MARK:ARG:괘씸각인 * 10
LOCAL:5 += MARK:ARG:고통각인 * 10
LOCAL:5 -= MARK:ARG:반발각인 * 100

이성판정치 = 800 - LOCAL:3 * LOCAL:5 / 300

SIF ESTRUS_CYCLE(ARG) == 150
	이성판정치 += 1000

IF TCVAR:ARG:발정
	이성판정치 -= 200
ELSEIF TCVAR:ARG:미약 || TCVAR:ARG:춘약
	이성판정치 -= 50
ENDIF

IF TALENT:ARG:츤데레
	IF TALENT:ARG:연모
		이성판정치 = 이성판정치 * 2 / 3
	ELSE
		이성판정치 = 이성판정치 * 3 / 2
	ENDIF
ENDIF

;신뢰도
IF CFLAG:ARG:신뢰도 < 100
	이성판정치 *= 5
ELSEIF CFLAG:ARG:신뢰도 < 300
	이성판정치 *= 5 / 2
ELSEIF CFLAG:ARG:신뢰도 < 500
	이성판정치 *= 5 / 3
ELSEIF CFLAG:ARG:신뢰도 < 1000
	이성판정치 *= 5 / 4
ENDIF

;카운터라면 여기서 소질 처리해 둔다
IF ARGS == "COUNTER"
	SIF TALENT:ARG:저항
		이성판정치 += 300
	IF TALENT:ARG:자존심 == -1
		이성판정치  = 이성판정치 * 9 / 10
	ELSEIF TALENT:ARG:자존심 == 1
		이성판정치 = 이성판정치 * 6 / 5
	ENDIF
	SIF OTOKOGIRAI(ARG)
		이성판정치 = 이성판정치 * 3 / 2
	SIF TALENT:ARG:정조 == 1
		이성판정치 = 이성판정치 * 6 / 5
	SIF TALENT:MASTER:수수께끼의매력
		이성판정치 = 이성판정치 * 9 / 10
	SIF TALENT:ARG:도착적
		이성판정치 = 이성판정치 * 9 / 10
	IF TALENT:ARG:일선을넘지않음
		SELECTCASE EXP:ARG:애정경험
			CASE IS >= 500
				이성판정치 = 이성판정치 / 2
			CASE IS >= 300
				이성판정치 = 이성판정치 * 4 / 3
			CASE IS >= 100
				이성판정치 = 이성판정치 * 3 / 2
			CASEELSE
				이성판정치 *= 2
		ENDSELECT
	ENDIF
	IF TALENT:ARG:츤데레
		IF TALENT:ARG:연모
			이성판정치 = 이성판정치 * 2 / 3
		ELSE
			이성판정치 = 이성판정치 * 3 / 2
		ENDIF
	ENDIF
ENDIF

이성판정치 = MAX(이성판정치, 0)
RETURNF 이성판정치

@OGAMITAOSHI(ARG)
#DIM 이성판정치
#DIM 호의판정치
#DIM 호의표시
VARSET LOCAL

PRINTFORMW %CALLNAME:ARG%의 가슴 속

호의판정치 = CHK_HININ_LOVE(ARG)
CALL SHOW_LOVEPOWER(호의판정치)

WAIT
이성판정치 = CHK_HININ_REASON(ARG)

CALL SHOW_REASONWALL(이성판정치)
IF TALENT:MASTER:수수께끼의매력
	CALL COLORMESSAGE(@"%CALLNAME:ARG%는, %CALLNAME:MASTER%의 수수께끼의매력에 이성이 흔들리는 것을 느낀……", C_PINK, 1,1)
	이성판정치 = 이성판정치 * 9 / 10
	CALL SHOW_REASONWALL(이성판정치)
ENDIF
IF TALENT:ARG:자존심 == -1
	이성판정치  = 이성판정치 * 9 / 10
ELSEIF TALENT:ARG:자존심 == 1
	이성판정치 = 이성판정치 * 6 / 5
	CALL COLORMESSAGE(@"자존심의 높은 %CALLNAME:ARG%는, 자신을 염가판매 하는 것 같은 흉내는 생활이라고 생각하고 있는", C_PINK, 1,1)
	CALL SHOW_REASONWALL(이성판정치)
ENDIF
IF TALENT:ARG:정조 == 1
	이성판정치 = 이성판정치 * 6 / 5
	CALL COLORMESSAGE(@"정조 관념의 강한 %CALLNAME:ARG%는, 거기까지 용서(허락)해 좋은 것다시 라고 생각한 ……", C_PINK, 1,1)
	CALL SHOW_REASONWALL(이성판정치)
ENDIF
IF OTOKOGIRAI(ARG)
	이성판정치 = 이성판정치 * 3 / 2
	IF TALENT:ARG:성별기호 == 3
		CALL COLORMESSAGE(@"%CALLNAME:ARG%는 다른 사람 일반적으로 대해 기피 감정 을 가지고 있는……", C_PINK, 1,1)
	ELSEIF TALENT:ARG:성별기호 == 1
		CALL COLORMESSAGE(@"%CALLNAME:ARG%는 남성 일반적으로 대해 기피 감정 을 가지고 있는……", C_PINK, 1,1)
	ENDIF
	CALL SHOW_REASONWALL(이성판정치)
ENDIF
IF TALENT:ARG:도착적
	CALL COLORMESSAGE(@"%CALLNAME:ARG%는, 생에서의 성교에 도착적인 매력을 느끼고 있는……", C_PINK, 1,1)
	이성판정치 = 이성판정치 * 9 / 10
	CALL SHOW_REASONWALL(이성판정치)
ENDIF
IF TALENT:ARG:일선을넘지않음
	SELECTCASE EXP:ARG:애정경험
		CASE IS >= 500
			CALL COLORMESSAGE(@"%CALLNAME:ARG%는, %CALLNAME:MASTER%에는 이제(벌써) 어떤 것이라도 용서(허락)해 끝내고 싶다……!", C_PINK, 1,1)
			이성판정치 = 이성판정치 / 2
		CASE IS >= 300
			CALL COLORMESSAGE(@"%CALLNAME:ARG%는, %CALLNAME:MASTER%상대라고 해도 아직 조금 저항이 있는 것 같다……", C_PINK, 1,1)
			이성판정치 = 이성판정치 * 6 / 5
		CASE IS >= 100
			CALL COLORMESSAGE(@"%CALLNAME:ARG%는, 친한 상대해도 어느 정도의 거리는 취해 두고 싶은……", C_PINK, 1,1)
			이성판정치 = 이성판정치 * 3 / 2
		CASEELSE
			CALL COLORMESSAGE(@"%CALLNAME:ARG%는, 다른 사람을 거기까지 받아들이고 싶다고는 바라지 않은……", C_PINK, 1,1)
			이성판정치 *= 2
	ENDSELECT
	CALL SHOW_REASONWALL(이성판정치)
ENDIF
IF TALENT:ARG:츤데레
	IF TALENT:ARG:연모
		이성판정치 = 이성판정치 * 2 / 3
		CALL COLORMESSAGE(@"%CALLNAME:ARG%는 데레!", C_PINK, 1,1)
	ELSE
		이성판정치 = 이성판정치 * 3 / 2
		CALL COLORMESSAGE(@"%CALLNAME:ARG%는 반감을 안은……", C_PINK, 1,1)
	ENDIF
	CALL SHOW_REASONWALL(이성판정치)
ENDIF
WAIT
IF CHK_HININ_LOVE(ARG) > 이성판정치
	IF ESTRUS_CYCLE(ARG) != 150
		PRINTFORMW %CALLNAME:MASTER%의 주위의 시선에도 아랑곳 없는 간절히원함에, %CALLNAME:ARG%아래 치자 접혀 주었다
		CFLAG:ARG:생해금 = 1
		CALL KOJO_MESSAGE_SEND("EVENT", 18, TARGET, 4,0)
		PRINTW 위험일 이외에서는 피임없이 섹스 해 좋은일이 되었다!
	ELSE
		PRINTFORMW %CALLNAME:ARG%의 아이를 갖고 싶다, 라고 전하면(자), %CALLNAME:ARG%는 얼굴을 붉혀 수긍했다
		CFLAG:ARG:생해금 = 2
		CALL KOJO_MESSAGE_SEND("EVENT", 18, TARGET, 5,0)
		PRINTFORMW %CALLNAME:ARG%로부터 아이 만들기의 합의를 얻었다!
	ENDIF
ELSE
	PRINTFORML 	%CALLNAME:ARG%는 넌지시 끊었다
	CALL KOJO_MESSAGE_SEND("EVENT", 18, TARGET, 2,0)
	PRINTL [0]상대의 의지를 존중한다
	PRINTL [1]밀어붙인다
	$INPUT2_LOOP

	INPUT
	IF RESULT == 0
		TFLAG:16 =2
		TFLAG:17 = TARGET
	ELSEIF RESULT == 1
	;입의 능숙함과 상대 나름에서는 달라붙으면 어떻게든 된다
		LOCAL = (4 - TALENT:ARG:응답 - TALENT:ARG:담력 - TALENT:ARG:태도) * (ABL:MASTER:화술기능 + 3 * CFLAG:ARG:퇴짜)
		LOCAL:2 = 이성판정치 * (100 - LOCAL) / 100
		CALL SHOW_REASONWALL(LOCAL:2)
		IF CHK_HININ_LOVE(ARG) > LOCAL:2
			PRINTFORMW %마스터는% 세 치 혓바닥으로 어떻게든%CALLNAME:ARG%를 둥근 붐비었다
			IF ESTRUS_CYCLE(ARG) != 150
				CFLAG:ARG:생해금 = 1
				CALL KOJO_MESSAGE_SEND("EVENT", 18, TARGET, 4,0)
				PRINTW 위험일 이외에서는 피임없이 섹스 해 좋은일이 되었다!
			ELSE
				CFLAG:ARG:생해금 = 2
				CALL KOJO_MESSAGE_SEND("EVENT", 18, TARGET, 5,0)
				PRINTFORMW %CALLNAME:ARG%로부터 아이 만들기의 합의를 얻었다!
			ENDIF
		ELSE
			CALL KOJO_MESSAGE_SEND("EVENT", 18, TARGET, 3,0)
			PRINTFORMW %CALLNAME:ARG%에 마음껏 화가 났다…
			CFLAG:ARG:퇴짜 += 1
			CALL ENDUFUFU(ARG)
			CALL GET_ANGRY(ARG)
			MARK:ARG:반발각인 = MIN(MARK:ARG:반발각인 + 1, 3)
			TFLAG:106 = 0
			TFLAG:16 = 2
		ENDIF
	ELSE
		GOTO INPUT2_LOOP
	ENDIF
ENDIF

@SHOW_REASONWALL(이성판정치, UNIT = 100)
#DIM 이성판정치
#DIM UNIT

PRINTFORM 이성의 벽　　　:
SETCOLOR 255,255,0
LOCAL = MAX(이성판정치 / UNIT, 1)
PRINTFORM %"★" * LOCAL%
RESETCOLOR
SIF 이성판정치 % UNIT > (UNIT / 2)
	PRINTL ★
PRINTW

@SHOW_LOVEPOWER(호의판정치, UNIT = 100)
#DIM 호의판정치
#DIM 호의표시
#DIM UNIT

PRINTFORM %CALLNAME:MASTER%에의 호의:
호의표시 = MAX(호의판정치 / UNIT, 0)
LOCALS:1 = %GETFONT()%
SETFONT "Times New Roman"
LOCAL = GETCOLOR()
PRINTFORM %UNICODE(0x2764) * MAX((호의표시 / 10000 -1), 0)%
RESETCOLOR
SETCOLOR 255,51,153
SIF 호의표시 >=10000
	PRINTFORM %UNICODE(0x2764) * (9999) %%UNICODE(0x2764)%

PRINTFORM %UNICODE(0x2764) * (호의표시 % 10000)%
SETCOLOR LOCAL

SIF 호의판정치 % UNIT > (UNIT / 2)
	PRINTFORML %UNICODE(0x2764)%
SETFONT LOCALS:1
PRINTW