Aklımdan geçen bir sistemi hazırladım sizinlede paylaşmak istedim.
Sistem ne işe yarar. ?
Bu sistem sayesinde serverde her nickten 1 tane olmasını sağlıyoruz. Örnek serverde Slothere diye bir karakter varsa başkası Slothere diye açmaya çalışınca nick değişim menüsü aktif oluyor.
Resim ;
Büyük
Nasıl kullanılır ?
Yapmanız gereken çok basit sadece logini bu kısmı ekleyip scriptide serverinize ekledikten sonra kullanabilirsiniz.
if (<src.tag0.isim> == 0)
src.isimsorgu
endif
//////////////////////////////////////////////////////////////////////////////////////
//Scripted by Slothere - 02.12.2007
//[!]This script was written for Ultima-Strike, it can not be used without permission
//https://www.ultima-strike.com | https://wiki.ultima-strike.com
//////////////////////////////////////////////////////////////////////////////////////
// Functionlar
[FUNCTION sys_error]
sysmessageua 38,6,6,trk, <args>
[function isimsorgu]
obj=<uid>
forplayers 6144
if (<obj.uid> != <uid>)
if (strmatch('<obj.name>', '<uid.<uid>.name>'))
obj.f_isimdegis
return 1
endif
endif
endfor
[function isimduzenle]
local.ilkharf <strsub 0 1 <name>>
name <strtolower <name>>
local.gerisi <strsub 1 15 <name>>
for harf 1 26
if strmatch(<local.ilkharf>,<def.kucukharf_<dlocal.harf>>)
local.yeniilkharf <def.buyukharf_<dlocal.harf>>
name <local.yeniilkharf><local.gerisi>
name <strarg <name>>
endif
endfor
[function f_isimdegis]
src.dialog d_isimdegis
return 1
// Dialogumuz
[dialog d_isimdegis]
0,0
nomove
resizepic 0 0 5170 800 600
resizepic 100 350 3000 250 30
dhtmlgump 100 50 800 20 0 0 <def.kirmizi> <src.name> isminden sunucuda bulunmaktadir. Lutfen isminizi degistiriniz.
dhtmlgump 100 150 800 20 0 0 <def.kirmizi> Isminizi degistirirken dikkat etmeniz gerekenler;
dhtmlgump 100 180 800 500 0 0 - Stafflarin nicklerini yazmak yasaktir. <def.br>- Staff nickleri kulanmak yasaktir. <def.br>- Nickinizde "@'^!" turu simgeler kullanmak yasaktir. <def.br>- Kufur içerikli nick kullanmak yasaktir. <def.br>- Baskasinin nickini degistirip kullanmak yasaktir..
dhtmlgump 100 300 800 20 0 0 <def.kirmizi>Isminizi asagidaki kutucuga yazip onaylayin.
dtextentry 120 360 150 20 0 1 <src.name>
dhtmlgump 140 405 100 20 0 0 Tamam
dhtmlgump 320 550 200 20 0 0 <def.kirmizi> <serv.name> Isim Menusu
button 100 400 4006 4007 1 0 1
[dialog d_isimdegis button]
on=0
src.sys_error Isminizi degistirmeniz gereklidir..
src.dialog d_isimdegis
return 1
on=1
if (strmatch('<argtxt[1]>',''))
src.sys_error Lutfen bir isim giriniz
return 1
endif
if ((strlen(<argtxt[1]>)) > 10) || ((strlen(<argtxt[1]>)) < 4)
src.dialog d_isimdegis
src.sys_error Isminiz az 4, en fazla 10 karakter olmalidir.
return 1
endif
if !(<isnum <argtxt[1]>>==0)
src.dialog d_isimdegis
src.sys_error Sadece harf girebilirsiniz..
return 1
endif
obj=<uid>
forplayers 6144
if (<obj.uid> != <uid>)
if (strmatch('<obj.name>', '<argtxt[1]>'))
src.dialog d_isimdegis
src.sys_error Bu isimden sunucuda bulunmaktadir.
return 1
endif
endif
endfor
src.name <argtxt[1]>
src.tag.isim 1
src.isimduzenle
/// Defnameler.
[defname isimsistemi]
kirmizi <basefont color=#0ff0000>
br <br>
kucukharf_1 a
kucukharf_2 b
kucukharf_3 c
kucukharf_4 d
kucukharf_5 e
kucukharf_6 f
kucukharf_7 g
kucukharf_8 h
kucukharf_9 i
kucukharf_10 j
kucukharf_11 k
kucukharf_12 l
kucukharf_13 m
kucukharf_14 n
kucukharf_15 o
kucukharf_16 p
kucukharf_17 r
kucukharf_18 s
kucukharf_19 t
kucukharf_20 u
kucukharf_21 v
kucukharf_22 y
kucukharf_23 z
kucukharf_24 w
kucukharf_25 x
kucukharf_26 q
buyukharf_1 A
buyukharf_2 B
buyukharf_3 C
buyukharf_4 D
buyukharf_5 E
buyukharf_6 F
buyukharf_7 G
buyukharf_8 H
buyukharf_9 I
buyukharf_10 J
buyukharf_11 K
buyukharf_12 L
buyukharf_13 M
buyukharf_14 N
buyukharf_15 O
buyukharf_16 P
buyukharf_17 R
buyukharf_18 S
buyukharf_19 T
buyukharf_20 U
buyukharf_21 V
buyukharf_22 Y
buyukharf_23 Z
buyukharf_24 W
buyukharf_25 X
buyukharf_26 Q
[eof]
//////////////////////////////////////////////////////////////////////////////////////
//Scripted by Slothere - 02.12.2007
//[!]This script was written for Ultima-Strike, it can not be used without permission
//https://www.ultima-strike.com | https://wiki.ultima-strike.com
//////////////////////////////////////////////////////////////////////////////////////
Baş harf büyütme sistemi alıntıdır. Ayriyetten sistemde yardımcı olan Noxier'e teşekkürler
Emeğe saygı lütfen banneri silmeyiniz. ( Dinleyen pek olucağını sanmıyorum ama genede eklemekte fayda var. )
Bu konu Slothere tarafından düzenlendi(2007-12-02 19:59, 16 yıl önce)
