• Listen to a special audio message from Bill Roper to the Hive Workshop community (Bill is a former Vice President of Blizzard Entertainment, Producer, Designer, Musician, Voice Actor) 🔗Click here to hear his message!
  • Read Evilhog's interview with Gregory Alper, the original composer of the music for WarCraft: Orcs & Humans 🔗Click here to read the full interview.

Triggers

Monopoly v1.72.w3m
Variables
Notes
Notes
Initialise
Command List
Disable Resource Trading
Define Active Players
Define Chance Actions
Define Chance Texts
Define Community Chest Actions
Define Community Chest Texts
Define Current Square
Define Debts
Define Doodads
Define Doodads Sub Trigger
Define Jail Roll Attempts
Define Neutral Hostile Alliance
Define PlayerLeft
Define Player Colours
Define Player Order
Define Property Building Sites
Define Property Counting Sites
Define Property Improvement Price
Define Property Mortgage
Define Property Names
Define Property Owner
Define Property Owner Labels
Define Property Price
Define Property Rental Rates
Define Property Types
Define Squares
Define Timer Window
Define Trade Menus
Define Units
Enable Triggers
Start Game
Remove Fog of War
Give Money
Create Units
Move Cameras
Leaderboard
Create Leaderboard
Update Leaderboard
First Turn
Choose Starting Player
Alter PlayerLeft
Next Turn
Prompt to roll
Next Turn
Another Turn
Passing Go
Passing Go
Movement
Roll Dice Movement
Start Movement
Continue Movement
End Movement
Start Movement Backwards
Continue Movement Backwards
Jail Triggers
Prompt to Roll or Pay
Jail Roll
Jail Pay Bail
Stay in Jail
Leave Jail
TP into Jail
Taxes
Lamer Tax
Income Tax Init
Income Tax Action
Chance and Community Chest
Chance Init
Community Chest Init
Advance to The Well of Eternity
Advance to The Violet Citadel
Advance to Go
Advance to Port of Azeroth
Advance to nearest seaport
Advance to Silvermoon
Advance to nearest utility
Go to Jail
Receive 10
Receive 20
Receive 25
Receive 45
Receive 50
Receive 50 per player
Receive 100
Receive 150
Receive 200
Lose 15
Lose 50
Lose 50 per player
Lose 100
Lose 150
Lose 25 per house 100 per hotel
Lose 40 per house 115 per hotel
Go back 3
Get out of Jail Free
Buying and Renting
BuyRent Course of Action
Buying Offer
Buying Offer Nag
Detect Buying Decision
Buy Property
Calculate Rent
Calculate Rent Normal
Calculate Rent Railroad
Utility Roll Request
Prompt to Utility Roll
Detect Utility Roll and Calculate
Pay Rent
Property Mortgaged
Trading
Begin Trading
Already Trading
Trading Ask to Buy
Trading Select Buy
Trading Ask to Sell
Trading Select Sell
Trading Sell Property Confirm
Trading Sell All
Trading Ask to Mortgage
Trading Select Mortgage
Trading Ask Private
Trading Select Private
Trading Price Private
Trading Price Exchange
Trading Player Private
Trading Accept Private
Trading Decline Private1
Trading Decline Private2
Trading Decline Private3
Trading Decline Private4
Trading Decline Private5
Trading Decline Private6
Trading Decline Private7
Trading Decline Private8
Trading Player Exchange
Trading Accept Exchange1
Trading Select Exchange
Trading Accept Exchange2
Cancel Trading
Create Property Selectors
Debt Collection
Pay off partial debt
Pay off entire debt
Bankruptcy
Declare Bankrupt
Player 1 Leaves
Player 2 Leaves
Player 3 Leaves
Player 4 Leaves
Player 5 Leaves
Player 6 Leaves
Player 7 Leaves
Player 8 Leaves
Bankruptcy
Auctioning Property
Auction Init
Auction Nag
Detect Bid
Auction End
Winning and Losing
Winning
KickVote System
Begin KickVote
Detect KickVote
Rent Display System
Select House or Hotel
Select Mortgage
Select Property Label
Calculate Rent Display Normal
Calculate Rent Display Railroad
Select Utility Label
Select Something Else
Resurrections
Resurrect Neutral
Create Ankhs
Create Ankhs Sub Trigger
Ressurect Doodad
Name Type is_array initial_value
ActivePlayers force No
ActivePlayersTemp force No
AllowJailRoll boolean No false
AllowRoll boolean No true
AllowUtilityRoll boolean No false
AuctionActive boolean No false
AuctionBid integer No 0
AuctionBidder player No Player11
AuctionTimer timer No
AuctionTimerWindow timerdialog No
BuildBalance boolean No true
BuyingOffer integer No 0
ChanceAction trigger Yes
ChanceText string Yes
CheckforLeaver boolean No false
CommunityChestAction trigger Yes
CommunityChestText string Yes
CompleteSet boolean No true
CurrentSquare integer Yes
CurrentTurn integer No 0
Debt integer Yes
DebtCreditor player Yes
Dice1 integer No 0
Dice2 integer No 0
DoodadArray destructable Yes
DoodadCount integer No 0
DoublesCount integer No 0
IncomeTaxee integer No 0
InDebt boolean Yes
JailRollAttempts integer Yes
Kickee player No Player11
Kicker player No Player11
KickVoteActive boolean No false
KickVoteDialog dialog No
KickVoteNoButton button No
KickVoteYesButton button No
LeaderBoardArray leaderboard Yes
LeftPlayer player No Player11
Moving integer No 0
NumberRolled integer No 0
NumVoters integer No 0
OwedRent integer No 0
PassedGo boolean No false
PayDouble boolean No false
PayingRent boolean No false
PlayerColours string Yes
PlayerLeft boolean Yes
PlayerOrder player Yes
PlayersTotalAssets integer No 0
PrivateBuyer player Yes
PrivateBuyOffer boolean Yes
PrivateExchangeOffer boolean Yes
PrivateExchangeOffer2 boolean Yes
PrivatePrice integer Yes
PrivateSeller player Yes
PrivateTimer1 timer No
PrivateTimer2 timer No
PrivateTimer3 timer No
PrivateTimer4 timer No
PrivateTimer5 timer No
PrivateTimer6 timer No
PrivateTimer7 timer No
PrivateTimer8 timer No
PropertyBuildingSite rect Yes
PropertyCountingSite rect Yes
PropertyImprovementPrice integer Yes
PropertyLabels group No
PropertyMortgage boolean Yes
PropertyName string Yes
PropertyOwner player Yes
PropertyOwnerLabel unit Yes
PropertyPrice integer Yes
PropertyRentalRates integer Yes
PropertyType integer Yes
RolledDoubles boolean No false
SelectedCard integer No 0
SelectedProperty integer Yes
SelectingPlayer player No PlayerNV
SellingProperty integer Yes
Squares rect Yes
TempInteger integer No 0
TempInteger2 integer No 0
TradeMenu integer Yes
UnitType unitcode Yes
This level was made in its entirety by Krash.KtS (USWest).
Notes
Events
Conditions
Actions
Command List
Events
Map initialization
Conditions
Actions
Quest - Create a Required quest titled What is Monopoly? with the description Monopoly is a classic board game originally invented during the Great Depression. If you've played the real Monopoly, you don't need to read this part.The object of monopoly is to send you opponents bankrupt. By rolling the dice and moving pieces around the board, you can purchase property. When other players land on property you own, they pay you rent money.Some properties are related to each other (the circles of power nearby will have an outer ring the same colour). When you own all properties of the same colour, you are able to build houses on them. The more houses, the more rent money people must pay you.Chance and Community Chest squares can give you money or take it away. Sometimes they will send you to another place on the board.By buying intelligently, trading property with other players, and building houses, you can send your opponents bankrupt and win the game.A typical game will last at least one hour. , using icon path Objects\InventoryItems\TreasureChest\TreasureChest.blp
Quest - Create a Optional quest titled Rules with the description The rules of Warcraft Monopoly are almost identical to the normal rules of Monopoly. Play is conducted almost entirely by typing.Altered Rules===========Any transactions between players or with the bank may be conducted at any time, regardless of what other people are doing.If you land on a property which is owned, you automatically pay the rent - the owner does not have to ask for it.You cannot strike bargains with other players which would allow you to avoid paying rent.You cannot sell Get Out of Jail Free cards, and you use them instantly upon going to jail. , using icon path Objects\InventoryItems\TreasureChest\TreasureChest.blp
Quest - Create a Required quest titled Standard Commands with the description |cffffc080Roll|r - Type roll at the beginning of your turn to roll the dice. If you land on either utility when it is owned, you will have to roll to determine the rent you must pay.|cffffc080Yes|r or |cffffc080No|r - When you are presented with the option of buying a house, you can choose whether or not to purchase it.|cffffc0801|r or |cffffc0802|r - When you land on income tax, you can choose to pay a fixed amount, or a percentage of your total assets.|cffffc080Pay|r - If you are in jail, you can choose to roll (see above), or pay for your bail.|cffffc080Bid xxxxxx|r - When a property is up for auction, you may bid by typing Bid, followed by the amount of your bid. Your bid will only register if it is above the current bid, and you have sufficient funds on hand.|cffffc080Bankrupt|r - When you can no longer continue, typing Bankrupt will transfer all assets to your creditor, and you will be allowed to continue observing. , using icon path Objects\InventoryItems\TreasureChest\TreasureChest.blp
Quest - Create a Required quest titled Trading Commands with the description |cffffc080Buy|r - Typing Buy while in trade mode will create large property selectors on the properties which you may build on. Select the property you wish to improve, and a house will be created (provided you have the funds).|cffffc080Sell|r - Typing Sell while in trade mode will create large property selectors at properties on which you may sell houses or hotels, or on property which you can sell entirely back to the bank. You do not receive any money for selling a mortgaged property.|cffffc080Mortgage|r - Typing Mortgage while in trade mode will create property selectors on properties which you may either mortgage or unmortgage.|cffffc080Private|r - Typing Private while in trade mode will begin a private transaction. Any property which is able to be sold to another player will have a property selector created.|cffffc080$xxx|r - After selecting the property to be sold, typing a dollar sign ($) followed by a number will set the asking price.|cffffc080Player x|r - After setting the asking price, typing player, followed by the number of the player you wish to sell to, will complete the offer.|cffffc080Accept|r - If you are offered to buy property from another player, or trade property with another player, typing accept will complete the transaction.|cffffc080Cancel|r - Typing Cancel at any time during trading will end your current trading session. , using icon path Objects\InventoryItems\TreasureChest\TreasureChest.blp
Quest - Create a Optional quest titled Kicking Players with the description Sometimes, a player will not roll the dice. Usually because they do not speak English, and do not understand the instructions. Sometimes, it's just because they want to be annoying.In this situation, it is possible to remove that player from the game.ONE player should type |cffffc080kickvote player X|r, where X corresponds to the number of the player you wish to remove. A voting window will then display for everyone EXCEPT the person who is to be kicked, and the person who typed the command. For a player to be kicked, EVERYONE must vote yes. If even one person votes no, the vote is cancelled. , using icon path Objects\InventoryItems\TreasureChest\TreasureChest.blp
Quest - Create a Optional quest titled Other Features with the description Reincarnation - Everything which is killable in the game will come back to life after a set duration. Feel free to destroy buildings, sink ships, or kill civillians or other heroes. They'll come back for more.Viewing the Price or Rent of a property - by clicking on the circle of power near a property, you can see the purchase price (if it is unowned) or the rent on that property - it will be displayed in the leaderboard, below everyone's scores.Auction Timer - While an auction is in progress, a timer will display which shows the time remaining until the auction is closed. Any bid will reset the timer. , using icon path Objects\InventoryItems\TreasureChest\TreasureChest.blp
Disable Resource Trading
Events
Map initialization
Conditions
Actions
Game - Set Lock resource trading to On
Define Active Players
Events
Map initialization
Conditions
Actions
Player Group - Pick every player in (All players matching ((((Matching player) slot status) Equal to Is playing) and (((Matching player) controller) Equal to User)).) and do (Add (Picked player) to ActivePlayers)
Define Chance Actions
Events
Map initialization
Conditions
Actions
Set Variable Set ChanceAction[1] = Advance_to_The_Well_of_Eternity <gen>
Set Variable Set ChanceAction[2] = Receive_150 <gen>
Set Variable Set ChanceAction[3] = Lose_25_per_house_100_per_hotel <gen>
Set Variable Set ChanceAction[4] = Advance_to_The_Violet_Citadel <gen>
Set Variable Set ChanceAction[5] = Advance_to_Go <gen>
Set Variable Set ChanceAction[6] = Lose_50_per_player <gen>
Set Variable Set ChanceAction[7] = Lose_15 <gen>
Set Variable Set ChanceAction[8] = Advance_to_Port_of_Azeroth <gen>
Set Variable Set ChanceAction[9] = Receive_50 <gen>
Set Variable Set ChanceAction[10] = Go_back_3 <gen>
Set Variable Set ChanceAction[11] = Advance_to_nearest_seaport <gen>
Set Variable Set ChanceAction[12] = Advance_to_Silvermoon <gen>
Set Variable Set ChanceAction[13] = Advance_to_nearest_utility <gen>
Set Variable Set ChanceAction[14] = Get_out_of_Jail_Free <gen>
Set Variable Set ChanceAction[15] = Go_to_Jail <gen>
Set Variable Set ChanceAction[16] = Advance_to_nearest_seaport <gen>
Define Chance Texts
Events
Time - Elapsed game time is 0.05 seconds
Conditions
Actions
Set Variable Set ChanceText[1] = (Pack your bags and start adventuring. Advance token to + PropertyName[40])
Set Variable Set ChanceText[2] = "A group of thirsty dwarves stop at your tavern. Collect $150."
Set Variable Set ChanceText[3] = "Make general repairs on all your property. For each house pay $25, for each tavern $100"
Set Variable Set ChanceText[4] = (Travel to + (PropertyName[12] + |cff80c0ffif you pass Go, collect $200.|r))
Set Variable Set ChanceText[5] = "Advance to GO. Collect $200"
Set Variable Set ChanceText[6] = "Your friends have discovered your orc fetish. Pay $50 each to keep them quiet."
Set Variable Set ChanceText[7] = "Lose $15 playing dice."
Set Variable Set ChanceText[8] = (Board a ship to + (PropertyName[6] + |cff80c0ff, collect $200 for passing Go.|r))
Set Variable Set ChanceText[9] = "You win an orcish libel case. They are heretofore known as the "humanly challenged". Collect $50."
Set Variable Set ChanceText[10] = "Go back 3 spaces."
Set Variable Set ChanceText[11] = "Run down to the nearest Sea Port and pay owner twice the rental to which he is otherwise entitled. If Sea Port is unowned, you may buy it from the bank."
Set Variable Set ChanceText[12] = (Journey to + (PropertyName[25] + |cff80c0ff. If you pass Go, collect $200.|r))
Set Variable Set ChanceText[13] = "Study at the nearest magical utility. If unowned, you may buy it from the bank. If owned, roll the dice and pay 10x the amount shown."
Set Variable Set ChanceText[14] = "Get out of jail free."
Set Variable Set ChanceText[15] = "Go directly to jail. Do not pass GO, do not collect $200"
Set Variable Set ChanceText[16] = "Advance token to the nearest Sea Port and pay owner twice the rental to which he is otherwise entitled. If Sea Port is unowned, you may buy it from the bank."
Define Community Chest Actions
Events
Map initialization
Conditions
Actions
Set Variable Set CommunityChestAction[1] = Lose_100 <gen>
Set Variable Set CommunityChestAction[2] = Receive_100 <gen>
Set Variable Set CommunityChestAction[3] = Receive_100 <gen>
Set Variable Set CommunityChestAction[4] = Receive_25 <gen>
Set Variable Set CommunityChestAction[5] = Get_out_of_Jail_Free <gen>
Set Variable Set CommunityChestAction[6] = Receive_10 <gen>
Set Variable Set CommunityChestAction[7] = Lose_150 <gen>
Set Variable Set CommunityChestAction[8] = Receive_100 <gen>
Set Variable Set CommunityChestAction[9] = Advance_to_Go <gen>
Set Variable Set CommunityChestAction[10] = Receive_50_per_player <gen>
Set Variable Set CommunityChestAction[11] = Lose_40_per_house_115_per_hotel <gen>
Set Variable Set CommunityChestAction[12] = Lose_50 <gen>
Set Variable Set CommunityChestAction[13] = Receive_45 <gen>
Set Variable Set CommunityChestAction[14] = Go_to_Jail <gen>
Set Variable Set CommunityChestAction[15] = Receive_200 <gen>
Set Variable Set CommunityChestAction[16] = Receive_20 <gen>
Define Community Chest Texts
Events
Time - Elapsed game time is 0.05 seconds
Conditions
Actions
Set Variable Set CommunityChestText[1] = "You meet an elf named Shandris at the tavern. She cures your lonliness for $100."
Set Variable Set CommunityChestText[2] = "You inherit $100"
Set Variable Set CommunityChestText[3] = "You pillage a village for $100"
Set Variable Set CommunityChestText[4] = "You're hired as a thug. Collect $25."
Set Variable Set CommunityChestText[5] = "Get out of jail free"
Set Variable Set CommunityChestText[6] = "You have won second prize in an archery tournament. Collect $10"
Set Variable Set CommunityChestText[7] = "Accepted into the Dalaran Mage's Academy. Pay $150 in tuition fees."
Set Variable Set CommunityChestText[8] = "Escort a nobleman through the forest. Collect $100."
Set Variable Set CommunityChestText[9] = "Advance to GO. Collect $200"
Set Variable Set CommunityChestText[10] = "You feel the inner voices of Bloodlust. Scare $50 out of every player."
Set Variable Set CommunityChestText[11] = "You are assessed for repairs. $40 per house, $115 per tavern."
Set Variable Set CommunityChestText[12] = "Pay the healer $50"
Set Variable Set CommunityChestText[13] = "You sold an old suit of armour for $45"
Set Variable Set CommunityChestText[14] = "Go directly to jail. Do not pass GO. Do not collect $200"
Set Variable Set CommunityChestText[15] = "Blizzard Entertainment stocks soar. Collect $200."
Set Variable Set CommunityChestText[16] = "You win a drinking competition at a local tavern. Collect $20"
Define Current Square
Events
Map initialization
Conditions
Actions
Set Variable Set CurrentSquare[1] = "1"
Set Variable Set CurrentSquare[2] = "1"
Set Variable Set CurrentSquare[3] = "1"
Set Variable Set CurrentSquare[4] = "1"
Set Variable Set CurrentSquare[5] = "1"
Set Variable Set CurrentSquare[6] = "1"
Set Variable Set CurrentSquare[7] = "1"
Set Variable Set CurrentSquare[8] = "1"
Set Variable Set CurrentSquare[9] = "1"
Set Variable Set CurrentSquare[10] = "1"
Define Debts
Events
Map initialization
Conditions
Actions
For each (Integer A) from 1 to 8 , do (Set VariableSet Debt[(Integer A)] = "0")
For each (Integer A) from 1 to 12 , do (Set VariableSet DebtCreditor[(Integer A)] = Player 12 (Brown))
For each (Integer A) from 1 to 8 , do (Set VariableSet InDebt[(Integer A)] = "false")
Define Doodads
Events
Map initialization
Conditions
Actions
Destructible - Pick every destructible in (Playable map area) and do (Run Define_Doodads_Sub_Trigger <gen> (ignoring conditions))
Define Doodads Sub Trigger
Events
Conditions
Actions
If ((Current life of (Picked destructible)) Greater than 0.00) then do (Set VariableSet DoodadArray[DoodadCount] = (Picked destructible)) else do (Do nothing)
If ((Current life of (Picked destructible)) Greater than 0.00) then do (Set VariableSet DoodadCount = (DoodadCount + 1)) else do (Do nothing)
Define Jail Roll Attempts
Events
Map initialization
Conditions
Actions
For each (Integer A) from 1 to 8 , do (Set VariableSet JailRollAttempts[(Integer A)] = "0")
Define Neutral Hostile Alliance
Events
Map initialization
Conditions
Actions
Player Group - Pick every player in ActivePlayers and do (Make Neutral Hostile treat (Picked player) as an Neutral)
Define PlayerLeft
Events
Time - Elapsed game time is 0.50 seconds
Conditions
Actions
For each (Integer A) from 1 to 8 , do (Set VariableSet PlayerLeft[(Integer A)] = "false")
Define Player Colours
Events
Map initialization
Conditions
Actions
Set Variable Set PlayerColours[1] = "|c00ff0202"
Set Variable Set PlayerColours[2] = "|c000041ff"
Set Variable Set PlayerColours[3] = "|c001be6b8"
Set Variable Set PlayerColours[4] = "|c00530080"
Set Variable Set PlayerColours[5] = "|c00fffc00"
Set Variable Set PlayerColours[8] = "|c00e55aaf"
Set Variable Set PlayerColours[10] = "|c007dbef1"
Set Variable Set PlayerColours[11] = "|c000f6145"
Define Player Order
Events
Time - Elapsed game time is 0.50 seconds
Conditions
Actions
For each (Integer A) from 1 to 8 , do (Set VariableSet PlayerOrder[(Integer A)] = (Player((Integer A))))
Define Property Building Sites
Events
Map initialization
Conditions
Actions
Set Variable Set PropertyBuildingSite[2] = 02b <gen>
Set Variable Set PropertyBuildingSite[4] = 04b <gen>
Set Variable Set PropertyBuildingSite[6] = 06b <gen>
Set Variable Set PropertyBuildingSite[7] = 07b <gen>
Set Variable Set PropertyBuildingSite[9] = 09b <gen>
Set Variable Set PropertyBuildingSite[10] = 10b <gen>
Set Variable Set PropertyBuildingSite[12] = 12b <gen>
Set Variable Set PropertyBuildingSite[13] = 13b <gen>
Set Variable Set PropertyBuildingSite[14] = 14b <gen>
Set Variable Set PropertyBuildingSite[15] = 15b <gen>
Set Variable Set PropertyBuildingSite[16] = 16b <gen>
Set Variable Set PropertyBuildingSite[17] = 17b <gen>
Set Variable Set PropertyBuildingSite[19] = 19b <gen>
Set Variable Set PropertyBuildingSite[20] = 20b <gen>
Set Variable Set PropertyBuildingSite[22] = 22b <gen>
Set Variable Set PropertyBuildingSite[24] = 24b <gen>
Set Variable Set PropertyBuildingSite[25] = 25b <gen>
Set Variable Set PropertyBuildingSite[26] = 26b <gen>
Set Variable Set PropertyBuildingSite[27] = 27b <gen>
Set Variable Set PropertyBuildingSite[28] = 28b <gen>
Set Variable Set PropertyBuildingSite[29] = 29b <gen>
Set Variable Set PropertyBuildingSite[30] = 30b <gen>
Set Variable Set PropertyBuildingSite[32] = 32b <gen>
Set Variable Set PropertyBuildingSite[33] = 33b <gen>
Set Variable Set PropertyBuildingSite[35] = 35b <gen>
Set Variable Set PropertyBuildingSite[36] = 36b <gen>
Set Variable Set PropertyBuildingSite[38] = 38b <gen>
Set Variable Set PropertyBuildingSite[40] = 40b <gen>
Define Property Counting Sites
Events
Map initialization
Conditions
Actions
Set Variable Set PropertyCountingSite[2] = 02c <gen>
Set Variable Set PropertyCountingSite[4] = 04c <gen>
Set Variable Set PropertyCountingSite[7] = 07c <gen>
Set Variable Set PropertyCountingSite[9] = 09c <gen>
Set Variable Set PropertyCountingSite[10] = 10c <gen>
Set Variable Set PropertyCountingSite[12] = 12c <gen>
Set Variable Set PropertyCountingSite[14] = 14c <gen>
Set Variable Set PropertyCountingSite[15] = 15c <gen>
Set Variable Set PropertyCountingSite[17] = 17c <gen>
Set Variable Set PropertyCountingSite[19] = 19c <gen>
Set Variable Set PropertyCountingSite[20] = 20c <gen>
Set Variable Set PropertyCountingSite[22] = 22c <gen>
Set Variable Set PropertyCountingSite[24] = 24c <gen>
Set Variable Set PropertyCountingSite[25] = 25c <gen>
Set Variable Set PropertyCountingSite[27] = 27c <gen>
Set Variable Set PropertyCountingSite[28] = 28c <gen>
Set Variable Set PropertyCountingSite[30] = 30c <gen>
Set Variable Set PropertyCountingSite[32] = 32c <gen>
Set Variable Set PropertyCountingSite[33] = 33c <gen>
Set Variable Set PropertyCountingSite[35] = 35c <gen>
Set Variable Set PropertyCountingSite[38] = 38c <gen>
Set Variable Set PropertyCountingSite[40] = 40c <gen>
Define Property Improvement Price
Events
Map initialization
Conditions
Actions
Set Variable Set PropertyImprovementPrice[2] = "50"
Set Variable Set PropertyImprovementPrice[4] = "50"
Set Variable Set PropertyImprovementPrice[7] = "50"
Set Variable Set PropertyImprovementPrice[9] = "50"
Set Variable Set PropertyImprovementPrice[10] = "50"
Set Variable Set PropertyImprovementPrice[12] = "100"
Set Variable Set PropertyImprovementPrice[14] = "100"
Set Variable Set PropertyImprovementPrice[15] = "100"
Set Variable Set PropertyImprovementPrice[17] = "100"
Set Variable Set PropertyImprovementPrice[19] = "100"
Set Variable Set PropertyImprovementPrice[20] = "100"
Set Variable Set PropertyImprovementPrice[22] = "150"
Set Variable Set PropertyImprovementPrice[24] = "150"
Set Variable Set PropertyImprovementPrice[25] = "150"
Set Variable Set PropertyImprovementPrice[27] = "150"
Set Variable Set PropertyImprovementPrice[28] = "150"
Set Variable Set PropertyImprovementPrice[30] = "150"
Set Variable Set PropertyImprovementPrice[32] = "200"
Set Variable Set PropertyImprovementPrice[33] = "200"
Set Variable Set PropertyImprovementPrice[35] = "200"
Set Variable Set PropertyImprovementPrice[38] = "200"
Set Variable Set PropertyImprovementPrice[40] = "200"
Define Property Mortgage
Events
Map initialization
Conditions
Actions
For each (Integer A) from 1 to 40 , do (Set VariableSet PropertyMortgage[(Integer A)] = "false")
Define Property Names
Events
Map initialization
Conditions
Actions
Set Variable Set PropertyName[1] = "GO"
Set Variable Set PropertyName[2] = "|cff62208bThe Dark Portal|r"
Set Variable Set PropertyName[3] = "Community Chest"
Set Variable Set PropertyName[4] = "|cff62208bBlackrock Spire|r"
Set Variable Set PropertyName[5] = "Income Tax"
Set Variable Set PropertyName[6] = "|cffb6b6b6Port of Azeroth|r"
Set Variable Set PropertyName[7] = "|cff94ceefKhaz Modan|r"
Set Variable Set PropertyName[8] = "Chance"
Set Variable Set PropertyName[9] = "|cff94ceefStormwind Keep|r"
Set Variable Set PropertyName[10] = "|cff94ceefMedivh's Tower|r"
Set Variable Set PropertyName[11] = "Just Visiting"
Set Variable Set PropertyName[12] = "|cff940884The Violet Citadel|r"
Set Variable Set PropertyName[13] = "|cffb6b6b6The Twisting Nether|r"
Set Variable Set PropertyName[14] = "|cff940884The Alterac Ruins|r"
Set Variable Set PropertyName[15] = "|cff940884Capital City|r"
Set Variable Set PropertyName[16] = "|cffb6b6b6Port of Lordaeron|r"
Set Variable Set PropertyName[17] = "|cffef8400Strahnbrad|r"
Set Variable Set PropertyName[18] = "Community Chest"
Set Variable Set PropertyName[19] = "|cffef8400Mardenholde Keep|r"
Set Variable Set PropertyName[20] = "|cffef8400Stratholme|r"
Set Variable Set PropertyName[21] = "Free Parking"
Set Variable Set PropertyName[22] = "|cffef1010The Outer Elfgate|r"
Set Variable Set PropertyName[23] = "Chance"
Set Variable Set PropertyName[24] = "|cffef1010The Inner Elfgate|r"
Set Variable Set PropertyName[25] = "|cffef1010Silvermoon|r"
Set Variable Set PropertyName[26] = "|cffb6b6b6Port of Northrend|r"
Set Variable Set PropertyName[27] = "|cffffff08The Frozen Coast|r"
Set Variable Set PropertyName[28] = "|cffffff08Draktharon Keep|r"
Set Variable Set PropertyName[29] = "|cffb6b6b6The SunWell|r"
Set Variable Set PropertyName[30] = "|cffffff08Icecrown|r"
Set Variable Set PropertyName[31] = "Go to Jail"
Set Variable Set PropertyName[32] = "|cff08a508Mulgore|r"
Set Variable Set PropertyName[33] = "|cff08a508Razorfen Downs|r"
Set Variable Set PropertyName[34] = "Community Chest"
Set Variable Set PropertyName[35] = "|cff08a508Stonetalon Peak|r"
Set Variable Set PropertyName[36] = "|cffb6b6b6Port of Kalimdor|r"
Set Variable Set PropertyName[37] = "Chance"
Set Variable Set PropertyName[38] = "|cff085aa5The Grove of Cenarius|r"
Set Variable Set PropertyName[39] = "Lamer Tax"
Set Variable Set PropertyName[40] = "|cff085aa5The Well of Eternity|r"
Define Property Owner
Events
Map initialization
Conditions
Actions
For each (Integer A) from 1 to 40 , do (Set VariableSet PropertyOwner[(Integer A)] = Player 12 (Brown))
Define Property Owner Labels
Events
Map initialization
Conditions
Actions
Set Variable Set PropertyOwnerLabel[2] = The Dark Portal 0040 <gen>
Set Variable Set PropertyOwnerLabel[4] = Blackrock Spire 0041 <gen>
Set Variable Set PropertyOwnerLabel[6] = Port of Azeroth 0042 <gen>
Set Variable Set PropertyOwnerLabel[7] = Khaz Modan 0043 <gen>
Set Variable Set PropertyOwnerLabel[9] = Stormwind Keep 0044 <gen>
Set Variable Set PropertyOwnerLabel[10] = Medivh's Tower 0045 <gen>
Set Variable Set PropertyOwnerLabel[12] = The Violet Citadel 0046 <gen>
Set Variable Set PropertyOwnerLabel[13] = The Twisting Nether 0047 <gen>
Set Variable Set PropertyOwnerLabel[14] = The Alterac Ruins 0048 <gen>
Set Variable Set PropertyOwnerLabel[15] = Capital City 0049 <gen>
Set Variable Set PropertyOwnerLabel[16] = Port of Lordaeron 0050 <gen>
Set Variable Set PropertyOwnerLabel[17] = Strahnbrad 0051 <gen>
Set Variable Set PropertyOwnerLabel[19] = Mardenholde Keep 0052 <gen>
Set Variable Set PropertyOwnerLabel[20] = Stratholme 0053 <gen>
Set Variable Set PropertyOwnerLabel[22] = The Outer Elfgate 0054 <gen>
Set Variable Set PropertyOwnerLabel[24] = The Inner Elfgate 0055 <gen>
Set Variable Set PropertyOwnerLabel[25] = Silvermoon 0056 <gen>
Set Variable Set PropertyOwnerLabel[26] = Port of Northrend 0057 <gen>
Set Variable Set PropertyOwnerLabel[27] = The Frozen Coast 0058 <gen>
Set Variable Set PropertyOwnerLabel[28] = Draktharon Keep 0059 <gen>
Set Variable Set PropertyOwnerLabel[29] = The SunWell 0060 <gen>
Set Variable Set PropertyOwnerLabel[30] = Icecrown 0061 <gen>
Set Variable Set PropertyOwnerLabel[32] = Mulgore 0062 <gen>
Set Variable Set PropertyOwnerLabel[33] = Razorfen Downs 0063 <gen>
Set Variable Set PropertyOwnerLabel[35] = Stonetalon Peak 0064 <gen>
Set Variable Set PropertyOwnerLabel[36] = Port of Kalimdor 0065 <gen>
Set Variable Set PropertyOwnerLabel[38] = The Grove of Cenarius 0066 <gen>
Set Variable Set PropertyOwnerLabel[40] = The Well of Eternity 0067 <gen>
For each (Integer A) from 1 to 40 , do (Add PropertyOwnerLabel[(Integer A)] to PropertyLabels)
Define Property Price
Events
Map initialization
Conditions
Actions
Set Variable Set PropertyPrice[2] = "60"
Set Variable Set PropertyPrice[4] = "60"
Set Variable Set PropertyPrice[6] = "200"
Set Variable Set PropertyPrice[7] = "100"
Set Variable Set PropertyPrice[9] = "100"
Set Variable Set PropertyPrice[10] = "120"
Set Variable Set PropertyPrice[12] = "140"
Set Variable Set PropertyPrice[13] = "150"
Set Variable Set PropertyPrice[14] = "140"
Set Variable Set PropertyPrice[15] = "160"
Set Variable Set PropertyPrice[16] = "200"
Set Variable Set PropertyPrice[17] = "180"
Set Variable Set PropertyPrice[19] = "180"
Set Variable Set PropertyPrice[20] = "200"
Set Variable Set PropertyPrice[22] = "220"
Set Variable Set PropertyPrice[24] = "220"
Set Variable Set PropertyPrice[25] = "240"
Set Variable Set PropertyPrice[26] = "200"
Set Variable Set PropertyPrice[27] = "260"
Set Variable Set PropertyPrice[28] = "260"
Set Variable Set PropertyPrice[29] = "150"
Set Variable Set PropertyPrice[30] = "280"
Set Variable Set PropertyPrice[32] = "300"
Set Variable Set PropertyPrice[33] = "300"
Set Variable Set PropertyPrice[35] = "320"
Set Variable Set PropertyPrice[36] = "200"
Set Variable Set PropertyPrice[38] = "350"
Set Variable Set PropertyPrice[40] = "400"
Define Property Rental Rates
Events
Map initialization
Conditions
Actions
Set Variable Set PropertyRentalRates[12] = "2"
Set Variable Set PropertyRentalRates[13] = "10"
Set Variable Set PropertyRentalRates[14] = "30"
Set Variable Set PropertyRentalRates[15] = "90"
Set Variable Set PropertyRentalRates[16] = "160"
Set Variable Set PropertyRentalRates[17] = "250"
Set Variable Set PropertyRentalRates[24] = "4"
Set Variable Set PropertyRentalRates[25] = "20"
Set Variable Set PropertyRentalRates[26] = "60"
Set Variable Set PropertyRentalRates[27] = "180"
Set Variable Set PropertyRentalRates[28] = "320"
Set Variable Set PropertyRentalRates[29] = "450"
Set Variable Set PropertyRentalRates[42] = "6"
Set Variable Set PropertyRentalRates[43] = "30"
Set Variable Set PropertyRentalRates[44] = "90"
Set Variable Set PropertyRentalRates[45] = "270"
Set Variable Set PropertyRentalRates[46] = "400"
Set Variable Set PropertyRentalRates[47] = "550"
Set Variable Set PropertyRentalRates[54] = "6"
Set Variable Set PropertyRentalRates[55] = "30"
Set Variable Set PropertyRentalRates[56] = "90"
Set Variable Set PropertyRentalRates[57] = "270"
Set Variable Set PropertyRentalRates[58] = "400"
Set Variable Set PropertyRentalRates[59] = "550"
Set Variable Set PropertyRentalRates[60] = "8"
Set Variable Set PropertyRentalRates[61] = "40"
Set Variable Set PropertyRentalRates[62] = "100"
Set Variable Set PropertyRentalRates[63] = "300"
Set Variable Set PropertyRentalRates[64] = "450"
Set Variable Set PropertyRentalRates[65] = "600"
Set Variable Set PropertyRentalRates[72] = "10"
Set Variable Set PropertyRentalRates[73] = "50"
Set Variable Set PropertyRentalRates[74] = "150"
Set Variable Set PropertyRentalRates[75] = "450"
Set Variable Set PropertyRentalRates[76] = "625"
Set Variable Set PropertyRentalRates[77] = "750"
Set Variable Set PropertyRentalRates[84] = "10"
Set Variable Set PropertyRentalRates[85] = "50"
Set Variable Set PropertyRentalRates[86] = "150"
Set Variable Set PropertyRentalRates[87] = "450"
Set Variable Set PropertyRentalRates[88] = "625"
Set Variable Set PropertyRentalRates[89] = "750"
Set Variable Set PropertyRentalRates[90] = "12"
Set Variable Set PropertyRentalRates[91] = "60"
Set Variable Set PropertyRentalRates[92] = "180"
Set Variable Set PropertyRentalRates[93] = "500"
Set Variable Set PropertyRentalRates[94] = "700"
Set Variable Set PropertyRentalRates[95] = "900"
Set Variable Set PropertyRentalRates[102] = "14"
Set Variable Set PropertyRentalRates[103] = "70"
Set Variable Set PropertyRentalRates[104] = "200"
Set Variable Set PropertyRentalRates[105] = "550"
Set Variable Set PropertyRentalRates[106] = "750"
Set Variable Set PropertyRentalRates[107] = "950"
Set Variable Set PropertyRentalRates[114] = "14"
Set Variable Set PropertyRentalRates[115] = "70"
Set Variable Set PropertyRentalRates[116] = "200"
Set Variable Set PropertyRentalRates[117] = "550"
Set Variable Set PropertyRentalRates[118] = "750"
Set Variable Set PropertyRentalRates[119] = "950"
Set Variable Set PropertyRentalRates[120] = "16"
Set Variable Set PropertyRentalRates[121] = "80"
Set Variable Set PropertyRentalRates[122] = "220"
Set Variable Set PropertyRentalRates[123] = "600"
Set Variable Set PropertyRentalRates[124] = "800"
Set Variable Set PropertyRentalRates[125] = "1000"
Set Variable Set PropertyRentalRates[132] = "18"
Set Variable Set PropertyRentalRates[133] = "90"
Set Variable Set PropertyRentalRates[134] = "250"
Set Variable Set PropertyRentalRates[135] = "700"
Set Variable Set PropertyRentalRates[136] = "875"
Set Variable Set PropertyRentalRates[137] = "1050"
Set Variable Set PropertyRentalRates[144] = "18"
Set Variable Set PropertyRentalRates[145] = "90"
Set Variable Set PropertyRentalRates[146] = "250"
Set Variable Set PropertyRentalRates[147] = "700"
Set Variable Set PropertyRentalRates[148] = "875"
Set Variable Set PropertyRentalRates[149] = "1050"
Set Variable Set PropertyRentalRates[150] = "20"
Set Variable Set PropertyRentalRates[151] = "100"
Set Variable Set PropertyRentalRates[152] = "300"
Set Variable Set PropertyRentalRates[153] = "750"
Set Variable Set PropertyRentalRates[154] = "925"
Set Variable Set PropertyRentalRates[155] = "1100"
Set Variable Set PropertyRentalRates[162] = "22"
Set Variable Set PropertyRentalRates[163] = "110"
Set Variable Set PropertyRentalRates[164] = "330"
Set Variable Set PropertyRentalRates[165] = "800"
Set Variable Set PropertyRentalRates[166] = "975"
Set Variable Set PropertyRentalRates[167] = "1150"
Set Variable Set PropertyRentalRates[168] = "22"
Set Variable Set PropertyRentalRates[169] = "110"
Set Variable Set PropertyRentalRates[170] = "330"
Set Variable Set PropertyRentalRates[171] = "800"
Set Variable Set PropertyRentalRates[172] = "975"
Set Variable Set PropertyRentalRates[173] = "1150"
Set Variable Set PropertyRentalRates[180] = "22"
Set Variable Set PropertyRentalRates[181] = "120"
Set Variable Set PropertyRentalRates[182] = "360"
Set Variable Set PropertyRentalRates[183] = "850"
Set Variable Set PropertyRentalRates[184] = "1025"
Set Variable Set PropertyRentalRates[185] = "1200"
Set Variable Set PropertyRentalRates[192] = "26"
Set Variable Set PropertyRentalRates[193] = "130"
Set Variable Set PropertyRentalRates[194] = "390"
Set Variable Set PropertyRentalRates[195] = "900"
Set Variable Set PropertyRentalRates[196] = "1100"
Set Variable Set PropertyRentalRates[197] = "1275"
Set Variable Set PropertyRentalRates[198] = "26"
Set Variable Set PropertyRentalRates[199] = "130"
Set Variable Set PropertyRentalRates[200] = "390"
Set Variable Set PropertyRentalRates[201] = "900"
Set Variable Set PropertyRentalRates[202] = "1100"
Set Variable Set PropertyRentalRates[203] = "1275"
Set Variable Set PropertyRentalRates[210] = "28"
Set Variable Set PropertyRentalRates[211] = "150"
Set Variable Set PropertyRentalRates[212] = "450"
Set Variable Set PropertyRentalRates[213] = "1000"
Set Variable Set PropertyRentalRates[214] = "1200"
Set Variable Set PropertyRentalRates[215] = "1400"
Set Variable Set PropertyRentalRates[228] = "35"
Set Variable Set PropertyRentalRates[229] = "175"
Set Variable Set PropertyRentalRates[230] = "500"
Set Variable Set PropertyRentalRates[231] = "1100"
Set Variable Set PropertyRentalRates[232] = "1300"
Set Variable Set PropertyRentalRates[233] = "1500"
Set Variable Set PropertyRentalRates[240] = "50"
Set Variable Set PropertyRentalRates[241] = "200"
Set Variable Set PropertyRentalRates[242] = "600"
Set Variable Set PropertyRentalRates[243] = "1400"
Set Variable Set PropertyRentalRates[244] = "1700"
Set Variable Set PropertyRentalRates[245] = "2000"
Define Property Types
Events
Map initialization
Conditions
Actions
Set Variable Set PropertyType[1] = "0"
Set Variable Set PropertyType[2] = "1"
Set Variable Set PropertyType[3] = "11"
Set Variable Set PropertyType[4] = "1"
Set Variable Set PropertyType[5] = "21"
Set Variable Set PropertyType[6] = "9"
Set Variable Set PropertyType[7] = "2"
Set Variable Set PropertyType[8] = "12"
Set Variable Set PropertyType[9] = "2"
Set Variable Set PropertyType[10] = "2"
Set Variable Set PropertyType[11] = "0"
Set Variable Set PropertyType[12] = "3"
Set Variable Set PropertyType[13] = "10"
Set Variable Set PropertyType[14] = "3"
Set Variable Set PropertyType[15] = "3"
Set Variable Set PropertyType[16] = "9"
Set Variable Set PropertyType[17] = "4"
Set Variable Set PropertyType[18] = "11"
Set Variable Set PropertyType[19] = "4"
Set Variable Set PropertyType[20] = "4"
Set Variable Set PropertyType[21] = "0"
Set Variable Set PropertyType[22] = "5"
Set Variable Set PropertyType[23] = "12"
Set Variable Set PropertyType[24] = "5"
Set Variable Set PropertyType[25] = "5"
Set Variable Set PropertyType[26] = "9"
Set Variable Set PropertyType[27] = "6"
Set Variable Set PropertyType[28] = "6"
Set Variable Set PropertyType[29] = "10"
Set Variable Set PropertyType[30] = "6"
Set Variable Set PropertyType[31] = "0"
Set Variable Set PropertyType[32] = "7"
Set Variable Set PropertyType[33] = "7"
Set Variable Set PropertyType[34] = "11"
Set Variable Set PropertyType[35] = "7"
Set Variable Set PropertyType[36] = "9"
Set Variable Set PropertyType[37] = "12"
Set Variable Set PropertyType[38] = "8"
Set Variable Set PropertyType[39] = "22"
Set Variable Set PropertyType[40] = "8"
Define Squares
Events
Map initialization
Conditions
Actions
Set Variable Set Squares[1] = 01_Go <gen>
Set Variable Set Squares[2] = 02_Old_Kent_Road <gen>
Set Variable Set Squares[3] = 03_Community_Chest <gen>
Set Variable Set Squares[4] = 04_Whitechapel_Road <gen>
Set Variable Set Squares[5] = 05_Income_Tax <gen>
Set Variable Set Squares[6] = 06_Kings_Cross_Station <gen>
Set Variable Set Squares[7] = 07_The_Angel_Islington <gen>
Set Variable Set Squares[8] = 08_Chance <gen>
Set Variable Set Squares[9] = 09_Euston_Road <gen>
Set Variable Set Squares[10] = 10_Pentonville_Road <gen>
Set Variable Set Squares[11] = 11_Just_Visiting <gen>
Set Variable Set Squares[12] = 12_Pall_Mall <gen>
Set Variable Set Squares[13] = 13_Electric_Company <gen>
Set Variable Set Squares[14] = 14_Whitehall <gen>
Set Variable Set Squares[15] = 15_Northumberland_Avenue <gen>
Set Variable Set Squares[16] = 16_Marylebone_Station <gen>
Set Variable Set Squares[17] = 17_Bow_Street <gen>
Set Variable Set Squares[18] = 18_Community_Chest <gen>
Set Variable Set Squares[19] = 19_Malborough_Street <gen>
Set Variable Set Squares[20] = 20_Vine_Street <gen>
Set Variable Set Squares[21] = 21_Free_Parking <gen>
Set Variable Set Squares[22] = 22_Strand <gen>
Set Variable Set Squares[23] = 23_Chance <gen>
Set Variable Set Squares[24] = 24_Fleet_Street <gen>
Set Variable Set Squares[25] = 25_Trafalgar_Square <gen>
Set Variable Set Squares[26] = 26_Fenchurch_St_Station <gen>
Set Variable Set Squares[27] = 27_Leicester_Square <gen>
Set Variable Set Squares[28] = 28_Coventry_Street <gen>
Set Variable Set Squares[29] = 29_Water_Works <gen>
Set Variable Set Squares[30] = 30_Piccadilly <gen>
Set Variable Set Squares[31] = 31_Go_To_Jail <gen>
Set Variable Set Squares[32] = 32_Regent_Street <gen>
Set Variable Set Squares[33] = 33_Oxford_Street <gen>
Set Variable Set Squares[34] = 34_Community_Chest <gen>
Set Variable Set Squares[35] = 35_Bond_Street <gen>
Set Variable Set Squares[36] = 36_Liverpool_St_Station <gen>
Set Variable Set Squares[37] = 37_Chance <gen>
Set Variable Set Squares[38] = 38_Park_Lane <gen>
Set Variable Set Squares[39] = 39_Super_Tax <gen>
Set Variable Set Squares[40] = 40_Mayfair <gen>
Define Timer Window
Events
Time - Elapsed game time is 0.01 seconds
Conditions
Actions
Countdown Timer - Create a timer window for AuctionTimer with title Auction Time:
Set Variable Set AuctionTimerWindow = (Last created timer window)
Countdown Timer - Hide AuctionTimerWindow
Define Trade Menus
Events
Map initialization
Conditions
Actions
For each (Integer A) from 1 to 8 , do (Set VariableSet TradeMenu[(Integer A)] = "0")
Define Units
Events
Map initialization
Conditions
Actions
Set Variable Set UnitType[1] = "Hpal"
Set Variable Set UnitType[2] = "Hamg"
Set Variable Set UnitType[3] = "Hmkg"
Set Variable Set UnitType[4] = "Obla"
Set Variable Set UnitType[5] = "Ofar"
Set Variable Set UnitType[6] = "Otch"
Set Variable Set UnitType[7] = "Udea"
Set Variable Set UnitType[8] = "Ulic"
Set Variable Set UnitType[9] = "Udre"
Set Variable Set UnitType[10] = "Ekee"
Set Variable Set UnitType[11] = "Emoo"
Set Variable Set UnitType[12] = "Edem"
Enable Triggers
Events
Time - Elapsed game time is 10.00 seconds
Conditions
Actions
Trigger - Turn on Player_1_Leaves <gen>
Trigger - Turn on Player_2_Leaves <gen>
Trigger - Turn on Player_3_Leaves <gen>
Trigger - Turn on Player_4_Leaves <gen>
Trigger - Turn on Player_5_Leaves <gen>
Trigger - Turn on Player_6_Leaves <gen>
Trigger - Turn on Player_7_Leaves <gen>
Trigger - Turn on Player_8_Leaves <gen>
Trigger - Turn on Declare_Bankrupt <gen>
Trigger - Turn on Bankruptcy <gen>
Trigger - Turn on Winning <gen>
Remove Fog of War
Events
Time - Elapsed game time is 0.10 seconds
Conditions
Actions
Visibility - Disable fog of war
Visibility - Disable black mask
Give Money
Events
Map initialization
Conditions
Actions
Player Group - Pick every player in ActivePlayers and do (Set (Picked player).Current gold to 1500)
Create Units
Events
Time - Elapsed game time is 0.10 seconds
Conditions
Actions
Player Group - Pick every player in ActivePlayers and do (Create 1.UnitType[(Random integer number between 1 and 12)] for (Picked player) at (Random point in 01_Go <gen>) facing 180.00 degrees)
Unit Group - Pick every unit in (Units in (Playable map area) matching (((Matching unit) is A Hero) Equal to True)) and do (Set (Picked unit) Hero-level to 10, Hide level-up graphics)
Move Cameras
Events
Time - Elapsed game time is 0.15 seconds
Conditions
Actions
Player Group - Pick every player in ActivePlayers and do (Pan camera for (Picked player) to (Position of (Random unit from (Units owned by (Picked player) matching ((Unit-type of (Matching unit)) Not equal to House).))) over 0 seconds)
Create Leaderboard
Events
Time - Elapsed game time is 1.00 seconds
Conditions
Actions
Leaderboard - Create a leaderboard for Player Group - Player 1 (Red) titled Cash on Hand
Set Variable Set LeaderBoardArray[1] = (Last created leaderboard)
Leaderboard - Create a leaderboard for Player Group - Player 2 (Blue) titled Cash on Hand
Set Variable Set LeaderBoardArray[2] = (Last created leaderboard)
Leaderboard - Create a leaderboard for Player Group - Player 3 (Teal) titled Cash on Hand
Set Variable Set LeaderBoardArray[3] = (Last created leaderboard)
Leaderboard - Create a leaderboard for Player Group - Player 4 (Purple) titled Cash on Hand
Set Variable Set LeaderBoardArray[4] = (Last created leaderboard)
Leaderboard - Create a leaderboard for Player Group - Player 5 (Yellow) titled Cash on Hand
Set Variable Set LeaderBoardArray[5] = (Last created leaderboard)
Leaderboard - Create a leaderboard for Player Group - Player 6 (Orange) titled Cash on Hand
Set Variable Set LeaderBoardArray[6] = (Last created leaderboard)
Leaderboard - Create a leaderboard for Player Group - Player 7 (Green) titled Cash on Hand
Set Variable Set LeaderBoardArray[7] = (Last created leaderboard)
Leaderboard - Create a leaderboard for Player Group - Player 8 (Pink) titled Cash on Hand
Set Variable Set LeaderBoardArray[8] = (Last created leaderboard)
For each (Integer A) from 1 to 8 , do (Pick every player in ActivePlayers and do (Add (Picked player) to LeaderBoardArray[(Integer A)] with label (|cffffffff + ((String((Player number of (Picked player)))) + ( - |r + (Name of (Picked player))))) and value ((Picked player) Current gold)))
For each (Integer A) from 1 to 8 , do (Show LeaderBoardArray[(Integer A)])
Update Leaderboard
Events
Time - Every 2.00 seconds of game time
Conditions
Actions
For each (Integer A) from 1 to 8 , do (Pick every player in ActivePlayers and do (If (InDebt[(Player number of (Picked player))] Equal to False) then do (Change the value for (Picked player) in LeaderBoardArray[(Integer A)] to ((Picked player) Current gold)) else do (Do nothing)))
Choose Starting Player
Events
Time - Elapsed game time is 1.00 seconds
Conditions
Actions
Set Variable Set CurrentTurn = (Random integer number between 1 and (Number of players in ActivePlayers))
Unit Group - Pick every unit in (Units in (Playable map area) matching (((Matching unit) is A Hero) Equal to True)) and do (If ((Owner of (Picked unit)) Equal to PlayerOrder[CurrentTurn]) then do (Change (Picked unit)'s size to (200.00%, 200.00%, 200.00%) of its original size) else do (Do nothing))
Unit Group - Pick every unit in (Units in (Playable map area) matching (((Matching unit) is A Hero) Equal to True)) and do (If ((Owner of (Picked unit)) Equal to PlayerOrder[CurrentTurn]) then do (Create a special effect attached to the overhead (Unexpected type: 'attachpoint') of (Picked unit) using Abilities\Spells\human\innerfire\innerfiretarget.mdx) else do (Do nothing))
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: You get the first turn!Type |cffffc080roll|r to begin your turn.
Alter PlayerLeft
Events
Time - Elapsed game time is 1.00 seconds
Conditions
Actions
For each (Integer A) from 1 to 8 , do (If (((Player((Integer A))) slot status) Not equal to Is playing) then do (Set VariableSet PlayerLeft[(Integer A)] = "true") else do (Do nothing))
Prompt to roll
Events
Time - Every 10.00 seconds of game time
Conditions
AllowRoll Equal to True
Actions
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: Type |cffffc080roll|r to begin your turn.
Next Turn
Events
Conditions
Actions
Unit Group - Pick every unit in (Units in (Playable map area) matching (((Matching unit) is A Hero) Equal to True)) and do (Change (Picked unit)'s size to (100%, 100%, 100%) of its original size)
Special Effect - Destroy (Last created special effect)
Wait 0.50 seconds
If (CurrentTurn Equal to (Number of players in ActivePlayers)) then do (Set VariableSet CurrentTurn = "1") else do (Set VariableSet CurrentTurn = (CurrentTurn + 1))
If (PlayerLeft[CurrentTurn] Equal to True) then do (Run Next_Turn <gen> (ignoring conditions)) else do (Do nothing)
If (PlayerLeft[CurrentTurn] Equal to True) then do (Skip remaining actions) else do (Do nothing)
Set Variable Set AllowRoll = "false"
Set Variable Set AllowJailRoll = "false"
Set Variable Set AllowUtilityRoll = "false"
Set Variable Set PayDouble = "false"
Set Variable Set DoublesCount = "0"
Unit Group - Pick every unit in (Units in (Playable map area) matching (((Matching unit) is A Hero) Equal to True)) and do (If ((Owner of (Picked unit)) Equal to PlayerOrder[CurrentTurn]) then do (Change (Picked unit)'s size to (200.00%, 200.00%, 200.00%) of its original size) else do (Do nothing))
Unit Group - Pick every unit in (Units in (Playable map area) matching (((Matching unit) is A Hero) Equal to True)) and do (If ((Owner of (Picked unit)) Equal to PlayerOrder[CurrentTurn]) then do (Create a special effect attached to the overhead (Unexpected type: 'attachpoint') of (Picked unit) using Abilities\Spells\human\innerfire\innerfiretarget.mdx) else do (Do nothing))
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: It's your turn!
If (CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] Equal to 41) then do (Set VariableSet AllowJailRoll = "true") else do (Set VariableSet AllowRoll = "true")
Another Turn
Events
Conditions
Actions
Set Variable Set AllowRoll = "true"
Set Variable Set PayDouble = "false"
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: You rolled doubles, and get another turn!
Passing Go
Events
Unit - A unit enters 01_Go <gen>
Conditions
Moving Equal to (Player number of (Owner of (Triggering unit)))
PassedGo Equal to False
Actions
Player - Add 200 to PlayerOrder[CurrentTurn] . Current gold
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: You receive $200 for passing Go!
Game - Display to (All players matching ((Matching player) Not equal to PlayerOrder[CurrentTurn]).) the text: ((Name of (Owner of (Triggering unit))) + receives $200 for passing Go!)
Set Variable Set PassedGo = "true"
Roll Dice Movement
Events
Player - Player 1 (Red) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Conditions
AllowRoll Equal to True
(Triggering player) Equal to PlayerOrder[CurrentTurn]
Actions
Set Variable Set PayDouble = "false"
Set Variable Set AllowRoll = "false"
Set Variable Set Dice1 = (Random integer number between 1 and 6)
Set Variable Set Dice2 = (Random integer number between 1 and 6)
If (Dice1 Equal to Dice2) then do (Set VariableSet RolledDoubles = "true") else do (Set VariableSet RolledDoubles = "false")
If (RolledDoubles Equal to True) then do (Set VariableSet DoublesCount = (DoublesCount + 1)) else do (Set VariableSet DoublesCount = "0")
Set Variable Set NumberRolled = (Dice1 + Dice2)
Cinematic - Clear the screen of text messages for (Player group(PlayerOrder[CurrentTurn])) .
Game - Display to (All players matching ((Matching player) Not equal to PlayerOrder[CurrentTurn]).) the text: ((Name of PlayerOrder[CurrentTurn]) + ( has rolled a + ((String(Dice1)) + ( and a + ((String(Dice2)) + !)))))
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You + (have rolled a + ((String(Dice1)) + ( and a + ((String(Dice2)) + !)))))
If (DoublesCount Equal to 3) then do (Display to (Player group(PlayerOrder[CurrentTurn])) the text: You have rolled 3 doubles in a row!Go Directly to Jail.Do not pass Go.Do not collect $200.) else do (Do nothing)
If (DoublesCount Equal to 3) then do (Display to (All players matching ((Matching player) Not equal to PlayerOrder[CurrentTurn]).) the text: ((Name of PlayerOrder[CurrentTurn]) + has rolled 3 doubles in a row, and has been sent to Jail.)) else do (Do nothing)
If (DoublesCount Less than 3) then do (Run Start_Movement <gen> (ignoring conditions)) else do (Run Go_to_Jail <gen> (ignoring conditions))
Start Movement
Events
Conditions
Actions
Wait 0.10 seconds
If ((Squares[((CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] mod 40) + 1)] contains (Random unit from (Units owned by PlayerOrder[CurrentTurn] matching (((Matching unit) is A Hero) Equal to True).))) Equal to True) then do (Move (Random unit from (Units owned by PlayerOrder[CurrentTurn] matching (((Matching unit) is A Hero) Equal to True).)) instantly to (Center of (Playable map area))) else do (Do nothing)
Unit - Move (Random unit from (Units owned by PlayerOrder[CurrentTurn] matching (((Matching unit) is A Hero) Equal to True).)) instantly to (Center of Squares[((CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] mod 40) + 1)])
If ((CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] + NumberRolled) Greater than or equal to 41) then do (Set VariableSet PassedGo = "false") else do (Set VariableSet PassedGo = "true")
Set Variable Set CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] = (1 + (CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] mod 40))
Set Variable Set NumberRolled = (NumberRolled - 1)
Set Variable Set Moving = (Player number of PlayerOrder[CurrentTurn])
Continue Movement
Events
Unit - A unit enters 01_Go <gen>
Unit - A unit enters 02_Old_Kent_Road <gen>
Unit - A unit enters 03_Community_Chest <gen>
Unit - A unit enters 04_Whitechapel_Road <gen>
Unit - A unit enters 05_Income_Tax <gen>
Unit - A unit enters 06_Kings_Cross_Station <gen>
Unit - A unit enters 07_The_Angel_Islington <gen>
Unit - A unit enters 08_Chance <gen>
Unit - A unit enters 09_Euston_Road <gen>
Unit - A unit enters 10_Pentonville_Road <gen>
Unit - A unit enters 11_Just_Visiting <gen>
Unit - A unit enters 12_Pall_Mall <gen>
Unit - A unit enters 13_Electric_Company <gen>
Unit - A unit enters 14_Whitehall <gen>
Unit - A unit enters 15_Northumberland_Avenue <gen>
Unit - A unit enters 16_Marylebone_Station <gen>
Unit - A unit enters 17_Bow_Street <gen>
Unit - A unit enters 18_Community_Chest <gen>
Unit - A unit enters 19_Malborough_Street <gen>
Unit - A unit enters 20_Vine_Street <gen>
Unit - A unit enters 21_Free_Parking <gen>
Unit - A unit enters 22_Strand <gen>
Unit - A unit enters 23_Chance <gen>
Unit - A unit enters 24_Fleet_Street <gen>
Unit - A unit enters 25_Trafalgar_Square <gen>
Unit - A unit enters 26_Fenchurch_St_Station <gen>
Unit - A unit enters 27_Leicester_Square <gen>
Unit - A unit enters 28_Coventry_Street <gen>
Unit - A unit enters 29_Water_Works <gen>
Unit - A unit enters 30_Piccadilly <gen>
Unit - A unit enters 31_Go_To_Jail <gen>
Unit - A unit enters 32_Regent_Street <gen>
Unit - A unit enters 33_Oxford_Street <gen>
Unit - A unit enters 34_Community_Chest <gen>
Unit - A unit enters 35_Bond_Street <gen>
Unit - A unit enters 36_Liverpool_St_Station <gen>
Unit - A unit enters 37_Chance <gen>
Unit - A unit enters 38_Park_Lane <gen>
Unit - A unit enters 39_Super_Tax <gen>
Unit - A unit enters 40_Mayfair <gen>
Conditions
(Owner of (Entering unit)) Equal to PlayerOrder[CurrentTurn]
Moving Equal to (Player number of (Owner of (Entering unit)))
NumberRolled Greater than 0
((Entering unit) is A Hero) Equal to True
Actions
Wait 0.10 seconds
Unit - Move (Random unit from (Units owned by PlayerOrder[CurrentTurn] matching (((Matching unit) is A Hero) Equal to True).)) instantly to (Center of Squares[((CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] mod 40) + 1)])
Set Variable Set Moving = (Player number of (Owner of (Entering unit)))
Set Variable Set NumberRolled = (NumberRolled - 1)
Set Variable Set CurrentSquare[(Player number of (Owner of (Entering unit)))] = (1 + (CurrentSquare[(Player number of (Owner of (Entering unit)))] mod 40))
End Movement
Events
Unit - A unit enters 01_Go <gen>
Unit - A unit enters 02_Old_Kent_Road <gen>
Unit - A unit enters 03_Community_Chest <gen>
Unit - A unit enters 04_Whitechapel_Road <gen>
Unit - A unit enters 05_Income_Tax <gen>
Unit - A unit enters 06_Kings_Cross_Station <gen>
Unit - A unit enters 07_The_Angel_Islington <gen>
Unit - A unit enters 08_Chance <gen>
Unit - A unit enters 09_Euston_Road <gen>
Unit - A unit enters 10_Pentonville_Road <gen>
Unit - A unit enters 11_Just_Visiting <gen>
Unit - A unit enters 12_Pall_Mall <gen>
Unit - A unit enters 13_Electric_Company <gen>
Unit - A unit enters 14_Whitehall <gen>
Unit - A unit enters 15_Northumberland_Avenue <gen>
Unit - A unit enters 16_Marylebone_Station <gen>
Unit - A unit enters 17_Bow_Street <gen>
Unit - A unit enters 18_Community_Chest <gen>
Unit - A unit enters 19_Malborough_Street <gen>
Unit - A unit enters 20_Vine_Street <gen>
Unit - A unit enters 21_Free_Parking <gen>
Unit - A unit enters 22_Strand <gen>
Unit - A unit enters 23_Chance <gen>
Unit - A unit enters 24_Fleet_Street <gen>
Unit - A unit enters 25_Trafalgar_Square <gen>
Unit - A unit enters 26_Fenchurch_St_Station <gen>
Unit - A unit enters 27_Leicester_Square <gen>
Unit - A unit enters 28_Coventry_Street <gen>
Unit - A unit enters 29_Water_Works <gen>
Unit - A unit enters 30_Piccadilly <gen>
Unit - A unit enters 31_Go_To_Jail <gen>
Unit - A unit enters 32_Regent_Street <gen>
Unit - A unit enters 33_Oxford_Street <gen>
Unit - A unit enters 34_Community_Chest <gen>
Unit - A unit enters 35_Bond_Street <gen>
Unit - A unit enters 36_Liverpool_St_Station <gen>
Unit - A unit enters 37_Chance <gen>
Unit - A unit enters 38_Park_Lane <gen>
Unit - A unit enters 39_Super_Tax <gen>
Unit - A unit enters 40_Mayfair <gen>
Conditions
(Owner of (Triggering unit)) Equal to PlayerOrder[CurrentTurn]
Moving Equal to (Player number of (Owner of (Entering unit)))
NumberRolled Equal to 0
((Entering unit) is A Hero) Equal to True
Actions
Game - Display to (All players matching ((Owner of (Entering unit)) Equal to (Matching player)).) the text: ((You have landed on + PropertyName[CurrentSquare[(Player number of (Owner of (Entering unit)))]]) + !)
Game - Display to (All players matching ((Owner of (Entering unit)) Not equal to (Matching player)).) the text: ((((Name of (Owner of (Entering unit))) + has landed on ) + PropertyName[CurrentSquare[(Player number of (Owner of (Entering unit)))]]) + !)
If (CurrentSquare[(Player number of (Owner of (Entering unit)))] Equal to 31) then do (Display to (All players matching ((Owner of (Entering unit)) Equal to (Matching player)).) the text: Go directly to Jail.Do not pass Go.Do not collect $200.) else do (Do nothing)
If (CurrentSquare[(Player number of (Owner of (Entering unit)))] Equal to 31) then do (Display to (All players matching ((Owner of (Entering unit)) Not equal to (Matching player)).) the text: ((Name of (Owner of (Entering unit))) + has been sent to jail!)) else do (Do nothing)
If (CurrentSquare[(Player number of (Owner of (Entering unit)))] Equal to 31) then do (Run Go_to_Jail <gen> (ignoring conditions)) else do (Do nothing)
If (CurrentSquare[(Player number of (Owner of (Entering unit)))] Equal to 1) then do (Run Passing_Go <gen> (ignoring conditions)) else do (Do nothing)
Set Variable Set Moving = "0"
If (((CurrentSquare[(Player number of (Owner of (Entering unit)))] mod 10) Not equal to 1) and (PropertyType[CurrentSquare[(Player number of (Owner of (Entering unit)))]] Less than or equal to 10)) then do (Run BuyRent_Course_of_Action <gen> (ignoring conditions)) else do (Do nothing)
If (PropertyType[CurrentSquare[(Player number of (Owner of (Entering unit)))]] Equal to 11) then do (Run Community_Chest_Init <gen> (ignoring conditions)) else do (Do nothing)
If (PropertyType[CurrentSquare[(Player number of (Owner of (Entering unit)))]] Equal to 12) then do (Run Chance_Init <gen> (ignoring conditions)) else do (Do nothing)
If (PropertyType[CurrentSquare[(Player number of (Owner of (Entering unit)))]] Equal to 21) then do (Run Income_Tax_Init <gen> (ignoring conditions)) else do (Do nothing)
If (PropertyType[CurrentSquare[(Player number of (Owner of (Entering unit)))]] Equal to 22) then do (Run Lamer_Tax <gen> (ignoring conditions)) else do (Do nothing)
If (((CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] mod 10) Equal to 1) and (CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] Not equal to 41)) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Do nothing)
Start Movement Backwards
Events
Conditions
Actions
Wait 0.10 seconds
Unit - Move (Random unit from (Units owned by PlayerOrder[CurrentTurn] matching (((Matching unit) is A Hero) Equal to True).)) instantly to (Center of Squares[((CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] mod 40) - 1)])
Set Variable Set Moving = (Player number of PlayerOrder[CurrentTurn])
Set Variable Set CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] = ((CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] mod 40) - 1)
Set Variable Set NumberRolled = (NumberRolled + 1)
Continue Movement Backwards
Events
Unit - A unit enters 01_Go <gen>
Unit - A unit enters 02_Old_Kent_Road <gen>
Unit - A unit enters 03_Community_Chest <gen>
Unit - A unit enters 04_Whitechapel_Road <gen>
Unit - A unit enters 05_Income_Tax <gen>
Unit - A unit enters 06_Kings_Cross_Station <gen>
Unit - A unit enters 07_The_Angel_Islington <gen>
Unit - A unit enters 08_Chance <gen>
Unit - A unit enters 09_Euston_Road <gen>
Unit - A unit enters 10_Pentonville_Road <gen>
Unit - A unit enters 11_Just_Visiting <gen>
Unit - A unit enters 12_Pall_Mall <gen>
Unit - A unit enters 13_Electric_Company <gen>
Unit - A unit enters 14_Whitehall <gen>
Unit - A unit enters 15_Northumberland_Avenue <gen>
Unit - A unit enters 16_Marylebone_Station <gen>
Unit - A unit enters 17_Bow_Street <gen>
Unit - A unit enters 18_Community_Chest <gen>
Unit - A unit enters 19_Malborough_Street <gen>
Unit - A unit enters 20_Vine_Street <gen>
Unit - A unit enters 21_Free_Parking <gen>
Unit - A unit enters 22_Strand <gen>
Unit - A unit enters 23_Chance <gen>
Unit - A unit enters 24_Fleet_Street <gen>
Unit - A unit enters 25_Trafalgar_Square <gen>
Unit - A unit enters 26_Fenchurch_St_Station <gen>
Unit - A unit enters 27_Leicester_Square <gen>
Unit - A unit enters 28_Coventry_Street <gen>
Unit - A unit enters 29_Water_Works <gen>
Unit - A unit enters 30_Piccadilly <gen>
Unit - A unit enters 31_Go_To_Jail <gen>
Unit - A unit enters 32_Regent_Street <gen>
Unit - A unit enters 33_Oxford_Street <gen>
Unit - A unit enters 34_Community_Chest <gen>
Unit - A unit enters 35_Bond_Street <gen>
Unit - A unit enters 36_Liverpool_St_Station <gen>
Unit - A unit enters 37_Chance <gen>
Unit - A unit enters 38_Park_Lane <gen>
Unit - A unit enters 39_Super_Tax <gen>
Unit - A unit enters 40_Mayfair <gen>
Conditions
(Owner of (Triggering unit)) Equal to PlayerOrder[CurrentTurn]
Moving Equal to (Player number of (Owner of (Entering unit)))
NumberRolled Less than 0
((Entering unit) is A Hero) Equal to True
Actions
Wait 0.10 seconds
Unit - Move (Random unit from (Units owned by PlayerOrder[CurrentTurn] matching (((Matching unit) is A Hero) Equal to True).)) instantly to (Center of Squares[((CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] mod 40) - 1)])
Set Variable Set Moving = (Player number of (Owner of (Entering unit)))
Set Variable Set NumberRolled = (NumberRolled + 1)
Set Variable Set CurrentSquare[(Player number of (Owner of (Entering unit)))] = ((CurrentSquare[(Player number of (Owner of (Entering unit)))] mod 40) - 1)
Prompt to Roll or Pay
Events
Time - Every 10.00 seconds of game time
Conditions
AllowJailRoll Equal to True
Actions
Game - Display to (Player group(PlayerOrder[CurrentTurn])) for 9.00 seconds the text: You may attempt to |cffffc080Roll|r doubles, or |cffffc080Pay|r $50 bail.|cffffc080Roll|r or |cffffc080Pay|r?
Jail Roll
Events
Player - Player 1 (Red) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Conditions
(Triggering player) Equal to PlayerOrder[CurrentTurn]
AllowJailRoll Equal to True
Actions
Set Variable Set AllowJailRoll = "false"
Set Variable Set Dice1 = (Random integer number between 1 and 6)
Set Variable Set Dice2 = (Random integer number between 1 and 6)
Set Variable Set NumberRolled = (Dice1 + Dice2)
Set Variable Set JailRollAttempts[(Player number of PlayerOrder[CurrentTurn])] = (JailRollAttempts[(Player number of PlayerOrder[CurrentTurn])] + 1)
Cinematic - Clear the screen of text messages for (Player group(PlayerOrder[CurrentTurn])) .
Game - Display to (All players matching ((Matching player) Not equal to PlayerOrder[CurrentTurn]).) the text: ((Name of PlayerOrder[CurrentTurn]) + ( has rolled a + ((String(Dice1)) + ( and a + ((String(Dice2)) + !)))))
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You + (have rolled a + ((String(Dice1)) + ( and a + ((String(Dice2)) + !)))))
If (JailRollAttempts[(Player number of PlayerOrder[CurrentTurn])] Equal to 3) then do (Add -50 to PlayerOrder[CurrentTurn].Current gold) else do (Do nothing)
If (JailRollAttempts[(Player number of PlayerOrder[CurrentTurn])] Equal to 3) then do (Display to (Player group(PlayerOrder[CurrentTurn])) the text: You are forced to pay $50 bail.) else do (Do nothing)
If (JailRollAttempts[(Player number of PlayerOrder[CurrentTurn])] Equal to 3) then do (Display to (All players matching ((Matching player) Not equal to PlayerOrder[CurrentTurn]).) the text: ((Name of PlayerOrder[CurrentTurn]) + has been forced to pay $50 bail.)) else do (Do nothing)
If ((Dice1 Equal to Dice2) or (JailRollAttempts[(Player number of PlayerOrder[CurrentTurn])] Equal to 3)) then do (Run Leave_Jail <gen> (ignoring conditions)) else do (Run Stay_in_Jail <gen> (ignoring conditions))
Jail Pay Bail
Events
Player - Player 1 (Red) types a chat message containing pay (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing pay (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing pay (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing pay (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing pay (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing pay (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing pay (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing pay (Unexpected type: 'stringnoformat') as An exact match
Conditions
(Triggering player) Equal to PlayerOrder[CurrentTurn]
((Triggering player) Current gold) Greater than or equal to 50
AllowJailRoll Equal to True
Actions
Set Variable Set AllowJailRoll = "false"
Set Variable Set CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] = "11"
Player - Add -50 to PlayerOrder[CurrentTurn] . Current gold
Unit - Move (Random unit from (Units owned by PlayerOrder[CurrentTurn] matching (((Matching unit) is A Hero) Equal to True).)) instantly to (Random point in 11_Just_Visiting <gen>)
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: You have chosen to pay $50 bail.
Game - Display to (All players matching ((Matching player) Not equal to PlayerOrder[CurrentTurn]).) the text: ((Name of PlayerOrder[CurrentTurn]) + has chosen to pay $50 bail.)
Player - Make Neutral Hostile treat (Triggering player) as an Neutral
Set Variable Set CurrentTurn = (CurrentTurn - 1)
Trigger - Run Next_Turn <gen> (ignoring conditions)
Stay in Jail
Events
Conditions
Actions
Game - Display to (All players) the text: You need to roll doubles to get out of jail.
Trigger - Run Next_Turn <gen> (ignoring conditions)
Leave Jail
Events
Conditions
Actions
Unit - Move (Random unit from (Units owned by PlayerOrder[CurrentTurn] matching (((Matching unit) is A Hero) Equal to True).)) instantly to (Random point in 11_Just_Visiting <gen>)
Set Variable Set CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] = "11"
Set Variable Set JailRollAttempts[(Player number of PlayerOrder[CurrentTurn])] = "0"
Player - Make Neutral Hostile treat PlayerOrder[CurrentTurn] as an Neutral
Trigger - Run Start_Movement <gen> (ignoring conditions)
TP into Jail
Events
Unit - A unit enters Jail_TP <gen>
Conditions
CurrentSquare[(Player number of (Owner of (Entering unit)))] Equal to 41
Actions
Unit - Move (Entering unit) instantly to (Random point in 11b_Jail <gen>)
If (((Owner of (Entering unit)) Current lumber) Equal to 0) then do (Make Neutral Hostile treat (Owner of (Entering unit)) as an Enemy) else do (Do nothing)
If (((Owner of (Entering unit)) Current lumber) Equal to 0) then do (Skip remaining actions) else do (Do nothing)
Set Variable Set CurrentSquare[(Player number of (Owner of (Entering unit)))] = "11"
Player - Add -1 to (Owner of (Entering unit)) . Current lumber
Game - Display to (Player group((Owner of (Entering unit)))) the text: You have used your Get Out of Jail Free card.
Game - Display to (All players matching ((Matching player) Not equal to (Owner of (Entering unit))).) the text: ((Name of (Owner of (Entering unit))) + has used his Get Out of Jail Free card.)
Unit - Move (Entering unit) instantly to (Random point in 11_Just_Visiting <gen>)
If ((Owner of (Entering unit)) Not equal to PlayerOrder[CurrentTurn]) then do (Skip remaining actions) else do (Do nothing)
Set Variable Set AllowJailRoll = "false"
Set Variable Set AllowRoll = "true"
Lamer Tax
Events
Conditions
Actions
If ((PlayerOrder[CurrentTurn] Current gold) Greater than or equal to 100) then do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "false") else do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "true")
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Add -100 to PlayerOrder[CurrentTurn].Current gold) else do (Set VariableSet Debt[(Player number of PlayerOrder[CurrentTurn])] = (100 - (PlayerOrder[CurrentTurn] Current gold)))
Game - Display to (All players matching ((Matching player) Not equal to PlayerOrder[CurrentTurn]).) the text: ((Name of PlayerOrder[CurrentTurn]) + has been ordered to pay $100 for being a lamer who uses the demon hunter and masses huntresses. We hate lamers.)
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: You have been ordered to pay $100 for being a lamer who uses the demon hunter and masses huntresses. We hate you lamer.
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Set VariableSet DebtCreditor[(Player number of PlayerOrder[CurrentTurn])] = Player 12 (Brown))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Skip remaining actions) else do (Add (PlayerOrder[CurrentTurn] Current gold) to DebtCreditor[(Player number of PlayerOrder[CurrentTurn])].Current gold)
Player - Set PlayerOrder[CurrentTurn] . Current gold to 0
Player Group - Pick every player in (All players) and do (Change the label for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to (|cffffffff + ((String((Player number of PlayerOrder[CurrentTurn]))) + - |r IN DEBT)))
Player Group - Pick every player in (All players) and do (Change the value for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to Debt[(Player number of PlayerOrder[CurrentTurn])])
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You owe $ + ((String(Debt[(Player number of PlayerOrder[CurrentTurn])])) + ( to + ((Name of DebtCreditor[(Player number of PlayerOrder[CurrentTurn])]) + .))))
Income Tax Init
Events
Conditions
Actions
Set Variable Set IncomeTaxee = (Player number of PlayerOrder[CurrentTurn])
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: You may pay 10% of your total assets (1), or $200 (2)Choose |cffffc0801|r or |cffffc0802|r.
Income Tax Action
Events
Player - Player 1 (Red) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 9 (Gray) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 10 (Light Blue) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 1 (Red) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 9 (Gray) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Player - Player 10 (Light Blue) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Conditions
IncomeTaxee Equal to (Player number of (Triggering player))
Actions
Set Variable Set PlayersTotalAssets = ((Triggering player) Current gold)
For each (Integer A) from 1 to 40 , do (If (PropertyOwner[(Integer A)] Equal to (Triggering player)) then do (Set VariableSet PlayersTotalAssets = (PlayersTotalAssets + PropertyPrice[(Integer A)])) else do (Do nothing))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (If ((Side_1 <gen> contains (Picked unit)) Equal to True) then do (Set VariableSet PlayersTotalAssets = (PlayersTotalAssets + PropertyImprovementPrice[1])) else do (Do nothing))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (If ((Side_2 <gen> contains (Picked unit)) Equal to True) then do (Set VariableSet PlayersTotalAssets = (PlayersTotalAssets + PropertyImprovementPrice[2])) else do (Do nothing))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (If ((Side_3 <gen> contains (Picked unit)) Equal to True) then do (Set VariableSet PlayersTotalAssets = (PlayersTotalAssets + PropertyImprovementPrice[3])) else do (Do nothing))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (If ((Side_4 <gen> contains (Picked unit)) Equal to True) then do (Set VariableSet PlayersTotalAssets = (PlayersTotalAssets + PropertyImprovementPrice[4])) else do (Do nothing))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type eC09) and do (If ((Side_1 <gen> contains (Picked unit)) Equal to True) then do (Set VariableSet PlayersTotalAssets = (PlayersTotalAssets + (PropertyImprovementPrice[1] x 5))) else do (Do nothing))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type eC09) and do (If ((Side_2 <gen> contains (Picked unit)) Equal to True) then do (Set VariableSet PlayersTotalAssets = (PlayersTotalAssets + (PropertyImprovementPrice[2] x 5))) else do (Do nothing))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type eC09) and do (If ((Side_3 <gen> contains (Picked unit)) Equal to True) then do (Set VariableSet PlayersTotalAssets = (PlayersTotalAssets + (PropertyImprovementPrice[3] x 5))) else do (Do nothing))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type eC09) and do (If ((Side_4 <gen> contains (Picked unit)) Equal to True) then do (Set VariableSet PlayersTotalAssets = (PlayersTotalAssets + (PropertyImprovementPrice[4] x 5))) else do (Do nothing))
Set Variable Set PlayersTotalAssets = (Integer(((Real(PlayersTotalAssets)) x 0.10)))
If ((Entered chat string) Equal to 1) then do (Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You have been ordered to pay $ + (String(PlayersTotalAssets)))) else do (Display to (Player group(PlayerOrder[CurrentTurn])) the text: You have been ordered to pay $200)
If ((Entered chat string) Equal to 1) then do (Display to (All players matching ((Matching player) Not equal to PlayerOrder[CurrentTurn]).) the text: (((Name of (Triggering player)) + has been ordered to pay $) + (String(PlayersTotalAssets)))) else do (Display to (All players matching ((Matching player) Not equal to PlayerOrder[CurrentTurn]).) the text: ((Name of (Triggering player)) + has been ordered to pay $200))
If ((Entered chat string) Equal to 1) then do (Set VariableSet TempInteger = PlayersTotalAssets) else do (Set VariableSet TempInteger = "200")
If (((Triggering player) Current gold) Greater than or equal to TempInteger) then do (Set VariableSet InDebt[(Player number of (Triggering player))] = "false") else do (Set VariableSet InDebt[(Player number of (Triggering player))] = "true")
If (InDebt[(Player number of (Triggering player))] Equal to False) then do (Add (-1 x TempInteger) to (Triggering player).Current gold) else do (Set VariableSet Debt[(Player number of (Triggering player))] = (TempInteger - ((Triggering player) Current gold)))
Set Variable Set PlayersTotalAssets = "0"
Set Variable Set IncomeTaxee = "0"
If (InDebt[(Player number of (Triggering player))] Equal to False) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Set VariableSet DebtCreditor[(Player number of (Triggering player))] = Player 12 (Brown))
If (InDebt[(Player number of (Triggering player))] Equal to False) then do (Skip remaining actions) else do (Add ((Triggering player) Current gold) to DebtCreditor[(Player number of (Triggering player))].Current gold)
Player - Set PlayerOrder[CurrentTurn] . Current gold to 0
Player Group - Pick every player in (All players) and do (Change the label for (Triggering player) in LeaderBoardArray[(Player number of (Picked player))] to (|cffffffff + ((String((Player number of (Triggering player)))) + - |rIN DEBT BY)))
Player Group - Pick every player in (All players) and do (Change the value for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to Debt[(Player number of PlayerOrder[CurrentTurn])])
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You owe $ + ((String(Debt[(Player number of PlayerOrder[CurrentTurn])])) + ( to + ((Name of DebtCreditor[(Player number of PlayerOrder[CurrentTurn])]) + .))))
Chance Init
Events
Conditions
Actions
Set Variable Set SelectedCard = (Random integer number between 1 and 16)
Game - Display to (All players) the text: (|cff80c0ffChance: + (ChanceText[SelectedCard] + |r))
Trigger - Run ChanceAction[SelectedCard] (ignoring conditions)
Community Chest Init
Events
Conditions
Actions
Set Variable Set SelectedCard = (Random integer number between 1 and 16)
Game - Display to (All players) the text: (|cffff80c0Community Chest: + (CommunityChestText[SelectedCard] + |r))
Trigger - Run CommunityChestAction[SelectedCard] (ignoring conditions)
Advance to The Well of Eternity
Events
Conditions
Actions
Wait 1.00 seconds
Set Variable Set NumberRolled = (40 - CurrentSquare[(Player number of PlayerOrder[CurrentTurn])])
Set Variable Set Moving = (Player number of PlayerOrder[CurrentTurn])
Trigger - Run Start_Movement <gen> (ignoring conditions)
Advance to The Violet Citadel
Events
Conditions
Actions
Wait 1.00 seconds
Set Variable Set NumberRolled = ((52 - CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]) mod 40)
Set Variable Set Moving = (Player number of PlayerOrder[CurrentTurn])
Trigger - Run Start_Movement <gen> (ignoring conditions)
Advance to Go
Events
Conditions
Actions
Wait 1.00 seconds
Set Variable Set NumberRolled = ((41 - CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]) mod 40)
Set Variable Set Moving = (Player number of PlayerOrder[CurrentTurn])
Trigger - Run Start_Movement <gen> (ignoring conditions)
Advance to Port of Azeroth
Events
Conditions
Actions
Wait 1.00 seconds
Set Variable Set NumberRolled = ((46 - CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]) mod 40)
Set Variable Set Moving = (Player number of PlayerOrder[CurrentTurn])
Trigger - Run Start_Movement <gen> (ignoring conditions)
Advance to nearest seaport
Events
Conditions
Actions
Wait 1.00 seconds
Set Variable Set NumberRolled = ((46 - CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]) mod 10)
Set Variable Set PayDouble = "true"
Set Variable Set Moving = (Player number of PlayerOrder[CurrentTurn])
Trigger - Run Start_Movement <gen> (ignoring conditions)
Advance to Silvermoon
Events
Conditions
Actions
Wait 1.00 seconds
Set Variable Set NumberRolled = ((65 - CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]) mod 40)
Set Variable Set Moving = (Player number of PlayerOrder[CurrentTurn])
Trigger - Run Start_Movement <gen> (ignoring conditions)
Advance to nearest utility
Events
Conditions
Actions
Wait 1.00 seconds
If (((53 - CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]) mod 40) Less than (29 - CurrentSquare[(Player number of PlayerOrder[CurrentTurn])])) then do (Set VariableSet NumberRolled = ((53 - CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]) mod 40)) else do (Set VariableSet NumberRolled = (29 - CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]))
Set Variable Set PayDouble = "true"
Set Variable Set Moving = (Player number of PlayerOrder[CurrentTurn])
Trigger - Run Start_Movement <gen> (ignoring conditions)
Go to Jail
Events
Conditions
Actions
Set Variable Set Moving = "0"
Set Variable Set CurrentSquare[(Player number of PlayerOrder[CurrentTurn])] = "41"
Unit - Move (Random unit from (Units owned by PlayerOrder[CurrentTurn] matching (((Matching unit) is A Hero) Equal to True).)) instantly to (Center of Jail_TP <gen>)
Wait 1.00 seconds
Trigger - Run Next_Turn <gen> (ignoring conditions)
Receive 10
Events
Conditions
Actions
Player - Add 10 to PlayerOrder[CurrentTurn] . Current gold
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Receive 20
Events
Conditions
Actions
Player - Add 20 to PlayerOrder[CurrentTurn] . Current gold
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Receive 25
Events
Conditions
Actions
Player - Add 25 to PlayerOrder[CurrentTurn] . Current gold
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Receive 45
Events
Conditions
Actions
Player - Add 45 to PlayerOrder[CurrentTurn] . Current gold
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Receive 50
Events
Conditions
Actions
Player - Add 50 to PlayerOrder[CurrentTurn] . Current gold
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Receive 50 per player
Events
Conditions
Actions
Player Group - Pick every player in ActivePlayers and do (If (PlayerLeft[(Player number of (Picked player))] Equal to False) then do (Add -50 to (Picked player).Current gold) else do (Do nothing))
Player Group - Pick every player in ActivePlayers and do (If (PlayerLeft[(Player number of (Picked player))] Equal to False) then do (Add 50 to PlayerOrder[CurrentTurn].Current gold) else do (Do nothing))
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Receive 100
Events
Conditions
Actions
Player - Add 100 to PlayerOrder[CurrentTurn] . Current gold
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Receive 150
Events
Conditions
Actions
Player - Add 150 to PlayerOrder[CurrentTurn] . Current gold
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Receive 200
Events
Conditions
Actions
Player - Add 200 to PlayerOrder[CurrentTurn] . Current gold
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Lose 15
Events
Conditions
Actions
If ((PlayerOrder[CurrentTurn] Current gold) Greater than or equal to 15) then do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "false") else do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "true")
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Add -15 to PlayerOrder[CurrentTurn].Current gold) else do (Set VariableSet Debt[(Player number of PlayerOrder[CurrentTurn])] = (15 - (PlayerOrder[CurrentTurn] Current gold)))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Set VariableSet DebtCreditor[(Player number of PlayerOrder[CurrentTurn])] = Player 12 (Brown))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Skip remaining actions) else do (Add (PlayerOrder[CurrentTurn] Current gold) to DebtCreditor[(Player number of PlayerOrder[CurrentTurn])].Current gold)
Player - Set PlayerOrder[CurrentTurn] . Current gold to 0
Player Group - Pick every player in (All players) and do (Change the label for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to (|cffffffff + ((String((Player number of PlayerOrder[CurrentTurn]))) + - |rIN DEBT BY)))
Player Group - Pick every player in (All players) and do (Change the value for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to Debt[(Player number of PlayerOrder[CurrentTurn])])
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You owe $ + ((String(Debt[(Player number of PlayerOrder[CurrentTurn])])) + ( to + ((Name of DebtCreditor[(Player number of PlayerOrder[CurrentTurn])]) + .))))
Lose 50
Events
Conditions
Actions
If ((PlayerOrder[CurrentTurn] Current gold) Greater than or equal to 50) then do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "false") else do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "true")
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Add -50 to PlayerOrder[CurrentTurn].Current gold) else do (Set VariableSet Debt[(Player number of PlayerOrder[CurrentTurn])] = (50 - (PlayerOrder[CurrentTurn] Current gold)))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Set VariableSet DebtCreditor[(Player number of PlayerOrder[CurrentTurn])] = Player 12 (Brown))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Skip remaining actions) else do (Add (PlayerOrder[CurrentTurn] Current gold) to DebtCreditor[(Player number of PlayerOrder[CurrentTurn])].Current gold)
Player - Set PlayerOrder[CurrentTurn] . Current gold to 0
Player Group - Pick every player in (All players) and do (Change the label for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to (|cffffffff + ((String((Player number of PlayerOrder[CurrentTurn]))) + - |rIN DEBT BY)))
Player Group - Pick every player in (All players) and do (Change the value for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to Debt[(Player number of PlayerOrder[CurrentTurn])])
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You owe $ + ((String(Debt[(Player number of PlayerOrder[CurrentTurn])])) + ( to + ((Name of DebtCreditor[(Player number of PlayerOrder[CurrentTurn])]) + .))))
Lose 50 per player
Events
Conditions
Actions
Player Group - Pick every player in ActivePlayers and do (If (PlayerLeft[(Player number of (Picked player))] Equal to False) then do (Add 50 to (Picked player).Current gold) else do (Do nothing))
Player Group - Pick every player in ActivePlayers and do (If (PlayerLeft[(Player number of (Picked player))] Equal to False) then do (Add -50 to PlayerOrder[CurrentTurn].Current gold) else do (Do nothing))
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Lose 100
Events
Conditions
Actions
If ((PlayerOrder[CurrentTurn] Current gold) Greater than or equal to 100) then do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "false") else do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "true")
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Add -100 to PlayerOrder[CurrentTurn].Current gold) else do (Set VariableSet Debt[(Player number of PlayerOrder[CurrentTurn])] = (100 - (PlayerOrder[CurrentTurn] Current gold)))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Set VariableSet DebtCreditor[(Player number of PlayerOrder[CurrentTurn])] = Player 12 (Brown))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Skip remaining actions) else do (Add (PlayerOrder[CurrentTurn] Current gold) to DebtCreditor[(Player number of PlayerOrder[CurrentTurn])].Current gold)
Player - Set PlayerOrder[CurrentTurn] . Current gold to 0
Player Group - Pick every player in (All players) and do (Change the label for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to (|cffffffff + ((String((Player number of PlayerOrder[CurrentTurn]))) + - |rIN DEBT BY)))
Player Group - Pick every player in (All players) and do (Change the value for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to Debt[(Player number of PlayerOrder[CurrentTurn])])
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You owe $ + ((String(Debt[(Player number of PlayerOrder[CurrentTurn])])) + ( to + ((Name of DebtCreditor[(Player number of PlayerOrder[CurrentTurn])]) + .))))
Lose 150
Events
Conditions
Actions
If ((PlayerOrder[CurrentTurn] Current gold) Greater than or equal to 150) then do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "false") else do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "true")
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Add -150 to PlayerOrder[CurrentTurn].Current gold) else do (Set VariableSet Debt[(Player number of PlayerOrder[CurrentTurn])] = (150 - (PlayerOrder[CurrentTurn] Current gold)))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Set VariableSet DebtCreditor[(Player number of PlayerOrder[CurrentTurn])] = Player 12 (Brown))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Skip remaining actions) else do (Add (PlayerOrder[CurrentTurn] Current gold) to DebtCreditor[(Player number of PlayerOrder[CurrentTurn])].Current gold)
Player - Set PlayerOrder[CurrentTurn] . Current gold to 0
Player Group - Pick every player in (All players) and do (Change the label for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to (|cffffffff + ((String((Player number of PlayerOrder[CurrentTurn]))) + - |rIN DEBT BY)))
Player Group - Pick every player in (All players) and do (Change the value for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to Debt[(Player number of PlayerOrder[CurrentTurn])])
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You owe $ + ((String(Debt[(Player number of PlayerOrder[CurrentTurn])])) + ( to + ((Name of DebtCreditor[(Player number of PlayerOrder[CurrentTurn])]) + .))))
Lose 25 per house 100 per hotel
Events
Conditions
Actions
Set Variable Set TempInteger = "0"
Unit Group - Pick every unit in (Units owned by PlayerOrder[CurrentTurn] of type House) and do (Set VariableSet TempInteger = (TempInteger + 25))
Unit Group - Pick every unit in (Units owned by PlayerOrder[CurrentTurn] of type Tavern) and do (Set VariableSet TempInteger = (TempInteger + 100))
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You have been ordered to pay $ + ((String(TempInteger)) + to the bank.))
If ((PlayerOrder[CurrentTurn] Current gold) Greater than or equal to TempInteger) then do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "false") else do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "true")
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Add (-1 x TempInteger) to PlayerOrder[CurrentTurn].Current gold) else do (Set VariableSet Debt[(Player number of PlayerOrder[CurrentTurn])] = (TempInteger - (PlayerOrder[CurrentTurn] Current gold)))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Set VariableSet DebtCreditor[(Player number of PlayerOrder[CurrentTurn])] = Player 12 (Brown))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Skip remaining actions) else do (Add (PlayerOrder[CurrentTurn] Current gold) to DebtCreditor[(Player number of PlayerOrder[CurrentTurn])].Current gold)
Player - Set PlayerOrder[CurrentTurn] . Current gold to 0
Player Group - Pick every player in (All players) and do (Change the label for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to (|cffffffff + ((String((Player number of PlayerOrder[CurrentTurn]))) + - |rIN DEBT BY)))
Player Group - Pick every player in (All players) and do (Change the value for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to Debt[(Player number of PlayerOrder[CurrentTurn])])
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You owe $ + ((String(Debt[(Player number of PlayerOrder[CurrentTurn])])) + ( to + ((Name of DebtCreditor[(Player number of PlayerOrder[CurrentTurn])]) + .))))
Lose 40 per house 115 per hotel
Events
Conditions
Actions
Set Variable Set TempInteger = "0"
Unit Group - Pick every unit in (Units owned by PlayerOrder[CurrentTurn] of type House) and do (Set VariableSet TempInteger = (TempInteger + 40))
Unit Group - Pick every unit in (Units owned by PlayerOrder[CurrentTurn] of type Tavern) and do (Set VariableSet TempInteger = (TempInteger + 115))
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You have been ordered to pay $ + ((String(TempInteger)) + to the bank.))
If ((PlayerOrder[CurrentTurn] Current gold) Greater than or equal to TempInteger) then do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "false") else do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "true")
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Add (-1 x TempInteger) to PlayerOrder[CurrentTurn].Current gold) else do (Set VariableSet Debt[(Player number of PlayerOrder[CurrentTurn])] = (TempInteger - (PlayerOrder[CurrentTurn] Current gold)))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Set VariableSet DebtCreditor[(Player number of PlayerOrder[CurrentTurn])] = Player 12 (Brown))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Skip remaining actions) else do (Add (PlayerOrder[CurrentTurn] Current gold) to DebtCreditor[(Player number of PlayerOrder[CurrentTurn])].Current gold)
Player - Set PlayerOrder[CurrentTurn] . Current gold to 0
Player Group - Pick every player in (All players) and do (Change the label for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to (|cffffffff + ((String((Player number of PlayerOrder[CurrentTurn]))) + - |rIN DEBT BY)))
Player Group - Pick every player in (All players) and do (Change the value for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to Debt[(Player number of PlayerOrder[CurrentTurn])])
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You owe $ + ((String(Debt[(Player number of PlayerOrder[CurrentTurn])])) + ( to + ((Name of DebtCreditor[(Player number of PlayerOrder[CurrentTurn])]) + .))))
Go back 3
Events
Conditions
Actions
Set Variable Set NumberRolled = "-3"
Trigger - Run Start_Movement_Backwards <gen> (ignoring conditions)
Get out of Jail Free
Events
Conditions
Actions
Player - Add 1 to PlayerOrder[CurrentTurn] . Current lumber
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
BuyRent Course of Action
Events
Conditions
Actions
If (PropertyOwner[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] Equal to Player 12 (Brown)) then do (Run Buying_Offer <gen> (ignoring conditions)) else do (If (PropertyMortgage[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] Equal to False) then do (Run Calculate_Rent <gen> (ignoring conditions)) else do (Run Property_Mortgaged <gen> (ignoring conditions)))
Buying Offer
Events
Conditions
Actions
If ((PlayerOrder[CurrentTurn] Current gold) Greater than or equal to PropertyPrice[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]]) then do (Display to (Player group(PlayerOrder[CurrentTurn])) the text: (This property is currently unowned. Would you like to purchase it for $ + ((String(PropertyPrice[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]])) + ? (|cffffc080yes|r or |cffffc080no|r)))) else do (Display to (Player group(PlayerOrder[CurrentTurn])) the text: You cannot afford to purchase this property.)
If ((PlayerOrder[CurrentTurn] Current gold) Greater than or equal to PropertyPrice[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]]) then do (Set VariableSet BuyingOffer = (Player number of PlayerOrder[CurrentTurn])) else do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions)))
Buying Offer Nag
Events
Time - Every 10.00 seconds of game time
Conditions
BuyingOffer Not equal to 0
Actions
Game - Display to (Player group((Player(BuyingOffer)))) the text: ((Do you want to buy + PropertyName[CurrentSquare[BuyingOffer]]) + , |cffffc080yes|r or |cffffc080no|r?)
Detect Buying Decision
Events
Player - Player 1 (Red) types a chat message containing yes (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing yes (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing yes (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing yes (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing yes (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing yes (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing yes (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing yes (Unexpected type: 'stringnoformat') as An exact match
Player - Player 1 (Red) types a chat message containing no (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing no (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing no (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing no (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing no (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing no (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing no (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing no (Unexpected type: 'stringnoformat') as An exact match
Conditions
BuyingOffer Equal to (Player number of (Triggering player))
Actions
If (((Entered chat string) Equal to yes) or (((Entered chat string) Equal to Yes) or (((Entered chat string) Equal to yEs) or (((Entered chat string) Equal to yeS) or (((Entered chat string) Equal to YEs) or (((Entered chat string) Equal to YeS) or (((Entered chat string) Equal to yES) or ((Entered chat string) Equal to YES)))))))) then do (Do nothing) else do (Set VariableSet BuyingOffer = "0")
If (((Entered chat string) Equal to yes) or (((Entered chat string) Equal to Yes) or (((Entered chat string) Equal to yEs) or (((Entered chat string) Equal to yeS) or (((Entered chat string) Equal to YEs) or (((Entered chat string) Equal to YeS) or (((Entered chat string) Equal to yES) or ((Entered chat string) Equal to YES)))))))) then do (Run Buy_Property <gen> (ignoring conditions)) else do (Run Auction_Init <gen> (ignoring conditions))
Buy Property
Events
Conditions
Actions
Player - Add (-1 x PropertyPrice[CurrentSquare[BuyingOffer]]) to (Player(BuyingOffer)) . Current gold
Unit - Change ownership of PropertyOwnerLabel[CurrentSquare[BuyingOffer]] to (Player(BuyingOffer)) and Change color
Set Variable Set PropertyOwner[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] = (Player((Player number of PlayerOrder[CurrentTurn])))
Game - Display to (Player group((Player(BuyingOffer)))) the text: (Congratulations, you now own + (PropertyName[CurrentSquare[BuyingOffer]] + !))
Game - Display to (All players matching ((Matching player) Not equal to (Player(BuyingOffer))).) the text: (((Name of PlayerOrder[CurrentTurn]) + has just purchased ) + (PropertyName[CurrentSquare[BuyingOffer]] + !))
Set Variable Set BuyingOffer = "0"
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Calculate Rent
Events
Conditions
Actions
Set Variable Set OwedRent = "0"
If ((Owner of PropertyOwnerLabel[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]]) Equal to PlayerOrder[CurrentTurn]) then do (Set VariableSet PayingRent = "false") else do (Set VariableSet PayingRent = "true")
If (PayingRent Equal to False) then do (Display to (Player group(PlayerOrder[CurrentTurn])) the text: You are not required to pay rent on this property.) else do (Do nothing)
If (PayingRent Equal to False) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Do nothing)
If (PayingRent Equal to False) then do (Skip remaining actions) else do (Do nothing)
If (PropertyType[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] Less than or equal to 8) then do (Run Calculate_Rent_Normal <gen> (ignoring conditions)) else do (Do nothing)
If (PropertyType[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] Equal to 9) then do (Run Calculate_Rent_Railroad <gen> (ignoring conditions)) else do (Do nothing)
If (PropertyType[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] Equal to 10) then do (Run Utility_Roll_Request <gen> (ignoring conditions)) else do (Do nothing)
Calculate Rent Normal
Events
Conditions
Actions
Set Variable Set TempInteger = CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]
Set Variable Set TempInteger2 = "0"
Set Variable Set CompleteSet = "true"
For each (Integer A) from (TempInteger - 3) to (TempInteger + 3) , do (If ((PropertyOwner[TempInteger] Not equal to PropertyOwner[(Integer A)]) and (PropertyType[TempInteger] Equal to PropertyType[(Integer A)])) then do (Set VariableSet CompleteSet = "false") else do (Do nothing))
Set Variable Set TempInteger2 = (Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House)))
Set Variable Set OwedRent = PropertyRentalRates[((TempInteger x 6) + TempInteger2)]
If ((CompleteSet Equal to True) and (TempInteger2 Equal to 0)) then do (Set VariableSet OwedRent = (OwedRent x 2)) else do (Do nothing)
Set Variable Set TempInteger2 = (Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Tavern)))
If (TempInteger2 Equal to 1) then do (Set VariableSet OwedRent = PropertyRentalRates[((TempInteger x 6) + 5)]) else do (Do nothing)
Trigger - Run Pay_Rent <gen> (ignoring conditions)
Calculate Rent Railroad
Events
Conditions
Actions
Set Variable Set TempInteger = CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]
Set Variable Set TempInteger2 = "0"
For each (Integer A) from 1 to 4 , do (If (PropertyOwner[TempInteger] Equal to PropertyOwner[(((Integer A) x 10) - 4)]) then do (Set VariableSet TempInteger2 = (TempInteger2 + 1)) else do (Do nothing))
Set Variable Set OwedRent = "25"
For each (Integer A) from 1 to 3 , do (If (TempInteger2 Greater than (Integer A)) then do (Set VariableSet OwedRent = (2 x OwedRent)) else do (Do nothing))
If (PayDouble Equal to True) then do (Set VariableSet OwedRent = (OwedRent x 2)) else do (Do nothing)
Trigger - Run Pay_Rent <gen> (ignoring conditions)
Utility Roll Request
Events
Conditions
Actions
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: You must |cffffc080roll|r to determine your rent.
Set Variable Set AllowUtilityRoll = "true"
Prompt to Utility Roll
Events
Time - Every 10.00 seconds of game time
Conditions
AllowUtilityRoll Equal to True
Actions
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: Type |cffffc080roll|r to determine your rent.
Detect Utility Roll and Calculate
Events
Player - Player 1 (Red) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing roll (Unexpected type: 'stringnoformat') as An exact match
Conditions
AllowUtilityRoll Equal to True
(Triggering player) Equal to PlayerOrder[CurrentTurn]
Actions
Set Variable Set AllowUtilityRoll = "false"
Set Variable Set Dice1 = (1 + (((Random integer number between 1 and 6) + (Integer((Source X of current camera view)))) mod 6))
Set Variable Set Dice2 = (1 + (((Random integer number between 1 and 6) + (Integer((Source Y of current camera view)))) mod 6))
If ((PropertyOwner[13] Equal to PropertyOwner[29]) or (PayDouble Equal to True)) then do (Set VariableSet OwedRent = ((Dice1 + Dice2) x 10)) else do (Set VariableSet OwedRent = ((Dice1 + Dice2) x 4))
Trigger - Run Pay_Rent <gen> (ignoring conditions)
Pay Rent
Events
Conditions
Actions
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You have been ordered to pay $ + ((String(OwedRent)) + in rent.))
If ((PlayerOrder[CurrentTurn] Current gold) Greater than or equal to OwedRent) then do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "false") else do (Set VariableSet InDebt[(Player number of PlayerOrder[CurrentTurn])] = "true")
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Add (-1 x OwedRent) to PlayerOrder[CurrentTurn].Current gold) else do (Set VariableSet Debt[(Player number of PlayerOrder[CurrentTurn])] = (OwedRent - (PlayerOrder[CurrentTurn] Current gold)))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Add OwedRent to PropertyOwner[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]].Current gold) else do (Set VariableSet Debt[(Player number of PlayerOrder[CurrentTurn])] = (OwedRent - (PlayerOrder[CurrentTurn] Current gold)))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Display to (Player group(PropertyOwner[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]])) the text: ((Name of PlayerOrder[CurrentTurn]) + ( has paid you $ + ((String(OwedRent)) + in rent.)))) else do (Display to (Player group(PropertyOwner[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]])) the text: ((Name of PlayerOrder[CurrentTurn]) + ( has paid you $ + ((String((OwedRent - Debt[(Player number of PlayerOrder[CurrentTurn])]))) + ( and owes you an additional $ + (String(Debt[(Player number of PlayerOrder[CurrentTurn])])))))))
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))) else do (Set VariableSet DebtCreditor[(Player number of PlayerOrder[CurrentTurn])] = PropertyOwner[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]])
If (InDebt[(Player number of PlayerOrder[CurrentTurn])] Equal to False) then do (Skip remaining actions) else do (Add (PlayerOrder[CurrentTurn] Current gold) to DebtCreditor[(Player number of PlayerOrder[CurrentTurn])].Current gold)
Player - Set PlayerOrder[CurrentTurn] . Current gold to 0
Player Group - Pick every player in (All players) and do (Change the label for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to (|cffffffff + ((String((Player number of PlayerOrder[CurrentTurn]))) + - |rIN DEBT BY)))
Player Group - Pick every player in (All players) and do (Change the value for PlayerOrder[CurrentTurn] in LeaderBoardArray[(Player number of (Picked player))] to Debt[(Player number of PlayerOrder[CurrentTurn])])
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: (You owe $ + ((String(Debt[(Player number of PlayerOrder[CurrentTurn])])) + ( to + ((Name of DebtCreditor[(Player number of PlayerOrder[CurrentTurn])]) + .))))
Property Mortgaged
Events
Conditions
Actions
Game - Display to (Player group(PlayerOrder[CurrentTurn])) the text: This property has been mortgaged. You do not owe rent.
Game - Display to (All players matching ((Matching player) Not equal to PlayerOrder[CurrentTurn]).) the text: (This property has been mortgaged. + ((Name of PlayerOrder[CurrentTurn]) + does not owe rent.))
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Begin Trading
Events
Player - Player 1 (Red) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of (Triggering player))] Equal to 0
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Game - Display to (Player group((Triggering player))) the text: You have begun trading.You may |cffffc080buy|r or |cffffc080sell|r improvements or property, |cffffc080mortgage|r a property, begin a |cffffc080private|r transaction, or |cffffc080cancel|r trading.
Wait 0.50 seconds
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "1"
Already Trading
Events
Player - Player 1 (Red) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing trade (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of (Triggering player))] Greater than 0
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Unit Group - Pick every unit in (Units owned by SelectingPlayer of type Property Selector) and do (Remove (Picked unit) from the game)
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "1"
Game - Display to (Player group((Triggering player))) the text: You have restarted trading.You may |cffffc080buy|r or |cffffc080sell|r improvements or property, |cffffc080mortgage|r a property, begin a |cffffc080private|r transaction, or |cffffc080cancel|r trading.
Trading Ask to Buy
Events
Player - Player 1 (Red) types a chat message containing buy (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing buy (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing buy (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing buy (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing buy (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing buy (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing buy (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing buy (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of (Triggering player))] Equal to 1
Actions
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "2"
Set Variable Set SelectingPlayer = (Triggering player)
Unit Group - Pick every unit in (Units owned by SelectingPlayer of type Property Selector) and do (Remove (Picked unit) from the game)
For each (Integer B) from 1 to 40 , do (Run Create_Property_Selectors <gen> (ignoring conditions))
If ((Number of units in (Units owned by (Triggering player) of type Property Selector)) Greater than 0) then do (Display to (Player group((Triggering player))) the text: Select the property you wish to improve.) else do (Display to (Player group((Triggering player))) the text: You cannot improve any properties at this time.)
If ((Number of units in (Units owned by SelectingPlayer of type Property Selector)) Equal to 0) then do (Set VariableSet TradeMenu[(Player number of SelectingPlayer)] = "0") else do (Do nothing)
If ((Number of units in (Units owned by SelectingPlayer of type Property Selector)) Equal to 0) then do (Set VariableSet SelectingPlayer = Neutral Victim) else do (Do nothing)
Trading Select Buy
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Conditions
(Owner of (Triggering unit)) Equal to (Triggering player)
TradeMenu[(Player number of (Triggering player))] Equal to 2
(Unit-type of (Triggering unit)) Equal to Property Selector
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
For each (Integer A) from 1 to 40 , do (If ((Squares[(Integer A)] contains (Triggering unit)) Equal to True) then do (Set VariableSet TempInteger = (Integer A)) else do (Do nothing))
If (((Triggering player) Current gold) Less than PropertyImprovementPrice[TempInteger]) then do (Display to (Player group((Triggering player))) the text: (You need at least $ + ((String(PropertyImprovementPrice[TempInteger])) + ( to improve + (PropertyName[(Integer A)] + .))))) else do (Do nothing)
If (((Triggering player) Current gold) Less than PropertyImprovementPrice[TempInteger]) then do (Skip remaining actions) else do (Do nothing)
If ((((Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House))) Less than 4) and ((Number of units in (Units of type House)) Less than 32)) or (((Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House))) Equal to 4) and ((Number of units in (Units of type Tavern)) Less than 12))) then do (Do nothing) else do (Display to (Player group((Triggering player))) the text: Your building application has been refused - too many buildings on the board.)
If ((((Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House))) Less than 4) and ((Number of units in (Units of type House)) Less than 32)) or (((Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House))) Equal to 4) and ((Number of units in (Units of type Tavern)) Less than 12))) then do (Do nothing) else do (Skip remaining actions)
Player - Add (-1 x PropertyImprovementPrice[TempInteger]) to (Triggering player) . Current gold
Set Variable Set TempInteger2 = (Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House)))
If (TempInteger2 Equal to 4) then do (Pick every unit in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House)) and do (Remove (Picked unit) from the game)) else do (Create 1.House for (Triggering player) at (Random point in PropertyBuildingSite[TempInteger]) facing (Random angle) degrees)
If (TempInteger2 Equal to 4) then do (Create 1.Tavern for (Triggering player) at (Center of PropertyBuildingSite[TempInteger]) facing Default building facing degrees) else do (Do nothing)
If (TempInteger2 Equal to 4) then do (Display to (Player group((Triggering player))) the text: (You have just purchased a tavern on + (PropertyName[TempInteger] + !))) else do (Display to (Player group((Triggering player))) the text: (You have just purchased a house on + (PropertyName[TempInteger] + !)))
If (TempInteger2 Equal to 4) then do (Display to (All players matching ((Matching player) Not equal to (Triggering player)).) the text: (((Name of (Triggering player)) + has just purchased a tavern on ) + (PropertyName[TempInteger] + !))) else do (Display to (All players matching ((Matching player) Not equal to (Triggering player)).) the text: (((Name of (Triggering player)) + has just purchased a house on ) + (PropertyName[TempInteger] + !)))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (Remove (Picked unit) from the game)
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "0"
Trading Ask to Sell
Events
Player - Player 1 (Red) types a chat message containing sell (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing sell (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing sell (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing sell (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing sell (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing sell (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing sell (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing sell (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of (Triggering player))] Equal to 1
Actions
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "3"
Set Variable Set SelectingPlayer = (Triggering player)
Unit Group - Pick every unit in (Units owned by SelectingPlayer of type Property Selector) and do (Remove (Picked unit) from the game)
For each (Integer B) from 1 to 40 , do (Run Create_Property_Selectors <gen> (ignoring conditions))
If ((Number of units in (Units owned by (Triggering player) of type Property Selector)) Greater than 0) then do (Display to (Player group((Triggering player))) the text: Select the property you wish to sell or reduce.) else do (Display to (Player group((Triggering player))) the text: You have no properties to sell.)
If ((Number of units in (Units owned by SelectingPlayer of type Property Selector)) Equal to 0) then do (Set VariableSet TradeMenu[(Player number of SelectingPlayer)] = "0") else do (Do nothing)
If ((Number of units in (Units owned by SelectingPlayer of type Property Selector)) Equal to 0) then do (Set VariableSet SelectingPlayer = Neutral Victim) else do (Do nothing)
Trading Select Sell
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Conditions
(Owner of (Triggering unit)) Equal to (Triggering player)
TradeMenu[(Player number of (Triggering player))] Equal to 3
(Unit-type of (Triggering unit)) Equal to Property Selector
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
For each (Integer A) from 1 to 40 , do (If ((Squares[(Integer A)] contains (Triggering unit)) Equal to True) then do (Set VariableSet TempInteger = (Integer A)) else do (Do nothing))
If (((Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Tavern))) Equal to 1) and ((Number of units in (Units of type House)) Equal to 32)) then do (Display to (Player group((Triggering player))) the text: You cannot subdivide your hotel at this time - too many houses on the board.You can choose to |cffffc080sell all|r houses and hotels on that entire colour group, or |cffffc080cancel|r the sale.) else do (Do nothing)
If (((Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Tavern))) Equal to 1) and ((Number of units in (Units of type House)) Equal to 32)) then do (Set VariableSet SelectedProperty[(Player number of (Triggering player))] = TempInteger) else do (Do nothing)
If (((Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Tavern))) Equal to 1) and ((Number of units in (Units of type House)) Equal to 32)) then do (Set VariableSet TradeMenu[(Player number of (Triggering player))] = "5") else do (Do nothing)
If (((Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Tavern))) Equal to 1) and ((Number of units in (Units of type House)) Equal to 32)) then do (Skip remaining actions) else do (Do nothing)
-------- Selling property --------
Set Variable Set TempInteger2 = (Number of units in (Units in PropertyCountingSite[TempInteger] matching (((Unit-type of (Matching unit)) Equal to House) or ((Unit-type of (Matching unit)) Equal to Tavern))))
If (TempInteger2 Equal to 0) then do (Display to (Player group((Triggering player))) the text: (You have chosen to sell + (PropertyName[TempInteger] + back to THE BANK. Please |cffffc080confirm|r or |cffffc080cancel|r this decision.))) else do (Do nothing)
If (TempInteger2 Equal to 0) then do (Set VariableSet SellingProperty[(Player number of (Triggering player))] = TempInteger) else do (Do nothing)
If (TempInteger2 Equal to 0) then do (Set VariableSet TradeMenu[(Player number of (Triggering player))] = "4") else do (Do nothing)
-------- Selling house --------
Set Variable Set TempInteger2 = (Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House)))
If (TempInteger2 Not equal to 0) then do (Remove (Random unit from (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House))) from the game) else do (Do nothing)
If (TempInteger2 Not equal to 0) then do (Add (Integer((0.50 x (Real(PropertyImprovementPrice[TempInteger]))))) to (Triggering player).Current gold) else do (Do nothing)
If (TempInteger2 Not equal to 0) then do (Display to (Player group((Triggering player))) the text: (You have sold a house on + (PropertyName[TempInteger] + .))) else do (Do nothing)
If (TempInteger2 Not equal to 0) then do (Display to (All players matching ((Matching player) Not equal to (Triggering player)).) the text: (((Name of (Triggering player)) + has sold a house on ) + (PropertyName[TempInteger] + .))) else do (Do nothing)
-------- Subdividing tavern --------
Set Variable Set TempInteger2 = (Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Tavern)))
If (TempInteger2 Equal to 1) then do (Remove (Random unit from (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Tavern))) from the game) else do (Do nothing)
If (TempInteger2 Equal to 1) then do (For each (Integer A) from 1 to 4, do (Create 1.House for (Triggering player) at (Random point in PropertyBuildingSite[TempInteger]) facing (Random angle) degrees)) else do (Do nothing)
If (TempInteger2 Equal to 1) then do (Add (Integer((0.50 x (Real(PropertyImprovementPrice[TempInteger]))))) to (Triggering player).Current gold) else do (Do nothing)
If (TempInteger2 Equal to 1) then do (Display to (Player group((Triggering player))) the text: (You have subdivided your tavern on + (PropertyName[TempInteger] + .))) else do (Do nothing)
If (TempInteger2 Equal to 1) then do (Display to (All players matching ((Matching player) Not equal to (Triggering player)).) the text: (((Name of (Triggering player)) + has subdivided his tavern on ) + (PropertyName[TempInteger] + .))) else do (Do nothing)
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (Remove (Picked unit) from the game)
If (TradeMenu[(Player number of (Triggering player))] Equal to 3) then do (Set VariableSet TradeMenu[(Player number of (Triggering player))] = "0") else do (Do nothing)
Trading Sell Property Confirm
Events
Player - Player 1 (Red) types a chat message containing confirm (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing confirm (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing confirm (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing confirm (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing confirm (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing confirm (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing confirm (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing confirm (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of (Triggering player))] Equal to 4
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Unit - Change ownership of PropertyOwnerLabel[SellingProperty[(Player number of (Triggering player))]] to Player 12 (Brown) and Change color
Set Variable Set PropertyOwner[SellingProperty[(Player number of (Triggering player))]] = Player 12 (Brown)
Player - Add (Integer((0.75 x (Real(PropertyPrice[SellingProperty[(Player number of (Triggering player))]]))))) to (Triggering player) . Current gold
Game - Display to (Player group((Triggering player))) the text: (You have sold + (PropertyName[SellingProperty[(Player number of (Triggering player))]] + back to the bank.))
Game - Display to (All players matching ((Matching player) Not equal to (Triggering player)).) the text: (((Name of (Triggering player)) + has sold ) + (PropertyName[SellingProperty[(Player number of (Triggering player))]] + back to the bank.))
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "0"
Trading Sell All
Events
Player - Player 1 (Red) types a chat message containing sell all (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing sell all (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing sell all (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing sell all (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing sell all (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing sell all (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing sell all (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing sell all (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of (Triggering player))] Equal to 5
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
For each (Integer A) from (SelectedProperty[(Player number of (Triggering player))] - 3) to (SelectedProperty[(Player number of (Triggering player))] + 3) , do (If (PropertyType[(Integer A)] Equal to PropertyType[SelectedProperty[(Player number of (Triggering player))]]) then do (Pick every unit in (Units in PropertyCountingSite[(Integer A)] matching (((Matching unit) is A Hero) Equal to False)) and do (If ((Unit-type of (Picked unit)) Equal to House) then do (Add (Integer((0.50 x (Real(PropertyImprovementPrice[(Integer A)]))))) to (Triggering player).Current gold) else do (Add (Integer((2.50 x (Real(PropertyImprovementPrice[(Integer A)]))))) to Player 1 (Red).Current gold))) else do (Do nothing))
For each (Integer A) from (SelectedProperty[(Player number of (Triggering player))] - 3) to (SelectedProperty[(Player number of (Triggering player))] + 3) , do (If (PropertyType[(Integer A)] Equal to PropertyType[SelectedProperty[(Player number of (Triggering player))]]) then do (Pick every unit in (Units in PropertyCountingSite[(Integer A)] matching (((Matching unit) is A Hero) Equal to False)) and do (Remove (Picked unit) from the game)) else do (Do nothing))
Game - Display to (Player group((Triggering player))) the text: You have sold all improvements in that property group!
Game - Display to (All players matching ((Matching player) Not equal to (Triggering player)).) the text: ((Name of (Triggering player)) + has sold all improvements in a property group!)
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (Remove (Picked unit) from the game)
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "0"
Trading Ask to Mortgage
Events
Player - Player 1 (Red) types a chat message containing mortgage (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing mortgage (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing mortgage (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing mortgage (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing mortgage (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing mortgage (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing mortgage (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing mortgage (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of (Triggering player))] Equal to 1
Actions
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "6"
Set Variable Set SelectingPlayer = (Triggering player)
Unit Group - Pick every unit in (Units owned by SelectingPlayer of type Property Selector) and do (Remove (Picked unit) from the game)
For each (Integer B) from 1 to 40 , do (Run Create_Property_Selectors <gen> (ignoring conditions))
If ((Number of units in (Units owned by (Triggering player) of type Property Selector)) Greater than 0) then do (Display to (Player group((Triggering player))) the text: Select the property you wish to mortgage or unmortgage.) else do (Display to (Player group((Triggering player))) the text: You cannot change the mortgage status of any properties at this time.)
If ((Number of units in (Units owned by SelectingPlayer of type Property Selector)) Equal to 0) then do (Set VariableSet TradeMenu[(Player number of SelectingPlayer)] = "0") else do (Do nothing)
If ((Number of units in (Units owned by SelectingPlayer of type Property Selector)) Equal to 0) then do (Set VariableSet SelectingPlayer = Neutral Victim) else do (Do nothing)
Trading Select Mortgage
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Conditions
(Owner of (Triggering unit)) Equal to (Triggering player)
TradeMenu[(Player number of (Triggering player))] Equal to 6
(Unit-type of (Triggering unit)) Equal to Property Selector
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
For each (Integer A) from 1 to 40 , do (If ((Squares[(Integer A)] contains (Triggering unit)) Equal to True) then do (Set VariableSet TempInteger = (Integer A)) else do (Do nothing))
If (PropertyMortgage[TempInteger] Equal to False) then do (Display to (Player group((Triggering player))) the text: (You have mortgaged + (PropertyName[TempInteger] + .))) else do (If (((Triggering player) Current gold) Greater than or equal to (Integer((0.55 x (Real(PropertyPrice[TempInteger])))))) then do (Display to (Player group((Triggering player))) the text: (You have unmortgaged + (PropertyName[TempInteger] + .))) else do (Display to (Player group((Triggering player))) the text: (You require $ + ((String((Integer((0.55 x (Real(PropertyPrice[TempInteger]))))))) + ( to unmortgage + PropertyName[TempInteger])))))
If (PropertyMortgage[TempInteger] Equal to False) then do (Display to (All players matching ((Matching player) Not equal to (Triggering player)).) the text: (((Name of (Triggering player)) + has mortgaged ) + (PropertyName[TempInteger] + .))) else do (If (((Triggering player) Current gold) Greater than or equal to (Integer((0.55 x (Real(PropertyPrice[TempInteger])))))) then do (Display to (All players matching ((Matching player) Not equal to (Triggering player)).) the text: (((Name of (Triggering player)) + has unmortgaged ) + (PropertyName[TempInteger] + .))) else do (Do nothing))
If (PropertyMortgage[TempInteger] Equal to False) then do (Create 1.Mortgage (Cinematic) for (Triggering player) at (Center of PropertyBuildingSite[TempInteger]) facing Default building facing degrees) else do (If (((Triggering player) Current gold) Greater than or equal to (Integer((0.55 x (Real(PropertyPrice[TempInteger])))))) then do (Remove (Random unit from (Units in PropertyBuildingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Mortgage (Cinematic)))) from the game) else do (Do nothing))
If (PropertyMortgage[TempInteger] Equal to False) then do (Add (Integer((0.50 x (Real(PropertyPrice[TempInteger]))))) to (Triggering player).Current gold) else do (If (((Triggering player) Current gold) Greater than or equal to (Integer((0.55 x (Real(PropertyPrice[TempInteger])))))) then do (Add (Integer((-0.55 x (Real(PropertyPrice[TempInteger]))))) to (Triggering player).Current gold) else do (Do nothing))
If (PropertyMortgage[TempInteger] Equal to False) then do (Set VariableSet PropertyMortgage[TempInteger] = "true") else do (If ((Number of units in (Units in PropertyBuildingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Mortgage (Cinematic)))) Equal to 0) then do (Set VariableSet PropertyMortgage[TempInteger] = "false") else do (Do nothing))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (Remove (Picked unit) from the game)
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "0"
Trading Ask Private
Events
Player - Player 1 (Red) types a chat message containing private (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing private (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing private (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing private (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing private (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing private (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing private (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing private (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of (Triggering player))] Equal to 1
Actions
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "7"
Set Variable Set SelectingPlayer = (Triggering player)
Unit Group - Pick every unit in (Units owned by SelectingPlayer of type Property Selector) and do (Remove (Picked unit) from the game)
For each (Integer B) from 1 to 40 , do (Run Create_Property_Selectors <gen> (ignoring conditions))
If ((Number of units in (Units owned by (Triggering player) of type Property Selector)) Greater than 0) then do (Display to (Player group((Triggering player))) the text: Select the property you wish to sell to another player.) else do (Display to (Player group((Triggering player))) the text: You cannot sell any properties to another player at this time.)
If ((Number of units in (Units owned by SelectingPlayer of type Property Selector)) Equal to 0) then do (Set VariableSet TradeMenu[(Player number of SelectingPlayer)] = "0") else do (Do nothing)
If ((Number of units in (Units owned by SelectingPlayer of type Property Selector)) Equal to 0) then do (Set VariableSet SelectingPlayer = Neutral Victim) else do (Do nothing)
Trading Select Private
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Conditions
(Owner of (Triggering unit)) Equal to (Triggering player)
TradeMenu[(Player number of (Triggering player))] Equal to 7
(Unit-type of (Triggering unit)) Equal to Property Selector
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
For each (Integer A) from 1 to 40 , do (If ((Squares[(Integer A)] contains (Triggering unit)) Equal to True) then do (Set VariableSet SelectedProperty[(Player number of (Triggering player))] = (Integer A)) else do (Do nothing))
Game - Display to (Player group((Triggering player))) the text: (You have chose to sell + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + . Enter the price you wish to charge (include the dollar sign). Type |cffffc080exchange|r if you wish to swap property.))
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "8"
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (Remove (Picked unit) from the game)
Trading Price Private
Events
Player - Player 1 (Red) types a chat message containing $ (Unexpected type: 'stringnoformat') as A substring
Player - Player 2 (Blue) types a chat message containing $ (Unexpected type: 'stringnoformat') as A substring
Player - Player 3 (Teal) types a chat message containing $ (Unexpected type: 'stringnoformat') as A substring
Player - Player 4 (Purple) types a chat message containing $ (Unexpected type: 'stringnoformat') as A substring
Player - Player 5 (Yellow) types a chat message containing $ (Unexpected type: 'stringnoformat') as A substring
Player - Player 6 (Orange) types a chat message containing $ (Unexpected type: 'stringnoformat') as A substring
Player - Player 7 (Green) types a chat message containing $ (Unexpected type: 'stringnoformat') as A substring
Player - Player 8 (Pink) types a chat message containing $ (Unexpected type: 'stringnoformat') as A substring
Conditions
(Substring((Entered chat string), 1, 1)) Equal to $
TradeMenu[(Player number of (Triggering player))] Equal to 8
(Integer((Substring((Entered chat string), 2, 10)))) Greater than 0
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Set Variable Set PrivatePrice[(Player number of (Triggering player))] = (Integer((Substring((Entered chat string), 2, 10))))
Game - Display to (Player group((Triggering player))) the text: (You have chosen to sell + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + ( for a sum of $ + ((String(PrivatePrice[(Player number of (Triggering player))])) + . Enter the player you wish to sell to, e.g |cffffc080player 1|r.))))
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "9"
Trading Price Exchange
Events
Player - Player 1 (Red) types a chat message containing exchange (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing exchange (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing exchange (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing exchange (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing exchange (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing exchange (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing exchange (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing exchange (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of (Triggering player))] Equal to 8
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Game - Display to (Player group((Triggering player))) the text: (You have chosen to exchange + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + . Enter the player you wish to exchange with (eg "player 1").))
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "10"
Trading Player Private
Events
Player - Player 1 (Red) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 2 (Blue) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 3 (Teal) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 4 (Purple) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 5 (Yellow) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 6 (Orange) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 7 (Green) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 8 (Pink) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Conditions
(Substring((Entered chat string), 1, 7)) Equal to player
TradeMenu[(Player number of (Triggering player))] Equal to 9
(Integer((Substring((Entered chat string), 8, 8)))) Greater than 0
((Player((Integer((Substring((Entered chat string), 8, 8)))))) Current gold) Greater than or equal to PrivatePrice[(Player number of (Triggering player))]
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Set Variable Set PrivateBuyer[(Player number of (Triggering player))] = (Player((Integer((Substring((Entered chat string), 8, 8))))))
Set Variable Set PrivateSeller[(Integer((Substring((Entered chat string), 8, 8))))] = (Triggering player)
Game - Display to (Player group((Triggering player))) the text: (You have chosen to sell + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + ( for a sum of $ + ((String(PrivatePrice[(Player number of (Triggering player))])) + ( to + (Name of PrivateBuyer[(Player number of (Triggering player))]))))))
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "0"
Game - Display to (Player group(PrivateBuyer[(Player number of (Triggering player))])) the text: ((Name of (Triggering player)) + ( has offered to sell you + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + ( for $ + ((String(PrivatePrice[(Player number of (Triggering player))])) + . Do you |cffffc080accept|r? (ignore to decline))))))
Set Variable Set PrivateBuyOffer[(Player number of PrivateBuyer[(Player number of (Triggering player))])] = "true"
Set Variable Set TempInteger = (Player number of PrivateBuyer[(Player number of (Triggering player))])
If (TempInteger Equal to 1) then do (Start PrivateTimer1 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 2) then do (Start PrivateTimer2 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 3) then do (Start PrivateTimer3 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 4) then do (Start PrivateTimer4 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 5) then do (Start PrivateTimer5 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 6) then do (Start PrivateTimer6 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 7) then do (Start PrivateTimer7 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 8) then do (Start PrivateTimer8 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
Trading Accept Private
Events
Player - Player 1 (Red) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Conditions
PrivateBuyOffer[(Player number of (Triggering player))] Equal to True
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Player - Add PrivatePrice[(Player number of PrivateSeller[(Player number of (Triggering player))])] to PrivateSeller[(Player number of (Triggering player))] . Current gold
Player - Add (-1 x PrivatePrice[(Player number of PrivateSeller[(Player number of (Triggering player))])]) to (Triggering player) . Current gold
Game - Display to (Player group((Triggering player))) the text: (You have purchased + PropertyName[SelectedProperty[(Player number of PrivateSeller[(Player number of (Triggering player))])]])
Game - Display to (Player group(PrivateSeller[(Player number of (Triggering player))])) the text: ((Name of (Triggering player)) + has accepted your offer!)
Game - Display to (All players matching (((Matching player) Not equal to (Triggering player)) and ((Matching player) Not equal to PrivateSeller[(Player number of (Triggering player))])).) the text: ((Name of PrivateSeller[(Player number of (Triggering player))]) + ( has sold + (PropertyName[SelectedProperty[(Player number of PrivateSeller[(Player number of (Triggering player))])]] + ( to + ((Name of (Triggering player)) + .)))))
If (PropertyMortgage[SelectedProperty[(Player number of PrivateSeller[(Player number of (Triggering player))])]] Equal to True) then do (Add (Integer((-0.05 x (Real(PropertyPrice[SelectedProperty[(Player number of PrivateSeller[(Player number of (Triggering player))])]]))))) to (Triggering player).Current gold) else do (Do nothing)
If (PropertyMortgage[SelectedProperty[(Player number of PrivateSeller[(Player number of (Triggering player))])]] Equal to True) then do (Display to (Player group((Triggering player))) the text: The bank has charged you 10% of the mortgage price on the property.) else do (Do nothing)
Set Variable Set PropertyOwner[SelectedProperty[(Player number of PrivateSeller[(Player number of (Triggering player))])]] = (Triggering player)
Unit - Change ownership of PropertyOwnerLabel[SelectedProperty[(Player number of PrivateSeller[(Player number of (Triggering player))])]] to (Triggering player) and Change color
Set Variable Set PrivateBuyOffer[(Player number of (Triggering player))] = "false"
Trading Decline Private1
Events
Time - PrivateTimer1 expires
Conditions
(PrivateBuyOffer[1] Equal to True) or ((PrivateExchangeOffer[1] Equal to True) or (PrivateExchangeOffer2[1] Equal to True))
Actions
Set Variable Set PrivateBuyOffer[1] = "false"
Set Variable Set PrivateExchangeOffer[1] = "false"
If (TradeMenu[1] Equal to 11) then do (Set VariableSet TradeMenu[1] = "0") else do (Do nothing)
Game - Display to (Player group(Player 1 (Red))) the text: (You have declined + ((Name of PrivateSeller[1]) + 's offer.))
Game - Display to (Player group(PrivateSeller[1])) the text: ((Name of Player 1 (Red)) + has declined your offer.)
Trading Decline Private2
Events
Time - PrivateTimer2 expires
Conditions
(PrivateBuyOffer[2] Equal to True) or ((PrivateExchangeOffer[2] Equal to True) or (PrivateExchangeOffer2[2] Equal to True))
Actions
Set Variable Set PrivateBuyOffer[2] = "false"
Set Variable Set PrivateExchangeOffer[2] = "false"
If (TradeMenu[2] Equal to 11) then do (Set VariableSet TradeMenu[2] = "0") else do (Do nothing)
Game - Display to (Player group(Player 2 (Blue))) the text: (You have declined + ((Name of PrivateSeller[2]) + 's offer.))
Game - Display to (Player group(PrivateSeller[2])) the text: ((Name of Player 2 (Blue)) + has declined your offer.)
Trading Decline Private3
Events
Time - PrivateTimer3 expires
Conditions
(PrivateBuyOffer[3] Equal to True) or ((PrivateExchangeOffer[3] Equal to True) or (PrivateExchangeOffer2[3] Equal to True))
Actions
Set Variable Set PrivateBuyOffer[3] = "false"
Set Variable Set PrivateExchangeOffer[3] = "false"
If (TradeMenu[3] Equal to 11) then do (Set VariableSet TradeMenu[3] = "0") else do (Do nothing)
Game - Display to (Player group(Player 3 (Teal))) the text: (You have declined + ((Name of PrivateSeller[3]) + 's offer.))
Game - Display to (Player group(PrivateSeller[3])) the text: ((Name of Player 3 (Teal)) + has declined your offer.)
Trading Decline Private4
Events
Time - PrivateTimer4 expires
Conditions
(PrivateBuyOffer[4] Equal to True) or ((PrivateExchangeOffer[4] Equal to True) or (PrivateExchangeOffer2[4] Equal to True))
Actions
Set Variable Set PrivateBuyOffer[4] = "false"
Set Variable Set PrivateExchangeOffer[4] = "false"
If (TradeMenu[4] Equal to 11) then do (Set VariableSet TradeMenu[4] = "0") else do (Do nothing)
Game - Display to (Player group(Player 4 (Purple))) the text: (You have declined + ((Name of PrivateSeller[4]) + 's offer.))
Game - Display to (Player group(PrivateSeller[4])) the text: ((Name of Player 4 (Purple)) + has declined your offer.)
Trading Decline Private5
Events
Time - PrivateTimer5 expires
Conditions
(PrivateBuyOffer[5] Equal to True) or ((PrivateExchangeOffer[5] Equal to True) or (PrivateExchangeOffer2[5] Equal to True))
Actions
Set Variable Set PrivateBuyOffer[5] = "false"
Set Variable Set PrivateExchangeOffer[5] = "false"
If (TradeMenu[5] Equal to 11) then do (Set VariableSet TradeMenu[5] = "0") else do (Do nothing)
Game - Display to (Player group(Player 5 (Yellow))) the text: (You have declined + ((Name of PrivateSeller[5]) + 's offer.))
Game - Display to (Player group(PrivateSeller[5])) the text: ((Name of Player 5 (Yellow)) + has declined your offer.)
Trading Decline Private6
Events
Time - PrivateTimer6 expires
Conditions
(PrivateBuyOffer[6] Equal to True) or ((PrivateExchangeOffer[6] Equal to True) or (PrivateExchangeOffer2[6] Equal to True))
Actions
Set Variable Set PrivateBuyOffer[6] = "false"
Set Variable Set PrivateExchangeOffer[6] = "false"
If (TradeMenu[6] Equal to 11) then do (Set VariableSet TradeMenu[6] = "0") else do (Do nothing)
Game - Display to (Player group(Player 6 (Orange))) the text: (You have declined + ((Name of PrivateSeller[6]) + 's offer.))
Game - Display to (Player group(PrivateSeller[6])) the text: ((Name of Player 6 (Orange)) + has declined your offer.)
Trading Decline Private7
Events
Time - PrivateTimer7 expires
Conditions
(PrivateBuyOffer[7] Equal to True) or ((PrivateExchangeOffer[7] Equal to True) or (PrivateExchangeOffer2[7] Equal to True))
Actions
Set Variable Set PrivateBuyOffer[7] = "false"
Set Variable Set PrivateExchangeOffer[7] = "false"
If (TradeMenu[7] Equal to 11) then do (Set VariableSet TradeMenu[7] = "0") else do (Do nothing)
Game - Display to (Player group(Player 7 (Green))) the text: (You have declined + ((Name of PrivateSeller[7]) + 's offer.))
Game - Display to (Player group(PrivateSeller[7])) the text: ((Name of Player 7 (Green)) + has declined your offer.)
Trading Decline Private8
Events
Time - PrivateTimer8 expires
Conditions
(PrivateBuyOffer[8] Equal to True) or ((PrivateExchangeOffer[8] Equal to True) or (PrivateExchangeOffer2[8] Equal to True))
Actions
Set Variable Set PrivateBuyOffer[8] = "false"
Set Variable Set PrivateExchangeOffer[8] = "false"
If (TradeMenu[8] Equal to 11) then do (Set VariableSet TradeMenu[8] = "0") else do (Do nothing)
Game - Display to (Player group(Player 8 (Pink))) the text: (You have declined + ((Name of PrivateSeller[8]) + 's offer.))
Game - Display to (Player group(PrivateSeller[8])) the text: ((Name of Player 8 (Pink)) + has declined your offer.)
Trading Player Exchange
Events
Player - Player 1 (Red) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 2 (Blue) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 3 (Teal) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 4 (Purple) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 5 (Yellow) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 6 (Orange) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 7 (Green) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Player - Player 8 (Pink) types a chat message containing player (Unexpected type: 'stringnoformat') as A substring
Conditions
(Substring((Entered chat string), 1, 7)) Equal to player
TradeMenu[(Player number of (Triggering player))] Equal to 10
(Integer((Substring((Entered chat string), 8, 8)))) Greater than 0
((Player((Integer((Substring((Entered chat string), 8, 8)))))) Current gold) Greater than or equal to PrivatePrice[(Player number of (Triggering player))]
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Set Variable Set PrivateBuyer[(Player number of (Triggering player))] = (Player((Integer((Substring((Entered chat string), 8, 8))))))
Set Variable Set PrivateSeller[(Integer((Substring((Entered chat string), 8, 8))))] = (Triggering player)
Game - Display to (Player group((Triggering player))) the text: (You have chosen to exchange + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + ( for a property owned by + (Name of PrivateBuyer[(Player number of (Triggering player))]))))
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "11"
Game - Display to (Player group(PrivateBuyer[(Player number of (Triggering player))])) the text: ((Name of (Triggering player)) + ( has offered to give you + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + in exchange for another property. Do you |cffffc080accept|r? (ignore to decline))))
Set Variable Set PrivateExchangeOffer[(Player number of PrivateBuyer[(Player number of (Triggering player))])] = "true"
Set Variable Set TempInteger = (Player number of PrivateBuyer[(Player number of (Triggering player))])
If (TempInteger Equal to 1) then do (Start PrivateTimer1 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 2) then do (Start PrivateTimer2 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 3) then do (Start PrivateTimer3 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 4) then do (Start PrivateTimer4 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 5) then do (Start PrivateTimer5 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 6) then do (Start PrivateTimer6 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 7) then do (Start PrivateTimer7 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 8) then do (Start PrivateTimer8 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
Trading Accept Exchange1
Events
Player - Player 1 (Red) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of PrivateSeller[(Player number of (Triggering player))])] Equal to 11
PrivateExchangeOffer[(Player number of (Triggering player))] Equal to True
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Set Variable Set SelectingPlayer = (Triggering player)
Unit Group - Pick every unit in (Units owned by SelectingPlayer of type Property Selector) and do (Remove (Picked unit) from the game)
For each (Integer B) from 1 to 40 , do (Run Create_Property_Selectors <gen> (ignoring conditions))
If ((Number of units in (Units owned by (Triggering player) of type Property Selector)) Greater than 0) then do (Display to (Player group((Triggering player))) the text: Select the property you wish to exchange.) else do (Display to (Player group((Triggering player))) the text: You cannot exchange any properties at this time.)
If ((Number of units in (Units owned by SelectingPlayer of type Property Selector)) Equal to 0) then do (Set VariableSet TradeMenu[(Player number of PrivateSeller[(Player number of (Triggering player))])] = "0") else do (Do nothing)
If ((Number of units in (Units owned by SelectingPlayer of type Property Selector)) Equal to 0) then do (Set VariableSet SelectingPlayer = Neutral Victim) else do (Do nothing)
Trading Select Exchange
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Conditions
(Owner of (Triggering unit)) Equal to (Triggering player)
(Unit-type of (Triggering unit)) Equal to Property Selector
PrivateExchangeOffer[(Player number of (Triggering player))] Equal to True
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
For each (Integer A) from 1 to 40 , do (If ((Squares[(Integer A)] contains (Triggering unit)) Equal to True) then do (Set VariableSet SelectedProperty[(Player number of (Triggering player))] = (Integer A)) else do (Do nothing))
Game - Display to (Player group((Triggering player))) the text: (You have chose to give + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + ( to + ((Name of PrivateSeller[(Player number of (Triggering player))]) + ( in exchange for + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + .))))))
Game - Display to (Player group(PrivateSeller[(Player number of (Triggering player))])) the text: ((Name of (Triggering player)) + ( has offered to give you + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + ( in exchange for + (PropertyName[SelectedProperty[(Player number of PrivateSeller[(Player number of (Triggering player))])]] + . Do you |cffffc080accept|r? (ignore to decline))))))
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (Remove (Picked unit) from the game)
Set Variable Set PrivateExchangeOffer2[(Player number of PrivateSeller[(Player number of (Triggering player))])] = "true"
Set Variable Set PrivateExchangeOffer[(Player number of (Triggering player))] = "false"
Set Variable Set TempInteger = (Player number of PrivateSeller[(Player number of (Triggering player))])
If (TempInteger Equal to 1) then do (Start PrivateTimer1 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 2) then do (Start PrivateTimer2 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 3) then do (Start PrivateTimer3 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 4) then do (Start PrivateTimer4 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 5) then do (Start PrivateTimer5 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 6) then do (Start PrivateTimer6 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 7) then do (Start PrivateTimer7 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
If (TempInteger Equal to 8) then do (Start PrivateTimer8 as a One-shot timer that will expire in 20.00 seconds) else do (Do nothing)
Trading Accept Exchange2
Events
Player - Player 1 (Red) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing accept (Unexpected type: 'stringnoformat') as An exact match
Conditions
PrivateExchangeOffer2[(Player number of (Triggering player))] Equal to True
TradeMenu[(Player number of (Triggering player))] Equal to 11
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Cinematic - Clear the screen of text messages for (Player group(PrivateBuyer[(Player number of (Triggering player))])) .
Game - Display to (Player group((Triggering player))) the text: (You have exchanged + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + ( for + (PropertyName[SelectedProperty[(Player number of PrivateBuyer[(Player number of (Triggering player))])]] + !))))
Game - Display to (Player group(PrivateSeller[(Player number of (Triggering player))])) the text: ((Name of (Triggering player)) + ( has accepted your offer! You have exchanged + (PropertyName[SelectedProperty[(Player number of PrivateBuyer[(Player number of (Triggering player))])]] + ( for + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + !)))))
Game - Display to (All players matching (((Matching player) Not equal to (Triggering player)) and ((Matching player) Not equal to PrivateSeller[(Player number of (Triggering player))])).) the text: ((Name of PrivateSeller[(Player number of (Triggering player))]) + (( and + ((Name of PrivateBuyer[(Player number of (Triggering player))]) + have exchanged ownership of )) + (PropertyName[SelectedProperty[(Player number of (Triggering player))]] + ( and + (PropertyName[SelectedProperty[(Player number of PrivateBuyer[(Player number of (Triggering player))])]] + .)))))
Set Variable Set PropertyOwner[SelectedProperty[(Player number of (Triggering player))]] = PrivateBuyer[(Player number of (Triggering player))]
Set Variable Set PropertyOwner[SelectedProperty[(Player number of PrivateBuyer[(Player number of (Triggering player))])]] = (Triggering player)
Unit - Change ownership of PropertyOwnerLabel[SelectedProperty[(Player number of (Triggering player))]] to PrivateBuyer[(Player number of (Triggering player))] and Change color
Unit - Change ownership of PropertyOwnerLabel[SelectedProperty[(Player number of PrivateBuyer[(Player number of (Triggering player))])]] to (Triggering player) and Change color
Set Variable Set PrivateExchangeOffer2[(Player number of (Triggering player))] = "false"
Set Variable Set PrivateExchangeOffer[(Player number of PrivateBuyer[(Player number of (Triggering player))])] = "false"
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "0"
Cancel Trading
Events
Player - Player 1 (Red) types a chat message containing cancel (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing cancel (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing cancel (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing cancel (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing cancel (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing cancel (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing cancel (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing cancel (Unexpected type: 'stringnoformat') as An exact match
Conditions
TradeMenu[(Player number of (Triggering player))] Not equal to 0
Actions
Cinematic - Clear the screen of text messages for (Player group((Triggering player))) .
Game - Display to (Player group((Triggering player))) the text: Trading cancelled.
Unit Group - Pick every unit in (Units owned by (Triggering player) of type Property Selector) and do (Remove (Picked unit) from the game)
Set Variable Set TradeMenu[(Player number of (Triggering player))] = "0"
Create Property Selectors
Events
Conditions
Actions
Set Variable Set TempInteger = "0"
Set Variable Set CompleteSet = "true"
Set Variable Set BuildBalance = "true"
If ((PropertyOwner[(Integer B)] Equal to SelectingPlayer) and ((TradeMenu[(Player number of SelectingPlayer)] Equal to 2) and (((Number of units in (Units in PropertyCountingSite[(Integer B)] matching ((Unit-type of (Matching unit)) Equal to Tavern))) Equal to 0) and (PropertyMortgage[(Integer B)] Equal to False)))) then do (Set VariableSet TempInteger = (Integer B)) else do (Do nothing)
For each (Integer A) from ((Integer B) - 3) to ((Integer B) + 3) , do (If ((PropertyOwner[(Integer A)] Not equal to PropertyOwner[(Integer B)]) and (PropertyType[(Integer B)] Equal to PropertyType[(Integer A)])) then do (Set VariableSet CompleteSet = "false") else do (Do nothing))
For each (Integer A) from ((Integer B) - 3) to ((Integer B) + 3) , do (If ((((Number of units in (Units in PropertyCountingSite[(Integer B)] matching ((Unit-type of (Matching unit)) Equal to Tavern))) Equal to 1) or (((Number of units in (Units in PropertyCountingSite[(Integer A)] matching ((Unit-type of (Matching unit)) Equal to House))) Less than (Number of units in (Units in PropertyCountingSite[(Integer B)] matching ((Unit-type of (Matching unit)) Equal to House)))) and ((Number of units in (Units in PropertyBuildingSite[(Integer A)] matching ((Unit-type of (Matching unit)) Equal to Tavern))) Equal to 0))) and (PropertyType[(Integer B)] Equal to PropertyType[(Integer A)])) then do (Set VariableSet BuildBalance = "false") else do (Do nothing))
If ((TempInteger Not equal to 0) and (((BuildBalance Equal to True) and (CompleteSet Equal to True)) and (PropertyType[(Integer B)] Less than or equal to 8))) then do (Create 1.Property Selector for SelectingPlayer at (Center of Squares[(Integer B)]) facing Default building facing degrees) else do (Do nothing)
Set Variable Set BuildBalance = "true"
Set Variable Set TempInteger = "0"
If ((PropertyOwner[(Integer B)] Equal to SelectingPlayer) and ((TradeMenu[(Player number of SelectingPlayer)] Equal to 3) and (PropertyType[(Integer B)] Less than or equal to 10))) then do (Set VariableSet TempInteger = (Integer B)) else do (Do nothing)
For each (Integer A) from ((Integer B) - 3) to ((Integer B) + 3) , do (If (((((Number of units in (Units in PropertyCountingSite[(Integer B)] matching ((Unit-type of (Matching unit)) Equal to Tavern))) Equal to 0) and ((Number of units in (Units in PropertyCountingSite[(Integer A)] matching ((Unit-type of (Matching unit)) Equal to House))) Greater than (Number of units in (Units in PropertyCountingSite[(Integer B)] matching ((Unit-type of (Matching unit)) Equal to House))))) or ((Number of units in (Units in PropertyCountingSite[(Integer A)] matching ((Unit-type of (Matching unit)) Equal to Tavern))) Greater than (Number of units in (Units in PropertyCountingSite[(Integer B)] matching ((Unit-type of (Matching unit)) Equal to Tavern))))) and (PropertyType[(Integer B)] Equal to PropertyType[(Integer A)])) then do (Set VariableSet BuildBalance = "false") else do (Do nothing))
If ((TempInteger Not equal to 0) and (BuildBalance Equal to True)) then do (Create 1.Property Selector for SelectingPlayer at (Center of Squares[(Integer B)]) facing Default building facing degrees) else do (Do nothing)
Set Variable Set BuildBalance = "true"
Set Variable Set TempInteger = "0"
If ((PropertyOwner[(Integer B)] Equal to SelectingPlayer) and ((TradeMenu[(Player number of SelectingPlayer)] Equal to 6) and ((Number of units in (Units in PropertyCountingSite[(Integer B)] matching (((Unit-type of (Matching unit)) Equal to House) or (((Unit-type of (Matching unit)) Equal to Tavern) or ((Unit-type of (Matching unit)) Equal to Mortgage (Cinematic)))))) Equal to 0))) then do (Set VariableSet TempInteger = (Integer B)) else do (Do nothing)
For each (Integer A) from ((Integer B) - 3) to ((Integer B) + 3) , do (If (((Number of units in (Units in PropertyCountingSite[(Integer A)] matching (((Unit-type of (Matching unit)) Equal to House) or ((Unit-type of (Matching unit)) Equal to Tavern)))) Not equal to 0) and (PropertyType[(Integer B)] Equal to PropertyType[(Integer A)])) then do (Set VariableSet BuildBalance = "false") else do (Do nothing))
If ((TempInteger Not equal to 0) and (BuildBalance Equal to True)) then do (Create 1.Property Selector for SelectingPlayer at (Center of Squares[(Integer B)]) facing Default building facing degrees) else do (Do nothing)
If (((PropertyOwner[(Integer B)] Equal to SelectingPlayer) and (BuildBalance Equal to True)) and (TradeMenu[(Player number of SelectingPlayer)] Equal to 7)) then do (Create 1.Property Selector for SelectingPlayer at (Center of Squares[(Integer B)]) facing Default building facing degrees) else do (Do nothing)
If (((PropertyOwner[(Integer B)] Equal to SelectingPlayer) and (BuildBalance Equal to True)) and (PrivateExchangeOffer[(Player number of SelectingPlayer)] Equal to True)) then do (Create 1.Property Selector for SelectingPlayer at (Center of Squares[(Integer B)]) facing Default building facing degrees) else do (Do nothing)
Pay off partial debt
Events
Player - Player 1 (Red) 's Current gold becomes Greater than 0.00
Player - Player 2 (Blue) 's Current gold becomes Greater than 0.00
Player - Player 3 (Teal) 's Current gold becomes Greater than 0.00
Player - Player 4 (Purple) 's Current gold becomes Greater than 0.00
Player - Player 5 (Yellow) 's Current gold becomes Greater than 0.00
Player - Player 6 (Orange) 's Current gold becomes Greater than 0.00
Player - Player 7 (Green) 's Current gold becomes Greater than 0.00
Player - Player 8 (Pink) 's Current gold becomes Greater than 0.00
Conditions
((Triggering player) Current gold) Less than Debt[(Player number of (Triggering player))]
InDebt[(Player number of (Triggering player))] Equal to True
Actions
Set Variable Set Debt[(Player number of (Triggering player))] = (Debt[(Player number of (Triggering player))] - ((Triggering player) Current gold))
Player - Add ((Triggering player) Current gold) to DebtCreditor[(Player number of (Triggering player))] . Current gold
Game - Display to (Player group(DebtCreditor[(Player number of (Triggering player))])) the text: ((Name of (Triggering player)) + ( has paid $ + ((String(((Triggering player) Current gold))) + ( off their debt, and owes an additional $ + (String(Debt[(Player number of (Triggering player))]))))))
Player - Set (Triggering player) . Current gold to 0
Player Group - Pick every player in (All players) and do (Change the value for (Triggering player) in LeaderBoardArray[(Player number of (Picked player))] to Debt[(Player number of (Triggering player))])
Game - Display to (Player group((Triggering player))) the text: (You still owe $ + ((String(Debt[(Player number of (Triggering player))])) + ( to + ((Name of DebtCreditor[(Player number of (Triggering player))]) + .))))
Pay off entire debt
Events
Player - Player 1 (Red) 's Current gold becomes Greater than 0.00
Player - Player 2 (Blue) 's Current gold becomes Greater than 0.00
Player - Player 3 (Teal) 's Current gold becomes Greater than 0.00
Player - Player 4 (Purple) 's Current gold becomes Greater than 0.00
Player - Player 5 (Yellow) 's Current gold becomes Greater than 0.00
Player - Player 6 (Orange) 's Current gold becomes Greater than 0.00
Player - Player 7 (Green) 's Current gold becomes Greater than 0.00
Player - Player 8 (Pink) 's Current gold becomes Greater than 0.00
Conditions
((Triggering player) Current gold) Greater than or equal to Debt[(Player number of (Triggering player))]
InDebt[(Player number of (Triggering player))] Equal to True
Actions
Set Variable Set InDebt[(Player number of (Triggering player))] = "false"
Game - Display to (Player group(DebtCreditor[(Player number of (Triggering player))])) the text: ((Name of (Triggering player)) + ( has paid $ + ((String(Debt[(Player number of (Triggering player))])) + , and has finalised their debt.)))
Player - Add Debt[(Player number of (Triggering player))] to DebtCreditor[(Player number of (Triggering player))] . Current gold
Player - Add (-1 x Debt[(Player number of (Triggering player))]) to (Triggering player) . Current gold
Set Variable Set Debt[(Player number of (Triggering player))] = "0"
Set Variable Set DebtCreditor[(Player number of (Triggering player))] = Player 12 (Brown)
Game - Display to (Player group((Triggering player))) the text: You have paid off your debt.
Player Group - Pick every player in (All players) and do (Change the label for (Triggering player) in LeaderBoardArray[(Player number of (Picked player))] to (|cffffffff + ((String((Player number of (Triggering player)))) + ( - |r + (Name of (Triggering player))))))
Player Group - Pick every player in (All players) and do (Change the value for (Triggering player) in LeaderBoardArray[(Player number of (Picked player))] to ((Triggering player) Current gold))
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Declare Bankrupt
Events
Player - Player 1 (Red) types a chat message containing bankrupt (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing bankrupt (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing bankrupt (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing bankrupt (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing bankrupt (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing bankrupt (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing bankrupt (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing bankrupt (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Set Variable Set LeftPlayer = (Triggering player)
Set Variable Set PlayerLeft[(Player number of (Triggering player))] = "true"
Game - Display to (All players) for 45.00 seconds the text: ((Name of LeftPlayer) + ( has been declared bankrupt. All their property has been surrendered to + (Name of DebtCreditor[(Player number of LeftPlayer)])))
Trigger - Run Bankruptcy <gen> (ignoring conditions)
Player 1 Leaves
Events
Time - Every 10.00 seconds of game time
Conditions
(Player 1 (Red) slot status) Equal to Has left the game
PlayerLeft[1] Equal to False
Actions
Set Variable Set PlayerLeft[1] = "true"
Set Variable Set LeftPlayer = Player 1 (Red)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Display to (All players) for 30 seconds the text: ((Name of LeftPlayer) + ( has left the game. All his property has been surrendered to + (Name of DebtCreditor[(Player number of LeftPlayer)])))) else do (Do nothing)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Run Bankruptcy <gen> (checking conditions)) else do (Do nothing)
Player 2 Leaves
Events
Time - Every 10.00 seconds of game time
Conditions
(Player 2 (Blue) slot status) Equal to Has left the game
PlayerLeft[2] Equal to False
Actions
Set Variable Set PlayerLeft[2] = "true"
Set Variable Set LeftPlayer = Player 2 (Blue)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Display to (All players) for 30 seconds the text: ((Name of LeftPlayer) + ( has left the game. All his property has been surrendered to + (Name of DebtCreditor[(Player number of LeftPlayer)])))) else do (Do nothing)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Run Bankruptcy <gen> (checking conditions)) else do (Do nothing)
Player 3 Leaves
Events
Time - Every 10.00 seconds of game time
Conditions
(Player 3 (Teal) slot status) Equal to Has left the game
PlayerLeft[3] Equal to False
Actions
Set Variable Set PlayerLeft[3] = "true"
Set Variable Set LeftPlayer = Player 3 (Teal)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Display to (All players) for 30 seconds the text: ((Name of LeftPlayer) + ( has left the game. All his property has been surrendered to + (Name of DebtCreditor[(Player number of LeftPlayer)])))) else do (Do nothing)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Run Bankruptcy <gen> (checking conditions)) else do (Do nothing)
Player 4 Leaves
Events
Time - Every 10.00 seconds of game time
Conditions
(Player 4 (Purple) slot status) Equal to Has left the game
PlayerLeft[4] Equal to False
Actions
Set Variable Set PlayerLeft[4] = "true"
Set Variable Set LeftPlayer = Player 4 (Purple)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Display to (All players) for 30 seconds the text: ((Name of LeftPlayer) + ( has left the game. All his property has been surrendered to + (Name of DebtCreditor[(Player number of LeftPlayer)])))) else do (Do nothing)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Run Bankruptcy <gen> (checking conditions)) else do (Do nothing)
Player 5 Leaves
Events
Time - Every 10.00 seconds of game time
Conditions
(Player 5 (Yellow) slot status) Equal to Has left the game
PlayerLeft[5] Equal to False
Actions
Set Variable Set PlayerLeft[5] = "true"
Set Variable Set LeftPlayer = Player 5 (Yellow)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Display to (All players) for 30 seconds the text: ((Name of LeftPlayer) + ( has left the game. All his property has been surrendered to + (Name of DebtCreditor[(Player number of LeftPlayer)])))) else do (Do nothing)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Run Bankruptcy <gen> (checking conditions)) else do (Do nothing)
Player 6 Leaves
Events
Time - Every 10.00 seconds of game time
Conditions
(Player 6 (Orange) slot status) Equal to Has left the game
PlayerLeft[6] Equal to False
Actions
Set Variable Set PlayerLeft[6] = "true"
Set Variable Set LeftPlayer = Player 6 (Orange)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Display to (All players) for 30 seconds the text: ((Name of LeftPlayer) + ( has left the game. All his property has been surrendered to + (Name of DebtCreditor[(Player number of LeftPlayer)])))) else do (Do nothing)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Run Bankruptcy <gen> (checking conditions)) else do (Do nothing)
Player 7 Leaves
Events
Time - Every 10.00 seconds of game time
Conditions
(Player 7 (Green) slot status) Equal to Has left the game
PlayerLeft[7] Equal to False
Actions
Set Variable Set PlayerLeft[7] = "true"
Set Variable Set LeftPlayer = Player 7 (Green)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Display to (All players) for 30 seconds the text: ((Name of LeftPlayer) + ( has left the game. All his property has been surrendered to + (Name of DebtCreditor[(Player number of LeftPlayer)])))) else do (Do nothing)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Run Bankruptcy <gen> (checking conditions)) else do (Do nothing)
Player 8 Leaves
Events
Time - Every 10.00 seconds of game time
Conditions
(Player 8 (Pink) slot status) Equal to Has left the game
PlayerLeft[8] Equal to False
Actions
Set Variable Set PlayerLeft[8] = "true"
Set Variable Set LeftPlayer = Player 8 (Pink)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Display to (All players) for 30 seconds the text: ((Name of LeftPlayer) + ( has left the game. All his property has been surrendered to + (Name of DebtCreditor[(Player number of LeftPlayer)])))) else do (Do nothing)
If (LeftPlayer Not equal to Player 12 (Brown)) then do (Run Bankruptcy <gen> (checking conditions)) else do (Do nothing)
Bankruptcy
Events
Conditions
Actions
For each (Integer A) from 1 to 40 , do (If ((Owner of PropertyOwnerLabel[(Integer A)]) Equal to LeftPlayer) then do (Set VariableSet PropertyMortgage[(Integer A)] = "false") else do (Do nothing))
For each (Integer A) from 1 to 40 , do (If ((Owner of PropertyOwnerLabel[(Integer A)]) Equal to LeftPlayer) then do (Change ownership of PropertyOwnerLabel[(Integer A)] to DebtCreditor[(Player number of LeftPlayer)] and Change color) else do (Do nothing))
For each (Integer A) from 1 to 40 , do (If (PropertyOwner[(Integer A)] Equal to LeftPlayer) then do (Set VariableSet PropertyOwner[(Integer A)] = DebtCreditor[(Player number of LeftPlayer)]) else do (Do nothing))
Unit Group - Pick every unit in (Units owned by LeftPlayer.) and do (Remove (Picked unit) from the game)
Player - Set LeftPlayer . Current gold to 0
Player - Set LeftPlayer . Current lumber to 0
Set Variable Set TradeMenu[(Player number of LeftPlayer)] = "-1"
For each (Integer A) from 1 to 8 , do (Change the label for LeftPlayer in LeaderBoardArray[(Integer A)] to (|cff808080 + ((String((Player number of LeftPlayer))) + - Bankrupt|r)))
For each (Integer A) from 1 to 8 , do (Change the color of the value for LeftPlayer in (Last created leaderboard) to (50.00%, 50.00%, 50.00%) with 0% transparency)
If (PlayerOrder[CurrentTurn] Equal to LeftPlayer) then do (Run Next_Turn <gen> (ignoring conditions)) else do (Do nothing)
Set Variable Set LeftPlayer = Player 12 (Brown)
Auction Init
Events
Conditions
Actions
Game - Display to (All players) the text: (PropertyName[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] + is up for auction! Place a bid by typing |cffffc080bid|r followed by an amount.)
Set Variable Set AuctionActive = "true"
Set Variable Set AuctionBid = "0"
Auction Nag
Events
Time - Every 10.00 seconds of game time
Conditions
AuctionActive Equal to True
AuctionBid Equal to 0
Actions
Game - Display to (All players) the text: (PropertyName[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] + is still up for auction!)
Detect Bid
Events
Player - Player 1 (Red) types a chat message containing bid (Unexpected type: 'stringnoformat') as A substring
Player - Player 2 (Blue) types a chat message containing bid (Unexpected type: 'stringnoformat') as A substring
Player - Player 3 (Teal) types a chat message containing bid (Unexpected type: 'stringnoformat') as A substring
Player - Player 4 (Purple) types a chat message containing bid (Unexpected type: 'stringnoformat') as A substring
Player - Player 5 (Yellow) types a chat message containing bid (Unexpected type: 'stringnoformat') as A substring
Player - Player 6 (Orange) types a chat message containing bid (Unexpected type: 'stringnoformat') as A substring
Player - Player 7 (Green) types a chat message containing bid (Unexpected type: 'stringnoformat') as A substring
Player - Player 8 (Pink) types a chat message containing bid (Unexpected type: 'stringnoformat') as A substring
Conditions
(Substring((Entered chat string), 1, 4)) Equal to bid
(Integer((Substring((Entered chat string), 5, 10)))) Less than or equal to ((Triggering player) Current gold)
(Integer((Substring((Entered chat string), 5, 10)))) Greater than AuctionBid
AuctionActive Equal to True
Actions
Set Variable Set AuctionBid = (Integer((Substring((Entered chat string), 5, 10))))
Set Variable Set AuctionBidder = (Triggering player)
Game - Display to (All players) the text: ((Name of (Triggering player)) + ( has made a bid of $ + ((String(AuctionBid)) + !)))
Countdown Timer - Start AuctionTimer as a One-shot timer that will expire in 10.00 seconds
Countdown Timer - Show AuctionTimerWindow
Auction End
Events
Time - AuctionTimer expires
Conditions
Actions
Countdown Timer - Hide AuctionTimerWindow
Game - Display to (All players matching ((Matching player) Not equal to AuctionBidder).) the text: ((Name of AuctionBidder) + ( has purchased + (PropertyName[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] + ( for a price of $ + (String(AuctionBid))))))
Game - Display to (Player group(AuctionBidder)) the text: (You + ( have purchased + (PropertyName[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] + ( for a price of $ + (String(AuctionBid))))))
Player - Add (-1 x AuctionBid) to AuctionBidder . Current gold
Set Variable Set PropertyOwner[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] = AuctionBidder
Unit - Change ownership of PropertyOwnerLabel[CurrentSquare[(Player number of PlayerOrder[CurrentTurn])]] to AuctionBidder and Change color
Set Variable Set AuctionActive = "false"
Set Variable Set AuctionBid = "0"
Set Variable Set AuctionBidder = Player 12 (Brown)
If (RolledDoubles Equal to True) then do (Run Another_Turn <gen> (ignoring conditions)) else do (Run Next_Turn <gen> (ignoring conditions))
Winning
Events
Time - Every 2 seconds of game time
Conditions
Actions
If ((Number of units in (Units in (Playable map area) matching (((Matching unit) is A Hero) Equal to True))) Greater than 1) then do (Skip remaining actions) else do (Do nothing)
Trigger - Turn off (This trigger)
Player Group - Pick every player in (Player group((Owner of (Random unit from (Units in (Playable map area) matching (((Matching unit) is A Hero) Equal to True)))))) and do (Victory (Picked player) (Show dialogs, Show scores))
Player Group - Pick every player in (All players) and do (If ((Number of units in (Units owned by (Picked player).)) Equal to 0) then do (Defeat (Picked player) with the message: ((Name of (Random player from ActivePlayers)) + is victorious!)) else do (Do nothing))
Begin KickVote
Events
Player - Player 1 (Red) types a chat message containing kickvote player (Unexpected type: 'stringnoformat') as A substring
Player - Player 2 (Blue) types a chat message containing kickvote player (Unexpected type: 'stringnoformat') as A substring
Player - Player 3 (Teal) types a chat message containing kickvote player (Unexpected type: 'stringnoformat') as A substring
Player - Player 4 (Purple) types a chat message containing kickvote player (Unexpected type: 'stringnoformat') as A substring
Player - Player 5 (Yellow) types a chat message containing kickvote player (Unexpected type: 'stringnoformat') as A substring
Player - Player 6 (Orange) types a chat message containing kickvote player (Unexpected type: 'stringnoformat') as A substring
Player - Player 7 (Green) types a chat message containing kickvote player (Unexpected type: 'stringnoformat') as A substring
Player - Player 8 (Pink) types a chat message containing kickvote player (Unexpected type: 'stringnoformat') as A substring
Conditions
(Integer((Substring((Entered chat string), 17, 17)))) Less than or equal to 8
(Integer((Substring((Entered chat string), 17, 17)))) Greater than or equal to 1
((Player((Integer((Substring((Entered chat string), 17, 17)))))) slot status) Equal to Is playing
(Triggering player) Not equal to (Player((Integer((Substring((Entered chat string), 17, 17))))))
KickVoteActive Equal to False
Actions
Set Variable Set KickVoteActive = "true"
Wait 2 seconds
Set Variable Set Kicker = (Triggering player)
Set Variable Set Kickee = (Player((Integer((Substring((Entered chat string), 17, 17))))))
Dialog - Clear KickVoteDialog
Dialog - Change the title of KickVoteDialog to (KickVote Enabled|n + (Do you wish to kick + (PlayerColours[(Player number of Kickee)] + ((Name of Kickee) + |r?))))
Dialog - Create a dialog button for KickVoteDialog labelled Yes
Set Variable Set KickVoteYesButton = (Last created dialog Button)
Dialog - Create a dialog button for KickVoteDialog labelled No
Set Variable Set KickVoteNoButton = (Last created dialog Button)
Set Variable Set NumVoters = "0"
For each (Integer A) from 1 to 8 , do (If (((Player((Integer A))) Not equal to Kicker) and (((Player((Integer A))) Not equal to Kickee) and ((PlayerLeft[(Integer A)] Equal to False) and (((Player((Integer A))) is in ActivePlayers.) Equal to True)))) then do (Set VariableSet NumVoters = (NumVoters + 1)) else do (Do nothing))
For each (Integer A) from 1 to 8 , do (If (((Player((Integer A))) Not equal to Kicker) and (((Player((Integer A))) Not equal to Kickee) and ((PlayerLeft[(Integer A)] Equal to False) and (((Player((Integer A))) is in ActivePlayers.) Equal to True)))) then do (Show KickVoteDialog for (Player((Integer A)))) else do (Do nothing))
Detect KickVote
Events
Dialog - A dialog button is clicked for KickVoteDialog
Conditions
Actions
If ((Clicked dialog button) Equal to KickVoteYesButton) then do (Set VariableSet NumVoters = (NumVoters - 1)) else do (Set VariableSet NumVoters = "-1")
Dialog - Hide KickVoteDialog for (Triggering player)
If (NumVoters Greater than 0) then do (Skip remaining actions) else do (Do nothing)
Set Variable Set KickVoteActive = "false"
If (NumVoters Equal to -1) then do (For each (Integer A) from 1 to 8, do (Hide KickVoteDialog for (Player((Integer A))))) else do (Do nothing)
If (NumVoters Equal to -1) then do (Display to (All players) the text: A player can only be kicked by a unanimous vote.) else do (Display to (All players) the text: (By a unanimous vote, + ((Name of Kickee) + will now be kicked.)))
Set Variable Set NumVoters = (NumVoters + 1)
If (NumVoters Equal to 0) then do (Skip remaining actions) else do (Do nothing)
Set Variable Set LeftPlayer = Kickee
Set Variable Set PlayerLeft[(Player number of Kickee)] = "true"
Game - Display to (All players) for 45.00 seconds the text: ((Name of LeftPlayer) + ( has been removed from play. All their property has been surrendered to + (Name of DebtCreditor[(Player number of LeftPlayer)])))
Trigger - Run Bankruptcy <gen> (ignoring conditions)
Select House or Hotel
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Conditions
((Unit-type of (Triggering unit)) Equal to House) or ((Unit-type of (Triggering unit)) Equal to Tavern)
Actions
For each (Integer A) from 1 to 40 , do (If ((PropertyBuildingSite[(Integer A)] contains (Triggering unit)) Equal to True) then do (Set VariableSet TempInteger = (Integer A)) else do (Do nothing))
Set Variable Set TempInteger2 = (Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House)))
Set Variable Set OwedRent = PropertyRentalRates[((TempInteger x 6) + TempInteger2)]
Set Variable Set TempInteger2 = (Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Tavern)))
If (TempInteger2 Equal to 1) then do (Set VariableSet OwedRent = PropertyRentalRates[((TempInteger x 6) + 5)]) else do (Do nothing)
Leaderboard - Add Player 10 (Light Blue) to LeaderBoardArray[(Player number of (Triggering player))] with label 9 and value 0
Leaderboard - Change the color of the label for Player 10 (Light Blue) in LeaderBoardArray[(Player number of (Triggering player))] to ( 0.00 %, 0.00 %, 0.00 %) with 100.00 % transparency
Leaderboard - Change the color of the value for Player 10 (Light Blue) in LeaderBoardArray[(Player number of (Triggering player))] to ( 0.00 %, 0.00 %, 0.00 %) with 100.00 % transparency
Leaderboard - Add Player 9 (Gray) to LeaderBoardArray[(Player number of (Triggering player))] with label Rental price on|nselected property: and value OwedRent
Select Mortgage
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Conditions
(Unit-type of (Triggering unit)) Equal to Mortgage (Cinematic)
Actions
For each (Integer A) from 1 to 40 , do (If ((PropertyBuildingSite[(Integer A)] contains (Triggering unit)) Equal to True) then do (Set VariableSet TempInteger = (Integer A)) else do (Do nothing))
Leaderboard - Add Player 10 (Light Blue) to LeaderBoardArray[(Player number of (Triggering player))] with label 9 and value 0
Leaderboard - Change the color of the label for Player 10 (Light Blue) in LeaderBoardArray[(Player number of (Triggering player))] to ( 0.00 %, 0.00 %, 0.00 %) with 100.00 % transparency
Leaderboard - Change the color of the value for Player 10 (Light Blue) in LeaderBoardArray[(Player number of (Triggering player))] to ( 0.00 %, 0.00 %, 0.00 %) with 100.00 % transparency
Leaderboard - Add Player 9 (Gray) to LeaderBoardArray[(Player number of (Triggering player))] with label Price to unmortgage|nselected property: and value (Integer((0.55 x (Real(PropertyPrice[TempInteger])))))
Select Property Label
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Conditions
((Triggering unit) is in PropertyLabels.) Equal to True
(Triggering unit) Not equal to The SunWell 0060 <gen>
(Triggering unit) Not equal to The Twisting Nether 0047 <gen>
Actions
For each (Integer A) from 1 to 40 , do (If ((Triggering unit) Equal to PropertyOwnerLabel[(Integer A)]) then do (Set VariableSet TempInteger = (Integer A)) else do (Do nothing))
If ((Owner of (Triggering unit)) Equal to Player 12 (Brown)) then do (Set VariableSet OwedRent = PropertyPrice[TempInteger]) else do (Do nothing)
If ((Owner of (Triggering unit)) Not equal to Player 12 (Brown)) then do (If ((TempInteger mod 10) Equal to 6) then do (Run Calculate_Rent_Display_Railroad <gen> (ignoring conditions)) else do (Run Calculate_Rent_Display_Normal <gen> (ignoring conditions))) else do (Do nothing)
Leaderboard - Add Player 10 (Light Blue) to LeaderBoardArray[(Player number of (Triggering player))] with label 9 and value 0
Leaderboard - Change the color of the label for Player 10 (Light Blue) in LeaderBoardArray[(Player number of (Triggering player))] to ( 0.00 %, 0.00 %, 0.00 %) with 100.00 % transparency
Leaderboard - Change the color of the value for Player 10 (Light Blue) in LeaderBoardArray[(Player number of (Triggering player))] to ( 0.00 %, 0.00 %, 0.00 %) with 100.00 % transparency
If (PropertyPrice[TempInteger] Equal to OwedRent) then do (Add Player 9 (Gray) to LeaderBoardArray[(Player number of (Triggering player))] with label Purchase price of|nselected property: and value OwedRent) else do (Add Player 9 (Gray) to LeaderBoardArray[(Player number of (Triggering player))] with label Rental price on|nselected property: and value OwedRent)
Calculate Rent Display Normal
Events
Conditions
Actions
Set Variable Set TempInteger2 = "0"
Set Variable Set CompleteSet = "true"
For each (Integer A) from (TempInteger - 3) to (TempInteger + 3) , do (If ((PropertyOwner[TempInteger] Not equal to PropertyOwner[(Integer A)]) and (PropertyType[TempInteger] Equal to PropertyType[(Integer A)])) then do (Set VariableSet CompleteSet = "false") else do (Do nothing))
Set Variable Set TempInteger2 = (Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to House)))
Set Variable Set OwedRent = PropertyRentalRates[((TempInteger x 6) + TempInteger2)]
If ((CompleteSet Equal to True) and (TempInteger2 Equal to 0)) then do (Set VariableSet OwedRent = (OwedRent x 2)) else do (Do nothing)
Set Variable Set TempInteger2 = (Number of units in (Units in PropertyCountingSite[TempInteger] matching ((Unit-type of (Matching unit)) Equal to Tavern)))
If (TempInteger2 Equal to 1) then do (Set VariableSet OwedRent = PropertyRentalRates[((TempInteger x 6) + 5)]) else do (Do nothing)
Calculate Rent Display Railroad
Events
Conditions
Actions
Set Variable Set TempInteger2 = "0"
For each (Integer A) from 1 to 4 , do (If (PropertyOwner[TempInteger] Equal to PropertyOwner[(((Integer A) x 10) - 4)]) then do (Set VariableSet TempInteger2 = (TempInteger2 + 1)) else do (Do nothing))
Set Variable Set OwedRent = "25"
For each (Integer A) from 1 to 3 , do (If (TempInteger2 Greater than (Integer A)) then do (Set VariableSet OwedRent = (2 x OwedRent)) else do (Do nothing))
If (PayDouble Equal to True) then do (Set VariableSet OwedRent = (OwedRent x 2)) else do (Do nothing)
Select Utility Label
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Conditions
((Triggering unit) Equal to The Twisting Nether 0047 <gen>) or ((Triggering unit) Equal to The SunWell 0060 <gen>)
Actions
Leaderboard - Add Player 10 (Light Blue) to LeaderBoardArray[(Player number of (Triggering player))] with label 9 and value 0
Leaderboard - Change the color of the label for Player 10 (Light Blue) in LeaderBoardArray[(Player number of (Triggering player))] to ( 0.00 %, 0.00 %, 0.00 %) with 100.00 % transparency
Leaderboard - Change the color of the value for Player 10 (Light Blue) in LeaderBoardArray[(Player number of (Triggering player))] to ( 0.00 %, 0.00 %, 0.00 %) with 100.00 % transparency
If ((Owner of (Triggering unit)) Equal to Player 12 (Brown)) then do (Add Player 9 (Gray) to LeaderBoardArray[(Player number of (Triggering player))] with label Purchase price of|nselected property: and value 150) else do (If (PropertyOwner[13] Equal to PropertyOwner[29]) then do (Add Player 9 (Gray) to LeaderBoardArray[(Player number of (Triggering player))] with label Rent here is 10x|nthe number rolled and value 0) else do (Add Player 9 (Gray) to LeaderBoardArray[(Player number of (Triggering player))] with label Rent here is 4x|nthe number rolled and value 0))
If ((Owner of (Triggering unit)) Not equal to Player 12 (Brown)) then do (Change the color of the value for Player 9 (Gray) in LeaderBoardArray[(Player number of (Triggering player))] to (0.00%, 0.00%, 0.00%) with 100.00% transparency) else do (Do nothing)
Select Something Else
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Conditions
(Unit-type of (Triggering unit)) Not equal to House
(Unit-type of (Triggering unit)) Not equal to Tavern
(Unit-type of (Triggering unit)) Not equal to Mortgage (Cinematic)
((Triggering unit) is in PropertyLabels.) Equal to False
Actions
Leaderboard - Remove Player 10 (Light Blue) from LeaderBoardArray[(Player number of (Triggering player))] .
Leaderboard - Remove Player 9 (Gray) from LeaderBoardArray[(Player number of (Triggering player))] .
Resurrect Neutral
Events
Unit - A unit owned by Neutral Passive . Dies
Unit - A unit owned by Neutral Hostile . Dies
Conditions
Actions
Unit - Suspend corpse decay for (Triggering unit)
If (((Triggering unit) is A structure) Equal to True) then do (Wait 29.00 seconds) else do (Wait 60.00 seconds)
Unit - Create 1 . (Unit-type of (Triggering unit)) for (Owner of (Triggering unit)) at (Position of (Triggering unit)) facing (Random angle) degrees
Unit - Remove (Triggering unit) from the game
Create Ankhs
Events
Time - Every 10.00 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in (Units in (Playable map area) matching (((Matching unit) is A Hero) Equal to True)) and do (If (((Picked unit) has an item of type Ankh of Reincarnation) Equal to False) then do (Run Create_Ankhs_Sub_Trigger <gen> (ignoring conditions)) else do (Do nothing))
Create Ankhs Sub Trigger
Events
Conditions
Actions
Hero - Create Ankh of Reincarnation and give it to (Picked unit)
Item - Make (Last created item) Undroppable
Ressurect Doodad
Events
Time - Every 60.00 seconds of game time
Conditions
Actions
For each (Integer A) from 0 to DoodadCount , do (Resurrect DoodadArray[(Integer A)] with (Max life of (Last created destructible)) life and Show birth animation)
Top