Arkadaşlar hazine sistemi tek sorun var yapıyorum ama olmuyor nedensen scp ti yazdım bakın şöyle.
[itemdef i_map_of_treasure]
NAME=Treasure Map
ID=i_map_rolled
VALUE=5000
TYPE=t_normal
WEIGHT=3
ON=@Create
tag.status=Acilmamis
color=06aa
f_treasure_selection
on=@click
message @03b2,,1, <name>
message @50,,1 (<tag.status>)
return 1
on=@dclick
if (<more2>) && !(<more1>) && !(<src.isnextp <eval <morex>> <eval <morey>> 10>)
sdialog d_treasure_map
elif (<topobj.uid>!=<src>) && !(<src.isgm>)
src.sysmessage @38,,1 Hata: Cantanizda olmadan kullanamazsiniz.
elif (<more1>)
src.sysmessage @38,,1 Hata: Bu hazine zaten daha once bulunmus.
elif (<more2>)
IF (<src.isnextp <eval <morex>> <eval <morey>> 10>)
IF !(<src.findid.i_shovel>)
src.sysmessage @38,,1 Hata: Shovel ihtiyaciniz var.
else
IF !(<attr> & 04)
FOR 2
serv.newnpc=c_orc_treasure
new.p=<morep>
new.fix
new.home=<new.p>
new.homedist 5
new.removetimer <EVAL 60*30>
ENDFOR
FOR 2
serv.newnpc=c_rotting_treasure
new.p=<morep>
new.fix
new.home=<new.p>
new.homedist 5
new.removetimer <EVAL 60*30>
ENDFOR
serv.newnpc=c_m_cyclops_king_treasure
new.p=<morep>
new.fix
new.home=<new.p>
new.homedist 5
new.removetimer <EVAL 60*30>
serv.newnpc=c_m_efreet
new.p=<morep>
new.fix
new.home=<new.p>
new.homedist 5
new.removetimer <EVAL 60*30>
serv.newnpc=c_m_dragon_crystal_treasure
new.p=<morep>
new.tag.prizemoney=<eval <src.cartography>*10>
new.tag.prizeitem=<hval <def.random_treasure_prize>>
new.moveback
new.fix
new.home=<new.p>
new.homedist 5
new.events +e_treasure_chest
new.removetimer <EVAL 60*30>
new.say @50 Benim hazinemi almak ???
new.effect 1,i_gold,20,20
ELSE
FOR 2
serv.newnpc=c_orc_treasure
new.p=<morep>
new.fix
new.home=<new.p>
new.homedist 5
new.removetimer <EVAL 60*30>
ENDFOR
FOR 2
serv.newnpc=c_rotting_treasure
new.p=<morep>
new.fix
new.home=<new.p>
new.homedist 5
new.removetimer <EVAL 60*30>
ENDFOR
serv.newnpc=c_m_cyclops_king_treasure
new.p=<morep>
new.fix
new.home=<new.p>
new.homedist 5
new.removetimer <EVAL 60*30>
serv.newnpc=c_m_efreet
new.p=<morep>
new.fix
new.home=<new.p>
new.homedist 5
new.removetimer <EVAL 60*30>
serv.newnpc=c_m_dragon_crystal_treasure
new.p=<morep>
new.tag.prizemoney=<eval <src.cartography>*10>
new.tag.prizeitem=<hval <def.random_treasure_prize>>
new.moveback
new.fix
new.home=<new.p>
new.homedist 5
new.events +e_treasure_chest
new.removetimer <EVAL 60*30>
new.say @50 Yok olun!! Yoksa sizi oldururum !
new.effect 1,i_gold,20,20
ENDIF
tag.status=Hazine bulundu
src.sysmessage @03b2,,1, Hazine'nin sahibi olmaniz icin butun yaratiklari oldurmeniz gerekmektedir.
more1=1
ENDIF
ENDIF
aha bunu scp ti yazdım dclick altına eklıorum ama nedense olmadı biri el atsın
if (<src.targ.morex>=7)
if (<src.lockpicking><120.0)
SRC.sysmessage @38,,1 Hata: Bunu acmak icin 120.0 lockpicking skilline sahip olmalisin !
return 1
endif
// başlığı kurallara uygun şekilde giriniz. bir dahaki sefere uyarı alıcaksınız..
+ ustune nerde yanlıs yapcamı yazsaydın iyi olurdu :)
Bu konu HayaL tarafından düzenlendi(2009-03-18 02:29, 16 yıl önce)
