# | <- homuMarriesMaster -> | #
options:
    sciezka: zmienne/ #sciezka do pliku YML z danymi gracza
    sciezka-config: zmienne/config.yml #lokacja pliku YML z opcjami malzenstwa
    
function homeTP(location: text, world: world) :: location:
    set {_loc::*} to {_location} parsed as "x: %num%, y: %num%, z: %num%"
    return location({_loc::1}, {_loc::2}, {_loc::3}, {_world})

on rightclick on player:
    set {_malzonek::partner} to yaml value "partner" from file "{@sciezka}%player's uuid%.yml"
    set {_malzonek::partner} to {_malzonek::partner} parsed as offlineplayer
    if clicked player is {_malzonek::partner}:
        if player is sneaking:
            set {_kiss} to yaml value "kiss" from file "zmienne/%player's uuid%.yml"
            if {_kiss} is not set:
                set yaml value "kiss" from file "zmienne/%player's uuid%.yml" to "true"
            set {_kiss-time} to yaml value "kiss-time" from file "zmienne/%player's uuid%.yml"
            set {_kiss-time} to {_kiss-time} parsed as number
            set {_timed} to difference between {_kiss-time} and unix time
            set {_time} to 60
            if {_timed} is less than {_time}:
                send "&cPozostało &b%{_time} - {_timed}% sekund &cdo następnego buziaka!"
                cancel event
                stop
            set yaml value "kiss" from file "zmienne/%player's uuid%.yml" to "%unix time%"
            send "&c*Mua*" to player
            create a fake explosion at player
            send "&c*Mua*" to {_malzonek::partner}
            loop 3 times:
                spawn 5 of particle heart at location of player
                spawn 5 of particle heart at location of {_malzonek::partner}
                wait second
    
command homu:marries [<text>] [<offlineplayer>] [<offlineplayer>]:
    aliases: marry, marries, hmarry, hmarrymaster, sluby, wesele, slub
    trigger:
        set {_malzonek::partner} to yaml value "partner" from file "{@sciezka}%player's uuid%.yml"
        if argument 1 is not "rozwod" or "status" or "tp" or "dom" or "ustawdom":
            set {_arg1} to argument 1 parsed as player
            if {_arg1} is online:
                set {_malzonek::accept} to yaml value "marry-accept" from file "{@sciezka}%player's uuid%.yml"
                set {_malzonek:acceptp} to yaml value "marry-accept" from file "{@sciezka}%{_arg1}'s uuid%.yml"
                set {_malzonek::partnerp} to yaml value "partner" from file "{@sciezka}%{_arg1}'s uuid%.yml"
                loop {_malzonek::*}:
                    if loop-value is not set:
                        send "&c&lSlub &4·•● &fGracz &3%player% &fma zamiar Ciebie poslubic." to {_arg1}
                        send "&c&lSlub &4·•● &fAby przystapic do slubu wpisz &e/slub %player%" to {_arg1}
                        send "&c&lSlub &4·•● &3%{_arg1}% &fdowiedziala sie o Twoich zamiar poslubin."
                        set yaml value "marry-accept" from file "{@sciezka}%player's uuid%.yml" to "waiting"
                        set yaml value "marry-accept" from file "{@sciezka}%{_arg1}'s uuid%.yml" to "waiting"
                        wait 30 seconds
                        delete yaml value "marry-accept" from file "{@sciezka}%player's uuid%.yml"
                        delete yaml value "marry-accept" from file "{@sciezka}%{_arg1}'s uuid%.yml"
                        stop
                    send "&4&lBLAD: &7Problem z realizacja slubu (posiadanie partnera lub kandydata)"
                if {_malzonek::acceptp} is "%player%":
                    set yaml value "partner" from file "{@sciezka}%player's uuid%.yml" to "%{_arg1}%"
                    set yaml value "partner" from file "{@sciezka}%{_arg1}'s uuid%.yml" to "%player%"
                    delete yaml value "marry-accept" from file "{@sciezka}%player's uuid%.yml"
                    delete yaml value "marry-accept" from file "{@sciezka}%{_arg1}'s uuid%.yml"
                    broadcast "&c&lSlub &4·•● &e%{_arg1}% &4♥ &3%player%"
                    stop
                send "&4&lBLAD: &7Brak zamiaru poslubin od tej osoby..."
                stop
            send "&4&lBLAD: &7Gracz nie jest online..."
            stop
        if argument 1 is "rozwod":
            if argument 2 is online:
                set {_malzonek::partnerp} to yaml value "partner" from file "{@sciezka}%arg 2's uuid%.yml"
                loop {_malzonek::*}:
                    if loop-value is "%player%":
                        delete yaml value "partner" from file "{@sciezka}%player's uuid%.yml"
                        delete yaml value "partner" from file "{@sciezka}%arg 2's uuid%.yml"
                        delete yaml value "marry-home" from file "{@sciezka}%arg 2's uuid%.yml"
                        delete yaml value "marry-home" from file "{@sciezka}%player's uuid%.yml"
                        broadcast "&9&lRozwod &7·•● &9%player% &7&l♥ &9%arg 2%"
                    send "&4&lBLAD: &7Nie macie razem malzenstwa..."
                    stop
            send "&4&lBLAD: &7Gracz nie jest online..."
            stop
        if argument 1 is "status":
            set {_malzonek::accept} to yaml value "marry-accept" from file "{@sciezka}%player's uuid%.yml"
            set {_malzonek::home} to yaml value "marry-home" from file "{@sciezka}%player's uuid%.yml"
            send "&c&l&m-------------&c&l[ &4&lSTATUS &c&l]&c&l&m--------------"
            if {_malzonek::partner} is not set:
                if {_malzonek::accept} is not set:
                    send "&eStatus: &cSingiel"
                else:
                    send "&eStatus: &cSingiel"
                    send "&eProśba do ślubu: &aTak &8(&7%{_marry-accept}%&8)"
            else:
                send "&eStatus: &bŻonaty &8(&7%{_marry-partner}%&8)"
                if {_malzonek::home} is not set:
                    send "&eDom małżeński: &cNie"
                else:
                    send "&eDom małżeński: &aTak"
        set {_teleport} to yaml value "teleport" from file "{@sciezka-config}"
        if argument 1 is "tp":
            if argument 2 is online:
                if {_teleport} is "true":
                    set {_malzonek::partnerp} to yaml value "partner" from file "{@sciezka}%player's uuid%.yml"
                    loop {_malzonek::*}:
                        if loop-value is "%player%":
                            send "&3&lMalzenstwo &b·•● &fTeleportacja do &3%arg 2%&f..."
                            set {_loc} to player's location
                            loop 5 times:
                                if player's location is {_loc}:
                                    send "&3&lMalzenstwo &b·•● &e%6 - loop-number%..."
                                else:
                                    send "&3&lMalzenstwo &b·•● &cRuszyłeś się! Teleportacja przerwana..."
                                    stop
                            send "&4&lSluby &fTwoj/a partner/ka &3%player% &fteleportował/a się do Ciebie!" to arg 2
                            teleport player to arg 2
                            send "&4&lSluby &fPrzeteleportowano do &3%arg 2%&f."
        set {_home} to yaml value "home" from file "{@sciezka-config}"                
        if argument 1 is "dom":
            if {_home} is "true":
                set {_malzonek::home} to yaml value "marry-home" from file "{@sciezka}%player's uuid%.yml"
                if {_malzonek::home} is set:
                    set {_loc} to player's location
                    loop 5 times:
                        if player's location is {_loc}:
                            send "&3&lMalzenstwo &b·•● &e%6 - loop-number%..."
                        else:
                            send "&3&lMalzenstwo &b·•● &cRuszyłeś się! Teleportacja przerwana..."
                            stop
                    teleport player to homeTP("%{_malzonek::home}%", event-world)
                    stop
                send "&3&lMalzenstwo &b·•● &fDom nie jest ustawiony."
                stop
            send "&4&lBLAD: &7Domy na serwerze sa wylaczone..."
        if argument 1 is "ustawdom":
            if {_malzonek::partner} is set:
                if {_home} is "true":
                    set yaml value "marry-home" from file "{@sciezka}%{_malzonek::partner}'s uuid%.yml" to "%player's location%"
                    set yaml value "marry-home" from file "{@sciezka}%player's uuid%.yml" to "%player's location%"
                    send "&3&lMalzenstwo &b·•● &fDom zostal ustawiony na koordynatach: &6%player's location%&f!"
                    stop
                send "&4&lBLAD: &7Domy na serwerze sa wylaczone..."
                stop
        if argument 1 is "usundom"
            if {_malzonek::partner} is set:
                if {_home} is "true":
                    delete yaml value "marry-home" from file "{@sciezka}%{_malzonek::partner}'s uuid%.yml"
                    delete yaml value "marry-home" from file "{@sciezka}%player's uuid%.yml"
                    
on command:
    if command is "marry" or "marries" or "hmarry" or "hmarrymater" or "sluby" or "wesele" or "slub" or "homu:marries":
        if arguments is not set:
            send "&c&l&m-------------&c&l[ &4&lSLUBY &c&l]&c&l&m--------------"
            send "&e/%command% &8- &ewyswietla te menu."
            send "&e/%command% <gracz> &8- &ewysyła/akceptuje prośbę o ślub."
            send "&e/%command% rozwod <gracz> &8- &erozwod z partnerem/ką."
            send "&e/%command% status &8- &estatus związku."
            send "&e/%command% tp <gracz> &8- &eteleport do partnera/ki."
            send "&e/%command% dom &8- teleport do domu małżeństwa."
            send "&e/%command% ustawdom &8- &eustawia dom małżeństwa."
            send ""
            send "&eAby się pocałować kliknij &c&lPPM + SHIFT &eskupiając wzrok na partnerze!"