Minecraft gelişmiş sipariş skripti

# ==========================================
# GELİŞMİŞ SİPARİŞ / ORDER SKRİPTİ
# ==========================================

# 1. ANA SİPARİŞ MENÜSÜ (/order, /siparis veya /order 2)
command /order [<text>]:
aliases: siparis, sipariş
trigger:
set {_page} to 1
if arg-1 is set:
set {_check_num} to arg-1 parsed as integer
if {_check_num} is set:
set {_page} to {_check_num}
if {_page} > 5:
set {_page} to 5
if {_page} < 1:
set {_page} to 1
else:
set {order_filter::%player%} to arg-1
send "&a'%arg-1%' için arama uygulandı." to player

open chest inventory with 6 rows named "&8SİPARİŞLER - Sayfa %{_page}%" to player
wait 2 ticks

# Filtre Durumunu Ayarla (1: Normal, 2: En Yeni, 3: En Eski, 4: En Çok Para, 5: En Az Para)
if {order_sort::%player%} is not set:
set {order_sort::%player%} to 1

set {_s1} to "&fNormal"
set {_s2} to "&fEn yeni sipariş"
set {_s3} to "&fEn eski sipariş"
set {_s4} to "&fEşya başına en çok para"
set {_s5} to "&fEşya başına en az para"

if {order_sort::%player%} is 1:
set {_s1} to "&a&lNormal"
else if {order_sort::%player%} is 2:
set {_s2} to "&a&lEn yeni sipariş"
else if {order_sort::%player%} is 3:
set {_s3} to "&a&lEn eski sipariş"
else if {order_sort::%player%} is 4:
set {_s4} to "&a&lEşya başına en çok para"
else if {order_sort::%player%} is 5:
set {_s5} to "&a&lEşya başına en az para"

# Alt Satır Butonları
set slot 45 of current inventory of player to book named "&e&lSipariş Nedir?" with lore "&7Çeşitli eşyalar sipariş et ve" and "&7ekonomini geliştir, işlerini büyüt."
set slot 46 of current inventory of player to chest named "&a&lSipariş Oluştur" with lore "&7Yeni bir sipariş oluşturmak için tıkla."
set slot 48 of current inventory of player to oak sign named "&b&lEşya Ara" with lore "&7Tıklayarak eşya/oyuncu adına göre arama yap."
set slot 49 of current inventory of player to gold ingot named "&6&lYenile" with lore "&7Aramayı temizler, Normal moda döner" and "&7ve tüm siparişleri listeler."

# Huni (5 Aşamalı Filtreleme)
set slot 50 of current inventory of player to hopper named "&d&lFiltreler" with lore "" and "%{_s1}%" and "%{_s2}%" and "%{_s3}%" and "%{_s4}%" and "%{_s5}%" and "" and "&eDeğiştirmek için tıkla!"

# Sayfa Okları (Sola / Sağa Bakan Semboller & Max 5 Sayfa)
if {_page} > 1:
set slot 47 of current inventory of player to arrow named "&a&l◄ Önceki Sayfa" with lore "&7Sayfa %{_page} - 1% için tıkla."
if {_page} < 5:
set slot 51 of current inventory of player to arrow named "&a&lSonraki Sayfa ►" with lore "&7Sayfa %{_page} + 1% için tıkla."

set slot 52 of current inventory of player to barrel named "&6&lAktif Siparişlerim" with lore "&7Kendi siparişlerinizi yönetin."
set slot 53 of current inventory of player to barrier named "&c&lÇık" with lore "&7Menüyü kapatır."

# Filtrelenmiş Sipariş Listesini Hazırlama
delete {_active_orders::*}
loop {orders_list::*}:
set {_id} to loop-value
if {orders::%{_id}%::owner} is set:
set {_owner} to {orders::%{_id}%::owner}
set {_item} to {orders::%{_id}%::item}
set {_show} to true
if {order_filter::%player%} is set:
set {_filter} to uncolored {order_filter::%player%}
set {_item_str} to "%type of {_item}%"
set {_owner_str} to "%{_owner}%"
if {_item_str} does not contain {_filter}:
if {_owner_str} does not contain {_filter}:
set {_show} to false
if {_show} is true:
add {_id} to {_active_orders::*}

# Sıralama Algoritması
if {order_sort::%player%} is 1:
# Normal (Varsayılan Düzen)
set {_final_list::*} to {_active_orders::*}
else if {order_sort::%player%} is 2:
# En Yeni Sipariş (Ters Sıra)
delete {_sorted_list::*}
set {_size} to size of {_active_orders::*}
loop size of {_active_orders::*} times:
add {_active_orders::%{_size}%} to {_sorted_list::*}
remove 1 from {_size}
set {_final_list::*} to {_sorted_list::*}
else if {order_sort::%player%} is 3:
# En Eski Sipariş (Normal Sıra)
set {_final_list::*} to {_active_orders::*}
else if {order_sort::%player%} is 4 or 5:
# Fiyata Göre Sıralama (4: Yüksek->Düşük, 5: Düşük->Yüksek)
set {_final_list::*} to {_active_orders::*}
set {_len} to size of {_final_list::*}
loop {_len} times:
loop {_len} - 1 times:
set {_idx1} to loop-number-2
set {_idx2} to loop-number-2 + 1
set {_id1} to {_final_list::%{_idx1}%}
set {_id2} to {_final_list::%{_idx2}%}
set {_p1} to {orders::%{_id1}%::price}
set {_p2} to {orders::%{_id2}%::price}
set {_swap} to false
if {order_sort::%player%} is 4:
if {_p1} < {_p2}:
set {_swap} to true
else:
if {_p1} > {_p2}:
set {_swap} to true
if {_swap} is true:
set {_final_list::%{_idx1}%} to {_id2}
set {_final_list::%{_idx2}%} to {_id1}

# Siparişleri Listeleme (Slot 0-44)
set {_slot} to 0
set {_start} to ({_page} - 1) * 45
set {_count} to 0

loop {_final_list::*}:
set {_id} to loop-value
add 1 to {_count}
if {_count} > {_start}:
if {_slot} < 45:
set {_owner} to {orders::%{_id}%::owner}
set {_item} to {orders::%{_id}%::item}
set {_amount} to {orders::%{_id}%::amount}
set {_collected} to {orders::%{_id}%::collected}
set {_price} to {orders::%{_id}%::price}
if {_amount} is not set:
set {_amount} to 1
if {_collected} is not set:
set {_collected} to 0
if {_price} is not set:
set {_price} to 10
set {_needed} to {_amount} - {_collected}

set slot {_slot} of current inventory of player to {_item} named "&e&lEşya: %type of {_item}%" with lore "" and "&7Oyuncu: &f%{_owner}%" and "" and "&7Eşya Miktarı: &a%{_needed}%" and "" and "&7Birim Fiyat: &e%{_price}%$" and "" and "&a&l[Teslim Etmek İçin Tıkla]" and "&8ID: %{_id}%"
add 1 to {_slot}

# 2. SİPARİŞ OLUŞTURMA MENÜSÜ
command /siparisolusturmenu:
trigger:
open chest inventory with 3 rows named "SİPARİŞLER -> Yeni Sipariş" to player
wait 2 ticks

loop 27 times:
set slot (loop-number - 1) of current inventory of player to gray stained glass pane named " "

if {temp_order::%player%::item} is not set:
set {temp_order::%player%::item} to stone
if {temp_order::%player%::amount} is not set:
set {temp_order::%player%::amount} to 1
if {temp_order::%player%::price} is not set:
set {temp_order::%player%::price} to 10

set slot 10 of current inventory of player to red stained glass pane named "&c&lİptal" with lore "&7Ana menüye döner."
set {_i} to {temp_order::%player%::item}
set {_amt} to {temp_order::%player%::amount}
set {_prc} to {temp_order::%player%::price}

set slot 12 of current inventory of player to {_i} named "&e&lEşya Adı" with lore "&7Seçilen: &b%type of {_i}%"
set slot 13 of current inventory of player to chest named "&e&lMiktar" with lore "&7Miktar: &a%{_amt}%"
set slot 14 of current inventory of player to emerald named "&a&lBirim Fiyat" with lore "&7Tane Fiyatı: &e%{_prc}%$"

set {_total} to {_amt} * {_prc}
set slot 16 of current inventory of player to * stained glass pane named "&a&lOnayla" with lore "&7Toplam Tutar: &e%{_total}%$"

set slot 26 of current inventory of player to arrow named "&c&l◄ Geri" with lore "&7Ana sipariş menüsüne döner."

# 3. AKTİF SİPARİŞLERİM MENÜSÜ
command /aktifsiparislerim:
trigger:
open chest inventory with 3 rows named "&8Aktif Siparişlerim" to player
wait 2 ticks
set {_slot} to 0
loop {orders_list::*}:
set {_id} to loop-value
if {orders::%{_id}%::owner} is player:
set {_item} to {orders::%{_id}%::item}
set slot {_slot} of current inventory of player to {_item} named "&e&l%type of {_item}%" with lore "&7Düzenlemek için tıkla." and "&8ID: %{_id}%"
add 1 to {_slot}

set slot 26 of current inventory of player to arrow named "&c&l◄ Geri" with lore "&7Ana sipariş menüsüne döner."

# 4. SİPARİŞ DÜZENLEME MENÜSÜ
command /siparisduzenle [<text>]:
trigger:
set {_id} to arg-1
if {_id} is set:
set {selected_order::%player%} to {_id}
open chest inventory with 3 rows named "&8Sipariş Detayı" to player
wait 2 ticks

set {_item} to {orders::%{_id}%::item}
set {_amount} to {orders::%{_id}%::amount}
set {_collected} to {orders::%{_id}%::collected}
if {_amount} is not set:
set {_amount} to 1
if {_collected} is not set:
set {_collected} to 0

loop 27 times:
set slot (loop-number - 1) of current inventory of player to white stained glass pane named " "

set slot 10 of current inventory of player to {_item} named "&e&lSipariş Edilen Eşya"
set slot 13 of current inventory of player to red concrete named "&c&lSilmek İçin Tıkla" with lore "&7Siparişi iptal eder," and "&7kalan paranız iade edilir."
set slot 15 of current inventory of player to chest named "&a&lEşyaları Topla" with lore "&7Teslim Edilen: &e%{_collected}%/%{_amount}%" and "&7Toplamak için tıkla."

set slot 26 of current inventory of player to arrow named "&c&l◄ Geri" with lore "&7Aktif siparişlerime döner."

# 5. TIKLAMA VE KORUMA SİSTEMİ
on inventory click:
set {_inv_name} to uncolored name of player's top inventory
if {_inv_name} contains "SİPARİŞLER" or "Aktif Siparişlerim" or "Sipariş Detayı":
cancel event

# ANA MENÜ TIKLAMALARI
if {_inv_name} contains "SİPARİŞLER - Sayfa":
set {_current_page} to 1
set {_title_split::*} to {_inv_name} split by "Sayfa "
if {_title_split::2} is set:
set {_current_page} to {_title_split::2} parsed as integer

if index of event-slot is 46:
execute player command "/siparisolusturmenu"
else if index of event-slot is 47:
if {_current_page} > 1:
set {_prev} to {_current_page} - 1
execute player command "/order %{_prev}%"
else if index of event-slot is 48:
close player's inventory
send "&eAramak istediğiniz eşya veya oyuncu adını yazın:" to player
set {order_search_chat::%player%} to true
else if index of event-slot is 49:
delete {order_filter::%player%}
set {order_sort::%player%} to 1
send "&aSipariş menüsü yenilendi." to player
execute player command "/order %{_current_page}%"
else if index of event-slot is 50:
# Huni Filtre Döngüsü (1 -> 2 -> 3 -> 4 -> 5 -> 1)
if {order_sort::%player%} is not set:
set {order_sort::%player%} to 1
add 1 to {order_sort::%player%}
if {order_sort::%player%} > 5:
set {order_sort::%player%} to 1
execute player command "/order %{_current_page}%"
else if index of event-slot is 51:
if {_current_page} < 5:
set {_next} to {_current_page} + 1
execute player command "/order %{_next}%"
else:
send "&cMaksimum 5. sayfaya kadar gidebilirsiniz!" to player
else if index of event-slot is 52:
execute player command "/aktifsiparislerim"
else if index of event-slot is 53:
close player's inventory

# AKTİF SİPARİŞLERİM TIKLAMASI
else if {_inv_name} is "Aktif Siparişlerim":
if index of event-slot is 26:
execute player command "/order 1"
else if event-slot is set:
set {_lore::*} to lore of event-slot
loop {_lore::*}:
if loop-value contains "ID: ":
set {_id} to uncolored loop-value
replace all "ID: " with "" in {_id}
execute player command "/siparisduzenle %{_id}%"

# SİPARİŞ DÜZENLEME / İPTAL (SİLME) / TOPLAMA
else if {_inv_name} is "Sipariş Detayı":
if index of event-slot is 26:
execute player command "/aktifsiparislerim"
else:
set {_id} to {selected_order::%player%}
if index of event-slot is 13:
set {_amount} to {orders::%{_id}%::amount}
set {_collected} to {orders::%{_id}%::collected}
set {_price} to {orders::%{_id}%::price}
if {_amount} is not set:
set {_amount} to 1
if {_collected} is not set:
set {_collected} to 0
if {_price} is not set:
set {_price} to 10

set {_rem} to {_amount} - {_collected}
set {_refund} to {_rem} * {_price}
add {_refund} to player's balance
send "&cSipariş silindi. &e%{_refund}%$ &ciade edildi." to player

remove {_id} from {orders_list::*}
delete {orders::%{_id}%::owner}
delete {orders::%{_id}%::item}
delete {orders::%{_id}%::amount}
delete {orders::%{_id}%::price}
delete {orders::%{_id}%::collected}
delete {orders::%{_id}%::*}
delete {selected_order::%player%}

execute player command "/aktifsiparislerim"

else if index of event-slot is 15:
set {_collected} to {orders::%{_id}%::collected}
set {_item} to {orders::%{_id}%::item}
if {_collected} is not set:
set {_collected} to 0
if {_collected} > 0:
give {_collected} of {_item} to player
send "&a%{_collected}% adet eşya depodan alındı!" to player
set {orders::%{_id}%::collected} to 0
execute player command "/siparisduzenle %{_id}%"
else:
send "&cToplanacak eşya yok!" to player

# SİPARİŞ OLUŞTURMA MENÜSÜ
else if {_inv_name} contains "Yeni Sipariş":
if index of event-slot is 26:
delete {temp_order::%player%::*}
execute player command "/order 1"
else if index of event-slot is 10:
delete {temp_order::%player%::*}
execute player command "/order 1"
else if index of event-slot is 12:
close player's inventory
send "&eEşya adını yazın (Örn: iron_ingot):" to player
set {order_search_chat::%player%} to false
set {order_item_chat::%player%} to true
else if index of event-slot is 13:
close player's inventory
send "&eMiktarı yazın:" to player
set {order_amount_chat::%player%} to true
else if index of event-slot is 14:
close player's inventory
send "&eBirim fiyatı yazın:" to player
set {order_price_chat::%player%} to true
else if index of event-slot is 16:
set {_amt} to {temp_order::%player%::amount}
set {_prc} to {temp_order::%player%::price}
if {_amt} is not set:
set {_amt} to 1
if {_prc} is not set:
set {_prc} to 10
set {_total} to {_amt} * {_prc}

set {_count} to 0
loop {orders_list::*}:
set {_check_id} to loop-value
if {orders::%{_check_id}%::owner} is player:
add 1 to {_count}
if {_count} >= 10:
send "&cMaksimum 10 sipariş açabilirsiniz!" to player
stop

if player's balance >= {_total}:
remove {_total} from player's balance
set {_id} to "%random integer between 100000 and 999999%"
add {_id} to {orders_list::*}

set {orders::%{_id}%::owner} to player
set {orders::%{_id}%::item} to {temp_order::%player%::item}
set {orders::%{_id}%::amount} to {_amt}
set {orders::%{_id}%::price} to {_prc}
set {orders::%{_id}%::collected} to 0

broadcast "&e&l%player% &aoyuncusu yeni bir sipariş oluşturdu!"
delete {temp_order::%player%::*}
execute player command "/order 1"
else:
send "&cYetersiz bakiye! Gerekli tutar: %{_total}%$" to player

# 6. SOHBET DİNLEYİCİLERİ
on chat:
if {order_search_chat::%player%} is true:
cancel event
delete {order_search_chat::%player%}
set {order_filter::%player%} to message
send "&aArama filtresi uygulandı: &e%message%" to player
execute player command "/order 1"
stop

if {order_item_chat::%player%} is true:
cancel event
delete {order_item_chat::%player%}
set {_parsed} to message parsed as item type
if {_parsed} is set:
set {temp_order::%player%::item} to {_parsed}
send "&aEşya seçildi: &e%message%" to player
else:
send "&cGeçersiz eşya adı!" to player
execute player command "/siparisolusturmenu"
stop

if {order_amount_chat::%player%} is true:
cancel event
delete {order_amount_chat::%player%}
set {_num} to message parsed as integer
if {_num} > 0:
set {temp_order::%player%::amount} to {_num}
send "&aMiktar ayarlandı: &e%{_num}%" to player
else:
send "&cLütfen geçerli bir sayı girin!" to player
execute player command "/siparisolusturmenu"
stop

if {order_price_chat::%player%} is true:
cancel event
delete {order_price_chat::%player%}
set {_num} to message parsed as number
if {_num} > 0:
set {temp_order::%player%::price} to {_num}
send "&aBirim fiyat ayarlandı: &e%{_num}%$" to player
else:
send "&cLütfen geçerli bir fiyat girin!" to player
execute player command "/siparisolusturmenu"
stop