#pragma warning(disable: 4996)
#include "DxLib.h"
#include <mecab.h>
#pragma comment(lib, "libmecab.lib")
#include <string>

int InputHandle;
int mozicount = 0;
int gimonnlock = 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;

const char* result = "";
char buf[4096];
const char* words[100];
int n = 0;
unsigned word_color = GetColor(0, 255, 255);

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)

            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に入れる。

            MeCab::Tagger* tagger = MeCab::createTagger("");
            result = tagger->parse(buffer);
            strcpy_s(buf, sizeof buf, result);
            n = 0;
            words[n] = strtok(buf, "\t\n");
            while (n < 100 && words[n]) {
                strtok(NULL, "\t\n");
                words[++n] = strtok(NULL, "\t\n");
            }

            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, "？")) {
                        //  message = "どんな映画が好きなんですか？";
                       // DrawFormatString(100, 300, GetColor(255, 255, 0), "%s", buffer);
                        if (my_str2(buffer, "どんな")) {
                            ++mozicount;
                            gimonnlock = 1;
                            if (my_str2(buffer2, "映画") && my_str2(buffer2, "どんな")) {
                                LEFTmark = 893;
                                hyouzi = 1;
                                p = strstr(buffer2, "→");//ここで→以降の文字をbuffer3に入れる。
                                p += 2;
                                strcpy(buffer3, p);//関数strcpyが指定した文字である「→」から2バイト動かしたポインタからの文字データを加算でbuffer3に入れている

                            }
                        }
                        if (my_str2(buffer, "なんで") or my_str2(buffer, "なぜ")) {
                            ++mozicount;
                            gimonnlock = 1;
                            if (my_str2(buffer2, "映画") && my_str2(buffer2, "なぜ")) {
                                LEFTmark = 893;
                                hyouzi = 1;
                                p = strstr(buffer2, "→");//ここで→以降の文字をbuffer3に入れる。
                                p += 2;
                                strcpy(buffer3, p);//関数strcpyが指定した文字である「→」から2バイト動かしたポインタからの文字データを加算でbuffer3に入れている

                            }
                        }
                    }

                    // 文字の入力の入るバッファと、メモからの文字が入るバッファ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, words[1]) == 1) {

                        hyouzi = 1;
                        gimon = 0;
                        p = strstr(buffer2, "→");//ここで→以降の文字をbuffer3に入れる。
                        p += 2;
                        strcpy(buffer3, p);//関数strcpyが指定した文字である「→」から2バイト動かしたポインタからの文字データを加算で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, 150, GetColor(255, 255, 0), "mozicountは%d", mozicount);
        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);
        }
        for (int i = 0; i < n; i++)
            DrawString(100, 200 + i * 40, words[i], word_color);

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

    }

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

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

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

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

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

    // 終了
    return 0;
}