#pragma warning(disable: 4996)
#include "DxLib.h"
#include <string>

int InputHandle;
int mozicount = 0;
int gimonnlock = 0;
int movie = 0;
int gimon = 0;
int memorycount = 0;
int memory = 0;
char buffer[256];//★InputHandleに入ったのは文字のデータなので、文字のデータが受け取れる変数の型にする。
char buffer2[256];
char  buffer3[256];
char  buffer4[256];
char  buffer5[256];
char input[256];
char* p;
char* p1;
FILE* outputfile;         // 出力ストリーム
int hyouzi = 0;
char* memo[1000];//関数とは関係ない。//charの配列には必ず定数値を書かなければならない、なのでメモにある文字列1000行まで読み込めるように。100とした。
int n_show = 0;
int show_color = GetColor(255, 0, 255);
int a;
const char* z = "";  // z は drawString で表示する文字列
int pos[2] = { 0 };  // z の表示文字位置(初期値をゼロにする)
unsigned debug_color = GetColor(255, 255, 0);
unsigned z_color = GetColor(5, 255, 255);
int   LEFTmark = 0;
int diffrent = 0;

char my_str2(const char* s1, const char* s2)//ここで入力した文字列と用意された文字列を引数として扱う。

{
    //s1, s2を比較する関数を使うためだけにs2の文字列のサイズが必要なので、変数aに用意した文字列の情報s2を文字列の長さを測るための関数strlenに引数として渡す。
    const size_t a = strlen(s2);
    //無限ループする。
    for (;;) {
        //関数memcmpの返り値が0の時は一致した時なので、==0とする。
        if (memcmp(s1, s2, a) == 0)//打ち込んだ文章が入るstrlen(s2)のs2のバイト数をaに代入して、
            //if (memcmp(s1, s2, a) == 0)メモのs1と打ち込んだs2が一致した時aの返り値が0になる。

            return 1;//入力した文字列にい指定された文字列が入っていた場合は1を返すように設定した。
//入力した文字列が最後の文字まで到達した場合は一致する文字列がないということなので0を返すようにした。
        else if (*s1 == '\0')

            return 0;//入っていなかった
//文字列が一致した場合でも一致する文字列がない場合でも入力した文字列の一文字分の文字コードのバイト数？が繰り上がるようにした。
        else

            ++s1;

    }

}
// drawString -- 文字を一字ずつ表示する
void drawString(int x, int y, int color, int* pos, const char* str)
{
    char c = str[*pos];  // *pos は pos[0] で表示文字位置
    if (pos[1] == 0 && c != '\0') *pos += IsDBCSLeadByte(c) ? 2 : 1;
    if (++pos[1] == 10) pos[1] = 0;  // pos[1] はフレームカウンタ
    DrawFormatString(x, y, color, "%.*s", *pos, str);
}


int readMemo(char** memo, int n)
{
    outputfile = fopen("memo.txt", "r");
    if (outputfile == NULL) return 0;
    int i;
    char buf[256];
    memo[0] = (char*)"";
    for (i = 1; i < n && fgets(buf, sizeof buf, outputfile); i++)
        memo[i] = strdup(buf);
    fclose(outputfile);
    return i;
}


int findMemo(char** memo, int n, char* str)
{
    if (str[0] != '\0')
        for (int i = 0; i < n; i++)
            if (strstr(memo[i], str)) return i;
    return 0;
}

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
{
    SetGraphMode(1500, 780, 32);         // ウィンドウの大きさを指定
    ChangeWindowMode(TRUE);             // 全画面ではなくウインドウを使用
    // ＤＸライブラリの初期化
    if (DxLib_Init() == -1) return -1;
    SetFontSize(33);                             //サイズを42に変更
    // 描画先を裏にする
    SetDrawScreen(DX_SCREEN_BACK);
    InputHandle = MakeKeyInput(150, FALSE, FALSE, FALSE); //これで総計150バイトの文字データを保持できる。
    // 作成したキー入力ハンドルをアクティブにする
    SetActiveKeyInput(InputHandle);

    while (ProcessMessage() == 0)
    {
        // 画面の初期化
        ClearDrawScreen();
        //まずは描画する部分から作る。
        // 入力モードを描画
        DrawKeyInputModeString(1500, 0); // 入力モードを描画
        // 入力途中の文字列を描画
        DrawKeyInputString(0, 0, InputHandle);//InputHandleはint型とリファレンスに書いてあったんで
        //その後にif文での分岐を考える。
          // 入力が終了している場合は終了
          //ループ内とは言えエンターキー一回でCheckKeyInputが呼べればいい。
         //エンターキーが押された時の部分。
        if (CheckKeyInput(InputHandle) != 0) {
            LEFTmark = 678;
            hyouzi = 0;
            gimon = 0;
            memorycount = 0;
            ++mozicount;
            // 入力された文字列を取得、その文字列を数値に変換
            GetKeyInputString(buffer, InputHandle);//ここでInputHandleに入力された文字列の数値をGetKeyInputStringにより文字コードに変換したものを上でchar型で定義したbufferに入れる。
            int n_memo = readMemo(memo, 1000);//ここで関数readMemoを書くことでキーを押すたびに書き込んだ文章が読み込める。
            n_show = findMemo(memo, n_memo, buffer);  // メモを検索

            if (my_str2(buffer, "覚えて")) {

                z = "何を覚えますか？", pos[0] = pos[1] = 0;
                ++mozicount;
                memory = 1;
                gimon = 0;
            }
            //覚えてという言葉以外の場合はメモを読み込む込んでループに入るようにした。
            else if (memory == 0) {
                outputfile = fopen("memo.txt", "r");  // ファイルを読み込み用にオープン(開く)
                if (outputfile == NULL) {          // オープンに失敗した場合
                    printf("cannot open\n");         // エラーメッセージを出して
                    exit(1);                         // 異常終了
                }
                z = "どうしましたか？", pos[0] = pos[1] = 0;
                //★bufferには文字入力の文字列を入れたので、ここにはメモからの文字列は入れられない。なので新しくbuffer2を作る。
                while ((fgets(buffer2, 256, outputfile)) != NULL)//メモに書いた文字列をbuffer2の中に入れる。
                {
                    if (my_str2(buffer, "どんな") && my_str2(buffer, "映画") && my_str2(buffer, "好き") && my_str2(buffer, "？")) {//上の  if (my_str2(buffer, "映画") && my_str2(buffer, "好き") && my_str2(buffer, "？"))
                           //に追加されて「どんな」という言葉がくっつく。②
                        ++mozicount;
                        gimonnlock = 1;
                        movie = 1;
                        //while ((p = fgets(buffer2, 256, outputfile)) != NULL)から抜けるようにするためのもの。

                        //↓★ここで①と入力する文字による②によってメモから"どんな"を含んだ文章が出力される。
                        if (movie == 1 && my_str2(buffer2, "どんな") && my_str2(buffer2, "映画")) {
                            LEFTmark = 893;
                            hyouzi = 1;
                            movie = 0;
                            break;//最後まで文字列を読み込むので条件を満たす文章をbuffer2に入ったら
                        }
                    }

                        //例えば、なんでその「映画」が「好き」なの「？」で既に上のif文を通っているため、ここを通れるのだ。
                    else  if (my_str2(buffer, "なんで") && my_str2(buffer, "映画") && my_str2(buffer, "好き") or my_str2(buffer, "なぜ") && my_str2(buffer, "映画") && my_str2(buffer, "好き")) {//③
                        ++mozicount;
                        gimonnlock = 1;
                        //★↓ここで①と入力する文字による③によってメモから"映画"と"なぜ"を含んだ文章が出力される。
                        if (my_str2(buffer2, "映画") && my_str2(buffer2, "なぜ")) {
                            LEFTmark = 893;
                            hyouzi = 1;
                            break;//最後まで文字列を読み込むので条件を満たす文章をbuffer2に入ったら
                            //while ((p = fgets(buffer2, 256, outputfile)) != NULL)から抜けるようにするためのもの。

                        }
                    }

                    //注意「？」は全角の物を打たないと反応しない
                    else if (my_str2(buffer, "映画") && my_str2(buffer, "好き") && my_str2(buffer, "？")) {//①
                    //  message = "どんな映画が好きなんですか？";
                   // DrawFormatString(100, 300, GetColor(255, 255, 0), "%s", buffer);
                    //例えば、どんな「映画」が「好き」なの「？」で既に上のif文を通っているため、ここを通れるのだ。

                        if (my_str2(buffer2, "映画") && my_str2(buffer2, "好き") && my_str2(buffer2, "？")) {
                            LEFTmark = 1000;
                            movie = 1;
                            hyouzi = 1;
                            break;
                        }


                    }


                    // 文字の入力の入るバッファと、メモからの文字が入るバッファ2とで一致する文字が出てきた場合
                    //一致する場合は1を返すようにしたので==1とする。
                      //入力がない時。
                    if (buffer[0] == '\0') {
                        z = "文字を入力してください。", pos[0] = pos[1] = 0;
                        diffrent = 0;
                    }
                    else if (my_str2(buffer2, buffer) == 0) {
                        z = "すいません。わかりません。", pos[0] = pos[1] = 0;
                        diffrent = 1;
                    }
                    else if (my_str2(buffer2, buffer) == 1 && movie == 1) {//★★映画に関して、「どんな」という言葉に反応しないように1にした。
                        //★ここで→の出力が出る。buffer2, bufferの文字が一致していないとメモの文字が出ないわけだ。
                        hyouzi = 1;
                        gimon = 0;
                        p = strstr(buffer2, "→");//ここで→以降の文字をbuffer3に入れる。
                        p += 2;
                        strcpy(buffer3, p);//関数strcpyが指定した文字である「→」から2バイト動かしたポインタからの文字データ(char型)を加算でbuffer3に入れている
                        //break;
                        //→に入ったとき、さらにメモを検索し健康に悪い→の文章が表示される。
                        while ((fgets(buffer4, 256, outputfile)) != NULL)//メモに書いた文字列をbuffer3の中に入れる。
                        {
                            if (my_str2(buffer4, "健康に悪い→") == 1) {
                                LEFTmark = 213;
                                hyouzi = 1;

                                p1 = strstr(buffer4, "→");//ここで→以降の文字をbuffer3に入れる。
                                p1 += 2;
                                strcpy(buffer5, p1);
                                break;
                            }
                            if (my_str2(buffer4, "健康に悪い→") == 0) {
                                break;
                            }
                        }
                    }

                    // 文字の入力の入るバッファと、メモからの文字が入るバッファ2とで一致しない文字が出てきた場合
                    if (hyouzi == 0) {
                        if (strcmp(buffer2, buffer) == 0) {
                            gimon = 1;
                        }
                    }
                }
                fclose(outputfile);          // ファイルをクローズ(閉じる)
            }
            //できればエンターキーを押して、次の文章を記憶できるようにしたかったが、文章には必ずと言っていいほど「は」や「とは」
            //が入るし、定義のように覚えさせたいので「覚えて」の後に下のような条件で文章を記憶するようにさせた。
            if (memory == 1 && my_str2(buffer, "→")) {
                // キー入力ハンドルを作る(キャンセルなし全角文字有り数値入力じゃなし)
                ++mozicount;
                memory = 2;
                z = "記憶しました。", pos[0] = pos[1] = 0;
            }
            //duration = 1;
            // 再度インプットハンドルをアクティブにする
            SetActiveKeyInput(InputHandle);
            // 入力文字列を初期化する
            SetKeyInputString("", InputHandle);
            //++mozicount;
        }
        //エンターキーが押されていないときでの処理
        if (memory == 2) {
            LEFTmark = 100;
            //例えば、intとして49はそのままの値だが、charとしては49は文字コードで言う1を表す。//このような変換をしたようなもの。
            outputfile = fopen("memo.txt", "a+");  // ファイルを書き込み用にオープン(開く)
            if (outputfile == NULL) {          // オープンに失敗した場合
                printf("cannot open\n");         // エラーメッセージを出して
                exit(1);                         // 異常終了
            }
            fprintf(outputfile, "%s\n", buffer); // ファイルに書く
            fclose(outputfile);          // ファイルをクローズ(閉じる)
            //fclose(fp);//ファイルに書き込んだときにウィンドウが消えるようになっているので、memoryが1になった瞬間に書き込んでいるうんぬん以前に
            //ファイルが閉じるのでウィンドウが消えてしまう。
            memory = 0;
            memorycount = 1;
            // return 0;//ここで0になると終了してしまうので書き込んだ後も言葉が打ち込めるようにここを消す。
        }

        DrawFormatString(0, 400, GetColor(255, 255, 0), "movieは%d", movie);
        //DrawFormatString(0, 250, GetColor(255, 255, 0), " LEFTmarkは%d", LEFTmark);
        //DrawFormatString(100, 100, GetColor(255, 255, 0), " gimonnlockは%d,memoryは%d", gimonnlock, memory);
        DrawFormatString(100, 300, GetColor(255, 255, 0), "hyouziは%d,gimonは%d,bufferは%s", hyouzi, gimon, buffer);
        //DrawFormatString(100, 400, GetColor(5, 105, 0), " buffer2は%s", buffer2);

        if (gimon == 0 && hyouzi == 1) {
           DrawFormatString(100, 500, GetColor(5, 105, 19), " buffer2は%s", buffer2);
           DrawFormatString(100, 600, GetColor(175, 80, 100), "%s%s", buffer3, buffer5);
        }
        if (mozicount >= 1 && gimon == 0 && hyouzi == 0 && diffrent == 1) {
            DrawFormatString(10, 210, show_color, "申し訳ありません %s とは何ですか？", buffer);
        }
        if (mozicount >= 0 && gimon == 0 && hyouzi == 0) {
            drawString(10, 100, z_color, pos, z);
        }
        // 裏画面の内容を表画面に反映させる
        ScreenFlip();

    }

    // 用済みのインプットハンドルを削除する
    DeleteKeyInput(InputHandle);

    // 画面の初期化
    ClearDrawScreen();

    // 裏画面の内容を表画面に反映させる
    ScreenFlip();

    // キー入力待ち
   // WaitKey();

    //ループないやループから出た後で何かしらの問題が発生したら終了する。
    // ＤＸライブラリの使用終了
    DxLib_End();

    // 終了
   // return 0;
}