# ═══════════════════════════════════════════════════════════════════ # LendShop.sk — Item Lending Marketplace # ─────────────────────────────────────────────────────────────────── # # Commands: # /lend — Open the lending marketplace browser # /lend list <$/hr> — List the item in your main hand for rent # /lend view — View all of a player's active/borrowed listings # /lend lock — (OP) Disable lending for all non-OP players # /lend unlock — (OP) Re-enable lending # # Requirements: # Skript 2.6+ | Vault + any Economy plugin (EssentialsX, CMI…) # # Install : plugins/Skript/scripts/LendShop.sk # Reload : /sk reload LendShop # # ── Variable Reference ──────────────────────────────────────────── # # {lend::locked} — boolean, global lock # {lend::nextid} — auto-increment counter # {lend::listings::*} — list of all listing IDs # {lend::listing::%id%::item} — stored ItemStack # {lend::listing::%id%::owner} — owner display name # {lend::listing::%id%::price} — price/hr (number) # {lend::listing::%id%::active} — true = available to borrow # {lend::listing::%id%::borrower} — borrower display name # {lend::listing::%id%::borrow_until} — unix expiry timestamp # {lend::listing::%id%::timestamp} — unix creation timestamp # # Per-player state (cleaned up on inventory close): # {lend::gui::%p%} — current GUI tag # {lend::page::%p%} — browse page number # {lend::sort::%p%} — sort mode (newest/price_asc/price_desc) # {lend::search::%p%} — active search filter # {lend::searching::%p%} — true while awaiting chat input # {lend::viewtarget::%p%} — player name for view GUI # {lend::viewpage::%p%} — page number for view GUI # {lend::borrowid::%p%} — listing ID staged for borrow # {lend::opening::%p%} — transition flag (prevents stale cleanup) # {lend::slot::%p%::%n%} — maps GUI slot → listing ID # # Pending listing (set by /lend list, consumed by confirm GUI): # {lend::pending::%p%::item} # {lend::pending::%p%::price} # ═══════════════════════════════════════════════════════════════════ options: prefix: &8[&6Lend&8]&r # ───────────────────────────────────────────────────────────────── # INITIALIZATION # ───────────────────────────────────────────────────────────────── on script load: if {lend::nextid} is not set: set {lend::nextid} to 0 if {lend::locked} is not set: set {lend::locked} to false # Restore any listings whose borrow period expired during downtime loop {lend::listings::*}: set {_id} to loop-value if {lend::listing::%{_id}%::active} is false: if {lend::listing::%{_id}%::borrow_until} is set: if unix timestamp of now >= {lend::listing::%{_id}%::borrow_until}: set {lend::listing::%{_id}%::active} to true delete {lend::listing::%{_id}%::borrower} delete {lend::listing::%{_id}%::borrow_until} send "&8[&6Lend&8] &aLendShop loaded." to console on script unload: loop all players: delete {lend::gui::%loop-player%} delete {lend::opening::%loop-player%} # ───────────────────────────────────────────────────────────────── # CHAT — Search query capture # ───────────────────────────────────────────────────────────────── on chat: if {lend::searching::%player%} is true: cancel event if message is "cancel": delete {lend::search::%player%} send "{@prefix} &7Search filter cleared." to player else: set {lend::search::%player%} to message send "{@prefix} &7Searching for: &f%message%" to player delete {lend::searching::%player%} set {lend::page::%player%} to 1 wait 1 tick lend_openBrowse(player) # ───────────────────────────────────────────────────────────────── # INVENTORY — Close cleanup # ───────────────────────────────────────────────────────────────── on inventory close: if {lend::opening::%player%} is not set: if {lend::gui::%player%} is set: delete {lend::gui::%player%} loop 45 times: delete {lend::slot::%player%::%loop-number - 1%} # ───────────────────────────────────────────────────────────────── # INVENTORY — Click dispatcher # ───────────────────────────────────────────────────────────────── on inventory click: if {lend::gui::%player%} is set: cancel event set {_raw} to rawslot of event-slot set {_gui} to {lend::gui::%player%} if {_gui} is "browse": lend_browseClick(player, {_raw}) else if {_gui} is "confirm": lend_confirmClick(player, {_raw}) else if {_gui} is "view": lend_viewClick(player, {_raw}) else if {_gui} is "hours": lend_hoursClick(player, {_raw}) # ───────────────────────────────────────────────────────────────── # COMMAND: /lend # ───────────────────────────────────────────────────────────────── command /lend [] []: trigger: set {_a1} to arg-1 ? "open" set {_a2} to arg-2 ? "" # ── OP lock / unlock ────────────────────────────────────── if {_a1} is "lock" or {_a1} is "unlock": if player is not op: send "{@prefix} &cYou must be OP to use this command." to player stop if {_a1} is "lock": set {lend::locked} to true send "{@prefix} &cLending has been &4locked&c." to player else: set {lend::locked} to false send "{@prefix} &aLending has been &2unlocked&a." to player stop # ── Global lock gate ────────────────────────────────────── if {lend::locked} is true: if player is not op: send "{@prefix} &cLending is currently disabled by an admin." to player stop # ── /lend list ──────────────────────────────────── if {_a1} is "list": if {_a2} is "": send "{@prefix} &cUsage: &f/lend list " to player stop if player's tool is air: send "{@prefix} &cYou must hold an item in your main hand to list it." to player stop set {_price} to {_a2} parsed as number if {_price} is not set: send "{@prefix} &c'%{_a2}%' is not a valid number." to player stop if {_price} <= 0: send "{@prefix} &cPrice per hour must be greater than 0." to player stop set {lend::pending::%player%::item} to player's tool set {lend::pending::%player%::price} to {_price} lend_openConfirm(player) stop # ── /lend view ─────────────────────────────────── if {_a1} is "view": if {_a2} is "": send "{@prefix} &cUsage: &f/lend view " to player stop set {lend::viewtarget::%player%} to {_a2} set {lend::viewpage::%player%} to 1 lend_openView(player) stop # ── Default — open browse ───────────────────────────────── if {lend::page::%player%} is not set: set {lend::page::%player%} to 1 if {lend::sort::%player%} is not set: set {lend::sort::%player%} to "newest" lend_openBrowse(player) # ═══════════════════════════════════════════════════════════════════ # DATA FUNCTIONS # ═══════════════════════════════════════════════════════════════════ # ── Return filtered + sorted active listing IDs ────────────────── function lend_getListings(sort: text, search: text, owner: text) :: texts: set {_filtered::*} to {} loop {lend::listings::*}: set {_id} to loop-value if {lend::listing::%{_id}%::item} is not set: continue if {lend::listing::%{_id}%::active} is not true: continue if {_owner} is not "": if {lend::listing::%{_id}%::owner} is not {_owner}: continue if {_search} is not "": set {_iname} to "%type of {lend::listing::%{_id}%::item}%" if {lend::listing::%{_id}%::item} has custom name: set {_iname} to name of {lend::listing::%{_id}%::item} if {_iname} doesn't contain {_search}: continue add {_id} to {_filtered::*} if {_sort} is "price_asc": return lend_sortPrice({_filtered::*}, true) if {_sort} is "price_desc": return lend_sortPrice({_filtered::*}, false) # Newest first: reverse insertion order set {_n} to size of {_filtered::*} set {_rev::*} to {} loop {_n} times: set {_ri} to {_n} + 1 - loop-number add {_filtered::%{_ri}%} to {_rev::*} return {_rev::*} # ── Return ALL listings (active + borrowed) for one owner ───────── function lend_getOwnerListings(owner: text) :: texts: set {_result::*} to {} loop {lend::listings::*}: set {_id} to loop-value if {lend::listing::%{_id}%::item} is not set: continue if {lend::listing::%{_id}%::owner} is {_owner}: add {_id} to {_result::*} set {_n} to size of {_result::*} set {_rev::*} to {} loop {_n} times: set {_ri} to {_n} + 1 - loop-number add {_result::%{_ri}%} to {_rev::*} return {_rev::*} # ── Selection sort by price ─────────────────────────────────────── function lend_sortPrice(ids: texts, asc: boolean) :: texts: set {_work::*} to {_ids::*} set {_result::*} to {} set {_total} to size of {_work::*} loop {_total} times: set {_bprice} to 0 set {_bkey} to "" loop {_work::*}: set {_p} to {lend::listing::%loop-value%::price} ? 0 if {_bkey} is "": set {_bprice} to {_p} set {_bkey} to loop-index else if {_asc} is true: if {_p} < {_bprice}: set {_bprice} to {_p} set {_bkey} to loop-index else: if {_p} > {_bprice}: set {_bprice} to {_p} set {_bkey} to loop-index if {_bkey} is not "": add {_work::%{_bkey}%} to {_result::*} delete {_work::%{_bkey}%} return {_result::*} # ═══════════════════════════════════════════════════════════════════ # GUI — BROWSE (main marketplace) # # Layout (6 rows): # Rows 1-5 (slots 0-44) : Listing items (45 per page) # Row 6 (slots 45-53) : Search | Sort | ◀ | ░ | Refresh | ░ | ▶ | Your Listings | Close # ═══════════════════════════════════════════════════════════════════ function lend_openBrowse(p: player): set {_sort} to {lend::sort::%{_p}%} ? "newest" set {_search} to {lend::search::%{_p}%} ? "" set {_page} to {lend::page::%{_p}%} ? 1 set {_ids::*} to lend_getListings({_sort}, {_search}, "") set {_total} to size of {_ids::*} set {_maxpage} to 1 if {_total} > 0: set {_maxpage} to round ({_total} / 45) up if {_maxpage} < 1: set {_maxpage} to 1 if {_page} < 1: set {_page} to 1 if {_page} > {_maxpage}: set {_page} to {_maxpage} set {lend::page::%{_p}%} to {_page} set {_start} to ({_page} - 1) * 45 + 1 set {_end} to {_page} * 45 if {_end} > {_total}: set {_end} to {_total} # Clean old slot → ID mappings before opening loop 45 times: delete {lend::slot::%{_p}%::%loop-number - 1%} set {lend::opening::%{_p}%} to true open chest with 6 rows named "&6&lLend Shop" to {_p} set {lend::gui::%{_p}%} to "browse" delete {lend::opening::%{_p}%} set {_inv} to {_p}'s current inventory # Filler for all 54 slots loop 54 times: set slot (loop-number - 1) of {_inv} to black stained glass pane named " " # ── Listing items (slots 0-44) ────────────────────────────── set {_slot} to 0 set {_i} to 0 loop {_ids::*}: add 1 to {_i} if {_i} < {_start}: continue if {_i} > {_end}: stop loop set {_lid} to loop-value set {_item} to {lend::listing::%{_lid}%::item} set {_own} to {lend::listing::%{_lid}%::owner} set {_pph} to {lend::listing::%{_lid}%::price} set {_disp} to {_item} set {_lor::*} to lore of {_item} add "" to {_lor::*} add "&8── Lend Listing ──" to {_lor::*} add "&7Owner &8» &e%{_own}%" to {_lor::*} add "&7Price &8» &a$%{_pph}%&7/hr" to {_lor::*} add "" to {_lor::*} add "&eClick &7to borrow" to {_lor::*} set lore of {_disp} to {_lor::*} set slot {_slot} of {_inv} to {_disp} set {lend::slot::%{_p}%::%{_slot}%} to {_lid} add 1 to {_slot} # Clear any unused listing slots (air, not filler) loop 45 times: if (loop-number - 1) >= {_slot}: set slot (loop-number - 1) of {_inv} to air # ── Sort label ────────────────────────────────────────────── set {_slabel} to "Newest" if {_sort} is "price_asc": set {_slabel} to "Price (Low to High)" else if {_sort} is "price_desc": set {_slabel} to "Price (High to Low)" # slot 45 — Search set {_s45} to compass named "&eSearch" if {_search} is not "": set lore of {_s45} to "&7Filter: &f%{_search}%", "", "&eClick &7to change &8| &7Type &fcancel &7to clear" else: set lore of {_s45} to "&7No active filter", "", "&eClick &7to search by item name" set slot 45 of {_inv} to {_s45} # slot 46 — Sort set {_s46} to hopper named "&eSort: &f%{_slabel}%" set lore of {_s46} to "&7Cycles: Newest &8› Price &f↑ &8› Price &f↓", "", "&eClick &7to change" set slot 46 of {_inv} to {_s46} # slot 47 — Previous page if {_page} > 1: set {_s47} to arrow named "&ePrevious Page" set lore of {_s47} to "&7Go to page &f%{_page} - 1%&7/&f%{_maxpage}%" set slot 47 of {_inv} to {_s47} else: set slot 47 of {_inv} to black stained glass pane named " " # slot 48 — filler (already set above) # slot 49 — Refresh / page counter set {_s49} to clock named "&eRefresh" set lore of {_s49} to "&7Page &f%{_page}%&7/&f%{_maxpage}% &8| &f%{_total}% &7listing(s)", "", "&eClick &7to reload" set slot 49 of {_inv} to {_s49} # slot 50 — filler (already set above) # slot 51 — Next page if {_page} < {_maxpage}: set {_s51} to arrow named "&eNext Page" set lore of {_s51} to "&7Go to page &f%{_page} + 1%&7/&f%{_maxpage}%" set slot 51 of {_inv} to {_s51} else: set slot 51 of {_inv} to black stained glass pane named " " # slot 52 — Your listings set {_s52} to chest named "&eYour Listings" set lore of {_s52} to "&7View and manage your active listings" set slot 52 of {_inv} to {_s52} # slot 53 — Close set {_s53} to barrier named "&cClose" set lore of {_s53} to "&7Close this menu" set slot 53 of {_inv} to {_s53} function lend_browseClick(p: player, slot: integer): # ── Listing item clicked ───────────────────────────────────── if {_slot} >= 0: if {_slot} < 45: set {_id} to {lend::slot::%{_p}%::%{_slot}%} if {_id} is not set: stop if {lend::listing::%{_id}%::active} is not true: send "{@prefix} &cThis item is already borrowed by someone." to {_p} stop if {lend::listing::%{_id}%::owner} is "%{_p}%": send "{@prefix} &cYou cannot borrow your own listing." to {_p} stop set {lend::borrowid::%{_p}%} to {_id} lend_openHours({_p}) stop # ── Navigation bar ─────────────────────────────────────────── if {_slot} is 45: # Search — close GUI and wait for chat input close {_p}'s inventory set {lend::searching::%{_p}%} to true send "{@prefix} &eType your search query in chat." to {_p} send "{@prefix} &7Type &fcancel &7to clear the current filter." to {_p} stop if {_slot} is 46: # Sort — cycle through modes set {_sort} to {lend::sort::%{_p}%} ? "newest" if {_sort} is "newest": set {lend::sort::%{_p}%} to "price_asc" else if {_sort} is "price_asc": set {lend::sort::%{_p}%} to "price_desc" else: set {lend::sort::%{_p}%} to "newest" lend_openBrowse({_p}) stop if {_slot} is 47: if {lend::page::%{_p}%} > 1: remove 1 from {lend::page::%{_p}%} lend_openBrowse({_p}) stop if {_slot} is 49: lend_openBrowse({_p}) stop if {_slot} is 51: add 1 to {lend::page::%{_p}%} lend_openBrowse({_p}) stop if {_slot} is 52: set {lend::viewtarget::%{_p}%} to "%{_p}%" set {lend::viewpage::%{_p}%} to 1 lend_openView({_p}) stop if {_slot} is 53: close {_p}'s inventory stop # ═══════════════════════════════════════════════════════════════════ # GUI — CONFIRM LISTING # # Layout (3 rows): # slot 11 — Confirm (lime concrete) # slot 13 — Item preview # slot 15 — Cancel (red concrete) # rest — gray filler # ═══════════════════════════════════════════════════════════════════ function lend_openConfirm(p: player): set {_item} to {lend::pending::%{_p}%::item} set {_price} to {lend::pending::%{_p}%::price} set {lend::opening::%{_p}%} to true open chest with 3 rows named "&6&lConfirm Listing" to {_p} set {lend::gui::%{_p}%} to "confirm" delete {lend::opening::%{_p}%} set {_inv} to {_p}'s current inventory loop 27 times: set slot (loop-number - 1) of {_inv} to gray stained glass pane named " " # slot 13 — Item preview set {_disp} to {_item} set lore of {_disp} to "", "&6Price: &a$%{_price}%&6/hr", "", "&7The item will be taken from your", "&7&nmain hand&7 when you click Confirm." set slot 13 of {_inv} to {_disp} # slot 11 — Confirm set {_btn_yes} to lime concrete named "&a&lCONFIRM" set lore of {_btn_yes} to "&7List at &a$%{_price}%&7/hr", "&7Item taken from main hand on confirm." set slot 11 of {_inv} to {_btn_yes} # slot 15 — Cancel set {_btn_no} to red concrete named "&c&lCANCEL" set lore of {_btn_no} to "&7Discard this listing." set slot 15 of {_inv} to {_btn_no} function lend_confirmClick(p: player, slot: integer): if {_slot} is 11: # Validate player still holds the item if {_p}'s tool is air: send "{@prefix} &cYou are no longer holding the item. Re-run &f/lend list&c." to {_p} delete {lend::pending::%{_p}%::item} delete {lend::pending::%{_p}%::price} close {_p}'s inventory stop # Create listing add 1 to {lend::nextid} set {_id} to "%{lend::nextid}%" set {lend::listing::%{_id}%::item} to {_p}'s tool set {lend::listing::%{_id}%::owner} to "%{_p}%" set {lend::listing::%{_id}%::price} to {lend::pending::%{_p}%::price} set {lend::listing::%{_id}%::active} to true set {lend::listing::%{_id}%::timestamp} to unix timestamp of now add {_id} to {lend::listings::*} # Take item from main hand set {_p}'s tool to air delete {lend::pending::%{_p}%::item} delete {lend::pending::%{_p}%::price} send "{@prefix} &aListing created! Your item is now available to borrow at &2$%{lend::listing::%{_id}%::price}%&a/hr." to {_p} close {_p}'s inventory stop if {_slot} is 15: delete {lend::pending::%{_p}%::item} delete {lend::pending::%{_p}%::price} send "{@prefix} &cListing cancelled." to {_p} close {_p}'s inventory stop # ═══════════════════════════════════════════════════════════════════ # GUI — VIEW (single player's listings) # # Layout (6 rows): # Rows 1-5 (slots 0-44) : Listings (active = green, borrowed = orange glow) # Row 6 (slots 45-53) : Back | ░ | ◀ | ░ | Page Info | ░ | ▶ | ░ | Close # ═══════════════════════════════════════════════════════════════════ function lend_openView(p: player): set {_target} to {lend::viewtarget::%{_p}%} ? "%{_p}%" set {_page} to {lend::viewpage::%{_p}%} ? 1 set {_ids::*} to lend_getOwnerListings({_target}) set {_total} to size of {_ids::*} set {_maxpage} to 1 if {_total} > 0: set {_maxpage} to round ({_total} / 45) up if {_maxpage} < 1: set {_maxpage} to 1 if {_page} < 1: set {_page} to 1 if {_page} > {_maxpage}: set {_page} to {_maxpage} set {lend::viewpage::%{_p}%} to {_page} set {_start} to ({_page} - 1) * 45 + 1 set {_end} to {_page} * 45 if {_end} > {_total}: set {_end} to {_total} loop 45 times: delete {lend::slot::%{_p}%::%loop-number - 1%} set {lend::opening::%{_p}%} to true open chest with 6 rows named "&6&l%{_target}%'s Listings" to {_p} set {lend::gui::%{_p}%} to "view" delete {lend::opening::%{_p}%} set {_inv} to {_p}'s current inventory loop 54 times: set slot (loop-number - 1) of {_inv} to black stained glass pane named " " set {_is_own} to {_target} is "%{_p}%" set {_slot} to 0 set {_i} to 0 loop {_ids::*}: add 1 to {_i} if {_i} < {_start}: continue if {_i} > {_end}: stop loop set {_lid} to loop-value set {_item} to {lend::listing::%{_lid}%::item} set {_pph} to {lend::listing::%{_lid}%::price} set {_active} to {lend::listing::%{_lid}%::active} set {_disp} to {_item} set {_lor::*} to lore of {_item} add "" to {_lor::*} add "&8── Lend Listing ──" to {_lor::*} add "&7Price &8» &a$%{_pph}%&7/hr" to {_lor::*} if {_active} is true: add "&7Status &8» &aAvailable" to {_lor::*} add "" to {_lor::*} if {_is_own} is true: add "&cClick &7to &cunlist &7this item" to {_lor::*} else: add "&eClick &7to borrow" to {_lor::*} else: set {_borrower} to {lend::listing::%{_lid}%::borrower} set {_until} to {lend::listing::%{_lid}%::borrow_until} set {_remain} to {_until} - unix timestamp of now if {_remain} < 0: set {_remain} to 0 set {_hrs_r} to round ({_remain} / 3600) down set {_mins_r} to round (({_remain} mod 3600) / 60) down add "&7Status &8» &6Borrowed" to {_lor::*} add "&7By &8» &e%{_borrower}%" to {_lor::*} add "&7Returns in &8» &e%{_hrs_r}%h %{_mins_r}%m" to {_lor::*} set lore of {_disp} to {_lor::*} set slot {_slot} of {_inv} to {_disp} set {lend::slot::%{_p}%::%{_slot}%} to {_lid} add 1 to {_slot} loop 45 times: if (loop-number - 1) >= {_slot}: set slot (loop-number - 1) of {_inv} to air # slot 45 — Back to Browse set {_s45} to arrow named "&eBack to Browse" set lore of {_s45} to "&7Return to the main marketplace" set slot 45 of {_inv} to {_s45} # slot 47 — Previous page if {_page} > 1: set {_s47} to arrow named "&ePrevious Page" set lore of {_s47} to "&7Go to page &f%{_page} - 1%&7/&f%{_maxpage}%" set slot 47 of {_inv} to {_s47} else: set slot 47 of {_inv} to black stained glass pane named " " # slot 49 — Page info set {_s49} to paper named "&7Page &f%{_page}%&7/&f%{_maxpage}%" set lore of {_s49} to "&f%{_total}% &7total listing(s)" set slot 49 of {_inv} to {_s49} # slot 51 — Next page if {_page} < {_maxpage}: set {_s51} to arrow named "&eNext Page" set lore of {_s51} to "&7Go to page &f%{_page} + 1%&7/&f%{_maxpage}%" set slot 51 of {_inv} to {_s51} else: set slot 51 of {_inv} to black stained glass pane named " " # slot 53 — Close set {_s53} to barrier named "&cClose" set lore of {_s53} to "&7Close this menu" set slot 53 of {_inv} to {_s53} function lend_viewClick(p: player, slot: integer): if {_slot} >= 0: if {_slot} < 45: set {_id} to {lend::slot::%{_p}%::%{_slot}%} if {_id} is not set: stop set {_is_own} to {lend::listing::%{_id}%::owner} is "%{_p}%" if {_is_own} is true: # Own listing — unlist if active if {lend::listing::%{_id}%::active} is not true: send "{@prefix} &cThis listing is currently borrowed and cannot be unlisted." to {_p} stop give {lend::listing::%{_id}%::item} to {_p} delete {lend::listing::%{_id}%::item} delete {lend::listing::%{_id}%::owner} delete {lend::listing::%{_id}%::price} delete {lend::listing::%{_id}%::active} delete {lend::listing::%{_id}%::timestamp} remove {_id} from {lend::listings::*} send "{@prefix} &aListing removed. Your item has been returned." to {_p} lend_openView({_p}) else: if {lend::listing::%{_id}%::active} is not true: send "{@prefix} &cThis item is already borrowed by someone else." to {_p} stop set {lend::borrowid::%{_p}%} to {_id} lend_openHours({_p}) stop if {_slot} is 45: if {lend::page::%{_p}%} is not set: set {lend::page::%{_p}%} to 1 lend_openBrowse({_p}) stop if {_slot} is 47: if {lend::viewpage::%{_p}%} > 1: remove 1 from {lend::viewpage::%{_p}%} lend_openView({_p}) stop if {_slot} is 51: add 1 to {lend::viewpage::%{_p}%} lend_openView({_p}) stop if {_slot} is 53: close {_p}'s inventory stop # ═══════════════════════════════════════════════════════════════════ # GUI — BORROW HOURS # # Layout (4 rows): # slot 4 — Item preview # slots 9 11 13 15 17 — Duration buttons (1h/2h/4h/8h/24h) # slot 31 — Cancel # ═══════════════════════════════════════════════════════════════════ function lend_openHours(p: player): set {_id} to {lend::borrowid::%{_p}%} if {_id} is not set: stop set {_item} to {lend::listing::%{_id}%::item} set {_pph} to {lend::listing::%{_id}%::price} set {_own} to {lend::listing::%{_id}%::owner} # Clear any lingering slot mappings from the previous GUI loop 45 times: delete {lend::slot::%{_p}%::%loop-number - 1%} set {lend::opening::%{_p}%} to true open chest with 4 rows named "&6&lBorrow — Choose Duration" to {_p} set {lend::gui::%{_p}%} to "hours" delete {lend::opening::%{_p}%} set {_inv} to {_p}'s current inventory loop 36 times: set slot (loop-number - 1) of {_inv} to black stained glass pane named " " # slot 4 — Item info preview set {_disp} to {_item} set lore of {_disp} to "&7Owner: &e%{_own}%", "&7Price: &a$%{_pph}%&7/hr" set slot 4 of {_inv} to {_disp} # Duration buttons — slots 9, 11, 13, 15, 17 set {_dur::1} to 1 set {_dur::2} to 2 set {_dur::3} to 4 set {_dur::4} to 8 set {_dur::5} to 24 set {_bslot::1} to 9 set {_bslot::2} to 11 set {_bslot::3} to 13 set {_bslot::4} to 15 set {_bslot::5} to 17 loop 5 times: set {_hrs} to {_dur::%loop-number%} set {_cost} to {_pph} * {_hrs} set {_bs} to {_bslot::%loop-number%} set {_hl} to "hour" if {_hrs} > 1: set {_hl} to "hours" if loop-number is 1: set {_btn} to green concrete named "&a%{_hrs}% %{_hl}%" else if loop-number is 2: set {_btn} to lime concrete named "&a%{_hrs}% %{_hl}%" else if loop-number is 3: set {_btn} to yellow concrete named "&e%{_hrs}% %{_hl}%" else if loop-number is 4: set {_btn} to orange concrete named "&6%{_hrs}% %{_hl}%" else: set {_btn} to red concrete named "&c%{_hrs}% %{_hl}%" set lore of {_btn} to "&7Total cost: &a$%{_cost}%", "", "&eClick &7to borrow for %{_hrs}% %{_hl}%" set slot {_bs} of {_inv} to {_btn} # slot 31 — Cancel set {_cancel_btn} to barrier named "&cCancel" set lore of {_cancel_btn} to "&7Go back to the marketplace" set slot 31 of {_inv} to {_cancel_btn} function lend_hoursClick(p: player, slot: integer): set {_id} to {lend::borrowid::%{_p}%} if {_id} is not set: close {_p}'s inventory stop # Cancel button if {_slot} is 31: delete {lend::borrowid::%{_p}%} if {lend::page::%{_p}%} is not set: set {lend::page::%{_p}%} to 1 lend_openBrowse({_p}) stop # Map slots to hours set {_hrs} to 0 if {_slot} is 9: set {_hrs} to 1 else if {_slot} is 11: set {_hrs} to 2 else if {_slot} is 13: set {_hrs} to 4 else if {_slot} is 15: set {_hrs} to 8 else if {_slot} is 17: set {_hrs} to 24 if {_hrs} <= 0: stop # Double-check listing is still available (race condition guard) if {lend::listing::%{_id}%::active} is not true: send "{@prefix} &cSorry, this item was just borrowed by someone else!" to {_p} delete {lend::borrowid::%{_p}%} lend_openBrowse({_p}) stop set {_pph} to {lend::listing::%{_id}%::price} set {_total} to {_pph} * {_hrs} # Balance check if {_p}'s balance < {_total}: send "{@prefix} &cInsufficient balance — need &4$%{_total}%&c, you have &4$%{_p}'s balance%&c." to {_p} stop # ── Execute borrow ───────────────────────────────────────── remove {_total} from {_p}'s balance set {lend::listing::%{_id}%::active} to false set {lend::listing::%{_id}%::borrower} to "%{_p}%" set {lend::listing::%{_id}%::borrow_until} to unix timestamp of now + {_hrs} * 3600 give {lend::listing::%{_id}%::item} to {_p} set {_hl} to "hour" if {_hrs} > 1: set {_hl} to "hours" send "{@prefix} &aBorrowed &e%type of {lend::listing::%{_id}%::item}% &afor &2%{_hrs}% %{_hl}%&a. &8(-$%{_total}%)" to {_p} send "{@prefix} &7The listing will become available again after the rental period." to {_p} # Notify lender if online set {_lender} to {lend::listing::%{_id}%::owner} parsed as player if {_lender} is set: send "{@prefix} &e%{_p}% &aborrowed your &e%type of {lend::listing::%{_id}%::item}% &afor &2%{_hrs}% %{_hl}%&a. You earned &2$%{_total}%&a." to {_lender} delete {lend::borrowid::%{_p}%} close {_p}'s inventory # ── Async expiry — reactivate listing & notify lender ────── set {_exp_id} to {_id} set {_exp_sec} to {_hrs} * 3600 wait {_exp_sec} seconds if {lend::listing::%{_exp_id}%::active} is false: set {lend::listing::%{_exp_id}%::active} to true delete {lend::listing::%{_exp_id}%::borrower} delete {lend::listing::%{_exp_id}%::borrow_until} set {_notify} to {lend::listing::%{_exp_id}%::owner} parsed as player if {_notify} is set: send "{@prefix} &aYour &e%type of {lend::listing::%{_exp_id}%::item}% &alisting is now available for renting again." to {_notify}