[Defname moongate_version_6]

moonkord britain,moonglow,minoc_vesper,trinsic,skara_brae,delucia,yew,jhelom,magincia



[Itemdef i_moongate_v6]

Defname=i_moongate

Id=i_moongate_blue

Name=Moongate

Type=t_normal



On=@Create

Attr=attr_static



On=@Dclick

if (<distance> < 4)

src.sdialog d_moongate_v6

else

src.sysmessage @0489,,1 Moongate'e yetişemiyorsunuz.

endif

return 1



On=@Step

src.move 1

Dclick



[Dialog d_moongate_v6]

50,50

nomove

resizepic 0 0 5120 200 <eval <eval <f_moonsep 0,<def.moonkord>> * 20> + 70>

resizepic 10 10 3000 180 <eval <eval <f_moonsep 0,<def.moonkord>> * 20> + 50>

dhtmlgump 70 20 200 20 0 0 <def.bfont_blue> Şehirler



For 1 <f_moonsep 0,<def.moonkord>>

Dtext 48 <EVAL (<DLOCAL._FOR>*20)+30> 15 <strreverse <strsub 9 30 <strreverse <serv.area.a_<f_moonsep <DLOCAL._FOR>,<def.moonkord>>_moongate_1.name>>>>

Button 25 <EVAL (<DLOCAL._FOR>*20)+30> 210 211 1 0 <DLOCAL._FOR>

Endfor



[Dialog d_moongate_v6 BUTTON]

ON=1 90

src.kontrol go <serv.area.a_<f_moonsep <DARGN>,<DEF.MOONKORD>>_moongate_1.p>



[Function kontrol]

if (<flags>&statf_poisoned) || (<hits> < <str>)

sysmessage @026,,1 Üzerinizde zehir varken veya yaralıyken kullanamazsınız.

elif (<distance> > 3) || (<targ.distance> > 3)

sysmessage @026,,1 Moongateye çok uzaktasınız.

else

<args>

endif



[function f_moonsep]

if <argv[0]> == 0

return <eval <argv> - 1>

else

return <argv[<argv[0]>]>

endif

[EOF]

Not: Türkçe karakter içeren bir script olduğu için; UTF-8 olarak kaydedilmesi gerekmektedir.

Şimdi bazı arkadaşlar soracak, v6 ne diye, açıklayayım.

Bu güne kadar bir çok moongate yaptım, eskiler bilir. Her versionda moongate dahada gelişti. Tamam kullanım açısından çoğu şey aynı fakat, kurulum açısından en kolay seviyeye getirmek için uğraşıyorum ve sanırım en düşük seviyeye getirdim artık.

Kullanımını anlatayım;
[Defname moongate_version_6]
moonkord britain,moonglow,minoc_vesper,trinsic,skara_brae,delucia,yew,jhelom,magincia

Burda gördüğünüz üzere belli moonkord'lar var, bu moonkord (moongate koordinatları) kelimesinin kısaltmasıdır.

Peki nedir bu moongateler?
Sphere/scripts/maps/sphere_map0.scp dosyası içerisindeki;

[AREADEF a_trinsic_moongate_1]

EVENTS=r_default,r_default_rock,r_default_water,r_default_tree,r_default_grass

NAME=Trinsic Moongate

GROUP=Moongates

FLAGS=0100

P=1828,2948,-20,0

RECT=1825,2945,1832,2952,0

kodundaki [AREADEF a_trinsic_moongate_1] turuncu kısımdır.

Buda şu demek oluyor a_şehir_moongate_1 olarak tanımlanmış her area bu kodlama içerisinde kullanılabilir.

Peki nasıl arttırırım?
moonkord britain,moonglow,minoc_vesper,trinsic,skara_brae,delucia,yew,jhelom,magincia

bu bizim orjinal kodumuz. Arttırmak için ise sona virgül(,) koyup şehiri yazıyoruz. Örneğin;

Bu benim kendi oluşturduğum bir kordinat;

[AREADEF a_cove_moongate_1]

EVENTS=r_default,r_default_rock,r_default_water,r_default_tree,r_default_grass

NAME=Cove Moongate

GROUP=Moongates

FLAGS=0100

P=2325,1177,5

RECT=2325,1177,2327,1178,0

sonrasında;

moonkord britain,moonglow,minoc_vesper,trinsic,skara_brae,delucia,yew,jhelom,magincia,cove
olarak değiştim.

Başka hiç bir şey yapmama gerek yok. Kod dialog düzenini otomatik olarak yapacaktır. Size ise sadece kullanmak kalıyor.

Dikkat! Eğer Delucia moongate'i bulunamıyorsa

[AREADEF a_delucia_moongate_1]

EVENTS=r_default,r_default_rock,r_default_water,r_default_tree,r_default_grass

NAME=Delucia Moongate

GROUP=Moongates

FLAGS=0100

P=5382,4008,2

RECT=5378,4005,5386,4010,0

kodunu ekleyiniz.

def'e kordinatı yazıp serv.map ile region name çekersen daha pratik ve basit olur sanki

Alcholic :
def'e kordinatı yazıp serv.map ile region name çekersen daha pratik ve basit olur sanki

Olabilirde, 2 seneden sonra paslandık biraz artık

Alcholic'in dediğiyle birlikte zaten sphere'in kendi array sistemi varken ekstra komut kullanma gereği neden duyulduğunu anlamadım. En sade halini istiyorsan bu ikisine dikkat etmen gerek.

Moongate isimli server açıldı sandım topice girerken.

) Serverleri için yazmayı unutmuşum )

@chr
56b kullanmama rağmen array kullanamıyorum, nedenini bilmiyorum Can't resolve hatası alıyorum.

chr :
Alcholic'in dediğiyle birlikte zaten sphere'in kendi array sistemi varken ekstra komut kullanma gereği neden duyulduğunu anlamadım. En sade halini istiyorsan bu ikisine dikkat etmen gerek.

Array diyince sen biraz araştırdım, array ve f_array komutları sphere'ye sonradan eklenmiş komutlar sanırım. Yada benim sphere'mde ekli değil.


@berk97

[AREADEF a_safe_moongate_1]

EVENTS=r_default,r_default_rock,r_default_water,r_default_tree,r_default_grass

NAME=Safe Alanı

GROUP=Moongates

FLAGS=0100

P=0000,0000,0 //koordinatlar .where yazıp öğrenebilirsin

RECT=2325,1177,2327,1178,0

Yukarıdaki gibi alan adı oluşturup, moonkard'a eklerseniz olacaktır.

Onlarda fonksiyon zaten. args ve dargs kullanıcaksın sadece.

[defname asda]

chr 1,2,3,4,5



[function _asda]

args <def.chr>

for a <dargv>

sysmessage <argv[<dlocal.a>]>

endfor

array kodu bu:

[FUNCTION array]

local.temp = <argv[<eval <argv> - 1>]> -1

return <argv[<dlocal.temp>]>

bunu nasıl kullanırsın mesela:

[defname test]

test 1,2,3

diye bir defname olur bunu,

say <array <def.test>,1>

ile 1 sayısını gösterirsin.

Kafasız mısın arkadaşım ? Şu yazdığın yazının 5 santim yukarısında komut olmadan nasıl kullanabileceğini göstermişim, niye inatla komut kullanmakta diretiyorsun ?

//theraskol
uyarı +1