//----------------------------------------------------------------------------//
//ヘッダファイル////////////////////////////////////////////////////////////////

const int TEISU_A = 16;    //作るクラスAインスタンスの数
const int TEISU_B = 4;    //作るクラスBインスタンスの数

class A{
private:
    //データ類
}

class B{
private:
    A* mB_A;    //クラスAインスタンスのアドレスを保持するポインタ
    //その他のデータ類
public:
    void SetA(A*);    //mB_Aにアドレスの値を代入する関数
}

class I{    //シングルトンクラス
private:
    static I* mInstance;    //自身を指すポインタ
    I();
    ~I();
    
    A* mI_A[TEISU_A];    //クラスAのアドレスを保持するポインタ
    B* mI_B[TEISU_A];    //クラスBのアドレスを保持するポインタ
public:
    static void Create();    //シングルトン生成関数
    static void Destroy();    //シングルトン破棄関数
    static I* Instance();    //クラスIを利用するにはまずこれを呼ぶ必要がある

    //その他の処理関数
}

//ソースファイル////////////////////////////////////////////////////////////////
//クラスAについての定義
A::A(){}
A::~A(){}

//クラスBについての定義
B::B(){
    mB_A = 0;    //設定しないままだとアクセスした瞬間落ちる
}
B::~B(){};
void B::SetA(A* a){
    mB_A = a;
}

//クラスIについての定義
I::mInstance = 0;    //これをしないとコンパイルが通らない

I::I(){
    for(int i=0; i<TEISU_B; i++){    //クラスBインスタンスを指定の数だけ生成
        mI_B[i] = new B();
    }
    for(int i=0; i<TEISU_A; i++){    //クラスAインスタンスを指定の数だけ生成
        mI_A[i] = new A();
    }
    //クラスAとクラスBの関連付け
    //クラスBのメンバ変数mB_AにクラスAインスタンスのアドレスを代入
    mI_B[0]->SetA(mI_A[0]);
    mI_B[1]->SetA(mI_A[1]);
    mI_B[2]->SetA(mI_A[2]);
    mI_B[3]->SetA(mI_A[3]);
}

I::~I(){
    for(int i=0; i<TEISU_B; i++){{    //クラスBインスタンスを破棄
        delete mI_B[i];
        mI_B = 0;
    }
    for(int i=0; i<TEISU_A; i++){    //クラスAインスタンスを破棄
        delete mI_A[i];
        mI_A = 0;
    }
}

void I::Create(){
    mInstance = new I();
}

void I::Destroy(){
    mInstance->~I();
}

I* I::Instance(){
    if(mInstance==0){//初回アクセス時に始めてインスタンス生成
        I::Create();
    }
    return mInstance;/*****ここで問題発生*****/
}

//以下その他の処理関数についての定義...
//----------------------------------------------------------------------------//

#include <math.h>
#include "DxLib.h"
#include "Main.h"

#define        CEL_SW    32
#define        CEL_SH    32
#define        CEL_W    20
#define        CEL_H    15

enum{ RIGHT, LEFT };

// キャラクター情報
typedef struct{
    bool Flg;
    bool Dir;                // false : RIGHT　/ true : LEFT
    int Px,Py,Mx,My;
    int Ox,Oy,Cx,Cy;
    int Speed;

}CHR;

CHR Play;

// マップデータ
int MapData[CEL_H][CEL_W] = {
    { 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1 },
    { 1,0,0,0,0, 0,0,0,1,0, 0,0,0,0,0, 0,0,0,0,1 },
    { 1,1,1,1,0, 0,0,0,0,0, 0,1,1,0,0, 0,0,0,0,1 },
    { 1,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,1 },
    { 1,0,0,0,1, 1,1,1,1,0, 0,0,0,0,0, 0,0,0,0,1 },

    { 1,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,1 },
    { 1,0,0,0,0, 0,0,0,0,0, 1,1,1,1,0, 0,0,0,0,1 },
    { 1,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,1 },
    { 1,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,1 },
    { 1,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,1 },

    { 1,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,1 },
    { 1,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,1 },
    { 1,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,1 },
    { 1,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,1 },
    { 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1 },
};

// 初期化
void Init(){

    InitHandle();        // 画像の読み込み

    // プレイヤー
    Play.Flg = true;
    Play.Cx = 1;
    Play.Cy = 1;
    Play.Px = Play.Cx * CEL_SW + CEL_SW/2;
    Play.Py = Play.Cy * CEL_SH + CEL_SH/2;
    Play.Speed = 2;

} 

// 処理
void Loop(){

    PlayMove();
    
    // 向きの変更の移動
    if(Key[KEY_INPUT_RIGHT].Key)    Play.Dir = RIGHT;
    if(Key[KEY_INPUT_LEFT].Key)    Play.Dir = LEFT;
    if(Mouse.clFlg){
        if(Mouse.x > Play.Px)    Play.Dir = RIGHT;
        else if(Mouse.x <= Play.Px) Play.Dir = LEFT; 
    }
}

// 描画
void Draw(){
    // プレイヤー
    if(Play.Flg) DrawCenter( Play.Px, Play.Py, Handle.Play, 0xff, Play.Dir ) ;
    
    // マップ
    for(int i=0; i<CEL_H; i++){
        for(int j=0; j<CEL_W; j++){
            int x = j*CEL_SW + CEL_SW/2;
            int y = i*CEL_SH + CEL_SH/2;
            int h = NULL;
            switch(MapData[i][j]){
                case 1:
                    h = Handle.Obj[0];
                    break;
            }
            DrawCenter( x, y, h, 0xff, Play.Dir ) ;
    }
}



void PlayMove(void){

    // 移動量の初期化
    Play.Mx = 0;
    Play.My = 0;

    // 移動量のセット
    for(int speed=0; speed<Play.Speed; speed++){
        
        Play.Cx = int((Play.Px - CEL_SW/2)/CEL_SW);
        Play.Cy = int((Play.Py - CEL_SH/2)/CEL_SH);

        if((Play.Px - CEL_SW/2)%32 == 0){
            if(MapData[Play.Cy][Play.Cx+1] == 1){
                Play.Dir = LEFT;
            }
            if(MapData[Play.Cy][Play.Cx-1] == 1){
                Play.Dir = RIGHT;
            }
        }

        if(Play.Dir == RIGHT)        Play.Mx = 1;
        else if(Play.Dir == LEFT)    Play.Mx = -1;
        
        if(MapData[Play.Cy+1][Play.Cx] != 1){
            Play.My = +3;
        }


        Play.Px += Play.Mx;
        Play.Py += Play.My;
        
    }


}