Facebook

CASE safest cryptocurrency exchange

From RoRap, 7 Years ago, written in Plain Text.
URL https://pastebin.pl/view/221a6858
Embed
Download Paste or View Raw
Hits: 245
  1. Author: RoRap
  3. # Launge: Polish
  4.  
  5. variables:
  6.     {case::player::%player%::open} = false
  7.     {case::player::%player%::openwait} = false
  8.  
  9. options:
  10.    
  11.     # General
  12.    
  13.     tag: &5[&8&l>&4&l>&8&l>&5] # Przedrostek wiadomosci
  14.    
  15.     # Drop case
  16.    
  17.     chance drop key: 1.5% # Szansa na wykopanie klucza podana w procentach
  18.     chance drop chest: 5.2% # Szansa na wykopanie skrzyni podana w procentach
  19.     block drop: stone or dirt or gravel # Z jakiego bloku mozna wykopac skrzynie/klucz
  20.    
  21.     chance death key: 1.4% # Szansa na wypadniecie klucza po zabiciu gracza
  22.     chance death chest: 5.6% # Szansa na wypadniecie skrzyni po zabiciu gracza
  23.    
  24.     # Colour message:
  25.    
  26.     important: &6
  27.     general: &7
  28.     leere: &8
  29.    
  30.     lore: &c
  31.    
  32. command /case [<text="help">] [<text>] [<text>] [<text>]:
  33.     trigger:
  34.         if player has permission "case.*":
  35.             if arg 1 is "help":
  36.                 send "{@tag}"
  37.                 send "{@important}/case add <name> <type> {@leere}- {@general}Dodaje nowa skrzynke."
  38.                 send "{@important}/case remove <name> {@leere}- {@general}Usuwa skrzynke."
  39.                 send "{@important}/case edit <name> {@leere}- {@general}Edytuje zawartosc skrzyni."
  40.                 send "{@important}/case give <name> [<player/all>] [<number>] {@leere}- {@general}Daje nam klucz i skrzynie."
  41.                 send "{@important}/case list {@leere}- {@general}Lista skrzyn w gui."
  42.                 send "{@important}/case stats [<player>] {@leere}- {@general}Statystyki gracza."
  43.                 send "{@important}/case open <name> [<player>] {@leere}- {@general}Otwiera skrzynie."
  44.             if arg 1 is "add":
  45.                 if arg 2 is set:
  46.                     set {_name} to arg 2
  47.                     replace all "_" with " " in {_name}
  48.                     loop {case::chestlist::*}:
  49.                         if loop-value is {_name}:
  50.                             send "{@tag} {@general}Taka skrzynia juz istnieje!"
  51.                             stop
  52.                     if arg 3 is set:
  53.                         if arg 3 is "key" or "notkey":
  54.                             add {_name} to {case::chestlist::*}
  55.                             send "{@tag} {@general}Dodano skrzynie o nazwie {@important}%{_name}%{@general}."
  56.                             if arg 3 is "key":
  57.                                 set {case::type::%{_name}%} to "key"
  58.                                 send "{@tag} {@general}Skrzynia wymaga klucza."
  59.                             if arg 3 is "notkey":
  60.                                 set {case::type::%{_name}%} to "notkey"
  61.                                 send "{@tag} {@general}Skrzynia nie wymaga klucza."
  62.                         else:
  63.                             send "{@tag} {@important}/case add <name> <type=""key""or""notkey""> "
  64.                     else:
  65.                         send "{@tag} {@important}/case add <name> <type=""key""or""notkey""> "
  66.                 else:
  67.                     send "{@tag} {@important}/case add <name> <type=""key""or""notkey""> "
  68.             if arg 1 is "remove":
  69.                 if arg 2 is set:
  70.                     set {_name} to arg 2
  71.                     replace all "_" with " " in {_name}
  72.                     loop {case::chestlist::*}:
  73.                         if loop-value is {_name}:
  74.                             remove {_name} from {case::chestlist::*}
  75.                             delete {case::%{_name}%::itemlist::*}
  76.                             delete {case::type::%{_name}%}
  77.                             send "{@tag} {@general}Usunieto skrzynie o nazwie {@important}%{_name}%{@general}."
  78.                             stop
  79.                     send "{@tag} {@general}Taka skrzynia nie istnieje!"
  80.                 else:
  81.                     send "{@tag} {@important}/case remove <name>"
  82.             if arg 1 is "edit":
  83.                 if arg 2 is set:
  84.                     set {_name} to arg 2
  85.                     replace all "_" with " " in {_name}
  86.                     loop {case::chestlist::*}:
  87.                         if loop-value is {_name}:
  88.                             open chest with 3 rows named "{@important}Edytujesz: {@lore}%{_name}%" to player
  89.                             wait 1 tick
  90.                             set {_slot} to 0
  91.                             loop {case::%{_name}%::itemlist::*}:
  92.                                 set slot {_slot} of current inventory of player to loop-value-2
  93.                                 add 1 to {_slot}
  94.                             set {case::player::%player%::openedit} to "%{_name}%"
  95.                             send "{@tag} {@general}Edytujesz zawartosc skrzyni {@important}%{_name}%{@general}." to player
  96.                             while inventory name of player is "{@important}Edytujesz: {@lore}%{_name}%":
  97.                                 set {case::player::%player%::openedit} to "%{_name}%"
  98.                                 wait 5 tick
  99.                             stop
  100.                     send "{@tag} {@general}Taka skrzynia nie istnieje!"
  101.                 else:
  102.                     send "{@tag} {@important}/case additem <name>"
  103.             if arg 1 is "give":
  104.                 if arg 2 is set:
  105.                     set {_name} to arg 2
  106.                     replace all "_" with " " in {_name}
  107.                     loop {case::chestlist::*}:
  108.                         if loop-value is {_name}:
  109.                             set {_lore} to "%{case::%{_name}%::itemlist::*}%"
  110.                             replace all ", " with "|| {@leere}- {@lore}" in {_lore}
  111.                             replace all "and " with "|| {@leere}- {@lore}" in {_lore}
  112.                             if arg 3 is set:
  113.                                 if arg 4 is set:
  114.                                     set {_number} to arg 4 parsed as integer
  115.                                 else:
  116.                                     set {_number} to 64
  117.                                 if arg 3 is "all":
  118.                                     loop all players:
  119.                                         if {case::type::%{_name}%} is "key":
  120.                                             add {_number} of chest named "{@important}%{_name}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " to loop-player's inventory
  121.                                             add {_number} of tripwire hook named "{@important}Klucz do skrzyni {@lore}%{_name}%" to loop-player's inventory
  122.                                         else if {case::type::%{_name}%} is "notkey":
  123.                                             add {_number} of ender chest named "{@important}%{_name}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " to loop-player's inventory
  124.                                 if arg 3 is not "all":
  125.                                     set {_player} to arg 3 parsed as offlineplayer
  126.                                     if {case::type::%{_name}%} is "key":
  127.                                         add {_number} of chest named "{@important}%{_name}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " to {_player}'s inventory
  128.                                         add {_number} of tripwire hook named "{@important}Klucz do skrzyni {@lore}%{_name}%" to {_player}'s inventory
  129.                                     else if {case::type::%{_name}%} is "notkey":
  130.                                         add {_number} of ender chest named "{@important}%{_name}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " to {_player}'s inventory
  131.                             else:
  132.                                 if {case::type::%{_name}%} is "key":
  133.                                     add 64 of chest named "{@important}%{_name}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " to player's inventory
  134.                                     add 64 of tripwire hook named "{@important}Klucz do skrzyni {@lore}%{_name}%" to player's inventory
  135.                                 else:
  136.                                     add 64 of ender chest named "{@important}%{_name}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " to player's inventory
  137.                             stop
  138.                     send "{@tag} {@general}Taka skrzynia nie istnieje!"
  139.                 else:
  140.                     send "{@tag} {@important}/case give <name> [<type=""%%player%%""or""all"">] [<number>]"
  141.             if arg 1 is "list":
  142.                 open chest with 6 rows named "{@important}Lista skrzynek:" to player
  143.                 wait 1 tick
  144.                 set {_slot} to 0
  145.                 loop {case::chestlist::*}:
  146.                     if loop-value contains "<none>":
  147.                         remove loop-value from {case::chestlist::*}
  148.                     set {_lore} to "%{case::%loop-value%::itemlist::*}%"
  149.                     set {_name%loop-index%} to loop-value
  150.                     replace all ", " with "|| {@leere}- {@lore}" in {_lore}
  151.                     replace all "and " with "|| {@leere}- {@lore}" in {_lore}
  152.                     replace all " " with "_" in {_name%loop-index%}
  153.                     if {case::type::%loop-value%} is "key":
  154.                         format slot {_slot} of player with 1 of chest named "{@important}%loop-value%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " to run [close player's inventory]->[wait 2 tick]->[execute player command "case open %{_name%{_slot}%}%"]
  155.                     else:
  156.                         format slot {_slot} of player with 1 of ender chest named "{@important}%loop-value%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " to run [close player's inventory]->[wait 2 tick]->[execute player command "case open %{_name%{_slot}%}%"]
  157.                     add 1 to {_slot}
  158.                     wait 1 tick
  159.             if arg 1 is "stats":
  160.                 if arg 2 is set:
  161.                     set {_player} to arg 2 parsed as player
  162.                 else:
  163.                     set {_player} to player
  164.                 send "{@tag} {@general}Otworzone skrzynie gracza {@important}%{_player}%{@general}:"
  165.                 loop {case::chestlist::*}:
  166.                     if {case::player::%{_player}%::stats::%loop-value%} is set:
  167.                         send " {@important}%loop-value%{@leere}: {@general}%{case::player::%{_player}%::stats::%loop-value%}%"
  168.                     else:
  169.                         send " {@important}%loop-value%{@leere}: {@general}0"
  170.         if arg 1 is "open":
  171.             if arg 2 is set:
  172.                 if arg 3 is set:
  173.                     if player has permission "case.*":
  174.                         set {_player} to arg 3 parsed as player
  175.                     else:
  176.                         send "{@tag} {@general}Nie posiadasz uprawnien!"
  177.                 else:
  178.                     set {_player} to player
  179.                 set {_name} to arg 2
  180.                 replace all "_" with " " in {_name}
  181.                 loop {case::chestlist::*}:
  182.                     if loop-value is {_name}:
  183.                         set {_lore} to "%{case::%loop-value%::itemlist::*}%"
  184.                         replace all ", " with "|| {@leere}- {@lore}" in {_lore}
  185.                         replace all "and " with "|| {@leere}- {@lore}" in {_lore}
  186.                         set lore of player's tool to " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || "
  187.                         if {case::type::%{_name}%} is "key":
  188.                             if {_player}'s inventory contains tripwire hook named "{@important}Klucz do skrzyni {@lore}%{_name}%":
  189.                                 if {_player}'s inventory contains chest named "{@important}%{_name}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || ":
  190.                                     if {case::player::%{_player}%::openwait} is true:
  191.                                         send "{@tag} {@general}Juz otwierasz skrzynie!" to {_player}
  192.                                     else:
  193.                                         if (size of {case::%{_name}%::itemlist::*}) > 0:
  194.                                             add 1 to {case::player::%{_player}%::stats::%{_name}%}
  195.                                             remove 1 tripwire hook named "{@important}Klucz do skrzyni {@lore}%{_name}%" from {_player}'s inventory
  196.                                             remove 1 chest named "{@important}%{_name}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " from {_player}'s inventory
  197.                                             set {case::player::%{_player}%::open} to true
  198.                                             set {case::player::%{_player}%::openwait} to true
  199.                                             open chest with 6 rows named "{@important}Skrzynia {@lore}%{_name}%" to {_player}
  200.                                             wait 1 tick
  201.                                             loop 9 times:
  202.                                                 set {_item%loop-number%} to random element out of {case::%{_name}%::itemlist::*}
  203.                                                 format slot loop-number + 8 of {_player} with {_item%loop-number%} to be unstealable
  204.                                                 format slot loop-number - 1 of {_player} with 1 of black stained glass pane to be unstealable
  205.                                                 format slot loop-number + 17 of {_player} with 1 of black stained glass pane to be unstealable
  206.                                             format slot 4 of {_player} with 1 of hopper to be unstealable
  207.                                             set {_slot} to 0
  208.                                             loop {case::%{_name}%::itemlist::*}:
  209.                                                 if {case::player::%{_player}%::open} is true:
  210.                                                     add 1 to {_slot}
  211.                                                     format slot {_slot} + 26 of {_player} with loop-value-2 to be unstealable
  212.                                                     wait 1 tick
  213.                                             set {_random} to random integer between 20 and 30
  214.                                             wait 1 seconds
  215.                                             loop {_random} times:
  216.                                                 if loop-number > 15:
  217.                                                     loop loop-number - 12 times:
  218.                                                         wait 1 tick
  219.                                                 else:
  220.                                                     wait 3 tick
  221.                                                 play raw sound "mob.skeleton.death" at {_player} with pitch 8 volume 1
  222.                                                 loop 8 times:
  223.                                                     set {_item%loop-number-2%} to {_item%loop-number-2 + 1%}
  224.                                                     if {case::player::%{_player}%::open} is true:
  225.                                                         format slot loop-number-2 + 8 of {_player} with {_item%loop-number-2%} to be unstealable
  226.                                                 set {_item9} to random element out of {case::%{_name}%::itemlist::*}
  227.                                                 if {case::player::%{_player}%::open} is true:
  228.                                                     format slot 17 of {_player} with {_item9} to be unstealable
  229.                                             set {case::player::%{_player}%::open} to false
  230.                                             wait 3 seconds
  231.                                             launch flickering trailing ball firework colored green at {_player} timed 1
  232.                                             add {_item5} to {_player}'s inventory
  233.                                             play raw sound "mob.endermen.portal" at {_player} with pitch 0.1 volume 1
  234.                                             set {case::player::%{_player}%::openwait} to false
  235.                                         else:
  236.                                             send "{@tag} {@general}W tej skrzyni nie mozna nic wylosowac!" to {_player}
  237.                                 else:
  238.                                     send "{@tag} {@general}Nie posiadasz tej skrzyni!" to {_player}
  239.                             else:
  240.                                 send "{@tag} {@general}Nie posiadasz klucza do tej skrzyni!" to {_player}
  241.                         else:
  242.                             if {_player}'s inventory contains ender chest named "{@important}%{_name}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || ":
  243.                                 if {case::player::%{_player}%::openwait} is true:
  244.                                     send "{@tag} {@general}Juz otwierasz skrzynie!" to {_player}
  245.                                 else:
  246.                                     if (size of {case::%{_name}%::itemlist::*}) > 0:
  247.                                         add 1 to {case::player::%{_player}%::stats::%{_name}%}
  248.                                         remove 1 ender chest named "{@important}%{_name}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " from {_player}'s inventory
  249.                                         set {case::player::%{_player}%::open} to true
  250.                                         set {case::player::%{_player}%::openwait} to true
  251.                                         open chest with 6 rows named "{@important}Skrzynia {@lore}%{_name}%" to {_player}
  252.                                         wait 1 tick
  253.                                         loop 9 times:
  254.                                             set {_item%loop-number%} to random element out of {case::%{_name}%::itemlist::*}
  255.                                             format slot loop-number + 8 of {_player} with {_item%loop-number%} to be unstealable
  256.                                             format slot loop-number - 1 of {_player} with 1 of black stained glass pane to be unstealable
  257.                                             format slot loop-number + 17 of {_player} with 1 of black stained glass pane to be unstealable
  258.                                         format slot 4 of {_player} with 1 of hopper to be unstealable
  259.                                         set {_slot} to 0
  260.                                         loop {case::%{_name}%::itemlist::*}:
  261.                                             if {case::player::%{_player}%::open} is true:
  262.                                                 add 1 to {_slot}
  263.                                                 format slot {_slot} + 26 of {_player} with loop-value-2 to be unstealable
  264.                                                 wait 1 tick
  265.                                         set {_random} to random integer between 20 and 30
  266.                                         wait 1 seconds
  267.                                         loop {_random} times:
  268.                                             if loop-number > 15:
  269.                                                 loop loop-number - 12 times:
  270.                                                     wait 1 tick
  271.                                             else:
  272.                                                 wait 3 tick
  273.                                             play raw sound "mob.skeleton.death" at {_player} with pitch 8 volume 1
  274.                                             loop 8 times:
  275.                                                 set {_item%loop-number-2%} to {_item%loop-number-2 + 1%}
  276.                                                 if {case::player::%{_player}%::open} is true:
  277.                                                     format slot loop-number-2 + 8 of {_player} with {_item%loop-number-2%} to be unstealable
  278.                                             set {_item9} to random element out of {case::%{_name}%::itemlist::*}
  279.                                             if {case::player::%{_player}%::open} is true:
  280.                                                 format slot 17 of {_player} with {_item9} to be unstealable
  281.                                         set {case::player::%{_player}%::open} to false
  282.                                         wait 3 seconds
  283.                                         broadcast "{@tag} {@general}Gracz {@important}%{_player}% {@general}wylosowal {@important}%{_item5}% {@general}ze skrzyni {@important}%{_name}%{@general}. Gratulacje!"
  284.                                         launch flickering trailing ball firework colored green at {_player} timed 1
  285.                                         add {_item5} to {_player}'s inventory
  286.                                         play raw sound "mob.endermen.portal" at {_player} with pitch 0.1 volume 1
  287.                                         set {case::player::%{_player}%::openwait} to false
  288.                                     else:
  289.                                         send "{@tag} {@general}W tej skrzyni nie mozna nic wylosowac!" to {_player}
  290.                             else:
  291.                                 send "{@tag} {@general}Nie posiadasz tej skrzyni!" to {_player}
  292.                         stop
  293.                 send "{@tag} {@general}Taka skrzynia nie istnieje!" to {_player}
  294. on inventory close:
  295.     if {case::player::%player%::open} is true:
  296.         set {case::player::%player%::open} to false
  297.         send "{@tag} {@general}Zamknieto podglad losowania."
  298.     if {case::player::%player%::openedit} is set:
  299.         clear {case::%{case::player::%player%::openedit}%::itemlist::*}
  300.         loop 27 times:
  301.             if slot "%loop-number - 1%" parsed as an integer of current inventory of player is not air:
  302.                 set {_item} to slot loop-number - 1 of current inventory of player
  303.                 add {_item} to {case::%{case::player::%player%::openedit}%::itemlist::*}
  304.         clear {case::player::%player%::openedit}
  305.         send "{@tag} {@general}Zapisano."
  306. on quit:
  307.     set {case::player::%player%::open} to false
  308.     set {case::player::%player%::openwait} to false
  309.     clear {case::player::%player%::openedit}
  310. on death:
  311.     set {case::player::%victim%::open} to false
  312.     set {case::player::%victim%::openwait} to false
  313.     clear {case::player::%player%::openedit}
  314.     if attacker is a player:
  315.         chance of {@chance death chest}:
  316.             set {_element} to random element out of {case::chestlist::*}
  317.             set {_lore} to "%{case::%{_element}%::itemlist::*}%"
  318.             replace all ", " with "|| {@leere}- {@lore}" in {_lore}
  319.             replace all "and " with "|| {@leere}- {@lore}" in {_lore}
  320.             if {case::type::%{_element}%} is "key":
  321.                 drop chest named "{@important}%{_element}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " at location of victim
  322.             else:
  323.                 drop ender chest named "{@important}%{_element}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " at location of victim
  324.         chance of {@chance death key}:
  325.             set {_element} to random element out of {case::chestlist::*}
  326.             if {case::type::%{_element}%} is "notkey":
  327.                 drop tripwire hook named "{@important}Klucz do skrzyni {@lore}%{_element}%" at location of victim
  328. on right click:
  329.     if player's tool is chest or ender chest:
  330.         loop {case::chestlist::*}:
  331.             if uncolored name of player's tool is loop-value:
  332.                 cancel event
  333.                 set {_name} to uncolored name of player's tool
  334.                 replace all " " with "_" in {_name}
  335.                 execute player command "case open %{_name}%"
  336.                 stop
  337.     if player's tool is tripwire hook:
  338.         if name of player's tool contains "Klucz do skrzyni":
  339.             cancel event
  340.             open chest with 6 rows named "{@important}Lista skrzynek:" to player
  341.             wait 1 tick
  342.             set {_slot} to 0
  343.             loop {case::chestlist::*}:
  344.                 if loop-value contains "<none>":
  345.                     remove loop-value from {case::chestlist::*}
  346.                 set {_lore} to "%{case::%loop-value%::itemlist::*}%"
  347.                 set {_name%loop-index%} to loop-value
  348.                 replace all ", " with "|| {@leere}- {@lore}" in {_lore}
  349.                 replace all "and " with "|| {@leere}- {@lore}" in {_lore}
  350.                 replace all " " with "_" in {_name%loop-index%}
  351.                 if {case::type::%loop-value%} is "key":
  352.                     format slot {_slot} of player with 1 of chest named "{@important}%loop-value%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " to run [close player's inventory]->[wait 2 tick]->[execute player command "case open %{_name%{_slot}%}%"]
  353.                 else:
  354.                     format slot {_slot} of player with 1 of ender chest named "{@important}%loop-value%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || " to run [close player's inventory]->[wait 2 tick]->[execute player command "case open %{_name%{_slot}%}%"]
  355.                 add 1 to {_slot}
  356.                 wait 1 tick
  357. on mine of {@block drop}:
  358.     chance of {@chance drop chest}:
  359.         set {_element} to random element out of {case::chestlist::*}
  360.         set {_lore} to "%{case::%{_element}%::itemlist::*}%"
  361.         replace all ", " with "|| {@leere}- {@lore}" in {_lore}
  362.         replace all "and " with "|| {@leere}- {@lore}" in {_lore}
  363.         if {case::type::%{_element}%} is "key":
  364.             drop chest named "{@important}%{_element}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || "
  365.         else:
  366.             drop ender chest named "{@important}%{_element}%" with lore " || {@important}W tej skrzyni mozesz zdobyc: || || {@leere}- {@lore}%{_lore}% || "
  367.         play raw sound "mob.endermen.portal" at player with pitch 0.001 volume 1
  368.         send "{@tag} {@general}Zdobyles skrzynie {@important}%{_element}%{@general}!"
  369.     chance of {@chance drop key}:
  370.         set {_element} to random element out of {case::chestlist::*}
  371.         if {case::type::%{_element}%} is "key":
  372.             drop tripwire hook named "{@important}Klucz do skrzyni {@lore}%{_element}%"
  373.             play raw sound "mob.endermen.portal" at player with pitch 0.001 volume 1
  374.             send "{@tag} {@general}Zdobyles klucz do skrzyni {@important}%{_element}%{@general}!"

Reply to "CASE"