xwerswoodx -  15-08-2009 10:08
Kod:
//*************************************
// YAZAR: xwerswoodx
// YAPIM: Hamit Devecioğlu (c)2003-2009
// TARİH: 15.08.2009
// SAAT : 10:01
// KONU : Upgrade Stone
//*************************************
VERSION=0.56b

[Itemdef i_silver]
Id=i_gold
Name=sp
Type=t_gold

On=@Create
color=0494

On=@click
message @048 <amount> <serv.name> <name>
return 1

[Defname upgrade]
up_normal 1500
up_ruin 3000
up_might 6000
up_force 12000
up_power 24000
down_ruin 1000
down_might 2000
down_force 4000
down_power 8000
fail_normal 250
fail_ruin 500
fail_might 1000
fail_force 2000
fail_power 4000

[Itemdef i_stone_upgrade]
Id=i_grave_stone
Name=Upgrade Stone
Type=t_normal

on=@Create
color=0494
Attr=attr_static

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

on=@dclick
TARGET @0488 Hangi esyayi upgrade edeceksiniz.
return 1

on=@targon_char
src.sysmessage @026 sadece kilinclar.
return 1

on=@targon_ground
src.sysmessage @026 sadece kilinclar.
return 1

on=@targon_item
if (<src.targ.isweapon>)
if (<src.targ.baseid>==<src.targ.dispid>_vanq)
src.sysmessage @026 Bunu daha fazla yukseltemezsiniz.
return 1
else
if (<src.targ.baseid>==<src.targ.dispid>_ruin)
if (<src.restest <ddef.up_ruin> i_silver>)
src.ctag.yap might
src.ctag.guc ruin
Dorand 10
src.f_h1
src.f_h2
src.f_h3
src.f_h1
src.f_h1
src.f_h1
src.f_h2
src.f_h3
src.f_h1
src.f_h1
enddo
return 1
else
src.ht Üstünüzde <ddef.up_ruin> sp yok.
return 1
endif
elseif (<src.targ.baseid>==<src.targ.dispid>_might)
if (<src.restest <ddef.up_might> i_silver>)
src.ctag.yap force
src.ctag.guc might
src.ctag.dus ruin
Dorand 5
src.f_h1
src.f_h2
src.f_h3
src.f_h2
src.f_h1
src.f_h2
src.f_h2
src.f_h3
src.f_h1
src.f_h1
enddo
return 1
else
src.ht Üstünüzde <ddef.up_might> sp yok.
return 1
endif
elseif (<src.targ.baseid>==<src.targ.dispid>_force)
if (<src.restest <ddef.up_force> i_silver>)
src.ctag.yap power
src.ctag.guc force
src.ctag.dus might
Dorand 5
src.f_h1
src.f_h2
src.f_h3
src.f_h2
src.f_h1
src.f_h2
src.f_h2
src.f_h3
src.f_h1
src.f_h2
enddo
return 1
else
src.ht Üstünüzde <ddef.up_force> sp yok.
return 1
endif
elseif (<src.targ.baseid>==<src.targ.dispid>_power)
if (<src.restest <ddef.up_power> i_silver>)
src.ctag.yap vanq
src.ctag.guc power
src.ctag.dus force
Dorand 5
src.f_h1
src.f_h2
src.f_h3
src.f_h2
src.f_h1
src.f_h2
src.f_h2
src.f_h3
src.f_h2
src.f_h2
enddo
return 1
else
src.ht Üstünüzde <ddef.up_power> sp yok.
return 1
endif
elseif (<src.targ.baseid>==<src.targ.dispid>_vanq)
src.ht Bunu daha fazla yükseltemezsiniz.
return 1
elseif (<src.targ.baseid>==<src.targ.dispid>)
if (<src.restest <ddef.up_normal> i_silver>)
src.ctag.yap ruin
src.ctag.guc normal
Dorand 5
src.f_h1
src.f_h1
src.f_h2
src.f_h1
src.f_h1
src.f_h1
src.f_h1
src.f_h1
src.f_h1
src.f_h2
enddo
return 1
else
src.ht Üstünüzde <ddef.up_normal> sp yok.
return 1
endif
else
src.ht Bunu yükseltemezsin.
return 1
endif
endif
else
src.ht Bunu yükseltemezsin.
return 1
endif


[Function f_h1] // Yapıldı.
src.targ.remove
src.consume <ddef.up_<src.ctag.guc>> i_silver
src.newitem <src.targ.dispid>_<src.ctag.yap>
new.bounce
src.nht Kılıncınız <src.ctag.yap> <serv.itemdef.<src.targ.dispid>.name> gücüne yükseltildi.
src.ctag.yap
src.ctag.guc
return 1

[Function f_h2] // Patladı.
src.targ.remove
src.consume <ddef.up_<src.ctag.guc>> i_silver
src.newitem i_silver,<ddef.fail_<src.ctag.guc>>
new.bounce
src.ht Kılıncınız patladığı için teselli parası aldınız.
src.ctag.yap
src.ctag.guc
return 1

[Function f_h3] // Düştü.
src.targ.remove
if (<src.targ.baseid>==<src.targ.dispid>_ruin)
src.consume <ddef.up_<src.ctag.guc>> i_silver
src.newitem <src.targ.dispid>
new.bounce
src.newitem i_silver,<ddef.down_ruin>
new.bounce
src.ht Silahiniz patlamadan biraz hasar aldi ve <serv.itemdef.<src.targ.dispid>.name> gücüne düştü.
src.ctag.yap
src.ctag.guc
return 1
else
src.consume <ddef.up_<src.ctag.guc>> i_silver
src.newitem <src.targ.dispid>_<src.ctag.dus>
new.bounce
src.newitem i_silver,<ddef.down_<src.ctag.guc>>
new.bounce
src.ht Silahiniz patlamadan biraz hasar aldi ve <src.ctag.dus> <serv.itemdef.<src.targ.dispid>.name> gücüne düştü.
src.ctag.yap
src.ctag.guc
return 1
endif

[Function ht]
src.sysmessage @026,,1 <args>
return 1

[Function nht]
src.sysmessage @75,,1 <args>
return 1

[Defname weapon_fix]
color_200 05
color_400 045
color_600 075
color_800 025
color_1000 095

[Events e_weapfix]
On=@itemclick
if (<act.isweapon>)
act.color=<def.color_<act.morey>>
endif

//Morey Öğren!
[Function ifo]
targetf f_ifo

[Function f_ifo]
obj=<argo>
src.ht <obj.morey>
return 1

YORUMLAR (1)

aydin 16-08-2009 21:07    
dorand 5 yazıp 10 tane random işi değeri koymuşsun

BENZER SAYFALAR