O scriptte baya ugrastım ve geldiğim yer iyi ama 2 3 problem cıktı ve bıraktım..Problemler şu;
*** .ailem yazınca sadece ailenin sahibinde acılıo uyelerde acılmıor.
*** vede uye atmak istiyorum ama atamıyorum..Uye at buttonundan
Daha başka sorunlada varda kucuk galiba hatırlayamadım.. Ayarlanmış script şu..
//Scriptti Koymamdaki Amac : Aile Sistemlerinin Hic Degilse Bu Scriptte Bakarak Daha Cok Fonksiyonlar Eklenmesi.
//Bu Scripti Yazan By Rexos Arkdasimizada Tesekkür Etmeyi Bir Borç Biliyorum..
//Kolay Gelsin.
[defname Ayarlar]
Uyepara 1500 // giris ücreti nekadar olsun burda onu ayarlayabilirsiniz
birim i_gold // istedigin seye çevirebilirsin aileye üye alirken sorulan para birimi falan iste
[itemdef i_mesajvar]
id i_scroll_blank
name Mesajiniz Var!
type t_eq_script
on=@create
color 0480
on=@click
if (<tag.okundu> == 1)
message @0794,1,1 [<f_zamangoster <timer>> Sonra Silinecek]
else
message @0794,1,1 [Okunmamis]
endif
message @07a1,1,1 Kimden : <tag.kimden>
message @0785,1,1 <name>
return 1
on=@dclick
timer 60*60
tag.okundu 1
src.ctag.olartik <uid>
src.sysmessage @07a1,1,1 <tag.kimden> tarafindan gönderilen mesaji görüntülüyorsunuz.Bu Mesaj 1 saat sonra kendini yok edecektir.
src.dialogclose d_mesajicerik
src.dialog d_mesajicerik
return 1
on=@timer
remove
return 1
[dialog d_mesajicerik]
0,0
nomove
resizepic 20 20 3600 300 310
dhtmlgump 45 40 200 200 0 0 <def.bfont_yellow> <serv.name><def.bfont_white> Mesaj Sistemi<def.br><def.br><def.br>Gönderen : <uid.<src.ctag.olartik>.tag.kimden><def.br>Tarih : <uid.<src.ctag.olartik>.tag.zaman><def.br><def.br>Mesaj :<def.bfont_dcyan><def.br><def.br><uid.<src.ctag.olartik>.tag.icerik>
[FUNCTION badchar]
IF !(<STRPOS 0 41 <ARGS>>=-1) || !(<EVAL STRLEN(<ARGS>)>) || (STRMATCH("*[[]*","<ARGS>")) || (STRMATCH("*]*","<ARGS>")) || (STRMATCH("*[(]*","<ARGS>")) || (STRMATCH("*-*","<ARGS>")) || (STRMATCH("*[*}`>?´;:^%¨!"<#.@_~|=+&/æ{]*","<ARGS>"))
RETURN 1
ELSE
RETURN 0
ENDIF
[dialog d_mesaj]
0,0
nomove
resizepic 10 7 5120 780 110
resizepic 15 12 3000 770 100
resizepic 35 50 3000 730 25
if (<uid.<link.tag.fert<dtag.client>>.kills> > 7)
dhtmlgump 35 25 920 20 0 0 <def.bfont_lred><uid.<link.tag.fert<dtag.client>>.name><uid.<link.tag.fert<dtag.client>>.tag.name.suffix><def.bfont_black> Isimli Oyuncuya Göndericeginiz Mesaji Yaziniz. [<qval (<uid.<link.tag.fert<dtag.client>>.isonline>)? <def.bfont_lgreen>:<def.bfont_lred>><qval (<uid.<link.tag.fert<dtag.client>>.isonline>)? Online:Offline><def.bfont_black>]
else
dhtmlgump 35 25 950 20 0 0 <def.bfont_lblue><uid.<link.tag.fert<dtag.client>>.name><uid.<link.tag.fert<dtag.client>>.tag.name.suffix><def.bfont_black> Isimli Oyuncuya Göndericeginiz Mesaji Yaziniz. [<qval (<uid.<link.tag.fert<dtag.client>>.isonline>)? <def.bfont_lgreen>:<def.bfont_lred>><qval (<uid.<link.tag.fert<dtag.client>>.isonline>)? Online:Offline><def.bfont_black>]
endif
dhtmlgump 70 85 100 20 0 0 Gönder
button 50 85 01519 0151a 1 0 1
dtextentry 40 55 700 80 0 2
[dialog d_mesaj button]
on=1
if (strmatch('<argtxt[2]>',''))
src.sysmessage @07a1,1,1 Lütfen bir içerik giriniz.
return 1
endif
if (strlen(<argtxt[2]>) < 10) || (strlen(<argtxt[2]>) > 100)
src.sysmessage @07a1,1,1 Mesajiniz en az 10 en fazla 100 karakter olabilir.
return 1
endif
src.sysmessage @07a1,1,1 <strarg <serv.rtime>> Zamaninda, <uid.<link.tag.fert<dtag.client>>.name> Isimli kisiye, "<argtxt[2]>" içerikli bir mesaj gönderdiniz.
serv.newitem i_mesajvar
new.cont <uid.<link.tag.fert<dtag.client>>.findlayer.21.uid>
new.tag0.kimden <src.name>
new.tag0.zaman <serv.rtime>
new.tag0.icerik <argtxt[2]>
if (<uid.<link.tag.fert<dtag.client>>.isonline>)
try uid.<link.tag.fert<dtag.client>>.sysmessage @07a1,1,1 <new.tag0.kimden> Size bir mesaj Atti.
endif
[function ailem]
if (<findid.i_aile>)
findid.i_aile.dialog d_ailem_bilgi
endif
[dialog d_ailem_bilgi]
150,150
//nomove
page 0
resizepic 0 0 3600 300 180
dhtmlgump 70 10 150 23 0 0 <def.bfont_yellow> <serv.name> Aile Sistemi
dhtmlgump 30 40 250 23 0 0 <def.bfont_white> Aile ismi : <def.bfont_yellow><link.name><def.br>
gumppictiled 10 60 180 5 3504
gumppictiled 10 100 180 5 3504
dhtmlgump 30 60 250 23 0 0 <def.bfont_white> Aile reisi : <def.bfont_yellow><link.link.name><def.br>
dhtmlgump 30 80 250 23 0 0 <def.bfont_white> Uye sayisi : <def.bfont_yellow><link.dtag0.uyes><def.br>
dhtmlgump 30 100 85 23 0 0 <def.bfont_white> Uye Listesi :
button 35 130 55 56 1 0 1
button 115 100 55 56 1 0 2
dhtmlgump 48 130 150 23 0 0 <def.bfont_white> Aileden Cik
endif
[dialog d_ailem_bilgi button]
on=1
for x 0 20
if (<link.dtag0.fert<dlocal.x>>==<src.uid>)
try uid.<link.tag0.fert<dlocal.x>>.notice <link.name> adli aileden ciktin.
try uid.<link.tag0.fert<dlocal.x>>.tag.name.suffix=
try uid.<link.tag0.fert<dlocal.x>>.findid.i_aile.remove
try uid.<link.tag0.fert<dlocal.x>>.tag.fert<dlocal.x>=0
link.tag0.uyes -= 1
link.tag0.fert<dlocal.x>=
remove
return 1
endif
endfor
on=2
tag.client=1
dialog d_aile_show
[itemdef i_Deed_aile]
id i_Deed
type t_eq_script
name Aile kurumu
value 475000
on=@create
color 0845
On=@Click
message @077a,1,1 [Aile Kurum Belgesi]
return 1
on=@dclick
src.sysmessage @1952,1,1,1 Dikkat !!!
src.sysmessage @1953,1,1,1 Dikkat !!!
src.sysmessage @077a,1,1 Soy isminizi yazarken boslugu silipte yaziniz..!!
sdialog d_ailekur
return 1
[dialog d_ailekur]
20,20
nomove
nodispose
resizepic 0 0 3600 450 300
dhtmlgump 20 50 420 150 0 0 <def.bfont_yellow><serv.servname> <def.bfont_white>Aile Kurulum sistemine Hosgeldiniz..<def.br><def.br><def.bfont_lred>Soy isim alirken dikkat etmeniz gerekenler <def.br><def.bfont_dyellow>- Soy isminizde [ @'^! ] turu simgeler kullanmak yasaktir. <def.br>- Kufur icerikli soy Isim kullanmak yasaktir.Aksi taktirde silinir.<def.br>- Soy isminizde bosluk birakmaniz yasaktir.<def.br>- En fazla 15,en az 4 harfli aile ismi yazabilirsiniz..
dhtmlgump 20 180 420 25 0 0 <def.bfont_lred>Istediginiz soy ismi asagidaki kutucuga yaziniz.
resizepic 100 207 3000 250 25
dtextentry 110 210 200 20 0 0
dhtmlgump 140 253 30 20 0 0 <def.bfont_white>Kur
button 100 250 4005 4006 1 0 1
[dialog d_ailekur button]
on=1
if (<badchar <argtxt[0]>>)
src.sysmessage @38,6,1 Lutfen aile isimlerine sadece harf koyunuz..
return 1
endif
if (<src.findid.i_aile_kolye>) || (<src.findid.i_aile>)
src.sysmessage @38,6,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,6,1 Aile isimlerinde bosluk olamaz..
return 1
endif
if (<isnum <strsub <eval <local._for>> 1 <tag.aile>>>)
src.sysmessage @38,6,1 Aile isimlerinde numaralandirma olmaz..
return 1
endfor
endif
if (<isnum <argtxt[0]>>)
src.sysmessage @38,6,1 Bos birakamazsiniz..
return 1
endif
if (strlen(<argtxt[0]>) > 15) || (strlen(<argtxt[0]>) < 4)
src.sysmessage @38,6,1 Aile ismi 15 karakterden uzun ve 4 karakterden az 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 @1976,1,1,1 ** [ <argtxt[0]> ] Ailesi kurulmustur.
remove
on=2
src.dialogclose d_aile
[itemdef i_aile_kolye]
id i_deed
name Aile kolyesi
on=@create
for 20
tag.fert<dlocal._for>=0
endfor
tag0.uyes=0
color 0455
attr=04
on=@click
message @38,6,1 Aile Reis Belgesi
return 1
on=@dclick
if (<link> != <src.uid>)
src.sysmessage @38,6,1 Bu sizin ailenizin belgesi degil..
return 1
endif
dialog d_aile_bilgi
return 1
on=@targon_self
src.sysmessage @38,6,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,6,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]
20,20
nomove
page 0
resizepic 50 30 3600 500 300
dhtmlgump 250 75 150 100 0 0 <def.bfont_red> NotoriouS PvP <def.br><def.br> Aile Sistemi
gumppic 270 190 112
gumppic 230 50 100
gumppic 90 70 5545
gumppic 440 70 5545
gumppic 0 0 10440
gumppic 518 0 10441
dtext 75 175 49 Bilgiler
dtext 360 175 49 Islemler
dtext 75 195 55 Aile ismi : <name>
dtext 75 215 55 Aile reisi : <link.name>
dtext 75 235 55 Uye sayisi : <dtag0.uyes>
button 360 199 1209 1210 1 0 1
dtext 380 215 55 Uye at/Uye listesi
button 360 219 1209 1210 1 0 2
dtext 380 235 55 Aileyi dagit
dtext 380 195 55 Uye al
button 360 239 1209 1210 1 0 3
endif
[function ailedeed]
var.ailekur <args>
[dialog d_aile_bilgi button]
on=1
target @38,6,1 Aileye uye ediceginiz kisiyi seciniz.
return 1
on=2
if !(<tag0.uyes>)
src.sysmessage @38,6,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>>.tag.name.suffix=
try uid.<tag.fert<dlocal.x>>.findid.i_aile.remove
try uid.<tag.fert<dlocal.x>>.findid.i_aile.remove
if (<uid.<tag.fert<dlocal.x>>.isonline>)
try uid.<tag.fert<dlocal.x>>.notice <name> adli aileden kovuldun..
endif
endif
endfor
serv.allclients <name> adli aile yikilmistir..
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 yikildigi gibi butun uyelerinizin soyadlari eski halini almistir.
remove
return 1
[dialog d_aile_kov]
50,50
nomove
page 0
resizepic 0 0 3600 320 360
page 1
button 30 265 1209 1210 1 0 <dtag.client>
button 30 235 1209 1210 1 0 24
dtext 50 231 55 <uid.<tag.fert<dtag.client>>.name> Isimli oyuncuya mesaj at
dhtmlgump 50 262 150 100 0 0 <def.bfont_lred>Bu oyuncuyu aileden at
button 30 293 1209 1210 1 0 23
dhtmlgump 50 290 250 100 0 0 <def.bfont_white><uid.<tag.fert<dtag.client>>.account.name> isimli hesaptaki karakterler
dhtmlgump 20 15 150 100 0 0 <def.bfont_lgreen><dtag0.client> <def.bfont_white>/ <def.bfont_lred><dtag.uyes>
button 30 320 1209 1210 1 0 22
dtext 50 315 55 Önceki
button 220 320 1209 1210 1 0 21
dtext 240 315 55 Sonraki
f_listz
[dialog d_aile_kov button]
on=0
tag.client=1
on=1 20
tag.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
if (<uid.<tag.fert<argn>>.isonline>)
try uid.<tag.fert<argn>>.notice <name> adli aileden kovuldun.
endif
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
on=23
sdialog d_charlist2
on=24
sdialog d_mesajx
[dialog d_mesajx]
0,0
nomove
resizepic 10 7 5120 780 110
resizepic 15 12 3000 770 100
resizepic 35 50 3000 730 25
if (<uid.<tag.fert<dtag.client>>.kills> > 7)
dhtmlgump 35 25 920 20 0 0 <def.bfont_lred><uid.<tag.fert<dtag.client>>.name><uid.<tag.fert<dtag.client>>.tag.name.suffix><def.bfont_black> Isimli Oyuncuya Göndericeginiz Mesaji Yaziniz. [<qval (<uid.<tag.fert<dtag.client>>.isonline>)? <def.bfont_lgreen>:<def.bfont_lred>><qval (<uid.<tag.fert<dtag.client>>.isonline>)? Online:Offline><def.bfont_black>]
else
dhtmlgump 35 25 920 20 0 0 <def.bfont_lblue><uid.<tag.fert<dtag.client>>.name><uid.<tag.fert<dtag.client>>.tag.name.suffix><def.bfont_black> Isimli Oyuncuya Göndericeginiz Mesaji Yaziniz. [<qval (<uid.<tag.fert<dtag.client>>.isonline>)? <def.bfont_lgreen>:<def.bfont_lred>><qval (<uid.<tag.fert<dtag.client>>.isonline>)? Online:Offline><def.bfont_black>]
endif
dhtmlgump 70 85 100 20 0 0 Gönder
button 50 85 01519 0151a 1 0 1
dtextentry 40 55 700 80 0 2
[dialog d_mesajx button]
on=1
if (strmatch('<argtxt[2]>',''))
src.sysmessage @07a1,1,1 Lütfen bir içerik giriniz.
return 1
endif
if (strlen(<argtxt[2]>) < 10) || (strlen(<argtxt[2]>) > 100)
src.sysmessage @07a1,1,1 Mesajiniz en az 10 en fazla 100 karakter olabilir.
return 1
endif
src.sysmessage @07a1,1,1 <strarg <serv.rtime>> Zamaninda, <uid.<tag.fert<dtag.client>>.name> Isimli kisiye, "<argtxt[2]>" içerikli bir mesaj gönderdiniz.
serv.newitem i_mesajvar
new.cont <uid.<tag.fert<dtag.client>>.findlayer.21.uid>
new.tag0.kimden <src.name>
new.tag0.zaman <serv.rtime>
new.tag0.icerik <argtxt[2]>
if (<uid.<tag.fert<dtag.client>>.isonline>)
try uid.<tag.fert<dtag.client>>.sysmessage @07a1,1,1 <new.tag0.kimden> Size bir mesaj Atti.
endif
[dialog d_aile_show]
50,50
nomove
page 0
resizepic 0 0 3600 335 340
page 1
dhtmlgump 20 15 150 100 0 0 <def.bfont_lgreen><dtag0.client> <def.bfont_white>/ <def.bfont_lred><eval <link.dtag0.uyes>>
button 30 240 1209 1210 1 0 24
dtext 50 235 55 <uid.<link.tag.fert<dtag.client>>.name> Isimli oyuncuya mesaj at
button 30 270 1209 1210 1 0 23
dtext 50 265 55 <uid.<link.tag.fert<dtag.client>>.account.name> isimli hesaptaki karakterler
button 30 300 1209 1210 1 0 22
dtext 50 295 55 Önceki
button 220 300 1209 1210 1 0 21
dtext 240 295 55 Sonraki
f_listz2
[dialog d_aile_show button]
on=21
if (<link.dtag0.uyes> > <tag0.client>)
tag.client += 1
sdialog d_aile_show
else
sdialog d_aile_show
endif
on=22
if (<tag0.client> > 1)
tag.client -= 1
sdialog d_aile_show
else
sdialog d_aile_show
endif
on=23
sdialog d_charlist
on=24
sdialog d_mesaj
[function f_listz]
local.y=35
if (<uid.<tag.fert<dtag.client>>.kills> > 7)
dhtmlgump 50 <local.y> 210 190 0 0 <def.bfont_white>Oyuncu : <def.bfont_lred><uid.<tag.fert<dtag.client>>.name>
else
dhtmlgump 50 <local.y> 210 190 0 0 <def.bfont_white>Oyuncu : <def.bfont_lblue><uid.<tag.fert<dtag.client>>.name>
endif
dhtmlgump 50 72 210 190 0 0 <def.bfont_white>Kills : <def.bfont_lred><uid.<tag.fert<dtag.client>>.kills><def.br><def.bfont_white>Deaths : <def.bfont_lred><uid.<tag.fert<dtag.client>>.deaths> <def.br><def.bfont_white>Online Süre : <def.bfont_lred><eval (<uid.<tag.fert<dtag.client>>.account.totalconnecttime> /60)> saat <def.br><def.bfont_white>Ilk Giris : <def.bfont_lred><strarg <uid.<tag.fert<dtag.client>>.account.firstconnectdate>> <def.br><def.bfont_white>Str/Hits : <def.bfont_lred><uid.<tag.fert<dtag.client>>.str>/<uid.<tag.fert<dtag.client>>.hits> <def.br><def.bfont_white>Dex/Stam : <def.bfont_lred><uid.<tag.fert<dtag.client>>.dex>/<uid.<tag.fert<dtag.client>>.stam><def.br><def.bfont_white>Int/Mana : <def.bfont_lred><uid.<tag.fert<dtag.client>>.int>/<uid.<tag.fert<dtag.client>>.mana><def.br><def.bfont_white>Fame/Karma : <def.bfont_lred><uid.<tag.fert<dtag.client>>.fame>/<uid.<tag.fert<dtag.client>>.karma>
if (<uid.<tag.fert<dtag.client>>.isonline>)
dhtmlgump 50 55 250 110 0 0 <def.bfont_white>Durum : <def.bfont_lgreen>Online
else
dhtmlgump 50 55 240 100 0 0 <def.bfont_white>Durum : <def.bfont_lred>Offline
endif
gumppictiled 10 85 180 8 3504
[function f_listz2]
local.y=35
if (<uid.<link.tag.fert<dtag.client>>.kills> > 7)
dhtmlgump 50 <local.y> 210 190 0 0 <def.bfont_white>Oyuncu : <def.bfont_lred><uid.<link.tag.fert<dtag.client>>.name>
else
dhtmlgump 50 <local.y> 210 190 0 0 <def.bfont_white>Oyuncu : <def.bfont_lblue><uid.<link.tag.fert<dtag.client>>.name>
endif
dhtmlgump 50 72 210 190 0 0 <def.bfont_white>Kills : <def.bfont_lred><uid.<link.tag.fert<dtag.client>>.kills><def.br><def.bfont_white>Deaths : <def.bfont_lred><uid.<link.tag.fert<dtag.client>>.deaths> <def.br><def.bfont_white>Online Süre : <def.bfont_lred><eval (<uid.<link.tag.fert<dtag.client>>.account.totalconnecttime> /60)> saat <def.br><def.bfont_white>Ilk Giris : <def.bfont_lred><strarg <uid.<link.tag.fert<dtag.client>>.account.firstconnectdate>> <def.br><def.bfont_white>Str/Hits : <def.bfont_lred><uid.<link.tag.fert<dtag.client>>.str>/<uid.<link.tag.fert<dtag.client>>.hits> <def.br><def.bfont_white>Dex/Stam : <def.bfont_lred><uid.<link.tag.fert<dtag.client>>.dex>/<uid.<link.tag.fert<dtag.client>>.stam><def.br><def.bfont_white>Int/Mana : <def.bfont_lred><uid.<link.tag.fert<dtag.client>>.int>/<uid.<link.tag.fert<dtag.client>>.mana><def.br><def.bfont_white>Fame/Karma : <def.bfont_lred><uid.<link.tag.fert<dtag.client>>.fame>/<uid.<link.tag.fert<dtag.client>>.karma>
if (<uid.<link.tag.fert<dtag.client>>.isonline>)
dhtmlgump 50 55 240 100 0 0 <def.bfont_white>Durum : <def.bfont_lgreen>Online
else
dhtmlgump 50 55 240 100 0 0 <def.bfont_white>Durum : <def.bfont_lred>Offline
endif
gumppictiled 10 85 180 8 3504
[dialog d_charlist]
30,30
resizepic 0 0 3600 310 280
dhtmlgump 25 20 280 50 0 0 <def.bfont_yellow><uid.<link.tag.fert<dtag.client>>.account.name> Isimli Hesabin Karakter Listesi
dhtmlgump 20 50 280 50 0 0 <def.bfont_white>Esya Aktarmak için butonlari kullanabilirisiniz.
for 0 <eval <uid.<link.tag.fert<dtag.client>>.account.chars>- 1>
dhtmlgump 75 <eval (<dlocal._for>*30)+90> 280 50 0 0 <def.bfont_white><uid.<link.tag.fert<dtag.client>>.account.char.<dlocal._for>.name>
endfor
for 1 <uid.<link.tag.fert<dtag.client>>.account.chars>
button 30 <eval (<dlocal._for>*30)+60> 4020 4022 1 0 <dlocal._for>
endfor
[dialog d_charlist Button]
on=0
src.sysmessage @07a1,1,1 Karakter menüsü kapatildi.
on=1 5
src.ctag.pf <uid.<link.tag.fert<dtag.client>>.account.name>
src.ctag.<uid.<link.tag.fert<dtag.client>>.account.name><eval <argn>-1> <uid.<link.tag.fert<dtag.client>>.account.char.<eval <argn>-1>.uid>
src.sysmessage @07a1,1,1 Gönderilecek esyayi seçiniz..
targetf send <eval <argn>-1>
[function send]
obj=<argo>
if !(<obj.isitem>)
src.sysmessage @07a1,1,1 Sadece esyalari yollayabilirsiniz.
return 1
endif
if (<src.findlayer.29.uid> == <obj.cont.uid>)
obj.cont <uid.<ctag.<account.name><argn>>.findlayer.29.uid>
src.sysmessage @07a1,1,1 Tebrikler, [<src.ctag.pf>] isimli hesaptaki [<uid.<ctag.<account.name><argn>>.name>] isimli karaktere [<obj.amount>] adet [<obj.name>] isimli esyayi [Bankasina] yolladiniz...
else
src.sysmessage @07a1,1,1 Sadece bankanizda bulunan esyalari yollayabilirsiniz.
return 1
endif
[dialog d_charlist2]
30,30
resizepic 0 0 3600 310 280
dhtmlgump 25 20 280 50 0 0 <def.bfont_yellow><uid.<tag.fert<dtag.client>>.account.name> Isimli Hesabin Karakter Listesi
dhtmlgump 20 50 280 50 0 0 <def.bfont_white>Esya Aktarmak için butonlari kullanabilirisiniz.
for 0 <eval <uid.<tag.fert<dtag.client>>.account.chars>- 1>
dhtmlgump 75 <eval (<dlocal._for>*30)+90> 280 50 0 0 <def.bfont_white><uid.<tag.fert<dtag.client>>.account.char.<dlocal._for>.name>
endfor
for 1 <uid.<tag.fert<dtag.client>>.account.chars>
button 30 <eval (<dlocal._for>*30)+60> 4020 4022 1 0 <dlocal._for>
endfor
[dialog d_charlist2 Button]
on=0
src.sysmessage @07a1,1,1 Karakter menüsü kapatildi.
on=1 5
src.ctag.pf <uid.<tag.fert<dtag.client>>.account.name>
src.ctag.pff <uid.<tag.fert<dtag.client>>.account.char.<eval <argn>-1>.name>
src.ctag.kim <uid.<tag.fert<dtag.client>>.account.char.<eval <argn>-1>.uid>
src.sysmessage @07a1,1,1 Gönderilecek esyayi seçiniz..
targetf send2 <eval <argn>-1>
[function send2]
obj <argo>
if !(<obj.isitem>)
src.sysmessage @07a1,1,1 Sadece esyalari yollayabilirsiniz.
return 1
endif
if (<src.findlayer.29.uid> == <obj.cont.uid>)
obj.cont <uid.<ctag.kim>.findlayer.29.uid>
src.sysmessage @07a1,1,1 Tebrikler, [<src.ctag.pf>] isimli hesaptaki [<src.ctag.pff>] isimli karaktere [<obj.amount>] adet [<obj.name>] isimli esyayi [Bankasina] yolladiniz...
else
src.sysmessage @07a1,1,1 Sadece bankanizda bulunan esyalari yollayabilirsiniz.
return 1
endif
[dialog d_aile_ekle]
150,150
nomove
noclose
page 0
resizepic 0 0 3600 270 240
dtext 50 20 1152 <serv.name> Aile sistemi
gumppictiled 10 60 180 5 3504
dhtmlgump 22 75 240 100 0 0 <def.bfont_white><uid.<link.uid>.name> ailesine davet edildiniz. Katilmak ister misiniz? <def.br><def.br>Katilim <def.bfont_yellow><eval <def.uyepara>> <def.bfont_white><serv.itemdef.<def.birim>.name>
button 60 180 4023 4024 1 0 1
button 170 180 4021 4022 1 0 2
[dialog d_aile_ekle button]
on=1
if !(<src.restest <def.Uyepara> <def.birim>>)
src.sysmessage @38,6,1 Yaninizda <eval <def.uyepara>> <serv.itemdef.<def.birim>.name> 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,6,1 <uid.<link.uid>.name> Ailesine uye oldunuz.
src.consume <def.uyepara> <def.birim>
uyeol
remove
on=2
try uid.<link.topobj.uid>.sysmessage @38,6,1 Teklifiniz red edildi.
remove
[itemdef i_aile]
id 0186a
layer layer_special
weight 0
type t_eq_script
name Aile
on=@create
attr attr_newbie|attr_invis
[itemdef i_aileekle]
layer layer_special
id i_earrings_gold
weight 0
name asd
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
[eof]
