[itemdef i_bsmalzeme1] //stone
id=i_virtstone_6
name=Vurz Stone
weight=1
type=t_script

on=@create
color=0482

on=@click
message @1153 <name>
return 1


[itemdef i_bsmalzeme2] //snow
id=i_virtstone_6
name=Grok Stone
weight=1
type=t_script

on=@create
color=0481

on=@click
message @1153 <name>
return 1

[itemdef i_bsmalzeme3] //ice
id=i_virtstone_6
name=Bruz Stone
weight=1
type=t_script

on=@create
color=0480

on=@click
message @1153 <name>
return 1

[itemdef i_virtue_bs]
id=i_reag_worm_heart
type=t_script
weight=1
name Virtue Stone

resources 20 i_ingot_iron, 1 i_bsmalzeme1, 1 i_bsmalzeme2, 1 i_bsmalzeme3
skillmake 100.0 Blacksmithing, 85.0 MAGERY

on=@create
color=07a8

on=@click
message @1153 <name> : <amount> tane
return 1

on=@dclick
target
src.sysmessage @1153,,1 Bir blackstaff seçiniz
return 1

on=@targon_char
return 1

on=@targon_ground
return 1

on=@targon_item
ref1=<src.targ.uid>
if !<ref1.isweapon>
src.sysmessage @1153,,1 <ref1.name> bir silah değil.
return 1
endif

if <ref1.baseid> != i_staff_black
src.sysmessage @1153,,1 Lütfen bir blackstaff seçiniz
return 1
endif

if <ref1.cont> != <src.findlayer.21.uid>
src.sysmessage @1153,,1 Eşya çantanızda olmalı.
return 1
endif

if <src.blacksmithing> < 700
src.sysmessage @1153,,1 Bunu kullanabilmek için en az 70.0 blacksmithing  bilginiz olmalı.
return 1
endif

if <ref1.morey> >= 1000
src.sysmessage @1153,,1 Bu silahı daha fazla geliştiremezsiniz.
return 1
endif


local.bs=<eval <src.blacksmithing>/10>

if <dlocal.bs> > 110
local.sans=3
elseif <dlocal.bs> > 99
local.sans=4
elseif <dlocal.bs> > 80
locao.sans=5
else
local.sans=6
endif

if <dlocal.bs> == 120
local.sansaktif=1
endif

if <dlocal.sansaktif> == 1
if <ref1.morey> <= 600
  ref1.morey +=200
  src.consume 1 i_virtue_bs
  src.sysmessage @1153,,1 İşlem başarılı.
  return 1
else
   local.sans -=1
   if rand(<dlocal.sans>) == 1
    ref1.morey +=200
    src.consume 1 i_virtue_bs
    src.sysmessage @1153,,1 İşlem başarılı.
   else
    src.consume 1 i_virtue_bs
    src.sysmessage @1153,,1 İşlem başarısız.
   endif
   return 1
endif
else
  if <eval rand(<dlocal.sans>)> == 1
   ref1.morey +=200
    src.consume 1 i_virtue_bs
    src.sysmessage @1153,,1 İşlem başarılı.
   else
    src.consume 1 i_virtue_bs
    src.sysmessage @1153,,1 İşlem başarısız.
   endif
  return 1
endif