Frasier Mesaj tarihi: Şubat 20, 2006 Mesaj tarihi: Şubat 20, 2006 [itemdef i_deed_bosanma] id i_deed name bosanma belgesi type t_eq_s.cript value 100000 on=@create color 0455 attr 04 on=@click message @54,,1 bosanma belgesi return 1 on=@dclick if ( == ) if !() dialog d_bosancanmi else src.sysmessage @38,1,1 evli degilsiniz. endif else src.sysmessage @38,1,1 bunu kullanabilmek icin cantaniza olmasi gerekir.. endif return 1 [dialog d_bosancanmi] 0,0 nomove resizepic 60 110 5120 300 250 resizepic 70 120 3000 280 230 text 100 170 0 0 text 100 190 0 1 button 120 280 4005 4006 1 0 1 button 200 280 4017 4018 1 0 2 [dialog d_bosancanmi text] bosanmayi son kez kabul ediyormusunuz ? [dialog d_bosancanmi button] on=1 try uid..tag.esinismi try uid..tag.esinuidi try uid..name .tag.ismimbu> try uid..tag.soyadi try uid..tag.soyadim try uid..yuzuksil try uid..tag.yuzukuid src.yuzuksil src.tag.esinismi src.tag.esinuidi src.tag.yuzukuid src.name src.tag.soyadi src.tag.soyadim src.sysmessage @69,1,1 esinizden bosandiniz. remove on=2 src.sysmessage @38,1,1 vazgectiniz. return 1 [function yuzuksil] try uid..remove [itemdef i_deed_evlilik] id i_deed type t_eq_s.cript name evlilik belgesi value 350000 on=@create color 07d1 attr 04 on=@click message @091,,1 evlilik belgesi return 1 on=@dclick if ( == ) if () src.sysmessage @38,1,1 zaten bir aileye uye veya evlisiniz. else target @69,1,1 evlenme teklifi edeceginiz kisiyi seciniz. src.tag.evlilikuid endif else src.sysmessage @38,1,1 bunu kullanabilmek icin cantaniza olmasi gerekir.. endif return 1 on=@targon_self src.sysmessage @38,1,1 kendinizi secemezsiniz. return 1 on=@targon_char if (strmatch('','') src.sysmessage @38,1,1 kendi cinsiyetinizdeki kisi ile evlenemezsiniz. return 1 endif if () src.sysmessage @38,1,1 bu kisi zaten evli veya bir aileye kayitli. return 1 endif if () src.sysmessage @38,1,1 sadece oyunculari secebilirsiniz. return 1 endif if ( > 1) src.sysmessage @38,1,1 staff uyelerini secemezsiniz. return 1 endif link link.tag.ismimbu src.tag.esinismi link.tag.esinismi serv.newitem i_benimleevlenirmisin new.cont var.soyadi_uid new.timer 1 src.tag.esinuidi link.tag.esinuidi src.tag.ismimbu return 1 [itemdef i_benimleevlenirmisin] name benimle evlenirmisin? weight 0 id i_gold type t_eq_s.cript layer layer_special on=@unequip try src.dialog d_benimleevlenirmisin return 1 on=@timer remove return 1 [dialog d_benimleevlenirmisin] 0,0 nomove resizepic 60 110 5120 300 250 resizepic 70 120 3000 280 230 text 100 170 0 0 text 100 190 0 1 button 120 280 4005 4006 1 0 1 button 200 280 4017 4018 1 0 2 [dialog d_benimleevlenirmisin text] , size evlenme teklifi ediyor, kabul ediyor musunuz? [dialog d_benimleevlenirmisin button] on=1 serv.newitem i_evlenirim new.cont new.timer 1 return 1 on=2 src.sysmessage @38,1,1 isimli kisinin evlenme teklifini reddettiniz. return 1 [itemdef i_evlenirim] name evlenirim weight 0 id i_gold type t_eq_s.cript layer layer_special on=@unequip try src.dialog d_soyadisecme return 1 on=@timer remove return 1 [dialog d_soyadisecme] 0,0 nomove resizepic 60 110 5120 250 200 resizepic 70 120 3000 230 180 resizepic 100 180 3000 170 20 text 100 150 0 0 textentry 105 180 160 16 0 1 1 button 120 230 4005 4006 1 0 1 button 200 230 4017 4018 1 0 2 [dialog d_soyadisecme text] soyisminiz ne olsun ? [dialog d_soyadisecme button] on=1 if () if (strlen(>) > 16) src.sysmessage @1100,,1 soyadinizin uzunlugu 16 harften uzun olamaz. // so isim uzunluğunu buradan ayarlarsın şeko. else src.name > src.tag.soyadi=1 src.tag.soyadim > serv.newitem i_evlilik_yuzugu new.name new.equip src.tag.yuzukuid new.link serv.newitem i_evlilik_yuzugu new.name .tag.esinismi> new.cont new.link new.cont.tag.soyadim new.cont.tag.soyadi 1 new.cont.name .name> > new.cont.tag.yuzukuid serv.allclients sysmessage @69,1,1 , ile dunya evine girdi. try uid..remove src.tag.evlilikuid endif else src.sysmessage @38,1,1 evlilik belgeniz yaninizda olmali.. endif [itemdef i_evlilik_yuzugu] id i_ring_gold name evlilik yuzugu. type t_jewelry on=@create attr 04 on=@click message @090,,1 return 1 devamı diğer mesajda..
Frasier Mesaj tarihi: Şubat 20, 2006 Konuyu açan Mesaj tarihi: Şubat 20, 2006 // aile kurma sistemi [itemdef i_soyadi_kolye_katilimci] id=i_necklace_gold type=t_jewelry name=aile uyesi on=@create color=07c5 attr=04 on=@dclick return 1 [itemdef i_soyadi_kolye] id=i_necklace_gold type=t_jewelry name=aile reisi on=@create color=07c5 attr=04 on=@dclick src.sysmessage @69,1,1 .ailedenat komutunu kullanarak istediginiz kisiyi aileden atabilirsiniz. target @049,,1 kimi aileye dahil etmek istiyorsunuz? return 1 on=@targon_char src.targ.tag.ismimbu // aileden atmak icin. src.targ.tag.ailename if src.sysmessage @38,1,1 bu fonksiyon sadece oyuncular icin gecerlidir. return 1 elseif (== src.sysmessage @38,1,1 kendinizi secemezsiniz. return 1 elseif (==1) src.sysmessage @38,1,1 bu kisi zaten evli veya bir aileye kayitli. return 1 elseif () src.sysmessage @38,1,1 sadece oyunculari secebilirsiniz. return 1 elseif ( > 1) src.sysmessage @38,1,1 staff uyelerini secemezsiniz. return 1 else src.sysmessage @69,1,1 isimli kisiyi ailenize davet ettiniz. src.newitem i_soysor_equip src.act.cont var.soyadi_uid src.act.timer 1 return 1 endif [itemdef i_soysor_equip] name aileye katil weight 0 id i_gold type t_eq_s.cript layer layer_special on=@unequip try src.dialog d_katilcanmi return 1 on=@timer remove return 1 [dialog d_katilcanmi] 0,0 nomove resizepic 60 110 5120 300 250 resizepic 70 120 3000 280 230 text 100 170 0 0 text 100 190 0 1 text 100 210 0 2 button 120 280 4005 4006 1 0 1 button 200 280 4017 4018 1 0 2 [dialog d_katilcanmi text] isimli aileye davet edildiniz. 50k karsiliginda katilmak istiyormusunuz? [dialog d_katilcanmi button] on=1 if ( src.consume i_gold 50000 src.name src.tag.soyadi 1 src.newitem i_katilimci_benim src.act.equip src.act.timer 1 src.sysmessage @049,,1 basariyla isimli aileye katildiniz. return 1 else src.sysmessage @38,1,1 cantanizda 50000gp bulunmuyor. return 1 endif on=2 src.sysmessage @38,1,1 isimli aileye girisinizi reddettiniz. return 1 [function katilimsor] src.newitem i_katilimci_benim src.act.cont var.soyadi_uid src.act.equip src.act.timer 1 [itemdef i_katilimci_benim] name katilacagim. weight 0 id i_gold type t_eq_s.cript layer layer_special on=@unequip try src.katilimci return 1 on=@timer remove return 1 [itemdef i_soyadim] id=i_deed type=t_s.cript name=aile belgesi value=180000 on=@create color=0792 attr=04 on=@click on=@dclick if ( != ) src.sysmessage @38,1,1 bu esyayi kullanmak icin cantanizda olmasi gerekiyor.. return 1 endif if ( != 1) dialog d_soyver return 1 else src.sysmessage @38,1,1 zaten soyadiniz var. return 1 endif [dialog d_soyver] 0,0 nomove resizepic 60 110 5120 250 200 resizepic 70 120 3000 230 180 resizepic 100 180 3000 170 20 text 100 150 0 0 textentry 105 180 160 16 0 1 1 button 120 230 4005 4006 1 0 1 button 200 230 4017 4018 1 0 2 [dialog d_soyver text] soyisminiz ne olsun ? [dialog d_soyver button] on=1 if (strlen(>) > 16) src.sysmessage @1100,,1 soyadinizin uzunlugu 16 harften uzun olamaz. return 1 else src.name > src.tag.soyadi=1 src.tag.ailename > src.burdanal remove endif [function burdanal] src.newitem i_soysor_equip_hebele src.act.cont var.soyadi_uid src.act.equip src.act.timer 1 [itemdef i_soysor_equip_hebele] name isım ver.. weight 0 id i_gold type t_eq_s.cript layer layer_special on=@create timer=1 on=@unequip try src.hebele return 1 on=@timer remove return 1 [function hebele] src.sysmessage @69,1,1 suandan itibaren isimli ailenin reisi'siniz. src.sysmessage @69,1,1 kolyeniz boynunuzda belirecektir. src.newitem i_soyadi_kolye src.act.attr 04 src.act.name [reis] src.act.equip src.tag.kolyeuid serv.b @69,,1 ailesi kurulmustur. kendilerine basarilar diliyoruz. [function katilimci] src.sysmessage @69,1,1 isimli aileye katildiniz. src.sysmessage @69,1,1 kolyeniz boynunuzda belirecektir. src.newitem i_soyadi_kolye_katilimci src.act.attr 04 src.act.name [uye] src.act.equip tag.kolyeuid [function soybak] src.sysmessage @69,1,1 [dialog d_eminmisin] 0,0 nomove noclose resizepic 60 110 5120 300 250 resizepic 70 120 3000 280 230 text 100 170 0 0 text 100 190 0 1 text 100 210 0 2 button 120 280 4005 4006 1 0 1 button 200 280 4017 4018 1 0 2 [dialog d_eminmisin text] isimli kisiyi ailenizden atmayi istiyormusunuz? bu islemin geri donusumu yoktur. [dialog d_eminmisin button] on=1 tag.ailename name try uid..remove tag.soyadi src.sysmessage @049,,1 isimli kisi ailenizden atilmistir. sysmessage @38,1,1 tarafindan ailenizden atildiniz. return 1 [function ailedenat] if () serv.newitem i_ailedenat new.target @049,,1 ailenizden atmak istediginiz kisiyi secin. new.timer 15 return 1 else src.sysmessage @38,1,1 kolyeniz yaninizda olmadigindan bunu yapamazsiniz. endif [itemdef i_ailedenat] name=aileden at! id=i_memory type=t_eq_s.cript layer layer_special weight 0 on=@targon_char if () if (strmatch('','') src.sysmessage @38,1,1 isimli sahsi ailenizden atmak istediginize emin misiniz? src.targ.dialog d_eminmisin else src.sysmessage @38,1,1 bu kisi sizin ailenizden degil. endif else src.sysmessage @38,1,1 kolyeniz yaninizda olmadigindan bunu yapamazsiniz. endif return 1 on=@targon_item return 1 on=@targon_ground return 1 on=@timer remove [function ailedencik] src.tag.ailename src.name try uid..remove src.tag.soyadi src.sysmessage @69,1,1 ailenizden ayrildiniz. [eof] bu sistemle aileye alabiliyorum ama, aileye aldığım kişiye sadece kolye veriyor. o aileye kayıtlı oldugunu söylüyor. ben aileye aldığım kininde benim soyadımı direk almasını istiyorum. beni msoyadım mesela paticik. aileye bir kişiyi aldım ve aldığım kişininde otomatik olarak soyadı paticik olması gerekiyor. bunu nasıl yapabiliriz. ekleyeceğimiz kodu nereye ekleyeceğimizde söylerseniz sevinirim.
Ractamainus Mesaj tarihi: Şubat 20, 2006 Mesaj tarihi: Şubat 20, 2006 [dialog d_katilcanmi button] on=1 if ( src.consume i_gold 50000 src.name ... kodu baştan aşağıya incelemedim ama burada zaten soyadı otomatik olarak veriliyor. yani eğer vermiyorsa kodda bir problem var demektir...
Frasier Mesaj tarihi: Şubat 20, 2006 Konuyu açan Mesaj tarihi: Şubat 20, 2006 kodda sorun var sanırım. vermiyor. peki şöyle bir sistem yapmak mümkünmü ve nasıl yapılır örnek olarak verirmisiniz? bir stone olacak bu stone guild stonede olur ama değişik bir sotune olursa aile sistemi olduğu anlaşılır olur. örnek : ben gidip vendordan aile sistemi stonesini satın alacağım. satacan olan vendor ise provisionerr lar. deed'i aldım evimin önüne gittim ve çift tıklayarak buraya sabitledim onu. taşa iki kere tıklıyacağım. bana menü açacak. *aile ismi ekle *aileye al *aileden at *aile ismini değiştir. bu menude ilk açtığımda ben aile ismini belirtmeden diğer seçenekleri kullanamayacağım. aile ismini belirttim ve sıra geldi aileye adam almaya. diyelimki oyunda şöyle bir isimde player var. bilmemne bilmemne paticiks.cript. ben bu isimdeki şahısı aileme alacağım ama benim aile ismimde paticikailesi. bunu aileme aldığımda bunun isminin sonuna birdaha benim aile ismimi ekliyecek yani soyadı. ama bu olursa çok uzun olacak isimler. istediğimiz kadar ekleriz sonucunda. şöyle olması mümkün mü? ben aileye aldığım kişilerin varsa soyisimleri otomatik silinecek ve benim aile soy adım eklenecek soyismine. bunuda halettik diyelim. aileden atma seçeneği. aileden at dediğimde ailede olan kişilerin menüsünü açacak bana. atacağım kişiyi seçeceğim ve o kişi atılacak. aileden atma işinide sadece aile reisi yapabilecek. aile ismi değiştir menüsü ise şöyle olacak. aile ismi değiştir diyeceğim. benim karşıma bir menü açılacak. yeni aile ismini yazacağım ok dediğimde benim ve diğer ailede olan tüm playerların aile soyadları otomatik değişecek. oyunda olanında olmayanında. bunu yapmak için neler yapmam gerekli. örnekler verirseniz bu sistemi yapmak istiyorum.
Öne çıkan mesajlar