package SWResource_ensou;

#----------------------------------------
# 演奏会セット
# 
#   by ゆひろ
#----------------------------------------

sub GetRSChr {
my $sow = $_[0];

my $maker = $sow->{'cfg'}->{'CID_MAKER'};
my $admin = $sow->{'cfg'}->{'CID_ADMIN'};
my $undef = $sow->{'cfg'}->{'CID_UNDEF'};

# キャラの表示順
my @order = (
'001', '002', '003', '004', '005',
'006', '007', '008', '009', '010',
'011', '012', '013', '014', '015',
'016', '017', '018', '019', '020',
'021', '022', '023', '024', '025',
'026', '027', '028', '029', '030',
);

# キャラの肩書き
my %chrjob = (
'001'  => 'ピアノ',
'002'  => 'ギター',
'003'  => '草笛',
'004'  => 'ハープ',
'005'  => '板胡',
'006'  => 'ツィター',
'007'  => 'レインスティック',
'008'  => '角笛',
'009'  => 'アルプホルン',
'010'  => '宮太鼓',
'011'  => 'チェロ,
'012'  => '口笛',
'013'  => 'フルート',
'014'  => 'カスタネット',
'015'  => 'カスタネット',
'016'  => 'ハーモニカ',
'017'  => '三味線',
'018'  => 'トロンボーン',
'019'  => 'セルパン',
'020'  => 'スティールパン',
'021'  => 'クラリネット',
'022'  => 'タンバリン',
'023'  => 'シタール',
'024'  => '手拍子',
'025'  => '手拍子',
'026'  => 'ヴィオラ',
'027'  => '汽笛',
'028'  => 'オーボエ',
'029'  => '平太鼓',
'030'  => 'シンバル',
$maker => '',
$admin => '',


);

# キャラの名前
my %chrname = (
'001'  => 'アリシア',
'002'  => 'ルース',
'003'  => 'エフェル,
'004'  => 'コウィスカ',
'005'  => 'シア',
'006'  => 'シルビア',
'007'  => 'ベルスーズ',
'008'  => 'オルファン',
'009'  => 'カルーア',
'010'  => 'マコト',
'011'  => 'ミリッツァ',
'012'  => 'ケルイズ',
'013'  => 'リベラ',
'014'  => 'ムティリュ',
'015'  => 'ネスカ',
'016'  => 'テイト',
'017'  => 'クオン',
'018'  => 'ノール',
'019'  => 'カサドル',
'020'  => 'シャンティ',
'021'  => 'コトワ',
'022'  => 'シェシャ',
'023'  => 'モハーナ',
'024'  => 'ブリジット',
'025'  => 'エディ',
'026'  => 'ルネッタ',
'027'  => 'シズキ',
'028'  => 'アニタ',
'029'  => 'コズエ',
'030'  => 'ソルム',
$maker => '楽器たちの指揮者（村建て人）',
$admin => '演奏会の主催者（管理人）',

);

# ダミーキャラの発言
my @npcsay =(
'ごきげんよう。演奏会へようこそ、歓迎するわ。',
'オオカミさんはどんな音色を奏でるのかしら？',
);

my @expression = (
);

my %charset = (
CAPTION        => '演奏会',
NPCID          => '001',
CHRNAME        => \%chrname,
CHRJOB         => \%chrjob,
ORDER          => \@order,
NPCSAY         => \@npcsay,
IMGBODYW       => 90,
IMGBODYH       => 130,
IMGFACEW       => 90,
IMGFACEH       => 130,
DIR            => "$sow->{'cfg'}->{'DIR_IMG'}/ensou",
EXT            => '.png',
BODY => '',
FACE => '',
WOLF => '',
GRAVE => '',
EXPRESSION     => \@expression,
LAYOUT_NAME    => 'right',
);

return \%charset;
}

1;