//////Emsallerinden Sakının Basic Ürünüdür...
///Slothere'ye Teşekkürlerimi Bir Borç Bilirim...
/////İsteyen Herkes Kullanabilir...
//////////////////////////////////////////////////////////////////SCRIPTED BY BASIC
[function contchest]
foritems 50
if <baseid> == i_rulet_kasasi
local.chest = <uid>
endif
endfor
serv.newitem i_bag,1,<dlocal.chest>
local.bag = <new>
forcont <findlayer(29).uid> 25
cont = <dlocal.bag>
endfor
local.plevel = <account.plevel>
account.plevel 4
trysrv remove 1
account.plevel <dlocal.plevel>
[itemdef i_rulet]
id i_bow
name Tabanca
type t_script
on=@click
message @07a1 [<serv.name>]
on=@create
tag.p <p>
color 01
on=@dclick
Dorand 6
begin
src.kill
src.contchest
serv.allclients sysmessage @07a1 <src.name> Rus Ruletinde Olmustur. Sevenlerine Bas Sagligi Dileriz...
message Bam!!
serv.newitem i_fx_explode
new.p <src.p>
new.timer 2
new.attr attr_decay
serv.newitem i_gravestone_17
new.p <src.p>
new.name <src.name> Ruhuna El Fatiha!
end
begin
message Tik!
serv.allclients sysmessage @07a1 <src.name> Rus Ruletinde Sans Eseri Kurtulmustur ve 3000 Gumusu Cantaya Atmistir...
src.newitem i_bilet, 3000
new.bounce
end
begin
message Tik!
serv.allclients sysmessage @07a1 <src.name> Rus Ruletinde Sans Eseri Kurtulmustur ve 3000 Gumusu Cantaya Atmistir...
src.newitem i_bilet, 3000
new.bounce
end
begin
message Tik!
serv.allclients sysmessage @07a1 <src.name> Rus Ruletinde Sans Eseri Kurtulmustur ve 3000 Gumusu Cantaya Atmistir...
src.newitem i_bilet, 3000
new.bounce
end
begin
message Tik!
serv.allclients sysmessage @07a1 <src.name> Rus Ruletinde Sans Eseri Kurtulmustur ve 3000 Gumusu Cantaya Atmistir...
src.newitem i_bilet, 3000
new.bounce
end
begin
message Tik!
serv.allclients sysmessage @07a1 <src.name> Rus Ruletinde Sans Eseri Kurtulmustur ve 3000 Gumusu Cantaya Atmistir...
src.newitem i_bilet, 3000
new.bounce
end
enddo
[itemdef i_rulet_kasasi]
id i_chest_metal
name Rulet Kasasi
type = t_container
on=@create
color 080a
attr 010
on=@click
message [<serv.name>]
message <name>
0
Total votes: 0
Yorumlar (0)