Kod:
//********************//
//**scripter = Cyrus**//
////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////Odul Gate//////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////
[itemdef i_level_odul_gate]
id=i_moongate_red
name=Odul Gate
type t_telepad
on=@create
color 0
attr 010
On=@click
message @07a1,1,1 [Odul Gate]
return 1
on=@step
src.newitem i_binek_res,{5 15}
src.act.bounce
src.newitem i_bilet,{50000}
src.act.bounce
src.newitem i_bilet,{50000}
src.act.bounce
src.newitem i_bilet,{50000}
src.act.bounce
src.newitem i_bilet,{50000}
src.act.bounce
src.newitem i_bilet,{50000}
src.act.bounce
src.go 5757,1185
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]
Rings 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 10000 i_bilet>)
src.sysmessage @07e5,1,1 Level Alanina Girebilmeniz Icin Yaninizda 10k Sp Olmasi 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]
Rings Uo
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]
Rings Uo
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>
////////////////////////////////////////////////////////////////////////////////////
//**scripter = Cyrus**//
////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////Odul Gate//////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////
[itemdef i_level_odul_gate]
id=i_moongate_red
name=Odul Gate
type t_telepad
on=@create
color 0
attr 010
On=@click
message @07a1,1,1 [Odul Gate]
return 1
on=@step
src.newitem i_binek_res,{5 15}
src.act.bounce
src.newitem i_bilet,{50000}
src.act.bounce
src.newitem i_bilet,{50000}
src.act.bounce
src.newitem i_bilet,{50000}
src.act.bounce
src.newitem i_bilet,{50000}
src.act.bounce
src.newitem i_bilet,{50000}
src.act.bounce
src.go 5757,1185
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]
Rings 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 10000 i_bilet>)
src.sysmessage @07e5,1,1 Level Alanina Girebilmeniz Icin Yaninizda 10k Sp Olmasi 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]
Rings Uo
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]
Rings Uo
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>
////////////////////////////////////////////////////////////////////////////////////
Yorumlar 3.
Gönderen Mrs.xariyla 29-10-2010 19:43
Bi scripte başlarken önce sistemin sonunda cıkcak olan Gate ile nasıl başladın büyük başarı |
OylamalarOylama :
Üyelerin oylama ortalaması (10 dışında) : 5.50
Oylar: 2 den itibaren 09-08-2010 15:57 |
yinede güzl calısma eline sağlık 
Benzer Sayfalar
| Sayfalar | Yorumlar | Gönderen | Tarih |
| Check System | 0 | Cyrus | 23-09-2011 |
| Rare Cicek System | 0 | Xle | 20-09-2011 |
| Doom Dungeon System | 0 | Pentagram | 02-11-2010 |
| Focus Skill System | 0 | Pentagram | 01-11-2010 |
| Level System | 0 | Crue | 03-06-2010 |
