[itemdef i_system_level_gate]
id=i_moongate_red
name=Odul Gate
type t_telepad

on=@create
color 0
attr 010

On=@click
message @07a1,1,1 [Level Odul Gate]
return 1

on=@step
src.newitem i_scroll_binek,5
src.act.bounce
src.newitem i_mage_kalkan
src.act.bounce
src.newitem i_mana_boot
src.act.bounce
src.newitem i_warlock_robe
src.act.bounce
src.newitem i_warlock_helm
src.act.bounce
src.newitem i_check10m
src.act.bounce
src.go safe alani
serv.allclients sysmessage @07a1,1,1 <src.name> Level Sistemini Basari Ile Bitirmistir Ve Alandan Cikmistir.
src.events -e_bineklevel
var.tag0.levelalanidolu 00
remove
src.sysmessage @07a1,1,1 Tebrikler Level Sistemini Basari Ile Bitirdiniz.
src.findid.i_level3.remove
return 1

//////////////////////////////////////////////////////////////




[function npclerisil]
level1sil
level2sil
level3sil

[function level1sil]
forchars 65000  
if (<baseid>==c_m_level1)
remove
endif
endfor

[function level2sil]
forchars 65000  
if (<baseid>==c_m_level2)
remove
endif
endfor

[function level3sil]
forchars 65000  
if (<baseid>==c_m_level3)
remove
endif
endfor


////////////////////////////////////////////////////////////////////////////
//////////////////Level Sureleri 5-7-10 dk Elleme///////////////////////////
////////////////////////////////////////////////////////////////////////////


[itemdef i_level1]
id=i_memory
type=t_eq_script
name=level1

on=@create
attr=090
more2 300

on=@equip
timerd 10

on=@timer
if (<more2> > 0)
cont.sysmessage @07a1,1,1 Kalan Saniye: <eval <more2>>
more2 <more2> + -1
timerd 10
return 1
else
attr=attr_decay
cont.sysmessage @07a1,1,1 Sureniz Doldugu Icin Alandan Atildiniz.
serv.allclients sysmessage @07a1,1,1 <src.name> Level 1 Alaninda Suresi Bittigi Icin Alandan Atilmistir.
cont.npclerisil
cont.go safe
cont.events -e_bineklevel
var.tag0.levelalanidolu 00
remove
endif


[function timer1kanka]
newitem i_level1
act.equip 


/////////////////////////////////////////////////////////////////////////


[itemdef i_level2]
id=i_memory
type=t_eq_script
name=level2

on=@create
attr=090
more2 420

on=@equip
timerd 10

on=@timer
if (<more2> > 0)
cont.sysmessage @07a1,1,1 Kalan Saniye: <eval <more2>>
more2 <more2> + -1
timerd 10
return 1
else
attr=attr_decay
cont.sysmessage @07a1,1,1 Sureniz Doldugu Icin Alandan Atildiniz.
serv.allclients sysmessage @07a1,1,1 <src.name> Level 2 Alaninda Suresi Bittigi Icin Alandan Atilmistir.
cont.npclerisil
cont.go safe
cont.events -e_bineklevel
var.tag0.levelalanidolu 00
remove
endif


[function timer2kanka]
newitem i_level2
act.equip 


/////////////////////////////////////////////////////////////////////////

[itemdef i_level3]
id=i_memory
type=t_eq_script
name=level3

on=@create
attr=090
more2 600

on=@equip
timerd 10

on=@timer
if (<more2> > 0)
cont.sysmessage @07a1,1,1 Kalan Saniye: <eval <more2>>
more2 <more2> + -1
timerd 10
return 1
else
attr=attr_decay
cont.sysmessage @07a1,1,1 Sureniz Doldugu Icin Alandan Atildiniz.
serv.allclients sysmessage @07a1,1,1 <src.name> Level 3 Alaninda Suresi Bittigi Icin Alandan Atilmistir.
cont.npclerisil
cont.go safe
cont.events -e_bineklevel
var.tag0.levelalanidolu 00
remove
endif


[function timer3kanka]
newitem i_level3
act.equip 

/////////////////////////////////////////////////////////////////////////////////////

[CHARDEF c_level_giris_man]
DEFNAME=c_level_giris_man
ID=c_man

ON=@Create
COLOR=01

STR={550 650}
DEX={0}
INT={14 16}

FAME={2000 4000}
KARMA=10000


ITEMNEWBIE=i_shroud
COLOR=0805
ITEMNEWBIE=i_scythe
COLOR=0805



On=@Dclick
src.dialog d_levelgiris
return 1

On=@Click
message @07a1,1,1 [Level Giris Man]
return 1


[DIALOG d_levelgiris]
0, 0 
nomove
resizepic 250 100 9200 260 100
resizepic 260 110 9300 240 80
page 0
text 340 110 <eval 0481> 0 


text 320 148 0455 1
button 300 150 55 56 1 0 1



[DIALOG d_levelgiris TEXT]
Eltrey Pvp Uo
Level Giris
[dialog d_levelgiris button]


on=1
if (<var.tag0.levelalanidolu> == 1)
src.sysmessage @07a1,1,1 Level alani doludur.
return 1
endif

if !(<src.restest i_check500k>)
src.sysmessage @07e5,1,1 Level Alanina Girebilmeniz Icin Yaninizda 500k check Gerekmektedir.
else
src.sysmessage @49 1.Leveli Gecmen Icin 5dakikan Var.Eger 5dk Icinde Bitiremessen Otomatikman Safe'ye Atilirsin. <src.name>
consume 10000 i_bilet
src.act.bounce
src.go 5163,1829
serv.allclients sysmessage @07a1,1,1 <src.name> Level Sistemine Girmistir.
src.events e_bineklevel
var.tag0.levelalanidolu 01
src.level1baslat
src.newitem i_level1
src.act.equip
endif
return 1


////////////////////////////////////////////////////


[CHARDEF c_level_cikis_man]
DEFNAME=c_level_cikis_man
ID=c_man

ON=@Create
COLOR=01

STR={550 650}
DEX={0}
INT={14 16}

FAME={2000 4000}
KARMA={-5000 -5999}

On=@Dclick
src.dialog d_levelcikis
return 1

On=@Click
message @0713,,1 [Level Cikis Man]
return 1


[DIALOG d_levelcikis]
0, 0 
nomove
resizepic 250 100 9200 260 100
resizepic 260 110 9300 240 80
page 0
text 340 110 <eval 0481> 0 


text 320 148 0455 1
button 300 150 55 56 1 0 1



[DIALOG d_levelcikis TEXT]
Rings Uo
Level Cikis
[dialog d_levelcikis button]


on=1
src.go 5750,1175
src.sysmessage @49 Son Level Alanindan Ciktiniz. <src.name>
src.events -e_bineklevel
return 1




////////////////////////////////////////////////////////////
////////////////////Level Giris Deed////////////////////////
////////////////////////////////////////////////////////////


[itemdef i_level_giris_deed]
id=i_deed
defname=i_level_giris_deed

on=@create
color=0798

on=@click 
message @800 [Level Giris Deed]
return 1

on=@dclick
src.sysmessage @0790,6,1,trk Bu Belge Ile Level Alanina Gibilirsiniz.
return 1


/////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////

////////////////////////////////////////////////////


[CHARDEF c_level_2_man]
DEFNAME=c_level_2_man
ID=c_man

ON=@Create
COLOR=01

STR={550 650}
DEX={0}
INT={14 16}

FAME={2000 4000}
KARMA=10000

ITEMNEWBIE=i_shroud
COLOR=0806
ITEMNEWBIE=i_scythe
COLOR=0806

On=@Dclick
src.dialog d_leveliki
return 1

On=@Click
message @0713,,1 [Level 2 Man]
return 1


[DIALOG d_leveliki]
0, 0 
nomove
resizepic 250 100 9200 260 100
resizepic 260 110 9300 240 80
page 0
text 340 110 <eval 0481> 0 


text 320 148 0455 1
button 300 150 55 56 1 0 1



[DIALOG d_leveliki TEXT]
Eltrey Pvp
Level 2
[dialog d_leveliki button]


on=1
if !(<src.restest 1 i_gecis_level_2>)
src.sysmessage @07e5,1,1 Level 2'ye Gecebilmeniz Icin Level Gecis Belgesi Gerekmektedir.
else
src.consume 1 i_gecis_level_2
src.go 5137,1913
src.level2baslat
src.timer2kanka
        src.sysmessage @07a1,1,1 Tebrikler Level 2'ye Gectiniz. Sureniz 7 Dakikadir. <src.name>
serv.allclients sysmessage @07a1,1,1 <src.name> Level 2 Alaninda Gecmistir.
endif




////////////////////////////////////////////////////


[CHARDEF c_level_3_man]
DEFNAME=c_level_3_man
ID=c_man

ON=@Create
COLOR=01

STR={550 650}
DEX={0}
INT={14 16}

FAME={2000 4000}
KARMA=10000

ITEMNEWBIE=i_shroud
COLOR=0806
ITEMNEWBIE=i_scythe
COLOR=0806


On=@Dclick
src.dialog d_leveluc
return 1

On=@Click
message @0713,,1 [Level 3 Man]
return 1


[DIALOG d_leveluc]
0, 0 
nomove
resizepic 250 100 9200 260 100
resizepic 260 110 9300 240 80
page 0
text 340 110 <eval 0481> 0 


text 320 148 0455 1
button 300 150 55 56 1 0 1



[DIALOG d_leveluc TEXT]
Eltrey Pvp
Level 3 (Son Level)
[dialog d_leveluc button]


on=1
if !(<src.restest 1 i_gecis_level_3>)
src.sysmessage @07e5,1,1 Level 3'e Gecebilmeniz Icin Level Gecis Belgesi Gerekmektedir.
else
src.consume 1 i_gecis_level_3
src.go 5137,2017
src.level3baslat
src.timer3kanka
        src.sysmessage @07a1,1,1 Tebrikler Son Leveldesiniz Level 3 Npc'sini Kestikden Sonra Gate Acilacaktir Gateden Gecince Odulunuzu Alicaksiniz.  Sureniz 10 Dakikadir <src.name>
serv.allclients sysmessage @07a1,1,1 <src.name> Level 3 Alaninda Gecmistir.
endif



//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////////

//**********************

//Gecis Belgeleri

//**********************


////////////////////////////////////////////////////////////
//////////Level 2'ye Gecis Belgesi Level 1'den Cıkıcak//////
////////////////////////////////////////////////////////////


[itemdef i_gecis_level_2]
id=i_scroll_blank
defname=i_gecis_level_2

on=@create
color=0811

on=@click 
message @800 [Gecis Belgesi]
return 1

on=@dclick
src.sysmessage @0790,6,1,trk Bu Belge Ile Level 2'ye Gecebilirsiniz.
return 1

//////////////////////////////////////////////////////////////////////////////////
//////////Level 3'e Gecis Belgesi Level 2'den Cıkıcak//////
////////////////////////////////////////////////////////////


[itemdef i_gecis_level_3]
id=i_scroll_blank
defname=i_gecis_level_3

on=@create
color=0799

on=@click 
message @800 [Gecis Belgesi]
return 1

on=@dclick
src.sysmessage @0790,6,1,trk Bu Belge Ile Level 3'e Gecebilirsiniz.
return 1


///////////////////////////////////////////////////////////////////////////////////////////////////////////

[function level1baslat]
serv.newnpc c_m_level1
new.p 5146,1839
return 1

///////////////////////////////////////////////////////////////////////////////////////////////////////////

[function level2baslat]
serv.newnpc c_m_level2
new.p 5138,1873
return 1

///////////////////////////////////////////////////////////////////////////////////////////////////////////

[function level3baslat]
serv.newnpc c_m_level3
new.p 5151,1962
return 1

////////////////////////////////////////////////////////////////////////////////////////////////////////////



//**********************

//Level System

//**********************

[events e_bineklevel]
on=@click
message @79a [Level System]
message @79a <name>
return 1

on=@itemdclick
if <act.baseid>==i_runebook
sysmessage @0ad,6,1,1 Bu Alanda Olmaz
return 1
endif

on=@spellcast
if (<argn> == 45) || (<argn> == 50)
sysmessage @0ad,6,1,1 Bu Alanda Olmaz
return 1
endif


On=@death
src.sysmessage Level Alaninda Oldugunuz Icin Safe'ye Atildiniz.
src.go safe
npclerisil
var.tag0.levelalanidolu 00
src.findid.i_level1.remove
src.findid.i_level2.remove
src.findid.i_level3.remove
src.hits 100
src.events -e_bineklevel
serv.allclients sysmessage @07a1,1,1 <src.name> Level Alaninda Oldugu Icın Alandan Atilmistir.
return 1



on=@logout
npclerisil
src.go safe
src.events -e_bineklevel
var.tag0.levelalanidolu 00

on=@login
src.sysmessage Level Alaninda Oyundan Ciktiginiz Icın Alandan Atildiniz.




////////////////////////////////////////////////////////////////

//Yaratiklar/////////

///////////////////////////////////////////////////////////////

[CHARDEF c_m_level1]
DEFNAME=c_m_level1
NAME=Level 1
id=c_liche
DAM=6,16
ARMOR=50
RESOURCES=8 t_MAGIC
CAN=MT_WALK|MT_FIRE_IMMUNE|MT_RUN|MT_USEHANDS
BLOODCOLOR=colors_red

CATEGORY=Monsters
SUBSECTION=Elementals
DESCRIPTION=Fire Elemental


ON=@CLICK
message @48,1,1,1 [Str:<str> | Hits:<hits>]
message <name>
return 1


ON=@Create
color=0810
NPC=brain_monster

STR={1500}
DEX={800 800}
INT={900 900}

PARRYING={55.0 65.0}
MAGERY={300.0 300.0}
MAGICRESISTANCE={400.0 400.0}
TACTICS={80.0 100.0}
WRESTLING={100.0 100.0}

FAME={2000 4000}
KARMA={-4000 -4999}

//ALIGNMENT=EVIL
//SPELLCIRCLE=3 5

ITEMNEWBIE=i_light_source
ITEMNEWBIE=i_spellbook	// knows fire type spells.
ADDSPELL=s_magic_arrow
ADDSPELL=s_fireball
ADDSPELL=s_fire_field
ADDSPELL=s_explosion
ADDSPELL=s_flamestrike
ADDSPELL=s_meteor_swarm
ADDSPELL=s_summon_elem_fire
ADDSPELL=s_fire_bolt


ITEM=i_bilet,{65000}
ITEM=i_gecis_level_2

CATEGORY=Monsters
SUBSECTION=Dragons and Drakes
DESCRIPTION=Level 1


on=@death
src.act.consume i_level1 1000

ON=@Gethit
if (<act.baseid>=c_vortex)
sayua 0481,2,0,eng,* Etkilenmez *
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,* Etkilenmez *
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,* Etkilenmez *
effect=3,i_fx_heal_effect,6,35,1 
sound snd_spell_greater_heal 
src.remove 
endif 

///////////////////////////////////////////////////////////////

[CHARDEF c_m_level2]
DEFNAME=c_m_level2
NAME=Level 2
ICON=i_pet_gazer
id=c_gazer
DAM=6,16
ARMOR=50
RESOURCES=8 t_MAGIC
CAN=MT_WALK|MT_FIRE_IMMUNE|MT_RUN|MT_USEHANDS
BLOODCOLOR=colors_red

CATEGORY=Monsters
SUBSECTION=Elementals
DESCRIPTION=Fire Elemental


ON=@CLICK
message @48,1,1,1 [Str:<str> | Hits:<hits>]
message <name>
return 1


ON=@Create
color=0810
NPC=brain_monster

STR={1750}
DEX={800 800}
INT={900 900}

PARRYING={55.0 65.0}
MAGERY={300.0 300.0}
MAGICRESISTANCE={400.0 400.0}
TACTICS={80.0 100.0}
WRESTLING={100.0 100.0}

FAME={2000 4000}
KARMA={-4000 -4999}

//ALIGNMENT=EVIL
//SPELLCIRCLE=3 5

ITEMNEWBIE=i_light_source
ITEMNEWBIE=i_spellbook	// knows fire type spells.
ADDSPELL=s_magic_arrow
ADDSPELL=s_fireball
ADDSPELL=s_fire_field
ADDSPELL=s_explosion
ADDSPELL=s_flamestrike
ADDSPELL=s_meteor_swarm
ADDSPELL=s_summon_elem_fire
ADDSPELL=s_fire_bolt


ITEM=i_bilet,{65000}
ITEM=i_gecis_level_3

CATEGORY=Monsters
SUBSECTION=Dragons and Drakes
DESCRIPTION=Level 1

on=@death
src.act.consume i_level2 1000

ON=@Gethit
if (<act.baseid>=c_vortex)
sayua 0481,2,0,eng,* Etkilenmez *
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,* Etkilenmez *
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,* Etkilenmez *
effect=3,i_fx_heal_effect,6,35,1 
sound snd_spell_greater_heal 
src.remove 
endif 


ON=@SPELLEFFECT
If (<argn>==39) || (<argn>==28)
sayua 0819,6,1,enu  * Etkilenmez *
return 1

/////////////////////////////////////////////////////////////////////

[CHARDEF c_m_level3]
DEFNAME=c_m_level3
NAME=Level 3
ICON=i_pet_dragon
id=c_dragon_red
DAM=6,16
ARMOR=50
RESOURCES=8 t_MAGIC
CAN=MT_WALK
BLOODCOLOR=colors_red

CATEGORY=Monsters
SUBSECTION=Elementals
DESCRIPTION=Fire Elemental

ON=@Create
color=0846
NPC=brain_monster

STR={1800}
DEX={800 800}
INT={900 900}

PARRYING={55.0 65.0}
MAGERY={300.0 300.0}
MAGICRESISTANCE={400.0 400.0}
TACTICS={80.0 100.0}
WRESTLING={100.0 100.0}

FAME={2000 4000}
KARMA={-4000 -4999}

//ALIGNMENT=EVIL
//SPELLCIRCLE=3 5

ITEMNEWBIE=i_light_source
ITEMNEWBIE=i_spellbook	// knows fire type spells.
ADDSPELL=s_explosion

ITEM=i_bilet,{65000}


CATEGORY=Monsters
SUBSECTION=Dragons and Drakes
DESCRIPTION=Level 1

ON=@CLICK
message @48,1,1,1 [Str:<str> | Hits:<hits>]
message <name>
return 1


ON=@Gethit
if (<hits> < 20) 
sayua 150,2,0,eng,* +10 Hits *
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,* Etkilenmez *
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,* Etkilenmez *
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,* Etkilenmez *
effect=3,i_fx_heal_effect,6,35,1 
sound snd_spell_greater_heal 
src.remove 
endif 

ON=@SPELLEFFECT
If (<argn>==20) || (<argn>==39) || (<argn>==28)
sayua 0819,6,1,enu  * Etkilenmez *
return 1



ON=@Death
src.act.consume i_level3 1000
src.newitem i_level_odul_gate
src.act.p <src.p>


Bu konu Garret tarafından düzenlendi(2013-04-12 18:45, 11 yıl önce)
Silindi
Members
0
Bu scriptin sana ait olduğundan eminmisin Sayın Garret ? vede scripti kod içine alırsanız seviniriz :)
mert77 : Bu scriptin sana ait olduğundan eminmisin Sayın Garret ? vede scripti kod içine alırsanız seviniriz :)
evet arkadaşım kod içine aldık :) iyi forumlar

Bu konu Garret tarafından düzenlendi(2013-05-03 21:43, 10 yıl önce)

Üye Ol veya Giriş Yap

Bu forum başlığına mesaj atmak istiyorsanız hemen üye olun veya giriş yapın.