;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;
;	bfӏ
;
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
;	\
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

.var L800 bfJeS bfy[W bfy[W bf bf
? bfJeS = 1
? bfy[W = 0

.loop
	.list CG
	.switch bfJeS
	.case 1
		? bfy[W = 3
		? bf = CGST
		? bf   = CGST_MAX
		.switch bfy[W
		.case 0
			.list CG
			VGST_00 VGST_00a
			VGST_01 VGST_01a VGST_01b
			VGST_02 VGST_02a
			VGST_03 VGST_03a VGST_03b
			VGST_04 VGST_04a VGST_04b
			VGST_05 VGST_05a
			VGST_06 VGST_06a
			VGST_07 VGST_07a
			VGST_08 VGST_08a
		.case 1
			.list CG
			VGST_09 VGST_09a VGST_09b
			VGST_10 VGST_10a
			VGST_11 VGST_11a VGST_11b
			VGST_12 VGST_12a
			VGST_13 VGST_13a VGST_13b
			HGST_00 HGST_00a HGST_00b HGST_00c
			HGST_01 HGST_01a HGST_01b
			HGST_02 HGST_02a HGST_02b
			HGST_03 HGST_03a HGST_03b HGST_03c HGST_03d
		.case 2
			.list CG
			HGST_04 HGST_04a HGST_04b HGST_04c
			HGST_05 HGST_05a HGST_05b HGST_05c
			HGST_06 HGST_06a HGST_06b
			HGST_07 HGST_07a HGST_07b HGST_07c
			HGST_08 HGST_08a HGST_08b
			HGST_09 HGST_09a
		.end
	.case 2
		? bfy[W = 3
		? bf = CGTI
		? bf   = CGTI_MAX
		.switch bfy[W
		.case 0
			.list CG
			VGTI_00 VGTI_00a VGTI_00b
			VGTI_01 VGTI_01a
			VGTI_02 VGTI_02a
			VGTI_03 VGTI_03a
			VGTI_04 VGTI_04a VGTI_04b
			VGTI_05 VGTI_05a VGTI_05b
			VGTI_06 VGTI_06a VGTI_06b
			VGTI_07 VGTI_07a
			VGTI_08 VGTI_08a
		.case 1
			.list CG
			VGTI_09 VGTI_09a VGTI_09b
			VGTI_10 VGTI_10a VGTI_10b
			VGTI_11 VGTI_11a
			VGTI_12 VGTI_12a
			VGTI_13 VGTI_13a
			HGTI_00 HGTI_00a HGTI_00b HGTI_00c HGTI_00d
			HGTI_01 HGTI_01a HGTI_01b
			HGTI_02 HGTI_02a HGTI_02b
			HGTI_03 HGTI_03a
		.case 2
			.list CG
			HGTI_04 HGTI_04a HGTI_04b HGTI_04c HGTI_04d
			HGTI_05 HGTI_05a HGTI_05b HGTI_05c
			HGTI_06 HGTI_06a HGTI_06b HGTI_06c HGTI_06d HGTI_06e
			HGTI_07 HGTI_07a HGTI_07b HGTI_07c HGTI_07d
			HGTI_08 HGTI_08a HGTI_08b HGTI_08c
			HGTI_09 HGTI_09a HGTI_09b HGTI_09c
		.end
	.case 3
		? bfy[W = 3
		? bf = CGKU
		? bf   = CGKU_MAX
		.switch bfy[W
		.case 0
			.list CG
			VGKU_00 VGKU_00a VGKU_00b
			VGKU_01 VGKU_01a
			VGKU_02 VGKU_02a VGKU_02b
			VGKU_03 VGKU_03a
			VGKU_04 VGKU_04a
			VGKU_05 VGKU_05a VGKU_05b
			VGKU_06 VGKU_06a
			VGKU_07 VGKU_07a
			VGKU_08 VGKU_08a
		.case 1
			.list CG
			VGKU_09 VGKU_09a VGKU_09b
			VGKU_10 VGKU_10a VGKU_10b
			VGKU_11 VGKU_11a
			VGKU_12 VGKU_12a
			VGKU_13 VGKU_13a
			HGKU_00 HGKU_00a HGKU_00b HGKU_00c HGKU_00d HGKU_00e HGKU_00f
			HGKU_01 HGKU_01a HGKU_01b
			HGKU_02 HGKU_02a HGKU_02b
			HGKU_03 HGKU_03a HGKU_03b HGKU_03c HGKU_03d HGKU_03e HGKU_03f
		.case 2
			.list CG
			HGKU_04 HGKU_04a HGKU_04b
			HGKU_05 HGKU_05a HGKU_05b
			HGKU_06 HGKU_06a
			HGKU_07 HGKU_07a HGKU_07b HGKU_07c
			HGKU_08 HGKU_08a HGKU_08b HGKU_08c HGKU_08d
			HGKU_09 HGKU_09a
			HGKU_10 HGKU_10a
		.end
	.case 4
		? bfy[W = 3
		? bf = CGSA
		? bf   = CGSA_MAX
		.switch bfy[W
		.case 0
			.list CG
			VGSA_00 VGSA_00a
			VGSA_01 VGSA_01a
			VGSA_02 VGSA_02a VGSA_02b
			VGSA_03 VGSA_03a VGSA_03b
			VGSA_04 VGSA_04a
			VGSA_05 VGSA_05a
			VGSA_06 VGSA_06a
			VGSA_07 VGSA_07a VGSA_07b
			VGSA_08 VGSA_08a VGSA_08b VGSA_08c
		.case 1
			.list CG
			VGSA_09 VGSA_09a
			VGSA_10 VGSA_10a VGSA_10b
			VGSA_11 VGSA_11a
			VGSA_12 VGSA_12a
			VGSA_13 VGSA_13a
			HGSA_00 HGSA_00a HGSA_00b
			HGSA_01 HGSA_01a HGSA_01b HGSA_01c
			HGSA_02 HGSA_02a HGSA_02b
			HGSA_03 HGSA_03a HGSA_03b HGSA_03c
		.case 2
			.list CG
			HGSA_04 HGSA_04a HGSA_04b
			HGSA_05 HGSA_05a HGSA_05b
			HGSA_06 HGSA_06a
			HGSA_07 HGSA_07a HGSA_07b
			HGSA_08 HGSA_08a HGSA_08b HGSA_08c
			HGSA_09 HGSA_09a HGSA_09b HGSA_09c
			HGSA_10 HGSA_10a HGSA_10b
			HGSA_11 HGSA_11a HGSA_11b HGSA_11c
		.end
	.case 5
		? bfy[W = 3
		? bf = CGHO
		? bf   = CGHO_MAX
		.switch bfy[W
		.case 0
			.list CG
			VGHO_00 VGHO_00a
			VGHO_01 VGHO_01a VGHO_01b
			VGHO_02 VGHO_02a
			VGHO_03 VGHO_03a VGHO_03b
			VGHO_04 VGHO_04a
			VGHO_05 VGHO_05a
			VGHO_06 VGHO_06a VGHO_06b
			VGHO_07 VGHO_07a VGHO_07b
			VGHO_08 VGHO_08a
		.case 1
			.list CG
			VGHO_09 VGHO_09a VGHO_09b
			VGHO_10 VGHO_10a
			VGHO_11 VGHO_11a
			VGHO_12 VGHO_12a VGHO_12b
			VGHO_13 VGHO_13a VGHO_13b
			HGHO_00 HGHO_00a HGHO_00b
			HGHO_01 HGHO_01a HGHO_01b HGHO_01c HGHO_01d HGHO_01e
			HGHO_02 HGHO_02a HGHO_02b
			HGHO_03 HGHO_03a HGHO_03b
		.case 2
			.list CG
			HGHO_04 HGHO_04a HGHO_04b
			HGHO_05 HGHO_05a HGHO_05b HGHO_05c
			HGHO_06 HGHO_06a HGHO_06b HGHO_06c
			HGHO_07 HGHO_07a HGHO_07b
			HGHO_08 HGHO_08a HGHO_08b HGHO_08c HGHO_08d HGHO_08e HGHO_08f
			HGHO_09 HGHO_09a HGHO_09b
			HGHO_10 HGHO_10a HGHO_10b
			HGHO_11 HGHO_11a
		.end
	.case 6
		? bfy[W = 2
		? bf = CGMI
		? bf   = CGMI_MAX
		.switch bfy[W
		.case 0
			.list CG
			VGMI_00 VGMI_00a
			VGMI_01 VGMI_01a
			VGMI_02 VGMI_02a
			VGMI_03 VGMI_03a VGMI_03b
			VGMI_04 VGMI_04a
			VGMI_05 VGMI_05a
			VGMI_06 VGMI_06a VGMI_06b
			HGMI_00 HGMI_00a HGMI_00b HGMI_00c HGMI_00d HGMI_00e HGMI_00f HGMI_00g
			HGMI_01 HGMI_01a HGMI_01b
		.case 1
			.list CG
			HGMI_02 HGMI_02a HGMI_02b HGMI_02c
			HGMI_03 HGMI_03a HGMI_03b HGMI_03c
			HGMI_04 HGMI_04a HGMI_04b HGMI_04c HGMI_04d HGMI_04e HGMI_04f HGMI_04g HGMI_04h
		.end
	.case 7
		? bfy[W = 1
		? bf = CGET
		? bf   = CGET_MAX
		.switch bfy[W
		.case 0
			.list CG
			VGET_00 VGET_00a
			VGET_01 VGET_01a
			VGET_02 VGET_02a VGET_02b
		.end
	.case 8
		? bfy[W = 5
		? bf = 0
		? bf   = 0
		.switch bfy[W
		.case 0
			.list CG
			BG_BG000a BG000a BG000b BG000c BG000d BG000e BG000f 
			BG_BG001a BG001a BG001b BG001c BG001d BG001e BG001f BG001g BG001h BG001i 
			BG_BG002a BG002a BG002b BG002c BG002d BG002e BG002f BG002g BG002h 
			BG_BG003a BG003a BG003b BG003c BG003d BG003e BG003f 
			BG_BG004a BG004a BG004b 
			BG_BG005a BG005a BG005b BG005c BG005d BG005e BG005f 
			BG_BG010a BG010a BG010b BG010c BG010e BG010f BG010g BG010h BG010i 
			BG_BG011a BG011a BG011b BG011c BG011e BG011f BG011g BG011h BG011i BG011j 
			BG_BG012a BG012a BG012b BG012c BG012e BG012f BG012g BG012h BG012i BG012j 
		.case 1
			.list CG
			BG_BG013a BG013a BG013b BG013c BG013e 
			BG_BG014a BG014a BG014b BG014c 
			BG_BG015a BG015a BG015b BG015c BG015e BG015f 
			BG_BG020a BG020a BG020b BG020c BG020e BG020f 
			BG_BG021a BG021a BG021b BG021c BG021e BG021f 
			BG_BG022a BG022a BG022b BG022c 
			BG_BG030a BG030a BG030b BG030c BG030d 
			BG_BG031a BG031a BG031b BG031c BG031d 
			BG_BG032a BG032a BG032b BG032c BG032d 
		.case 2
			.list CG
			BG_BG033a BG033a BG033b BG033c BG033d 
			BG_BG034a BG034a BG034b BG034c BG034d 
			BG_BG035a BG035a BG035b BG035c BG035d 
			BG_BG040a BG040a BG040b BG040c BG040d 
			BG_BG041a BG041a BG041b BG041c BG041d 
			BG_BG050a BG050a BG050b BG050c BG050d 
			BG_BG051a BG051a BG051b BG051c BG051d 
			BG_BG060a BG060a BG060b BG060c BG060d 
			BG_BG070a BG070a BG070b BG070c BG070d 
		.case 3
			.list CG
			BG_BG071a BG071a BG071b BG071c BG071d BG071e BG071f 
			BG_BG080a BG080a BG080b BG080c BG080d 
			BG_BG081a BG081a BG081b BG081c BG081d 
			BG_BG082a BG082a BG082b BG082c BG082d 
			BG_BG090a BG090a BG090b BG090c BG090d BG090e BG090f BG090g BG090h 
			BG_BG100a BG100a BG100b BG100c BG100d BG100e BG100f BG100g BG100h 
			BG_BG101a BG101a BG101b BG101c BG101e BG101f 
			BG_BG110a BG110a BG110b BG110c BG110d 
			BG_BG111a BG111a BG111b BG111c BG111d BG111e BG111f BG111g 
		.case 4
			.list CG
			BG_BG120a BG120a BG120b BG120c 
			BG_BG900a BG900a BG900b BG900c 
		.end
	.end

	.system room_cg
		BASE: x[X
		BASE: TlC
		BASE: Xg: bfJeS==1
		BASE: eBA: bfJeS==2
		BASE: e:   bfJeS==3
		BASE: :   bfJeS==4
		BASE: m: bfJeS==5
		BASE: g:   bfJeS==6
		BASE: ̑: bfJeS==7
		BASE: wi:   bfJeS==8

		BASE: [^[g
		METER: METER_ALL: CGTOTAL: CGTOTAL_MAX
		METER: METER_ACT: bf : bf
		BASE: COMPLETE_ALL: CGTOTAL_MAX<=CGTOTAL
		BASE: COMPLETE_ACT: bf<=bf

		BUTTON: 101: BACK: 0 < bfy[W
		BUTTON: 102: NEXT: bfy[W < bfy[W-1
		BUTTON: 103: z: 2 <= ő僌x
		BUTTON: cancel: ߂
	
		BUTTON: 1: Xg: bfJeS!=1
		BUTTON: 2: eBA: bfJeS!=2
		BUTTON: 3: e:   bfJeS!=3
		BUTTON: 4: :   bfJeS!=4
		BUTTON: 5: m: bfJeS!=5
		BUTTON: 6: g:   bfJeS!=6
		BUTTON: 7: ̑: bfJeS!=7
		BUTTON: 8: wi:   bfJeS!=8

		CGMODE: VGST: HGST: bfJeS==1
		CGMODE: VGTI: HGTI: bfJeS==2
		CGMODE: VGKU: HGKU: bfJeS==3
		CGMODE: VGSA: HGSA: bfJeS==4
		CGMODE: VGHO: HGHO: bfJeS==5
		CGMODE: VGMI: HGMI: bfJeS==6
		CGMODE: VGET: : bfJeS==7
		CGMODE: BG: : bfJeS==8
	.case 101
		.sound se_page
		?bfy[W = bfy[W - 1
	.case 102
		.sound se_page
		?bfy[W = bfy[W + 1
	.case 103
		.load room_scene
	.case 1
		.sound se_toggle
		? bfJeS = 1
		? bfy[W = 0
	.case 2
		.sound se_toggle
		? bfJeS = 2
		? bfy[W = 0
	.case 3
		.sound se_toggle
		? bfJeS = 3
		? bfy[W = 0
	.case 4
		.sound se_toggle
		? bfJeS = 4
		? bfy[W = 0
	.case 5
		.sound se_toggle
		? bfJeS = 5
		? bfy[W = 0
	.case 6
		.sound se_toggle
		? bfJeS = 6
		? bfy[W = 0
	.case 7
		.sound se_toggle
		? bfJeS = 7
		? bfy[W = 0
	.case 8
		.sound se_toggle
		? bfJeS = 8
		? bfy[W = 0
	.case 0
		.load title
	.end
.end
.load title
