[CHARDEF c_dungeon]
DEFNAME=c_dungeon
NAME=Andy
SOUND=snd_MONSTER_OGRE1
ID=c_man
ANIM=078c7f
CAN=MT_WALK|MT_EQUIP|MT_FIRE_IMMUNE|MT_RUN
DAM=10,15
ARMOR=80
on=@create
eventsteleportlarinidosermisin
bossilermisin
eventsteleportlarinidosermisin
cikarbabapsss
STR=1000
DEX=0
INT=1000
Color=07fd
PARRYING=100.0
MAGICRESISTANCE=100.0
TACTICS=100.0
WRESTLING=100.0
FAME={2500 3250}
KARMA={-9000 -9999}
ITEMNEWBIE=i_Angel_helm
COLOR=07a1
ITEMNEWBIE=i_Angel_gorget
COLOR=07a1
ITEMNEWBIE=i_Angel_chest
COLOR=07a1
ITEMNEWBIE=i_Angel_arms
COLOR=07a1
ITEMNEWBIE=i_Angel_gloves
COLOR=07a1
ITEMNEWBIE=i_Angel_legs
COLOR=07a1
ITEMNEWBIE=i_Angel_shield
COLOR=07a1
ITEMNEWBIE=i_kryss
COLOR=07a1
on=@click
message @07e5,1,1 [ Dungeon Giris ]
message @07a1,1,1 <name>
return 1
on=@dclick
IF ( <DISTANCE> > 2 )
src.sysmessage @1153,,1 Yeterince yakin degilsiniz..
RETURN 1
SRC.ACT=<UID>
else
sdialog d_dungeon
return 1
endif
/////////////light bos item hpeisni full giy +25 hits verir nah keserler:D
[ITEMDEF i_angel_chest]
DEFNAME=i_angel_chest
ID=i_platemail_chest
NAME=Angel Armor
RESOURCES=i_platemail_chest
CATEGORY=Provisions - Armor - Migfer Dibi Special
SUBSECTION=platemail
DESCRIPTION=platemail
ON=@Create
HITPOINTS=1000
COLOR=07a1
On=@Equip
src.events +e_angelarmor
On=@Unequip
cont.events -e_angelarmor
// LEGS
[ITEMDEF i_angel_legs]
DEFNAME=i_angel_legs
ID=i_platemail_leggings
NAME=Angel Leggings
RESOURCES=i_platemail_leggings
CATEGORY=Provisions - Armor - Migfer Dibi Special
SUBSECTION=platemail
DESCRIPTION=platemail Legs
ON=@Create
HITPOINTS=1000
COLOR=07a1
On=@Equip
src.events +e_angelarmor
On=@Unequip
cont.events -e_angelarmor
// ARms
[ITEMDEF i_angel_arms]
DEFNAME=i_angel_arms
ID=i_platemail_arms
NAME=Angel Arms
RESOURCES=i_platemail_arms
CATEGORY=Provisions - Armor - Migfer Dibi Special
SUBSECTION=platemail
DESCRIPTION=platemail Arms
ON=@Create
HITPOINTS=1000
COLOR=07a1
On=@Equip
src.events +e_angelarmor
On=@Unequip
cont.events -e_angelarmor
// Gorget
[ITEMDEF i_angel_gorget]
DEFNAME=i_angel_gorget
ID=i_platemail_gorget
NAME=Angel Gorget
RESOURCES=i_platemail_gorget
CATEGORY=Provisions - Armor - Migfer Dibi Special
SUBSECTION=platemail
DESCRIPTION=platemail Gorget
ON=@Create
HITPOINTS=1000
COLOR=07a1
On=@Equip
src.events +e_angelarmor
On=@Unequip
cont.events -e_angelarmor
// HElm
[ITEMDEF i_angel_helm]
DEFNAME=i_angel_helm
ID=i_platemail_helm
NAME=Angel Helm
RESOURCES=i_platemail_helm
CATEGORY=Provisions - Armor - Migfer Dibi Special
SUBSECTION=platemail
DESCRIPTION=Plate Helm
ON=@Create
HITPOINTS=1000
COLOR=07a1
On=@Equip
src.events +e_angelarmor
On=@Unequip
cont.events -e_angelarmor
// Rings
[ITEMDEF i_angel_rings]
DEFNAME=i_angel_rings
ID=i_ring_gold
NAME=Angel Ring
RESOURCES=i_platemail_helm
CATEGORY=Provisions - Armor - Carnaval Special
SUBSECTION=Magic Jewelery
DESCRIPTION=Rings
ON=@Create
HITPOINTS=1000
COLOR=07a1
On=@Equip
src.events +e_angelarmor
On=@Unequip
cont.events -e_angelarmor
[ITEMDEF i_angel_gloves]
DEFNAME=i_angel_gloves
ID=i_platemail_gloves
NAME=Angel Gloves
RESOURCES=i_platemail_leggings
CATEGORY=Provisions - Armor - Carnaval Special
SUBSECTION=platemail
DESCRIPTION=platemail Legs
ON=@Create
HITPOINTS=1000
COLOR=07a1
On=@Equip
src.events +e_angelarmor
On=@Unequip
cont.events -e_angelarmor
// Shield
[ITEMDEF i_angel_shield]
DEFNAME=i_angel_shield
ID=i_shield_order
NAME=Angel Shield
RESOURCES=i_platemail_leggings
armor=25
CATEGORY=Provisions - Armor - Carnaval Special
SUBSECTION=platemail
DESCRIPTION=platemail Legs
ON=@Create
HITPOINTS=1000
COLOR=07a1
On=@Equip
src.events +e_angelarmor
On=@Unequip
cont.events -e_angelarmor
[ITEMDEF i_angel_shield_master]
DEFNAME=i_angel_shield_master
ID=i_shield_order
NAME=Master Angel Shield
RESOURCES=i_platemail_leggings
armor=60
CATEGORY=Provisions - Armor - Carnaval Special
SUBSECTION=platemail
DESCRIPTION=platemail Legs
ON=@Create
HITPOINTS=1000
COLOR=07a1
On=@Equip
src.events +e_angelarmor
On=@Unequip
cont.events -e_angelarmor
[TYPEDEF e_angels]
ON=@SET_EQUIP_7
src.events +e_angelarmor
ON=@SET_UNEQUIP_7
cont.events -e_angelarmor
//////////////////////////////////Events lol/////////////////////////////
[events e_angelarmor]
on=@equip
src.tag.angel ++
if (<src.tag0.angel> > 7)
newitem i_angel
equip <new>
endif
on=@uneqip
src.consume 1 i_angel
[itemdef i_angel]
id i_memory
name angel
on=@create
attr attr_decay || attr_invis
on=@equip
timer 5
on=@timer
if ( <src.hits> > <src.str>)
src.hits= <src.str>
else
src.hits += 25
return 1
endif
timer 5
///dungeon dialog..
[DIALOG d_dungeon]
125,25
nomove
page 0,0
resizepic 0 0 9300 490 320
resizepic 10 10 9300 470 300
dhtmlgump 130 20 200 20 0 0 <def.h6><def.bfont_lred><def.bfont_size4> Migfer Dibi Dungeon Sistemi
dhtmlgump 60 50 400 20 0 0 <def.h6><def.bfont_dred><def.bfont_size4>Merhaba <src.name>, Dungeon sistemine katilman
dhtmlgump 60 80 400 20 0 0 <def.h6><def.bfont_dred><def.bfont_size4>için 5 kisilik party kurarak yanima gelmelisin.
dhtmlgump 60 110 400 20 0 0 <def.h6><def.bfont_dred><def.bfont_size4>Dungeona giricez diyince her tikladiginda partiden bir kisi giricek.
dhtmlgump 60 140 500 20 0 0 <def.h6><def.bfont_dred><def.bfont_size4>party masterini en son sokucam.Her kestiniz levele göre item çikacaktir.
dhtmlgump 60 170 400 20 0 0 <def.h6><def.bfont_dred><def.bfont_size4>düsücektir.Son level'de ise ödül kapisi size açilcaktir.
dhtmlgump 60 200 400 20 0 0 <def.h6><def.bfont_dred><def.bfont_size4>Her bölüm için süre olacak geçemezsen atilacaksin
dhtmlgump 60 230 400 20 0 0 <def.h6><def.bfont_dred><def.bfont_size4>[60 Dk] son levelde ise [120 Dk] süreniz vardir.
dhtmlgump 100 270 400 20 0 0 <def.h6><def.bfont_dgreen><def.bfont_size4>5 kisiyi topladim.
button 50 270 4005 4006 1 0 1
[DIALOG d_dungeon BUTTON]
On=1
src.partytest
[plevel 1]
partytest
[function partytest]
forchars 25
if (<memoryfindtype.memory_ipet>)
if (<memoryfindtype.memory_ipet.link> <isinparty> && <party.members> < 5 == <src.uid>)
if (<src.findlayer(25)>)
src.sysmessage @38,,1 Etrafinizda party'deki bir kisiye ait bir hayvan varken dungeon'a giris yapamazsiniz.
endif
endif
endif
endfor
if <isinparty> && <party.member.0> == <src.uid>
if <party.members> < 5
sysmessage @07a1,1,1 En az 5 kisi olmali.
return 1
endif
for 0 <eval <party.members> -1>
try uid.<party.member.<dlocal._for>>.dialog d_partymenu
events +e_baslamaeventsi
events +e_partymasterimulenn
src.dungeonsilermisin
endfor
else
sysmessage @07a1,1,1 Bir party masteri olmaniz gerekir.
return 1
endif
//en önemli kisim girielimi girmiyelimi siktirin gidin amk :D
[dialog d_partymenu]
50,50
noclose
nomove
resizepic 0 0 9300 250 180
resizepic 10 10 9300 230 160
dhtmlgump 57 10 200 20 0 0 <def.h6><def.bfont_dred><def.bfont_size4> Migfer Dibi Dungeon Sistemi
dhtmlgump 59 30 200 20 0 0 <def.h6><def.bfont_dgreen><def.bfont_size4>Dungeon'a giricez.
dhtmlgump 59 50 200 20 0 0 <def.h6><def.bfont_lred><def.bfont_size4>Dungeon'a girmicez.
dhtmlgump 59 70 200 20 0 0 <def.h6><def.bfont_dblue><def.bfont_size4>Lütfen bir karar veriniz.
button 25 30 56 55 1 0 1
button 25 50 56 55 1 0 2
[dialog d_partymenu button]
onbutton 0
src.sysmessage @07a1,1,1 Kapattiniz.
onbutton=1
for 0 <eval <party.members> -1>
trysrc <party.member.<dlocal._for>> go 5393,1955
src.events +e_baslamaeventsi
endfor
onbutton=2
src.dialogclose d_partymenu
src.sysmessage @07a1,1,1 Dungeon'a girmekten vazgeçtiniz.
eventsteleportlarinidosermisin
bossilermisin
eventsteleportlarinidosermisin
gatelerisilermisin
src.newnpc c_dungeon
new.p 6041,1726
serv.allclients update
return 1
endif
[Events e_baslamaeventsi]
on=@click
message @025,,1 [Dungeon]
message @1153,,1 <name>
return 1
on=@death
src.hits <str>
src.mana <int>
src.stam <dex>
go 5388,1908
src.say Öldürüldün.
newitem i_dungeon_yasak
new.equip
return 1
on=@logout
go safe alan
events -e_partymasterimulenn
events -e_baslamaeventsi
events -e_dungeonss
stone 0
return 1
on=@itemdclick
if (<act.baseid> == i_rune_book)
sysmessage @07a1,1,1 Çokmu zekisin :)
src.events +e_baslamaeventsi
return 1
on=@spellcast
if ((<argn> == 45)
sysmessage @07a1,1,1 Mark büyülerini bu alanda kullanamasiniz.
src.events +e_baslamaeventsi
return 1
endif
[CHARDEF c_boss1]
DEFNAME=c_boss1
NAME=Liche
SOUND=snd_MONSTER_OGRE1
ID=c_liche
ANIM=078c7f
CAN=MT_WALK|MT_EQUIP|MT_FIRE_IMMUNE|MT_RUN
DAM=10,15
ARMOR=80
on=@create
NPC=brain_monster
STR=1000
DEX=1000
INT=1000
COLOR=080a
PARRYING=100.0
MAGICRESISTANCE=100.0
TACTICS=100.0
WRESTLING=100.0
FAME={2500 3250}
KARMA={-9000 -9999}
on=@click
message @07e5,1,1 [ Level 1 ]
message @07a1,1,1 <name>
return 1
ON=@NpcRestock
ITEM=RANDOM_WEAPON_might
ITEM=i_gold,{50000 100000}
ON=@Death
src.newnpc c_boss2
on=@gethit
if (<hits> < 20)
sayua 0481,2,0,eng,* kendini iyilestirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
hits=(<hits> + 40)
endif
if (<act.baseid>=c_vortex)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_blade_spirit)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_daemon)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_chicken)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<flags> &statf_poisoned)
sayua 0481,2,0,eng,* zehiri iyilestirir *
sound snd_spell_cure
findid.i_rune_poison.remove
endif
if (<findid.i_rune_poison>) || (<findid.i_rune_poison_field>)
face
anim 17
findid.i_rune_poison.remove
findid.i_rune_poison_field.remove
sayu * zehirden etkilenmez *
return 1
endif
endif
ON=@SPELLEFFECT
If (<argn>==28) || (<argn>==39) || (<argn> == 20)
sayua 0481,2,0,eng,* Etkilenmez *
return 1
ENDIF
[chardef c_boss2]
defname=c_boss2
NAME=Orcish
ID=c_ORC
DAM=10,15
ARMOR=65
ON=@Create
Color=0455
FAME=3500
KARMA=-3500
STR=1500
INT=1500
DEX=1500
TACTICS=130.0
WRESTLING=130.0
ANATOMY=130.0
POISONING=130.0
TAMING=999.9
on=@click
message @07e5,1,1 [ Level 2 ]
message @07a1,1,1 <name>
return 1
ON=@NpcRestock
ITEM=i_gold,{50000 100000}
ITEM=i_gold,{50000 100000}
ON=@Death
src.newnpc c_boss3
on=@gethit
if (<hits> < 20)
sayua 0481,2,0,eng,* kendini iyilestirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
hits=(<hits> + 40)
endif
if (<act.baseid>=c_vortex)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_blade_spirit)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_daemon)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_chicken)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<flags> &statf_poisoned)
sayua 0481,2,0,eng,* zehiri iyilestirir *
sound snd_spell_cure
findid.i_rune_poison.remove
endif
if (<findid.i_rune_poison>) || (<findid.i_rune_poison_field>)
face
anim 17
findid.i_rune_poison.remove
findid.i_rune_poison_field.remove
sayu * zehirden etkilenmez *
return 1
endif
endif
ON=@SPELLEFFECT
If (<argn>==28) || (<argn>==39) || (<argn> == 20)
sayua 0481,2,0,eng,* Etkilenmez *
return 1
Endif
[chardef c_boss3]
defname=c_boss3
ID=c_troll
name=Cyclops'King
DAM=30,15
ARMOR=85
ON=@Create
Color=07a1
FAME=10000
KARMA=-10000
STR=2500
INT=2200
DEX=5000
MAGICRESISTANCE=140.0
TACTICS=140.0
WRESTLING=140.0
on=@click
message @07e5,1,1 [ Level 3 ]
message @07a1,1,1 <name>
return 1
ON=@NpcRestock
ITEM=i_gold,{50000 100000}
ITEM=i_gold,{50000 100000}
ITEM=i_gold,{50000 100000}
ON=@Death
src.newnpc c_boss4
ON=@spelleffect
if (<argn> == 20)
sayua 0845,6,6,0 * büyüyü geri çevirir *
spelleffect 29 {500 1000}
src.poison 9999
src.effect 3,i_fx_curse,6,16,0
src.sound snd_SPELL_POISON
return 1
elseif (<argn> == 20)
sayua 0845,6,6,0 * etkilenmez *
spelleffect 29 {500 1000}
return 1
endif
if (<ARGN>=27) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=30) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=37) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=57) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=1) //Uus Jux
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=3) //Rel Wis
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=5) //In Por Ylem
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=8) //Des Mani
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=39) //Des Mani
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
on=@gethit
if (<act.baseid>=c_vortex)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_blade_spirit)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_daemon)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_bear_polar)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<src.hits> < 500)
if (<flags> &statf_poisoned)
sayua 0481,2,0,eng,* zehiri iyilestirir *
sound snd_spell_cure
findid.i_rune_poison.remove
return 1
endif
[chardef c_boss4]
defname=c_boss4
ID=c_daemon_w_Sword
name=Balron Warrior
SOUND=snd_MONSTER_OGRE1
ANIM=078c7f
CAN=MT_WALK|MT_EQUIP|MT_FIRE_IMMUNE|MT_RUN
DAM=30,15
ARMOR=65
ON=@Create
color 0810
NPC=brain_monster
FAME=7000
KARMA=-7000
STR=3500
INT=1000
DEX=5000
MAGICRESISTANCE=1500
ANATOMY=1200
TACTICS=170.0
WRESTLING=130.0
on=@click
message @07e5,1,1 [ Level 4 ]
message @07a1,1,1 <name>
return 1
ON=@NpcRestock
ITEM=RANDOM_WEAPON_force
ITEM=i_gold,{50000 100000}
ITEM=i_gold,{50000 100000}
ON=@Death
src.newnpc c_boss5
ON=@spelleffect
if (<argn> == 20)
sayua 0845,6,6,0 * büyüyü geri çevirir *
spelleffect 29 {500 1000}
src.poison 9999
src.effect 3,i_fx_curse,6,16,0
src.sound snd_SPELL_POISON
return 1
elseif (<argn> == 20)
sayua 0845,6,6,0 * etkilenmez *
spelleffect 29 {500 1000}
return 1
endif
if (<ARGN>=27) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=30) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=37) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=57) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=1) //Uus Jux
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=3) //Rel Wis
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=5) //In Por Ylem
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=8) //Des Mani
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=39) //Des Mani
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
on=@gethit
if (<act.baseid>=c_vortex)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_blade_spirit)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_daemon)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_bear_polar)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<src.hits> < 500)
if (<flags> &statf_poisoned)
sayua 0481,2,0,eng,* zehiri iyilestirir *
sound snd_spell_cure
findid.i_rune_poison.remove
return 1
endif
[chardef c_boss5]
id c_yaratikboss
can mt_run|mt_walk
name Enihtul
on=@click
message @079a,,1 <name>
return 1
on=@create
NPC=brain_monster
color 083ea
hits 5000
str 5000
dex 9500
Kills=9999
KARma=-10000
fame=1000
ITEM=RANDOM_WEAPON_vanq
ITEM=RANDOM_WEAPON_power
ITEM=RANDOM_WEAPON_force
ITEM=RANDOM_WEAPON_force
ITEM=i_gold,{50000 100000}
ITEM=i_gold,{50000 100000}
ITEM=i_gold,{50000 100000}
ON=@Death
serv.allclients sysmessage @0481,,1 Dungeon'daki grup görevini basarili bir sekilde tamamladi.
src.newitem i_atbizi
src.act.p <src.p>
src.act.sayu 30 saniye icinde dungeondan cikacaksiniz.
src.act.timer 30
ON=@spelleffect
if (<argn> == 20)
sayua 0845,6,6,0 * büyüyü geri çevirir *
spelleffect 29 {500 1000}
src.poison 9999
src.effect 3,i_fx_curse,6,16,0
src.sound snd_SPELL_POISON
return 1
elseif (<argn> == 20)
sayua 0845,6,6,0 * etkilenmez *
spelleffect 29 {500 1000}
return 1
endif
if (<ARGN>=27) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=30) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=37) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=57) //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=1) //Uus Jux
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=3) //Rel Wis
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=5) //In Por Ylem
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=8) //Des Mani
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=38) //Des Mani
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=39) //Des Mani
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
if (<ARGN>=47) //Des Mani
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF
on=@gethit
if (<hits> < 200)
sayua 0481,2,0,eng,* Tedavi Olur *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
hits=(<hits> + 10)
endif
if (<act.baseid>=c_vortex)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_blade_spirit)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_daemon)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_bear_polar)
sayua 0481,2,0,eng,* büyü etkisini kaldirir *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<src.hits> < 500)
if (<flags> &statf_poisoned)
sayua 0481,2,0,eng,* zehiri iyilestirir *
sound snd_spell_cure
findid.i_rune_poison.remove
return 1
endif
[itemdef i_level5]
id=i_memory
type=t_eq_script
name=level5
on=@create
attr=090
on=@equip
timer=3600
on=@timer
attr=attr_decay
cont.sysmessage @2594,,1 Süreniz doldugu için alandan atildiniz.
cont.go safe alan
remove
[itemdef i_level4]
id=i_memory
type=t_eq_script
name=level4
on=@create
attr=090
on=@equip
timer=3600
on=@timer
attr=attr_decay
cont.sysmessage @2594,,1 Süreniz doldugu için alandan atildiniz.
cont.go safe alan
remove
[itemdef i_level3]
id=i_memory
type=t_eq_script
name=level3
on=@create
attr=090
on=@equip
timer=3600
on=@timer
attr=attr_decay
cont.sysmessage @2594,,1 Süreniz doldugu için alandan atildiniz.
cont.go safe alan
remove
[itemdef i_level2]
id=i_memory
type=t_eq_script
name=level2
on=@create
attr=090
on=@equip
timer=3600
on=@timer
attr=attr_decay
cont.sysmessage @2594,,1 Süreniz doldugu için alandan atildiniz.
cont.go safe alan
remove
[itemdef i_atbizi]
id i_deed
name Atici
type t_telepad
on=@create
color 0bb4
attr 010
timer 30
on=@Click
name @0bb2,,1 Atilmaniza <timer> saniye kaldi.
on=@dclick
return 1
on=@timer
forplayers 800
go safe alan
events -e_partymasterimulenn
events -e_baslamaeventsi
events -e_dungeonss
endfor
remove
src.newnpc c_dungeon
new.p 6041,1726
serv.allclients sysmessage @0794,,1 Dungeon Duyurusu;
serv.allclients sysmessage @07a1,1,1 Dungeon'daki grup dungeondan çikmistir.
serv.allclients update
return 1
[function itemlerisilermisin]
src.findid.i_level2.remove
src.findid.i_level3.remove
src.findid.i_level4.remove
src.findid.i_level5.remove
[itemdef i_partyevent]
id i_deed
name Gizli Kapi
on=@create
color 0bb4
attr 010
on=@dclick
src.Events +e_baslamaeventsi
remove
return 1
[Events e_partymasterimulenn]
on=@death
src.hits <str>
src.mana <int>
src.stam <dex>
go 5388,1908
newitem i_dungeon_yasak
new.equip
return 1
on=@logout
go safe alan
events -e_partymasterimulenn
events -e_baslamaeventsi
events -e_dungeonss
stone 0
return 1
on=@itemdclick
if (<act.baseid> == i_runebook)
sysmessage @07a1,1,1 Çokmu zekisin :)
src.events +e_baslamaeventsi
return 1
on=@spellcast
if ((<argn> == 45)
sysmessage @07a1,1,1 Mark büyülerini bu alanda kullanamasiniz.
src.events +e_baslamaeventsi
return 1
endif
[itemdef i_eventsverlan]
id i_teleporter
name ben events veriyorum silmeyin beni.
on=@create
attr=090
color 07fd
on=@step
events +e_baslamaeventsi
src.dialog d_baslama
src.stone 1
[itemdef i_eventver]
id i_deed
name ben events veriyorum silmeyin beni.
on=@create
attr=090
color 07fd
timer 10
on=@timer
forplayers 20
events +e_baslamaeventsi
endfor
timer 10
return 1
[dialog d_baslama]
125,25
noclose
nomove
page 0,0
resizepic 0 0 9300 450 320
resizepic 10 10 9300 430 300
dhtmlgump 70 10 200 20 0 0 <def.bfont_red> Migfer Dibi Dungeon Sistemi
dhtmlgump 29 30 500 20 0 0 Party'masterinizin .startdungeon yazmasi gerek aksi takdirde dungeona
dhtmlgump 29 50 500 20 0 0 basliyamasiniz.
dhtmlgump 29 70 500 20 0 0 Eyer party masteriniz ölürse hepiniz otomatik olarak safe atilcaksiniz.
dhtmlgump 29 90 500 20 0 0 Rune Book , recal vb gibi seyleri dungeondan çikmadikca kullanmasiniz.
dhtmlgump 29 120 200 20 0 0 <def.bfont_lred>Hepinize bol sans dileriz.
//Sadece Party Master
[plevel 1]
startdungeon
[function startdungeon]
if !(<isevent.e_baslamaeventsi>)
src.sysmessage @38,6,1 Bu komutu sadece dungeon girislerinde kullanilir.
return 1
endif
serv.allclients sysmessage @07a1,1,1 <name> ve grubu dungeon sistemine basladi,
src.events +e_partymasterimulenn
src.events +e_dungeonss
region.allclients stone 0
region.allclients events +e_dungeonss
baslamateleporterinisilsene
events -e_baslamaeventsi
src.newitem i_partydialogsilplss
new.p <src.p>
// baslama teleportlarini siliyor iste o hani dialog açiyor stone yapiyor falan filen
[plevel 1]
baslamateleporterinisilsene
[function baslamateleporterinisilsene]
foritems 65000
if (<baseid>==i_eventsverlan)
remove
endif
endfor
// ismimindende belli oldugu gibi partyinin girisi için .startdungeon vs vs... kisa kes.
// a.q dialogunu siliyor :D
[itemdef i_partydialogsilplss]
id 0186a
name ben dialog silerrrr
layer layer_special
on=@create
attr attr_invis
color 07a1
timer 1
on=@timer
serv.allclients dialogsilplsss
serv.allclients tag0.aldim 0
remove
return 1
[FUNCTION dialogsilplsss]
trysrc <UID> src.dialogclose d_baslama
//on create bölümüne ekledim çikiyor iste anla
[plevel 1]
eventsteleportlarinidosermisin
[function eventsteleportlarinidosermisin]
src.newitem i_eventsverlan
new.p 5392,1954
src.newitem i_eventsverlan
new.p 5393,1954
src.newitem i_eventsverlan
new.p 5394,1954
src.newitem i_eventsverlan
new.p 5395,1954
src.newitem i_eventsverlan
new.p 5395,1955
src.newitem i_eventsverlan
new.p 5394,1955
src.newitem i_eventsverlan
new.p 5393,1955
src.newitem i_eventsverlan
new.p 5393,1955
src.newitem i_eventsverlan
new.p 5392,1955
src.newitem i_eventsverlan
new.p 5392,1956
src.newitem i_eventsverlan
new.p 5393,1956
src.newitem i_eventsverlan
new.p 5394,1956
[function cikarbabapsss]
src.newnpc c_boss1
new.p 5411,1932
[function bossilermisin]
bossil1
bossil2
bossil3
bossil4
bossil5
[function dungeonsilermisin]
forchars 65000
if (<baseid>==c_dungeon)
remove
endif
endfor
[function bossil1]
forchars 65000
if (<baseid>==c_Boss1)
remove
endif
endfor
[function bossil2]
forchars 65000
if (<baseid>==c_Boss2)
remove
endif
endfor
[function bossil3]
forchars 65000
if (<baseid>==c_Boss3)
remove
endif
endfor
[function bossil4]
forchars 65000
if (<baseid>==c_Boss4)
remove
endif
endfor
[function bossilak]
bossil1
bossil2
bossil3
bossil4
bossil5
[function eventsilyeterak]
serv.allclients events -e_dungeonss
serv.allclients events -e_partymasterimulenn
[plevel 1]
eventsilyeterak
[itemdef i_eventsverlan]
id i_teleporter
name ben events veriyorum silmeyin beni.
on=@create
attr=090
color 07fd
on=@step
events +e_baslamaeventsi
src.dialog d_baslama
src.stone 1
[itemdef i_geciricigate]
id i_moongate_red
name Dungeon Gecis
on=@create
attr=010
color 07fd
on=@click
message @1153,,1 <name>
return 1
on=@dclick
if (<src.findid.i_dungeon_Yasak>)
src.sys_error Dungeon'a girmenize <src.findid.i_dungeon_yasak.timer> saniye var.
return 1
else
src.sysmessage @055,,1 Dungeon'a tekrardan giris yaptiniz.
src.go 5394,1955
return 1
endif
on=@Step
src.hata Cift Tiklayiniz.
return 1
[itemdef i_dungeon_yasak]
name Dungeon Yasak
id 0186a
type t_eq_script
weight 0
layer layer_special
On=@Create
attr attr_invis|attr_newbie
On=@Equip
timer 15
On=@Timer
cont.sysmessage @044,,1 Dungeon'a girebilirsiniz..
remove
return 1
[itemdef i_Kontroledici]
id i_deed
name Kontrol Edici
type t_telepad
on=@create
color 0bb4
attr 010
timer 1
on=@dclick
return 1
on=@timer
timer 1
local.players 0
forplayers 15
local.players ++
endfor
if <dlocal.players> > 4
forplayers 15
go safe alan
events -e_partymasterimulenn
events -e_baslamaeventsi
events -e_dungeonss
serv.allclients sysmessage @1153,,1 Dungeon'a giren grup görevini basaramadi.
stone 0
src.newnpc c_dungeon
new.p 6041,1726
endfor
endif
return 1
[EOF]
