Kod:
[ITEMDEF i_bank_kumbara]
DEFNAME=i_bank_kumbara
name=Kumbara
ID=i_box_brass
WEIGHT=1
VALUE=5000
TYPE=t_script
on=@click
message @07a1,,1 <name>
return 1
on=@create
ATTR=attr_newbie
tag.gp 0
on=@dclick
if (<src.targ.topobj.uid> != <src.uid>)
src.sysmessage @0845,1,1 Bunu kullanabilmeniz için çantanızda olmalıdır!
return 1
endif
if !(<more1>)
more1 <src.uid>
src.sysmessage @00482,1,1 Kumbara artık size aittir.
elseif (<more1> != <src.uid>)
src.sysmessage @0845,1,1 Bu kumbaranın sahibi siz değilsiniz!
elseif (<topobj.uid> != <src.uid>)
src.sysmessage @0845,1,1 Kumbarayı kullanabilmeniz için üstünüze almalısınız!
else
more2 1
target
src.sysmessage @666,1,1 Kumbara menüsünü açmak için kumbarayı, para yatırmak için parayı veya checki seçiniz.
endif
return 1
on=@targon_item
if (<more2> == 1)
if (<src.targ.topobj.uid> != <src.uid>)
src.sysmessage @0845,1,1 Bunu kullanabilmeniz için çantanızda olmalıdır!
return 1
endif
if (<src.targ.baseid> == i_gold)
tag0.gp += <src.targ.amount>
src.targ.remove
more2 1
target
src.sysmessage @666,1,1 Kumbara menüsünü açmak için kumbarayı, para yatırmak için parayı veya checki seçiniz.
//elseif (<src.targ.baseid> == i_check_brnx)
tag0.gp += <src.targ.more1>
src.targ.remove
more2 1
target
src.sysmessage @666,1,1 Kumbara menüsünü açmak için kumbarayı, para yatırmak için parayı veya checki seçiniz.
elseif (<src.targ.uid> == <uid>)
sdialog d_bank_kumbara
dialogclose d_bank_kumbara_havale
dialogclose d_bank_kumbara_para_cek
dialogclose d_cekcimenu
dialogclose d_bank_kumbara_havale
endif
endif
return 1
on=@targon_char
if (<more2> == 2)
if (<src.targ.uid> == <src.uid>)
return 1
endif
src.targ.sdialog d_bank_kumbara_havale
endif
return 1
[dialog d_bank_kumbara]
0,0
page 1
resizepic 40 40 5100 260 220
resizepic 50 50 3500 240 200
dtext 83 65 38 Kumbara Menüsü
dtext 110 90 1152 Nakit para çek
button 75 90 4006 4005 1 0 1
dtext 110 110 1152 Check yaz
button 75 110 4006 4005 1 0 2
dtext 110 130 1152 Havale yap
button 75 130 4006 4005 1 0 3
dtext 110 150 1152 Hepsini Ekle
button 75 150 4006 4005 1 0 4
dtext 75 180 064 Bakiye: <eval <tag.gp>> Puan
[dialog d_bank_kumbara button]
on=1
sdialog d_bank_kumbara_para_cek
on=2
sdialog d_cekcimenu
on=3
more2 2
target
src.sysmessage @666,1,1 Havale yapacağınız kişiyi seçiniz.
on=4
tag.gp +=<src.gold>
src.gold 0
src.sysmessage @69,1,1 Tum parayi hesabiniza eklediniz.
[dialog d_bank_kumbara_havale]
100, 20
PAGE 0
resizepic 2 2 3600 240 80
dtextentry 32 32 150 20 1152 1 Buraya Yazınız_
button 190 30 4005 4006 1 0 1
[dialog d_bank_kumbara_havale button]
on=1
if !(<isnum <argtxt[1]>>)
src.sysmessage @0845,1,1 Sadece rakam kullanabilirsiniz!
elseif (<eval <argtxt[1]>> < 1)
src.sysmessage @0845,1,1 Hatalı bir rakam girdiniz.
elseif (<eval <argtxt[1]>> > <eval <tag.gp>>)
src.sysmessage @0845,1,1 Kumbaranızda <eval <argtxt[1]>> gp bulunmuyor.
else
src.sysmessage @00482,1,1 <eval <argtxt[1]>> puan <name> isimli kişye aktarılmıştır.
tag.gp -= <argtxt[1]>>
f_give_money <argtxt[1]>
endif
[dialog d_bank_kumbara_para_cek]
100, 20
PAGE 0
resizepic 10 10 5100 260 100
resizepic 20 20 3500 240 80
dtextentry 32 40 150 20 1152 1 ********
button 190 38 4005 4006 1 0 1
[dialog d_bank_kumbara_para_cek button]
on=1
if !(<isnum <argtxt[1]>>)
src.sysmessage @0845,1,1 Sadece rakam kullanabilirsiniz!
elseif (<eval <argtxt[1]>> < 1)
src.sysmessage @0845,1,1 Hatalı bir rakam girdiniz!
elseif (<eval <argtxt[1]>> > <eval <tag0.gp>>)
src.sysmessage @0845,1,1 Kumbaranızda <eval <argtxt[1]>> puan bulunmuyor.
else
src.sysmessage @00482,1,1 <eval <argtxt[1]>> puan bankanıza aktarılmıştır.
tag.gp -= <eval <argtxt[1]>>
src.f_give_money <eval <argtxt[1]>>
endif
[function f_give_money]
local.gp <argn1>
if (<eval <local.gp>> > 64999)
serv.newitem i_gold
new.amount 65000
new.cont <findlayer(layer_bankbox).uid>
local.gp -= 65000
f_give_money <eval <local.gp>>
elseif (0<eval <local.gp>>)
serv.newitem i_gold
new.amount <eval <local.gp>>
new.cont <findlayer(layer_bankbox).uid>
local.gp 0
endif
Para çekerken parayı bankaya atıyor çantama gelmesini istiyorum ama yapamadım bankbox olan kısımları backpack yaptım yine olmadı yardımcı olurmusunuz