#!/bin/bash

dialog --title "Meniu" \
--backtitle "Linux Shell Script Tutorial" \
--menu "Pasirinkimui naudokite [Į viršų], [Į apačią], [Enter] klavišus" 15 90 4 \
Lyginiai_skaiciai "Bus atspausdinti visi lyginiai sekos skaiciai" \
Nelyginiai_skaiciai "Bus atspausdinti visi nelyginiai sekos skaiciai" \
Visi_skaiciai "Bus atspausdinti visi sekos skaiciai" \
Skaiciai_atvirkstine_tvarka "Bus atspausdinti visi sekos skaiciai atvirkstine tvarka"  2>tmp_file.txt

meniupasirinkimas=`cat tmp_file.txt`

case $meniupasirinkimas in
    Lyginiai_skaiciai)

    # pirmojo skaiciaus ivedimas
    dialog --title "Duomenu ivedimo langas" \
    --inputbox "Iveskite pirmaji skaiciu " 8 60 2>pirmas_sk.txt

    pirmas_sk=`cat pirmas_sk.txt`

    # antrojo skaiciaus ivedimas
    dialog --title "Duomenu ivedimo langas" \
    --inputbox "Iveskite antraji skaiciu " 8 60 2>antras_sk.txt

    antras_sk=`cat antras_sk.txt`

    # tikrinam ar galima seka
    if [ $pirmas_sk -ge $antras_sk ]
    then
        dialog --infobox "Tokia seka negalima" 5 25;
    else
        echo "Lyginiu skaiciu seka nuo $pirmas_sk iki $antras_sk yra: \n\n">result.txt

        while [ $pirmas_sk -le $antras_sk ]
        do
            [ $((pirmas_sk%2)) -eq 0 ] && echo -n "$pirmas_sk ">>result.txt
            pirmas_sk=`expr $pirmas_sk + 1`
        done

        full_res=`cat result.txt`

        dialog --title "Lyginiu skaiciu seka" \
        --infobox "$full_res" 20 45 ;
    fi
    ;;
    Nelyginiai_skaiciai)

        # pirmojo skaiciaus ivedimas
        dialog --title "Duomenu ivedimo langas" \
        --inputbox "Iveskite pirmaji skaiciu " 8 60 2>pirmas_sk.txt

        pirmas_sk=`cat pirmas_sk.txt`

        # antrojo skaiciaus ivedimas
        dialog --title "Duomenu ivedimo langas" \
        --inputbox "Iveskite antraji skaiciu " 8 60 2>antras_sk.txt

        antras_sk=`cat antras_sk.txt`

        # tikrinam ar galima seka
        if [ $pirmas_sk -ge $antras_sk ]
        then
            dialog --infobox "Tokia seka negalima" 5 25;
        else
            echo "Nelyginiu skaiciu seka nuo $pirmas_sk iki $antras_sk yra: \n\n">result.txt

            while [ $pirmas_sk -le $antras_sk ]
            do
                [ $((pirmas_sk%2)) -ne 0 ] && echo -n "$pirmas_sk ">>result.txt
                pirmas_sk=`expr $pirmas_sk + 1`
            done

            full_res=`cat result.txt`

            dialog --title "Nelyginiu skaiciu seka" \
            --infobox "$full_res" 20 45 ;
        fi
        ;;
    Visi_skaiciai)

        # pirmojo skaiciaus ivedimas
        dialog --title "Duomenu ivedimo langas" \
        --inputbox "Iveskite pirmaji skaiciu " 8 60 2>pirmas_sk.txt

        pirmas_sk=`cat pirmas_sk.txt`

        # antrojo skaiciaus ivedimas
        dialog --title "Duomenu ivedimo langas" \
        --inputbox "Iveskite antraji skaiciu " 8 60 2>antras_sk.txt

        antras_sk=`cat antras_sk.txt`

        # tikrinam ar galima seka
        if [ $pirmas_sk -ge $antras_sk ]
        then
            dialog --infobox "Tokia seka negalima" 5 25;
        else
            echo "Skaiciu seka nuo $pirmas_sk iki $antras_sk yra: \n\n">result.txt

            while [ $pirmas_sk -le $antras_sk ]
            do
                echo -n "$pirmas_sk ">>result.txt
                pirmas_sk=`expr $pirmas_sk + 1`
            done

            full_res=`cat result.txt`

            dialog --title "Skaiciu seka" \
            --infobox "$full_res" 20 45 ;
        fi
        ;;

        Skaiciai_atvirkstine_tvarka)

        # pirmojo skaiciaus ivedimas
        dialog --title "Duomenu ivedimo langas" \
        --inputbox "Iveskite pirmaji skaiciu " 8 60 2>pirmas_sk.txt

        pirmas_sk=`cat pirmas_sk.txt`

        # antrojo skaiciaus ivedimas
        dialog --title "Duomenu ivedimo langas" \
        --inputbox "Iveskite antraji skaiciu " 8 60 2>antras_sk.txt

        antras_sk=`cat antras_sk.txt`

        # tikrinam ar galima seka
        if [ $pirmas_sk -le $antras_sk ]
        then
            dialog --infobox "Tokia seka negalima" 5 25;
        else
            echo "Atvirkstine skaiciu seka nuo $pirmas_sk iki $antras_sk yra: \n\n">result.txt

            while [ $pirmas_sk -ge $antras_sk ]
            do
                echo -n "$pirmas_sk ">>result.txt
                pirmas_sk=`expr $pirmas_sk - 1`
            done

            full_res=`cat result.txt`

            dialog --title "Skaiciu seka" \
            --infobox "$full_res" 20 45 ;
        fi
        ;;
esac

rm -f tmp_file.txt
rm -f result.txt