quest test begin
state start begin
when 20093.take with item.vnum >= 14000 and item.vnum <= 14549 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
say (" جاري مسح ميز سوار ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select(" حياة ", " خارقة ", " بشر "," استيعاب نقاط حياة "," مقاومة سحر "," مقاومة نار "," مقاومة رياح "," مقاومة برق "," خروج ")
if bonusy == 9 then
return
elseif bonusy == 3 and a == 0 then
item.set_value(i, 17, 10)
i=i+1
a=1
elseif bonusy == 2 and b==0 then
item.set_value(i, 16 , 10)
i=i+1
b=1
elseif bonusy == 1 and c ==0 then
item.set_value(i, 1, 2000)
i=i+1
c=1
elseif bonusy == 4 and d==0 then
item.set_value(i, 23, 10)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 35 , 15)
i=i+1
e=1
elseif bonusy == 5 and f==0 then
item.set_value(i, 37, 15)
i=i+1
f=1
elseif bonusy == 7 and g ==0 then
item.set_value(i, 38, 15)
i=i+1
g=1
elseif bonusy == 8 and h==0 then
item.set_value(i, 36, 15)
i=i+1
h=1
end
end
end
when 20093.take with item.vnum > 14549 and item.vnum <= 14579 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
say (" جاري مسح ميز سوار ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " خارقة ", " بشر "," استيعاب نقاط حياة "," مقاومة سحر "," مقاومة نار "," مقاومة رياح "," مقاومة برق "," خروج ")
if bonusy == 9 then
return
elseif bonusy == 2 and a == 0 then
item.set_value(i, 17, 10)
i=i+1
a=1
elseif bonusy == 1 and b==0 then
item.set_value(i, 16 , 10)
i=i+1
b=1
elseif bonusy == 3 and d==0 then
item.set_value(i, 23, 10)
i=i+1
d=1
elseif bonusy == 5 and e ==0 then
item.set_value(i, 35 , 15)
i=i+1
e=1
elseif bonusy == 4 and f==0 then
item.set_value(i, 37, 15)
i=i+1
f=1
elseif bonusy == 6 and g ==0 then
item.set_value(i, 38, 15)
i=i+1
g=1
elseif bonusy == 7 and h==0 then
item.set_value(i, 36, 15)
i=i+1
h=1
end
end
end
when 20093.take with item.vnum >= 10 and item.vnum <= 7379 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
say (" جاري مسح ميز سلاح ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " خارقة ", " بشر " , " قوة ", " سرعة سحر "," حاسمة "," قوة الحياة ", " ذكاء "," مناور ة ", " اغماء ", " تسمم ", " خروج ")
if bonusy == 1 and u==0 then
item.set_value(i, 16 , 10)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 17, 10)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 5 , 12)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 9 , 20)
i=i+1
c=1
elseif bonusy == 5 and d==0 then
item.set_value(i, 15 , 10)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 3 , 12)
i=i+1
e=1
elseif bonusy == 7 and f==0 then
item.set_value(i, 4, 12)
i=i+1
f=1
elseif bonusy == 8 and g ==0 then
item.set_value(i, 6, 12)
i=i+1
g=1
elseif bonusy == 9 and h==0 then
item.set_value(i, 13, 8)
i=i+1
h=1
elseif bonusy == 10 and y==0 then
item.set_value(i, 12, 8)
i=i+1
y=1
elseif bonusy == 11 then
return
end
end
end
---------------- -------------------------------------------------------------------------------------------
when 20093.take with item.vnum >= 11200 and item.vnum <= 12049 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
local y2 = 0
local y3 = 0
say (" جاري مسح ميز درع ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي ", " سهم "," خنجري "," نقاط حياة " , " جرسي "," مروحي "," قيمة هجوم "," استيعاب حياة "," سرعة سحر "," مقاومة نار "," مقاومة رياح ","مقاومة برق ")
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 34 , 15)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 5 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 7 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 8 and g ==0 then
item.set_value(i, 53, 50)
i=i+1
g=1
elseif bonusy == 9 and h==0 then
item.set_value(i, 23, 10)
i=i+1
h=1
elseif bonusy == 10 and y==0 then
item.set_value(i, 9, 20)
i=i+1
y=1
elseif bonusy == 11 and y1==0 then
item.set_value(i, 35, 15)
i=i+1
y1=1
elseif bonusy == 12 and y2==0 then
item.set_value(i, 38, 15)
i=i+1
y2=1
elseif bonusy == 13 and y3==0 then
item.set_value(i, 36 , 15)
i=i+1
y3=1
end
end
end
------------------------------------------------------------------------------------------
when 20093.take with item.vnum >= 20000 and item.vnum <= 21099 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
local y2 = 0
local y3 = 0
say (" جاري مسح ميز درع ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي ", " سهم "," خنجري "," نقاط حياة " , " جرسي "," مروحي "," قيمة هجوم "," استيعاب حياة "," سرعة سحر "," مقاومة نار "," مقاومة رياح ","مقاومة برق ")
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 34 , 15)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 5 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 7 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 8 and g ==0 then
item.set_value(i, 53, 50)
i=i+1
g=1
elseif bonusy == 9 and h==0 then
item.set_value(i, 23, 10)
i=i+1
h=1
elseif bonusy == 10 and y==0 then
item.set_value(i, 9, 20)
i=i+1
y=1
elseif bonusy == 11 and y1==0 then
item.set_value(i, 35, 15)
i=i+1
y1=1
elseif bonusy == 12 and y2==0 then
item.set_value(i, 38, 15)
i=i+1
y2=1
elseif bonusy == 13 and y3==0 then
item.set_value(i, 36 , 15)
i=i+1
y3=1
end
end
end
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
when 20093.take with item.vnum >= 16000 and item.vnum < 16180 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
local y2 = 0
say (" مسح ميز قلادة ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي ", " سهم "," خنجري "," نقاط حياة " , " جرسي "," مروحي "," استعاب حياة " ,"اغماء "," حرجة "," تجديد نقاط حياة "," خارقة " )
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 34 , 15)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 5 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 7 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 8 and g ==0 then
item.set_value(i, 23, 10)
i=i+1
g=1
elseif bonusy == 9 and h==0 then
item.set_value(i, 13, 8)
i=i+1
h=1
elseif bonusy == 10 and y==0 then
item.set_value(i, 15,10)
i=i+1
y=1
elseif bonusy == 11 and y1==0 then
item.set_value(i,10, 30)
i=i+1
y1=1
elseif bonusy == 12 and y2==0 then
item.set_value(i, 16 , 10)
i=i+1
y2=1
end
end
end
------------------------------------------------------------------------------------------------------------------
when 20093.take with item.vnum >= 15200 and item.vnum <= 15379 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
local y2 = 0
say (" مسح ميز حذاء ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي ", " سهم "," خنجري "," نقاط حياة " , " جرسي "," مروحي " ,"اغماء "," حرجة "," سرعة هجوم 1 " ," تفادي سهام ")
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 34 , 15)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 5 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 7 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 8 and h==0 then
item.set_value(i, 13, 8)
i=i+1
h=1
elseif bonusy == 9 and y==0 then
item.set_value(i, 15,10)
i=i+1
y=1
elseif bonusy == 10 and y1==0 then
item.set_value(i,7, 10)
i=i+1
y1=1
elseif bonusy == 11 and y2==0 then
item.set_value(i, 28 , 15)
i=i+1
y2=1
end
end
end
----------------------------------------------------------------------------------------------------------------------
when 20093.take with item.vnum >= 15080 and item.vnum <= 15089 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
local y2 = 0
say (" مسح ميز حذاء ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي "," خنجري "," نقاط حياة " , " جرسي "," مروحي " ,"اغماء "," حرجة "," سرعة هجوم 1 " ," تفادي سهام ")
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 4 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 5 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 6 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 7 and h==0 then
item.set_value(i, 13, 8)
i=i+1
h=1
elseif bonusy == 8 and y==0 then
item.set_value(i, 15,10)
i=i+1
y=1
elseif bonusy == 9 and y1==0 then
item.set_value(i,7, 10)
i=i+1
y1=1
elseif bonusy == 10 and y2==0 then
item.set_value(i, 28 , 15)
i=i+1
y2=1
end
end
end
---------------------------------------------------------------------------------------------------------------------------
when 20093.take with item.vnum >= 15180 and item.vnum <= 15189 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
local y2 = 0
say (" مسح ميز حذاء ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي "," خنجري "," نقاط حياة " , " جرسي "," مروحي " ,"اغماء "," حرجة "," سرعة هجوم 1 " , " سهم ")
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 4 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 5 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 6 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 7 and h==0 then
item.set_value(i, 13, 8)
i=i+1
h=1
elseif bonusy == 8 and y==0 then
item.set_value(i, 15,10)
i=i+1
y=1
elseif bonusy == 9 and y1==0 then
item.set_value(i, 7 , 10)
i=i+1
y1=1
elseif bonusy == 10 and y2==0 then
item.set_value(i, 34 , 15)
i=i+1
y2=1
end
end
end
----------------------------------------------------
when 20093.take with item.vnum >= 17002 and item.vnum <= 17569 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
say (" مسح ميز حلق ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي ", " سهم "," خنجري " , " جرسي "," مروحي "," بشر " ," سرعة تحرك "," مقاومة تسمم ")
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 34 , 15)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 5 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 6 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 7 and g ==0 then
item.set_value(i, 17, 10)
i=i+1
g=1
elseif bonusy == 8 and h==0 then
item.set_value(i, 8, 20)
i=i+1
h=1
elseif bonusy == 9 and y==0 then
item.set_value(i, 41 ,10)
i=i+1
y=1
end
end
end
----------------------------------------------------------------------------------------------------------------------
when 20093.take with item.vnum >= 21500 and item.vnum < 12280 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
say (" جاري مسح ميز خوذة ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select(" سرعة هجوم ", " تفادي سهم ", " بشر "," مقاومة سحر "," مقاومة نار "," مقاومة رياح "," مقاومة برق "," خروج ")
if bonusy == 8 then
return
elseif bonusy == 3 and a == 0 then
item.set_value(i, 17, 10)
i=i+1
a=1
elseif bonusy == 2 and b==0 then
item.set_value(i, 28 , 15)
i=i+1
b=1
elseif bonusy == 1 and c ==0 then
item.set_value(i, 7, 10)
i=i+1
c=1
elseif bonusy == 5 and e ==0 then
item.set_value(i, 35 , 15)
i=i+1
e=1
elseif bonusy == 4 and f==0 then
item.set_value(i, 37, 15)
i=i+1
f=1
elseif bonusy == 6 and g ==0 then
item.set_value(i, 38, 15)
i=i+1
g=1
elseif bonusy == 7 and h==0 then
item.set_value(i, 36, 15)
i=i+1
h=1
end
end
end
when 20093.take with item.vnum >= 13000 and item.vnum <= 13209 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
say (" جاري مسح ميز ترس ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( "دفاع ضدد الاغماء ", " بشر " , " قوة ", " صد "," عكس "," قوة الحياة ", " ذكاء "," مناورة 1 ")
if bonusy == 1 and u==0 then
item.set_value(i, 48 , 1)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 17, 10)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 5 , 12)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 27 , 15)
i=i+1
c=1
elseif bonusy == 5 and d==0 then
item.set_value(i, 39 , 15)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 3 , 12)
i=i+1
e=1
elseif bonusy == 7 and f==0 then
item.set_value(i, 4, 12)
i=i+1
f=1
elseif bonusy == 8 and g ==0 then
item.set_value(i, 6, 12)
i=i+1
g=1
end
end
end
-------------------------------------------------------------
when 20093.take with item.vnum >= 16180 and item.vnum <= 16189 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
say (" مسح ميز قلادة ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي ", " سهم "," خنجري "," نقاط حياة " , " جرسي "," مروحي "," استعاب حياة " ,"اغماء "," حرجة "," خارقة " )
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 34 , 15)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 5 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 7 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 8 and g ==0 then
item.set_value(i, 23, 10)
i=i+1
g=1
elseif bonusy == 9 and h==0 then
item.set_value(i, 13, 8)
i=i+1
h=1
elseif bonusy == 10 and y==0 then
item.set_value(i, 15,10)
i=i+1
y=1
elseif bonusy == 11 and y1==0 then
item.set_value(i, 16 , 10)
i=i+1
y1=1
end
end
end
-------------------------------------------------------------------
when 20093.take with item.vnum >= 16220 and item.vnum < 16579 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
local y2 = 0
say (" مسح ميز قلادة ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي ", " سهم "," خنجري "," نقاط حياة " , " جرسي "," مروحي "," استعاب حياة " ,"اغماء "," حرجة "," تجديد نقاط حياة "," خارقة " )
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 34 , 15)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 5 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 7 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 8 and g ==0 then
item.set_value(i, 23, 10)
i=i+1
g=1
elseif bonusy == 9 and h==0 then
item.set_value(i, 13, 8)
i=i+1
h=1
elseif bonusy == 10 and y==0 then
item.set_value(i, 15,10)
i=i+1
y=1
elseif bonusy == 11 and y1==0 then
item.set_value(i,10, 30)
i=i+1
y1=1
elseif bonusy == 12 and y2==0 then
item.set_value(i, 16 , 10)
i=i+1
y2=1
end
end
end
--------------------------------------------
when 20093.take with item.vnum >= 16200 and item.vnum <= 16209 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
local y2 = 0
say (" مسح ميز قلادة ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي ", " سهم "," خنجري "," نقاط حياة " , " جرسي "," مروحي "," استعاب حياة " ,"اغماء "," حرجة "," تجديد نقاط حياة " )
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 34 , 15)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 5 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 7 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 8 and g ==0 then
item.set_value(i, 23, 10)
i=i+1
g=1
elseif bonusy == 9 and h==0 then
item.set_value(i, 13, 8)
i=i+1
h=1
elseif bonusy == 10 and y==0 then
item.set_value(i, 15,10)
i=i+1
y=1
elseif bonusy == 11 and y1==0 then
item.set_value(i,10, 30)
i=i+1
y1=1
end
end
end
-----قبعة
when 20093.take with item.vnum > 12289 and item.vnum <= 12689 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local y = 0
local y1= 0
say (" جاري مسح ميز خوذة ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select(" سرعة هجوم ", " تفادي سهم ", " بشر "," مقاومة سحر "," مقاومة نار "," مقاومة رياح "," مقاومة برق "," خروج "," تجديد نقاط حياة "," تسمم ")
if bonusy == 8 then
return
elseif bonusy == 3 and a == 0 then
item.set_value(i, 17, 10)
i=i+1
a=1
elseif bonusy == 2 and b==0 then
item.set_value(i, 28 , 15)
i=i+1
b=1
elseif bonusy == 1 and c ==0 then
item.set_value(i, 7, 10)
i=i+1
c=1
elseif bonusy == 5 and e ==0 then
item.set_value(i, 35 , 15)
i=i+1
e=1
elseif bonusy == 4 and f==0 then
item.set_value(i, 37, 15)
i=i+1
f=1
elseif bonusy == 6 and g ==0 then
item.set_value(i, 38, 15)
i=i+1
g=1
elseif bonusy == 7 and h==0 then
item.set_value(i, 36, 15)
i=i+1
h=1
elseif bonusy == 9 and y==0 then
item.set_value(i,10, 30)
i=i+1
y=1
elseif bonusy == 10 and y1==0 then
item.set_value(i, 12, 8)
i=i+1
y1=1
end
end
end
-------------------------------------------------------------------------------------------------------------------------
--خبير
when 20093.take with item.vnum >= 12280 and item.vnum <= 12289 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local y = 0
local y1= 0
say (" جاري مسح ميز خوذة ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select(" سرعة هجوم ", " بشر "," مقاومة سحر "," مقاومة نار "," مقاومة رياح "," مقاومة برق "," خروج "," تجديد نقاط حياة "," تسمم ")
if bonusy == 7 then
return
elseif bonusy == 2 and a == 0 then
item.set_value(i, 17, 10)
i=i+1
a=1
elseif bonusy == 1 and c ==0 then
item.set_value(i, 7, 10)
i=i+1
c=1
elseif bonusy == 4 and e ==0 then
item.set_value(i, 35 , 15)
i=i+1
e=1
elseif bonusy == 3 and f==0 then
item.set_value(i, 37, 15)
i=i+1
f=1
elseif bonusy == 5 and g ==0 then
item.set_value(i, 38, 15)
i=i+1
g=1
elseif bonusy == 6 and h==0 then
item.set_value(i, 36, 15)
i=i+1
h=1
elseif bonusy == 8 and y==0 then
item.set_value(i,10, 30)
i=i+1
y=1
elseif bonusy == 9 and y1==0 then
item.set_value(i, 12, 8)
i=i+1
y1=1
end
end
end
-------------------------------------------------------------------------------------------------------------------------
when 20093.take with item.vnum > 15379 and item.vnum <= 15399 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
local y2 = 0
say (" مسح ميز حذاء ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي "," خنجري "," نقاط حياة " , " جرسي "," مروحي " ,"اغماء "," حرجة "," سرعة هجوم 1 " , " سهم ")
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 4 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 5 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 6 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 7 and h==0 then
item.set_value(i, 13, 8)
i=i+1
h=1
elseif bonusy == 8 and y==0 then
item.set_value(i, 15,10)
i=i+1
y=1
elseif bonusy == 9 and y1==0 then
item.set_value(i, 7 , 10)
i=i+1
y1=1
elseif bonusy == 10 and y2==0 then
item.set_value(i, 34 , 15)
i=i+1
y2=1
end
end
end
----------------------------------------------------
when 20093.take with item.vnum > 15399 and item.vnum <= 15419 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local u = 0
local y = 0
local y1 = 0
local y2 = 0
say (" مسح ميز حذاء ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select( " يدين "," سيفي ", " سهم "," خنجري "," نقاط حياة " , " جرسي "," مروحي " ,"اغماء "," حرجة "," سرعة هجوم 1 " ," تفادي سهام ")
if bonusy == 1 and u==0 then
item.set_value(i, 30 , 15)
i=i+1
u=1
elseif bonusy == 2 and a == 0 then
item.set_value(i, 29 , 15)
i=i+1
a=1
elseif bonusy == 3 and b==0 then
item.set_value(i, 34 , 15)
i=i+1
b=1
elseif bonusy == 4 and c ==0 then
item.set_value(i, 31 , 15)
i=i+1
c=1
elseif bonusy == 5 and d==0 then
item.set_value(i, 1 , 2000)
i=i+1
d=1
elseif bonusy == 6 and e ==0 then
item.set_value(i, 32 , 15)
i=i+1
e=1
elseif bonusy == 7 and f==0 then
item.set_value(i, 33, 15)
i=i+1
f=1
elseif bonusy == 8 and h==0 then
item.set_value(i, 13, 8)
i=i+1
h=1
elseif bonusy == 9 and y==0 then
item.set_value(i, 15,10)
i=i+1
y=1
elseif bonusy == 10 and y1==0 then
item.set_value(i,7, 10)
i=i+1
y1=1
elseif bonusy == 11 and y2==0 then
item.set_value(i, 28 , 15)
i=i+1
y2=1
end
end
end
----------------------------------------------------------------------------------------------------------------------
when 20093.take with item.vnum >= 1200 and item.vnum <= 12269 begin
say_title(" تاجر سحر ")
say(" مرحبا بك ")
local i = 0
local z = 0
local a = 0
local b = 0
local d = 0
local h = 0
local g = 0
local e = 0
local f = 0
local c = 0
local j = 0
local y = 0
local y1= 0
say (" جاري مسح ميز خوذة ")
wait (" ")
while j < 5 do
item.set_value(j, 21 , 1 )
j=j+1
end
say (" تم برمجة تاجرة سحر بوساطة ابو جاد حقوق نشر محفوظة ")
while i < 5 do
local bonusy = select(" سرعة هجوم ", " تفادي سهم ", " بشر "," مقاومة سحر "," مقاومة نار "," مقاومة رياح "," مقاومة برق "," خروج "," تجديد نقاط حياة "," تسمم ")
if bonusy == 8 then
return
elseif bonusy == 3 and a == 0 then
item.set_value(i, 17, 10)
i=i+1
a=1
elseif bonusy == 2 and b==0 then
item.set_value(i, 28 , 15)
i=i+1
b=1
elseif bonusy == 1 and c ==0 then
item.set_value(i, 7, 10)
i=i+1
c=1
elseif bonusy == 5 and e ==0 then
item.set_value(i, 35 , 15)
i=i+1
e=1
elseif bonusy == 4 and f==0 then
item.set_value(i, 37, 15)
i=i+1
f=1
elseif bonusy == 6 and g ==0 then
item.set_value(i, 38, 15)
i=i+1
g=1
elseif bonusy == 7 and h==0 then
item.set_value(i, 36, 15)
i=i+1
h=1
elseif bonusy == 9 and y==0 then
item.set_value(i,10, 30)
i=i+1
y=1
elseif bonusy == 10 and y1==0 then
item.set_value(i, 12, 8)
i=i+1
y1=1
end
end
end
-------------------------------------------------------------------------------------------------------------------------
end
end
عضوية موثقة
تحميل محتوى الموضوع
عرض نسخة صالحة للطباعة
أرسل هذا الموضوع إلى صديق