Kod:
[comment cekilis]
Scripter : Alcholic
Katılım sorgusunu niye tagla yaptın derseniz sql sorgusunu sphereye anlatamadım bir türlü kafayı yicektim biraz daha uğraşsaydım.
[defname cekilis]
cekilis Sphere-Wiki // çekilişin ismi.
[function cekilis_baslat]
db.connect
db.execute "create table if not exists sphere_cekilis (uid text);"
serv.b @077a,,1 <serv.servname> <def.cekilis> çekilişi başamıştır. Çekilişe katılmak için ''.cekilis'' yazmanız yeterlidir.
[function cekilis]
call cekilis_sorgu
if (<local.sorgu>=1)
if !(<tag0.cekilis>=1)
db.execute "insert into `sphere_cekilis` (`uid`) values ('<src.uid>');"
src.sysmessage @,,1 Çekilişe katıldınız , çekiliş sona erdiğinde ödülünüz otomatik olarak bankanıza aktarılıcaktır.
src.tag0.cekilis 1
else
src.sysmessage @,,1 Her oyuncu cekilise sadece bir kere katılabilir.
endif
else
src.sysmessage @,,1 Şuanda herhangi bir çekiliş düzenlenmemektedir.
return 1
endif
[function cekilis_sonuc]
call cekilis_sorgu
if (<local.sorgu>=1)
db.query "select * from sphere_cekilis "
local.cekilen=<R1,<ddb.rum.nows>>
src.sysmessage <dlocal.cekilen>
ref1=<db.row.<dlocal.cekilen>>
serv.b @,,1 <def.cekilis> çekilişini <ref1.name> kazanmıştır.
serv.newitem i_gold,65000,<ref1> /// buraya ödülünüz neyse onu ayarlayın.
else
src.sysmessage @,,1 Şuanda herhangi bir çekiliş düzenlenmemektedir.
return 1
endif
[function cekilis_bitir]
call cekilis_sorgu
if (<local.sorgu>=1)
db.query "select * from sphere_cekilis "
for 0 <ddb.num.rows>
uid.<db.row.<dlocal.cekilen>>.tag.cekilis
db.execute "drop table sphere_cekilis;"
src.sysmessage @,,1 Çekiliş sonlandırıldı. MySql temizlendi.
else
src.sysmessage @,,1 Şuanda herhangi bir çekiliş düzenlenmemektedir.
return 1
endif
[function cekilis_Sorgu]
db.query "SHOW TABLES like 'sphere_cekilis' "
local.sorgu <qval (<ddb.ROW.NUMCOLS>= 1) ? 1 : 0>
Scripter : Alcholic
Katılım sorgusunu niye tagla yaptın derseniz sql sorgusunu sphereye anlatamadım bir türlü kafayı yicektim biraz daha uğraşsaydım.
[defname cekilis]
cekilis Sphere-Wiki // çekilişin ismi.
[function cekilis_baslat]
db.connect
db.execute "create table if not exists sphere_cekilis (uid text);"
serv.b @077a,,1 <serv.servname> <def.cekilis> çekilişi başamıştır. Çekilişe katılmak için ''.cekilis'' yazmanız yeterlidir.
[function cekilis]
call cekilis_sorgu
if (<local.sorgu>=1)
if !(<tag0.cekilis>=1)
db.execute "insert into `sphere_cekilis` (`uid`) values ('<src.uid>');"
src.sysmessage @,,1 Çekilişe katıldınız , çekiliş sona erdiğinde ödülünüz otomatik olarak bankanıza aktarılıcaktır.
src.tag0.cekilis 1
else
src.sysmessage @,,1 Her oyuncu cekilise sadece bir kere katılabilir.
endif
else
src.sysmessage @,,1 Şuanda herhangi bir çekiliş düzenlenmemektedir.
return 1
endif
[function cekilis_sonuc]
call cekilis_sorgu
if (<local.sorgu>=1)
db.query "select * from sphere_cekilis "
local.cekilen=<R1,<ddb.rum.nows>>
src.sysmessage <dlocal.cekilen>
ref1=<db.row.<dlocal.cekilen>>
serv.b @,,1 <def.cekilis> çekilişini <ref1.name> kazanmıştır.
serv.newitem i_gold,65000,<ref1> /// buraya ödülünüz neyse onu ayarlayın.
else
src.sysmessage @,,1 Şuanda herhangi bir çekiliş düzenlenmemektedir.
return 1
endif
[function cekilis_bitir]
call cekilis_sorgu
if (<local.sorgu>=1)
db.query "select * from sphere_cekilis "
for 0 <ddb.num.rows>
uid.<db.row.<dlocal.cekilen>>.tag.cekilis
db.execute "drop table sphere_cekilis;"
src.sysmessage @,,1 Çekiliş sonlandırıldı. MySql temizlendi.
else
src.sysmessage @,,1 Şuanda herhangi bir çekiliş düzenlenmemektedir.
return 1
endif
[function cekilis_Sorgu]
db.query "SHOW TABLES like 'sphere_cekilis' "
local.sorgu <qval (<ddb.ROW.NUMCOLS>= 1) ? 1 : 0>
Yorumlar
Henüz yorum yapılmamıştır.
|
OylamalarOylama :![]()
Üyelerin oylama ortalaması (10 dışında) : Henüz Oylanmamış
Oylar: 0 |
Benzer Sayfalar
| Sayfalar | Yorumlar | Gönderen | Tarih |
| Guild sistemi | 0 | Mrs.xariyla | 04-03-2012 |
| House sistemi | 0 | Mrs.xariyla | 04-03-2012 |
| Maaş Sistemi | 0 | Kraagnar | 17-11-2011 |
| Flash üyelik sistemi | 0 | Culum | 25-09-2011 |
| Sorter Account Sistemi | 0 | Sorter | 23-07-2011 |







