set title	= \33C6                神々の大地　〜古事記外伝〜\33C7 ＨＤインストーラ
set game_name	= 神々の大地
set diskfree	= 4000000
set dir		= \KOJIKI
set shell	= KAMI.COM
INIT_END

rem ＤＩＳＫ名称（Ｄｉｓｋ差し替えメッセージに使用する）
cls1
cls2
if exist CDISK.VER goto next_2
echo	1 \33c6神々の大地  Ｃディスク\33C7
echo	を\33c2第１ドライブ\33c7に入れ何かキーを押してください
pause
:disk_kojiki_c
if exist CDISK.VER goto next_2
echo	3 \33c2ディスクが違います。ディスクを確認してください。\n
echo	\33c2確認後何かキーを押してください
pause
cls3
goto disk_kojiki_c
:next_2
cls1
echo	1 現在\33c2Ｃ\33c7ディスクの内容をハードディスクに転送中
cls2
copy UNIT_C.DAT
copy BIG_C.DAT
copy VDMAPG_C.DAT
copy CDISK.VER
copy KOJIKI.VER
cls1
cls2
echo	1 \33c6神々の大地  Ａディスク\33C7
echo	を\33c2第１ドライブ\33c7に入れ何かキーを押してください
pause
:disk_kojiki_a
if exist ADISK.VER goto next_1
echo	3 \33c2ディスクが違います。ディスクを確認してください。\n
echo	\33c2確認後何かキーを押してください
pause
cls3
goto disk_kojiki_a
:next_1
cls1
echo	1 現在\33c2Ａ\33c7ディスクの内容をハードディスクに転送中
cls2
copy HEXGRP.DAT
copy HEXMAP.DAT
copy AMAPDATA.DAT
copy VDMAPG_A.DAT
copy UNIT.DAT
copy BIG.DAT
copy CUR.DAT
copy FMDRV.COM
copy KAMI.COM
copy ADISK.VER
copy MAIN.EXE
cls1
cls2
echo	1 \33c6神々の大地  Ｂディスク\33C7
echo	を\33c2第１ドライブ\33c7に入れ何かキーを押してください
pause
:disk_kojiki_b
if exist BDISK.VER goto next_3
echo	3 \33c2ディスクが違います。ディスクを確認してください。\n
echo	\33c2確認後何かキーを押してください
pause
cls3
goto disk_kojiki_b
:next_3
cls1
echo	1 現在\33c2Ｂ\33c7ディスクの内容をハードディスクに転送中
cls2
copy BPDATA.CIM
copy RPDATA.CIM
copy VCDATA.CIM
copy CDATA.CIM
copy SDATA.CIM
copy GRAPH.NPK
copy EVENT.DAT
copy MUSIC.DAT
copy AMAPGRP.DAT
copy CHARA.DAT
copy FACEGRP.DAT
copy VDMAP.DAT
copy FORCEGRP.DAT
copy EFFECT.DAT
copy TERRAIN.DAT
copy BDISK.VER
cls1
cls2
echo	1 \33c6神々の大地  ビジュアルディスク\33C7
echo	を\33c2第１ドライブ\33c7に入れ何かキーを押してください
pause
:disk_kojiki_v
if exist VDISK.VER goto next_4
echo	3 \33c2ディスクが違います。ディスクを確認してください。\n
echo	\33c2確認後何かキーを押してください
pause
cls3
goto disk_kojiki_v
:next_4
cls1
echo	1 現在\33c2ビジュアル\33c7ディスクの内容をハードディスクに転送中
cls2
copy OPENGRP.DAT
copy ENDGRP.DAT
copy OPEN.EXE
copy END.EXE
copy VDISK.VER
END
cls1
echo	これでインストールは終了です。
cls2
echo	ゲームの起動方法はマニュアルに記載してあります。
echo	マニュアルを良くお読みのうえ、ゲームをお楽しみください
cls3
echo	【リターンキー】を押してください。
:inp_key
pause	1
if key != 0x0d goto inp_key
