DC-Game'den Secmeler :P

27 Denizli , Türkiye
0.00 510 0

Merhaba arkadaslar son 2 hafta icerisinde yazdıgım scriptleri sizlerle paylasıcam
Not:Arada bazı yardım aldıgım yerler var..

1-)Arcane Zostrich
Özelligi:Binek kendini tedavi eder ve poison vurur.Ayrıca üzerine binen kişi poisondan etkilenmez.
Script:
[CHARDEF c_arcane_zost] DEFNAME=c_arcane_zost ID=c_ostard_zostrich NAME=Arcane Ostard SOUND=snd_ANIMAL_OSTARD_FRENZIED1 ICON=i_pet_OSTARD_ZOSTRICH CAN=MT_WALK|MT_RUN DAM=8,23 ARMOR=15 RESOURCES=15 i_ribs_raw FOODTYPE=55 t_crops, 55 t_fruit, 64 t_grass DESIRES=e_OSTARDS ANIM=01fff DESCRIPTION=Frenzied SUBSECTION=Poison CATEGORY=Animals ON=@Create NPC=brain_animal color=0fa5 STR=380 DEX=215 INT=100 PARRYING={75.0 85.0} MAGICRESISTANCE={75.0 80.0} TACTICS={79.0 94.0} WRESTLING={79.0 94.0} TAMING=85.0 on=@click message @0845,1,1 [Arcane Zostrich] message @0481 <name> return 1 on=@gethit if (<hits> < 30) sayua 0481,1,1,2,0,eng,* Kendini Iyilestirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal hits=(<hits> + 75) if (<act.baseid>=c_vortex) sayua 0481,1,1,2,0,eng,* buyu etkisini kaldirir * src.poison 800 src.effect=1,1 src.sysmessage @0845,1,1 Poison Ostard Tarafindan Zehirlendiniz. 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,1,1,2,0,eng,* buyu etkisini kaldirir * src.poison 800 src.effect=1,1 src.sysmessage @0845,1,1 Poison Ostard Tarafindan Zehirlendiniz. effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal src.remove endif if (<flags> &statf_poisoned) sayua 0481,1,1,2,0,eng,* zehiri iyilestirir * src.poison 800 src.effect=1,1 src.sysmessage @0845,1,1 Poison Ostard Tarafindan Zehirlendiniz. sound snd_spell_cure findid.i_rune_poison.remove endif ON=@hit src.effect=1,1 src.poison 650 src.sysmessage @0845,1,1 Poison Ostard Tarafindan Zehirlenir. on=@mount if (0<ismypet>) && (<distance> < 4) src.events +e_poievent src.sayua 0790,6,6,0 * Sahibini Poison'dan Korur * src.effect 3,i_fx_sparkle,6,45 endif on=@dismount src.events -e_poievent src.sayua 0790,6,6,0 * Sahibini Korumayi Birakir * src.effect 3,i_fx_sparkle,6,45 [events e_poievent] ON=@spelleffect If (<argn>==20) sayua 007c5,6,0,enu * Etkilenmez * findid.i_rune_poison.remove return 1 ENDIF

2-)Bayrak Questi v2.0
Özelligi: Daha önce aynı sistemi forumlarda vermistim bu biraz daha gelismis ve degismis halidir.Ayrıca bayrak icin gerekli itemler olan "i_bez , i_sopa , i_bayraksimge" ler için kendiniz bir npc yapın ya da yarışma ödülü olarak verilsin bu size kalmış.Odul gateyi go safe yaptım kendi safe koordinatlarınızı ayarlayın.
Script:
[Itemdef i_bayrakgate] ID=i_moongate_red Name=Bayrak Gate On=@Click message @0845,1,1 [Odul Gate] On=@Create Color=040 On=@dclick src.sysmessage @1153 Uzerinden geciniz. On=@step src.newitem i_pet_horse_brown_dk src.act.bounce src.act.more1 c_m_nightmare src.act.color 0810 src.act.name Nightmare src.newitem i_cutlass_power src.act.bounce src.newitem i_bandana src.act.color 0819 src.act.bounce src.newitem i_boots_calf src.act.color 0819 src.act.bounce src.newitem i_apron_half src.act.color 0819 src.act.bounce src.go safe src.sysmessage @1153 Odulu Kazandiniz .. ! remove On=@timer remove return 1 [chardef c_bayrakci] defname c_bayrakci id c_man name Bayrak Quest On=@Create color 0812 str 1000 dex 1000 int 500 title Bayrakci itemnewbie i_hair_long color 0812 itemnewbie i_deathshroud color 0812 itemnewbie i_boots_calf color 0812 itemnewbie i_leather_gloves color 0812 itemnewbie i_bow color 0812 On=@Click message @0845,1,1 [Kahrolsun PKK] message @0481 <name> return 1 On=@DClick IF ( <DISTANCE> > 2 ) src.sysmessage Yeterince yakin degilsiniz.. RETURN 1 SRC.ACT=<UID> else sdialog d_bayrak return 1 endif [DIALOG d_bayrak] 125,25 page 0,0 resizepic 0 0 9300 520 400 text 250 20 1000 0 text 60 50 1000 1 text 60 80 1000 2 text 60 110 1000 3 text 60 140 1000 4 text 60 170 1000 5 text 60 200 1000 6 text 60 230 1000 7 text 60 260 1000 8 text 60 290 1000 9 text 60 320 1000 10 text 60 350 1000 11 button 40 355 2104 2103 1 0 1 [DIALOG d_bayrak TEXT] <serv.servname> Selam genclik zengin olmak isteyenleri buraya alalim. Hey sen sana bir gorev vericem. Turklugumuzun sembolu icin gerekenleri istiyorum senden. Bunlar:Sopa,bez parcasi ve Turklugunun sembolu olan deed. Bunlar bilet yaratigindan sans eseri dusuyor. Bunlari bulunca Turk bayragi alicaksin. Bu bayragi safe alan haricinde bir yere dik. Dikince teror orgutu yandaslari sana saldirabilir eger onlari gecebilirsen bir kapi belirecek kapi 15 sn yede silinir hemen gecmelisin. System Coder: DC-GAME 29 Ekim Questi Malzemeleri Topladim. [DIALOG d_bayrak BUTTON] On=1 if !(<src.restest i_bayraksimge>)||!(<src.restest i_bez>)||!(<src.restest i_sopa>) src.sysmessage @1153 Gerekli malzemeler bulunmuyor .. ! else src.consume i_bez src.consume i_sopa src.consume i_bayraksimge src.newitem i_bayrak src.act.bounce return 1 endif [Itemdef i_bez] ID=i_cloth Name=Bez Parcasi Weight=0 On=@Click message @0845,1,1 [Quest Item] message @1153 Bez Parcasi return 1 On=@Create Color=07a1 On=@dclick src.message @1153 Beni bayrakciya gotur. [Itemdef i_sopa] ID=i_staff_quarter Name=Bayrak Sopasi Weight=0 On=@Click message @0845,1,1 [Quest Item] message @1153 Bayrak Sopasi return 1 On=@Create Color=900 On=@dclick src.message @1153 Beni bayrakciya gotur. On=@equip src.sysmessage @1153 Beni eline alamazsin. unequip return 1 [Itemdef i_bayraksimge] ID=i_deed Name=Bayrak Simgesi Weight=0 On=@Click message @0845,1,1 [Quest Item] message @1153 Bayrak Simgesi return 1 On=@Create Color=080a On=@dclick src.message @1153 Beni bayrakciya gotur. [Itemdef i_bayrak] ID=i_curtain_banner_nw Name=Bayrak Weight=0 On=@Click message @0845,1,1 [Quest Odul] message @1153 Bayrak return 1 On=@Create Color=080a On=@dclick target @0783,3,1 Bayragi safe alan haricinde bir yere dikiniz. return 1 On=@Targon_Item src.sysmessage @1153 Sacmalama. On=@Targon_Char src.sysmessage @1153 Yuh. On=@Targon_ground src.allclient sysmessage @0481,,1 <act.name> bayragi dikdi.Kendisini tebrik ediyoruz. src.message @1153 Eyvah teror orgutu saldiriyor..Hemen baskanlarini oldurmeliyim. serv.newnpc c_teror new.p <src.p> serv.newnpc c_teror new.p <src.p> serv.newnpc c_teror new.p <src.p> serv.newnpc c_teror new.p <src.p> serv.newnpc c_terorbaskan new.p <src.p> remove [CHARDEF c_teror] name=Pkk'li Asker id=c_man can=mt_walk|mt_fly|mt_run|mt_equip|mt_usehands on=@create color=0455 hitpoints=5000 str={80 130} dex={50 80} int=0 fame=7000 karma=-5000 kill=80 npc=brain_undead wrestling={75.0 120.0} inscription={50.0 86.0} anatomy={75.0 100.0} tactics={120.0 150.0} archery={200.0 230.0} ITEMNEWBIE=i_robe COLOR=0455 ITEMNEWBIE=i_boots_calf COLOR=0455 ITEMNEWBIE=i_bow_elven COLOR=0455 ITEMNEWBIE=i_arrow,500 COLOR=0455 ITEMNEWBIE=i_leather_gloves COLOR=0455 ITEMNEWBIE=i_hair_long color=0455 ITEM=i_bilet,{150 200} [CHARDEF c_terorbaskan] name=Pkk'li Baskan id=c_man can=mt_walk|mt_fly|mt_run|mt_equip|mt_usehands on=@create color=0455 hitpoints=5000 str={200 250} dex={100 120} int=0 fame=7000 karma=-5000 kill=80 npc=brain_undead wrestling={75.0 120.0} inscription={50.0 86.0} anatomy={75.0 100.0} tactics={120.0 150.0} ITEMNEWBIE=i_robe COLOR=0455 ITEMNEWBIE=i_boots_calf COLOR=0455 ITEMNEWBIE=i_katana_might COLOR=0455 ITEMNEWBIE=i_leather_gloves COLOR=0455 ITEMNEWBIE=i_hair_long color=0455 ITEM=i_bilet,{150 200} On=@death src.serv.allclients sysmessage @0481,,1 <act.name> Teror orgutunun baskanini oldurdu ve odul gateyi acti. src.newitem i_bayrakgate src.act.p <src.p> src.act.timer 15

3-)New Mount
Anlatım:Sizin icin hazırlamıs oldugum 4 yeni guclu binek.
Power of Red
Power of Black
Power of Blue
Power of Yellow
Script:
[CHARDEF c_power_yellow] NAME=Power of Yellow ID=c_ostard_desert CAN=MT_WALK|MT_RUN FOODTYPE=55 t_crops, 55 t_fruit, 55 t_grain, 64 t_grass ICON=i_pet_ostard_desert DESCRIPTION=Power of Black TEVENTS=e_horses SUBSECTION=Ostard CATEGORY=Animals ON=@Create COLOR=07ad STR=640 DEX=150 INT={100 120} on=@gethit if (<flags> &statf_poisoned) sayua 0481,1,1,2,0,eng,* zehiri iyilestirir * sound snd_spell_cure findid.i_rune_poison.remove endif if (<hits> < 50) sayua 0481,1,1,2,0,eng,* kendini iyilestirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal hits=(<hits> + 45) endif if (<act.baseid>=c_vortex) sayua 0481,1,1,2,0,eng,* buyu 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,1,1,2,0,eng,* buyu 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,1,1,2,0,eng,* buyu etkisini kaldirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal src.remove endif if (<act.baseid>=c_bear_polar) sayua 0481,1,1,2,0,eng,* buyu etkisini kaldirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal src.remove endif ON=@Click message @07ad Power of Yellow if (strmatch("<*","<name>")) remove return 1 endif if (strmatch("@*","<name>")) remove return 1 endif STR=640 DEX=150 update var.title if (<fame> > 9990) if (<memoryfindtype.memory_ipet>) message @0481,1,1 <sex Lord/Lady> <name> [tame] else message @0481,1,1 <sex Lord/Lady> <name> endif else if (<memoryfindtype.memory_ipet>) message @0481,1,1 <name> [tame] else message @0481,1,1 <name> endif endif return 1 PARRYING={98.0 99.0} MAGICRESISTANCE={97.0 98.0} TACTICS={98.0 99.0} WRESTLING={98.0 99.0} TAMING={65.0 95.0} ANIMALLORE={65.0 95.0} KARMA=1000 FAME=1000 [CHARDEF c_power_black] NAME=Power of Black ID=c_ostard_desert CAN=MT_WALK|MT_RUN FOODTYPE=55 t_crops, 55 t_fruit, 55 t_grain, 64 t_grass ICON=i_pet_ostard_desert DESCRIPTION=Power of Black TEVENTS=e_horses SUBSECTION=Ostard CATEGORY=Animals ON=@Create COLOR=0819 STR=700 DEX=150 INT={100 120} on=@gethit if (<flags> &statf_poisoned) sayua 0481,1,1,2,0,eng,* zehiri iyilestirir * sound snd_spell_cure findid.i_rune_poison.remove endif if (<hits> < 50) sayua 0481,1,1,2,0,eng,* kendini iyilestirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal hits=(<hits> + 45) endif if (<act.baseid>=c_vortex) sayua 0481,1,1,2,0,eng,* buyu 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,1,1,2,0,eng,* buyu 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,1,1,2,0,eng,* buyu etkisini kaldirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal src.remove endif if (<act.baseid>=c_bear_polar) sayua 0481,1,1,2,0,eng,* buyu etkisini kaldirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal src.remove endif ON=@Click message @0810 Power of Black if (strmatch("<*","<name>")) remove return 1 endif if (strmatch("@*","<name>")) remove return 1 endif STR=700 DEX=150 update var.title if (<fame> > 9990) if (<memoryfindtype.memory_ipet>) message @0481,1,1 <sex Lord/Lady> <name> [tame] else message @0481,1,1 <sex Lord/Lady> <name> endif else if (<memoryfindtype.memory_ipet>) message @0481,1,1 <name> [tame] else message @0481,1,1 <name> endif endif return 1 PARRYING={98.0 99.0} MAGICRESISTANCE={97.0 98.0} TACTICS={98.0 99.0} WRESTLING={98.0 99.0} TAMING={65.0 95.0} ANIMALLORE={65.0 95.0} KARMA=1000 FAME=1000 [CHARDEF c_power_red] NAME=Power of Red ID=c_ostard_desert CAN=MT_WALK|MT_RUN FOODTYPE=55 t_crops, 55 t_fruit, 55 t_grain, 64 t_grass ICON=i_pet_ostard_desert DESCRIPTION=Power of Red TEVENTS=e_horses SUBSECTION=Ostard CATEGORY=Animals ON=@Create COLOR=080a STR=660 DEX=150 INT={100 120} on=@gethit if (<flags> &statf_poisoned) sayua 0481,1,1,2,0,eng,* zehiri iyilestirir * sound snd_spell_cure findid.i_rune_poison.remove endif if (<hits> < 50) sayua 0481,1,1,2,0,eng,* kendini iyilestirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal hits=(<hits> + 45) endif if (<act.baseid>=c_vortex) sayua 0481,1,1,2,0,eng,* buyu 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,1,1,2,0,eng,* buyu 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,1,1,2,0,eng,* buyu etkisini kaldirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal src.remove endif if (<act.baseid>=c_bear_polar) sayua 0481,1,1,2,0,eng,* buyu etkisini kaldirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal src.remove endif ON=@Click message @080a Power of Red if (strmatch("<*","<name>")) remove return 1 endif if (strmatch("@*","<name>")) remove return 1 endif STR=660 DEX=150 update var.title if (<fame> > 9990) if (<memoryfindtype.memory_ipet>) message @0481,1,1 <sex Lord/Lady> <name> [tame] else message @0481,1,1 <sex Lord/Lady> <name> endif else if (<memoryfindtype.memory_ipet>) message @0481,1,1 <name> [tame] else message @0481,1,1 <name> endif endif return 1 PARRYING={98.0 99.0} MAGICRESISTANCE={97.0 98.0} TACTICS={98.0 99.0} WRESTLING={98.0 99.0} TAMING={65.0 95.0} ANIMALLORE={65.0 95.0} KARMA=1000 FAME=1000 [CHARDEF c_power_blue] NAME=Power of Blue ID=c_ostard_desert CAN=MT_WALK|MT_RUN FOODTYPE=55 t_crops, 55 t_fruit, 55 t_grain, 64 t_grass ICON=i_pet_ostard_desert DESCRIPTION=Power of Blue TEVENTS=e_horses SUBSECTION=Ostard CATEGORY=Animals ON=@Create COLOR=0fa0 STR=680 DEX=150 INT={100 120} on=@gethit if (<flags> &statf_poisoned) sayua 0481,1,1,2,0,eng,* zehiri iyilestirir * sound snd_spell_cure findid.i_rune_poison.remove endif if (<hits> < 50) sayua 0481,1,1,2,0,eng,* kendini iyilestirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal hits=(<hits> + 45) endif if (<act.baseid>=c_vortex) sayua 0481,1,1,2,0,eng,* buyu 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,1,1,2,0,eng,* buyu 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,1,1,2,0,eng,* buyu etkisini kaldirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal src.remove endif if (<act.baseid>=c_bear_polar) sayua 0481,1,1,2,0,eng,* buyu etkisini kaldirir * effect=3,i_fx_heal_effect,6,35,1 sound snd_spell_greater_heal src.remove endif ON=@Click message @0812 Power of Blue if (strmatch("<*","<name>")) remove return 1 endif if (strmatch("@*","<name>")) remove return 1 endif STR=680 DEX=150 update var.title if (<fame> > 9990) if (<memoryfindtype.memory_ipet>) message @0481,1,1 <sex Lord/Lady> <name> [tame] else message @0481,1,1 <sex Lord/Lady> <name> endif else if (<memoryfindtype.memory_ipet>) message @0481,1,1 <name> [tame] else message @0481,1,1 <name> endif endif return 1 PARRYING={98.0 99.0} MAGICRESISTANCE={97.0 98.0} TACTICS={98.0 99.0} WRESTLING={98.0 99.0} TAMING={65.0 95.0} ANIMALLORE={65.0 95.0} KARMA=1000 FAME=1000

4-)U-S Stone
Özelligi:Stoneyi safeye koymaniz yeterli.Ve bilet idsini i_bilet olarak ayarladım kendinize göre değiştirirsiniz.Stonede birden çok birbirinden
değişik itemler var itemler de içinde siz stoneyi koyun ve bilet idsini ayarlayın yeter.Bu itemleri bazı serverlarda benzerlerini görmüş olabilirsiniz.Ama hiç birine gözümle bakmadım bile hiç şüpheniz olmasın itemlerin hepsi bana ait.
Script:
[ITEMDEF i_us_stone] NAME=U-S Stone ID=i_grave_stone TYPE=t_script on=@create color 0815 return 1 ON=@Click message @0845,1,1 [U-S Stone] On=@DClick IF ( <DISTANCE> > 2 ) src.sysmessage Yeterince yakin degilsiniz.. RETURN 1 SRC.ACT=<UID> else sdialog d_us return 1 endif [dialog d_us] 50,50 nomove resizepic 0 0 3600 260 180 dtext 80 15 38 <serv.servname> dtext 49 41 250 Ozel Weapons dtext 49 71 250 Ozel Armors dtext 49 101 250 Ozel Items dtext 29 131 250 Itemlerin Devami Gelicek. button 25 40 55 56 1 0 1 button 25 70 55 56 1 0 2 button 25 100 55 56 1 0 3 [dialog d_us text] [dialog d_us button] onbutton 0 src.sysmessage @0481,1,1 Kapattiniz.. onbutton=1 src.dialog d_us1 return 1 endif onbutton=2 src.dialog d_us2 return 1 endif onbutton=3 src.dialog d_us3 return 1 endif [dialog d_us1] 50,50 nomove resizepic 0 0 3600 250 150 text 85 20 38 0 text 30 65 250 1 text 30 85 250 2 text 30 105 250 3 button 15 65 55 56 1 0 1 button 15 85 55 56 1 0 2 button 15 105 55 56 1 0 3 [dialog d_us1 TEXT] <serv.servname> Poison Sword Light Spear Dracula Hammer(PK) [dialog d_us1 BUTTON] onbutton 0 src.sysmessage @0481,1,1 Kapattiniz.. onbutton 1 if (<src.restest 25000 i_bilet>) src.newitem i_poison_sword src.act.bounce src.consume 25000 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(25000 Bilet) endif onbutton 2 if (<src.restest 7500 i_bilet>) src.newitem i_light_spear src.act.bounce src.consume 7500 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(7500 Bilet) endif onbutton 3 if (<src.restest 8800 i_bilet>) src.newitem i_dracula_hammer src.act.bounce src.consume 8800 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(8800 Bilet) endif [dialog d_us2] 50,50 nomove resizepic 0 0 3600 250 150 text 85 20 38 0 text 30 65 250 1 text 30 85 250 2 text 30 105 250 3 button 15 65 55 56 1 0 1 button 15 85 55 56 1 0 2 button 15 105 55 56 1 0 3 [dialog d_us2 TEXT] <serv.servname> Dragon Set Black Set Poison Robe [dialog d_us2 BUTTON] onbutton 0 src.sysmessage @0481,1,1 Kapattiniz.. onbutton 1 if (<src.restest 4000 i_bilet>) src.newitem i_set_dragon src.act.bounce src.consume 7000 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(4000 Bilet) endif onbutton 2 if (<src.restest 7500 i_bilet>) src.newitem i_set_black src.act.bounce src.consume 4000 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(7500 Bilet) endif onbutton 3 if (<src.restest 40000 i_bilet>) src.newitem i_poison_robe src.act.bounce src.consume 40000 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(40000 Bilet) endif [dialog d_us3] 50,50 nomove resizepic 0 0 3600 250 200 text 85 20 38 0 text 30 65 250 1 text 30 85 250 2 text 30 105 250 3 text 30 125 250 4 text 30 145 250 5 button 15 65 55 56 1 0 1 button 15 85 55 56 1 0 2 button 15 105 55 56 1 0 3 button 15 125 55 56 1 0 4 button 15 145 55 56 1 0 5 [dialog d_us3 TEXT] <serv.servname> Power Gloves Dark Cloak Resist Gorget Dracula Helm Lhaw Boot [dialog d_us3 BUTTON] onbutton 0 src.sysmessage @0481,1,1 Kapattiniz.. onbutton 1 if (<src.restest 10000 i_bilet>) src.newitem i_power_gloves src.act.bounce src.consume 10000 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(10000 Bilet) endif onbutton 2 if (<src.restest 10000 i_bilet>) src.newitem i_dark_cloak src.act.bounce src.consume 10000 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(10000 Bilet) endif onbutton 3 if (<src.restest 10000 i_bilet>) src.newitem i_resist_gorget src.act.bounce src.consume 10000 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(10000 Bilet) endif onbutton 4 if (<src.restest 15000 i_bilet>) src.newitem i_helm_dracula src.act.bounce src.consume 15000 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(15000 Bilet) endif onbutton 5 if (<src.restest 6000 i_bilet>) src.newitem i_lhaw_boot src.act.bounce src.consume 6000 i_bilet else src.sysmessage @0713,1,1 Yeterli bilet yok(6000 Bilet) endif /////////////////////Sıra özel itemlerde :P///////////////////////////// ///////Once armorlar//////// [ITEMDEF i_dragonn_sleeves] DEFNAME=i_dragonn_sleeves ID=i_studded_sleeves NAME=dragon sleeves TYPE=t_clothing ARMOR=48 ON=@CREATE COLOR=0868 HITPOINTS={100 150} [ITEMDEF i_dragonn_gloves] DEFNAME=i_dragonn_gloves ID=i_studded_gloves NAME=dragon gloves TYPE=t_clothing ARMOR=48 ON=@CREATE COLOR=0868 HITPOINTS={100 150} [ITEMDEF i_dragonn_gorget] DEFNAME=i_dragonn_gorget ID=i_studded_gorget NAME=dragon gorget TYPE=t_clothing ARMOR=48 ON=@CREATE COLOR=0868 HITPOINTS={100 150} [ITEMDEF i_dragonn_leggings] DEFNAME=i_dragonn_leggings ID=i_studded_leggings NAME=dragon leggings TYPE=t_clothing ARMOR=48 ON=@CREATE COLOR=0868 HITPOINTS={100 150} [ITEMDEF i_dragonn_tunic] DEFNAME=i_dragonn_tunic ID=i_studded_tunic NAME=dragon tunic TYPE=t_clothing ARMOR=48 ON=@CREATE COLOR=0868 HITPOINTS={100 150} [ITEMDEF i_set_dragon] NAME=Dragon Set Deed ID=i_deed WEIGHT=10 ON=@Create ATTR=00 color 0868 ON=@DCLICK If (<topobj.uid> != <src.uid>) src.sysmessage @39,3,0 Bu esyayi kullanmak icin cantanizda olmasi gerekmektedir return 1 else SRC.NEWITEM i_dragonn_sleeves SRC.ACT.equip SRC.NEWITEM i_dragonn_gloves SRC.ACT.equip SRC.NEWITEM i_dragonn_gorget SRC.ACT.equip SRC.NEWITEM i_dragonn_leggings SRC.ACT.equip SRC.NEWITEM i_dragonn_tunic SRC.ACT.equip REMOVE RETURN 1 endif [ITEMDEF i_black_sleeves] DEFNAME=i_black_sleeves ID=i_studded_sleeves NAME=black sleeves TYPE=t_clothing ARMOR=58 ON=@CREATE COLOR=0810 HITPOINTS={100 150} [ITEMDEF i_black_gloves] DEFNAME=i_black_gloves ID=i_studded_gloves NAME=black gloves TYPE=t_clothing ARMOR=58 ON=@CREATE COLOR=0810 HITPOINTS={100 150} [ITEMDEF i_black_gorget] DEFNAME=i_black_gorget ID=i_studded_gorget NAME=black gorget TYPE=t_clothing ARMOR=58 ON=@CREATE COLOR=0810 HITPOINTS={100 150} [ITEMDEF i_black_leggings] DEFNAME=i_black_leggings ID=i_studded_leggings NAME=black leggings TYPE=t_clothing ARMOR=58 ON=@CREATE COLOR=0810 HITPOINTS={100 150} [ITEMDEF i_black_tunic] DEFNAME=i_black_tunic ID=i_studded_tunic NAME=black tunic TYPE=t_clothing ARMOR=58 ON=@CREATE COLOR=0810 HITPOINTS={100 150} [ITEMDEF i_set_black] NAME=Black Set Deed ID=i_deed WEIGHT=10 ON=@Create ATTR=00 color 0810 ON=@DCLICK If (<topobj.uid> != <src.uid>) src.sysmessage @39,3,0 Bu esyayi kullanmak icin cantanizda olmasi gerekmektedir return 1 else SRC.NEWITEM i_black_sleeves SRC.ACT.equip SRC.NEWITEM i_black_gloves SRC.ACT.equip SRC.NEWITEM i_black_gorget SRC.ACT.equip SRC.NEWITEM i_black_leggings SRC.ACT.equip SRC.NEWITEM i_black_tunic SRC.ACT.equip REMOVE RETURN 1 endif [ITEMDEF i_poison_robe] NAME=Poison Robe ID=i_deathshroud Weight=5 TYPE= t_armor_leather armor=25 REQSTR=40 SKILLMAKE=TAILORING 99.0, MAGERY 70.0 RESOURCES=25 i_cloth ON=@CREATE COLOR=1957 hitpoints={1500 2000} ON=@EQUIP if (<src.magery> < 100.0) src.sysmessage @025,1,1 Bunu kullanacak mageye sahip degilsiniz. unequip endif if (<src.tactics> > 1.0) src.sysmessage @025,1,1 Sadece mageler kullanabilir. unequip endif else src.events +e_poi_robe SRC.poisoning=<SRC.poisoning>+10.0) SRC.EVALUATINGINTEL=<SRC.EVALUATINGINTEL>+10.0) endif ON=@UNEQUIP src.events -e_poi_robe SRC.poisoning=<SRC.poisoning>+(-10.0) SRC.EVALUATINGINTEL=<SRC.EVALUATINGINTEL>+(-10.0) [events e_poi_robe] On=@SpellEffect if (<argn> == 20) sayu * Etkilenmez * return 1 [ITEMDEF i_poison_sword] NAME=Poison Sword ID=i_sword_long WEIGHT=5 ON=@Create Morey 900 hitpoints=100 color=07c5 ON=@Click message @07a5 [ Poison Damage ] on=@equip morey 900 src.message @07a5 [ Poison Damage ] if (<src.swordsmanship> < 100.0) src.sysmessage @025,1,1 Bu silahi kullanacak beceriye sahip degilsiniz. unequip endif if (<src.tactics> < 100.0) src.sysmessage @025,1,1 Bu silahi kullanacak beceriye sahip degilsiniz. unequip endif ON=@Damage src.poison 400 src.sayua 0845,6,6,0 *Zehirlenir* src.effect 3,037c4,6,15,1 return 1 [ITEMDEF i_dracula_hammer] NAME=Dracula Hammer ID=i_hammer_war WEIGHT=5 Dam=17,25 ON=@Create hitpoints=100 color=080a ON=@Click message @1153 [ Dracula Hammer ] on=@equip src.spell_say [ Dracula Hammer ] if !(<src.kills> >6) src.sysmessage @0713,1,1 Bunu kullanabilmek icin katil olmalisiniz.. unequip else if (<src.macefighting> < 100.0) src.sysmessage @0713,1,1 Bu silahi kullanacak beceriye sahip degilsiniz. unequip endif if (<src.tactics> < 100.0) src.sysmessage @0713,1,1 Bu silahi kullanacak beceriye sahip degilsiniz. unequip endif src.events +e_stamshot on=@unequip src.events -e_stamshot on=@damage src.sayua 0845,6,6,0 * Dracula Power * src.SOUND=SND_SPELL_flamestrike SRC.EFFECT=2,03709,30,50,0 [events e_stamshot] On=@hit src.dropstam if (<findlayer(2).type> == t_weapon_mace_staff) && (<macefighting> >= 98.0) if (rand(1) <= <eval (<anatomy> / 40)>) src.damage {10 33} src.dropstam src.dropstam src.dropstam src.sayua 0845,6,6,0 * Stam Damage * return 1 endif endif [ITEMDEF i_light_spear] NAME=Light Spear ID=i_Spear defname=i_spear_light type=t_weapon_fence value 10000 damage=15,20 On=@create color=0480 On=@click message @07a1 [ Lighting Energy ] return 1 ON=@Equip src.message @0481 [ Lighting Power ] if (<src.fencing> < 100.0) src.sysmessage @1153 Bu silahi kullanacak beceriye sahip degilsiniz. unequip endif if (<src.tactics> < 100.0) src.sysmessage @1153 Bu silahi kullanacak beceriye sahip degilsiniz. unequip endif else equip src.message @0481 [ Lighting Power ] On=@damage SRC.EFFECT=1,03715,4,15,1 SRC.SOUND=41 RETURN 1 [ITEMDEF i_power_gloves] NAME=Power Gloves ID=i_leather_gloves WEIGHT=0 Armor=50 ON=@Create color=0481 hitpoints=100 ON=@Click message @50 [ Power Gloves ] on=@equip if (<src.fencing>>=0.1) || (<src.swordsmanship>>=0.1) || (<src.archery>>=0.1) || (<src.macefighting>>=0.1) || (<src.tactics>>=0.1) || (<src.wrestling>>=0.1) src.sysmessage @38,1,1 Bunu giyebilmek icin mage olmalisiniz. unequip return 1 else SRC.magery=<SRC.magery>+10.0) return 1 endif on=@unequip SRC.magery=<SRC.magery>-10.0) [ITEMDEF i_dark_cloak] NAME=Dark Cloak ID=i_cape WEIGHT=0 Armor=30 ON=@Create color=0455 hitpoints=100 ON=@Click message @50 [ Dark Cloak ] on=@equip if (<src.magery>>=0.1) || (<src.meditation>>=0.1) src.sysmessage @38,1,1 Bunu giyebilmek icin mage olmamalisiniz. unequip return 1 else SRC.tactics=<SRC.tactics>+10.0) endif ON=@UNEQUIP SRC.tactics=<SRC.tactics>-10.0) [itemdef i_resist_gorget] Id=i_studded_gorget Name=Resist Gorget WEIGHT=5 ARMOR=40 ON=@Create COLOR=1945 HITPOINTS=100 ON=@Click message @50,,1 Resist Gorget return 1 ON=@Equip IF ( <SRC.magery> < 98.0 ) SRC.SYSMESSAGE @07a1 En az 98 Magery'niz olmali. UNEQUIP RETURN 1 ENDIF IF ( <SRC.EVALUATINGINTEL> < 98.0 ) SRC.SYSMESSAGE @07a1 En az 98 Evaluating Intelligence'iniz olmali. UNEQUIP RETURN 1 ENDIF IF ( <SRC.MEDITATION> < 98.0 ) SRC.SYSMESSAGE @07a1 En az 98 Meditation olmali. UNEQUIP RETURN 1 ENDIF IF ((<src.tactics> > 0.0) || (<src.wrestling> > 0.0) || (<src.swordsmanship> > 0.0) || (<src.fencing> > 0.0) || (<src.macefighting> > 0.0) || (<src.archery> > 0.0) ) SRC.SYSMESSAGE @07a1 Combat Skillleri olmamali. UNEQUIP RETURN 1 ENDIF src.events +e_resist_fire ON=@UnEquip src.events -e_resist_fire [EVENTS e_resist_fire] ON=@SPELLEFFECT If (<argn>==1) || (<argn>==3) || (<argn>==5) || (<argn>==8) sayua 044,6,6,0 * Buyuden Etkilenmez * return 1 endif ON=@Gethit IF (<src.findid.i_rune_magic_arrow>) || (<src.findid.i_rune_weaken>) src.findid.i_rune_magic_arrow.remove src.findid.i_rune_weaken.remove SPELLEFFECT=s_cure,150.0,1 endif [ITEMDEF i_lhaw_boot] NAME=L'haw Boot ID=i_boots_calf WEIGHT=5 ON=@Create color=07b2 hitpoints=100 ON=@Click message @02 [ Mana Power ] ON=@EQUIP IF ((<src.magery> > 100.0) || (<src.meditation> > 100.0) || (<src.swordsmanship> > 0.0) SRC.SYSMESSAGE @0713,1,1 Bunu birtek mage'ler kullanabilir.. UNEQUIP RETURN 1 ENDIF src.spell_say [ Mana Power ] src.sysmessage @0713,1,1 L'haw Boot gucu sizinle. LINK=<SRC.UID> TIMER=2 RETURN 0 on=@TIMER IF (<LINK.mana><<LINK.int>) LINK.mana=<LINK.mana>+8 CONT.EFFECT=3,i_fx_sparkle_2,10,20,10 TIMER=3 else TIMER=0 ENDIF RETURN 1 on=@unequip src.sysmessage @0713,1,1 Mana Power Gucunu Yitirdiniz... LINK=04FFFFFFF timer=-1 RETURN 0 [itemdef i_helm_dracula] ID=i_mask_orc NAME=Dracula Helm on=@create COLOR=080a HITPOINTS=100 ON=@EQUIP src.sayua 0845,6,6,0 [ Dracula Helm ] src.sysmessage @0713,1,1 Life Yetengi Sizinle. LINK=<SRC.UID> TIMER=10 RETURN 0 ON=@CLICK MESSAGE @020 [ Dracula Helm ] Message <name> return 1 on=@TIMER IF (<LINK.hits><<LINK.str>) LINK.hits=<LINK.hits>+3 CONT.EFFECT=3,i_fx_sparkle_2,10,20,10 TIMER=5 else TIMER=0 ENDIF RETURN 1 on=@unequip src.sysmessage @0713,1,1 Life Yetengini Yitirdiniz. LINK=04FFFFFFF timer=-1 RETURN 0

5-)Dungeon Sistemi
Ozelligi:Yayınladıklarımın en iyisidir.Sistem sadece 0.56b de çalışır.Stoneyi safeye kurun ve boss alanlarının yerlerine moongate-res gate günde bir çıkan boss ve ek yaratık koyun.Sistem şöyle çalışır.Stoneye tıklayınca dungeona girmek isteyip istemedigini sorar dungeona girmek icin 5 kisilik party kurman gerekir 5 kisilik bir party kurduysan master tıklar ve mastere bir dialog gelir dungeona giricez derse her dediginde partiden bir kisiyi iceri alır.Hepsini alınca 5 bossdan gecerler.Buraya geri atan teleporter vb engeller koyabilirsiniz.5. aşamadaki boss oldugunde gateden partidekileri yana atar ve yanda bi anda yukarda yayınladıgım new mountlardan c_power_blue binegi aktif olur.Bunun icin odul yerine i_power_blue çıkartın ve ayda bir çıksın her ay yenileyin 5. boss oldugunde o spawnı kendi aktif eder.Bu scriptte Gökberk(Slothere) Abiye çok teşekkür ediyorum çok emegi geçti saolsun.Ayrıca bir kaç yerden esinlendigim oldu.Ayrica her levelde belli bir sure olur o sure icerisinde gecemezlerse grubu safeye atar o süre itemlerini go safe yaptım kendi safe koordinatlarınızla degistirin.
Not:Scriptin orjinalini [Genocide] adlı kişiden aldım onada ayrıca teşekkür ederim.
Script:
[ITEMDEF i_dungeon_stone] NAME=Dungeon Stone ID=i_grave_stone TYPE=t_script on=@create color 0812 return 1 ON=@Click message @0845,1,1 [Dungeon Sistemi] message @0481 <serv.servname> return 1 On=@DClick IF ( <DISTANCE> > 2 ) src.sysmessage Yeterince yakin degilsiniz.. RETURN 1 SRC.ACT=<UID> else sdialog d_dungeon return 1 endif [DIALOG d_dungeon] 125,25 nomove page 0,0 resizepic 0 0 9500 525 350 text 215 20 1000 0 text 60 50 1000 1 text 60 80 1000 2 text 60 110 1000 3 text 60 140 1000 4 text 60 170 1000 5 text 60 200 1000 6 text 60 230 1000 7 text 60 260 1000 8 text 210 290 1000 9 button 195 295 2104 2103 1 0 1 [DIALOG d_dungeon TEXT] <serv.servname> Merhaba Sevgili <src.name>, Dungeon sistemine katilman icin 5 kisilik party kurarak yanima gelmelisin.Dungeona giricez diyince her tikladiginde partiden bir kisi giricek. sizi iceri sokucam.5 asamadan geciceksiniz ve son asamada odul kapisi size acilacak.Tame staff almayi unutmayin Her bolumu gecmen icin sure olacak gecemezsen atilacaksin System Coder: DC-Game Dungeon Sistemi 5 kisiyi topladim. [DIALOG d_dungeon BUTTON] On=1 src.partytest [plevel 1] partytest [function partytest] if <isinparty> && <party.member.0> == <src.uid> if <party.members> < 5 sysmessage @1153 En az 5 kisi olmali. return 1 endif for 0 <eval <party.members> -1> try uid.<party.member.<dlocal._for>>.dialog d_partymenu endfor else sysmessage @1153 Bir party masteri olmaniz gerekir. return 1 endif [dialog d_partymenu] 50,50 nomove resizepic 0 0 5170 260 260 dtext 57 10 0250 <serv.servname> dtext 59 41 0 Dungeon'a giricez. dtext 59 71 0 Dungeon'a girmicez. dtext 59 101 0 Kararini ver. button 25 40 56 55 1 0 1 button 25 70 56 55 1 0 2 [dialog d_partymenu text] [dialog d_partymenu button] onbutton 0 src.sysmessage @0481,1,1 Kapattiniz.. onbutton=1 for 0 <eval <party.members> -1> trysrc <party.member.<dlocal._for>> go 5701,305 endfor onbutton=2 src.dialogclose d_partymenu src.sysmessage @0481,1,1 Dungeon'a girmekten vazgectiniz. return 1 endif [chardef c_boss1] defname=c_boss1 name=Power King id=c_liche ICON=i_worldgem_bit RESLEVEL=5 RESDISPDNHUE=33 DAM=4,20 ARMOR=30 RESOURCES=15 i_ribs_raw DESIRES=i_gold,e_notoriety AVERSIONS=t_TRAP,t_eerie_stuff CAN=MT_WALK|MT_USEHANDS|MT_EQUIP|mt_run CATEGORY=New Monsters SUBSECTION=ML DESCRIPTION=Power King ON=@Create serv.allclients sysmessage @0481,,1 Power King tekrar cehennemden dunyaya yollandi. Color=060 NPC=brain_monster FAME={100 3000} KARMA={-5000 -6999} STR={1300 1400} INT={100 200} DEX={300 350} PARRYING=1000 MAGICRESISTANCE=1000 TACTICS=1000 WRESTLING=1300 on=@click MESSAGE <TAG.TEPE> message @07a1 [Level 1] ON=@NpcRestock ITEM=random_potion,{ 2 3 } ITEM=random_potion,{ 2 3 } ITEM=random_scroll,{2 3} ITEM=random_scroll,{2 3} ITEM=i_bilet,{250 300} ITEM=i_bilet,{250 300} ITEM=i_bilet,{250 300} ITEM=i_bilet,{250 300} ITEM=RANDOM_WEAPON_vanq ITEM=RANDOM_WEAPON_force ITEM=RANDOM_WEAPON_force ITEM=RANDOM_WEAPON_power ITEM=RANDOM_WEAPON_might ITEM=random_scroll,{1 3} ITEM=random_scroll,{1 3} ON=@Death serv.allclients sysmessage @0481,,1 Level 1 olan Power King <act.name> ve grubu tarafından öldürüldü.Level 2'ye geçiş kapısı açıldı. src.newitem i_gizligate src.act.p <src.p> src.act.timer 100 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,* buyu 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,* buyu 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,* buyu 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,* buyu 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=Power Bird id=c_harpy ICON=i_worldgem_bit ARMOR=25 DAM=30,50 MOVERATE=40 CAN=MT_WALK|MT_RUN|MT_USEHANDS FOODTYPE=1 t_meat_raw DESIRES=i_gold,e_notoriety,e_horses,c_man,c_woman RESLEVEL=2 RESDISPDNHUE=0ad CATEGORY=New Monsters SUBSECTION=LBR DESCRIPTION=Power Bird ON=@Create Color=0780 NPC=brain_monster FAME=3500 KARMA=-3500 STR={3060 3300} INT={3600 600} DEX={396 415} MAGICRESISTANCE=1200 TACTICS=1300 WRESTLING=1300 ANATOMY=1300 POISONING=1300 on=@click MESSAGE <TAG.TEPE> message @07a1 [Level 2] ON=@NpcRestock ITEM=random_potion,{ 2 3 } ITEM=random_potion,{ 2 3 } ITEM=random_scroll,{2 3} ITEM=random_scroll,{2 3} ITEM=i_bilet,{300 400} ITEM=i_bilet,{300 400} ITEM=RANDOM_WEAPON_power ITEM=RANDOM_WEAPON_vanq ITEM=RANDOM_WEAPON_power ITEM=RANDOM_WEAPON_power ITEM=RANDOM_WEAPON_force ITEM=random_scroll,{1 3} ITEM=random_scroll,{1 3} ON=@Death serv.allclients sysmessage @0481,,1 Level 2 olan Power Bird <act.name> ve grubu tarafından öldürüldü.Level 3'e geçiş kapısı açıldı. src.newitem i_gizligate2 src.act.p <src.p> src.act.timer 150 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,* buyu 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,* buyu 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,* buyu 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,* buyu 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 name=Power Spider id=c_spider_giant ICON=i_worldgem_bit DAM=82,111 ARMOR=45 RESOURCES=15 i_ribs_raw CAN=MT_WALK|MT_USEHANDS|MT_RUN FOODTYPE=1 t_meat_raw DESIRES=i_gold,e_notoriety,e_horses,c_man,c_woman RESLEVEL=2 RESDISPDNHUE=33 CATEGORY=New Monsters SUBSECTION=LBR DESCRIPTION=Orc Brute ON=@Create Color=080 NPC=brain_monster FAME=10000 KARMA=-10000 STR={4767 4945} INT={4600 7000} DEX={666 765} MAGICRESISTANCE={125.0 140.0} TACTICS={90.0 100.0} WRESTLING={90.0 100.0} on=@click MESSAGE <TAG.TEPE> message @07a1 [Level 3] ON=@NpcRestock ITEM=random_potion,{ 2 3 } ITEM=random_potion,{ 2 3 } ITEM=random_scroll,{2 3} ITEM=random_scroll,{2 3} ITEM=i_bilet,{400 500} ITEM=i_bilet,{400 500} ITEM=i_bilet,{400 500} ITEM=RANDOM_WEAPON_vanq ITEM=RANDOM_WEAPON_force ITEM=RANDOM_WEAPON_force ITEM=RANDOM_WEAPON_power ITEM=RANDOM_WEAPON_power ITEM=RANDOM_WEAPON_force ITEM=random_scroll,{1 3} ITEM=random_scroll,{1 3} ON=@Death serv.allclients sysmessage @0481,,1 Level 3 olan Power Spider <act.name> ve grubu tarafından öldürüldü.Level 4'e geçiş kapısı açıldı. src.newitem i_gizligate4 src.act.p <src.p> src.act.timer 150 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,* buyu 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,* buyu 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,* buyu 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,* buyu 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 ON=@Hit IF !(<SRC.FLAGS>&statf_poisoned) SRC.SPELLEFFECT S_POISON,<POISONING>,<UID> endif [chardef c_boss4] defname=c_boss4 id=c_m_balron name=Balron Warrior ICON=i_worldgem_bit ARMOR=80 DAM=47,74 CAN=MT_WALK|MT_RUN|MT_USEHANDS|MT_EQUIP RESOURCES=100 i_feather FOODTYPE=1 t_meat_raw DESIRES=i_gold,e_notoriety,e_horses,c_man,c_woman RESLEVEL=2 RESDISPDNHUE=33 CATEGORY=New Monsters SUBSECTION=LBR DESCRIPTION=Balron Warrior ON=@Create Color=040 NPC=brain_monster FAME=7000 KARMA=-7000 STR={5586 5785} INT={351 450} DEX={577 655} MAGICRESISTANCE=1500 ANATOMY=1200 TACTICS=170.0 WRESTLING=130.0 on=@click MESSAGE <TAG.TEPE> message @07a1 [Level 4] ON=@NpcRestock ITEM=random_potion,{ 2 3 } ITEM=random_potion,{ 2 3 } ITEM=random_scroll,{2 3} ITEM=random_scroll,{2 3} ITEM=i_bilet,{300 500} ITEM=i_bilet,{300 500} ITEM=i_bilet,{300 500} ITEM=i_bilet,{300 500} ITEM=RANDOM_WEAPON_vanq ITEM=RANDOM_WEAPON_vanq ITEM=RANDOM_WEAPON_force ITEM=RANDOM_WEAPON_force ITEM=RANDOM_WEAPON_power ITEM=RANDOM_WEAPON_power ITEM=RANDOM_WEAPON_force ITEM=random_scroll,{1 3} ITEM=random_scroll,{1 3} ON=@Death serv.allclients sysmessage @0481,,1 Level 4 olan Balron Warrior <act.name> ve grubu tarafından öldürüldü.Son level olan 5'e geçiş kapısı açıldı. src.newitem i_gizligate5 src.act.p <src.p> src.act.timer 150 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,* buyu 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,* buyu 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,* buyu 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,* buyu 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_boss5] id=c_troll defname=c_boss5 name=Finish Troll ICON=i_worldgem_bit DAM=9,20 ARMOR=40 RESOURCES=15 i_ribs_raw,12 i_dragon_Derisi CAN=MT_WALK|MT_USEHANDS|mt_run MOVERATE=40 FOODTYPE=40 t_meat_raw DESIRES=i_gold,e_notoriety,e_horses,c_man,c_woman AVERSIONS=e_carnivores3 RESLEVEL=2 RESDISPDNHUE=33 CATEGORY=New Monsters SUBSECTION=LBR DESCRIPTION=Finish Troll ON=@Create Color=0810 NPC=brain_dragon FAME=8000 KARMA=-8000 STR={10011 10040} INT={1001 1040} DEX={1201 1220} MAGICRESISTANCE=120.0 TACTICS={50.0 60.0} WRESTLING={130.0 140.0} MAGERY={110.0 120.0} EVALUATINGINTEL={100.0 110.0} MEDITATION=100.0 ITEMNEWBIE=i_spellbook ADDSPELL=s_explosion ADDSPELL=s_flamestrike on=@click MESSAGE <TAG.TEPE> message @07a1 [Level 5] ON=@NpcRestock ITEM=i_bilet,{30000 30300} ITEM=i_bilet,{30000 30300} ITEM=i_bilet,{30000 30300} ITEM=i_bilet,{30000 30300} ITEM=RANDOM_WEAPON_power ITEM=RANDOM_WEAPON_force ITEM=RANDOM_WEAPON_force ITEM=RANDOM_WEAPON_vanq ITEM=RANDOM_WEAPON_vanq ITEM=RANDOM_WEAPON_power ON=@Death serv.allclients sysmessage @0481,,1 Level 5 olan Finish Troll <act.name> ve grubu tarafından öldürüldü.Büyük ödüle ulaştılar. src.cikartbinek src.newitem i_gizligate6 src.act.p <src.p> src.act.timer 150 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,* buyu 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,* buyu 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,* buyu 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,* buyu 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>==39) || (<argn> == 20) || (<argn> == 28) sayua 0481,2,0,eng,* Etkilenmez * return 1 ENDIF [itemdef i_gizligate] id i_moongate_red name Gizli Kapi type t_telepad on=@create color 0bb4 attr 010 on=@step src.go 5652,1402 newitem i_level2 act.equip on=@dclick return 1 on=@timer remove return 1 [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 dolduğu için alandan atıldınız. cont.go safe 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 dolduğu için alandan atıldınız. cont.go safe 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 dolduğu için alandan atıldınız. cont.go safe 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 dolduğu için alandan atıldınız. cont.go safe remove [itemdef i_gizligate2] id i_moongate_red name Gizli Kapi type t_telepad on=@create color 0bb4 attr 010 on=@step src.go 5483,1438,5 src.findid.i_level2.remove newitem i_level3 act.equip on=@dclick return 1 on=@timer remove return 1 [itemdef i_gizligate6] id i_moongate_red name Gizli Kapi type t_telepad on=@create color 0bb4 attr 010 on=@step src.go 5444,1402 src.findid.i_level5.remove on=@dclick return 1 on=@timer remove return 1 [itemdef i_gizligate4] id i_moongate_red name Gizli Kapi type t_telepad on=@create color 0bb4 attr 010 on=@step src.go 5563,1378 src.findid.i_level3.remove newitem i_level4 act.equip on=@dclick return 1 on=@timer remove return 1 [itemdef i_gizligate5] id i_moongate_red name Gizli Kapi type t_telepad on=@create color 0bb4 attr 010 on=@step src.go 5395,1396 src.findid.i_level4.remove newitem i_level5 act.equip on=@dclick return 1 on=@timer remove return 1 [function cikartbinek] foritems 10000 if ((<baseid>==i_worldgem_bit) && (<more1>==c_power_blue)) dclick timer 1 endif endif endfor

Şimdilik bu kadar arkadaşlar (: Script bölümüne şimdi eklemicem artık yoruldum.

Bu konu HP-Nexiel tarafından düzenlendi(2008-12-01 19:36, 15 yıl önce)

Tymaron

Moderators

21.9001

33 İstanbul , Türkiye
264.58 2035 27

Güzel paylaşım sağol

DC-Game

Members

27 Denizli , Türkiye
0.00 510 0

Önemli degil yazdıgım her seyi u-s ye de koyuyorum =)

HP-Nexiel

Expert

14.3

32 Yalova , Türkiye
267.34 1747 0

Güzel paylaşım tebrik ederim.

Malapagos

Members

-3

16
0.00 557 0

Harika paylasim tesekkürler..

DarkSlayTR

Members

4.8

31 İstanbul , Türkiye
14.90 125 1

eyw saol.

Marlock

Journeyman

5.8

31
242.66 1772 2

Güzel ve Başarılı Scriptler Eline Sağlık

Axons

Journeyman

13.6

30 Girne , Cyprus
170.07 1470 0

Güzel paylaşım.

Sexy1

Journeyman

30 İstanbul Ümraniye , Türkiye
164.70 1484 0

dungeon sistemini beğendim.

MagLor*

Novice

1.5

23 TrabzoN , Türkiye
60.50 588 1

son scripti cok beğendim basarılar

DC-Game

Members

27 Denizli , Türkiye
0.00 510 0

Rica ederim son 2 script zaten burası için ugrastım baya zor bir şey (: Ama şu bayrak questini sadece burda yayınlamıştım.Geçen gün xx sharda aynı sistemi gördüm çift tıkladım şok oldum System Coder : xxx kendi scripterinin adını vermiş böyle insanlar da varmış şaşırıyorum ya =)

Kell

Expert

34.0001

34 İstanbul , Türkiye
201.87 1430 9

DC Game:
Geçen gün xx sharda aynı sistemi gördüm çift tıkladım şok oldum System Coder : xxx kendi scripterinin adını vermiş böyle insanlar da varmış şaşırıyorum ya =)

daha neler görüceksin genç arkadaşım. azminin kırılmadan devamını dilerim.

DC-Game

Members

27 Denizli , Türkiye
0.00 510 0

Eksik olmayın saolun arkadaşlar (:

HP-Nexiel

Expert

14.3

32 Yalova , Türkiye
267.34 1747 0

Dungeon scp'sinde item'ler bulunuyor.
- i_level2
- i_level3
.
.

Bunun yerine sadece bir item verip süre bitince xx yerine yollayabilirsin.
Hepsi aynı görevi yapıyor zaten 1 saat sonra xx alanına atıyor.

+ Dungeon sistemi için nereden esinlendin acaba?
Sıfırdan yazmışsın sanırım.

DC-Game

Members

27 Denizli , Türkiye
0.00 510 0

Hayır 0'dan yazmadım zaten Burak abi sen biliyorsun nerden esinlendigimi (:

Üye Ol veya Giriş Yap

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