|

on=@deathcorpse
argo.type t_shire
[itemdef i_sc]
id i_scroll_blank
name Resurrector Scroll
on=@create
color 07a1
on=@click
message @07a1,,1 <amount> <name>
return 1
on=@dclick
if !(<topobj.uid> == <src.uid>)
src.sysmessage @38,6,1 Hata Bunu ancak Cantanizda kullana bilirsiniz.
return 1
else
src.sdialog d_kuluckaa
target @044,,1 Hangi hayvana hayat vereceksiniz.
return 1
endif
on=@targon_item
if (<src.targ.distance> > 2)
src.hata Binegin Cesedine uzaksiniz.
return 1
endif
if !(<src.targ.link> == 04fffffff)
src.hata Bu bir insan cesedi.
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_Shire)
src.targ.remove
src.tag0.gerek 50
src.newnpc c_shire
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_zostrich)
src.targ.remove
src.tag0.gerek 3
src.newnpc c_ostard_zostrich
new.sayu * Zostrich hayata döner *
src.sayu <src.name> Binek'i Basariyla Resledi...
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]<src.name> Basarıyla Yatmis <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_desert)
src.targ.remove
src.tag0.gerek 2
src.newnpc c_ostard_desert
new.sayu * Desert Ostard hayata döner *
src.sayu <src.name> Binek'i Basariyla Resledi...
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]<src.name> Basarıyla Yatmis <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_forest)
src.targ.remove
src.tag0.gerek 4
src.newnpc c_ostard_forest
new.sayu * Forest Ostard hayata döner *
src.sayu <src.name> Binek'i Basariyla Resledi...
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]<src.name> Basarıyla Yatmis <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_fantom)
src.targ.remove
src.tag0.gerek 160
src.newnpc c_Fantom
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_Friesian)
src.targ.remove
src.tag0.gerek 70
src.newnpc c_a_Friesian
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_mare)
src.targ.remove
src.tag0.gerek 150
src.newnpc c_mare
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_mustang_rare)
src.targ.remove
src.tag0.gerek 50
src.newnpc c_mustang_rare
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_a_desert)
src.targ.remove
src.tag0.gerek 55
src.newnpc c_arcane_desert
new.sayu * Shire hayata döner *
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_asasin)
src.targ.remove
src.tag0.gerek 45
src.newnpc c_asasin
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
//elseif (<src.targ.type> == t_fear)
src.targ.remove
src.tag0.gerek 70
src.newnpc c_fear
new.sayu * Fear Mustang hayata döner *
src.sayu <src.name> Binek'i Basariyla Resledi...
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]<src.name> Basarıyla Yatmis <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_poison)
src.targ.remove
src.tag0.gerek 200
src.newnpc c_m_poison
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_fire)
src.targ.remove
src.tag0.gerek 220
src.newnpc c_fire
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_unicorn)
src.targ.remove
src.tag0.gerek 120
src.newnpc c_unicorn
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_fire)
src.targ.remove
src.tag0.gerek 50
src.newnpc c_steed_fire
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_silver)
src.targ.remove
src.tag0.gerek 80
src.newnpc c_m_silver
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_kirin)
src.targ.remove
src.tag0.gerek 100
src.newnpc c_m_kirin
src.sayu Wis An Corp
src.effect 3,i_fx_sparkle,6,10
src.sfx 01f7
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]: <src.name> Basariyla Olmus Olan <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
if !(<src.restest <src.tag0.gerek> i_sc>)
src.hata Yetersiz scroll.
return 1
elseif (<src.targ.type> == t_axta)
src.targ.remove
src.tag0.gerek 45
src.newnpc c_axta
new.sayu * Axta hayata döner *
src.sayu <src.name> Binek'i Basariyla Resledi...
serv.allclients sysmessage @0785,1,1 [Binek Res Haber]<src.name> Basarıyla Yatmis <argo.name> Reslemeyi Basardi...
new.color <src.targ.color>
new.p <src.targ.p>
olartikamg
return 1
endif
on=@targon_groud
return 1
on=@targon_char
return 1
[function hata]
sysmessage @38,,1 <args>
[function olartikamg]
src.act.newitem i_memory
src.act.act.attr 04
src.act.act.more1 04
src.act.act.more2 <serv.time>
src.act.act.morep <src.act.p>
src.act.act.color memory_ipet
src.act.act.timer -1
src.act.act.link <src.uid>
src.act.act.cont <src.act.uid>
src.act.flags <src.act.flags>&statf_pet
src.act.anim 6
src.consume <src.tag0.gerek> i_sc
//////////////////////////////////////////////////////////////////////
[dialog d_kuluckaa]
100, 100
PAGE 0
nomove
resizepic 15 0 3600 300 500 // Ana background
//resizepic 10 10 3000 300 260
dtext 60 10 68 -Binek Res Scroll sistemi-
dtext 75 50 1153 +
dtext 125 50 1153 = 50 Res Scroll
tilepichue 85 50 <serv.itemdef.i_scroll_blank.id> 1153
tilepichue 22 50 <serv.itemdef.i_pet_horse_brown_lt.id> 2118
dtext 75 85 1153 +
dtext 125 85 1153 = 50 Res Scroll
tilepichue 85 85 <serv.itemdef.i_scroll_blank.id> 1153
tilepichue 22 85 <serv.itemdef.i_pet_horse_brown_dk.id> 2219
dtext 75 120 1153 +
dtext 125 120 1153 = 70 Res Scroll
tilepichue 85 120 <serv.itemdef.i_scroll_blank.id> 1153
tilepichue 22 120 <serv.itemdef.i_pet_horse_brown_dk.id> 1109
dtext 75 150 1153 +
dtext 125 150 1153 = 80 Res Scroll
tilepichue 85 150 <serv.itemdef.i_scroll_blank.id> 1153
tilepichue 22 150 <serv.itemdef.i_pet_horse_brown_lt.id> 1154
dtext 75 180 1153 +
dtext 125 180 1153 = 100 Res Scroll
tilepichue 85 180 <serv.itemdef.i_scroll_blank.id> 1153
tilepichue 22 180 <serv.itemdef.i_pet_horse_brown_lt.id> 43
dtext 75 220 1153 +
dtext 125 220 1153 = 120 Res Scroll
tilepichue 85 220 <serv.itemdef.i_scroll_blank.id> 1153
tilepichue 22 220 <serv.itemdef.i_pet_horse_brown_dk.id> 1153
dtext 75 260 1153 +
dtext 125 260 1153 = 150 Res Scroll
tilepichue 85 260 <serv.itemdef.i_scroll_blank.id> 1153
tilepichue 22 260 <serv.itemdef.i_pet_horse_brown_dk.id> 1104
dtext 75 300 1153 +
dtext 125 300 1153 = 160 Res Scroll
tilepichue 85 300 <serv.itemdef.i_scroll_blank.id> 1153
tilepichue 22 300 <serv.itemdef.i_pet_horse_brown_lt.id> <eval 080a>
dtext 75 340 1153 +
dtext 125 340 1153 = 200 Res Scroll
tilepichue 85 340 <serv.itemdef.i_scroll_blank.id> 1153
tilepichue 22 340 <serv.itemdef.i_pet_horse_brown_lt.id> <eval 07c5>
dtext 75 380 1153 +
dtext 125 380 1153 = 220 Res Scroll
tilepichue 85 380 <serv.itemdef.i_scroll_blank.id> 1153
tilepichue 22 380 <serv.itemdef.i_pet_horse_brown_dk.id> <eval 0823>
else
////////////////////////////// types
[typedef t_mare]
[typedef t_desert]
[typedef t_forest]
[typedef t_zostrich]
[typedef t_fantom]
[typedef t_poison]
[typedef t_fire]
[typedef t_Shire]
[typedef t_asasin]
[typedef t_asd]
[typedef t_Friesian]
[typedef t_mustang_rare]
[typedef t_a_llama]
[typedef t_a_desert]
[typedef t_fly]
[typedef t_unicorn]
[typedef t_fire]
[typedef t_silver]
[typedef t_kirin]
[typedef t_axta]
[EOF]
[itemdef i_sc]
id i_scroll_blank
name Resurrector Scroll
on=@create
color 07a1
on=@click
message @07a1,,1 <amount> <name>
return 1
on=@dclick
if !(<topobj.uid> == <src.uid>)
src.sysmessage @38,6,1 Hata Bunu ancak Cantanizda kullana bilirsiniz.
return 1
else
target
src.sysmessage @044,,1 Hangi hayvana hayat vereceksiniz.
return 1
endif
on=@targon_item
if (<src.targ.distance> >= 4)
src.sysmessage @07a1,,1 Binegin Cesedine uzaksiniz.
return 1
endif
if !( <src.targ.type> == t_corpse )
src.sysmessage @07a1,,1 Yalnizca cesetler uzerinde kullanilir.
return 1
endif
if !( <src.restest 50 i_sc>)
src.sysmessage @07a1,,1 Binek reslemek icin cantanizda en az 50 adet scroll olmali.
return 1
endif
if (<src.targ.morex> = 26476 ) //shire
src.consume 50 i_sc //gereken kagit miktari
serv.newnpc c_shire // hangi binegi istiyorsan.
new.color <src.targ.color> // hedef rengi
new.p <src.targ.p> // binegin cikacagi hedef
new.f_makepetof <src> //sahibine gider.
update // yeni cikan npc fix
argo.remove // ceset silinmesi
src.sayu Binegi resler...
serv.allclients sysmessage @0785,1,1 [Binek Res Haber] <src.name> Basarıyla Yatmis <argo.name> Reslemeyi Basardi...
endif
if (<src.targ.morex> = 25959 ) //mustang
src.consume 50 i_sc
serv.newnpc c_mustang
new.color <src.targ.color>
new.p <src.targ.p>
new.f_makepetof <src>
update
argo.remove
src.sayu Binegi resler...
serv.allclients sysmessage @0785,1,1 [Binek Res Haber] <src.name> Basarıyla Yatmis <argo.name> Reslemeyi Basardi...
endif
if (<src.targ.morex> = 26541 ) //Mare
src.consume 50 i_sc
serv.newnpc c_nightmare
new.color <src.targ.color>
new.p <src.targ.p>
new.f_makepetof <src>
update
argo.remove
src.sayu Binegi resler...
serv.allclients sysmessage @0785,1,1 [Binek Res Haber] <src.name> Basarıyla Yatmis <argo.name> Reslemeyi Basardi...
endifEğer f_makepetof fonksiyonunda hata alırsan boş bir yere bunu da ekle. (reslenince tame olayından kurtarıyor)[FUNCTION F_MakePetOf]
SERV.NEWITEM=I_MEMORY
NEW.COLOR=MEMORY_IPET
NEW.MORE1=04
NEW.MORE2=<SERV.TIME>
NEW.MOREP=<P>
NEW.LINK=<ARGS>
new.cont=<uid>
on=@deathcorpse
argo.type t_shire
[typedef t_Shire]
morex 26476//shireyadaon=@deathcorpse
argo.type t_shire
argo.morex 26476gibi bir ekleme de işe yarayabilir.
|
|
| Konu | Kategori | Son cevap | Son yazan | Mesaj | Görüntüleme | |
|---|---|---|---|---|---|---|
|
|
Save esnasında item silinmesi
Son cevap: 26-05 00:02 · Son yazan: mahsuni · Mesaj: 2 · Görüntü: 2994
|
Konsol Hataları | 26-05 00:02 | 2 | 2994 | |
|
|
world save yardımı
Son cevap: 24-05 19:03 · Son yazan: M.CANILIK · Mesaj: 4 · Görüntü: 5073
|
Sphere Releases | 24-05 19:03 | 4 | 5073 | |
|
|
Save yazısının rengini değiştirmek
Son cevap: 02-05 16:30 · Son yazan: MirroR · Mesaj: 23 · Görüntü: 18546
|
ITEM Script Yardımı | 02-05 16:30 | 23 | 18546 | |
|
|
sphere 56b save sorunu
Son cevap: 25-03 15:28 · Son yazan: Tehliqely · Mesaj: 4 · Görüntü: 5515
|
Konsol Hataları | 25-03 15:28 | 4 | 5515 | |
|
|
Save yazısı orjinal font
Son cevap: 12-09 17:54 · Son yazan: Ney · Mesaj: 5 · Görüntü: 5544
|
Script Yardımı | 12-09 17:54 | 5 | 5544 |