|
[function tic]
sysmessage @021,,1 <noktala (<var0.m_ticket_reward>*7)/10>
sysmessage @021,,1 <eval (<var.m_ticket_reward>*7)/10>
sysmessage @021,,1 <eval (<var.m_ticket_reward>)>
[function piyango]
if (<account.plevel> = 7)
sdialog d_m_ticket_admin
else
sdialog d_m_ticket_user
endif
[dialog d_m_ticket_admin]
200,100
PAGE 0
RESIZEPIC 0 0 5054 320 250
dtext 80 15 1153 <serv.name> Piyango Bileti
dtext 30 50 49 Buyuk Ikramiye: <noktala (<var0.m_ticket_reward>*7)/10>
dtext 30 70 1153 Satilan Bilet: <eval <var0.m_ticket_reward>/<var0.m_ticket_price>>
dtext 20 110 1153 Aldiginiz biletler
local.k=0
for 1 3000
if (<var0.m_ticket_<eval <local._for>>> = <uid>)
local.k += 1
local.b_<eval <local.k>> <eval <local._for>>
endif
endfor
page 1
local.sayfa 1
local.gecis 0
if (<local.k> > 0)
for 1 <eval <local.k>>
if (<local.gecis> >= 16)
local.gecis 0
local.sayfa += 1
button 270 213 4006 4007 0 <local.sayfa> 102 // ileri
page <local.sayfa>
button 20 213 4015 4016 0 <eval <local.sayfa>-1> 101 // geri
endif
if <local.gecis> >= 12
dtext 230 <eval ((<local.gecis>-11)*20)+110> 1153 <eval <local._for>>.
dtext 260 <eval ((<local.gecis>-11)*20)+110> 049 <eval <local.b_<eval <local._for>>>>
elseif <local.gecis> >= 8
dtext 160 <eval ((<local.gecis>-7)*20)+110> 1153 <eval <local._for>>.
dtext 190 <eval ((<local.gecis>-7)*20)+110> 049 <eval <local.b_<eval <local._for>>>>
elseif <local.gecis> >= 4
dtext 90 <eval ((<local.gecis>-3)*20)+110> 1153 <eval <local._for>>.
dtext 120 <eval ((<local.gecis>-3)*20)+110> 049 <eval <local.b_<eval <local._for>>>>
else
dtext 20 <eval ((<local.gecis>+1)*20)+110> 1153 <eval <local._for>>.
dtext 50 <eval ((<local.gecis>+1)*20)+110> 049 <eval <local.b_<eval <local._for>>>>
endif
local.gecis += 1
endfor
endif
[dialog d_m_ticket_admin text]
[dialog d_m_ticket_admin button]
[dialog d_m_ticket_user]
200,100
PAGE 0
RESIZEPIC 0 0 5054 320 250
dtext 80 15 1153 <serv.name> Piyango Bileti
dtext 30 50 49 Buyuk Ikramiye: <noktala (<var0.m_ticket_reward>*7)/10>
dtext 30 70 1153 Satilan Bilet: <eval <var0.m_ticket_reward>/<var0.m_ticket_price>>
dtext 20 110 1153 Aldiginiz biletler
local.k=0
for 1 3000
if (<var0.m_ticket_<eval <local._for>>> = <uid>)
local.k += 1
local.b_<eval <local.k>> <eval <local._for>>
endif
endfor
page 1
local.sayfa 1
local.gecis 0
if (<local.k> > 0)
for 1 <eval <local.k>>
if (<local.gecis> >= 16)
local.gecis 0
local.sayfa += 1
button 270 213 4006 4007 0 <local.sayfa> 102 // ileri
page <local.sayfa>
button 20 213 4015 4016 0 <eval <local.sayfa>-1> 101 // geri
endif
if <local.gecis> >= 12
dtext 230 <eval ((<local.gecis>-11)*20)+110> 1153 <eval <local._for>>.
dtext 260 <eval ((<local.gecis>-11)*20)+110> 049 <eval <local.b_<eval <local._for>>>>
elseif <local.gecis> >= 8
dtext 160 <eval ((<local.gecis>-7)*20)+110> 1153 <eval <local._for>>.
dtext 190 <eval ((<local.gecis>-7)*20)+110> 049 <eval <local.b_<eval <local._for>>>>
elseif <local.gecis> >= 4
dtext 90 <eval ((<local.gecis>-3)*20)+110> 1153 <eval <local._for>>.
dtext 120 <eval ((<local.gecis>-3)*20)+110> 049 <eval <local.b_<eval <local._for>>>>
else
dtext 20 <eval ((<local.gecis>+1)*20)+110> 1153 <eval <local._for>>.
dtext 50 <eval ((<local.gecis>+1)*20)+110> 049 <eval <local.b_<eval <local._for>>>>
endif
local.gecis += 1
endfor
endif
[dialog d_m_ticket_user text]
[dialog d_m_ticket_user button]
[ITEMDEF i_m_ticket]
ID=0edc
NAME=Ticket
TYPE=t_script
ON=@CREATE
ATTR=010
COLOR=0786
on=@timer
return 1
on=@dclick
sdialog d_m_ticket
return 1
on=@click
msg @049,,1 Buyuk ikramiye: <noktala ((<var0.m_ticket_reward>*7)/10)>
return 1
[DIALOG d_m_ticket]
200,100
PAGE 0
RESIZEPIC 0 0 5054 370 220
dtext 80 15 1153 <serv.name> Piyango Bileti
dtext 30 50 49 Buyuk Ikramiye: <noktala (<var0.m_ticket_reward>*7)/10>
dtext 30 70 049 Bilet Ucreti: <noktala <var.m_ticket_price>>
dtext 30 90 1153 Satilan Bilet: <eval <var0.m_ticket_reward>/<var0.m_ticket_price>>
dtext 25 133 33 Cekilis her gun saat 20.10 da yapilmaktadir.
dtext 20 160 1153 Son Talihli: <var.m_ticket_winner>
dtext 20 180 1153 Bilet No: <eval <var.m_ticket_winner_ticket>> Ikramiyesi: <noktala <var.m_ticket_winner_reward>>
BUTTON 250 105 4006 4007 1 0 1
dtext 285 106 1153 Bilet Al
BUTTON 320 160 4009 4010 1 0 2
[DIALOG d_m_ticket text]
[DIALOG d_m_ticket button]
on=1
if (<var0.m_ticket_reward> > 500000000)||!(0<var.m_ticket_price>)
src.sysmessage @021,,1 Bilet stoklari tukenmis, satin alamadiniz.
elseif (<src.bankbalance> < <eval <var.m_ticket_price>>)
src.sysmessage @021,,1 Bankanizda yeterli miktarda para bulunmamaktadir.
else
src.gpconsume <eval <var.m_ticket_price>>
var.m_ticket_reward <eval <var0.m_ticket_reward>+<var0.m_ticket_price>>
for 1 3000
if !(<local.yazdim>)
if !(0<var.m_ticket_<eval <local._for>>>)
var.m_ticket_<eval <local._for>> <src.uid>
local.ticket_no <eval <local._for>>
local.yazdim 1
endif
endif
endfor
src.sysmessage @049,,1 Piyango bileti aldiniz. Bilet Numarasi: <eval <local.ticket_no>>
endif
return 1
on=2
sdialog d_m_ticket_rewards
return 1
[function m_ticket_send]
local.s=0
local.ticket
local.t
for 1 3000
if <var0.m_ticket_<eval <local._for>>>
local.s += 1
endif
endfor
local.st <eval <local.s>+1>
local.ticket <eval {1 <local.st>}> // talihliyi belirle
if (<local.st> == <local.ticket>)
serv.allclients sysmessage @049,,1 Buyuk ikramiye hicbir bilete isabet etmediginden bir sonraki cekilise devir etmistir.
var.m_ticket_winner Devir
var.m_ticket_winner_reward <eval (<var.m_ticket_reward>*7)/10>
var.m_ticket_winner_ticket 0
else
local.t <var.m_ticket_<eval <local.ticket>>>
newitem i_check
new.more <eval (<var.m_ticket_reward>*7)/10>
new.cont <local.t>
var.m_ticket_winner <uid.<local.t>.name>
var.m_ticket_winner_reward <eval (<var.m_ticket_reward>*7)/10>
var.m_ticket_winner_ticket <eval <local.ticket>>
serv.allclients sysmessage @049,,1 Piyango talihlisi, <eval <var.m_ticket_winner_ticket>> nolu bilet, <noktala <var.m_ticket_winner_reward>> ikramiye ile <var.m_ticket_winner> olmustur kendisini tebrik ediyoruz.
if (<local.s> > 10)
local.ticket <eval {1 <local.s>}> // dusuk ikramiye
local.t <var.m_ticket_<eval <local.ticket>>>
newitem i_check
new.more <eval (<var.m_ticket_reward>*9)/100>
new.cont <local.t>
var.m_ticket_winner1 <uid.<local.t>.name>
var.m_ticket_winner1_reward <eval (<var.m_ticket_reward>*9)/100>
var.m_ticket_winner1_ticket <eval <local.ticket>>
local.ticket <eval {1 <local.s>}> // dusuk ikramiye
local.t <var.m_ticket_<eval <local.ticket>>>
newitem i_check
new.more <eval (<var.m_ticket_reward>*5)/100>
new.cont <local.t>
var.m_ticket_winner2 <uid.<local.t>.name>
var.m_ticket_winner2_reward <eval (<var.m_ticket_reward>*5)/100>
var.m_ticket_winner2_ticket <eval <local.ticket>>
local.ticket <eval {1 <local.s>}> // dusuk ikramiye
local.t <var.m_ticket_<eval <local.ticket>>>
newitem i_check
new.more <eval (<var.m_ticket_reward>*4)/100>
new.cont <local.t>
var.m_ticket_winner3 <uid.<local.t>.name>
var.m_ticket_winner3_reward <eval (<var.m_ticket_reward>*4)/100>
var.m_ticket_winner3_ticket <eval <local.ticket>>
local.ticket <eval {1 <local.s>}> // dusuk ikramiye
local.t <var.m_ticket_<eval <local.ticket>>>
newitem i_check
new.more <eval (<var.m_ticket_reward>*3)/100>
new.cont <local.t>
var.m_ticket_winner4 <uid.<local.t>.name>
var.m_ticket_winner4_reward <eval (<var.m_ticket_reward>*3)/100>
var.m_ticket_winner4_ticket <eval <local.ticket>>
local.ticket <eval {1 <local.s>}> // dusuk ikramiye
local.t <var.m_ticket_<eval <local.ticket>>>
newitem i_check
new.more <eval (<var.m_ticket_reward>*2)/100>
new.cont <local.t>
var.m_ticket_winner5 <uid.<local.t>.name>
var.m_ticket_winner5_reward <eval (<var.m_ticket_reward>*2)/100>
var.m_ticket_winner5_ticket <eval <local.ticket>>
local.ticket <eval {1 <local.s>}> // dusuk ikramiye
local.t <var.m_ticket_<eval <local.ticket>>>
newitem i_check
new.more <eval (<var.m_ticket_reward>*1)/100>
new.cont <local.t>
var.m_ticket_winner6 <uid.<local.t>.name>
var.m_ticket_winner6_reward <eval (<var.m_ticket_reward>*1)/100>
var.m_ticket_winner6_ticket <eval <local.ticket>>
local.ticket <eval {1 <local.s>}> // dusuk ikramiye
local.t <var.m_ticket_<eval <local.ticket>>>
newitem i_check
new.more <eval (<var.m_ticket_reward>*1)/100>
new.cont <local.t>
var.m_ticket_winner7 <uid.<local.t>.name>
var.m_ticket_winner7_reward <eval (<var.m_ticket_reward>*1)/100>
var.m_ticket_winner7_ticket <eval <local.ticket>>
local.ticket <eval {1 <local.s>}> // dusuk ikramiye
local.t <var.m_ticket_<eval <local.ticket>>>
newitem i_check
new.more <eval (<var.m_ticket_reward>*1)/100>
new.cont <local.t>
var.m_ticket_winner8 <uid.<local.t>.name>
var.m_ticket_winner8_reward <eval (<var.m_ticket_reward>*1)/100>
var.m_ticket_winner8_ticket <eval <local.ticket>>
endif
var.m_ticket_reward
endif
for 1 3000
var.m_ticket_<eval <local._for>>
endfor
[function m_ticket_free]
var.m_ticket_reward
for 1 3000
var.m_ticket_<eval <local._for>>
var.m_ticket_winner<eval <local._for>>
var.m_ticket_winner<eval <local._for>>_reward
var.m_ticket_winner<eval <local._for>>_ticket
endfor
var.m_ticket_winner
var.m_ticket_winner_reward
var.m_ticket_winner_ticket
[dialog d_m_ticket_rewards]
150,100
PAGE 0
RESIZEPIC 0 0 5054 420 350
dtext 80 15 1153 <serv.name> Ikramiye Listesi
dtext 30 50 049 Buyuk Ikramiye
dtext 30 70 1153 <eval <var0.m_ticket_winner_ticket>> nolu bilet ile <var0.m_ticket_winner> kazanmistir.
dtext 30 90 49 Ikramiyesi: <noktala <var0.m_ticket_winner_reward>>
dtext 30 115 049 Digerleri
local.k=0
for 1 100
if (<var0.m_ticket_winner<eval <local._for>>_ticket>)
local.k += 1
local.w_<eval <local.k>> <var0.m_ticket_winner<eval <local._for>>>
local.t_<eval <local.k>> <var0.m_ticket_winner<eval <local._for>>_ticket>
local.r_<eval <local.k>> <var0.m_ticket_winner<eval <local._for>>_reward>
endif
endfor
page 1
local.sayfa 1
local.gecis 0
if (<local.k> > 0)
for 1 <eval <local.k>>
if (<local.gecis> >= 10)
local.gecis 0
local.sayfa += 1
button 270 213 4006 4007 0 <local.sayfa> 102 // ileri
page <local.sayfa>
button 20 213 4015 4016 0 <eval <local.sayfa>-1> 101 // geri
endif
dtext 20 <eval ((<local.gecis>+1)*20)+115> 1153 Bilet: <eval <local.t_<eval <local._for>>>> - <noktala <local.r_<eval <local._for>>>> - <local.w_<eval <local._for>>>
local.gecis += 1
endfor
endif
[dialog d_m_ticket_rewards text]
[dialog d_m_ticket_rewards button]
return 1|
|
| Konu | Kategori | Son cevap | Son yazan | Mesaj | Görüntüleme | |
|---|---|---|---|---|---|---|
|
Otomatik Av Sistemi
Son cevap: 07-06 12:33 · Son yazan: mithbar · Mesaj: 8 · Görüntü: 3300
|
Derleme Scriptler | 07-06 12:33 |  mithbar |
8 | 3300 |
|
Ödül sistemi ip sorgulama
Son cevap: 05-11 22:03 · Son yazan: Knuth* · Mesaj: 8 · Görüntü: 3769
|
Script Yardımı | 05-11 22:03 |  Knuth* |
8 | 3769 |
|
|
Random Spawn sistemi yardım
Son cevap: 02-09 16:44 · Son yazan: Stark35 · Mesaj: 12 · Görüntü: 6099
|
Derleme Scriptler | 02-09 16:44 | Stark35 |
12 | 6099 |
|
Hesap Kayıt Sistemi Hakkında
Son cevap: 22-10 18:58 · Son yazan: Joshepx · Mesaj: 1 · Görüntü: 1743
|
Client ve Account Sistemleri | 22-10 18:58 | Joshepx |
1 | 1743 |
|
Kredi Barbut Zar Sistemi
Son cevap: 22-11 13:36 · Son yazan: xrambo · Mesaj: 3 · Görüntü: 3156
|
Grafik Araçları | 22-11 13:36 |  xrambo |
3 | 3156 |