|
[PLEVEL 6]
Karyap
[function Karyap]
var0.Kar_count 0
newitem i_Kar_gate
new.p 4411,2143,5
new.morez <args>
serv.allclients sysmessage @0481,1,1,1, [Anons] :
serv.allclients sysmessage @0481,1,1,1, [Anons] :
if !(0<args>)
serv.allclients sysmessage @0481,1,1,1, [Anons] :
serv.allclients sysmessage @0481,1,1,1, [Anons] :
serv.allclients sysmessage @0481,1,1 Mod : [ Otomatik ]
serv.allclients sound 0100
serv.allclients sound 0102
serv.allclients sound 0103
return 1
[itemdef i_Kar_gate]
id i_moongate_red
name Kar yarismasi
on=@create
Timer 300
var.otoKargeytid <uid>
color 09a8
attr attr_static
for x 1 50
tag.girenuid<dlocal.x>
endfor
on=@click
if (<timer> > 59)
message @07e5,1,1 <eval <timer>/60> Dakika sonra kapanacak
else
message @07e5,1,1 <timer> Saniye sonra kapanacak
endif
message @07a1,1,1 Kar Topu Yarismasi
return 1
on=@dclick
if !(<src.npc> == 0)
return 1
endif
Karyarismasi
on=@step
src.sysmessage @39 Gate'ye 2 kere tikla <name>.
return 1
endif
on=@timer
serv.allclients sysmessage @07a1,1,1 Kar Topu basladi basarilar
serv.allclients sound 256
serv.allclients stone 0
remove
return 1
[function Karyarismasi]
if (<src.isgm>)
src.go 5310,1061 /// buraya gmlerin gidicegi yeri yaz
return 1
endif
if (<distance> > 2)
src.sysmessage @07a1,1,1 Gate'e ulaşamıyorsunuz.
return 1
endif
if !(0<tag.girenuid20> == 0)
src.sysmessage @07a1,1,1 Yarismaya maximum kişi olan 20 kisi zaten girmis.
timer 1
return 1
endif
src.resurrect
var0.Kar_count ++
src.dialogclose d_stuckx
DIALOGclose d_help
src.binegibankayaat
//src.blesslerisil
//src.memorylerisil
src.Cantalarbanka
src.hits <src.str>
src.stam <src.dex>
src.inlor
src.events e_Karyap
src.sysmessage @07a1,1,1 Cantaniz bankaniza atildıi.
serv.newITEM i_arrow
//new.color=0481
src.new.equip
new.attr=0
serv.newITEM i_robe
new.color=0481
src.new.equip
new.attr=00010
serv.newITEM i_boots_calf
new.color=0481
src.new.equip
new.attr=00010
serv.newITEM i_bandana
new.color=0481
src.new.equip
new.attr=00010
dorand 4
src.go 5453,1184
src.go 5452,1194
src.go 5470,1194
src.go 5469,1184
enddo
src.stone 1
src.timerf 10
for x 1 50
if (<tag.girenuid<eval <local.x>>> == 0)
serv.allclients sysmessage @07a1,1,1 <dlocal.x>. kisi kar Topu yarismasina girdi..
serv.allclients sysmessage @07a1,1,1 Kar Topu yarismasina girişin kapanması ve yarışmanın baslamasi icinn son <eval <timer>/60> dakika veya <eval 20-<local.x>> kisi..
tag.girenuid<eval <local.x>> <src.uid>
return 1
endif
endfor
[events e_Karyap]
on=@attack
if (<act.npc> == 0)
sysmessage @07a1,1,1 Burada dalmak yasak..
return 1
endif
on=@skillstart
return 1
on=@itemdclick
if (<act.type> == t_figurine) || (<act.baseid> == i_deed_animal) || (<act.baseid> == i_runebook) || (<act.baseid> == i_deed_animal) || (<act.baseid> == i_runebook)
src.sysmessage @07a1,1,1 Bu bölgede kullanılmaz..
return 1
endif
on=@spellcast
src.skill fail
return 1
on=@click
message @0850,,1 [ Kar Topu ]
message @07a1,1,1 <name>
return 1
on=@hit
if (<src.npc> == 0)
sysmessage @07a1,1,1 Burada dalmak yasak..
return 1
endif
on=[url=u-death-9220.html]@death[/url]
if <dvar.Kar_count> == 2
events -e_Karyap
Karodulverbanaamkya
karsiliyimibenamkya
src.go safe town
src.hits <src.str>
src.UPDATE
src.findid.i_robe.remove
src.findid.i_boots_calf.remove
src.findid.i_bandana.remove
src.findid.i_ball_snow.remove
src.tag.yarisma=0
RETURN 1
endif
var0.Kar_count --
serv.allclients sysmessage @07e5,1,1 Kar topu kalan kisi :<eval <var0.Kar_count>>
src.events -e_Karyap
src.tag.yarisma=0
src.go safe town
karsiliyimibenamkya
src.hits <src.str>
src.UPDATE
RETURN 1
on=@login
var0.Kar_count --
src.go town
src.events -e_Karyap
src.stone 0
karsiliyimibenamkya
on=@logout
var0.Kar_count --
serv.allclients sysmessage @07e5,1,1 Kar topu kalan kisi :<eval <var0.Kar_count>>
src.events -e_Karyap
src.go safe town
src.stone 0
karsiliyimibenamkya
src.hits <src.str>
src.UPDATE
RETURN 1
[function Karodulverbanaamkya]
forchars 64000
if (<isevent.e_Karyap>)
newitem i_Boxodul,1
new.bounce
serv.allclients sysmessage @07e5,1,1 <name> Yarışma:
serv.allclients sysmessage @07a1,1,1 Kar Topu yarışmasını <name> kazanmıştır, kendisini tebrik ediyoruz..
serv.allclients sound 0100
serv.allclients sound 0102
serv.allclients sound 0103
go safe town
hits <str>
events -e_Karyap
src.tag.yarisma=0
karsiliyimibenamkya
endif
endfor
[ITEMDEF i_ball_snow]
Name= Kar Topu
//Weight=2
ID=i_rock_3
type t_normal
value=2000
CATEGORY=can
SUBSECTION=Items
DESCRIPTION=Snow Ball
on=@create
color 0481
on=@click
message @07e5,1,1 [ <serv.name> ]
message @07a1,1,1 Kar Topu
return 1
on=@dclick
if !(<src.isevent.e_Karyap>)
src.sysmessage @07a1,1,1 Sadece yarışmada Kullanabilirsiniz.
Return 1
elseif !(<topobj.uid> = <src.uid>)
src.sysmessage @07a1,1,1 Bunu kullanabilmek için çantanızda olması gerekmektedir..
return 1
elseif (<src.findid.i_karekle> )
src.sysmessage @07a1,1,1 Bunu kullanabilmek için <src.findid.i_karekle.timer> saniye beklemeniz gerekmektedir..
return 1
elseif (<src.hits> < 0)
src.sysmessage @07a1,1,1 Bunu sadece canlı ve yarışmada kullanabilirsiniz.
return 1
else
TARGET Kar topunu kime atacaksiniz...
Return 1
ON=@TARGON_CHAR
IF (<src.targ.uid>==<src.uid>)
src.sysmessage @07e5,1,1 Kar topunu kendine atamazsin...
RETURN 1
ELSEIF <src.targ.npc>
SRC.sysmessage @07e5,1,1 Sadece Playerlara Atabilirsin...
RETURN 1
ELSE
SRC.ANIM 11
SRC.TARG.EFFECT=0,3881,7
SOUND 0145
TIMER=(10)
SRC.TARG.ANIM 20
SRC.TARG.SAYU *Kar Topu Yer*
SRC.SYSMESSAGE @07a1,1,1 <SRC.TARG.NAME>'e kar topu attın...
SRC.TARG.SYSMESSAGE @07a1,1,1 <src.name> sana kar topu attı...
SRC.TARG.HITS -= 10
src.newitem i_karekle
src.act.equip
src.act.timer = 10
REMOVE
RETURN 1
ENDIF
ON=@TARGON_ITEM
SRC.SYSMESSAGE @07a1,1,1 Kar topunu buna atamazsın...
RETURN 1
ON=@TARGON_GROUND
src.sysmessage @07a1,1,1 Bunu Seçemezsiniz !!
RETURN 1
[itemdef i_karekle]
id i_memory
name kar bekleme
type t_eq_Script
on=@create
attr attr_decay
timer 5
on=@equip
timer 5
on=@timer
//cont.uid.<cont.ctag.bombaitemi>.color 07b5
cont.sysmessage @07a1,1,1 Artık Kar topu kullanabilirsiniz...
remove
return 1
[function karsiliyimibenamkya]
findid.i_robe.remove
findid.i_boots_calf.remove
findid.i_bandana.remove
findid.i_ball_snow.remove
serv.allclients findid.i_ball_snow.remove
[itemdef i_kar_al]
NAME=Kar Stone
DYE=1
TYPE=t_clothing
ID=i_plant_hedge_1
WEIGHT=5
On=@dclick
if (<src.findid.i_stone_azbekle>)
src.sysmessage @07a1,1,1 <src.findid.i_stone_azbekle.timer> Saniye sonra işleminizi gerçekleştirebilirsiniz.
else
src.newitem i_stone_azbekle
src.act.equip
src.newitem i_ball_snow
src.act.equip
//if (<src.hits><<src.str>)
//src.hits=<src.hits>+3
//src.sayu Enerjisi Yükselir +3.
return 1
endif
on=@create
color 0481
attr 010
return 1
on=@click
message @07e5,1,1 <serv.name>
message @07a1,1,1 [<name>]
src.sysmessage @07a1,1,1 Bana tikliyarak kar topu ve hp nizi yükseltirim.
return 1
[itemdef i_stone_azbekle]
id i_memory
name stone bekleyici
type t_eq_script
on=@create
attr attr_decay
timer 5
on=@equip
timer 5
equip
return 1
on=@timer
remove
return 1
[eof]
[function Karodulverbanaamkya]
forplayer 64000 // chars'tan daha etkili olur
if (<isevent.e_Karyap>) && (<hits> > 0)
newitem i_Boxodul,1
new.bounce
local.isim <name>
serv.allclients sysmessage @07e5,1,1 <local.isim> Yarışma:
serv.allclients sysmessage @07a1,1,1 Kar Topu yarışmasını <local.isim> kazanmıştır, kendisini tebrik ediyoruz..
serv.allclients sound 0100
serv.allclients sound 0102
serv.allclients sound 0103
go safe town
hits <str>
events -e_Karyap
src.tag.yarisma=0
endif
endforAyrıca Karodulverbanaamkya functionu safe alana gönderdikten sonra çalıştırmışsın yanındayken çalıştırman daha iyi olurdu.

on=[url=u-death-9220.html]@death[/url]
if <dvar.Kar_count> == 2
|
|
| Konu | Kategori | Son cevap | Son yazan | Mesaj | Görüntüleme | |
|---|---|---|---|---|---|---|
|
|
Oyuncuya topu verdirtme
Son cevap: 24-10 11:58 · Son yazan: Teşbiyat Ali · Mesaj: 7 · Görüntü: 3071
|
Script Yardımı | 24-10 11:58 | 7 | 3071 | |
|
|
Kontakt 5 Kısa hikaye yarışması
Son cevap: 28-08 21:13 · Son yazan: Deidara · Mesaj: 1 · Görüntü: 4436
|
Role Play | 28-08 21:13 | 1 | 4436 | |
|
|
Ortaöğretim Web tasarım yarışması
Son cevap: 27-12 03:22 · Son yazan: Sirlather · Mesaj: 9 · Görüntü: 8582
|
Sarı Sayfalar | 27-12 03:22 | 9 | 8582 | |
|
|
Futbol yarışması sistemi
Son cevap: 03-08 07:40 · Son yazan: asaf45 · Mesaj: 5 · Görüntü: 6753
|
Derleme Scriptler | 03-08 07:40 | 5 | 6753 | |
|
|
Half-Life yarışması sistemi
Son cevap: 04-06 18:40 · Son yazan: BlackAngelL · Mesaj: 5 · Görüntü: 6291
|
Derleme Scriptler | 04-06 18:40 | 5 | 6291 |