[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