[function scrollsaticam]
src.dialogclose d_scrollsaticisi
src.dialog d_scrollsaticisi

[plevel 1]
scrollsat

[function scrollsat]
src.dialogclose d_scrollsaticisi
src.dialog d_scrollsaticisi

[dialog d_scrollsaticisi]
0,0
nomove
resizepic 0 0 3500 500 200
dtext 90 15 1153 <serv.name> Resurrection Scroll Selling Menusu

dtext 35 50 0455 100 Adet Resurrection Scroll == 22000 gp
dtext 35 80 0455 250 Adet Resurrection Scroll == 55000 gp
dtext 35 110 0455 500 Adet Resurrection Scroll ==  110000 gp
dtext 35 140 0455 1000 Adet Resurrection Scroll == 220000 gp
dtext 35 170 0455 2500 Adet Resurrection Scroll == 550000 gp

button 15 50 2117 2118 1 0 1
button 15 80 2117 2118 1 0 2
button 15 110 2117 2118 1 0 3
button 15 140 2117 2118 1 0 4
button 15 170 2117 2118 1 0 5


gumppic 400 40 2298
gumppic 400 80 2298
gumppic 400 120 2298


[dialog d_scrollsaticisi button]
on=0
src.hata Menuyu kapattiniz
return 1

on=1
src.consumescroll 100

on=2
src.consumescroll 250

on=3
src.consumescroll 500

on=4
src.consumescroll 1000

on=5
src.consumescroll 2500


[FUNCTION consumescroll]
act=<SRC.FINDLAYER(layer_bankbox).uid>
act.layer=layer_pack
act.type=t_container
act.equip
if (<src.restest <args> i_scroll_resurrection>)
src.consume <args> i_scroll_resurrection
act.layer=layer_bankbox
act.type=t_eq_bank_box
act.equip
newitem i_check_brnx
if (<args> == 100)
new.more1 22000
elseif (<args> == 250)
new.more1 55000
elseif (<args> == 500)
new.more1 110000
elseif (<args> == 1000)
new.more1 220000
elseif (<args> == 2500)
new.more1 550000
endif
new.more2 <src.uid>
new.cont <src.findlayer(21).uid>
src.smy <args> Adet Resurrection Scroll Sattiniz.
else
src.hata Cantanizda veya bankanizda <args> Adet Resurrection Scroll Bulunmamaktadir.
act.layer=layer_bankbox
act.type=t_eq_bank_box
act.equip
endif


[eof]