Tamam yaptım çok teşkkür ederim ama birkaç sorun daha var
1-) Hazineyi açınca çıkan npcler hazinenin çıktığı yerden çok uzaklaşıyorlar.
2-) Hazineyi açmak için bütün npcleri öldürmesini istiyorum
3-) Hazine Haritasını açıyorum, hazinenin olduğu yere gidiyorum haritaya 2 kere tıkladığımda Defineyi aramaktan vazgeçtiniz diyor(BAZEN)
4-) Hazineyi açınca Ok silinmiyor oyundan çıkıp girmem gerekiyor?
Script:
[itemdef i_cont_define]
NAME=Treasure Container
ID=i_box_brass
TYPE=t_normal
weight 0.1
ON=@CREATE
COLOR 07a0
NAME=Treasure Container
ID=i_box_brass
TYPE=t_normal
weight 0.1
ON=@CLICK
MESSAGE @58,,1 Belirsiz sandik
return 1
ON=@DCLICK
if (<topobj.uid> != <src.uid>)
src.sysmessage @037,,1 Bunu kullanabilmeniz için çantanızda olmalı.
return 1
endif
SRC.SAYUA 920,6,6,0 * Sandığı kırar *
src.newitem i_define_haritasi
src.act.equip
src.sysmessage @0482,,1 Bilinmeyen bir kağıt parçası çıktı.
remove
return 1
[itemdef i_bottle_define]
NAME=SOS Bottle
ID=i_bottle_ale
TYPE=t_normal
weight 0.1
value 9
ON=@CREATE
COLOR 070d
ON=@CLICK
MESSAGE @58 s.o.s bottle
return 1
ON=@DCLICK
if (<topobj.uid> != <src.uid>)
src.sysmessage @37,,1 Bunu kullanabilmeniz için çantanızda olmalı.
return 1
endif
SRC.SAYUA 920,6,6,0 * Şişeyi Kırar *
src.newitem i_define_haritasi
src.act.equip
src.sysmessage @0482,,1 Bilinmeyen bir kağıt parçası çıktı.
remove
return 1
[itemdef i_define_haritasi]
NAME=Treasure Map
ID=i_map_rolled
TYPE=t_normal
SKILLMAKE=SKILL_CARTOGRAPHY 95.0, Skill_Magery 70.0
ON=@Create
tag.status="Cözülmemiş"
tag.tachado=0
tag.decifrado=0
color=07a1
f_selecionar_local_tesouro
on=@click
message @68 <name>
message @48 (<tag.status>)
return 1
on=@dclick
if (<src.distance> > 5)
src.sysmessage @0482,,1 Defineye Çok Uzaktasın.
return 1
elseif !(<cont>)
src.sysmessage @0482,,1 Bu Haritayı Herkesin İçinde Okumayı Tavsiye Etmiyoruz.
return 1
elseif (<tag.tachado>==1)
src.sysmessage @0482,,1 Bu Harita Birisi Tarafından Bulunmuş.Çoktan Ganimete Ulaşmıştır.
return 1
elseif (<tag.decifrado>==1) && (<src.isnextp <eval <tag.tpx>> <eval <tag.tpy>> 10>) && !(<src.findid.i_shovel>)
src.sysmessage @0482,,1 Defineyi Açmak İçin Küreğe İhtiyacınız Var.
return 1
elseif (<tag.decifrado>==1) && (<src.isnextp <eval <tag.tpx>> <eval <tag.tpy>> 10>) && (<src.findid.i_shovel>)
serv.newnpc=c_rotting
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
new.fix
new.home=<new.p>
new.homedist 10
local.npc1=<new.uid>
serv.newitem=i_tesouro_monstro
new.cont=<local.npc1>
new.timer=2800
serv.newnpc=c_rotting
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
new.fix
new.home=<new.p>
new.homedist 10
local.npc1=<new.uid>
serv.newitem=i_tesouro_monstro
new.cont=<local.npc1>
new.timer=2800
serv.newnpc=c_m_liche_lord
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
new.fix
new.home=<new.p>
new.homedist 10
local.npc1=<new.uid>
serv.newitem=i_tesouro_monstro
new.cont=<local.npc1>
new.timer=2800
serv.newnpc=c_m_orc_brute
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
new.fix
new.home=<new.p>
new.homedist 10
local.npc1=<new.uid>
serv.newitem=i_tesouro_monstro
new.cont=<local.npc1>
new.timer=2800
serv.newnpc=c_m_orc_bomber
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
new.fix
new.home=<new.p>
new.homedist 10
local.npc1=<new.uid>
serv.newitem=i_tesouro_monstro
new.cont=<local.npc1>
new.timer=2800
serv.newnpc=c_dragon_hazineci
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
new.fix
new.home=<new.p>
new.homedist 10
new.events +e_tesouro_chefe
local.npc1=<new.uid>
new.say @0482,,1 Kim Benim Hazinemi Almaya Kalkıştı ?
new.tag.tpx=<tag.tpx>
new.tag.tpy=<tag.tpy>
new.tag.prizemoney=<eval <src.cartography>*10>
new.tag.prizeitem=<hval <def.random_treasure_prize>>
new.effect 1,i_gold,20,20
local.container=<new.uid>
serv.newitem=i_tesouro_monstro
new.timer=3000
tag.status="Hazine Bulundu"
src.sysmessage @0482,,1 Hazineye El Koyabilmek İçin Bütün Yaratıkları Öldürmen Gerekiyor.
tag.tachado=1
return 1
elseif (<tag.decifrado>==0) && (<eval RAND(6)>==1) && (<src.cartography> > 99.9)
tag.decifrado=1
src.message @0482,,1 Haritayı çözmeyi başardınız.
tag.status="<src.name> Tarafından Cözülmüş"
dispid=i_map
update
return 1
endif
if !(<src.cartography> > 99.9)
src.sysmessage @037,,1 Haritadaki bilgileri anlicak kadar yetenekli degilsiniz.
return 1
elseif (<tag.decifrado>==0) && (<cont>==<src.findlayer.21.uid>)
src.sysmessage @0482,,1 Harita hakkında bilgi edinemediniz!
update
return 1
elseif (<src.var.okcikartti> == 2)
src.sysmessage @0482,,1 Defineyi aramaktan vazgeçtiniz.
src.var.okcikartti 0
src.arrowquest
return 1
elseif (<cont>==<src.findlayer.21.uid>) && (<src.var.okcikartti> == 0)
src.arrowquest <eval <tag.tpx>>,<eval <tag.tpy>>
src.sysmessage @88,,1 Haritaya Göre Hazine <tag.lugar> Civarlarında.
src.var.okcikartti 2
return 1
elseif (<cont>==0)
return 1
endif
[function isnextp]
src.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <argn1>>,<eval <argn2>>
IF (<new.distance> < <argn3>) || (<new.distance>==<argn3>)
new.remove
return 1
else
new.remove
return 0
ENDIF
[ITEMDEF i_tesouro_monstro]
NAME=Monstros Tesouro Mem
ID=i_memory
TYPE=t_eq_script
LAYER=30
ON=@Timer
cont.remove
[events e_tesouro_chefe]
ON=@DEATHCORPSE
serv.newitem=t_tc_1
new.color=07ad
new.attr=attr_decay|attr_move_never
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>,<eval <p.z>>
new.timer=600
try uid.<uid.<argo.uid>.more2>.sysmessage @0482,,1 Hazine Korumlarını Öldürdün, Kasayi Alabilirsin.
try uid.<uid.<argo.uid>.more2>.arrowquest
src.var.okcikartti 0
[function f_selecionar_local_tesouro]
DORAND 13
BEGIN
tag.tpx=2737
tag.tpy=538
tag.lugar="Minoc Mage Yakınları."
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=1229
tag.tpy=908
tag.lugar="Yew Köprü yakınlarında"
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=3056
tag.tpy=769
tag.lugar="Vesper Territory "
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=3181
tag.tpy=810
tag.lugar="Vesper Territory"
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=2499
tag.tpy=924
tag.lugar="Cove Territory Mağara Girişi."
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=525
tag.tpy=2058
tag.lugar="Skara Brae dolaylarında"
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=1854
tag.tpy=3215
tag.lugar="Trinsic Eski Ev Yakınları"
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=3688
tag.tpy=2036
tag.lugar="Magincia kıyılarında"
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=627
tag.tpy=1487
tag.lugar="Yew'de orcların doğdugu yer"
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=723
tag.tpy=1156
tag.lugar="Yew mezarın karşısı"
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=2769
tag.tpy=886
tag.lugar="Minoc Mezar Girişi"
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=2110
tag.tpy=38
tag.lugar="Wrong yakınları"
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
BEGIN
tag.tpx=2317
tag.tpy=1037
tag.lugar="Cove yakınları"
serv.newitem=i_gold
new.attr=attr_invis|attr_decay
new.p=<eval <tag.tpx>>,<eval <tag.tpy>>
END
ENDDO
new.fix
new.timer=1
IF (<new.region.flags>==<new.region.flags>|region_flag_guarded) || (<new.region.flags>==<new.region.flags>|region_flag_safe) || (0<uid.<new.region.uid>.type>==t_multi) || (<new.isneartype t_rock>) || (<new.isneartype t_tree>) || (<new.isneartype t_door>) || (<new.isneartype t_wall>) || (<new.isneartype t_water>)
f_selecionar_local_tesouro
ENDIF
[ITEMDEF i_tc_1]
ID=i_chest_metal
NAME=treasure chest
TYPE=t_container
FLIP=1
WEIGHT=1
ON=@Create
MORE=0515
MOREY=985
MOREX=1
ATTR=0012
color=07e5
timer 600
ON=@DClick
IF ( <TYPE> == t_container )
TIMER=60
RETURN 0
ENDIF
on=@pickup_ground
return 1
ON=@Timer
REMOVE
RETURN 1
ON=@Click
message @0455,,1 Treasure Chest
RETURN 1
CATEGORY=Treasure Chest
SUBSECTION=Treasure Chest
DESCRIPTION=Treasure Ches
[TEMPLATE t_tc_1]
NAME=treasure chest
CATEGORY=treasure chest
CONTAINER i_tc_1
ITEM=i_tl,{55201 65000}
ITEM=RANDOM_WEAPON_vanq,R2
ITEM=i_egg_ostard,R4
ITEM=i_egg_ostard,R5
ITEM=i_gold,65000
ITEM=i_gold,65000
ITEM=i_bs15,R2
ITEM=i_warrior_robe,R2
//ITEM=i_poison_bow,R4 }
[CHARDEF c_dragon_hazineci]
DEFNAME=c_dragon_hazineci
NAME=Champion Dragon
ID=c_DRAGON_RED
SOUND=snd_MONSTER_DRAGON1
ICON=i_pet_dragon
CAN=MT_WALK|MT_FLY|MT_RUN|MT_FIRE_IMMUNE
DAM=25,40
ARMOR=36
FOODTYPE=80 t_meat_raw
DESIRES=i_gold
AVERSIONS=r_civilization,r_water
CATEGORY=Monsters
SUBSECTION=Dragons and Drakes
DESCRIPTION=Hazine Dragon
ON=@Create
NPC=brain_dragon
COLOR=080a
STR={4500 5900}
DEX={886 1905}
INT={1435 1675}
PARRYING=1200.0
MAGERY=1600.0
MAGICRESISTANCE=800.0
TACTICS=100.0
WRESTLING=100.0
TAMING=120.0
FAME={3000 9000}
KARMA={-4999 -5999}
ITEMNEWBIE=i_spellbook
ADDSPELL=s_explosion
on=@deathcorpse
src.remove
return 1
on=@death
src.newitem=t_tc_1
src.act.drop
src.act.p <act.p>
src.act.move e 5
on=@gethit
if (<act.baseid>=c_vortex)
sayua 0835,6,0,enu * Büyü Etkisini Kaldırır. *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_blade_spirit)
sayua 0835,6,0,enu * Büyü Etkisini Kaldırır. *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_snake)
sayua 0835,6,0,enu * Büyü Etkisini Kaldırır. *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_daemon_w_sword)
sayua 0835,6,0,enu * Büyü Etkisini Kaldırır.*
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_elem_air)
sayua 0835,6,0,enu * Büyü Etkisini Kaldırır. *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_elem_earth)
sayua 0835,6,0,enu * Büyü Etkisini Kaldırır. *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_elem_fire)
sayua 0835,6,0,enu * Büyü Etkisini Kaldırır. *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
if (<act.baseid>=c_elem_water)
sayua 0835,6,0,enu * Büyü Etkisini Kaldırır. *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
endif
On=@SPELLEFFECT
IF (<ARGN>=51) // (Koşan) KalVaZ
sayua 0835,6,0,enu * Etkilenmez *
SPELLEFFECT s_cure,1000
RETURN 1
ENDIF
IF (<ARGN>=57) ///In Vas Por (ÇUFF SERİL)
sayua 0835,6,0,enu * Etkilenmez *
SPELLEFFECT s_cure,1000
RETURN 1
ENDIF
IF (<ARGN>=49) // Vas Ort Grav Comboooo
sayua 0835,6,0,enu * Etkilenmez *
SPELLEFFECT s_cure,1000
RETURN 1
ENDIF
IF (<ARGN>=55) // Flam Kal Des Ylem
sayua 0835,6,0,enu * Etkilenmez *
SPELLEFFECT s_cure,1000
RETURN 1
ENDIF
IF (<ARGN>=38) // An EZ Por
sayua 0835,6,0,enu * Etkilenmez *
SPELLEFFECT s_cure,1000
RETURN 1
ENDIF
IF (<ARGN>=47) // In EZ Grav
sayua 0835,6,0,enu * Etkilenmez *
SPELLEFFECT s_cure,1000
RETURN 1
ENDIF
[EOF]
Bu konu OwNeR_ThreaT tarafından düzenlendi(2010-09-02 14:21, 13 yıl önce)
