المشاركة الأصلية كتبت بواسطة: .Mars

سلام عليكم
مطوب كويست لوحة الادارة

يكون فيه الحظر
وشكرا

quest DR_11_GM begin 

    state start begin 

        when login with pc.is_gm() begin 

            set_state(information) 

        end 

    end 

    state information begin 

        when letter begin 

            send_letter(" لوحة الادمن ") 

        end 

        when button or info begin 

           say(" ادخل الباسورد ") 

           local pass = input ( ) 

           pass=tonumber(pass) 

            if pass == 0--[[ 123 ]] then 

             

            say_title(" لوحة التحكم : ") 

            say(" ماذا تريد ان تفعل ؟ ") 

            local menu = select(" صبح / ليل " , " المعدلات " , " حظر شات " , " الانتقالات " , " الغاء ") 

            if menu == 8 then 

                return 

        -- الليل والنهار  

            elseif menu == 1 then 

                say(" ماذا تريد ان تختار ؟ ") 

                local menu2 = select(" الصباح " , " الليل " , " الغاء ") 

                if menu2 == 1 then 

                    command ("x 2") 

                elseif menu2 == 2 then 

                    command ("x 1") 

                elseif menu2 == 3 then 

                    return 

                end 

        -- المعدلات     

            elseif menu == 2 then 

                say(" المعدلات : ") 

                say(" ما الذي تريد زيادته في هؤلاء : ") 

                local menu2 = select(" خبرة " , " يانغ " , " سقوط " , " الغاء ") 

                if menu2 == 4 then 

                    return 

            --الخبرة 

                elseif menu2 == 1 then 

                    say(" الخبرة : ") 

                    say(" اي امبراطورية تختار ؟ ") 

                    local menu3 = select(" الحمر " , " الصفر " , " الزرق " ," الكل "," الغاء ") 

                    if menu3 == 5 then 

                        return 

                    elseif menu3 == 1 then 

                        local tipo = 4 

                        local reino = menu3 

                        say(" ما هي النسبة المؤيه التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" الخبرة للحمر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% خبرة [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 2 then 

                        local tipo = 4 

                        local reino = menu3 

                        say(" ما هي النسبة المؤيه التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" الخبرة للصفر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% خبرة [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 3 then 

                        local tipo = 4 

                        local reino = menu3 

                        say(" ما هي النسبة المؤيه التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" الخبرة للزرق : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% خبرة [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 4 then 

                        local tipo = 4 

                        local reino = 0 

                        say(" ما هي النسبة المؤيه التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" الخبرة لكل الامبراطوريات : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% خبرة [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    end 

            -- اليانغ 

                elseif menu2 == 2 then 

                    say(" اليانغ : ") 

                    say(" اي امبراطورية تختار ؟ ") 

                    local menu3 = select(" الحمر "," الصفر "," الزرق "," الكل "," الغاء ") 

                    if menu3 == 5 then 

                        return 

                    elseif menu3 == 1 then 

                        local tipo = 2 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" اليانغ للحمر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% يانغ [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 2 then 

                        local tipo = 2 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" اليانغ للصفر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% يانغ [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 3 then 

                        local tipo = 2 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" اليانغ للزرق : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% يانغ [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 4 then 

                        local tipo = 2 

                        local reino = 0 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" اليانغ لكل الامبراطوريات : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% يانغ [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    end 

            -- السقوط 

                elseif menu2 == 3 then 

                    say(" السقوط : ") 

                    say(" اي امبراطورية تختار ؟ ") 

                    local menu3 = select(" الحمر "," الصفر "," الزرق "," الكل "," الغاء ") 

                    if menu3 == 5 then 

                        return 

                    elseif menu3 == 1 then 

                        local tipo = 1 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" السقوط للحمر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% تساقط [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 2 then 

                        local tipo = 1 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" السقوط للصفر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% تساقط [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 3 then 

                        local tipo = 1 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" السقوط للزرق : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% تساقط [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 4 then 

                        local tipo = 1 

                        local reino = 0 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" السقوط لكل الامبراطوريات : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% تساقط [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    end 

                end 

        -- حظر الشات     

            elseif menu == 3 then 

                say(" ماذا تريد ان تفعل : ") 

                local menu2 = select(" حظر الشات "," ازالة حظر الشات "," قائمة بالمحظورين "," الغاء ") 

                if menu2 == 1 then 

                    say(" حظر الشات : ") 

                    say(" قم بإخال اسم اللاعب التي تريد حظر شاته : ") 

                    local nombre = input() 

                    say(" ادخل الوقت التي تريده ان يبقي محظورا به بالدقائق ") 

                    say(" علما بأن 60 تساوي 1 ساعة ") 

                    say(" يجب عليك ادخال رقم خالي من الكسور العشرية : ") 

                    local tiempo = input() 

                    say(" هل انت متأكد انك تريد حظر شات اللاعب "..nombre.."[ENTER] لمدة "..tiempo.." دقيقة ؟ ") 

                    local menu3 = select(" نعم "," الغاء ") 

                    if menu3 == 1 then 

                        notice_all(" لقد تم حظر شات اللاعب "..nombre.." لمخالفته القوانين لمدة "..tiempo.." دقيقة من اللعب ... ") 

                        tiempo = tonumber(tiempo)*60 

                        command("block_chat "..nombre.." "..tiempo) 

                    elseif menu3 == 2 then 

                        return 

                    end 

                elseif menu2 == 2 then 

                    say(" ازالة حظر الشات : ") 

                    say(" اكتب اسم اللاعب الذي تريد ازالة حظر الشات عنه : ") 

                    local nombre = input() 

                    if find_pc_by_name(nombre) == 0 then 

                        say(" هذا الاسم غير موجود ") 

                        return 

                    end 

                    say(" هل انت متاكد من انك تريد ازالة حظر الشات عن اللاعب "..nombre) 

                    local menu3 = select(" نعم "," الغاء ") 

                    if menu3 == 1 then 

                        command("block_chat "..nombre.." 0") 

                    elseif menu3== 2 then 

                        return 

                    end 

                elseif menu2 == 3 then 

                    command("block_chat_list") 

                elseif menu2 == 4 then 

                    return 

                end 

        -- التنقلات 

            elseif menu == 4 then 

                say(" ماذا تريد ان تفعل ؟ ") 

                local menu2 = select(" إحضار شخص "," الذهاب إلي شخص ما "," الغاء ") 

                if menu2 == 3 then  

                    return 

                elseif menu2 == 1 then 

                    say(" احضار شخص : ") 

                    say("") 

                    say(" اكتب اسم اللاعب الذي تريد احضاره : ") 

                    local nombre = input() 

                    if find_pc_by_name(nombre) == 0 then 

                        say(" الاسم خاطئ او ان اللاعب غير متصل بالانترنت حاليا ! ") 

                        return 

                    else 

                        command("t "..nombre) 

                        say(" لقد تم احضار اللاعب "..nombre.." هيا ") 

                    end 

                elseif menu2== 2 then 

                    say(" الذهاب إلي شخص ما : ") 

                    say("") 

                    say(" اكتب اسم اللاعب : ") 

                    local nombre = input() 

                    if find_pc_by_name(nombre) == 0 then 

                        say(" الاسم خاطئ او ان اللاعب غير متصل بالانترنت حاليا ! ") 

                        return 

                    else 

                        command("warp "..nombre) 

                    end 

                end 

            end   

            elseif pass ~= 0--[[  قم بكتابة الباسورد هنا ]]then 

                  say(" الباسورد خاطئ ! ادخل الباسورد الصحيح ! ") 

            end              

        end 

    end 

end  

DR_11_GM.rar

المشاركة الأصلية كتبت بواسطة: .Mars

اخي الكويست فيه مشكلة
يجيني Core dumbed

المشاركة الأصلية كتبت بواسطة: RAYAN

المشاركة الأصلية كتبت بواسطة: .Mars

سلام عليكم
مطوب كويست لوحة الادارة

يكون فيه الحظر
وشكرا

quest DR_11_GM begin 

    state start begin 

        when login with pc.is_gm() begin 

            set_state(information) 

        end 

    end 

    state information begin 

        when letter begin 

            send_letter(" لوحة الادمن ") 

        end 

        when button or info begin 

           say(" ادخل الباسورد ") 

           local pass = input ( ) 

           pass=tonumber(pass) 

            if pass == 0--[[ 123 ]] then 

             

            say_title(" لوحة التحكم : ") 

            say(" ماذا تريد ان تفعل ؟ ") 

            local menu = select(" صبح / ليل " , " المعدلات " , " حظر شات " , " الانتقالات " , " الغاء ") 

            if menu == 8 then 

                return 

        -- الليل والنهار  

            elseif menu == 1 then 

                say(" ماذا تريد ان تختار ؟ ") 

                local menu2 = select(" الصباح " , " الليل " , " الغاء ") 

                if menu2 == 1 then 

                    command ("x 2") 

                elseif menu2 == 2 then 

                    command ("x 1") 

                elseif menu2 == 3 then 

                    return 

                end 

        -- المعدلات     

            elseif menu == 2 then 

                say(" المعدلات : ") 

                say(" ما الذي تريد زيادته في هؤلاء : ") 

                local menu2 = select(" خبرة " , " يانغ " , " سقوط " , " الغاء ") 

                if menu2 == 4 then 

                    return 

            --الخبرة 

                elseif menu2 == 1 then 

                    say(" الخبرة : ") 

                    say(" اي امبراطورية تختار ؟ ") 

                    local menu3 = select(" الحمر " , " الصفر " , " الزرق " ," الكل "," الغاء ") 

                    if menu3 == 5 then 

                        return 

                    elseif menu3 == 1 then 

                        local tipo = 4 

                        local reino = menu3 

                        say(" ما هي النسبة المؤيه التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" الخبرة للحمر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% خبرة [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 2 then 

                        local tipo = 4 

                        local reino = menu3 

                        say(" ما هي النسبة المؤيه التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" الخبرة للصفر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% خبرة [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 3 then 

                        local tipo = 4 

                        local reino = menu3 

                        say(" ما هي النسبة المؤيه التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" الخبرة للزرق : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% خبرة [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 4 then 

                        local tipo = 4 

                        local reino = 0 

                        say(" ما هي النسبة المؤيه التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" الخبرة لكل الامبراطوريات : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% خبرة [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    end 

            -- اليانغ 

                elseif menu2 == 2 then 

                    say(" اليانغ : ") 

                    say(" اي امبراطورية تختار ؟ ") 

                    local menu3 = select(" الحمر "," الصفر "," الزرق "," الكل "," الغاء ") 

                    if menu3 == 5 then 

                        return 

                    elseif menu3 == 1 then 

                        local tipo = 2 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" اليانغ للحمر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% يانغ [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 2 then 

                        local tipo = 2 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" اليانغ للصفر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% يانغ [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 3 then 

                        local tipo = 2 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" اليانغ للزرق : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% يانغ [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 4 then 

                        local tipo = 2 

                        local reino = 0 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" اليانغ لكل الامبراطوريات : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% يانغ [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    end 

            -- السقوط 

                elseif menu2 == 3 then 

                    say(" السقوط : ") 

                    say(" اي امبراطورية تختار ؟ ") 

                    local menu3 = select(" الحمر "," الصفر "," الزرق "," الكل "," الغاء ") 

                    if menu3 == 5 then 

                        return 

                    elseif menu3 == 1 then 

                        local tipo = 1 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" السقوط للحمر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% تساقط [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 2 then 

                        local tipo = 1 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" السقوط للصفر : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% تساقط [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 3 then 

                        local tipo = 1 

                        local reino = menu3 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" السقوط للزرق : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% تساقط [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    elseif menu3 == 4 then 

                        local tipo = 1 

                        local reino = 0 

                        say(" ما هي النسبة المؤية التي تريد اعطائها ؟ ") 

                        say_reward(" برجاء ادخال ارقام صحيحه لا تحتوي علي كسور عشرية ! ") 

                        local rate = input() 

                        rate=tonumber(rate) 

                        say(" ادخال الحد الاقصي للوقت بالدقائق : ") 

                        say(" مثلا 120 ") 

                        say(" تساوي 2 ساعة ") 

                        local tiempo=input() 

                        tiempo=tonumber(tiempo) 

                        say(" السقوط لكل الامبراطوريات : ") 

                        say(" هل انت متاكد من انك تريد اعطاء "..rate.."% تساقط [ENTER] ولوقت "..tiempo.." دقيقة ؟ ") 

                        local menu4 = select(" نعم "," لا ") 

                        if menu4 == 1 then 

                            __give_empire_priv(reino, tipo, rate, tiempo*60) 

                        else 

                            return 

                        end 

                    end 

                end 

        -- حظر الشات     

            elseif menu == 3 then 

                say(" ماذا تريد ان تفعل : ") 

                local menu2 = select(" حظر الشات "," ازالة حظر الشات "," قائمة بالمحظورين "," الغاء ") 

                if menu2 == 1 then 

                    say(" حظر الشات : ") 

                    say(" قم بإخال اسم اللاعب التي تريد حظر شاته : ") 

                    local nombre = input() 

                    say(" ادخل الوقت التي تريده ان يبقي محظورا به بالدقائق ") 

                    say(" علما بأن 60 تساوي 1 ساعة ") 

                    say(" يجب عليك ادخال رقم خالي من الكسور العشرية : ") 

                    local tiempo = input() 

                    say(" هل انت متأكد انك تريد حظر شات اللاعب "..nombre.."[ENTER] لمدة "..tiempo.." دقيقة ؟ ") 

                    local menu3 = select(" نعم "," الغاء ") 

                    if menu3 == 1 then 

                        notice_all(" لقد تم حظر شات اللاعب "..nombre.." لمخالفته القوانين لمدة "..tiempo.." دقيقة من اللعب ... ") 

                        tiempo = tonumber(tiempo)*60 

                        command("block_chat "..nombre.." "..tiempo) 

                    elseif menu3 == 2 then 

                        return 

                    end 

                elseif menu2 == 2 then 

                    say(" ازالة حظر الشات : ") 

                    say(" اكتب اسم اللاعب الذي تريد ازالة حظر الشات عنه : ") 

                    local nombre = input() 

                    if find_pc_by_name(nombre) == 0 then 

                        say(" هذا الاسم غير موجود ") 

                        return 

                    end 

                    say(" هل انت متاكد من انك تريد ازالة حظر الشات عن اللاعب "..nombre) 

                    local menu3 = select(" نعم "," الغاء ") 

                    if menu3 == 1 then 

                        command("block_chat "..nombre.." 0") 

                    elseif menu3== 2 then 

                        return 

                    end 

                elseif menu2 == 3 then 

                    command("block_chat_list") 

                elseif menu2 == 4 then 

                    return 

                end 

        -- التنقلات 

            elseif menu == 4 then 

                say(" ماذا تريد ان تفعل ؟ ") 

                local menu2 = select(" إحضار شخص "," الذهاب إلي شخص ما "," الغاء ") 

                if menu2 == 3 then  

                    return 

                elseif menu2 == 1 then 

                    say(" احضار شخص : ") 

                    say("") 

                    say(" اكتب اسم اللاعب الذي تريد احضاره : ") 

                    local nombre = input() 

                    if find_pc_by_name(nombre) == 0 then 

                        say(" الاسم خاطئ او ان اللاعب غير متصل بالانترنت حاليا ! ") 

                        return 

                    else 

                        command("t "..nombre) 

                        say(" لقد تم احضار اللاعب "..nombre.." هيا ") 

                    end 

                elseif menu2== 2 then 

                    say(" الذهاب إلي شخص ما : ") 

                    say("") 

                    say(" اكتب اسم اللاعب : ") 

                    local nombre = input() 

                    if find_pc_by_name(nombre) == 0 then 

                        say(" الاسم خاطئ او ان اللاعب غير متصل بالانترنت حاليا ! ") 

                        return 

                    else 

                        command("warp "..nombre) 

                    end 

                end 

            end   

            elseif pass ~= 0--[[  قم بكتابة الباسورد هنا ]]then 

                  say(" الباسورد خاطئ ! ادخل الباسورد الصحيح ! ") 

            end              

        end 

    end 

end  

تفضل اتمناء افدتك وتم اضافت الكويست ب المرفقات
DR_11_GM.rar