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