options: prefix: &8[&6AH&8] &r max-listings: 10 listing-hours: 48 min-price: 1 max-price: 100000000 tax-percent: 5 per-page: 45 main-title: &8» &6Auction House &8« mine-title: &8» &6My Listings &8« confirm-title: &8» &6Confirm Purchase &8« border-mat: gray stained glass pane currency: $ function ahColorize(s: string) :: string: return colored {_s} function ahNewId() :: string: if {ah::id-counter} is not set: set {ah::id-counter} to 0 add 1 to {ah::id-counter} return "%{ah::id-counter}%" function ahPlayerListings(uuid: string) :: integer: set {_n} to 0 loop {ah::listings::*}: if {ah::data::%loop-value%::seller} = {_uuid}: add 1 to {_n} return {_n} function ahIsExpired(id: string) :: boolean: if {ah::data::%{_id}%::expiry} is not set: return true if now is after {ah::data::%{_id}%::expiry}: return true return false function ahDeleteListing(id: string): delete {ah::data::%{_id}%::item} delete {ah::data::%{_id}%::price} delete {ah::data::%{_id}%::seller} delete {ah::data::%{_id}%::seller-name} delete {ah::data::%{_id}%::expiry} remove {_id} from {ah::listings::*} function ahCreateListing(p: player, it: item, price: number): set {_id} to ahNewId() add {_id} to {ah::listings::*} set {ah::data::%{_id}%::item} to {_it} set {ah::data::%{_id}%::price} to {_price} set {ah::data::%{_id}%::seller} to "%uuid of {_p}%" set {ah::data::%{_id}%::seller-name} to name of {_p} set {_exp} to now add {@listing-hours} hours to {_exp} set {ah::data::%{_id}%::expiry} to {_exp} function ahTimeLeft(id: string) :: string: if {ah::data::%{_id}%::expiry} is not set: return "N/A" set {_diff} to difference between now and {ah::data::%{_id}%::expiry} set {_secs} to {_diff} in seconds if {_secs} <= 0: return "Expired" set {_h} to floor({_secs} / 3600) set {_m} to floor(({_secs} mod 3600) / 60) if {_h} > 0: return "%{_h}%h %{_m}%m" return "%{_m}%m" function ahBuildDisplayItem(id: string, viewer: player) :: item: set {_base} to {ah::data::%{_id}%::item} if {_base} is not set: return air set {_clone} to {_base} set {_price} to {ah::data::%{_id}%::price} set {_sel} to {ah::data::%{_id}%::seller-name} set {_time} to ahTimeLeft({_id}) set {_tax} to floor({_price} * {@tax-percent} / 100) set {_payout} to {_price} - {_tax} set {_isOwner} to false if "%uuid of {_viewer}%" = {ah::data::%{_id}%::seller}: set {_isOwner} to true set {_lore::1} to ahColorize("&r ") set {_lore::2} to ahColorize("&7Seller: &f%{_sel}%") set {_lore::3} to ahColorize("&7Price: &6%{@currency}%%{_price}%") if {_isOwner} is false: set {_lore::4} to ahColorize("&7After Tax: &a%{@currency}%%{_payout}% &8(&c-%{@tax-percent}%%%8&8)") set {_lore::5} to ahColorize("&7Expires: &e%{_time}%") set {_lore::6} to ahColorize("&r ") if {_isOwner} is true: set {_lore::7} to ahColorize("&c[Right-Click] Cancel Listing") else: set {_lore::7} to ahColorize("&a[Left-Click] Purchase") set {_lore::8} to ahColorize("&c[Right-Click] Preview Only") set display name of {_clone} to display name of {_base} set lore of {_clone} to {_lore::*} return {_clone} function ahCollectActive() :: objects: clear {_ids::*} loop {ah::listings::*}: if ahIsExpired(loop-value) is false: add loop-value to {_ids::*} return {_ids::*} function ahCollectMine(uuid: string) :: objects: clear {_ids::*} loop {ah::listings::*}: if {ah::data::%loop-value%::seller} = {_uuid}: if ahIsExpired(loop-value) is false: add loop-value to {_ids::*} return {_ids::*} function ahSetBorder(p: player): set {_border} to {@border-mat} set display name of {_border} to ahColorize("&r ") set lore of {_border} to "" loop integers from 45 to 53: set slot loop-number of {_p}'s current inventory to {_border} function ahOpenMain(p: player, page: integer): set {_uuid} to "%uuid of {_p}%" set {ah::state::%{_uuid}%::mode} to "browse" clear {_active::*} set {_active::*} to ahCollectActive() set {_total} to size of {_active::*} set {_maxpage} to max(1, ceil({_total} / {@per-page})) set {_p2} to max(1, min({_page}, {_maxpage})) set {ah::state::%{_uuid}%::page} to {_p2} open chest with 6 rows named "{@main-title}" to {_p} wait 1 tick set {_inv} to {_p}'s current inventory ahSetBorder({_p}) set {_start} to ({_p2} - 1) * {@per-page} loop integers from 0 to ({@per-page} - 1): set {_idx} to {_start} + loop-number + 1 set {_id} to element {_idx} of {_active::*} if {_id} is set: set slot loop-number of {_inv} to ahBuildDisplayItem({_id}, {_p}) else: set slot loop-number of {_inv} to air if {_p2} > 1: set {_prev} to arrow set display name of {_prev} to ahColorize("&aPrevious Page") set lore of {_prev} to ahColorize("&7Go to page %{_p2} - 1%") set slot 45 of {_inv} to {_prev} else: set {_b} to {@border-mat} set display name of {_b} to ahColorize("&r ") set slot 45 of {_inv} to {_b} set {_info} to paper set display name of {_info} to ahColorize("&6Auction House") set lore of {_info} to ahColorize("&7Listings: &f%{_total}%"), ahColorize("&7Page: &f%{_p2}%&7/&f%{_maxpage}%"), ahColorize("&r "), ahColorize("&e/ah sell &7to list an item") set slot 49 of {_inv} to {_info} set {_mine} to chest set display name of {_mine} to ahColorize("&eMy Listings") set lore of {_mine} to ahColorize("&7View or cancel your listings") set slot 46 of {_inv} to {_mine} set {_claim} to nether star set display name of {_claim} to ahColorize("&bClaim Items") set lore of {_claim} to ahColorize("&7Collect expired or returned items") set slot 47 of {_inv} to {_claim} if {_p2} < {_maxpage}: set {_next} to arrow set display name of {_next} to ahColorize("&aNext Page") set lore of {_next} to ahColorize("&7Go to page %{_p2} + 1%") set slot 53 of {_inv} to {_next} else: set {_b} to {@border-mat} set display name of {_b} to ahColorize("&r ") set slot 53 of {_inv} to {_b} function ahOpenMine(p: player, page: integer): set {_uuid} to "%uuid of {_p}%" set {ah::state::%{_uuid}%::mode} to "mine" clear {_mine::*} set {_mine::*} to ahCollectMine({_uuid}) set {_total} to size of {_mine::*} set {_maxpage} to max(1, ceil({_total} / {@per-page})) set {_p2} to max(1, min({_page}, {_maxpage})) set {ah::state::%{_uuid}%::page} to {_p2} open chest with 6 rows named "{@mine-title}" to {_p} wait 1 tick set {_inv} to {_p}'s current inventory ahSetBorder({_p}) set {_start} to ({_p2} - 1) * {@per-page} loop integers from 0 to ({@per-page} - 1): set {_idx} to {_start} + loop-number + 1 set {_id} to element {_idx} of {_mine::*} if {_id} is set: set slot loop-number of {_inv} to ahBuildDisplayItem({_id}, {_p}) else: set slot loop-number of {_inv} to air if {_p2} > 1: set {_prev} to arrow set display name of {_prev} to ahColorize("&aPrevious Page") set lore of {_prev} to ahColorize("&7Go to page %{_p2} - 1%") set slot 45 of {_inv} to {_prev} else: set {_b} to {@border-mat} set display name of {_b} to ahColorize("&r ") set slot 45 of {_inv} to {_b} set {_info} to written book set display name of {_info} to ahColorize("&6My Listings") set lore of {_info} to ahColorize("&7Your Listings: &f%{_total}%&7/&f%{@max-listings}%"), ahColorize("&7Page: &f%{_p2}%&7/&f%{_maxpage}%"), ahColorize("&r "), ahColorize("&cRight-click any item to cancel it") set slot 49 of {_inv} to {_info} set {_back} to barrier set display name of {_back} to ahColorize("&cBack to Auction House") set lore of {_back} to ahColorize("&7Return to the main listing") set slot 48 of {_inv} to {_back} if {_p2} < {_maxpage}: set {_next} to arrow set display name of {_next} to ahColorize("&aNext Page") set lore of {_next} to ahColorize("&7Go to page %{_p2} + 1%") set slot 53 of {_inv} to {_next} else: set {_b} to {@border-mat} set display name of {_b} to ahColorize("&r ") set slot 53 of {_inv} to {_b} function ahOpenConfirm(p: player, id: string): set {_uuid} to "%uuid of {_p}%" set {ah::state::%{_uuid}%::mode} to "confirm" set {ah::state::%{_uuid}%::confirm-id} to {_id} open chest with 3 rows named "{@confirm-title}" to {_p} wait 1 tick set {_inv} to {_p}'s current inventory set {_border} to {@border-mat} set display name of {_border} to ahColorize("&r ") loop integers from 0 to 26: set slot loop-number of {_inv} to {_border} set {_price} to {ah::data::%{_id}%::price} set {_tax} to floor({_price} * {@tax-percent} / 100) set {_total} to {_price} set {_payout} to {_price} - {_tax} set {_preview} to {ah::data::%{_id}%::item} set display name of {_preview} to ahColorize("&6Preview: &f%display name of {ah::data::%{_id}%::item}%") set lore of {_preview} to ahColorize("&7Seller: &f%{ah::data::%{_id}%::seller-name}%"), ahColorize("&7You Pay: &c%{@currency}%%{_total}%"), ahColorize("&7Seller Gets: &a%{@currency}%%{_payout}%"), ahColorize("&7Tax: &8%{@tax-percent}%%") set slot 13 of {_inv} to {_preview} set {_confirm} to lime wool set display name of {_confirm} to ahColorize("&a&lCONFIRM PURCHASE") set lore of {_confirm} to ahColorize("&7Pay &6%{@currency}%%{_total}% &7to buy this item") set slot 11 of {_inv} to {_confirm} set {_cancel} to red wool set display name of {_cancel} to ahColorize("&c&lCANCEL") set lore of {_cancel} to ahColorize("&7Go back without buying") set slot 15 of {_inv} to {_cancel} function ahReturnItem(selleruuid: string, it: item): add {_it} to {ah::claims::%{_selleruuid}%::*} function ahGiveClaims(p: player): set {_uuid} to "%uuid of {_p}%" if size of {ah::claims::%{_uuid}%::*} = 0: send ahColorize("{@prefix}&cYou have no items to claim!") to {_p} stop set {_given} to 0 loop {ah::claims::%{_uuid}%::*}: if {_p} can hold loop-value: give loop-value to {_p} remove loop-value from {ah::claims::%{_uuid}%::*} add 1 to {_given} else: exit loop if {_given} > 0: send ahColorize("{@prefix}&aClaimed &f%{_given}% &aitem(s)!") to {_p} play sound "entity.item.pickup" at {_p} else: send ahColorize("{@prefix}&cYour inventory is full! Make room first.") to {_p} function ahCreditBalance(uuid: string, amount: number): add {_amount} to {ah::pending-balance::%{_uuid}%} function ahPayPending(p: player): set {_uuid} to "%uuid of {_p}%" if {ah::pending-balance::%{_uuid}%} is not set: stop if {ah::pending-balance::%{_uuid}%} <= 0: stop set {_amt} to {ah::pending-balance::%{_uuid}%} add {_amt} to {_p}'s balance delete {ah::pending-balance::%{_uuid}%} send ahColorize("{@prefix}&aYou received &6%{@currency}%%{_amt}% &afrom your Auction House sales!") to {_p} play sound "entity.player.levelup" at {_p} function ahRunExpiry(): set {_count} to 0 loop {ah::listings::*}: if ahIsExpired(loop-value) is true: set {_selleruuid} to {ah::data::%loop-value%::seller} set {_it} to {ah::data::%loop-value%::item} if {_it} is set: ahReturnItem({_selleruuid}, {_it}) ahDeleteListing(loop-value) add 1 to {_count} loop all players: if "%uuid of loop-player-2%" = {_selleruuid}: send ahColorize("{@prefix}&eA listing expired and was returned. Use &6/ah claim &eto collect it.") to loop-player-2 if {_count} > 0: broadcast ahColorize("{@prefix}&7%{_count}% expired listing(s) were cleaned up.") command /auctionhouse [] []: aliases: /auction, /ah trigger: if arg-1 is not set: ahOpenMain(player, 1) play sound "block.chest.open" at player stop if arg-1 = "help": send ahColorize("{@prefix}&6=== Auction House Help ===") to player send ahColorize("&6/ah &7- Open the auction house browser") to player send ahColorize("&6/ah sell &7- List held item for sale") to player send ahColorize("&6/ah claim &7- Claim returned/expired items") to player send ahColorize("&6/ah expire &7- &c[Admin] &7Force expire all old listings") to player send ahColorize("&6/ah reload &7- &c[Admin] &7Reload script") to player stop if arg-1 = "claim": ahGiveClaims(player) stop if arg-1 = "expire": if player doesn't have permission "ah.admin": send ahColorize("{@prefix}&cYou do not have permission!") to player stop ahRunExpiry() send ahColorize("{@prefix}&aForced expiry complete.") to player stop if arg-1 = "sell": if arg-2 is not set: send ahColorize("{@prefix}&cUsage: /ah sell ") to player stop if player's tool is air: send ahColorize("{@prefix}&cYou must hold an item to sell!") to player stop set {_price} to arg-2 parsed as number if {_price} is not set: send ahColorize("{@prefix}&cInvalid price! Enter a valid number.") to player stop if {_price} < {@min-price}: send ahColorize("{@prefix}&cMinimum price is %{@currency}%%{@min-price}%!") to player stop if {_price} > {@max-price}: send ahColorize("{@prefix}&cMaximum price is %{@currency}%%{@max-price}%!") to player stop set {_uuid} to "%uuid of player%" if {ah::lock::%{_uuid}%} is set: send ahColorize("{@prefix}&cPlease wait before performing another action!") to player stop if ahPlayerListings({_uuid}) >= {@max-listings}: send ahColorize("{@prefix}&cYou have reached the max of %{@max-listings}% listings!") to player stop set {ah::lock::%{_uuid}%} to true set {_item} to player's tool set player's tool to air ahCreateListing(player, {_item}, {_price}) delete {ah::lock::%{_uuid}%} send ahColorize("{@prefix}&aListed &f%type of {_item}% &afor &6%{@currency}%%{_price}%&a! Tax on sale: &c%{@tax-percent}%%%a.") to player play sound "entity.experience_orb.pickup" at player stop send ahColorize("{@prefix}&cUnknown sub-command. Try /ah help") to player on inventory click: set {_uuid} to "%uuid of player%" if {ah::state::%{_uuid}%::mode} is not set: stop set {_title} to name of player's current inventory if {_title} != "{@main-title}" and {_title} != "{@mine-title}" and {_title} != "{@confirm-title}": delete {ah::state::%{_uuid}%::mode} stop cancel event if {ah::lock::%{_uuid}%} is set: send ahColorize("{@prefix}&cPlease wait a moment!") to player stop set {_slot} to event-slot set {_mode} to {ah::state::%{_uuid}%::mode} set {_page} to {ah::state::%{_uuid}%::page} if {_mode} = "browse": if {_slot} = 45: if {_page} > 1: ahOpenMain(player, {_page} - 1) play sound "ui.button.click" at player stop if {_slot} = 46: ahOpenMine(player, 1) play sound "block.chest.open" at player stop if {_slot} = 47: player's current inventory is closed ahGiveClaims(player) stop if {_slot} = 53: ahOpenMain(player, {_page} + 1) play sound "ui.button.click" at player stop if {_slot} >= 0 and {_slot} <= 44: clear {_active::*} set {_active::*} to ahCollectActive() set {_idx} to ({_page} - 1) * {@per-page} + {_slot} + 1 set {_id} to element {_idx} of {_active::*} if {_id} is not set: stop if {ah::data::%{_id}%::item} is not set: send ahColorize("{@prefix}&cThis listing no longer exists!") to player play sound "entity.villager.no" at player ahOpenMain(player, {_page}) stop if event-click type is right mouse button: if {ah::data::%{_id}%::seller} = {_uuid}: set {ah::lock::%{_uuid}%} to true set {_it} to {ah::data::%{_id}%::item} ahDeleteListing({_id}) if player can hold {_it}: give {_it} to player else: ahReturnItem({_uuid}, {_it}) send ahColorize("{@prefix}&eInventory full! Use /ah claim to get your item.") to player delete {ah::lock::%{_uuid}%} send ahColorize("{@prefix}&aListing cancelled and item returned!") to player play sound "block.chest.close" at player ahOpenMain(player, {_page}) stop if {ah::data::%{_id}%::seller} = {_uuid}: send ahColorize("{@prefix}&cYou cannot buy your own listing!") to player play sound "entity.villager.no" at player stop ahOpenConfirm(player, {_id}) play sound "ui.button.click" at player if {_mode} = "confirm": set {_cid} to {ah::state::%{_uuid}%::confirm-id} if {_slot} = 15: ahOpenMain(player, 1) play sound "ui.button.click" at player stop if {_slot} = 11: if {ah::data::%{_cid}%::item} is not set: send ahColorize("{@prefix}&cThis listing no longer exists!") to player play sound "entity.villager.no" at player ahOpenMain(player, 1) stop set {_price} to {ah::data::%{_cid}%::price} if player's balance < {_price}: send ahColorize("{@prefix}&cYou don't have enough money! Need: &6%{@currency}%%{_price}%") to player play sound "entity.villager.no" at player stop set {ah::lock::%{_uuid}%} to true if {ah::data::%{_cid}%::item} is not set: delete {ah::lock::%{_uuid}%} send ahColorize("{@prefix}&cThis listing was just purchased by someone else!") to player play sound "entity.villager.no" at player ahOpenMain(player, 1) stop set {_it} to {ah::data::%{_cid}%::item} set {_selleruuid} to {ah::data::%{_cid}%::seller} set {_sellername} to {ah::data::%{_cid}%::seller-name} set {_tax} to floor({_price} * {@tax-percent} / 100) set {_payout} to {_price} - {_tax} remove {_price} from player's balance ahDeleteListing({_cid}) if player can hold {_it}: give {_it} to player else: ahReturnItem({_uuid}, {_it}) send ahColorize("{@prefix}&eInventory full! Use /ah claim to collect your purchase.") to player ahCreditBalance({_selleruuid}, {_payout}) loop all players: if "%uuid of loop-player%" = {_selleruuid}: ahPayPending(loop-player) send ahColorize("{@prefix}&a%name of player% &apurchased your item for &6%{@currency}%%{_price}%&a!") to loop-player play sound "entity.player.levelup" at loop-player delete {ah::lock::%{_uuid}%} send ahColorize("{@prefix}&aPurchase successful! You paid &6%{@currency}%%{_price}%&a.") to player play sound "entity.experience_orb.pickup" at player ahOpenMain(player, 1) if {_mode} = "mine": if {_slot} = 45: if {_page} > 1: ahOpenMine(player, {_page} - 1) play sound "ui.button.click" at player stop if {_slot} = 48: ahOpenMain(player, 1) play sound "block.chest.open" at player stop if {_slot} = 53: ahOpenMine(player, {_page} + 1) play sound "ui.button.click" at player stop if {_slot} >= 0 and {_slot} <= 44: clear {_mine::*} set {_mine::*} to ahCollectMine({_uuid}) set {_idx} to ({_page} - 1) * {@per-page} + {_slot} + 1 set {_id} to element {_idx} of {_mine::*} if {_id} is not set: stop set {ah::lock::%{_uuid}%} to true set {_it} to {ah::data::%{_id}%::item} ahDeleteListing({_id}) if player can hold {_it}: give {_it} to player else: ahReturnItem({_uuid}, {_it}) send ahColorize("{@prefix}&eInventory full! Use /ah claim to collect your item.") to player delete {ah::lock::%{_uuid}%} send ahColorize("{@prefix}&aListing cancelled and item returned!") to player play sound "block.chest.close" at player ahOpenMine(player, max(1, {_page})) on inventory close: set {_uuid} to "%uuid of player%" delete {ah::state::%{_uuid}%::mode} delete {ah::state::%{_uuid}%::page} delete {ah::state::%{_uuid}%::confirm-id} on join: wait 2 seconds ahPayPending(player) set {_uuid} to "%uuid of player%" if size of {ah::claims::%{_uuid}%::*} > 0: send ahColorize("{@prefix}&eYou have unclaimed items! Use &6/ah claim &eto collect them.") to player every 30 minutes: ahRunExpiry()