Ore, Ingot, Regs

[plevel 1]
ore
ingot
regs

[defname materialler]
ore.0	i_ore_iron,i_ingot_iron,Iron,color_o_iron,i_reag_spider_silk,Spider Silk
ore.1	i_ore_dull_copper,i_ingot_dull_copper,Dull Copper,color_o_dullcopper,i_reag_sulfur_ash,Sulfur Ash
ore.2	i_ore_shadow,i_ingot_shadow,Shadow,color_o_shadow,i_reag_nightshade,Nightshade
ore.3	i_ore_copper,i_ingot_copper,Copper,color_o_copper,i_reag_mandrake_root,Mandrake...
ore.4	i_ore_bronze,i_ingot_bronze,Bronze,color_o_bronze,i_reag_ginseng,Ginseng
ore.5	i_ore_gold,i_ingot_gold,Golden,color_o_gold,i_reag_garlic,Garlic
ore.6	i_ore_agapite,i_ingot_agapite,Agapite,color_o_agapite,i_reag_blood_moss,Blood Moss
ore.7	i_ore_verite,i_ingot_verite,Verite,color_o_verite,i_reag_black_pearl,Black Pearl
ore.8	i_ore_mytheril,i_ingot_mytheril,Mytheril,color_o_mytheril
ore.9	i_ore_valorite,i_ingot_valorite,Valorite,color_o_valorite
ore.10	i_ore_bloodrock,i_ingot_bloodrock,Bloodrock,color_o_bloodrock		
ore.11	i_ore_blackrock,i_ingot_blackrock,Blackrock,color_o_blackrock

[dialog d_mat]
0,0
page 0
bozobag 30,30,255,320
gumppic 26 15 9004
dbutton 195 320 1 0 1,Banka
page 1
dtext 120 45 34 Ore Menüsü
for <src.tag0.matfor>
gumppic <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+57> <eval ((<dlocal._for>/3)*60)+70> 9801
tilepichue <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+70> <eval ((<dlocal._for>/3)*60)+72> <serv.itemdef.<f_moonsep 1,<def.ore.<dlocal._for>>>.id> <ddef.<f_moonsep 4,<def.ore.<dlocal._for>>>>
tilepichue <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+62> <eval ((<dlocal._for>/3)*60)+73> <serv.itemdef.<f_moonsep 1,<def.ore.<dlocal._for>>>.id> <ddef.<f_moonsep 4,<def.ore.<dlocal._for>>>>
dtext <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+60> <eval ((<dlocal._for>/3)*60)+87> 0481 <qval (<src.tag0.matbanka>)?<eval <src.findlayer.layer_bankbox.rescount.<f_moonsep 1,<def.ore.<dlocal._for>>>.amount>+<src.rescount.<f_moonsep 1,<def.ore.<dlocal._for>>>.amount>> :<src.rescount.<f_moonsep 1,<def.ore.<dlocal._for>>>.amount>>
dtext <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+45> <eval ((<dlocal._for>/3)*60)+115> <ddef.<f_moonsep 4,<def.ore.<dlocal._for>>>> <f_moonsep 3,<def.ore.<dlocal._for>>>
endfor
page 2
dtext 120 45 34 Ingot Menüsü
for <src.tag0.matfor>
gumppic <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+57> <eval ((<dlocal._for>/3)*60)+70> 9801
tilepichue <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+70> <eval ((<dlocal._for>/3)*60)+85> <serv.itemdef.<f_moonsep 2,<def.ore.<dlocal._for>>>.id> <ddef.<f_moonsep 4,<def.ore.<dlocal._for>>>>
tilepichue <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+60> <eval ((<dlocal._for>/3)*60)+86> <serv.itemdef.<f_moonsep 2,<def.ore.<dlocal._for>>>.id> <ddef.<f_moonsep 4,<def.ore.<dlocal._for>>>>
dtext <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+60> <eval ((<dlocal._for>/3)*60)+87> 0481 <qval (<src.tag0.matbanka>)?<eval <src.findlayer.layer_bankbox.rescount.<f_moonsep 2,<def.ore.<dlocal._for>>>.amount>+<src.rescount.<f_moonsep 2,<def.ore.<dlocal._for>>>.amount>> :<src.rescount.<f_moonsep 2,<def.ore.<dlocal._for>>>.amount>>
dtext <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+45> <eval ((<dlocal._for>/3)*60)+115> <ddef.<f_moonsep 4,<def.ore.<dlocal._for>>>> <f_moonsep 3,<def.ore.<dlocal._for>>>
endfor

[dialog d_mat button]
on=1
if (<src.tag0.matbanka>)
src.tag.matbanka=
else
src.tag.matbanka=1
endif
src.sysmessage <qval (<src.tag0.matbanka>)?Bankadaki esyalarinizda gosteriliyor.:Bankadaki esyalar gosterilmiyor.>

[dialog d_mat_reg]
0,0
bozobag 30,30,255,300
gumppic 26 15 9004
dbutton 195 295 1 0 1,Banka
dtext 120 45 34 Reg Menüsü
for 0 7
gumppic <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+57> <eval ((<dlocal._for>/3)*70)+70> 9801
tilepic <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+60> <eval ((<dlocal._for>/3)*70)+83> <serv.itemdef.<f_moonsep 5,<def.ore.<dlocal._for>>>.id>
tilepic <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+65> <eval ((<dlocal._for>/3)*70)+86> <serv.itemdef.<f_moonsep 5,<def.ore.<dlocal._for>>>.id>
dtext <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+63> <eval ((<dlocal._for>/3)*70)+87> 0481 <qval (<src.tag0.matbanka>)?<eval <src.findlayer.layer_bankbox.rescount.<f_moonsep 5,<def.ore.<dlocal._for>>>.amount>+<src.findid.<f_moonsep 5,<def.ore.<dlocal._for>>>.amount>> :<src.rescount <f_moonsep 5,<def.ore.<dlocal._for>>>.amount>>
dtext <eval ((<dlocal._for>*75)-((<dlocal._for>/3)*225))+50> <eval ((<dlocal._for>/3)*75)+115> 0481 <f_moonsep 6,<def.ore.<dlocal._for>>>
endfor

[dialog d_mat_reg button]
on=1
if (<src.tag0.matbanka>)
src.tag.matbanka=
else
src.tag.matbanka=1
endif
src.sysmessage @,,1 <qval (<src.tag0.matbanka>)?Bankadaki eşyalarda gösteriliyor.:Bankadaki eşyalar gösterilmiyor.>

[function ore]
src.tag.matfor=0 11
dialog d_mat

[function ingot]
src.tag.matfor 0 11
dialog d_mat,2

[function regs]
dialog d_mat_reg

[EOF]