[plevel 1]

bomb



[chardef c_dispeller]

id c_slime

name dispeller

dam 10,20



on=@create

color 0455



karma -8000

fame 5000



str=100

dex=100

int=100

maxhits=500



wrestling 30.0

magery 1000



itemnewbie i_spellbook

addspell=s_mass_dispel



[function remove2]

targetf remove



[function gatebul]

foritems 20

if (<baseid>==i_b_wall4)

src.sysmessage @38,6,1 Gateciye mesafeniz <eval <src.distance <uid>>> kare

endfor

endif



[itemdef i_gate_B]

id i_moongate_Blue

name Bomberman giris gate

type t_normal



on=@create

color 07a1

tag.switch=1



on=@step

if (<tag.switch>==1)

src.tag.birhak=1

src.binekolmasin

src.f_bank_equipment



src.go 5722,793

tag.switch=2

src.events +e_bombaci

return 1

endif

if (<tag.switch>==2)

src.tag.birhak=1

src.binekolmasin

src.f_bank_equipment





src.go 5721,802

tag.switch=3

src.events +e_bombaci

return 1

endif

if (<tag.switch>==3)

src.tag.birhak=1

src.binekolmasin

src.f_bank_equipment





src.go 5741,801

tag.switch=4

src.events +e_bombaci

return 1

endif

if (<tag.switch>==4)

src.tag.birhak=1

src.binekolmasin

src.f_bank_equipment





src.go 5741,791

src.events +e_bombaci

remove

return 1

endif



[itemdef i_b_cikis]

id i_moongate_Blue

name Bomberman giris gate

type t_normal



on=@create

color 07a1



on=@step

if (<src.isevent.e_bombaci>)

src.resurrect

src.tag.bombx2=0

src.findid.i_bombaci.remove

src.tag.birhak=0

src.go pazar

src.events -e_bombaci



endif



[events e_bombaci]

on=@hit

sysmessage @38,6,1 Bu oyun sadece bombacilardan olusmakta.

return 1



on=@hittry

sysmessage @38,6,1 Bu oyun sadece bombacilardan olusmakta.

return 1



on=@attack

sysmessage @38,6,1 Atak yapmak yasak

action -1

return 1



on=@death

if (<tag.birhak> > 0)

sysmessage @38,6,1,1 Reslenmek icin bir hakkiniz taninmakta oldugu icin bu hakkiniz reslenilmek icin kullanildi. Bir dahaki olusunuzde otomatik olarak oyundan cikicaksiniz.

hits=<str>

foritems 0

if (<baseid>==i_fire_die)

remove

if (<baseid>==i_exp_Die)

remove

endif

endif

endfor

tag.birhak -=1

return 1

endif

hits=<str>

findlayer.layer_pack.empty

go pazar

sysmessage @38,6,1,1 Size taninmis hak bitmis. Bu yuzden oyundan cikarildin.

events -e_bombaci

return 1



[function bomba]

forchars 0

kill

endfor

alevpatlat n 1

alevpatlat s 1

alevpatlat w 1

alevpatlat e 1



//[plevel 1]

//bomb



[function bomb]

if !(<isevent.e_bombaci>)

src.sysmessage @38,6,1 Bu komutu sadece bomberman eventinde olanlar kullanabilir.

return 1

endif

if (strmatch('<p.x>','<tag.px>')) && (strmatch('<p.y>','<tag.py>')) 

sysmessage @38,6,1 Ayn&覵 koordinata bomba birakamazsin.

return 1

endif

if (<src.findid.i_bomb_timer>)

src.sysmessage @38,6,1 Ardi ardina bomba birakmak icin aradan 1 saniye gecmeli

return 1

endif

serv.newitem i_bomb_timer

new.cont <src.uid>

new.timerd=2

tag.px=<eval <p.x>>

tag.py=<eval <p.y>>

tag.pz=<p.z>

serv.newitem i_bomb

new.p <p>

new.link <uid>

new.update

serv.newitem i_controller

new.cont <uid>

new.timer=2



[itemdef i_bomb_timer]

id i_gold

layer layer_special

name asd

type t_eq_script



on=@create

attr attr_invis



on=@timer

remove

return 1



[function alevpatlat]

serv.newitem i_fire_die

new.p <p>

new.link <link.uid>

new.tag.args=<args>

var.args=<args>

new.move <args> // burda n 1 n 2 falan oluyor yer de&覨i&覶tiriyor

new.timer=1

new.itemcheck

var.uid <uid>



[function alevpatlat2]

serv.newitem i_fire_die

new.p <p>

new.link <link.uid>

var.args=<args>

new.move <args> // burda n 1 n 2 falan oluyor yer de&覨i&覶tiriyor

new.timer=1

new.itemcheck2

var.uid <uid>



[function itemcheck]

obj=<uid>

foritems 0

if (<baseid>==i_b_Wall)

obj.remove

return 1

endif

if (<baseid>==i_b_wall2)

serv.newitem i_b_spawn

new.p <p>

serv.newitem i_Exp_die

new.p <p>

new.timer=1

remove

obj.remove

return 1

endif

if (<baseid>==i_b_wall3)

serv.newitem i_b_spawn

new.p <p>

serv.newitem i_Exp_die

new.p <p>

new.timer=1

obj.link.tag.bombx2=1

remove

obj.remove

return 1

endif

if (<baseid>==i_b_wall4)

serv.newitem i_Exp_die

new.p <p>

new.timer=1

serv.newitem i_gate_lvl2

new.p <p>

new.timer 3600

remove

obj.remove

return 1

endif

if (<baseid>==i_b_wall5)

serv.newitem i_Exp_die

new.p <p>

new.timer=1

sound=1095

serv.newitem i_can

new.p <p>

new.timer 40

remove

obj.remove

return 1

endfor

endif

if (<link.tag0.bombx2>)

serv.newitem i_Controller

new.p <p>

new.alevpatlat2 <tag.args>

endif



[itemdef i_can]

id i_virtstone_5

name Can verir !

type t_eq_script



on=@step

sound=1098

src.tag.birhak +=1

src.say @38,6,1 Bir can aldiniz !

remove



[itemdef i_gate_lvl2]

id i_moongate_blue

name 1. gate

type t_telepad



on=@create

color 07c5

//morep 5732,808



on=@step

if !(<src.flags>&statf_dead)

src.hits=<src.str>

src.findlayer.layer_pack.empty

src.go pazar

src.tag.birhak=0

src.sysmessage @38,6,1 Cikisa ulastin. Iste odulun.

if (<src.fame> < 9750)

src.fame += 250

endif

src.newitem i_tohum_rarekoy

src.act.amount=1

src.act.bounce

src.tag.bombx2=0

src.events -e_bombaci

forclients 100

if <isevent.e_bombaci>

sysmessage @38,6,1 Oyunu <src.name> kazandi. Oyun bitmistir.

tag.bombx2=0

events -e_bombaci

go pazar

endif

endfor

src.go 5733,808



remove

return 1

endif







[function itemcheck2]

obj=<uid>

foritems 0

if (<baseid>==i_b_Wall)

obj.remove

return 1

endif

if (<baseid>==i_b_wall2)

serv.newitem i_b_spawn

new.p <p>

serv.newitem i_Exp_die

new.p <p>

new.timer=1

remove

obj.remove

return 1

endfor



endif

forchars 0

kill

endfor



[itemdef i_bombaci]

id 5162

name Bomba

weight 0

type t_eq_script



on=@create

attr attr_static|attr_move_Never



on=@dclick

src.bomb

return 1



[itemdef i_b_wall]

id 938

name Wall

type t_eq_script



on=@create

attr attr_static|attr_move_never

nudgedown 5

color 03b2





on=@timer

return 1



[itemdef i_b_wall2]

id 938

name Wall

type t_eq_script



on=@create

attr attr_static|attr_move_never

//nudgedown 5





on=@timer

return 1



[itemdef i_b_wall4]

id 938

name Wall

type t_eq_script



on=@create

attr attr_static|attr_move_never

//nudgedown 5





on=@timer

return 1



[itemdef i_b_wall5]

id 938

name Wall

type t_eq_script



on=@create

attr attr_static|attr_move_never

//nudgedown 5





on=@timer

return 1



[itemdef i_b_wall3]

id 938

name Wall

type t_eq_script



on=@create

attr attr_static|attr_move_never

//nudgedown 5





on=@timer

return 1



[itemdef i_b_spawn]

id i_floor_marble

name Wall

type t_eq_script



on=@create

attr attr_static|attr_invis

nudgedown 1

timer=1800



on=@timer

serv.newitem i_b_wall2

new.p <p>

new.update

remove

return 1



[itemdef i_bomb]

id 01777

name bomb

type t_eq_Script



on=@create

color 0793

timerd 3

morex=3



on=@timer

if (<morex> > 0)

say @38,6,1 <eval <morex>>

morex -= 1

timerd 3

return 1

else

sound snd_spell_Explosion

sound snd_spell_flamestrike

sound 775

serv.newitem i_fire_die

new.p <p>

new.update

new.timer 1

bomba

remove

return 1

endif



[itemdef i_controller]

id i_gold

name asd

type t_eq_Script



on=@create

attr attr_decay|attr_invis

timer 4





[itemdef i_fire_die]

id i_fire_column

name Olum

type t_eq_script



on=@create

attr attr_decay



on=@step

src.kill



[itemdef i_exp_die]

id i_fx_explode

name Olum

type t_eq_script



on=@create

attr attr_decay



on=@step

src.kill



[function dose]

serv.newitem i_b_wall2

new.p 



[function wallcikar]

foritems 50

if (<baseid>==i_b_spawn)

timer=1

endif

endfor



[function sectorboya]

foritems 50

if (<baseid>==<args>)

color 0794

endfor