oKAA7PBF
Język: Skript | Autor: KrejzolekPRO

function checkVars(p: player):
    if {przegrany-czas::%{_p}%} is not set:
        set {przegrany-czas::%{_p}%} to 0
        
function longToString(p: player) :: text:
    set {_sec} to (rounded up ({przegrany-czas::%{_p}%}/1000))
    set {_d} to {_sec}/86400 parsed as integer
    set {_sec} to {_sec} - ({_d}*86400)
    set {_h} to {_sec}/3600 parsed as integer
    set {_sec} to {_sec} - ({_h}*3600)
    set {_m} to {_sec}/60 parsed as integer
    set {_sec} to {_sec} - ({_m}*60)
    set {_time} to ""
    if {_d} is not 0:
        set {_time} to "%{_d}% dni "
    if {_h} is not 0:
        set {_time} to "%{_time}%%{_h}% godz "
    if {_m} is not 0:
        set {_time} to "%{_time}%%{_h}% min "    
    if {_s} is not 0:
        set {_time} to "%{_time}%%{_h}% sek"
    return {_time}

on join:
    checkVars(player)
    set {wejscie::%player%} to now
    
on quit:
    set {_t} to now - {wejscie::%player%}
    add {_t} to {przegrany-czas::%player%}
    
function openTopInv(p: player):
    set {_num} to size of {przegrany-czas::*}
    loop {_num} times:
        loop {przegrany-czas::*}:
            {_v.%loop-number%} is not set:
                set {_v.%loop-number%} to loop-value
                set {_n.%loop-number%} to loop-index
            loop-value is greater than {_v.%loop-number%}:
                set {_v.%loop-number%} to loop-value
                set {_n.%loop-number%} to loop-index
        remove {_v.%loop-number%} from {zabicia::*}
    loop {_num} times:
        loop-number is less than or equal to 11:
            if {_n.%loop-number%} isn't "<player>":
                set {_time} to longToString({_n.%loop-number%})
                set {_top.%loop-number%} to "&4&l%loop-number%. &e&l%{_n.%loop-number%}% &7(&a&l%{_time}%&7)"
                set {przegrany-czas::%{_n.%loop-number%}%} to {_v.%loop-number%}
    {_num} is less than 11:
        set {_r} to {_num}
        loop 11 - {_num} times:
            add 1 to {_r}
            set {top.%{_r}%} to "&a%{_r}%&a. &cBrak"
    open chest with 2 rows named "&eTopki czasu:":
    loop 10 times:
        set slot loop-number to paper named "%{_top.%loop-number%}%"
    
command /top:
    trigger:
        set {_t} to now - {wejscie::%player%}
        add {_t} to {przegrany-czas::%player%}
        set {wejscie::%player%} to now
        open chest with 1 rows named "&eStatystyki czasu:" to player
        set {_czas} to longToString(player)
        set slot 3 of player's current inventory to paper named "&ePrzegrany czas: &6%{_czas}%&e."
        set slot 5 of player's current inventory to paper named "&eKliknij, aby zobaczyc topki czasu."
        
on inventory click:
    if inventory name of player's current inventory is "&eStatystyki czasu:":
        cancel event
        if slot is 5:
            openTopInv(player)
    if inventory name of player's current inventory is "&eTopki czasu:":      
        cancel event