Serverda birden fazla nick

//////////////////////////////////////////////////////////////////////////////////////
//Scripted by Slothere - 02.12.2007
//////////////////////////////////////////////////////////////////////////////////////

[function isimduzenle] // Noxier
local.ilkharf=<strsub 0 1 <name>>
local.gerisi=<strsub 1 15 <name>>
local.1=<strtoupper(<local.ilkharf>)>
local.2=<strtolower(<local.gerisi>)>
name <local.1><local.2>
name <strarg <name>>
update

[function isimsorgu]
obj=<uid>
forplayers 6144
if (<obj.uid> != <uid>)
if (strmatch('<obj.name>', '<uid.<uid>.name>'))
obj.f_isimdegis
obj.stone 1
return 1
endif
endif
endfor

[function f_isimdegis]
src.dialog d_isimdegis
return 1

[dialog d_isimdegis]
20,20
nomove
//noclose
nodispose
resizepic 0 0 5170 450 400

//dtext 25 5 0 <serv.name> İsim Menüsü
dhtmlgump 20 50 420 200 0 0 <def.bfont_red>"<src.name>" <def.bfont_black>isminden sunucuda bulunmaktadir. Lutfen isminizi degistiriniz. <def.br><def.br><def.bfont_red>Isminizi degistirirken dikkat etmeniz gerekenler; <def.br><def.br><def.bfont_black>* Staff nickleri kullanmak yasaktir. <def.br>* Nickinizde "@'^!" turu simgeler kullanmak yasaktir. <def.br>* Kufur içerikli nick kullanmak yasaktir. <def.br>* Baskasinin nickini degistirip kullanmak yasaktir.<def.br>* Nickinizde boşluk bırakmanız yasaktır.

dhtmlgump 20 260 420 25 0 0 <def.bfont_red>Isminizi asagidaki kutucuga yazip onaylayin.

resizepic 100 307 3000 250 25
dtextentry 110 310 200 20 0 1 <src.name>

dhtmlgump 140 353 100 20 0 0 Tamam
button 100 350 4005 4006 1 0 1

[dialog d_isimdegis button]
on=0
src.sysmessage @025,1,1 Isminizi degistirmeniz gereklidir..
src.dialog d_isimdegis
return 1

on=1
if (strmatch('<argtxt[1]>','')
src.sysmessage @025,1,1 Lutfen bir isim giriniz
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 Hatalı kullanım.
src.sdialog d_isimdegis
return 1
endif
endfor

obj=<uid>
forplayers 6144
if (<obj.uid> != <uid>
if (strmatch('<obj.name>', '<argtxt[1]>')
src.dialog d_isimdegis
src.sysmessage @025,1,1 Bu isimden sunucuda bulunmaktadir.
return 1
endif
endif
endfor

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

src.name <argtxt[1]>
src.tag.isim 1
src.isimduzenle
src.sysmessage @040,1,1 Isminiz <argtxt[1]> olarak değiştirilmiştir.
src.stone 0

[eof]