main.dsl

import "commonReactions/all.dsl";

context {
    input phone: string;
    //input caller: string;

    output cjm: string[] = [];
    output need_ask_name: boolean = true;
    output template_id: number = 1;
    output conversation_start: number = 0;
    output conversation_begin: number = 0;
    output conversation_stop: number = 0;
    output conversation_status: string = "normal";
    output abonent_request: string[] = [];
    output another_messager: string ="";
    output another_phone_number: string = "";
    output phone_suffix: string = "";
}

external function numbers_from_text(text: string): string;
external function dates_from_text(text: string): string;
external function part_of_the_day(): string;
external function array_size(arr: unknown): number;
external function string_trim(one_line: string): string;
external function is_empty(check: unknown): boolean;
external function performed_stage(stages: string[], stage: string): string[];
external function sleep_ms(duration: number): unknown;
external function json_encode(object: unknown): string;
external function time_stamp(): number;
external function math_floor(value: number, presision: number|empty = 0): number;
external function math_round(value: number, presision: number|empty = 0): number;
external function math_ceil(value: number, presision: number|empty = 0): number;
external function phone_human(phone: string): string;
external function last_four(phone: string): string;
external function hours_now(): number;
external function check_mobile_code(phone: string): boolean;
external function countWords(message: string): number;

start node root
{
    do
    {
        set $cjm = external performed_stage($cjm, "root");
        set $conversation_start = external time_stamp();
        goto caller_id;
    }
    transitions
    {
        caller_id: goto caller_id;
    }
}

block SkipMessagesBlock():boolean
{
    start node root
    {
        do
        {
            return true;
        }
    }
}

node caller_id
{
    do
    {
        set $cjm = external performed_stage($cjm, "caller_id");

        #connectSafe($phone);
        #waitForSpeech(1000);

        // Строим приветствие, зависящее от времени суток
        //var part_of_the_day_name = external part_of_the_day();
        var part_of_the_day_name = "day";
        var abonent_greeting = "Здравствуйте";
        if (part_of_the_day_name == "night")
        {
            set abonent_greeting = "Доброй ночи";
        }
        if (part_of_the_day_name == "morning")
        {
            set abonent_greeting = "Доброе утро";
        }
        if (part_of_the_day_name == "day")
        {
            set abonent_greeting = "Добрый день";
        }
        if (part_of_the_day_name == "evening")
        {
            set abonent_greeting = "Добрый вечер";
        }

        // Запоминаем временной штамп перед самой первой репликой
        set $conversation_begin = external time_stamp();
        #say("greeting");
        var result = blockcall SkipMessagesBlock();
        wait *;
    }
    transitions
    {
        //end_conversation: goto end_conversation on true;
        canttalkrn: goto cant_talk_rn on #messageHasAnyIntent(["decline", "cant_talk_rn"]) || #messageHasSentiment("negative");
        cantalk: goto can_talk on #messageHasAnyIntent(["accept", "can_talk"]) || #messageHasSentiment("positive");

    }
}
node helpful_pos
{
    do
    {
        //Спасибо за ваше мнение! Поздравляю! Вы были...
        set $cjm = external performed_stage($cjm, "helpful_pos");
        #say("helpful_pos");
        var result = blockcall SkipMessagesBlock();
        wait*;
    }
    transitions
    {
        positive: goto send_it on #messageHasSentiment("positive") || #messageHasIntent("send_it");
        negative: goto dont_need on #messageHasSentiment("negative");   
    }
}

node helpful_neg //pair2
{
    do
    {
        //Подскажите, пожалуйста, что Вам не понравилось?
        set $cjm = external performed_stage($cjm, "helpful_neg");
        #say("helpful_neg");
        var result = blockcall SkipMessagesBlock();
        wait*;
    }
    transitions
    {
        understood: goto understood on true;
    }
}

node understood //pair3
{
    do
    {
        //Поняла Вас. Мы постараемся учесть Ваши пожел
        set $cjm = external performed_stage($cjm, "understood");
        #say("understood");
        var result = blockcall SkipMessagesBlock();
        wait*;
    }
    transitions
    {
        positive: goto send_it on #messageHasSentiment("positive") || #messageHasIntent("send_it");
        negative: goto dont_need on #messageHasSentiment("negative");
    }
}

node send_it
{
    do
    {
        //Подскажите, а на этом номере есть вотсап?
        set $cjm = external performed_stage($cjm, "send_it");
        #say("have_whatsapp");
        var result = blockcall SkipMessagesBlock();
        wait*;
    }
    transitions
    {
        positive: goto yes_whatsapp on #messageHasSentiment("positive");
        negative: goto no_whatsapp on #messageHasSentiment("negative") || #messageHasIntent("no_whatsapp");
    }
}

node dont_need
{
    do
    {
        //почему отказываетесь
        set $cjm = external performed_stage($cjm, "dont_need");
        #say("why_reject");
        var result = blockcall SkipMessagesBlock();
        wait*;
    }
    transitions
    {
        negative: goto thanks_bye_2 on #messageHasSentiment("negative") || #messageHasIntent("not_interested");
    }
}

node thanks_bye_2
{
    do
    {
        //Благодарю за уделенное время. Всего доброго.
        set $cjm = external performed_stage($cjm, "thanks_bye_2");
        #say("thanks_for_time_2");
        var result = blockcall SkipMessagesBlock();
        goto do_before_exit;
    }
    transitions
    {
        do_before_exit: goto do_before_exit;
    }
}

node yes_whatsapp
{
    do
    {
        //Отлично. Сейчас отправлю Вам промокод. Всего доброго до свидания.
        set $cjm = external performed_stage($cjm, "yes_whatsapp");
        #say("gonna_send_code");
        var result = blockcall SkipMessagesBlock();
        goto end_conversation;
    }
    transitions
    {
        end_conversation: goto end_conversation;
    }
}

node no_whatsapp
{
    do
    {
        //Продиктуйте, пожалуйста данные, куда я могу отпр промокод
        set $cjm = external performed_stage($cjm, "no_whatsapp");
        #sayText("give_contacts");
        var result = blockcall SkipMessagesBlock();
        wait*;
    }
    transitions
    {
        thanks_bye: goto thanks_bye on true;
        another_messangers: goto thanks_bye on #messageHasIntent("another_messangers");
    }
        onexit
    {
        thanks_bye: do
        {
        var contact = #getMessageText();
        set $another_phone_number = external numbers_from_text(contact); 
        }
        another_messangers: do
        {
        set $another_messager = #getMessageText();
       
        }
    }
}

node thanks_bye
{
    do
    {
        //Благодарю за уделенное время. Всего доброго.
        set $cjm = external performed_stage($cjm, "thanks_bye");
        #say("thanks_bye");
        goto end_conversation;
        
    }
    transitions
    {
        end_conversation: goto end_conversation;
    }
}

node can_talk //могу говорить
{
    do
    {
        //вы недавно посетили вебинар...
        set $cjm = external performed_stage($cjm, "can_talk");
        #say("how_helpful");
        var result = blockcall SkipMessagesBlock();
        wait*;

    }
    transitions
    {
        positive: goto helpful_pos on #messageHasSentiment("positive") || #messageHasIntent("accept");
        negative: goto helpful_neg on #messageHasSentiment("negative") || #messageHasAnyIntent(["decline", "did_not_liked"]);
        didnt_whatc: goto not_present on #messageHasIntent("ididnt_watch");
    }
}

node not_present // Давайте проведем бесплатный Зум, где вы за полчаса
{
    do
    {
        set $cjm = external performed_stage($cjm, "not_present");
        #say("free_zoom");
        var result = blockcall SkipMessagesBlock();
        wait*;

    }
    transitions
    {
        positive: goto zoom_positive on #messageHasSentiment("positive");
        negative: goto zoom_negitive on #messageHasSentiment("negative");
    }
}

node zoom_positive // Ожидайте звонка. Всего доброго, до свидания!
{
    do
    {
        set $cjm = external performed_stage($cjm, "zoom_positive");
        #say("zoom_positive");
        goto do_before_exit;

    }
    transitions
    {
        do_before_exit: goto do_before_exit;
    }
}

node zoom_negitive // Подскажите, пожалуйста, а что Вас смущает?
{
    do
    {
        set $cjm = external performed_stage($cjm, "zoom_negitive");
        #say("zoom_negative");
        var result = blockcall SkipMessagesBlock();
        wait*;

    }
    transitions
    {
        retry: goto retry on true;
    }
}

node retry // За полчаса мы можем показать вам точки роста вашей карточки.
{
    do
    {
        set $cjm = external performed_stage($cjm, "retry");
        #say("retry");
        var result = blockcall SkipMessagesBlock();
        wait*;

    }
    transitions
    {
        positive: goto zoom_positive on #messageHasSentiment("positive");
        negative: goto thanks_bye_2 on #messageHasSentiment("negative");
    }
}

node cant_talk_rn //не могу говорить
{
    do
    {
        //благодарю досвидания (в самом начале)
        set $cjm = external performed_stage($cjm, "cant_talk_rn");
        #say("thanks_for_time");
        goto end_conversation;
    }
    transitions
    {
        end_conversation: goto end_conversation;
    }
}
node end_conversation
{
    do
    {
        set $cjm = external performed_stage($cjm, "end_conversation");
        goto do_before_exit;
    }
    transitions
    {
        do_before_exit: goto do_before_exit;
    }
}

node do_before_exit
{
    do
    {
        set $cjm = external performed_stage($cjm, "do_before_exit");
        set $conversation_stop = external time_stamp();
        exit;
    }
    transitions
    {
    }
}

digression @exit_dig
{
    conditions { on true tags: onclosed; }
    do
    {
        set $cjm = external performed_stage($cjm, "@exit_dig");
        set $conversation_status = "broken";
        goto do_before_exit;
    }
    transitions
    {
        do_before_exit: goto do_before_exit;
    }
}