code.skript.pl - kod cvI34jeV

options:
    TAG: [&b&lHulsky&9&lMC&f]   #Nazwa twojego serwera
    Blad: &cSkrypt &aManihuana &cnie został uruchomiony poprawnie              #Komunikat błędy wyświetlany przy niepoprawnie uruchomionym skrypcie
    CzasWzrostu: 45             #Ile czasu ma rosnąć krzaczek marihuany
    CzasPodlewania: 10          #Czas przez który można podlewać sadzonkę (optymalny, zużywający tylko 1 butelkę wody). Aby wyłączyć potrzebę podlewania czas trzeba ustawić na równy lub więszky od połowy czasu wzrostu
    Trawa: 1                    #Procent szans jest na wypadnięcie ziarna z trawy
    ZiarnoMAN: 75               #Procent szans na wypadnięcie 1 nasionka męskiego z męskiej rośliny
    ZiarnoMEN: 25               #Procent szans na wypadnięcie dodatkowego nasionka męskiego z męskiej rośliny
    ZiarnoWOMAN: 33             #Procent szans na wypadnięcie damskiego nasionka z męskiej rośliny
    Top: 75                     #Procent szans na wypadnięcie 1 topa z damskiej rośliny
    Topy: 33                    #Procent szans na wypadnięcie dodatkowego topa z damskiej rośliny
    TopyBest: 10                 #Procent szans na wypadnięcie 3 dodatkowych topów z damskiej rośliny
    Nagroda: diam               #Co ma być dawane za sprzedaż blantów (diam - diamenty, hajs - pieniądze)
    Diam: 1                     #Ilość diamentów za jednego jointa przy sprzedaży
    Hajs: 5                     #Ilość pieniędzy za jednego jointa przy sprzedaży

on script load:
    if "{@Nagroda}" is equal to "diam":
        set {nagr::hajs} to 0
        set {nagr::diam} to 1
    else if "{@Nagroda}" is equal to "hajs":
        set {nagr::diam} to 0
        set {nagr::hajs} to 1
    else:
        broadcast "{@TAG} {@Blad}"
        set {nagr::hajs} to 0
        set {nagr::diam} to 0
        stop

on breaking short grass or tall grass:
    chance of {@Trawa}%:
        drop beetroot seed named "&7&lMęskie ziarno konopii"

on right click on flower pot:
    if item amount of player's tool is 1:    
        if player is holding beetroot seed named "&7&lMęskie ziarno konopii":
            set event-block to potted fern
            set {woda::%event-block's location%} to round({@CzasWzrostu} / 2 + {@CzasPodlewania})
            set {konopia::%event-block's location%::man} to 1
            remove beetroot seed named "&7&lMęskie ziarno konopii" from player's inventory
            loop {@CzasWzrostu} times:
                if {zniszcz::%event-block's location%} is set:
                    if {konopia::%event-block's location%::man} is set:
                        drop flower pot
                        drop beetroot seed named "&7&lMęskie ziarno konopii"
                        set event-block to air
                        clear {konopia::%event-block's location%::man}
                        clear {konopia::%event-block's location%::czas}
                        clear {zniszcz::%event-block's location%}
                        exit 1 loop
                    else if {konopia::%event-block's location%::woman} is set:
                        drop flower pot
                        drop beetroot seed named "&7&lDamskie ziarno konopii"
                        set event-block to air
                        clear {konopia::%event-block's location%::woman}
                        clear {konopia::%event-block's location%::czas}
                        clear {zniszcz::%event-block's location%}
                        exit 1 loop
                remove 1 from {woda::%event-block's location%}
                if {woda::%event-block's location%} is 0:
                    clear {konopia::%event-block's location%::czas}
                    clear {konopia::%event-block's location%::man}
                    set event-block to potted dead bush
                    exit 1 loop
                if {konopia::%event-block's location%::czas} is not -1:
                    add 1 to {konopia::%event-block's location%::czas}
                    wait 1 second
                else:
                    clear {konopia::%event-block's location%::czas}
                    wait 1 second
        else if player is holding beetroot seed named "&7&lDamskie ziarno konopii":
            set event-block to potted fern
            set {konopia::%event-block's location%::woman} to 1
            set {woda::%event-block's location%} to round({@CzasWzrostu} / 2)
            remove beetroot seed named "&7&lDamskie ziarno konopii" from player's inventory
            loop {@CzasWzrostu} times:
                remove 1 from {woda::%event-block's location%}
                if {woda::%event-block's location%} is 0:
                    clear {konopia::%event-block's location%::czas}
                    clear {konopia::%event-block's location%::woman}
                    set event-block to potted dead bush
                    exit 1 loop
                if {konopia::%event-block's location%::czas} is not -1:
                    add 1 to {konopia::%event-block's location%::czas}
                    wait 1 second
                else:
                    clear {konopia::%event-block's location%::czas}
                    wait 1 second
    else:
        cancel event
        send "{@TAG} Możesz użyć maksymalnie 1 przedmiot na raz"

on placing flower pot:
    if {konopia::%event-block's location%::czas} is 0:
        clear {konopia::%event-block's location%::czas}
    if {konopia::%event-block's location%::czas} is set:
        send "{@TAG} &cTu nie możesz postawić doniczki jeszcze przez %(-1 * {konopia::%event-block's location%::czas})% sekund(y)!"
        cancel event

on breaking potted fern:
    cancel event
    set {zniszcz::%event-block's location%} to 1

on explode:
  loop exploded blocks:
    if loop-block is equal to potted fern:
      if {konopia::%loop-block's location%::man} or {konopia::%loop-block's location%::woman} is set:
        wait 10 tick 
        set block at loop-block's location to potted fern
        
on right click on potted fern:
    if player is holding beetroot seed named "&7&lMęskie ziarno konopii" or "&7&lDamskie ziarno konopii":
        cancel event
        send "{@TAG} Tu już jest posadzona konopia"
    else if player is holding shears:
        if {konopia::%event-block's location%::man} is set:
            if {konopia::%event-block's location%::czas} is {@CzasWzrostu}:
                cancel event
                set event-block to flower pot
                clear {konopia::%event-block's location%::man}
                play sound "entity.sheep.shear" with volume 1 and pitch 1 at location of player for player
                set {konopia::%event-block's location%::czas} to 0
                chance of {@ZiarnoMAN}%:
                    drop beetroot seed named "&7&lMęskie ziarno konopii"
                chance of {@ZiarnoMEN}%:
                    drop beetroot seed named "&7&lMęskie ziarno konopii"
                chance of {@ZiarnoWOMAN}%:
                    drop beetroot seed named "&7&lDamskie ziarno konopii"
            else:
                cancel event
                send "{@TAG} Do zbioru zostało %({@CzasWzrostu} - {konopia::%event-block's location%::czas})% sekund."
        else if {konopia::%event-block's location%::woman} is set:
            if {konopia::%event-block's location%::czas} is {@CzasWzrostu}:
                cancel event
                set event-block to flower pot
                clear {konopia::%event-block's location%::woman}
                play sound "entity.sheep.shear" with volume 1 and pitch 1 at location of player for player
                set {konopia::%event-block's location%::czas} to 0
                chance of {@Top}%:
                    drop bee spawn egg named "&a&lTop Marihuany"
                chance of {@Topy}%:
                    drop bee spawn egg named "&a&lTop Marihuany"
                chance of {@TopyBest}%:
                    drop 3 bee spawn egg named "&a&lTop Marihuany"
            else:
                cancel event
                send "{@TAG} Do zbioru zostało %({@CzasWzrostu} - {konopia::%event-block's location%::czas})% sekund."
    else if player is holding water bottle:
        delete player's held item
        if player can hold 1 of empty bottle:
            give empty bottle to player
        else:
            drop empty bottle at location of player
        set {woda::%event-block's location%} to round({@CzasWzrostu} / 2)
        play sound "weed.lanie" with volume 1 and pitch 1 at location of event-block for player
        cancel event
    else:
        cancel event

on right click with axolotl spawn egg or bee spawn egg or bat spawn egg:
    if item amount of player's tool is 1:
        if player's tool is axolotl spawn egg named "&cBlant":
            if {palenie::%player%} is set:
                send "{@TAG} &cMusisz odczekać %(10 - {palenie::%player%})% sekund zanim ponownie zapalisz."
                cancel event
            else:
                cancel event
                remove 1 of event-item from player's inventory
                play sound "weed.joint" with volume 1 and pitch 1 at location of player for player
                loop 9 times:
                    add 1 to {palenie::%player%}
                    wait 1 second
                clear {palenie::%player%}
                remove speed from player
                remove nausea from player
                remove slow falling from player
                remove blindness from player
                wait 1 tick
                apply speed potion of tier 1 to the player for 25 second
                apply slow falling potion of tier 1 to the player for 25 second
                apply nausea potion of tier 1 to the player for 10 second
                apply blindness of tier 1 to the player for 10 second
        else if player's tool is bee spawn egg named "&a&lTop Marihuany":
            cancel event
        else if player's tool is bat spawn egg named "&eBletka":
            cancel event
    else:
        cancel event
        send "{@TAG} Możesz użyć maksymalnie 1 przedmiot na raz"

on right click on zombie:
    if name of clicked zombie is not "&a&lZielarz":
        stop
    else:
        set {_gui} to chest inventory with 6 rows named "&a&lZielarz"
        set slot (integers between 0 and 54) of {_gui} to gray stained glass pane
        set slot 9 of {_gui} to cat spawn egg named "&cBlant"
        set slot 2 and 12 and 20 and 5 and 15 and 23 of {_gui} to green stained glass pane
        set slot 17 of {_gui} to paper named "&a{@Hajs}$"
        set slot 38 of {_gui} to air
        set slot 40 of {_gui} to lime stained glass pane named "&aSprzedaj blanty"
        set slot 49 of {_gui} to red stained glass pane named "&c&lAnuluj handel" with lore "&cPamiętaj aby zabrać przedmioty z okienka handlu" 
        open {_gui} to player

on inventory click:
    if name of event-inventory is not "&a&lZielarz":
        stop
    else:    
        if event-slot is gray stained glass pane:
            cancel event
        else if event-slot is green stained glass pane:
            cancel event
        else if event-slot is paper:
            cancel event
        else if event-slot is cat spawn egg:
            cancel event
        else if clicked slot is 40:
            set {_blanty} to "%slot 38 of player's current inventory%"
            set {_ileblant} to first 2 characters of {_blanty} parsed as integer
            if {_ileblant} is integer:
                set {_czytoblanty} to "%{_ileblant}% axolotl eggs named &cBlant"
                if {_blanty} = {_czytoblanty}:
                    if {nagr::hajs} is 1:
                        add ({@Hajs} * {_ileblant}) to player's balance
                        send "{@TAG} Sprzedałeś %{_ileblant}% blanty(ów) i otrzymałeś %({@Hajs} * {_ileblant})%$"
                        set {_ileblant} to 0
                        set {_blanty} to 0
                        set {_czytoblanty} to 0
                        close player's inventory
                        remove lime stained glass pane named "&aSprzedaj blanty" from player's inventory
                        play sound "weed.zielarz" with volume 1 and pitch 1 at location of target for player
                        stop
                    else if {nagr::diam} is 1:
                        if player can hold ({@Diam} * {_ileblant}) of diamond:
                            give ({@Diam} * {_ileblant}) of diamond to player
                        else:
                            drop ({@Diam} * {_ileblant}) of diamond at location of player
                        send "{@TAG} Sprzedałeś %{_ileblant}% blanty(ów) i otrzymałeś %({@Diam} * {_ileblant})% diamenty(ów)"
                        set {_ileblant} to 0
                        set {_blanty} to 0
                        set {_czytoblanty} to 0
                        close player's inventory
                        remove lime stained glass pane named "&aSprzedaj blanty" from player's inventory
                        play sound "weed.zielarz" with volume 1 and pitch 1 at location of target for player
                        stop
                    else:
                        cancel event
                        broadcast "{@TAG} {@Blad}"
                else:
                    cancel event
            else:
                set {_ileblant} to first 1 character of {_blanty} parsed as integer
                if {_ileblant} is integer:
                    set {_czytoblanty} to "%{_ileblant}% axolotl eggs named &cBlant"
                    if {_blanty} = {_czytoblanty}:
                        if {nagr::hajs} is 1:
                            add ({@Hajs} * {_ileblant}) to player's balance
                            send "{@TAG} Sprzedałeś %{_ileblant}% blanty(ów) i otrzymałeś %({@Hajs} * {_ileblant})%$"
                            set {_ileblant} to 0
                            set {_blanty} to 0
                            set {_czytoblanty} to 0
                            close player's inventory
                            remove lime stained glass pane named "&aSprzedaj blanty" from player's inventory
                            play sound "weed.zielarz" with volume 1 and pitch 1 at location of target for player
                            stop
                        else if {nagr::diam} is 1:
                            if player can hold ({@Diam} * {_ileblant}) of diamond:
                                give ({@Diam} * {_ileblant}) of diamond to player
                            else:
                                drop ({@Diam} * {_ileblant}) of diamond at location of player
                            send "{@TAG} Sprzedałeś %{_ileblant}% blanty(ów) i otrzymałeś %({@Diam} * {_ileblant})% diamenty(ów)"
                            set {_ileblant} to 0
                            set {_blanty} to 0
                            set {_czytoblanty} to 0
                            close player's inventory
                            remove lime stained glass pane named "&aSprzedaj blanty" from player's inventory
                            play sound "weed.zielarz" with volume 1 and pitch 1 at location of target for player
                            stop
                        else:
                            cancel event
                            broadcast "{@TAG} {@Blad}"
                    else:
                        cancel event
                else:
                    set {_czytoblanty} to "axolotl egg named &cBlant"
                    set {_ileblant} to 1
                    if {_blanty} = {_czytoblanty}:
                        if {nagr::hajs} is 1:
                            add ({@Hajs} * {_ileblant}) to player's balance
                            send "{@TAG} Sprzedałeś %{_ileblant}% blanty(ów) i otrzymałeś %({@Hajs} * {_ileblant})%$"
                            set {_ileblant} to 0
                            set {_blanty} to 0
                            set {_czytoblanty} to 0
                            close player's inventory
                            remove lime stained glass pane named "&aSprzedaj blanty" from player's inventory
                            play sound "weed.zielarz" with volume 1 and pitch 1 at location of target for player
                            stop
                        else if {nagr::diam} is 1:
                            if player can hold ({@Diam} * {_ileblant}) of diamond:
                                give ({@Diam} * {_ileblant}) of diamond to player
                            else:
                                drop ({@Diam} * {_ileblant}) of diamond at location of player
                            send "{@TAG} Sprzedałeś %{_ileblant}% blanty(ów) i otrzymałeś %({@Diam} * {_ileblant})% diament"
                            set {_ileblant} to 0
                            set {_blanty} to 0
                            set {_czytoblanty} to 0
                            close player's inventory
                            remove lime stained glass pane named "&aSprzedaj blanty" from player's inventory
                            play sound "weed.zielarz" with volume 1 and pitch 1 at location of target for player
                            stop
                        else:
                            cancel event
                            broadcast "{@TAG} {@Blad}"
                    else:
                        cancel event
        else if clicked slot is 49:
            wait 3 tick
            close player's inventory
            play sound "weed.anuluj" with volume 1 and pitch 1 at location of target for player
            send "&f[&a&lZielarz&f] Dlaczego nic mi nie sprzedałeś?!"
            remove red stained glass pane named "&c&lAnuluj handel" with lore "&cPamiętaj aby zabrać przedmioty z okienka handlu" from player's inventory

on death of creature:
    if victim's display name is "&a&lZielarz":
        cancel event

on script load:
    set {_bletka} to bat spawn eggs named "&eBletka"
    set {_joint} to axolotl spawn egg named "&cBlant"
    set {_top} to bee spawn egg named "&a&lTop Marihuany"
    register new shaped recipe for {_joint} using air, {_bletka}, air, {_bletka}, {_top}, {_bletka}, air, {_bletka}, air with id "blant" in group "weed"
    register new shaped recipe for 18 of {_bletka} using paper, paper, paper, paper, paper, paper, paper, paper, paper with id "bletka" in group "weed"

#Komendy
command /handlarz:
    trigger:
        if player has permission "*":
            spawn a zombie at location of player
            set display name of last spawned entity to "&a&lZielarz"
            set {_zielarz} to uuid of last spawned entity
            execute player command "data merge entity %{_zielarz}% {NoAI:1,Silent:1,Invulnerable:1,ArmorItems:[{Count:1,id:air},{Count:1,id:air},{Count:1,id:air},{Count:1,id:oak_button}]}"
        else:
            send "{@TAG} &cNie masz uprawnień aby to zrobić"
command /usunhandlarza:
    trigger:
        if player has permission "*":
            loop all mobs:
                if display name of loop-entity is "&a&lZielarz":
                    kill loop-entity
        else:
            send "{@TAG} &cNie masz uprawnień aby to zrobić"    
command /weed:
    trigger:
        if player has permission "*":
            set {_bletka} to bat spawn eggs named "&eBletka"
            set {_joint} to axolotl spawn egg named "&cBlant"
            set {_top} to bee spawn egg named "&a&lTop Marihuany"
            set {_ziarnoMEN} to beetroot seed named "&7&lMęskie ziarno konopii"
            set {_ziarnoWOMEN} to beetroot seed named "&7&lDamskie ziarno konopii"
            wait 1 tick
            give {_bletka} to player
            give {_joint} to player
            give {_top} to player
            give {_ziarnoMEN} to player
            give {_ziarnoWOMEN} to player