| Author | Message | ||
|---|---|---|---|
|
|  Monopoly Batch File
This is not mine, but i thought it was cool so i figure I share it with everyone :) @echo off title Monopoly REM (C) Copyright 2010 GrellesLicht28 REM This is a creation of Makroware. color 0f setlocal enabledelayedexpansion call :SetFields goto :StartMain :: Start of setting fields :SetFields :SetFields :: Player 1 if not defined Field1_1 set Field1_1= if not defined Field2_1 set Field2_1=A if not defined Field3_1 set Field3_1= if not defined Field4_1 set Field4_1= if not defined Field5_1 set Field5_1= if not defined Field6_1 set Field6_1= if not defined Field7_1 set Field7_1=A if not defined Field8_1 set Field8_1= if not defined Field9_1 set Field9_1=A if not defined Field10_1 set Field10_1=A if not defined Field11_1 set Field11_1=i if not defined Field11_J_1 set Field11_J_1= if not defined Field12_1 set Field12_1= if not defined Field13_1 set Field13_1= if not defined Field14_1 set Field14_1= if not defined Field15_1 set Field15_1= if not defined Field16_1 set Field16_1= if not defined Field17_1 set Field17_1= if not defined Field18_1 set Field18_1= if not defined Field19_1 set Field19_1= if not defined Field20_1 set Field20_1= if not defined Field21_1 set Field21_1= if not defined Field22_1 set Field22_1=A if not defined Field23_1 set Field23_1= if not defined Field24_1 set Field24_1=A if not defined Field25_1 set Field25_1=A if not defined Field26_1 set Field26_1= if not defined Field27_1 set Field27_1=A if not defined Field28_1 set Field28_1=A if not defined Field29_1 set Field29_1= if not defined Field30_1 set Field30_1= if not defined Field31_1 set Field31_1= if not defined Field32_1 set Field32_1= if not defined Field33_1 set Field33_1=l if not defined Field34_1 set Field34_1= if not defined Field35_1 set Field35_1= if not defined Field36_1 set Field36_1= if not defined Field37_1 set Field37_1= if not defined Field38_1 set Field38_1= if not defined Field39_1 set Field39_1= if not defined Field40_1 set Field40_1= :: Player 2 if not defined Field1_2 set Field1_2= if not defined Field2_2 set Field2_2=e if not defined Field3_2 set Field3_2= if not defined Field4_2 set Field4_2= if not defined Field5_2 set Field5_2= if not defined Field6_2 set Field6_2= if not defined Field7_2 set Field7_2=e if not defined Field8_2 set Field8_2= if not defined Field9_2 set Field9_2=e if not defined Field10_2 set Field10_2=e if not defined Field11_2 set Field11_2= if not defined Field11_J_2 set Field11_J_2= if not defined Field12_2 set Field12_2= if not defined Field13_2 set Field13_2= if not defined Field14_2 set Field14_2= if not defined Field15_2 set Field15_2= if not defined Field16_2 set Field16_2= if not defined Field17_2 set Field17_2= if not defined Field18_2 set Field18_2= if not defined Field19_2 set Field19_2= if not defined Field20_2 set Field20_2= if not defined Field21_2 set Field21_2= if not defined Field22_2 set Field22_2=e if not defined Field23_2 set Field23_2= if not defined Field24_2 set Field24_2=e if not defined Field25_2 set Field25_2=e if not defined Field26_2 set Field26_2= if not defined Field27_2 set Field27_2=e if not defined Field28_2 set Field28_2=e if not defined Field29_2 set Field29_2= if not defined Field30_2 set Field30_2= if not defined Field31_2 set Field31_2= if not defined Field32_2 set Field32_2= if not defined Field33_2 set Field33_2= if not defined Field34_2 set Field34_2= if not defined Field35_2 set Field35_2= if not defined Field36_2 set Field36_2= if not defined Field37_2 set Field37_2=? if not defined Field38_2 set Field38_2= if not defined Field39_2 set Field39_2= if not defined Field40_2 set Field40_2= exit /b :: End of setting fields :: Instructions start here. :Instructions :Instructions cls echo Instructions of Monopoly echo îîîîîîîîîîîîîîîîîîîîîîîî echo 1. Each player starts with $1500. Their characters are placed on the field echo "Go" in the beginning of the game. echo 2. Every round, the current player has to throw two dice which have 6 sides. echo The amount thrown is between 2 and 12. echo. echo 3. If a player gets on a street or a railroad, he or she can buy it, if it echo is unowned, yet. Else the player has to pay the rent to the owner depending echo on the amount of houses or hotels (or railroads). echo 4. If a player arrives to any other field, he has to follow the instructions echo given on the field. echo. echo 5. Money, which is paid to the bank, goes into "Free Parking" (except for the echo $50 to escape from Jail). This money can be recollected by arriving on this echo field. echo 6. It is not allowed to share money with the other player without arriving on echo one of his or her streets, railroads or companies, selling the echo Get-Out-Of-Jail-Free-card or having to follow the instructions of a echo community chest- or event card. echo. echo 7. There are 16 community chest cards and 16 event cards. They are not chosen echo by following an order, but they are chosen randomly. This allows the same echo card one after the other. echo 8. The Get-Out-Of-Jail-Free-Card can only be owned once. If got, this card echo cannot be chosen by random anymore until it is used or sold. echo 9. You cannot own two Get-Out-Of-Jail-Free-Cards. echo. echo 10. You can only buy houses by arriving right on the field you want to buy echo some. echo 11. You can buy 4 houses on each of the 22 streets. The fifth house will be echo returned into a hotel. The other houses disappear in this case. echo 12. There is no limit of total houses or hotels to use in the entire game echo unless all of the streets got a hotel. echo. echo 13. If you throw three doublets in a row, you are sent to Jail. echo 14. In Jail, you can try a doublet at last for three times. Then you have to echo pay $50. If you don't want to try to roll a doublet, you can pay $50 to echo escape everytime or you can use your Get-Out-Of-Jail-Free-Card if owned. echo 15. If you are "just visiting" the Jail, nothing will happen. echo. echo 16. By passing "Go", you receive $200. By arriving onto the field "Go", you echo receive $400. echo 17. If you get a card which changes your current position, you receive $200 by echo passing "Go". echo 18. You do not receive $200 if you are sent to Jail, no matter if passing "Go" echo or not. echo. echo 19. The game ends when one player loses all his or her money. The player is not echo allowed to sell any property like houses, hotels, streets, railroads, echo companies or cards anymore. echo. set /p Pause= exit /b :: Instructions end here. :StartMain :StartMain cls echo ÉÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂû echo º Choose your character: º echo º 1: Û º echo º 2: ² º echo º 3: ± º echo º 4: ° º echo º º echo ºEnter "instructions" to read them.º echo ÈÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂÃÂÂü set /p Character1=Player 1: Character no. set /p Character2=Player 2: Character no. if "%Character1%" == "1" set Char_1=Û if "%Character1%" == "2" set Char_1=² if "%Character1%" == "3" set Char_1=± if "%Character1%" == "4" set Char_1=° if /i "%Character1%" == "instructions" call :Instructions if "%Character2%" == "1" set Char_2=Û if "%Character2%" == "2" set Char_2=² if "%Character2%" == "3" set Char_2=± if "%Character2%" == "4" set Char_2=° if /i "%Character2%" == "instructions" call :Instructions if not defined Char_1 goto :StartMain if not defined Char_2 goto :StartMain if "%Char_1%" == "%Char_2%" ( echo You cannot use the same character twice. pause goto :StartMain ) set DiceAmount=0 set Escape=4 set Field1_1=%Char_1% set Field1_2=%Char_2% set Money_1=1500 set Money_2=1500 set Money_Parking=0 set Player=1 set Player1Position=1 set Player2Position=1 mode con cols=91 lines=600 :FIELD :FIELD cls set OutOfJail=0 if not "%1" == "StepDone" set Go=0 if not "%1" == "Chance_Walked" set RentalTwice=0 set Player=!Player! echo ÚÄÄÄÄÄÄÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÄÄÄÄÄÄ¿ echo ³ Free ³Kentu-³Chance³India-³Illi- ³B.^& O.³Atlan-³Veni- ³Water ³Marvin³ GO TO ³ echo ³ ÜßßßÜ ³ cky ³ ?? ³ na ³ nois ³ RAIL-³ tic ³ nor ³Works ³ Gar- ³ °°°°° ³ echo ³!Field21_1! ÛÜÜÜÛ !Field21_2!³!Field22_1!venu!Field22_2!³!Field23_1!? ?!Field23_2!³!Field24_1!venu!Field24_2!³!Field25_1!venu!Field25_2!³!Field26_1!ROAD!Field26_2!³!Field27_1!venu!Field27_2!³!Field28_1!venu!Field28_2!³!Field29_1! !Field29_2!³!Field30_1!dens!Field30_2!³!Field31_1! °°° !Field31_2!³ echo ³ ÜÛÛÜÛÛÜ ³ ³ ? ³ ³ ³ ³ ³ ³ ³ ³ ° ³ echo ³ ° ° ³Price ³ ? ³Price ³Price ³Price ³Price ³Price ³Price ³Price ³ ³ echo ³ Parking ³ $220 ³ ? ³ $220 ³ $240 ³ $200 ³ $260 ³ $260 ³ $150 ³ $280 ³ ° JAIL ³ echo ÃÄÄÄÄÄÄÄÄÄÄÄÄÅÄÄÄÄÄÄÃÂÂÄÄÄÄÄÄÃÂÂÄÄÄÄÄÄÃÂÂÄÄÄÄÄÄÃÂÂÄÄÄÄÄÄÃÂÂÄÄÄÄÄÄÃÂÂÄÄÄÄÄÄÃÂÂÄÄÄÄÄÄÃÂÂÄÄÄÄÄÄÅÄÄÄÄÄÄÄÄÄÄÄÄ´ echo ³ New York ³ ________ ³ Pacific ³ echo ³!Field20_1! Avenue !Field20_2!³ / / ³!Field32_1! Avenue !Field32_2!³ echo ³Price: $200 ³ / / ± ± ³Price: $300 ³ echo ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ / / ± ± ± ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ echo ³ Tennessee ³ / / ± ± ³North Caro- ³ echo ³!Field19_1! Avenue !Field19_2!³ /_______/ ± ± ³!Field33_1!ina Avenue!Field33_2!³ echo ³Price: $180 ³ Community Chest ± ± ± ³Price: $300 ³ echo ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ ± ± ± ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ echo ³ Community ³ ± ± ³ Community ³ echo ³!Field18_1! Chest !Field18_2!³ ± ± ³!Field34_1! Chest !Field34_2!³ echo ³ ³ ± ± ³ ³ echo ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ ± ± ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ echo ³ St. James ³ ± ± ³Pennsylvania³ echo ³!Field17_1! Place !Field17_2!³ ± ± ³!Field35_1! Avenue !Field35_2!³ echo ³Price: $180 ³ ± ± ³Price: $320 ³ echo ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ ± ± ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ echo ³PENNSYLVANIA³ ± ± ³ SHORT LINE ³ echo ³!Field16_1! RAILROAD !Field16_2!³ ± ± ± ³!Field36_1! !Field36_2!³ echo ³Price: $200 ³ ± ± ± ³Price: $200 ³ echo ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ ± ± ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ echo ³ Virginia ³ ± ± ³ ?? Chance³ echo ³!Field15_1! Avenue !Field15_2!³ ± ± ³!Field37_1!? ?? ? !Field37_2!³ echo ³Price: $160 ³ ± ± ³ ? ?? ³ echo ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ ± ÃÄÄÄÄÄÄÄÄÄÄÄÄ´ echo ³ States ³ ± ± ³ Park Place ³ echo ³!Field14_1! Avenue !Field14_2!³ ± ± ³!Field38_1! !Field38_2!³ echo ³Price: $140 ³ ± ± ³Price: $350 ³ echo ÃÄÃâ
|
| Re: Monopoly Batch File
but what is it? ive played monopoly on pogo.com :D --- Insomniac:I like how in the lounges forum description sausage says "Bitches go crazy." and that's exactly what you do! Pixel artist | Mapping artist | Alternative artist | Heavenly Karma | oldbie | top 50 | Attention whore | main player | |
