ToprakM
Yeni bir Steve doğdu!
- Katılım
- 4 Kasım 2018
- Mesajlar
- 5
- Tepki puanı
- 8
- Puanları
- 0
Dakikalar içinde aktif Minecraft sunucunu kur! Lag’sız, düşük pingli TR lokasyon ile kendi dünyanı oluştur, arkadaşlarınla oyna Hemen başla
Selam arkadaşlar, olay şu. İsteyen oyuncular sizin ayarladığınız miktarda parayı sisteme yatırıyorlar, sonra her 7 günde bir olacak şekilde bir otomatik çekiliş oluyor, o çekilişi kazanan oyuncu sisteme yatırılan toplam parayı cebe atıyor. İşte kod;
JavaScript:
#
#
# Yapımcı / Producer by
# @ToprakM
#
#
# Herhangi bir yerde izinsiz paylaşılması kesinlikle yasaktır / Unauthorized sharing in any place is strictly prohibited
# Tüm hakları saklıdır © / All rights reserved ©
#
#
#HaftalıkÇekiliş V1.5.0
#
options:
prefix: &e&lHaftalık&6&lÇekiliş &f #Mesajların başına gelecek yazı
miktar: 5000000 #Her çekilişe kaç para yatırılsın?
EventSaat: 12 #Otomatik Event Saat Kaçta Gerçekleşsin? #UYARI:SİSTEM SAATİNE GÖRE YAZMALISINIZ!
EventDakika: 00 #Otomatik Event Yukarıdaki Saatin Kaçıncı Dakikasında Gerçekleşsin? #UYARI:SİSTEM SAATİNE GÖRE YAZMALISINIZ!
#Yukarıdaki ayarda, standart duruma göre event saat 12:00'da gerçekleşecek. Lütfen ayarlarken saati ve dakikayı ayırarak yazın.
Yapımcı: evet #Yardım Menüsünde Skript'in Yapımcısının Adı Gözüksün Mü? #GÖZÜKMESİ İÇİN "evet" GÖZÜKMEMESİ İÇİN "hayır" YAZINIZ
log: on #İşlemler, özel bir log dosyasına kaydedilsin mi? on / off #Açık kalması tavsiye edilir
command /haftalıkçekiliş [<text>] [<text>]:
aliases: haftalikcekilis, hcekilis, hçekiliş
usage: /hÇekiliş Yardım
trigger:
if arg-1 is set:
if arg-1 is not "istatistiklerim" or "yatır" or "yatir" or "şimdiyap" or "simdiyap" or "katılan" or "katilan" or "yardım" or "yardim" or "help" or "yapımcı" or "yapimci":
send "{@prefix} &cHata! Komutu yanlış girdin! Lütfen &n/hçekiliş&r&c yaz ve tekrar dene!"
else if arg-1 is "yatir" or "yatır":
if {hcekiliskapali} is not set:
if {hcekiliskatilim::%player%} is not set:
if player's balance is greater than or equal to {@miktar}:
execute console command "eco take %player% {@miktar}"
set {hcekiliskatilim::%player%} to player
add {@miktar} to {hcekilisyatirma::%player%}
add {@miktar} to {hcekilis.toplammiktar}
add 1 to {hcekiliskatilim}
send "{@prefix} &aBaşarıyla bu haftanın çekilişine katıldın."
set {_log} to "{@log}"
if {_log} is "on":
if {hcekilis.hafta} is not set:
set {hcekilis.hafta} to 1
log "(%player%): Yatırma Işlemi. Verdiği para {@miktar} Hafta %{hcekilis.hafta}%" to "HaftalikCekilis"
else:
send "{@prefix} &cHata! Yeterince paran yok! Para kazan ve tekrar dene!"
else:
send "{@prefix} &cHata! Zaten haftalık çekilişe katılmışsın!"
else:
send "{@prefix} &cHata! Şuan haftalık çekiliş eventi oluyor! Lütfen bitmesini bekle (yaklaşık 1 dakika sürer) ve tekrar dene!"
else if arg-1 is "istatistiklerim":
if {hcekiliskazanma::%player%} is not set:
set {_kazanmasayisi} to 0
else:
set {_kazanmasayisi} to {hcekiliskazanma::%player%}
if {hcekilisyatirma::%player%} is not set:
set {_yatirma} to 0
else:
set {_yatirma} to {hcekilisyatirma::%player%}
if {hcekiliskazanılanpara::%player%} is not set:
set {_kazanma} to 0
else:
set {_kazanma} to {hcekiliskazanılanpara::%player%}
if {hcekilisyatirma::%player%} is set:
if {hcekiliskazanılanpara::%player%} is set:
set {_karzarar} to {hcekiliskazanılanpara::%player%}-{_yatirma}
else:
set {_karzarar} to 0-{_yatirma}
else:
set {_karzarar} to 0
wait 5 ticks
open chest with 1 rows named "&6&lHaftalık Çekiliş" to player
format slot 0 of player with pink wool named "&d%player% Adlı Oyuncunun İstatistikleri:" to be unstealable
format slot 1 of player with white wool named "&eToplam kazanma sayın:" with lore "&6%{_kazanmasayisi}%" to be unstealable
format slot 2 of player with white wool named "&eÇekilişlere toplam yatırdığın para:" with lore "&6%{_yatirma}% TL" to be unstealable
format slot 3 of player with white wool named "&eÇekilişlerden toplam kazandığın para:" with lore "&6%{_kazanma}% TL" to be unstealable
format slot 4 of player with white wool named "&eÇekilişlerden ettiğin kâr:" with lore "&6%{_karzarar}% TL" to be unstealable
format slot 8 of player with red wool named "&4&oGeri" to close then run [execute player command "hcekilis"]
else if arg-1 is "yardım" or "yardim" or "help":
wait 0.2 seconds
open chest with 1 rows named "&6&lHaftalık Çekiliş &c&lYardım" to player
format slot 0 of player with pink wool named "&cNe işe yarar?" to close then run [execute player command "hcekilis yardım neiseyarar"]
format slot 1 of player with pink wool named "&cKomut listesi" to close then run [execute player command "hcekilis yardım komutlar"]
set {_yapimci} to "{@Yapımcı}"
if {_yapimci} is "evet":
format slot 7 of player with blue wool named "&bBu Skript'in Yapımcısı:" with lore "&a&o@ToprakM" to close then run [execute player command "hcekilis yapımcı"]
format slot 8 of player with red wool named "&4&oGeri" to close then run [execute player command "hcekilis"]
if arg-2 is "neiseyarar" or "neişeyarar":
send "{@prefix} Haftalık çekiliş sistemi, 1 hafta boyunca oyuncuların {@miktar}TL yatırıp adını çekiliş listesine ekletebilecekleri, 1 hafta sonra ise toplanan bütün paranın çekilişi kazanan kişiye verilmesini sağlar." to player
if arg-2 is "komutlar":
send "&6&m---&r&e&lHaftalık&6&lÇekiliş&r&6&m---" to player
send "&b/HÇekiliş - HÇekiliş menüsünü açar" to player
send "&b/HÇekiliş Yatır - {@miktar}TL karşılığında adınızı çekiliş listesine yazdırır." to player
send "&b/HÇekiliş Katılan - Kaç oyuncunun çekilişe katıldığını hesaplar." to player
send "&b/HÇekiliş Yardım - Yardım menüsünü açar."
send "&b/HÇekiliş İstatistiklerim - İstatistiklerinizin bulunduğu bir menü açar."
if player is op:
send "&c/HÇekiliş ŞimdiYap - Çekilişi şimdi yapmanızı sağlar."
send "&6&m---&r&e&lHaftalık&6&lÇekiliş&r&6&m---" to player
else if arg-1 is "yapımcı" or "yapimci":
set {_yapimci} to "{@Yapımcı}"
if {_yapimci} is "evet":
send "&6&m---&r&e&lHaftalık&6&lÇekiliş&r&6&m---" to player
send "&dBu Skript'in Yapımcısı" to player
send "&d&o@ToprakM" to player
send "&cHerhangi bir yerde izinsiz paylaşılması kesinlikle yasaktır" to player
send "&cTüm hakları saklıdır ©" to player
send "&6&m---&r&e&lHaftalık&6&lÇekiliş&r&6&m---" to player
else:
send "{@prefix} &cHata! Komutu yanlış girdin! Lütfen &n/hçekiliş&r&c yaz ve tekrar dene!"
else if arg-1 is "katılan" or "katilan":
send "{@prefix} &dHaftalık Çekilişe Katılan Toplam Oyuncu Sayısı Yükleniyor..." to player
wait 2 seconds
send "{@prefix} &dHaftalık Çekilişe Katılan Toplam Oyuncu; %{hcekiliskatilim}%" to player
else if arg-1 is "şimdiyap" or "simdiyap":
if player has permission "hcekilis.admin":
set {hcekiliskapali} to yes
wait 1 second
set {_player} to a random element out of {hcekiliskatilim::*}
send "&6&m------------------------------------&r" to all players
send "&2&lHaftalık Çekiliş Sonuçları Belirleniyor!" to all players
send "&6&m------------------------------------&r" to all players
wait 10 seconds
send "&6&m------------------------------------&r" to all players
send "&2&lHaftalık Çekilişi &a&l&o%{_player}% &2&lKazandı!" to all players
send "&2&lKazandığı Para: &a&o%{hcekilis.toplammiktar}%TL" to all players
send "&6&m------------------------------------&r" to all players
if {hcekiliskazanılanpara::%{_player}%} is not set:
set {hcekiliskazanılanpara::%{_player}%} to 0
add {hcekilis.toplammiktar} to {hcekiliskazanılanpara::%{_player}%}
set {_log} to "{@log}"
if {_log} is "on":
if {hcekilis.hafta} is not set:
set {hcekilis.hafta} to 1
log "(%{_player}%): Kazanma. Kazandığı para %{hcekilis.toplammiktar}% Hafta %{hcekilis.hafta}% Çekiliş Türü: Manuel" to "HaftalikCekilis"
else:
log "(%{_player}%): Kazanma. Kazandığı para %{hcekilis.toplammiktar}% Hafta %{hcekilis.hafta}% Çekiliş Türü: Manuel" to "HaftalikCekilis"
add 1 to {hcekilis.hafta}
if {_player} is online:
execute console command "eco give %{_player}% %{hcekilis.toplammiktar}%"
else:
set {hcekilisbildirim::%{_player}%} to yes
set {hcekilisbildirimmoney::%{_player}%} to {hcekilis.toplammiktar}
set {hcekilis.toplammiktar} to 0
loop {hcekiliskatilim::*}:
delete {hcekiliskatilim::*}
set {hcekiliskatilim} to 0
if {hcekiliskazanma::%{_player}%} is not set:
set {hcekiliskazanma::%{_player}%} to 1
else:
add 1 to {hcekiliskazanma::%{_player}%}
wait 1 second
delete {hcekiliskapali}
set {hcekiliskalangun} to 7
else:
send "{@prefix} &cHata! Bu komut için yetkin yok!" to player
else:
wait 0.2 seconds
if {hcekiliskatilim} is not set:
set {hcekiliskatilim} to 0
open chest with 1 rows named "&6&lHaftalık Çekiliş" to player
if {hcekiliskatilim::%player%} is "%player%":
format slot 0 of player with red wool named "&6Çekilişe Katıl" to close then run [execute player command "hcekilis yatır"]
else:
format slot 0 of player with green wool named "&6Çekilişe Katıl" to close then run [execute player command "hcekilis yatır"]
format slot 1 of player with white wool named "&bToplam Katılan Oyuncu: &3%{hcekiliskatilim}%" to close then run [execute player command "hcekilis katılan"]
format slot 4 of player with orange wool named "&6İstatistiklerin" to close then run [execute player command "hcekilis istatistiklerim"]
if {hcekiliskalangun} is 1 or 2 or 3 or 4 or 5 or 6 or 7:
if {hcekiliskalangun} is 1:
if {@EventSaat} > hour:
set {_zmn} to "Bugün"
else if {@EventSaat} = hour:
if {@EventDakika} > minute:
set {_zmn} to "Bugün"
else if {@EventDakika} = minute:
set {_zmn} to "&cHata&3"
else if {@EventDakika} < minute:
set {_zmn} to "Yarın"
else if {@EventSaat} < hour:
set {_zmn} to "Yarın"
if {hcekiliskalangun} is 2:
if {@EventSaat} > hour:
set {_zmn} to "Yarın"
else if {@EventSaat} = hour:
if {@EventDakika} > minute:
set {_zmn} to "Yarın"
else if {@EventDakika} = minute:
set {_zmn} to "&cHata&3"
else if {@EventDakika} < minute:
set {_zmn} to "Yarından Sonraki Gün"
else if {@EventSaat} < hour:
set {_zmn} to "Yarından Sonraki Gün"
if {hcekiliskalangun} is 3:
if {@EventSaat} > hour:
set {_zmn} to "Yarından Sonraki Gün"
else if {@EventSaat} = hour:
if {@EventDakika} > minute:
set {_zmn} to "Yarından Sonraki Gün"
else if {@EventDakika} = minute:
set {_zmn} to "&cHata&3"
else if {@EventDakika} < minute:
set {_zmn} to "3 Gün Sonra"
else if {@EventSaat} < hour:
set {_zmn} to "3 Gün Sonra"
if {hcekiliskalangun} is 4:
if {@EventSaat} > hour:
set {_zmn} to "3 Gün Sonra"
else if {@EventSaat} = hour:
if {@EventDakika} > minute:
set {_zmn} to "3 Gün Sonra"
else if {@EventDakika} = minute:
set {_zmn} to "&cHata&3"
else if {@EventDakika} < minute:
set {_zmn} to "4 Gün Sonra"
else if {@EventSaat} < hour:
set {_zmn} to "4 Gün Sonra"
if {hcekiliskalangun} is 5:
if {@EventSaat} > hour:
set {_zmn} to "4 Gün Sonra"
else if {@EventSaat} = hour:
if {@EventDakika} > minute:
set {_zmn} to "4 Gün Sonra"
else if {@EventDakika} = minute:
set {_zmn} to "&cHata&3"
else if {@EventDakika} < minute:
set {_zmn} to "5 Gün Sonra"
else if {@EventSaat} < hour:
set {_zmn} to "5 Gün Sonra"
if {hcekiliskalangun} is 6:
if {@EventSaat} > hour:
set {_zmn} to "5 Gün Sonra"
else if {@EventSaat} = hour:
if {@EventDakika} > minute:
set {_zmn} to "5 Gün Sonra"
else if {@EventDakika} = minute:
set {_zmn} to "&cHata&3"
else if {@EventDakika} < minute:
set {_zmn} to "6 Gün Sonra"
else if {@EventSaat} < hour:
set {_zmn} to "6 Gün Sonra"
if {hcekiliskalangun} is 7:
if {@EventSaat} > hour:
set {_zmn} to "6 Gün Sonra"
else if {@EventSaat} = hour:
if {@EventDakika} > minute:
set {_zmn} to "6 Gün Sonra"
else if {@EventDakika} = minute:
set {_zmn} to "&cHata&3"
else if {@EventDakika} < minute:
set {_zmn} to "Haftaya Bugün"
else if {@EventSaat} < hour:
set {_zmn} to "Haftaya Bugün"
else:
set {_zmn} to "&cHata! Lütfen komutu tekrar yazmayı deneyiniz."
set {hcekiliskalangun} to 7
format slot 8 of player with yellow wool named "&eSistem Hakkında Bilgi Al" to close then run [execute player command "hcekilis help"]
format slot 3 of player with white wool named "&bSıradaki Çekiliş Tarihi: &3%{_zmn}% saat {@EventSaat}:{@EventDakika}'de" to close then run [execute player command "hcekilis"]
format slot 2 of player with white wool named "&bToplam Yatırılan Para: &3%{hcekilis.toplammiktar}%TL" to close then run [execute player command "hcekilis"]
if player has permission "hcekilis.admin":
format slot 7 of player with purple wool named "&6Çekilişi Şimdi Yap" to close then run [execute player command "hcekilis simdiyap"]
on join:
wait 5 seconds
if {hcekilisbildirim::%player%} is set:
send "{@prefix} &eBir Haftalık Çekiliş Kazandın!" to player
send "{@prefix} &eHesabına %{hcekilisbildirimmoney::%player%}%TL Yatırıldı!"
execute console command "eco give %player% %{hcekilisbildirimmoney::%player%}%"
delete {hcekilisbildirimmoney::%player%}
delete {hcekilisbildirim::%player%}
if {hcekiliskalangun} is not 1 or 2 or 3 or 4 or 5 or 6 or 7:
set {hcekiliskalangun} to 7
if {hcekilis.toplammiktar} is not set:
set {hcekilis.toplammiktar} to 0
every minute:
if {hcekiliskalangun} is not set:
set {hcekiliskalangun} to 7
set {_zaman} to "%hour%:%minute%"
if {_zaman} is "{@EventSaat}:{@EventDakika}":
if {hcekiliskalangun} is 1 or 2 or 3 or 4 or 5 or 6 or 7:
if {hcekiliskalangun} is 1:
set {hcekiliskapali} to true
wait 1 second
set {_player} to a random element out of {hcekiliskatilim::*}
send "&6&l&m-------------------------------&r" to all players
send "&c&lHaftalık Çekiliş Sonuçları Belirleniyor!" to all players
send "&6&l&m-------------------------------&r" to all players
wait 3 seconds
send "&6&l&m-------------------------------&r" to all players
send "&c&lHaftalık Çekilişi &4&l%{_player}% &c&lKazandı!" to all players
send "&cKazandığı Para: &4&o%{hcekilis.toplammiktar}%TL" to all players
send "&6&l&m-------------------------------&r" to all players
if {hcekiliskazanılanpara::%{_player}%} is not set:
set {hcekiliskazanılanpara::%{_player}%} to 0
add {hcekilis.toplammiktar} to {hcekiliskazanılanpara::%{_player}%}
set {_log} to "{@log}"
if {_log} is "on":
if {hcekilis.hafta} is not set:
set {hcekilis.hafta} to 1
log "(%{_player}%): Kazanma. Kazandığı para %{hcekilis.toplammiktar}% Hafta %{hcekilis.hafta}% Çekiliş Türü: Otomatik" to "HaftalikCekilis"
else:
log "(%{_player}%): Kazanma. Kazandığı para %{hcekilis.toplammiktar}% Hafta %{hcekilis.hafta}% Çekiliş Türü: Otomatik" to "HaftalikCekilis"
add 1 to {hcekilis.hafta}
if {_player} is online:
execute console command "eco give %{_player}% %{hcekilis.toplammiktar}%"
if {_player} is not online:
set {hcekilisbildirim::%{_player}%} to yes
set {hcekilisbildirimmoney::%{_player}%} to {hcekilis.toplammiktar}
set {hcekilis.toplammiktar} to 0
loop {hcekiliskatilim::*}:
delete {hcekiliskatilim::*}
set {hcekiliskatilim} to 0
if {hcekiliskazanma::%{_player}%} is not set:
set {hcekiliskazanma::%{_player}%} to 1
else:
add 1 to {hcekiliskazanma::%{_player}%}
wait 5 second
set {hcekiliskalangun} to 7
delete {hcekiliskapali}
if {hcekiliskalangun} is 2 or 3 or 4 or 5 or 6 or 7:
remove 1 from {hcekiliskalangun}
on command:
if {hcekiliskapali} is "true":
if {hcekiliskapalibekleniyor} is not set:
set {hcekiliskapalibekleniyor} to true
wait 1 minute
if {hcekiliskapali} is "true":
delete {hcekiliskapali}
delete {hcekiliskapalibekleniyor}
command /haftalıkçekilişver:
aliases: haftalikcekilisver, hçekilişver, hcekilisver
trigger:
send "&dHaftalık Çekiliş V1.5.0"
set {_yapimci} to "{@Yapımcı}"
if {_yapimci} is "evet":
execute player command "hçekiliş yapımcı"- hcekilis.admin = /HÇekiliş ŞimdiYap komutunu kullanmaya yarar
- Lag yapması muhtemel bir kısım düzenlendi
- Ana menüye yatırılan toplam para eklendi
- Artık kazanan kişi duyurulduğunda altında kazandığı para da yazıyor (EKRAN GÖRÜNTÜLERİ GÜNCEL DEĞİL)
- Bazı diğer küçük değişiklikler yapıldı
- Log ayarı eklendi
- Kazanan kişiye parayı vermeme hatası giderildi
- Küçük ama önemli değişiklikler yapıldı.
- Parası yatırma miktarına eşitse yatıramıyordu, düzeltildi.
- Log dosyalarındaki uzantı zaten .log olduğu için _log eki kaldırıldı.
- Saat sistemi iyileştirildi. Artık /HÇekiliş menüsünde bir sonraki çekilişin zamanı eventlerin saatine göre değil anlık saate göre günü gösterecek.
- Eskiden event saati 1 dakika geçtikten sonra, event aslında yarın olacaksa bile bugün yazıyordu.
- /HÇekiliş İstatistiklerim eklendi. Artık kendi istatistiklerinize bakabileceksiniz.
- Koddaki ayarlar kısmında küçük değişiklikler yapıldı.
- Bazı anlaşılmaz mesajlar anlaşılabilir hâliyle değiştirildi.
- Artık hiç bir değişken 0 olarak kaydedilmeyecek.
- Kazanma sayısının 0 olması gibi gereksiz veriler oluşturuyordu. Artık hiç kayıtlı değilse direk 0 olarak yazacak.
- Essentials (Başka bir ekonomi plugini kullanıyorsanız uyumlu hâle getirmeniz gerekebilir)
- Skript
- WildSkript
- Vault
- skRayFall (Yüklemeniz önerilir)
- SkQuery
Eğer bir sorunlar, hatayla karşılaşırsanız benimle iletişim kurabilirsiniz!
All other rights reserved.
