Exide
I am amazingly focused right now!
- Reaction score
- 448
Hi.
I got a brilliant idea which, I believe, haven't been done before.
So, obviously, I created it.
The idea is an auction.
-How does it work?
The map also features a Multiboard to display the current item, bid and winner.
Everything is coded in GUI.
There are too many triggers to spam this post, instead I will attach a Demo Map.
Enjoy.
EDIT: Triggers:
I got a brilliant idea which, I believe, haven't been done before.
So, obviously, I created it.
The idea is an auction.
-How does it work?
The auction works like this:
A computer controlled unit (the 'Announcer') announces a random item (from an item index, of course).
The players can then move their 'Buyers' into the 'Auction House' and make their bids. The player bids by typing '-bid <value>'.
The 'value' must exceed the current highest bid, and the player must have that amount of gold (or more) in order to make a bid.
Players are able to outbid eachother.
Players can also give items to the Announcer, in order for him to auction the item for them.
The Announcer must be auctioning an item (having one in inventory slot 1) when the item is given to him. He will then finish his current auction before auctioning the player's item.
If a player auctioned item is sold, the Announcer takes 10% of the gold, and gives the rest to the player that auctioned the item.
More info can be found in the 'Quest' menu In-Game.
A computer controlled unit (the 'Announcer') announces a random item (from an item index, of course).
The players can then move their 'Buyers' into the 'Auction House' and make their bids. The player bids by typing '-bid <value>'.
The 'value' must exceed the current highest bid, and the player must have that amount of gold (or more) in order to make a bid.
Players are able to outbid eachother.
Players can also give items to the Announcer, in order for him to auction the item for them.
The Announcer must be auctioning an item (having one in inventory slot 1) when the item is given to him. He will then finish his current auction before auctioning the player's item.
If a player auctioned item is sold, the Announcer takes 10% of the gold, and gives the rest to the player that auctioned the item.
More info can be found in the 'Quest' menu In-Game.
The map also features a Multiboard to display the current item, bid and winner.
Everything is coded in GUI.
There are too many triggers to spam this post, instead I will attach a Demo Map.
Enjoy.
EDIT: Triggers:
Trigger:
- Setup
- Events
- Map initialization
- Conditions
- Actions
- -------- -Setup needed variables for the Auction- --------
- Set Announcer = Announcer 0009 <gen>
- Player - Set the current research level of Backpack (Human) to 1 for (Owner of Announcer)
- Set Buyer[1] = Buyer 0005 <gen>
- Set Buyer[2] = Buyer 0006 <gen>
- Set Buyer[3] = Buyer 0007 <gen>
- Set Buyer[4] = Buyer 0008 <gen>
- -------- Quests --------
- Quest - Create a Required quest titled Bidding with the description In order to bid, yo..., using icon path ReplaceableTextures\CommandButtons\BTNAcorn.blp
- Quest - Create a Optional quest titled Auctioning with the description You can manually au..., using icon path ReplaceableTextures\WorldEditUI\Editor-Random-Item.blp
- Quest - Create a Optional quest titled Multiboard with the description The Multiboard show..., using icon path ReplaceableTextures\WorldEditUI\Editor-MultipleDoodads.blp
- Events
Trigger:
- Item Index
- Events
- Map initialization
- Conditions
- Actions
- -------- -These are the items that might show up on the Auction- --------
- -------- --Do NOT put powerups in here!-- --------
- -------- Level 1 --------
- Set AuctionItem[1] = Ring of the Archmagi
- Set AuctionItem[2] = Cloak of Shadows
- Set AuctionItem[3] = Gauntlets of Ogre Strength +3
- Set AuctionItem[4] = Slippers of Agility +3
- -------- Level 2 --------
- Set AuctionItem[5] = Boots of Speed
- Set AuctionItem[6] = Gem of True Seeing
- Set AuctionItem[7] = Claws of Attack +6
- Set AuctionItem[8] = Gloves of Haste
- -------- Level 3 --------
- Set AuctionItem[9] = Orb of Corruption
- Set AuctionItem[10] = Orb of Fire
- Set AuctionItem[11] = Orb of Lightning
- Set AuctionItem[12] = Orb of Venom
- -------- Level 4 --------
- Set AuctionItem[13] = Alleria's Flute of Accuracy
- Set AuctionItem[14] = Legion Doom-Horn
- Set AuctionItem[15] = Scourge Bone Chimes
- Set AuctionItem[16] = The Lion Horn of Stormwind
- -------- Level 5 --------
- Set AuctionItem[17] = Ankh of Reincarnation
- Set AuctionItem[18] = Cloak of Flames
- Set AuctionItem[19] = Ancient Janggo of Endurance
- Set AuctionItem[20] = Warsong Battle Drums
- -------- Level 6 --------
- Set AuctionItem[21] = Amulet of Spell Shield
- Set AuctionItem[22] = Orb of Darkness
- Set AuctionItem[23] = Pendant of Mana
- Set AuctionItem[24] = Staff of Silence
- -------- --Do NOT put powerups in here!-- --------
- -------- -These are the items that might show up on the Auction- --------
- Events
Trigger:
- Start Auction
- Events
- Time - Elapsed game time is 3.00 seconds
- Conditions
- Actions
- -------- -Start the Auction for the very first time- --------
- Trigger - Run New Item <gen> (ignoring conditions)
- Events
Trigger:
- Enter Auction House
- Events
- Unit - A unit enters Auction House <gen>
- Conditions
- Actions
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- FirstTimeVisit[(Player number of (Owner of (Triggering unit)))] Equal to False
- Then - Actions
- -------- -Entering the Auction House- --------
- Custom script: call DisplayTextToPlayer(GetOwningPlayer(GetTriggerUnit()), 0, 0, "|cff995500Welcome to the Auction House.|r")
- Custom script: call DisplayTextToPlayer(GetOwningPlayer(GetTriggerUnit()), 0, 0, "|cff995500Type '|r-bid <value>|cff995500' to make a bid.|r")
- Set FirstTimeVisit[(Player number of (Owner of (Triggering unit)))] = True
- Else - Actions
- If - Conditions
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- Events
Trigger:
- New Item
- Events
- Conditions
- Actions
- -------- -Start the Auction- --------
- Trigger - Turn off Manual Auction <gen>
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- (Item carried by Announcer in slot 2) Equal to No item
- Then - Actions
- Trigger - Turn off Bid <gen>
- Hero - Create AuctionItem[(Random integer number between 1 and 24)] and give it to Announcer
- Set ItemForSale = (Item carried by Announcer in slot 1)
- Set MABoolean = False
- Else - Actions
- Set ItemForSale = (Item carried by Announcer in slot 2)
- Hero - Drop ItemForSale from Announcer
- Hero - Give ItemForSale to Announcer
- Set MABoolean = True
- If - Conditions
- Trigger - Turn on Manual Auction <gen>
- Wait 2.00 seconds
- Set AnnounceString = (The next item for auction is ... + (Name of ItemForSale))
- Set AnnounceLength = (Length of AnnounceString)
- Set HighestBid = ((Item level of ItemForSale) x 100)
- Set AnnouncePoint[1] = (Position of Announcer)
- Set AnnouncePoint[2] = (AnnouncePoint[1] offset by ((Real(AnnounceLength)) x 4.00) towards 180.00 degrees)
- Floating Text - Create floating text that reads (|cff32cd32 + AnnounceString) at AnnouncePoint[2] with Z offset 125.00, using font size 9.00, color (100.00%, 100.00%, 100.00%), and 0.00% transparency
- Set AnnounceText = (Last created floating text)
- Floating Text - Change the lifespan of AnnounceText to 3.50 seconds
- Floating Text - Change AnnounceText: Disable permanence
- Custom script: call RemoveLocation(udg_AnnouncePoint[2])
- Wait 4.00 seconds
- Set AnnounceString = (Starting bids at ... + ((String(HighestBid)) + gold.))
- Set AnnounceLength = (Length of AnnounceString)
- Set AnnouncePoint[2] = (AnnouncePoint[1] offset by ((Real(AnnounceLength)) x 4.00) towards 180.00 degrees)
- Floating Text - Create floating text that reads (|cff32cd32 + AnnounceString) at AnnouncePoint[2] with Z offset 125.00, using font size 9.00, color (100.00%, 100.00%, 100.00%), and 0.00% transparency
- Set AnnounceText = (Last created floating text)
- Floating Text - Change the lifespan of AnnounceText to 3.50 seconds
- Floating Text - Change AnnounceText: Disable permanence
- Custom script: call RemoveLocation(udg_AnnouncePoint[1])
- Custom script: call RemoveLocation(udg_AnnouncePoint[2])
- Trigger - Turn on Bid <gen>
- Countdown Timer - Start ItemRemoveTimer as a One-shot timer that will expire in 30.00 seconds
Trigger:
- Bid
- Events
- Player - Player 1 (Red) types a chat message containing -bid as A substring
- Player - Player 2 (Blue) types a chat message containing -bid as A substring
- Player - Player 3 (Teal) types a chat message containing -bid as A substring
- Player - Player 4 (Purple) types a chat message containing -bid as A substring
- Player - Player 5 (Yellow) types a chat message containing -bid as A substring
- Player - Player 6 (Orange) types a chat message containing -bid as A substring
- Player - Player 7 (Green) types a chat message containing -bid as A substring
- Player - Player 8 (Pink) types a chat message containing -bid as A substring
- Player - Player 9 (Gray) types a chat message containing -bid as A substring
- Player - Player 10 (Light Blue) types a chat message containing -bid as A substring
- Player - Player 11 (Dark Green) types a chat message containing -bid as A substring
- Player - Player 12 (Brown) types a chat message containing -bid as A substring
- Conditions
- Actions
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- (Auction House <gen> contains Buyer[(Player number of (Triggering player))]) Equal to True
- Then - Actions
- Set PlayerNumber = (Player number of (Triggering player))
- Set BidValue[PlayerNumber] = (Integer((Substring((Entered chat string), 5, (Length of (Entered chat string))))))
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- BidValue[PlayerNumber] Greater than HighestBid
- Then - Actions
- -------- -Is the big higher than the current bid?- --------
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- ((Triggering player) Current gold) Greater than or equal to BidValue[PlayerNumber]
- Then - Actions
- -------- -Can the bidder afford to make such an offer?- --------
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- (Triggering player) Not equal to HighestBidder
- Then - Actions
- -------- -Is the bidder trying to outbid him/her-self?- --------
- Floating Text - Destroy AnnounceText
- Set HighestBid = BidValue[PlayerNumber]
- Set AuctionHouseGroup = (Units in Auction House <gen> matching ((Matching unit) Not equal to Announcer))
- Unit Group - Pick every unit in AuctionHouseGroup and do (Actions)
- Loop - Actions
- Set AGHPlayerGroup = (All players matching ((Matching player) Equal to (Owner of (Picked unit))))
- Game - Display to AGHPlayerGroup the text: ((|cff995500 + (Name of (Triggering player))) + ( bids: + ((String(HighestBid)) + ( gold, for item: + (Name of ItemForSale)))))
- Custom script: call DestroyForce(udg_AGHPlayerGroup)
- Loop - Actions
- Custom script: call DestroyGroup(udg_AuctionHouseGroup)
- -------- -The bidder successfully made an offer- --------
- Countdown Timer - Pause BidWinTimer
- Countdown Timer - Pause ItemRemoveTimer
- Set NewBid = True
- Set HighestBidder = (Triggering player)
- Set AnnounceString = (((Name of HighestBidder) + has made an generous offer of ) + ((String(HighestBid)) + gold.))
- Set AnnounceLength = (Length of AnnounceString)
- Set AnnouncePoint[1] = (Position of Announcer)
- Set AnnouncePoint[2] = (AnnouncePoint[1] offset by ((Real(AnnounceLength)) x 4.00) towards 180.00 degrees)
- Floating Text - Create floating text that reads (|cff32cd32 + AnnounceString) at AnnouncePoint[2] with Z offset 125.00, using font size 9.00, color (100.00%, 100.00%, 100.00%), and 0.00% transparency
- Set AnnounceText = (Last created floating text)
- Floating Text - Change the lifespan of AnnounceText to 3.50 seconds
- Floating Text - Change AnnounceText: Disable permanence
- Custom script: call RemoveLocation(udg_AnnouncePoint[2])
- Wait 4.00 seconds
- Set AnnounceString = (Do we have any other bids at ... + ((String(HighestBid)) + gold?))
- Set AnnounceLength = (Length of AnnounceString)
- Set AnnouncePoint[2] = (AnnouncePoint[1] offset by ((Real(AnnounceLength)) x 4.00) towards 180.00 degrees)
- Floating Text - Create floating text that reads (|cff32cd32 + AnnounceString) at AnnouncePoint[2] with Z offset 125.00, using font size 9.00, color (100.00%, 100.00%, 100.00%), and 0.00% transparency
- Set AnnounceText = (Last created floating text)
- Floating Text - Change the lifespan of AnnounceText to 3.50 seconds
- Floating Text - Change AnnounceText: Disable permanence
- Custom script: call RemoveLocation(udg_AnnouncePoint[1])
- Custom script: call RemoveLocation(udg_AnnouncePoint[2])
- Countdown Timer - Start BidWinTimer as a One-shot timer that will expire in 7.00 seconds
- Else - Actions
- Custom script: call DisplayTextToPlayer(GetTriggerPlayer(), 0, 0, "|cffff0000You can't outbid yourself..|r")
- If - Conditions
- Else - Actions
- Custom script: call DisplayTextToPlayer(GetTriggerPlayer(), 0, 0, "|cffff0000You can't afford to make such an offer.|r")
- If - Conditions
- Else - Actions
- Custom script: call DisplayTextToPlayer(GetTriggerPlayer(), 0, 0, "|cffff0000Your bid must exceed |r" + I2S(udg_HighestBid) + " |cffff0000gold!|r")
- If - Conditions
- Else - Actions
- Custom script: call DisplayTextToPlayer(GetTriggerPlayer(), 0, 0, "|cffff0000Your Buyer must be in the Auction House in order to place a bid!|r")
- If - Conditions
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- Events
Trigger:
- Win
- Events
- Time - BidWinTimer expires
- Conditions
- Actions
- -------- -Going Once- --------
- Set NewBid = False
- Set AnnounceString = ((Name of ItemForSale) + ( going once for + ((String(HighestBid)) + gold!)))
- Set AnnounceLength = (Length of AnnounceString)
- Set AnnouncePoint[1] = (Position of Announcer)
- Set AnnouncePoint[2] = (AnnouncePoint[1] offset by ((Real(AnnounceLength)) x 4.00) towards 180.00 degrees)
- Floating Text - Create floating text that reads (|cff32cd32 + AnnounceString) at AnnouncePoint[2] with Z offset 125.00, using font size 9.00, color (100.00%, 100.00%, 100.00%), and 0.00% transparency
- Set AnnounceText = (Last created floating text)
- Floating Text - Change the lifespan of AnnounceText to 2.50 seconds
- Floating Text - Change AnnounceText: Disable permanence
- Custom script: call RemoveLocation(udg_AnnouncePoint[2])
- Wait 4.00 seconds
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- NewBid Equal to True
- Then - Actions
- Custom script: call RemoveLocation(udg_AnnouncePoint[1])
- Custom script: call RemoveLocation(udg_AnnouncePoint[2])
- Skip remaining actions
- Else - Actions
- If - Conditions
- -------- -Going Twice- --------
- Set AnnounceString = ((Name of ItemForSale) + ( going twice for + ((String(HighestBid)) + gold!)))
- Set AnnounceLength = (Length of AnnounceString)
- Set AnnouncePoint[1] = (Position of Announcer)
- Set AnnouncePoint[2] = (AnnouncePoint[1] offset by ((Real(AnnounceLength)) x 4.00) towards 180.00 degrees)
- Floating Text - Create floating text that reads (|cff32cd32 + AnnounceString) at AnnouncePoint[2] with Z offset 125.00, using font size 9.00, color (100.00%, 100.00%, 100.00%), and 0.00% transparency
- Set AnnounceText = (Last created floating text)
- Floating Text - Change the lifespan of AnnounceText to 2.50 seconds
- Floating Text - Change AnnounceText: Disable permanence
- Custom script: call RemoveLocation(udg_AnnouncePoint[2])
- Wait 4.00 seconds
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- NewBid Equal to True
- Then - Actions
- Custom script: call RemoveLocation(udg_AnnouncePoint[1])
- Custom script: call RemoveLocation(udg_AnnouncePoint[2])
- Skip remaining actions
- Else - Actions
- If - Conditions
- -------- -Sold to Bidder!- --------
- Set AnnounceString = (Sold to + ((Name of HighestBidder) + ( for + ((String(HighestBid)) + gold!))))
- Set AnnounceLength = (Length of AnnounceString)
- Set AnnouncePoint[1] = (Position of Announcer)
- Set AnnouncePoint[2] = (AnnouncePoint[1] offset by ((Real(AnnounceLength)) x 4.00) towards 180.00 degrees)
- Floating Text - Create floating text that reads (|cff32cd32 + AnnounceString) at AnnouncePoint[2] with Z offset 125.00, using font size 9.00, color (100.00%, 100.00%, 100.00%), and 0.00% transparency
- Set AnnounceText = (Last created floating text)
- Floating Text - Change the lifespan of AnnounceText to 2.50 seconds
- Floating Text - Change AnnounceText: Disable permanence
- Custom script: call RemoveLocation(udg_AnnouncePoint[1])
- Custom script: call RemoveLocation(udg_AnnouncePoint[2])
- Animation - Play Announcer's attack animation
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- (HighestBidder Current gold) Greater than or equal to HighestBid
- Then - Actions
- -------- -Item Sold, Transaction Complete- --------
- Custom script: call DestroyEffect(AddSpecialEffectTarget("UI\\Feedback\\GoldCredit\\GoldCredit.mdl", udg_Announcer, "overhead"))
- Custom script: call DestroyEffect(AddSpecialEffectTarget("UI\\Feedback\\GoldCredit\\GoldCredit.mdl", udg_Buyer[GetPlayerId(udg_HighestBidder)], "overhead"))
- Set MoveItemPoint = (Position of Buyer[(Player number of HighestBidder)])
- Item - Move ItemForSale to MoveItemPoint
- Custom script: call RemoveLocation(udg_MoveItemPoint)
- Player - Set HighestBidder Current gold to ((HighestBidder Current gold) - HighestBid)
- Hero - Give ItemForSale to Buyer[(Player number of HighestBidder)]
- Item - Change ownership of ItemForSale to HighestBidder and Retain color
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- MABoolean Equal to True
- Then - Actions
- -------- -Was the Sold Item auctioned by a Player?- --------
- Custom script: call DestroyEffect(AddSpecialEffectTarget("UI\\Feedback\\GoldCredit\\GoldCredit.mdl", udg_Buyer[GetPlayerId(udg_MAOwner)], "overhead"))
- Custom script: call DisplayTextToPlayer(udg_MAOwner, 0, 0, "|cff32cd32Your item has been sold successfully. I have taken a 10% fee for my services.|r")
- Set MAFee = (HighestBid x (Integer(0.10)))
- Set MAGold = (HighestBid - MAFee)
- Player - Add MAGold to MAOwner Current gold
- Else - Actions
- If - Conditions
- Else - Actions
- Item - Remove ItemForSale
- Custom script: call DisplayTextToPlayer(udg_HighestBidder, 0, 0, "|cffff0000You can't afford to pay for the item!|r")
- If - Conditions
- Set ItemForSale = No item
- Set HighestBidder = Neutral Extra
- Set HighestBid = 0
- Wait 1.00 seconds
- Animation - Play Announcer's stand animation
- Wait 4.00 seconds
- -------- -Start New Auction- --------
- Trigger - Run New Item <gen> (ignoring conditions)
- Events
Trigger:
- Cancel Auction
- Events
- Time - ItemRemoveTimer expires
- Conditions
- Actions
- -------- -No one was interessted- --------
- Item - Remove ItemForSale
- Set ItemForSale = No item
- Wait 1.00 seconds
- -------- -Start New Auction- --------
- Trigger - Run New Item <gen> (ignoring conditions)
- Events
Trigger:
- Manual Auction
- Events
- Unit - A unit Acquires an item
- Conditions
- (Triggering unit) Equal to Announcer
- Actions
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- (Item being manipulated) Equal to (Item carried by Announcer in slot 2)
- Then - Actions
- Set MAOwner = (Owner of (Item being manipulated))
- Custom script: call DisplayTextToPlayer(udg_MAOwner, 0, 0, "|cff32cd32I will auction this item for you when the current auction is over.|r")
- Else - Actions
- Hero - Drop (Item being manipulated) from Announcer
- If - Conditions
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- Events
Trigger:
- Multiboard
- Events
- Time - Elapsed game time is 1.00 seconds
- Conditions
- Actions
- -------- -Create and show the Multiboard- --------
- Multiboard - Create a multiboard with 3 columns and 2 rows, titled -Auction-
- Set AuctionMultiboard = (Last created multiboard)
- For each (Integer A) from 1 to 2, do (Actions)
- Loop - Actions
- Multiboard - Set the width for AuctionMultiboard item in column 1, row (Integer A) to 13.00% of the total screen width
- Multiboard - Set the width for AuctionMultiboard item in column 2, row (Integer A) to 5.00% of the total screen width
- Multiboard - Set the width for AuctionMultiboard item in column 3, row (Integer A) to 10.00% of the total screen width
- Multiboard - Set the icon for AuctionMultiboard item in column 1, row (Integer A) to ReplaceableTextures\CommandButtons\BTNAcorn.blp
- Multiboard - Set the icon for AuctionMultiboard item in column 2, row (Integer A) to UI\Feedback\Resources\ResourceGold.blp
- Multiboard - Set the icon for AuctionMultiboard item in column 3, row (Integer A) to ReplaceableTextures\WorldEditUI\Editor-Random-Unit.blp
- Loop - Actions
- Multiboard - Set the text for AuctionMultiboard item in column 1, row 1 to |cff995500Current I...
- Multiboard - Set the text for AuctionMultiboard item in column 2, row 1 to |cff995500Bid:|r
- Multiboard - Set the text for AuctionMultiboard item in column 3, row 1 to |cff995500Current W...
- Multiboard - Show AuctionMultiboard
- Trigger - Turn on Multiboard Update <gen>
- Events
Trigger:
- Multiboard Update
- Events
- Time - Every 0.50 seconds of game time
- Conditions
- Actions
- -------- -Update the Multiboard- --------
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- ItemForSale Not equal to No item
- Then - Actions
- Multiboard - Set the text for AuctionMultiboard item in column 1, row 2 to (Name of ItemForSale)
- Multiboard - Set the text for AuctionMultiboard item in column 2, row 2 to (String(HighestBid))
- If (All Conditions are True) then do (Then Actions) else do (Else Actions)
- If - Conditions
- HighestBidder Equal to Neutral Extra
- Then - Actions
- Multiboard - Set the text for AuctionMultiboard item in column 3, row 2 to -None-
- Else - Actions
- Multiboard - Set the text for AuctionMultiboard item in column 3, row 2 to (Name of HighestBidder)
- If - Conditions
- Else - Actions
- Multiboard - Set the text for AuctionMultiboard item in column 1, row 2 to -None-
- Multiboard - Set the text for AuctionMultiboard item in column 2, row 2 to -None-
- Multiboard - Set the text for AuctionMultiboard item in column 3, row 2 to -None-
- If - Conditions
- Events
