Soyadı Deed

Silindi

Scripts bölümünden buldum ama sorunu varmış yani sizin aldığınız soyadı başkası da alıyormuş.Bu sorunu nasıl düzeltiriz??

[itemdef i_deed_soyadi]
defname i_deed_soyadi
id i_deed
name Soyadi Deed

on=@create
attr attr_newbie
color 080a

on=@click
message @48,,1 [<serv.servname>]
message @48,,1 [<name>]
return 1

on=@dclick
if (<src.tag0.birkeretikladim> == 0)
sdialog d_soyadi
src.tag0.birkeretikladim=1
else
src.sysmessage @48,,1 Bir Kere Tikladiniz...
endif
return 1

[DIALOG d_soyadi]
3, 3
PAGE 0
nomove
noclose
resizepic 0 0 3500 305 240
text 22 23 1152 0
textentry 25 100 160 16 1152 1 1
button 207 188 243 241 1 0 1
button 33 185 249 248 1 1 2

[DIALOG d_soyadi TEXT]
<serv.servname> Soyadi Menu
Soyadi Buraya

[DIALOG d_soyadi BUTTON]
on=1
src.sysmessage @48,,1 Soyadini deed'i sadece birkere kullanabilirsin dikkatli ol
src.dialog d_soyadi

on=2
if (strmatch('<argtxt[1]>','')
src.sysmessage @025,1,1 Lutfen Bir Soy Ad Giriniz.
src.dialog d_soyadi
return 1
endif

for 0 <eval strlen(<argtxt[1]>) -1>
if !strmatch('[a-z]','<strsub <eval <local._for>> 1 <argtxt[1]>>')
src.sysmessage @025,1,1 Hatali Soyadi Girdiniz : "<argtxt[1]>"
src.sdialog d_soyadi
return 1
endif
endfor

if ((strlen(<argtxt[1]>) > 12) || ((strlen(<argtxt[1]>) < 4)
src.dialog d_soyadi
src.sysmessage @025,1,1 Soy Isminiz az 4, en fazla 12 karakter olmalidir.
else
src.name <src.name> <argtxt[1]>
return 1
endif

Aldarson

Apprentice

4.3

28
113.49 895 0

bu scripti ben eskiden yazmıştım bunu kullanmamanı öneririm biraz daha araştırırsan daha iyi sistemleri bulabilirsin.

Duc

Members

34
5.19 52 0

Var kullanılarak kullanılan soyismin değerini bir arttırabilirsin.Local daha sağlıklı olur aslında.Bunu bir fonksiyon altında toplarsın sonra ifle fonkisyonu sorgularsın.Gibi.

Silindi

Members

5.19

Aldarson : bu scripti ben eskiden yazmıştım bunu kullanmamanı öneririm biraz daha araştırırsan daha iyi sistemleri bulabilirsin.

Siteye baya scp eklenmeli daha yani.

Mac-Fusion

Members

38 C:\Sphere\ , ---
18.50 171 0

Kurulan ailelere ait soyisimler, "var" ile belirlemen gerekli. Local kullanıldığı yerin sonunda biter ve kayıt tutmaz. Bu yüzden burada kullanılamaz.
Slothere ın yazdığı sıralama fonksiyonundan esinlenerek, var.aile_<for> bütünü yaratmalısın. Örneklemek gerekirse;

var.aile_01 Selam
var.aile_02 Undead
var.aile_03 XXX

Daha sonra dan kurulacak aile, zaten kurulu olan ailelerin toplam sayısı kadar for döndürerek, varmı yokmu diye sorgulatılır. Yok ise var.aile_04 olarak kayıt ettirilir.

Alternatif olarak mysql kullanabilirsin. Fakat bu kadar basit işlemler için mysql önermiyorum. (görüştür)

Saygılar

Duc

Members

34
5.19 52 0

Ben kayıt tutarken local kullan demedim zaten.Soyisim kontrolü fonksiyonu yapıp localle devam edebilrsin demek istedim.

[Alcholic]

Members

54 Antalya , Türkiye
24.50 233 0

[function check_name]
for accounts 0 (<serv.accounts>-1)
  for chars 0 (<serv.account.<dlocal.accounts>.chars>-1)
     if !strcmpi(<streat <serv.account.<dlocal.accounts>.char.<dlocal.chars>.name>>,<args>)
          sysmessage Bu soyismi daha önceden alınmış.
          return 1
     endif
  endfor
endfor

böyle birşeyler yapılabilir.

Abadan

Members

0.8

Şişli , Türkiye
9.19 78 0

Bunu kullanabilirsin bi problem çıkıcağını sanmıyorum

[itemdef i_Deed_aile]
id i_Deed
type t_eq_script
name Aile kurumu
value 475000

on=@create
color 0455

on=@dclick
sdialog d_aile 
return 1

On=@click
message @38,,1 [Aile Deed]
return 1

[dialog d_aile]
150,150
nomove 
noclose
page 0
resizepic 0 0 5120 240 220
resizepic 10 10 3000 220 200

dhtmlgump 40 20 150 25 1 0 <def.bfont_lred><def.center>Aile Kurulumu
dhtmlgump 30 60 150 23 0 0 <def.bfont_lred> Aile ismi:


resizepic 25 80 3000 150 25
dtextentry 25 80 140 20 0 0 Aile
button 30 150 0a50 0a51 1 0 1
dhtmlgump 55 155 80 23 0 0 <def.bfont_black> Aileyi Kur
button 130 150 0a54 0a55 1 0 2
dhtmlgump  155 155 80 23 0 0 <def.bfont_black> Vazgec

[dialog d_aile button]
on=1
if (<badchar <argtxt[0]>>)
src.sysmessage @38,1,1 Lutfen aile isimlerine sadece harf koyunuz.
return 1
endif
if (<src.findid.i_aile_kolye>) || (<src.findid.i_aile>)
src.sysmessage @38,1,1 Zaten baska bir ailenin ferdisiniz.
return 1
endif
tag.aile=<argtxt[0]>
for 15
if (strmatch('<strsub <eval <local._for>> 1 <tag.aile>>',' '))
src.sysmessage @38,1,1 Aile isimlerinde bosluk olamaz
return 1
endif

if (<isnum <strsub <eval <local._for>> 1 <tag.aile>>>)
src.sysmessage @38,1,1 Aile isimlerinde numaralandirma olmaz.
return 1
endfor
endif


if (<isnum <argtxt[0]>>)
src.sysmessage @38,1,1 Pardon ?
return 1
endif

if (strlen(<argtxt[0]>) > 19)
src.sysmessage @38,1,1 Aile ismi 20 karakterden uzun olamaz.
return 1
endif


serv.newitem i_aile_kolye
//src.tag.eskiname=<src.name>
//tag.soyad=<argtxt[0]>
new.name=<argtxt[0]>
src.tag.name.suffix=" <argtxt[0]>"
new.bounce <src>
new.link <src.uid>
obj=<new.uid>
serv.newitem i_aile
src.new.bounce <src>
src.new.equip
new.cont <src.uid>
src.new.link <obj.uid>
serv.allclients sysmessage @38,1,1 <argtxt[0]> Ailesi kurulmustur. Basarilar dileriz.
remove
on=2
src.dialogclose	d_aile

[itemdef i_aile_kolye]
id i_necklace_gold
name Aile kolyesi


on=@create
for 20
tag.fert<dlocal._for>=0
endfor
tag0.uyes=0
color 0480
attr=04

on=@click
message @55,6,1 [<name>]
message @38,1,1 Aile kolyesi
return 1


on=@dclick
if (<link> != <src.uid>)
src.sysmessage @38,1,1 Bu sizin ailenizin kolyesi degil.
return 1
endif
dialog d_aile_bilgi
return 1

on=@targon_self
src.sysmessage @38,1,1 Kendi kendini ailene alamazsin.
return 1

on=@Targon_char
if (<src.targ.isplayer>)
for 1 20
if (<src.targ.findid.i_aile.link.tag0.fert<dlocal._for>>==<src.targ.uid>) || (<src.targ.findid.i_aile_kolye>)
src.sysmessage @38,1,1 Bu kisi herhangi bir ailenin reisi yada uyesi.
return 1
endif
serv.newitem i_aileekle
new.link <uid>
new.cont <src.targ.uid>
trysrc <src.targ.uid> new.dialog d_aile_ekle
return 1

on=@timer
return 1

[dialog d_aile_bilgi]
150,150
//nomove 
page 0
resizepic 0 0 5120 270 240
resizepic 10 10 3000 250 220
dhtmlgump  40 20 200 23 1 0 <def.center><def.bfont_lred> <name> Ailesi Bilgi
button 15 120 2714 2715 1 0 1
dhtmlgump 40 110 100 25 1 0 Yeni fert ekle.
dhtmlgump 40 50 150 25 1 0 <def.bfont_lred> Aile reisi : <def.bfont_black><link.name>
dhtmlgump 40 80 150 25 1 0 <def.bfont_lred> Uye sayisi : <def.bfont_black><dtag0.uyes>
button 15 145 2714 2715 1 0 2
dhtmlgump 40 140 100 25 1 0 Uye kov/Uye listesi
button 15 175 2714 2715 1 0 3
dhtmlgump 40 170 100 25 1 0 Aileyi yik
endif

[function ailedeed]
var.ailekur <args>

[dialog d_aile_bilgi button]
on=1
target @38,1,1 Aileye uye ediceginiz kisiyi seciniz.
return 1
on=2
if !(<tag0.uyes>)
src.sysmessage @38,1,1 Uyeniz yok.
return 1
endif
tag.client=1
dialog d_aile_kov

on=3
for x 0 20
if (<tag.fert<dlocal.x>>
try uid.<tag.fert<dlocal.x>>.notice <name> adli aile yikilmiştir.
try uid.<tag.fert<dlocal.x>>.tag.name.suffix=
try uid.<tag.fert<dlocal.x>>.findid.i_aile.remove
try uid.<tag.fert<dlocal.x>>.findid.i_aile.remove
try uid.<tag.fert<dlocal.x>>.notice <name> adli aileden kovuldun.
endif
endfor
if <var0.ailekur>==1
serv.newitem i_deed_aile
src.new.bounce
endif
src.findid.i_aile.remove
src.tag.name.suffix=
src.sysmessage @03c1,6,1 Aileniz yikildiği gibi butun uyelerinizin soyadlari eski halini almiştir.
remove
return 1

[dialog d_aile_kov]
150,150
//nomove 
page 0
resizepic 0 0 5120 340 220
resizepic 10 10 3000 320 200
page 1
if (<link>=<src.uid>)
button 30 105 2714 2715 1 0 <dtag.client>
dtext 50 105 1152 Bu oyuncuyu aileden at
endif
dtext 15 15 1152 <dtag0.client> / <dtag.uyes>
button 30 160 5538 5539 1 0 22
dtext 50 160 55 Geri
button 230 160 2714 2715 1 0 21
dtext 250 160 55 Ileri
f_listz

[dialog d_aile_kov button]
on=0
tag.client=1

on=1 20
tag0.uyes -=1
try uid.<tag.fert<argn>>.tag.name.suffix=
try uid.<tag.fert<argn>>.findid.i_aile.remove
try uid.<tag.fert<argn>>.findid.i_aile.remove
try uid.<tag.fert<argn>>.sysmessage @38,,1 <name> adli aileden kovuldun.

try tag.fert<argn>=0

on=21
if (<tag.uyes> > <tag0.client>)
tag.client += 1
sdialog d_aile_kov
else
sdialog d_aile_kov
endif

on=22
if (<tag0.client> > 1)
tag.client -= 1
sdialog d_aile_kov
else
sdialog d_aile_kov
endif

[function f_listz]
local.y=35
dtext 50 <local.y> 55 Oyuncu : <uid.<tag.fert<dtag.client>>.name>
dtext 50 55 55 Durum : <qval <uid.<tag.fert<dtag.client>>.isonline>? Online : Offline>
gumppictiled 10 85 180 8 3504




[dialog d_aile_ekle]
150,150
//nomove 
noclose
page 0
resizepic 0 0 5120 290 190
resizepic 10 10 3000 270 170
dhtmlgump 50 20 150 25 1 0 <def.center><def.bfont_lred><uid.<link.uid>.name> Davetiye
dhtmlgump 22 75 240 50 1 0 <def.bfont_white><uid.<link.uid>.name> Ailesine Davetiye Aldiniz Girmek Icin 50000 Gold Odemeniz Gerekmektedir.
button 40 140 0a54 0a55  1 0 1
button 140 140 0a50 0a51 1 0 2


[dialog d_aile_ekle button]
on=1
if !(<src.restest <def.Uyepara> i_gold>)
src.sysmessage @38,1,1 Yaninizda <eval <def.uyepara>> Gold yok.
remove
return 1
endif

try uid.<link.uid>.tag0.uyes <eval <uid.<link.uid>.tag0.uyes>+1>
serv.newitem i_aile
new.cont <src.uid>
src.new.equip
new.link <link.uid>
//src.tag.eskiname=<src.name>
src.tag.name.suffix=" <uid.<link.uid>.name>"
src.sysmessage @38,1,1 <uid.<link.uid>.name> Ailesine uye oldunuz.
src.consume <def.uyepara> i_gold
uyeol
remove


on=2
try uid.<link.topobj.uid>.sysmessage @38,1,1 Teklifiniz reddedildi.
remove

[itemdef i_aile]
id i_gold
layer layer_special
weight 0
type t_eq_script
name asd

on=@create
attr attr_newbie|attr_invis


[itemdef i_aileekle]
layer layer_special
id i_earrings_gold
weight 0
name asd
type t_eq_Script

on=@create
attr attr_invis

[function uyeol]
for 1 20
if (<uid.<link.uid>.tag.fert<dlocal._for>> == 0)
try uid.<link.uid>.tag.fert<dlocal._for>=<cont.uid>
src.sysmessage @03c1,6,1 Slot <dlocal._for> = Bos <dlocal._for>. uyesiniz.
return 1
endif
endfor


[plevel 1]
ailem
ac

[function ac]
if !(<src.findid.i_aile>)
src.sysmessage Siz Bir Aileye Uye Degilsiniz...
return 1
endif
if (strmatch('<tag.lastsay>','<args>'))
src.sysmessage Lutfen flood yapmayiniz.
else
forplayers 65000
if (<findid.i_aile>)
local.ailename <findid.i_aile.link>
if (<local.ailename>=<src.findid.i_aile.link>)
if <isonline>
sysmessage @796,1,1 [AileChat] <src.name> : <args>
src.tag.lastsay <args>
endif
endif
endif
endfor
endif

[function aonline]
dtag.client 1
if (<src.findid.i_aile>)
obj=<src.findid.i_aile.link>
src.obj.dialog d_aile_kov
else
src.sysmessage herhangi bir aile'ye uye degilsiniz.
return 1
endif


[dialog d_aile_online]
150,150
//nomove 
page 0
resizepic 0 0 5120 340 220
resizepic 10 10 3000 320 200
page 1
if (<link>=<src.uid>)
button 30 105 2714 2715 1 0 <obj.dtag.client>
dtext 50 105 1152 Bu oyuncuyu aileden at
endif
dtext 15 15 1152 <obj.dtag0.client> / <obj.dtag.uyes>
button 30 160 5538 5539 1 0 22
dtext 50 160 55 Geri
button 230 160 2714 2715 1 0 21
dtext 250 160 55 Ileri
f_listz

Üye Ol veya Giriş Yap

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