Sa arkadaşlar ben bi yeri lootsuz ölümsüz alan yapmak istiyorum bunun bir scripti varmı

Merhaba dostum,altta verdiğim Serpent's Hold'a ait girişlerdir eğer farklı alan yapmak istersen , SRC.GO ile başlayan kısımları değiştirebilirsin

[function olumsuzyap]

serv.allclients sysmessage @38,,1 -->  Ölümsüz alan açılmıştır. <---

serv.allclients sysmessage @07a1,1,1 Safe alanındaki gatenden geçebilirsiniz , bineğiniz orada kalabilir dikkatli olunuz ve bu konu hakkinda page atmayınız!

newitem i_serp_giris1

new.p 4759,1978,29



[itemdef i_serp_giris1]

id=i_moongate_black

defname=i_serp_giris1

type=t_normal



on=@create

color=0810

timer 1800





on=@step

if (<src.hits>)

src.sysmessage @025,,1  Moongateleri sadece cift tikliyarak kullanabilirsiniz.

src.move 1

RETURN 1 

else

src.dialog d_serpgecis

RETURN 1 

endif





on=@dclick



if (<src.findid i_rune_poison>)

src.sysmessage @025,,1  Üzerinizde zehir varken moongate'leri kullanamazsınız.

return 1

elseif (<src.hits> < <src.str>)

src.sysmessage @025,,1  Yaralıyken moongate'leri kullanamazsınız.

return 1

elseif (<distance> > 3)

src.sysmessage @025,,1  Yeterince yakın değilsiniz.

return 1

elseif (<src.findid i_olmesuresi>)

src.sysmessage @025,,1  Gateden geçmek için (<src.findid.i_olmesuresi.timer>) sn beklemelisiniz.

return 1

else

events +fix

src.dialog d_serpgecis

RETURN 1 

endif





on=@click

message @1993 [ Lootsuz ]

message @38,1,1 Serp giriş gatesi [Ölümsüz Alan]

return 1



on=@timer

serv.b @0790 Olumsuz Alana Girisler Kapatilmistir

remove





[DIALOG d_serpgecis]

0,0

nomove

resizepic 250 100 9260 300 240

resizepic 265 115 9300 271 211

resizepic 270 175 9300 260 25////Ayin ın arka planı

resizepic 270 240 9300 70 40////Evet arka plan

resizepic 450 240 9300 80 40////Hayır arka planı

gumppic 360 210 9000

dtext 350 120 0481 Serpent Hold

dtext 325 175 0807 Gitmek İstiyormusun ?

dtext 300 250 0807 Evet

dtext 480 250 0807 Hayır



button 280 252 5402 5401 1 0 1

button 460 252 5402 5401 1 0 2



[DIALOG d_serpgecis button]



Onbutton=0

return 1



Onbutton=1

if (<src.findid i_rune_poison>)

src.sysmessage @025,,1  Üzerinizde zehir varken moongate'leri kullanamazsınız.

return 1

elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)

src.sysmessage @025,,1  Yaralıyken moongate'leri kullanamazsınız.

return 1

endif



IF (<targ.DISTANCE> < 4)

DORAND 4

SRC.GO 3029,3383,15

SRC.GO 3029,3383,15

SRC.GO 3029,3383,15

SRC.GO 3029,3383,15

ENDDO



serv.allclients sysmessage @48,1,1,1 <src.name> ölümsüz alana giriş yapmıştır

src.events +e_serplootsuz

src.events -e_dropfixx

src.FINDID.i_rb_delay2.REMOVE

src.FINDID.i_rb_delay2.REMOVE

src.EVENTS -e_x_breakspell

src.dialogclose d_runebook

ELSE

src.sysmessage @025,,1  Moongateden çok uzaktasınız.

ENDIF

src.fix





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

//////////////Çıkıssssssssssssss



[itemdef i_serp_cikis]

id=i_moongate_black

defname=i_serp_cikis

type=t_normal





on=@create

color=0810





on=@step

if (<src.hits>)

src.sysmessage @025,,1  Moongateleri sadece cift tikliyarak kullanabilirsiniz.

src.move 1

RETURN 1 

else

src.dialog d_serpcikis

RETURN 1 

endif





on=@dclick



if (<src.findid i_rune_poison>)

src.sysmessage @025,,1  Üzerinizde zehir varken moongate'leri kullanamazsınız.

return 1

elseif (<src.hits> < <src.str>)

src.sysmessage @025,,1  Yaralıyken moongate'leri kullanamazsınız.

return 1

elseif (<distance> > 3)

src.sysmessage @025,,1  Yeterince yakın değilsiniz.

return 1

elseif (<src.findid i_olmesuresi>)

src.sysmessage @025,,1  Gateden geçmek için (<src.findid.i_olmesuresi.timer>) sn beklemelisiniz.

return 1

else

events +fix

src.dialog d_serpcikis

RETURN 1 

endif





on=@click

message @1993 Safe Alan

return 1





[DIALOG d_serpcikis]

0,0

nomove

resizepic 250 100 9260 300 240

resizepic 265 115 9300 271 211

resizepic 270 175 9300 260 25////Ayin ın arka planı

resizepic 270 240 9300 70 40////Evet arka plan

resizepic 450 240 9300 80 40////Hayır arka planı

gumppic 360 210 9000

dtext 365 120 0481 Safe Alan

dtext 325 175 0807 Gitmek İstiyormusun ?

dtext 300 250 0807 Evet

dtext 480 250 0807 Hayır



button 280 252 5402 5401 1 0 1

button 460 252 5402 5401 1 0 2



[DIALOG d_serpcikis button]



Onbutton=0

return 1



Onbutton=1

if (<src.findid i_rune_poison>)

src.sysmessage @025,,1  Üzerinizde zehir varken moongate'leri kullanamazsınız.

return 1

elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)

src.sysmessage @025,,1  Yaralıyken moongate'leri kullanamazsınız.

return 1

endif



IF (<targ.DISTANCE> < 4)

SRC.GO safe alan

skill fail

src.

src.events -e_serplootsuz

src.events +e_dropfixx

src.events +e_puannn



src.FINDID.i_rb_delay2.REMOVE

src.FINDID.i_rb_delay2.REMOVE

src.EVENTS -e_x_breakspell

src.dialogclose d_runebook

ELSE

src.sysmessage @025,,1  Moongateden çok uzaktasınız.

ENDIF

src.fix





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

/////Events



[events e_serplootsuz]



On=[url=u-death-9220.html]@death[/url]

hits=<str>

go safe alan

src.fame -=500

findid.i_bleeding.remove

findid.i_rune_poison.remove

events -e_serplootsuz

events +e_safealan

	

	src.newitem i_olmesuresi

	src.act.equip

return 1



on=@spellcast

if (<argn>==45)

src.sysmessage @025,,1  Bu alanı marklıyamazsınız.

f_fizzle

skill fail

return 1

endif



on=@itemdclick

if (<act.baseid> == i_runebook)

src.sysmessage @025,,1  Bunu yapamazsınız.

	return 1

endif







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

//Ölme Suresi



[ITEMDEF i_olmesuresi]

ID=i_memory

TYPE=t_eq_script

NAME=olme suresi



ON=@Create

ATTR=attr_decay|attr_static



ON=@equip

TIMER=15



ON=@Timer

attr attr_decay

CONT.hata Ölümsüz alana geçiş yapabilirsiniz.

REMOVE

return 1

kardeşim yaptım ama sw de kimse olmadıgı için offline oldugu için npc ye kestirmem gerekiyor kendimi npc kesincemi oluyor yoksa playerler birbirini kesince mi oluyor

Kardeşim scriptin uzunluğu seni yanıltmasın arkadaş direk tüm scriptini sana kolaylık olsun diye atmış. Senin burada dikkat edeceğin nokta
On=@death kısmıdır.. Ölümle ilgili tüm kodlar bunun altına sıralanır. Buda demek oluyor ki seni binekte kesse açlıktanda ölsen başka biride kesse hep bu bölümün altına yazacağın kodlarla ilgilidir.

Açıklayıcı olsun diye bir örnek veriyim

On=[url=u-death-9220.html]@death[/url]

Hits <Str>

Go Britain

Return 1

Burada öldüğünde cesedin yere düşmez direk Brite teleport olursun eğer satırın sonuna return 1 koymazsan yada return 0 eklersen cesedin yere düştükten sonra yani ölü olarak brite gidersin.

Bunu mu demek istediniz ? Areadef nedir



Areadef altında verdiğin eventslerden birinede yukarıdaki arkadaşın verdiği kodu yapıştır gitsin.

olmuyor hacılar böyle demi

[function olumsuzyap]
serv.allclients sysmessage @38,,1 --> Ölümsüz alan açılmıştır. <---
serv.allclients sysmessage @07a1,1,1 Safe alanındaki gatenden geçebilirsiniz , bineğiniz orada kalabilir dikkatli olunuz ve bu konu hakkinda page atmayınız!
newitem i_serp_giris1
new.p 1969,2078

[itemdef i_serp_giris1]
id=i_moongate_black
defname=i_serp_giris1
type=t_normal

on=@create
color=0810
timer 1800


on=@step
if (<src.hits&gt
src.sysmessage @025,,1 Moongateleri sadece cift tikliyarak kullanabilirsiniz.
src.move 1
RETURN 1
else
src.dialog d_serpgecis

On=@death
Hits <Str>
Go 1969,2078
Return 1
endif

Hayır sen burada On=@death kısmını moongateye eklemişsin moongate ölen bir varlık olmadığı için olmaması gayet normal ve "If" olmadığı için sonuna "Endif" koyman gereksiz bunun yerine

[Events Olumsuzalan]

On=[url=u-death-9220.html]@death[/url]

If (<IsEvents.OlumsuzAlan>)

Hits <Str>

Go 1969,2078

Events -Olumsuzalan

Return 1

Endif

Bu Events scriptini alana girecek olan oyunculara vericeğiz

[function olumsuzyap]

serv.allclients sysmessage @38,,1 --> Ölümsüz alan açılmıştır. <---

serv.allclients sysmessage @07a1,1,1 Safe alanındaki gatenden geçebilirsiniz , bineğiniz orada kalabilir dikkatli olunuz ve bu konu hakkinda page atmayınız!

newitem i_serp_giris1

new.p 1969,2078



[itemdef i_serp_giris1]

id=i_moongate_black

defname=i_serp_giris1

type=t_normal



on=@create

color=0810

timer 1800





on=@step

if (<src.hits> < <src.str>) // Buraya hitsin neyden düşük olunca bu mesajı vereceğini belirtmemişsin onu ayarladım. Açıklaması Yani "EĞER HİTSİM(CANIM), STRMDEN(CANIN EN FAZLA OLABİLECEĞİ DEĞERDEN) DÜŞÜKSE AŞAĞIDAKİ KOMUTLAR UYGULANSIN" 

src.sysmessage @025,,1 Moongateleri sadece cift tikliyarak kullanabilirsiniz.

src.move 1

ELSE // YANİ YUKARIDA "IF"de BELİRTMİŞ OLDUĞUN KOŞULLAR SAĞLANMIŞ İSE NE YAPMASINI İSTEDİĞİN ŞEYLERİ BUNUN ALTINA YAZIYORSUN

src.dialog d_serpgecis

SRC.EVENTS +OlumsuzAlan

RETURN 1 // STEP KOMUTUNU KAPATIYORUZ BURADA

ENDIF //  BURADA "IF" SORGUSU KULLANDIĞIN İÇİN SORGUYU KAPATIYORSUN

[AREADEF A_IMMORTAL]

P=......................  // .go Immortal yaptıgın zaman seni yönlendireceği koordinat.

RECT=....,....,....,....  // Yaptıgın arenanın sol,sağ alt ve üst kısımlarınını koordinatları.Yukarda paylaştıgım linke bak.

FLAGS=..................  // Arealara verilen flagslar,yine yukarıdaki linkte terimler ve anlamları mevcut.

NAME=...................  // Tanımlanan Areadef adı

EVENTS=r_noimmortal       // Tanımlanan mapin içine girildiğinde playerın alacağı events.

GROUP=ALLMAP

Boyle bir alanaı sphere map içinde spheremap0.scp klasorune ekleyebilirsin. Eventse gelecek olursak ;

[EVENTS E_NOIMMORTAL]

ON=[url=u-death-9220.html]@death[/url]

SRC.HITS <STR>

SRC.GO BRITAIN