Ev kurma ve Marklama Sorunsalı

Ev kurma ve Marklama Sorunsalı

-Rhinnon-

Neophyte UO-Dev Üyesi

Üye bilgileri

Mesaj 20

Oyun tarzı Pvp

Emulatör Sphere

Tecrübe Scripter

Favori Server Unreal UO

Beğeni 0 / 0

Skill Title: Neophyte

Toplam Mesaj: 20

Oyun Tarzı: Pvp

Emulatör: Sphere

Tecrübe: Scripter

Favori Server: Unreal UO

Beğeni: 0 / 0

Üye bilgilerini göster

Merhaba Arkadaslar

1. Sorunum Soyle Arka Arkaya Ev Kurulabılıyor Arkadakı Evde Player'a Iban Thee Yapıldıgında Ondekı Evin Icerısıne Dusuyor . 5 Kare Etrafında Ev Varken Kurulumu Engellemek Istıyorum Vakat type Ile Denedım Region Ile Denedım Bırturlu sonuc alamadım Yardımlarınızı Beklıyorum

2. Sorunum Yıne Evlerle Ilgılı Bır Player Bos Bır Alan Marklıyor Dıyerı Ise tam Marklanan Yere Ev Kuruyor

Daha Sonra O Alan House Regıonu Oldugu Icın Gate Acılmaması Gerekıyor Fakat Acılıyor Ve Kal Ort Por olunuyor

Sıkıntılarım bunlar Yardımlarınızı Bekliyorum ...
Devamını göster

Son güncelleme: TheRaskol tarafından 17-12-2017 13:17 (8 yıl önce).

#94162 11-12-2017 11:37 GMT

araf

Neophyte UO-Dev Üyesi

Üye bilgileri

Mesaj 17

Oyun tarzı Rp

Emulatör Sphere

Tecrübe Scripter

Favori Server Quests and Legends

Beğeni 2 / 4

Skill Title: Neophyte

Toplam Mesaj: 17

Oyun Tarzı: Rp

Emulatör: Sphere

Tecrübe: Scripter

Favori Server: Quests and Legends

Beğeni: 2 / 4

Üye bilgilerini göster
Ev ile alakalı event ver kurulduğunda
```
REGION.EVENTS=+r_house_system
```
Mark ile alakalı
```
if <ref12.region.isevent.r_house_system> // burdaki r_house_system ev sistemi ile alakalı

src.mghata Gitmek istediğiniz bölgedeki kuvvetli büyü çemberi girişinizi engelliyor.

return 1

endif
```
Devamını göster
Son güncelleme: arafgentr tarafından 11-12-2017 14:33 (8 yıl önce).

https://www.facebook.com/arafgentr/
#94163 11-12-2017 13:16 GMT

-Rhinnon-

Neophyte UO-Dev Üyesi

Üye bilgileri

Mesaj 20

Oyun tarzı Pvp

Emulatör Sphere

Tecrübe Scripter

Favori Server Unreal UO

Beğeni 0 / 0

Skill Title: Neophyte

Toplam Mesaj: 20

Oyun Tarzı: Pvp

Emulatör: Sphere

Tecrübe: Scripter

Favori Server: Unreal UO

Beğeni: 0 / 0

Üye bilgilerini göster
Yok Dostum Oneceden Denemıstım
```
if <ref12.region.isevent.r_house_system> // burdaki r_house_system ev sistemi ile alakalı

src.mghata Gitmek istediğiniz bölgedeki kuvvetli büyü çemberi girişinizi engelliyor.

return 1

endif
```
Bu kodu Nerede Kullanıyorsun Sen Runebook On=1 Button Altında Kullandım Bir Sonuc Alamadım
Devamını göster
#94165 11-12-2017 14:32 GMT

araf

Neophyte UO-Dev Üyesi

Üye bilgileri

Mesaj 17

Oyun tarzı Rp

Emulatör Sphere

Tecrübe Scripter

Favori Server Quests and Legends

Beğeni 2 / 4

Skill Title: Neophyte

Toplam Mesaj: 17

Oyun Tarzı: Rp

Emulatör: Sphere

Tecrübe: Scripter

Favori Server: Quests and Legends

Beğeni: 2 / 4

Üye bilgilerini göster

runebookta kullanıyorsun fakat sen her kalort butonuna onbutton=1,2,3,4 diye oluşturduysan hepsine eklemen lazım.
Runebook scripti paylaşırsan daha kolay olur diye düşünüyorum
Devamını göster

https://www.facebook.com/arafgentr/

#94166 11-12-2017 14:35 GMT

-Rhinnon-

Neophyte UO-Dev Üyesi

Üye bilgileri

Mesaj 20

Oyun tarzı Pvp

Emulatör Sphere

Tecrübe Scripter

Favori Server Unreal UO

Beğeni 0 / 0

Skill Title: Neophyte

Toplam Mesaj: 20

Oyun Tarzı: Pvp

Emulatör: Sphere

Tecrübe: Scripter

Favori Server: Unreal UO

Beğeni: 0 / 0

Üye bilgilerini göster

[code]

[function rune_say]
sayua 0bb2,6,0,enu <args>
return 1

[function gate_say]
sayua 0bb2,6,0,enu <args>
return 1

[ITEMDEF i_runebook]
ID=i_spellbook
TYPE=t_script
WEIGHT=0.1
NAME=Runebook
weight=1
Value=5000

SUBSECTION=items
CATEGORY=Newitems

ON=@Create
color=05aa
MOREX=4
ATTR=04
TAG.NAME=Isimsiz
TAG.EATRUNE=01
TAG.POS1_X=0
TAG.POS2_X=0
TAG.POS3_X=0
TAG.POS4_X=0
TAG.POS5_X=0
TAG.POS6_X=0
TAG.POS7_X=0
TAG.POS8_X=0
TAG.POS9_X=0
TAG.POS10_X=0
TAG.POS11_X=0
TAG.POS12_X=0
TAG.POS13_X=0
TAG.POS14_X=0
TAG.POS15_X=0
TAG.POS16_X=0

ON=@Click
if !(strmatch('<tag.name>','Isimver')
message @0790,3,0 <name>
message @0713,9,1 [<tag.name>]
else
message @0713,,1 <name>
endif
ATTR=04
return 1

ON=@DClick
attr=04
src.dialogclose d_runebook
src.dialogclose d_moongate
SRC.SOUND=85
If (<src.region.safe> = 1) || (<src.isevent.e_koyevents&gt || (<src.isevent.e_pazar&gt || (<src.isevent.e_jail&gt || (<src.isevent.e_dm&gt || (<src.isevent.e_sosyal&gt || (<src.isevent.e_house&gt
src.sysmessage @0482,3,1, * Bu alanda rune book kullanilamaz.
src.sysmessage @0842,3,1, * Alan adi :: <region.name>
return 1
endif
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @0481,,1 Buyu atarken runebook kullanamazsiniz.
return 1
endif
src.dialogclose d_runebook
if (<src.isevent.e_x_breakspell&gt
src.FINDID.i_rb_delay.REMOVE
src.FINDID.i_rb_delay2.REMOVE
src.EVENTS -e_x_breakspell
src.f_fizzle
else
SRC.SOUND=85
sdialog d_runebook
ENDIF
RETURN 1

ON=@TargOn_Char
RETURN 1N 1

ON=@TargOn_Item
IF <SRC.TARG.TOPOBJ.UID> != <SRC.UID>
SRC.SYSMESSAGE @38,,1 Hata: Ekliyeceginiz rune cantanizda olmali.
RETURN 1
ENDIF
IF <MORE2>=1
IF ( <SRC.TARG.ID> = 01f4c )
MOREX=<MOREX> + <SRC.TARG.AMOUNT>
SRC.TARG.REMOVE
SRC.SYSMESSAGE @50,,1 Kitaba <SRC.TARG.AMOUNT> sarj eklendi.
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Bu bir recall scrollu degil. Sadece recall scrollarini kullanabilirsiniz.
ENDIF
RETURN 1
ELSEIF <MORE2>=2
IF (( <SRC.TARG.TYPE> = t_rune ) || ( <SRC.TARG.TYPE> = 014 ))
IF (<SRC.TARG.MOREX>==0)
SRC.SYSMESSAGE @38,,1 Hata: Bu rune bos, bunu kullanamazsiniz.
RETURN 1
ENDIF
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Bu bir rune degil.
RETURN 1
ENDIF
TAG.HOLD_LOCAL=<SRC.TARG.NAME>
TAG.HOLD_X=<SRC.TARG.MOREX>
TAG.HOLD_Y=<SRC.TARG.MOREY>
TAG.HOLD_Z=<SRC.TARG.MOREZ>
TAG.HOLD_M=<SRC.TARG.MOREM>
ENDIF

IF (<TAG.POS1_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL1=<TAG.HOLD_LOCAL>
TAG.POS1_X=<TAG.HOLD_X>
TAG.POS1_Y=<TAG.HOLD_Y>
TAG.POS1_Z=<TAG.HOLD_Z>
TAG.POS1_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS2_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL2=<TAG.HOLD_LOCAL>
TAG.POS2_X=<TAG.HOLD_X>
TAG.POS2_Y=<TAG.HOLD_Y>
TAG.POS2_Z=<TAG.HOLD_Z>
TAG.POS2_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS3_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL3=<TAG.HOLD_LOCAL>
TAG.POS3_X=<TAG.HOLD_X>
TAG.POS3_Y=<TAG.HOLD_Y>
TAG.POS3_Z=<TAG.HOLD_Z>
TAG.POS3_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS4_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL4=<TAG.HOLD_LOCAL>
TAG.POS4_X=<TAG.HOLD_X>
TAG.POS4_Y=<TAG.HOLD_Y>
TAG.POS4_Z=<TAG.HOLD_Z>
TAG.POS4_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS5_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL5=<TAG.HOLD_LOCAL>
TAG.POS5_X=<TAG.HOLD_X>
TAG.POS5_Y=<TAG.HOLD_Y>
TAG.POS5_Z=<TAG.HOLD_Z>
TAG.POS5_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS6_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL6=<TAG.HOLD_LOCAL>
TAG.POS6_X=<TAG.HOLD_X>
TAG.POS6_Y=<TAG.HOLD_Y>
TAG.POS6_Z=<TAG.HOLD_Z>
TAG.POS6_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS7_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL7=<TAG.HOLD_LOCAL>
TAG.POS7_X=<TAG.HOLD_X>
TAG.POS7_Y=<TAG.HOLD_Y>
TAG.POS7_Z=<TAG.HOLD_Z>
TAG.POS7_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS8_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL8=<TAG.HOLD_LOCAL>
TAG.POS8_X=<TAG.HOLD_X>
TAG.POS8_Y=<TAG.HOLD_Y>
TAG.POS8_Z=<TAG.HOLD_Z>
TAG.POS8_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS9_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL9=<TAG.HOLD_LOCAL>
TAG.POS9_X=<TAG.HOLD_X>
TAG.POS9_Y=<TAG.HOLD_Y>
TAG.POS9_Z=<TAG.HOLD_Z>
TAG.POS9_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS10_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL10=<TAG.HOLD_LOCAL>
TAG.POS10_X=<TAG.HOLD_X>
TAG.POS10_Y=<TAG.HOLD_Y>
TAG.POS10_Z=<TAG.HOLD_Z>
TAG.POS10_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS11_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL11=<TAG.HOLD_LOCAL>
TAG.POS11_X=<TAG.HOLD_X>
TAG.POS11_Y=<TAG.HOLD_Y>
TAG.POS11_Z=<TAG.HOLD_Z>
TAG.POS11_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS12_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL12=<TAG.HOLD_LOCAL>
TAG.POS12_X=<TAG.HOLD_X>
TAG.POS12_Y=<TAG.HOLD_Y>
TAG.POS12_Z=<TAG.HOLD_Z>
TAG.POS12_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS13_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL13=<TAG.HOLD_LOCAL>
TAG.POS13_X=<TAG.HOLD_X>
TAG.POS13_Y=<TAG.HOLD_Y>
TAG.POS13_Z=<TAG.HOLD_Z>
TAG.POS13_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS14_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL14=<TAG.HOLD_LOCAL>
TAG.POS14_X=<TAG.HOLD_X>
TAG.POS14_Y=<TAG.HOLD_Y>
TAG.POS14_Z=<TAG.HOLD_Z>
TAG.POS14_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS15_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL15=<TAG.HOLD_LOCAL>
TAG.POS15_X=<TAG.HOLD_X>
TAG.POS15_Y=<TAG.HOLD_Y>
TAG.POS15_Z=<TAG.HOLD_Z>
TAG.POS15_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
IF (<TAG.POS16_X>=0)
SRC.SYSMESSAGE @60,,1 Rune kitaba eklediniz.
SRC.SOUND=79
TAG.LOCAL16=<TAG.HOLD_LOCAL>
TAG.POS16_X=<TAG.HOLD_X>
TAG.POS16_Y=<TAG.HOLD_Y>
TAG.POS16_Z=<TAG.HOLD_Z>
TAG.POS16_M=<TAG.HOLD_M>
SRC.TARG.REMOVE
RETURN 1
ENDIF
SRC.SYSMESSAGE @39,,1 Kitapta bunun icin bos yer kalmamis.
RETURN 1

CATEGORY=Custom Items
SUBSECTION=Runebook
DESCRIPTION=Runebook

[ITEMDEF i_rb_gate]
ID=i_moongate_blue
RESOURCES=i_scroll_gate_travel
TYPE=t_telepad
NAME=Gate
CATEGORY=Provisions - Alchemy & Magic
SUBSECTION=Moongates
DESCRIPTION=RB Gate

On=@Create
color 07a1
more1 5
attr 010

On=@DClick
if !(<src.flags>&statf_stone)
if (<distance> > 3)
src.sysmessage @39,,1 Gate'e ulasamiyorsunuz.
else
if (<src.findid.i_gater&gt
src.findid.i_gater.remove
endif
src.newitem i_gater
src.act.link <uid>
src.act.morep <morep>
src.act.equip
endif
endif
return 1

ON=@Step
if !((<src.findid.i_gater&gt || (<src.flags>&statf_stone))
src.newitem i_gater
src.act.link <uid>
src.act.morep <morep>
src.act.equip
endif
return 1

On=@Click
if (<link.region.flags>®ion_flag_guarded)
message @03c1,6,1 [Guarded bölge]
else
message @03c1,6,1 [Unguarded bölge]
endif
message @03c1,6,1 <link.region.name> bölgesi
if (<link.isneartype t_spell 3&gt
link.tag.notice = 1
else
link.tag.notice = 0
endif

if (<link.tag0.notice>==1)
message @03c1,6,1 [Tehlikeli : 3 kare icersinde buyulu seyler var]
endif

return 1

On=@Timer
if (<more1&gt
more1 <more1> - 1
timer 1
else
sfx 528
remove
endif
return 1

[DIALOG d_runebook]
0,100
gumppic 100 10 2202
gumppic 125 50 57
gumppic 145 50 58
gumppic 160 50 58
gumppic 175 50 58
gumppic 190 50 58
gumppic 205 50 58
gumppic 220 50 58
gumppic 230 50 59

gumppic 290 50 57
gumppic 310 50 58
gumppic 325 50 58
gumppic 340 50 58
gumppic 355 50 58
gumppic 370 50 58
gumppic 385 50 58
gumppic 395 50 59

page 0
//Recall Button
button 125 65 2103 2104 1 0 1//Button 1
button 125 80 2103 2104 1 0 2//Button 2
button 125 95 2103 2104 1 0 3//Button 3
button 125 110 2103 2104 1 0 4//Button 4
button 125 125 2103 2104 1 0 5//Button 5
button 125 140 2103 2104 1 0 6//Button 6
button 125 155 2103 2104 1 0 7//Button 7
button 125 170 2103 2104 1 0 8//Button 8
//Gate Button
button 135 65 2103 2104 1 0 17//Button 17
button 135 80 2103 2104 1 0 18//Button 18
button 135 95 2103 2104 1 0 19//Button 19
button 135 110 2103 2104 1 0 20//Button 20
button 135 125 2103 2104 1 0 21//Button 21
button 135 140 2103 2104 1 0 22//Button 22
button 135 155 2103 2104 1 0 23//Button 23
button 135 170 2103 2104 1 0 24//Button 24
button 260 65 2103 2104 1 0 25//Button 25
button 260 80 2103 2104 1 0 26//Button 26
button 260 95 2103 2104 1 0 27//Button 27
button 260 110 2103 2104 1 0 28//Button 28
button 260 125 2103 2104 1 0 29//Button 29
button 260 140 2103 2104 1 0 30//Button 30
button 260 155 2103 2104 1 0 31//Button 31
button 260 170 2103 2104 1 0 32//Button 32
//rename butonlar
button 250 65 2103 2104 1 0 51//Button 51
button 250 80 2103 2104 1 0 52//Button 52
button 250 95 2103 2104 1 0 53//Button 53
button 250 110 2103 2104 1 0 54//Button 54
button 250 125 2103 2104 1 0 55//Button 55
button 250 140 2103 2104 1 0 56//Button 56
button 250 155 2103 2104 1 0 57//Button 57
button 250 170 2103 2104 1 0 58//Button 58
//opposite page
//recall button
button 285 65 2103 2104 1 0 9 //Button 9
button 285 80 2103 2104 1 0 10 //Button 10
button 285 95 2103 2104 1 0 11 //Button 11
button 285 110 2103 2104 1 0 12//Button 12
button 285 125 2103 2104 1 0 13//Button 13
button 285 140 2103 2104 1 0 14//Button 14
button 285 155 2103 2104 1 0 15//Button 15
button 285 170 2103 2104 1 0 16//Button 16
//Gate Button
button 295 65 2103 2104 1 0 33//Button 33
button 295 80 2103 2104 1 0 34//Button 34
button 295 95 2103 2104 1 0 35//Button 35
button 295 110 2103 2104 1 0 36//Button 36
button 295 125 2103 2104 1 0 37//Button 37
button 295 140 2103 2104 1 0 38//Button 38
button 295 155 2103 2104 1 0 39//Button 39
button 295 170 2103 2104 1 0 40//Button 40
button 420 65 2103 2104 1 0 41//Button 41
button 420 80 2103 2104 1 0 42//Button 42
button 420 95 2103 2104 1 0 43//Button 43
button 420 110 2103 2104 1 0 44//Button 44
button 420 125 2103 2104 1 0 45//Button 45
button 420 140 2103 2104 1 0 46//Button 46
button 420 155 2103 2104 1 0 47//Button 47
button 420 170 2103 2104 1 0 48//Button 48
//rename Butonlar
button 410 65 2103 2104 1 0 61//Button 61
button 410 80 2103 2104 1 0 62//Button 62
button 410 95 2103 2104 1 0 63//Button 63
button 410 110 2103 2104 1 0 64//Button 64
button 410 125 2103 2104 1 0 65//Button 65
button 410 140 2103 2104 1 0 66//Button 66
button 410 155 2103 2104 1 0 67//Button 67
button 410 170 2103 2104 1 0 68//Button 68
//Rune Ekle $arj Et
button 303 22 2103 2104 1 0 49//Button 49
button 303 37 2103 2104 1 0 50//Button 50
htmlgump 318 18 100 20 17 0 0
htmlgump 318 33 100 20 19 0 0

htmlgump 148 61 100 17 0 // marked positions text
htmlgump 148 76 100 17 1
htmlgump 148 91 100 17 2
htmlgump 148 106 100 17 3
htmlgump 148 121 100 17 4
htmlgump 148 136 100 17 5
htmlgump 148 151 100 17 6
htmlgump 148 166 100 17 7
htmlgump 307 61 100 17 8
htmlgump 307 76 100 17 9
htmlgump 307 91 100 17 10
htmlgump 307 106 100 17 11
htmlgump 307 121 100 17 12
htmlgump 307 136 100 17 13
htmlgump 307 151 100 17 14
htmlgump 307 166 100 17 15

htmlgump 155 18 86 17 18
htmlgump 155 33 90 17 21

htmlgump 129 180 100 20 16 0 0
htmlgump 129 192 100 20 20 0 0
htmlgump 247 180 100 20 22 0 0
htmlgump 241 192 100 20 24 0 0

htmlgump 150 184 100 20 25 0 0
htmlgump 156 196 100 20 26 0 0
htmlgump 225 184 100 20 27 0 0
htmlgump 207 196 100 20 28 0 0

button 140 22 2103 2104 1 0 59 //Button 59, Rename Book

[DIALOG d_runebook TEXT]
<TAG.LOCAL1> //Location 1
<TAG.LOCAL2> //Location 2
<TAG.LOCAL3> //Location 3
<TAG.LOCAL4> //Location 4
<TAG.LOCAL5> //Location 5
<TAG.LOCAL6> //Location 6
<TAG.LOCAL7> //Location 7
<TAG.LOCAL8> //Location 8
//page 2 //Kar$i Sayfa
<TAG.LOCAL9> //Location 9
<TAG.LOCAL10> //Location 10
<TAG.LOCAL11> //Location 11
<TAG.LOCAL12> //Location 12
<TAG.LOCAL13> //Location 13
<TAG.LOCAL14> //Location 14
<TAG.LOCAL15> //Location 15
<TAG.LOCAL16> //Location 16
| |_ //text 16
<def.l1>basefont size="4" color="#3D4675"<def.r1>Rune Ekle //text 17
<TAG.NAME> //text 18
<def.l1>basefont size="4" color="#3D4675"<def.r1>sarj Et //text 19
|___ //text 20
<def.l1>basefont size="4" color="#3D4675"<def.r1>sarj: <def.l1>basefont size="4" color="#752A20"<def.r1><MOREX>. //text 21
_| | //ren
_|
___| // sil
<def.l1>basefont size="4" color="#752A20"<def.r1>Gate
<def.l1>basefont size="4" color="#752A20"<def.r1>Recall
<def.l1>basefont size="4" color="#752A20"<def.r1>Isim
<def.l1>basefont size="4" color="#752A20"<def.r1>Cikart

[DIALOG d_runebook BUTTON]
ONBUTTON=0
RETURN 1

ONBUTTON=1
IF <TAG.POS1_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
//SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall kullanamazsiniz.
//RETURN 1
//ENDIF
//ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS1_X>> <EVAL <TAG.POS1_Y>> <EVAL <TAG.POS1_Z>> <EVAL <TAG.POS1_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
if <ref12.region.isevent.r_house_system>
src.red Gitmek istediğiniz bölgedeki kuvvetli büyü çemberi girişinizi engelliyor.
return 1
endif

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS1_X>> <EVAL <TAG.POS1_Y>> <EVAL <TAG.POS1_Z>> <EVAL <TAG.POS1_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=2
IF <TAG.POS2_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
//ENDIF
//ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS2_X>> <EVAL <TAG.POS2_Y>> <EVAL <TAG.POS2_Z>> <EVAL <TAG.POS2_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS2_X>> <EVAL <TAG.POS2_Y>> <EVAL <TAG.POS2_Z>> <EVAL <TAG.POS2_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=3
IF <TAG.POS3_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
//RETURN 1
//ENDIF
//ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS3_X>> <EVAL <TAG.POS3_Y>> <EVAL <TAG.POS3_Z>> <EVAL <TAG.POS3_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS3_X>> <EVAL <TAG.POS3_Y>> <EVAL <TAG.POS3_Z>> <EVAL <TAG.POS3_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=4
IF <TAG.POS4_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS4_X>> <EVAL <TAG.POS4_Y>> <EVAL <TAG.POS4_Z>> <EVAL <TAG.POS4_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS4_X>> <EVAL <TAG.POS4_Y>> <EVAL <TAG.POS4_Z>> <EVAL <TAG.POS4_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=5
IF <TAG.POS5_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS5_X>> <EVAL <TAG.POS5_Y>> <EVAL <TAG.POS5_Z>> <EVAL <TAG.POS5_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS5_X>> <EVAL <TAG.POS5_Y>> <EVAL <TAG.POS5_Z>> <EVAL <TAG.POS5_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=6
IF <TAG.POS6_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS6_X>> <EVAL <TAG.POS6_Y>> <EVAL <TAG.POS6_Z>> <EVAL <TAG.POS6_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS6_X>> <EVAL <TAG.POS6_Y>> <EVAL <TAG.POS6_Z>> <EVAL <TAG.POS6_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=7
IF <TAG.POS7_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS7_X>> <EVAL <TAG.POS7_Y>> <EVAL <TAG.POS7_Z>> <EVAL <TAG.POS7_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS7_X>> <EVAL <TAG.POS7_Y>> <EVAL <TAG.POS7_Z>> <EVAL <TAG.POS7_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=8
IF <TAG.POS8_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS8_X>> <EVAL <TAG.POS8_Y>> <EVAL <TAG.POS8_Z>> <EVAL <TAG.POS8_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS8_X>> <EVAL <TAG.POS8_Y>> <EVAL <TAG.POS8_Z>> <EVAL <TAG.POS8_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=9
IF <TAG.POS9_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS9_X>> <EVAL <TAG.POS9_Y>> <EVAL <TAG.POS9_Z>> <EVAL <TAG.POS9_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS9_X>> <EVAL <TAG.POS9_Y>> <EVAL <TAG.POS9_Z>> <EVAL <TAG.POS9_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=10
IF <TAG.POS10_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS10_X>> <EVAL <TAG.POS10_Y>> <EVAL <TAG.POS10_Z>> <EVAL <TAG.POS10_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS10_X>> <EVAL <TAG.POS10_Y>> <EVAL <TAG.POS10_Z>> <EVAL <TAG.POS10_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=11
IF <TAG.POS11_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS11_X>> <EVAL <TAG.POS11_Y>> <EVAL <TAG.POS11_Z>> <EVAL <TAG.POS11_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS11_X>> <EVAL <TAG.POS11_Y>> <EVAL <TAG.POS11_Z>> <EVAL <TAG.POS11_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=12
IF <TAG.POS12_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
//// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS12_X>> <EVAL <TAG.POS12_Y>> <EVAL <TAG.POS12_Z>> <EVAL <TAG.POS12_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS12_X>> <EVAL <TAG.POS12_Y>> <EVAL <TAG.POS12_Z>> <EVAL <TAG.POS12_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=13
IF <TAG.POS13_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS13_X>> <EVAL <TAG.POS13_Y>> <EVAL <TAG.POS13_Z>> <EVAL <TAG.POS13_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS13_X>> <EVAL <TAG.POS13_Y>> <EVAL <TAG.POS13_Z>> <EVAL <TAG.POS13_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=14
IF <TAG.POS14_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS14_X>> <EVAL <TAG.POS14_Y>> <EVAL <TAG.POS14_Z>> <EVAL <TAG.POS14_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS14_X>> <EVAL <TAG.POS14_Y>> <EVAL <TAG.POS14_Z>> <EVAL <TAG.POS14_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=15
IF <TAG.POS15_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS15_X>> <EVAL <TAG.POS15_Y>> <EVAL <TAG.POS15_Z>> <EVAL <TAG.POS15_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS15_X>> <EVAL <TAG.POS15_Y>> <EVAL <TAG.POS15_Z>> <EVAL <TAG.POS15_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=16
IF <TAG.POS16_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS16_X>> <EVAL <TAG.POS16_Y>> <EVAL <TAG.POS16_Z>> <EVAL <TAG.POS16_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF

IF (<SRC.MANA><15)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
IF (<MOREX> < 10)
//MOREX=<MOREX>-1
SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
ELSEIF (<SRC.RESTEST 1 i_reag_black_pearl&gt && (<SRC.RESTEST 1 i_reag_mandrake_root&gt && (<SRC.RESTEST 1 i_reag_blood_moss&gt

SRC.rune_say Kal Ort Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-15)
SRC.CONSUME=1 i_reag_black_pearl
SRC.CONSUME=1 i_reag_blood_moss
SRC.CONSUME=1 i_reag_mandrake_root
ELSE
SRC.SYSMESSAGE @38,,1 Hata: Kitapta sarj kalmamis ve uzerinizde buyuyu yapacak malzeme yok.
SRC.SOUND 92
RETURN 1
ENDIF
ENDIF
SRC.NEWITEM i_rb_delay
SRC.ACT.MOREP=<EVAL <TAG.POS16_X>> <EVAL <TAG.POS16_Y>> <EVAL <TAG.POS16_Z>> <EVAL <TAG.POS16_M>>
SRC.ACT.MORE1=4
SRC.ACT.EQUIP
RETURN 1

//Gateler
ONBUTTON=17
IF <TAG.POS1_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS1_X>> <EVAL <TAG.POS1_Y>> <EVAL <TAG.POS1_Z>> <EVAL <TAG.POS1_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS1_X>> <EVAL <TAG.POS1_Y>> <EVAL <TAG.POS1_Z>> <EVAL <TAG.POS1_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=18
IF <TAG.POS2_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS2_X>> <EVAL <TAG.POS2_Y>> <EVAL <TAG.POS2_Z>> <EVAL <TAG.POS2_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS2_X>> <EVAL <TAG.POS2_Y>> <EVAL <TAG.POS2_Z>> <EVAL <TAG.POS2_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=19
IF <TAG.POS3_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
//// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS3_X>> <EVAL <TAG.POS3_Y>> <EVAL <TAG.POS3_Z>> <EVAL <TAG.POS3_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS3_X>> <EVAL <TAG.POS3_Y>> <EVAL <TAG.POS3_Z>> <EVAL <TAG.POS3_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=20
IF <TAG.POS4_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS4_X>> <EVAL <TAG.POS4_Y>> <EVAL <TAG.POS4_Z>> <EVAL <TAG.POS4_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS4_X>> <EVAL <TAG.POS4_Y>> <EVAL <TAG.POS4_Z>> <EVAL <TAG.POS4_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=21
IF <TAG.POS5_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS5_X>> <EVAL <TAG.POS5_Y>> <EVAL <TAG.POS5_Z>> <EVAL <TAG.POS5_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS5_X>> <EVAL <TAG.POS5_Y>> <EVAL <TAG.POS5_Z>> <EVAL <TAG.POS5_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=22
IF <TAG.POS6_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
//// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS6_X>> <EVAL <TAG.POS6_Y>> <EVAL <TAG.POS6_Z>> <EVAL <TAG.POS6_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS6_X>> <EVAL <TAG.POS6_Y>> <EVAL <TAG.POS6_Z>> <EVAL <TAG.POS6_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=23
IF <TAG.POS7_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS7_X>> <EVAL <TAG.POS7_Y>> <EVAL <TAG.POS7_Z>> <EVAL <TAG.POS7_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS7_X>> <EVAL <TAG.POS7_Y>> <EVAL <TAG.POS7_Z>> <EVAL <TAG.POS7_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=24
IF <TAG.POS8_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS8_X>> <EVAL <TAG.POS8_Y>> <EVAL <TAG.POS8_Z>> <EVAL <TAG.POS8_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS8_X>> <EVAL <TAG.POS8_Y>> <EVAL <TAG.POS8_Z>> <EVAL <TAG.POS8_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=33
IF <TAG.POS9_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS9_X>> <EVAL <TAG.POS9_Y>> <EVAL <TAG.POS9_Z>> <EVAL <TAG.POS9_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS9_X>> <EVAL <TAG.POS9_Y>> <EVAL <TAG.POS9_Z>> <EVAL <TAG.POS9_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=34
IF <TAG.POS10_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS10_X>> <EVAL <TAG.POS10_Y>> <EVAL <TAG.POS10_Z>> <EVAL <TAG.POS10_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS10_X>> <EVAL <TAG.POS10_Y>> <EVAL <TAG.POS10_Z>> <EVAL <TAG.POS10_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=35
IF <TAG.POS11_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS11_X>> <EVAL <TAG.POS11_Y>> <EVAL <TAG.POS11_Z>> <EVAL <TAG.POS11_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS11_X>> <EVAL <TAG.POS11_Y>> <EVAL <TAG.POS11_Z>> <EVAL <TAG.POS11_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=36
IF <TAG.POS12_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS12_X>> <EVAL <TAG.POS12_Y>> <EVAL <TAG.POS12_Z>> <EVAL <TAG.POS12_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS12_X>> <EVAL <TAG.POS12_Y>> <EVAL <TAG.POS12_Z>> <EVAL <TAG.POS12_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=37
IF <TAG.POS13_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS13_X>> <EVAL <TAG.POS13_Y>> <EVAL <TAG.POS13_Z>> <EVAL <TAG.POS13_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS13_X>> <EVAL <TAG.POS13_Y>> <EVAL <TAG.POS13_Z>> <EVAL <TAG.POS13_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=38
IF <TAG.POS14_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS14_X>> <EVAL <TAG.POS14_Y>> <EVAL <TAG.POS14_Z>> <EVAL <TAG.POS14_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS14_X>> <EVAL <TAG.POS14_Y>> <EVAL <TAG.POS14_Z>> <EVAL <TAG.POS14_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=39
IF <TAG.POS15_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olamazsiniz.
// RETURN 1
//// ENDIF
// ENDIF
SRC.NEWITEM i_rb_research
SRC.ACT.P=<EVAL <TAG.POS15_X>> <EVAL <TAG.POS15_Y>> <EVAL <TAG.POS15_Z>> <EVAL <TAG.POS15_M>>
TAG.RESEARCH=<SRC.ACT.REGION.FLAGS>
IF (<TAG.RESEARCH>==01092)
SRC.SYSMESSAGE @38,,1 Hata: Bu bolgedeki kuvvetli buyu cemberi girisinizi engelliyor.
RETURN 1
ENDIF
IF ( <SRC.MAGERY> < 750 )
SRC.SYSMESSAGE @38,,1 Hata: Yeterli beceriye sahip degilsiniz.
SRC.SOUND=92
RETURN 1
ENDIF
IF (<SRC.MANA><40)
SRC.SOUND=92
SRC.SYSMESSAGE @0842,,1 Yeterli mananiz yok.
RETURN 1
ENDIF
if (<src.action> == id(skill_magery)) || (<src.action> == skill_magery)
src.sysmessage @38,,1 Buyu yaparken bunu kullanamazsiniz.
return 1
endif
//IF ! (<SRC.RESTEST 1 i_reag_mandrake_root&gt |! (<SRC.RESTEST 1 i_reag_sulfur_ash&gt |! (<SRC.RESTEST 1 i_reag_black_pearl&gt
//SRC.SYSMESSAGE @38,,1 Hata: Yeterli malzemeye sahip degilsiniz.
//SRC.SOUND=92
//RETURN 1
//ENDIF
SRC.gate_say Vas Rel Por
src.sd 3
SRC.ANIM=17
SRC.MANA=(<SRC.MANA>+-40)
//SRC.CONSUME=1 i_reag_black_pearl
//SRC.CONSUME=1 i_reag_mandrake_root
//SRC.CONSUME=1 i_reag_sulfur_ash
ENDIF
SRC.NEWITEM i_rb_delay2
SRC.ACT.MOREP=<EVAL <TAG.POS15_X>> <EVAL <TAG.POS15_Y>> <EVAL <TAG.POS15_Z>> <EVAL <TAG.POS15_M>>
SRC.ACT.MORE1=6
SRC.ACT.EQUIP
RETURN 1

ONBUTTON=40
IF <TAG.POS16_X>=00
SRC.SYSMESSAGE @50,,1 Bu alan bos.
RETURN 1
ENDIF
IF !<SRC.ISGM>
//IF <SRC.ISEVENT.e_house>
//IF <SRC.REGION.FLAGS>&0e
// SRC.SYSMESSAGE @38,,1 Hata: Bu bolgede recall olama
[[/code]
Devamını göster

#94168 11-12-2017 15:15 GMT

araf

Neophyte UO-Dev Üyesi

Üye bilgileri

Mesaj 17

Oyun tarzı Rp

Emulatör Sphere

Tecrübe Scripter

Favori Server Quests and Legends

Beğeni 2 / 4

Skill Title: Neophyte

Toplam Mesaj: 17

Oyun Tarzı: Rp

Emulatör: Sphere

Tecrübe: Scripter

Favori Server: Quests and Legends

Beğeni: 2 / 4

Üye bilgilerini göster

Gördüğüm kadarıyla sadece 1. recall butonuna eklemişsin 1. recall bölümünden deniyorsun dimi?
Ekstra olarak ev kurunca o event'ı verdin mi?
Bir diğer konu daha düzgün bir runebook scripti kullanabilirsin
Devamını göster

https://www.facebook.com/arafgentr/

#94169 11-12-2017 15:30 GMT

-Rhinnon-

Neophyte UO-Dev Üyesi

Üye bilgileri

Mesaj 20

Oyun tarzı Pvp

Emulatör Sphere

Tecrübe Scripter

Favori Server Unreal UO

Beğeni 0 / 0

Skill Title: Neophyte

Toplam Mesaj: 20

Oyun Tarzı: Pvp

Emulatör: Sphere

Tecrübe: Scripter

Favori Server: Unreal UO

Beğeni: 0 / 0

Üye bilgilerini göster

Rune Book Scptinde Sıkıntı Yok Evet 1. Buttonda Denıyorum Eventide Verdim Gozumuzden kacan Ufak Bır Nokta Var Ve Hala Goremedım
Devamını göster

#94170 11-12-2017 15:55 GMT

Tanthalas

Novice UO-Dev Üyesi

Üye bilgileri

Mesaj 52

Oyun tarzı Rp

Emulatör Sphere

Tecrübe Scripter

Favori Server Santiago UO

Beğeni 8 / 21

Skill Title: Novice

Toplam Mesaj: 52

Oyun Tarzı: Rp

Emulatör: Sphere

Tecrübe: Scripter

Favori Server: Santiago UO

Beğeni: 8 / 21

Üye bilgilerini göster
```
<ref12.region.isevent.r_house_system>
```
ref12'nin bulunduğu region da r_house_system eventini sorgulamışsınız ama ref12 yi tanımlamamışsınız.
Devamını göster
araf
#94171 11-12-2017 17:11 GMT

4s3d3

Expert UO-Dev Üyesi

Üye bilgileri

Mesaj 373

Oyun tarzı Rp

Emulatör Sphere

Tecrübe Player

Favori Server Arth UO

Beğeni 92 / 49

Skill Title: Expert

Toplam Mesaj: 373

Oyun Tarzı: Rp

Emulatör: Sphere

Tecrübe: Player

Favori Server: Arth UO

Beğeni: 92 / 49

Üye bilgilerini göster
Kal ort probleminin çözümüne yalandan event ekleyerek yapmana gerek yok şu şekil bir sorgu eklersin
```
IF (<UID.<Serv.Map(<EVAL <TAG.POS1_X>>,<EVAL <TAG.POS1_Y>>,<EVAL <TAG.POS1_Z>>,<EVAL <TAG.POS1_M>>).Region.UID>.Type> == T_Multi) || (<UID.<Serv.Map(<EVAL <TAG.POS1_X>>,<EVAL <TAG.POS1_Y>>,<EVAL <TAG.POS1_Z>>,<EVAL <TAG.POS1_M>>).Region.UID>.Type> == T_Ship)
```
Evler arasında ki mesafe sorununa gelecek olursak yine Serv.Map kullanarak ve multiregion yardımıyla istediğin gibi ayarlayabilirsin.
Devamını göster
#94180 12-12-2017 00:27 GMT

-Rhinnon-

Neophyte UO-Dev Üyesi

Üye bilgileri

Mesaj 20

Oyun tarzı Pvp

Emulatör Sphere

Tecrübe Scripter

Favori Server Unreal UO

Beğeni 0 / 0

Skill Title: Neophyte

Toplam Mesaj: 20

Oyun Tarzı: Pvp

Emulatör: Sphere

Tecrübe: Scripter

Favori Server: Unreal UO

Beğeni: 0 / 0

Üye bilgilerini göster
4s3d3 :
Kal ort probleminin çözümüne yalandan event ekleyerek yapmana gerek yok şu şekil bir sorgu eklersin
IF (<UID.<Serv.Map(<EVAL <TAG.POS1_X>>,<EVAL <TAG.POS1_Y>>,<EVAL <TAG.POS1_Z>>,<EVAL <TAG.POS1_M>>).Region.UID>.Type> == T_Multi) || (<UID.<Serv.Map(<EVAL <TAG.POS1_X>>,<EVAL <TAG.POS1_Y>>,<EVAL <TAG.POS1_Z>>,<EVAL <TAG.POS1_M>>).Region.UID>.Type> == T_Ship)
Evler arasında ki mesafe sorununa gelecek olursak yine Serv.Map kullanarak ve multiregion yardımıyla istediğin gibi ayarlayabilirsin.
Bu Kodu Ekledıyımde Hicbir Yere Kal Ort Olmuyor . Sadece Evlerin Oldugu Bolgeye Değil.
Devamını göster
#94183 12-12-2017 11:57 GMT

BENZER BAŞLIKLAR

Konu	Kategori	Son cevap	Son yazan	Mesaj	Görüntüleme
Uoam map sorunsalı Son cevap: 11-11 02:27 · Son yazan: edus · Mesaj: 1 · Görüntü: 1080	Grafik Araçları	11-11 02:27	edus	1	1080
56b pre release DEBUG sorunsalı Son cevap: 07-11 00:55 · Son yazan: Aftrosh* · Mesaj: 7 · Görüntü: 2932	Konsol Hataları	07-11 00:55	Aftrosh*	7	2932
Drolyn Connector Sorunsalı Son cevap: 14-05 11:44 · Son yazan: Anthonette · Mesaj: 26 · Görüntü: 15568	Client ve Account Sistemleri	14-05 11:44	Anthonette	26	15568
Ev kurma engelleme & mark ve spawn Son cevap: 16-06 21:02 · Son yazan: xwerswoodx · Mesaj: 4 · Görüntü: 5001	ITEM Script Yardımı	16-06 21:02	xwerswoodx	4	5001
Staff char plevel sorunsalı Son cevap: 11-06 17:46 · Son yazan: eren1994 · Mesaj: 3 · Görüntü: 4491	FUNCTION & EVENTS Script Yardımı	11-06 17:46	eren1994	3	4491

Sosyal Ağ ile Giriş Yap

Google ile Bağlan Facebook ile Bağlan Twitch ile Bağlan Discord ile Bağlan

BENZER BAŞLIKLAR

Sosyal Ağ ile Giriş Yap

Çerez Tercihleri