# youplace $metka = $ARGS[0] $loc = $CURLOC <<<<<<< 395_youplace '

Your Land

' if placeMansion < 2: '
' if placeMansion = 2: '
' if placeMansion = 3: '
' ======= '

Your land

' if placeMansion<2:'
' if placeMansion=2:'
' if placeMansion=3:'
' >>>>>>> 395_youplace '' clr <<<<<<< 395_youplace gs 'stat' gs 'time' ======= gs'stat' gs'time' >>>>>>> 395_youplace if car > 0 and cardrive = 18: set cardrive = 18 <<<<<<< 395_youplace 'Your <<$car>> is parked here.' ======= 'In the parking lot is worth your <<$car>>.' >>>>>>> 395_youplace end <<<<<<< 395_youplace act 'Go to the village': minut += 15 & gt 'locmansion' if bassMansion = 1: 'Pool.' if banaMansion >= 1: 'Bath.' if placeMansion = 3: 'Go inside.' if karta >= 1500000 and placeMansion = 0: act 'Buy land for cottage 1500000': cls karta -= 1500000 placeMansion = 1 minut += 5 gs 'stat' 'You have bought land for cottage' act 'Leave': gt $curloc end ======= act 'Exit the village':minut+=15>'locmansion' if bassMansion=1:'Swimming_Pool.' if banaMansion>=1:'bath.' if placeMansion=3:'mansion.' if karta>=1500000 and placeMansion=0: act 'Buy land for cottage 1,5 million': cls karta-=1500000 placeMansion=1 minut+=5 gs'stat' 'You bought a plot cottage' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 500000 and placeMansion = 1: act 'Pay for water, electricity and building foundations 500,000 rubles': cls karta -= 500000 placeMansion = 2 minut += 5 gs 'stat' 'You paid for a supply of communications to the site and zero cycle' act 'Leave': gt $curloc end ======= if karta>=500000 and placeMansion=1: act 'Pay for supply of communications and building foundations 500 sput': cls karta-=500000 placeMansion=2 minut+=5 gs'stat' 'You paid for a supply of communications to the site ' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 1500000 and placeMansion = 2: act 'Pay for the construction and external finish of the building 1.5 million': cls karta -= 1500000 placeMansion = 3 minut += 5 gs 'stat' 'You paid for the construction of housing mansion' act 'Leave': gt $curloc end ======= if karta>=1500000 and placeMansion=2: act 'Pay for construction and exterior of the building 1,5 million': cls karta-=1500000 placeMansion=3 minut+=5 gs'stat' 'You paid for the construction of housing mansion' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 500000 and placeMansion = 3 and ymanrem[3] = 0: act 'Pay for the construction of 500 rooms sput': cls karta -= 500000 ymanrem[3] = 1 minut += 5 gs 'stat' 'You paid for the construction of the rooms.' act 'Leave': gt $curloc end ======= if karta>=500000 and placeMansion=3 and ymanrem[3]=0: act 'Pay for the construction of rooms 500 sput': cls karta-=500000 ymanrem[3]=1 minut+=5 gs'stat' 'You paid for the construction of rooms.' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 800000 and placeMansion >= 2 and banaMansion = 0: act 'Pay for the construction of baths 800,000': cls karta -= 800000 banaMansion = 1 minut += 5 gs 'stat' 'You paid for the construction of baths.' act 'Leave': gt $curloc end ======= if karta>=800000 and placeMansion>=2 and banaMansion=0: act 'Pay for building baths 800 thousand': cls karta-=800000 banaMansion=1 minut+=5 gs'stat' 'You paid for the construction of baths.' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 500000 and placeMansion >= 2 and bassMansion = 0: act 'Pay for the construction of 500,000 basseynai': cls karta -= 500000 bassMansion = 1 minut += 5 gs 'stat' 'You paid for the construction of the pool' act 'Leave': gt $curloc end ======= if karta>=500000 and placeMansion>=2 and bassMansion=0: act 'Pay build basseynai 500 thousand': cls karta-=500000 bassMansion=1 minut+=5 gs'stat' 'You paid for the construction of swimming pools' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[3] = 1: act 'Pay for repairs Hall 250000': cls karta -= 250000 ymanrem[3] = 2 minut += 5 gs 'stat' 'You pay for repairs' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[3]=1: act 'Pay for repairs hall 250 thousand': cls karta-=250000 ymanrem[3]=2 minut+=5 gs'stat' 'You pay for repairs' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 150000 and placeMansion = 3 and ymanrem[3] = 2: act 'Pay lounge furniture 150 000': cls karta -= 150000 ymanrem[3] = 3 minut += 5 gs 'stat' 'You paid for the purchase of furniture' act 'Leave': gt $curloc end ======= if karta>=150000 and placeMansion=3 and ymanrem[3]=2: act 'Pay furniture for living room 150 thousand': cls karta-=150000 ymanrem[3]=3 minut+=5 gs'stat' 'You pay for the purchase of furniture' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[4] = 0: act 'Pay for repairs sleeping 250,000': cls karta -= 250000 ymanrem[4] = 1 minut += 5 gs 'stat' 'You pay for repairs' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[4]=0: act 'Pay for repairs bedroom 250 thousand': cls karta-=250000 ymanrem[4]=1 minut+=5 gs'stat' 'You pay for repairs' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 300000 and placeMansion = 3 and ymanrem[4] = 1: act 'Pay bedroom furniture 300 000': cls karta -= 300000 ymanrem[4] = 2 minut += 5 gs 'stat' 'You paid for the purchase of furniture' act 'Leave': gt $curloc end ======= if karta>=300000 and placeMansion=3 and ymanrem[4]=1: act 'Pay furniture for bedroom 300 thousand': cls karta-=300000 ymanrem[4]=2 minut+=5 gs'stat' 'You pay for the purchase of furniture' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[5] = 0: act 'Pay bathroom renovation 250,000': cls karta -= 250000 ymanrem[5] = 1 minut += 5 gs 'stat' 'You pay for repairs' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[5]=0: act 'Pay for bathroom renovation 250 thousand': cls karta-=250000 ymanrem[5]=1 minut+=5 gs'stat' 'You pay for repairs' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[5] = 1: act 'Pay for furniture and fixtures for the bathroom 250000': cls karta -= 250000 ymanrem[5] = 2 minut += 5 gs 'stat' 'You paid for the purchase of furniture and sanitary ware.' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[5]=1: act 'Pay for furniture and fixtures for the bathroom 250 thousand': cls karta-=250000 ymanrem[5]=2 minut+=5 gs'stat' 'You pay for the purchase of furniture and sanitary ware.' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[6] = 0: act 'Pay renovated kitchen 250000': cls karta -= 250000 ymanrem[6] = 1 minut += 5 gs 'stat' 'You pay for repairs' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[6]=0: act 'Pay for a kitchen renovation 250 thousand': cls karta-=250000 ymanrem[6]=1 minut+=5 gs'stat' 'You pay for repairs' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 350000 and placeMansion = 3 and ymanrem[6] = 1: act 'Pay kitchen furniture 350 000': cls karta -= 250000 ymanrem[6] = 2 minut += 5 gs 'stat' 'You paid for the purchase of furniture for the kitchen.' act 'Leave': gt $curloc end ======= if karta>=350000 and placeMansion=3 and ymanrem[6]=1: act 'Pay kitchen furniture 350 thousand': cls karta-=250000 ymanrem[6]=2 minut+=5 gs'stat' 'You pay for the purchase of furniture for kitchen.' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[7] = 0: act 'Pay for repairs hall 250000': cls karta -= 250000 ymanrem[7] = 1 minut += 5 gs 'stat' 'You pay for repairs' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[7]=0: act 'Pay for repairs hall 250 thousand': cls karta-=250000 ymanrem[7]=1 minut+=5 gs'stat' 'You pay for repairs' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[7] = 1: act 'Pay furniture hall 250000': cls karta -= 250000 ymanrem[7] = 2 minut += 5 gs 'stat' 'You paid for the purchase of furniture for the hall' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[7]=1: act 'Pay furniture hall 250 thousand': cls karta-=250000 ymanrem[7]=2 minut+=5 gs'stat' 'You pay for the purchase of furniture for the hall' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[8] = 0: act 'Pay for repairs fireplace room 250000': cls karta -= 250000 ymanrem[8] = 1 minut += 5 gs 'stat' 'You pay for repairs' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[8]=0: act 'Pay for repairs fireplace room 250 thousand': cls karta-=250000 ymanrem[8]=1 minut+=5 gs'stat' 'You pay for repairs' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[8] = 1: act 'Pay for the purchase of furniture for the fireplace room 250000': cls karta -= 250000 ymanrem[8] = 2 minut += 5 gs 'stat' 'You paid for the purchase of furniture.' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[8]=1: act 'Pay for the purchase of furniture for the fireplace room 250 thousand': cls karta-=250000 ymanrem[8]=2 minut+=5 gs'stat' 'You pay for the purchase of furniture.' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[9] = 0: act 'ChildrenĀ“s room to pay for repairs 250 000': cls karta -= 250000 ymanrem[9] = 1 minut += 5 gs 'stat' 'You pay for repairs' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[9]=0: act 'Pay repair a child`s room 250 thousand': cls karta-=250000 ymanrem[9]=1 minut+=5 gs'stat' 'You pay for repairs' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[9] = 1: act 'Pay for the purchase of furniture for the nursery 250,000': cls karta -= 250000 ymanrem[9] = 2 minut += 5 gs 'stat' 'You paid for the purchase of furniture' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[9]=1: act 'Pay for the purchase of furniture for children`s rooms 250 thousand': cls karta-=250000 ymanrem[9]=2 minut+=5 gs'stat' 'You pay for the purchase of furniture' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[10] = 0: act 'Pay for repairs library 250000': cls karta -= 250000 ymanrem[10] = 1 minut += 5 gs 'stat' 'You pay for repairs' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[10]=0: act 'Pay for repairs library 250 thousand': cls karta-=250000 ymanrem[10]=1 minut+=5 gs'stat' 'You pay for repairs' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[10] = 1: act 'Pay for the purchase of furniture for libraries 250000': cls karta -= 250000 ymanrem[10] = 2 minut += 5 gs 'stat' 'You paid for the purchase of furniture' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[10]=1: act 'Pay for the purchase of furniture for the library 250 thousand': cls karta-=250000 ymanrem[10]=2 minut+=5 gs'stat' 'You pay for the purchase of furniture' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[11] = 0: act 'Pay for repairs gym 250,000': cls karta -= 250000 ymanrem[11] = 1 minut += 5 gs 'stat' 'You pay for repairs' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[11]=0: act 'Pay for repairs gym 250 thousand': cls karta-=250000 ymanrem[11]=1 minut+=5 gs'stat' 'You pay for repairs' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[11] = 1: act 'Pay furniture gym 250,000': cls karta -= 250000 ymanrem[11] = 2 minut += 5 gs 'stat' 'You paid for the purchase of furniture for the gym' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[11]=1: act 'Pay furniture for the gym 250 thousand': cls karta-=250000 ymanrem[11]=2 minut+=5 gs'stat' 'You pay for the purchase of furniture for the gym' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[12] = 0: act 'Pay for repair of the 250 000': cls karta -= 250000 ymanrem[12] = 1 minut += 5 gs 'stat' 'You pay for repairs' act 'Leave': gt $curloc end ======= if karta>=250000 and placeMansion=3 and ymanrem[12]=0: act 'Pay for repairs Cabinet 250 thousand': cls karta-=250000 ymanrem[12]=1 minut+=5 gs'stat' 'You pay for repairs' act 'Get_Away':gt $curloc end >>>>>>> 395_youplace end <<<<<<< 395_youplace if karta >= 250000 and placeMansion = 3 and ymanrem[12] = 1: act 'Pay for the purchase of furniture for the office 250 000': cls karta -= 250000 ymanrem[12] = 2 minut += 5 gs 'stat' 'You paid for the purchase of furniture.' act 'Leave': gt $curloc end end ======= if karta>=250000 and placeMansion=3 and ymanrem[12]=1: act 'Pay for the purchase of furniture for the office 250 thousand': cls karta-=250000 ymanrem[12]=2 minut+=5 gs'stat' 'You pay for the purchase of furniture.' act 'Get_Away':gt $curloc end end >>>>>>> 395_youplace --- youplace ---------------------------------