[Comment SkillDummySistemi]
yazar:dummy kısmı sanırım Michaell diğer kısımlar KeLL
tarih:05 temmuz 2008 saat: 00 04
açıklama: normalde devamlı vurulan dummy lerden parayla izin belgesi alınır ve skill kasılır.
aşağıdaki trigger lar genel bi player eventine eklenicek
[chardef c_dummy] ///Skill Dummy
id=c_man
name #NAMES_HUMANMALE
can mt_equip
dam=0,1
armor=0
ON=@NPCRestock
ITEMNEWBIE=i_robe
color=07a1
armor=0
HITPOINTS=999
ITEMNEWBIE=i_hair_long
COLOR=01
on=@create
str=1
dex=1
int=1
HITS={9997 9999}
color=01
allskills=00
KARMA=-2000
FAME=0
NPC=brain_monster
ITEMNEWBIE=i_robe
attr=010
color=07a1
name @1153 Dummy Robe
HITPOINTS=999
ITEMNEWBIE=i_hair_long
COLOR=01
on=@click
message @1153 <name> the Skill Dummy
return 1
on=@dclick
if (<distance> > 3)
say_er Biraz yaklaşmalısın.
return 1
eliF (<src.restest 1 i_izinbelgesi>)
say_er Zaten izinlisin.İzin sürenin bitmesine <eval <src.findid.i_izinbelgesi.timer>/60> Dakika var.
return 1
else
src.sdialog d_dummysatinal
return 1
endif
on=@gethit
HITS 9999
str 1
dex 1
if (<flags> &statf_poisoned)
findid.i_rune_poison.remove
sound snd_spell_cure
else
HITS 9999
STR 1
DEX 1
on=@attack
return 1
[dialog d_dummysatinal]
50,50
nomove
resizepic 55 87 3500 320 220
resizepic 65 97 3000 300 200
dhtmlgump 70 100 300 100 0 0 <def.BFONT_lblue> Yeteneklerinizi dummy ile geliştirmek için 100.000 Altın karşılığında izin belgesi almalısınız.İzin belgesi aldıktan sonra 1 saat süreyle dummy lerde istediğiniz savaş yeteneğini geliştirebilirsiniz.
button 70 220 2511 2510 1 0 1
dhtmlgump 90 220 300 100 0 0 <def.BFONT_red> İzin Belgesi almak istiyorum!.
[dialog d_dummysatinal button]
on=0
sys_er Almaktan vazgeçtiniz.
on=1
if (<src.restest 1 i_izinbelgesi>)
src.sys_er Zaten belgen var.
elif (<src.gold> < 100000)
src.sys_er 100.000 Altının olmalı.
else
src.sys_ok 1 saat boyunca Dummy lerde yetenek geliştirebilirsiniz.
src.gold -=100000
newitem i_izinbelgesi
new.cont <uid>
endif
[itemdef i_izinbelgesi]
id i_memory
name izirnci
layer layer_special
TYPE=t_eq_script
on=@create
attr attr_decay|attr_invis|attr_newbie
timer 60*60
on=@timer
cont.sys_er İznin bitti artık daha fazla skill dummy le kasamazsın.
cont.Flags = <cont.FLAGS> & ~statf_war
remove
return 1
//// genel player eventine eklenicek kısım ////
On=@Attack
if !(<restest 1 i_izinbelgesi>) && (<src.baseid> == c_dummy)
sys_er İzin belgeniz yokken Dummy lerde skill kasamazsınız!.
action -1
Flags = <SRC.FLAGS> & ~statf_war
return 1
endif
on=@hit
if !(<restest 1 i_izinbelgesi>) && (<act.baseid> == c_dummy)
sys_er İzin belgeniz yokken Dummy lerde skill kasamazsınız!.
Flags = <FLAGS> & ~statf_war
return 1
endif
On=@HitTry
if !(<restest 1 i_izinbelgesi>) && (<act.baseid> == c_dummy)
sys_er İzin belgeniz yokken Dummy lerde skill kasamazsınız!.
Flags = <FLAGS> & ~statf_war
return 1
endif
