quest dss begin  

    state start begin      

       when letter with pc.is_gm() begin

           send_letter("  لوحة الأدارة  ")

            end

    when info or button with pc.is_gm() begin

            say("    ")

        say_title("  لوحة الادارة:  ") 

        say(" ") 

        say("  هنا لوحة الادأره تستطيع اختيار اي شي تريده  ") 

        say(" ") 

        local a = select ("  لوحة التحكم بالأحداث "," الطقس مساء او ليل "," تفعيل خبره لجميع الأمبروطوريات "," التنقل "," اغلاق  ") 

        if a == 1 then

        local q = select ("  تفعيل الاحداث "," الغاء الأحداث "," تعديل نسبه السقوط "," اضافة غرض جديد او تغييره "," الغاء الغرض "," عدد سقوط الغرض "," خروج  ")

        if q == 1 then 

         local d = select ("  حدث ضوء قمر "," حدث الجورب "," حدث الشقلاط "," حدث الورد "," خروج ") 

                if d == 1 then

                say(" ")

                say("  تم تفعيل الحدث بنجاح  ")

                notice_all("   تم تفعيل حدث ضوء القمر  ")

                pc.setqf("event1",1)

                elseif d == 2 then

                say(" ")

                say("  تم تفعيل الحدث بنجاح  ")

                notice_all("  تم تفعيل حدث الجورب  ")

                pc.setqf("event2",1)

                elseif d == 3 then

                say(" ")

                say("  تم تفعيل الحدث بنجاح  ")

                notice_all("  تم تفعيل حدث الشقلاط  ")

                pc.setqf("event3",1)

                elseif d == 4 then

                say(" ")

                say("  تم تفعيل الحدث بنجاح  ")

                notice_all("  تم تفعيل حدث الورد  ")

                pc.setqf("event4",1)

                    end    

                end

                            if q == 2 then 

                            say(" ")

                            say("   اختر الحدث الذي تريد الغاءه  ")

         local b = select ("  حدث ضوء قمر "," حدث الجورب "," حدث الشقلاط "," حدث الورد "," خروج ") 

                if b == 1 then

                say(" ")

                say("  تم الألغاء بنجاح  ")

                notice_all("      تم الغاء حدث ضوء القمر ")

                pc.setqf("event1",0)

                elseif b == 2 then

                say(" ")

                say("  تم الألغاء بنجاح   ")

                notice_all("  تم الغاء حدث الجورب  ")

                pc.setqf("event2",0)

                elseif b == 3 then

                say(" ")

                say("  تم الألغاء بنجاح   ")

                notice_all("  تم الغاء حدث الشقلاط  ")

                pc.setqf("event3",0)

                elseif b == 4 then

                say(" ")

                say("  تم الألغاء بنجاح   ")

                notice_all("  تم الغاء الورد  ")

                pc.setqf("event4",0)

                    end

                 end 

                 if q == 3 then 

                 say(" ")

                     say("  الرجاء ادخال النسبة   ")

      local ada = tonumber(input())

      if type(ada) != 'number' then

      say(" ")

                        say("   يمنع استعمال غير الارقام  ")

                end

        if type(ada) == 'number' then

       pc.setqf("adq", ada)

       notice_all("   تم تعديل نسبة السقوط الى  "..pc.getqf("adq").."%  ")

            end

        end

            if q == 4 then 

            say(" ")

            say(" اختر الغرض الذي تريد تفعيله ")

            local z = select ("  الغرض 1 "," الغرض 2 "," الغرض 3 "," الغرض 4 "," خروج  ") 

            if z == 1 then

            say(" ")

            say(" الغرض 1 ")

            say("  يمنع استعمال غير الأرقام  ")

            say("  الرجاء ادخال رقم الغرض   ")

            local acd = tonumber(input())

             pc.setqf("cadq", acd)

             pc.setqf("eae", 1)

                elseif z == 2 then

                say(" ")

                say(" الغرض 2 ")

            say("  يمنع استعمال غير الأرقام  ")

            say("  الرجاء ادخال رقم الغرض   ")

            local ecd = tonumber(input())

             pc.setqf("eadq", ecd)

             pc.setqf("eaed", 1)

                elseif z == 3 then

                say(" ")

                say(" الغرض 3 ")

            say("  يمنع استعمال غير الأرقام  ")

            say("  الرجاء ادخال رقم الغرض   ")

            local dcd = tonumber(input())

             pc.setqf("dadq", dcd)

             pc.setqf("eaec", 1)

                elseif z == 4 then

                say(" ")

                say(" الغرض 4 ")

            say("  يمنع استعمال غير الأرقام  ")

            say("  الرجاء ادخال رقم الغرض   ")

            local qcd = tonumber(input())

             pc.setqf("qcds", qcd)

             pc.setqf("eade", 1)        

            end

        end

            if q == 5 then 

            say(" ")

            say("  اختر الغرض الذي تريد الغاءه  ")

            local g = select ("  الغرض 1 "," الغرض 2 "," الغرض 3 "," الغرض 4 "," خروج  ") 

            if g == 1 then

             pc.setqf("eae", 0)

             say(" ")

             say("  تم الألغاء بنجاح  ")

             elseif g == 2 then

             pc.setqf("eaed", 0)

             say(" ")

             say("  تم الألغاء بنجاح  ")

              elseif g == 3 then

              pc.setqf("eaec", 0)

              say(" ")

             say("  تم الألغاء بنجاح  ")

              elseif g == 4 then

               pc.setqf("eade", 0)

               say(" ")

             say("  تم الألغاء بنجاح  ")

               end

        end

        if q == 6 then 

            say("  اختر الغرض الذي تريد تعديل عدد سقوطه  ")

            local m = select ("  الغرض 1 "," الغرض 2 "," الغرض 3 "," الغرض 4 "," خروج  ") 

            if m == 1 then

            say(" ")

            say(" الغرض 1 ")

            say("  يمنع استعمال غير الأرقام  ")

            say("  الرجاء ادخال رقم الغرض   ")

            local acda = tonumber(input())

             pc.setqf("cadsq", acda)

                elseif m == 2 then

                say(" ")

                say(" الغرض 2 ")

            say("  يمنع استعمال غير الأرقام  ")

            say("  الرجاء ادخال رقم الغرض   ")

            local escd = tonumber(input())

             pc.setqf("eadfq", escd)

                elseif m == 3 then

                say(" ")

                say(" الغرض 3 ")

            say("  يمنع استعمال غير الأرقام  ")

            say("  الرجاء ادخال رقم الغرض   ")

            local dchd = tonumber(input())

             pc.setqf("dadqa", dchd)

                elseif m == 4 then

                say(" ")

                say(" الغرض 4 ")

            say("  يمنع استعمال غير الأرقام  ")

            say("  الرجاء ادخال رقم الغرض   ")

            local qacd = tonumber(input())

             pc.setqf("qcdds", qacd)    

            end

        end

    end



             if a == 2 then

             local c = select ("  الليل  "," الصبح "," خروج  ") 

        if c == 1 then 

        command(" x 1  ")     

        elseif c == 2 then 

        command(" x 0  ")  

        end

    end

        if a == 3 then

        local hu = select("  تفعيل 200 "," تفعيل 250 "," تفعيل 300 "," تفعيل 350 "," تفعيل 100 "," الغاء التفعيل  "," خروج  ") 

      if hu == 1 then 

       notice_all(" تم تفعيل خبره 200%  ") 

        command(" priv_empire 0 1: 200 24  ") 

        command(" priv_empire 0 2: 200 24  ") 

        command(" priv_empire 0 4: 200 24  ") 

        send_letter("  لوحة الادارة  ")           

        elseif hu == 2 then 

        notice_all(" تم تفعيل الخبره 250%  ") 

        command(" priv_empire 0 1: 250 24  ") 

        command(" priv_empire 0 2: 250 24  ") 

        command(" priv_empire 0 4: 250 24  ") 

        send_letter("  لوحة الادارة  ")      

        elseif hu == 3 then 

        notice_all(" تم تفعيل خبره 300%  ") 

        command(" priv_empire 0 1: 300 24  ") 

        command(" priv_empire 0 2: 300 24  ") 

        command(" priv_empire 0 4: 300 24  ") 

        send_letter("  لوحة الادارة  ")     

       elseif hu == 4 then 

       notice_all(" تم تفعيل خبره 350%  ") 

        command(" priv_empire 0 1: 350 24  ") 

        command(" priv_empire 0 2: 350 24  ") 

        command(" priv_empire 0 4: 350 24  ") 

        send_letter("  لوحة الادارة  ")                

        elseif hu == 6 then 

        notice_all(" تم الغاء الخبره  ")  

        command(" priv_empire 0 1: 0 24  ") 

        command(" priv_empire 0 2: 0 24  ") 

        command(" priv_empire 0 4: 0 24  ") 

        send_letter("  لوحة الادارة  ") 

        elseif hu == 5 then

        notice_all("  تم تفعيل خبره 100%  ")  

        command(" priv_empire 0 1: 100 24  ") 

        command(" priv_empire 0 2: 100 24  ") 

        command(" priv_empire 0 4: 100 24  ") 

        send_letter("  لوحة الادارة  ")

        end        

 end

        if a == 4 then

        local as = select("  الزرق "," الصفر "," الحمر  "," خروج  ") 

        if as == 1 then

        pc.warp(959900, 268900)

        elseif as == 2 then

        pc.warp(63800,166400 )

        elseif as == 3 then

        pc.warp(474300,954800)

                    end

                end

            end

        when kill with pc.getqf("event1") == 1 or pc.getqf("event2") == 1 or pc.getqf("event3") == 1 or pc.getqf("event4") == 1 begin

        if    number(pc.getqf("adq"),100)  == pc.getqf("adq") then

        if pc.getqf("eae") == 1 then

        pc.give_item2(pc.getqf("cadq"),pc.getqf("cadsq"))

        end

        if pc.getqf("eaed") == 1 then

        pc.give_item2(pc.getqf("eadq"),pc.getqf("eadfq"))

        end

        if pc.getqf("eaec") == 1 then

        pc.give_item2(pc.getqf("dadq"),pc.getqf("dadqa"))

        end

        if pc.getqf("eade") == 1 then

        pc.give_item2(pc.getqf("qcds"),pc.getqf("qcdds"))

                end

            end

        end

    end

end