Var misin yok musun scripti..

yaptıysan paylaş bizde öğrenmiş oluruz

Cem verirsen 2 gün sonra ben yazdım diye sana gösterirler merak etme :P

2 script yazdın diye kendini bir *** sanma. Dediğim gibi lafı edilmeyecek bir script yazar yayımlarım.

Sistem bitti sayılır aşağıdada scripti. Tam anlamıyla tamamlanmadığı için sistemler kısmına eklemiyor. Umarım birilerinin kalkan g*tleri biraz olsn eski halini alır.
Deflerden tur sayısnı ödülleri ayarlayabilirsiniz.

[comment varmisin yokmusun]
Yapmanız gerekenleri alanı ayarlayın. f_Start_event komutuyla kutuları yaratın. 
Daha sonra kutuları açıcak oyuncularla kutuları linkleyin. Yarışıcak oyuncunun uidsini var.yarismaci olarak kaydedin.
Yarısmacı .kutusec komutu ile kutusunu seçer. Yetkili istediğine göre teklif de bulunabilir.

Sistem eksikleri
-Bazen 2 kutu aynı numaraya sahip olabilir Bknz (Satır 146)

Fazla vaktim olmadığı için böyle birşey çıktı. Çok daha güzel olabilirdi. 1 saat'de bu kdr yapabildim. 
Eksikler olabilir bildirirseniz ilgilenirim.

[defname varmisimyokmusun]
toplamodul 10
para_1 10.000
para_2 20.000
para_3 30.000
para_4 40.000
para_5 50.000
para_6 100.000
para_7 150.000
para_8 250.000
para_9 500.000 
para_10 1.000.000

box4offer_1 5
box4offer_2 3
box4offer_3 2

tursayisi 3

[function kutusec]
if (<var0.yarismaci>==<src.uid>)
sdialog d_choose_Box
endif

[itemdef i_kutu]
id i_box_wood
name Kutu
weight 100
type t_normal

ON=@create
color 0482
attr attr_Static

ON=@click
if (<src.isgm>)
src.sysmessage @1153,,1 <dmore1> Altin.
endif
message @077a,,1 [ <dmore2> ]
message @1153,,1 <serv.servname> Kutu
return 1

ON=@dclick
if <uid>==<var0.acilacakkutu>
timer 1
tag0.timer 10
tag0.prize <more2>
else
src.sysmessage @,,1 Yarışmacı bu kutuyu seçmeden açamazsınız !
endif
return 1

ON=@timer
if (<tag0.timer>)
say @,,1 <dtag0.timer>
tag0.timer --
timer 1
else
serv.b <dtag0.prize>
tag0.choosen 1
var0.acilacakkutu
color 0482
trysrc <uid.<var0.yarismaci>> src.dialog d_cikanpara
endif
return 1

[dialog d_cikanpara]
200, 100
PAGE 0
resizepic 78 80 5120 250 150
resizepic 88 90 3000 230 130
dtext 110 104 32 Var mısın yok musun ?

/////////////////////////////////////////////////////////////
var0.box4offer --
var0.box_opened ++
/////////////////////////////////////////////////////////////

////////////////////////////////////////////////////////////
if (<var0.box4offer> < 0)
var0.tur ++
if (<var0.tur> > <def.tursayisi>)
sysmessage @,,1 Turnuva bitmiş ve tüm kutular açılmış.
var0.tur 1
var0.box_opened 0
var0.box4offer 5
return 1
endif
var0.box4offer <def.box4offer_<dvar0.tur>>
endif
//////////////////////////////////////////////////////////////

dtext 110 125 1152 Şuana kadar <dvar0.box_opened> kutu açtınız.<name>
dtext 110 150 1152 Teklife kalan kutu sayısı <dvar0.box4offer>
dtext 110 175 63 <dctag0.sonkutu> açtınız.

[dialog d_choose_box]
200, 100
PAGE 0
resizepic 78 80 5120 350 250
resizepic 88 90 3000 330 230
dtext 110 104 32 Var mısın yok musun ?

dorigin 100 100

Page 1

for 1 <def.toplamodul>
if (<dlocal._for> < 6)
local.xy +=20
button +10 +<eval <local.xy> +24> 2511 2510 <qval (<uid.<var0.box_<dlocal._For>>.tag0.choosen>)?0:1> 0 <dlocal._for>
dtext +30 +<eval <local.xy> +24> <f_get_dlgcolor <dlocal._for>> <uid.<var0.box_<dlocal._for>>.dmore2> nolu <uid.<var0.box_<dlocal._for>>.name> <qval (<uid.<var0.box_<dlocal._For>>.tag0.choosen>)?[<uid.<var0.box_<dlocal._for>>.dmore1>]>
else
local.yy +=20
button +200 +<eval <local.yy> +24> 2511 2510 <qval (<uid.<var0.box_<dlocal._For>>.tag0.choosen>)?0:1> 0 <dlocal._for>
dtext +220 +<eval <local.yy> +24> <f_get_dlgcolor <dlocal._for>> <uid.<var0.box_<dlocal._for>>.dmore2> nolu <uid.<var0.box_<dlocal._for>>.name> <qval (<uid.<var0.box_<dlocal._For>>.tag0.choosen>)?[<uid.<var0.box_<dlocal._for>>.dmore1>]>
endif
endfor

[dialog d_choose_box button]
ON=1,99
var0.yarismaci <src.uid>
ref1=<var0.box_<dargn>>
ref1.link.stone 0
ref1.link.sysmessage @,,1 Önünüzdeki kutuyu açınız.
ref1.say @,,1 Seçildim !
var0.acilacakkutu <ref1.uid>


[function f_start_event]
for 1 <def.toplamodul>
serv.newitem i_kutu,1,<uid>
new.more1 <def.para_<dlocal._for>>
new.more2 <f_get_number>
var.box_<dlocal._for> <new.uid>
endfor

[function f_get_number]
return <R1,<def.toplamodul>>

[function f_get_dlgcolor]
ref1=<var0.box_<args>>
if (<ref1.tag0.choosen>)
return 63
else
return 1152
endif

Bu konu Slothere tarafından düzenlendi(2009-03-07 17:59, 16 yıl önce)

Scriptin neresi hatalı ? Sistem otomatik değil yetkili nezaretinde yapılıyor. Bende gayet hatasız çalışıyor. Böyle bir turnuva otomatik olursa hiç bir tadı tuzu kalmaz.

Açılmış kutuların renkleri değişiyor zaten. Kutuların tamamı açılınca staff oyuncuları atıcak başka ne olucaktı ? Otomatik atsın diyorsan

forclient 100
go xcccc
endfor

demen yeterki onuda yap artıq.

Rexos lafım sana değildi zaten. Sistemse öncedende dediğim gibi basit 35-40 dakikalık bir sistem. Üsttemi mesajı kimin attığına bakmadan önceki sayfadaki bir mesaja karşılık yazdım.

Birbirinizi İğnelemekten Başka İşiniz Yok Yazık

XoXo sanırım var mısın yok musundaki senin kullandığın mantık farklı her açılan kutudaki parayı kazanıo şeklinde yapmışsın anladığım kadarıyla.Gerçek var mısın yok musunda son açık kalan kutuyu kazanır.