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