|
@@ -3,7 +3,7 @@ $metka = $ARGS[0]
|
|
|
$loc = $CURLOC
|
|
|
clr
|
|
|
gs 'stat'
|
|
|
-'<center><h4>Your Land</h4></center>'
|
|
|
+'<center><h4>Your land lot</h4></center>'
|
|
|
|
|
|
if placeMansion < 2:'<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/yzemelniy.jpg"></center>'
|
|
|
if placeMansion = 2:'<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/ystart.jpg"></center>'
|
|
@@ -16,59 +16,59 @@ if car > 0 and cardrive = 18:
|
|
|
'<a href="exec:gs ''carF'', ''start''">Your <<$car>></a> is parked here.'
|
|
|
end
|
|
|
|
|
|
-act 'Go to the suburbs':minut += 5 & gt 'psiklin', 'start'
|
|
|
+act 'Visit the suburbs':minut += 5 & gt 'psiklin', 'start'
|
|
|
|
|
|
-if bassMansion = 1:'<a href="exec:gt ''ybass''">Pool</a>.'
|
|
|
-if banaMansion >= 1:'<a href="exec:gt ''yban''">Bath</a>.'
|
|
|
-if placeMansion = 3:'<a href="exec:gt ''ymans''">Go inside</a>.'
|
|
|
+if bassMansion = 1:'<a href="exec:gt ''ybass''">Go to the pool</a>.'
|
|
|
+if banaMansion >= 1:'<a href="exec:gt ''yban''">Go to the sauna</a>.'
|
|
|
+if placeMansion = 3:'<a href="exec:gt ''ymans''">Walk inside the mansion</a>.'
|
|
|
|
|
|
if karta + bankDebtLimit >= 1500000 and placeMansion = 0:
|
|
|
- act 'Buy land for cottage (1,500,000)':
|
|
|
+ act 'Buy the land lot for a mansion (1,500,000)':
|
|
|
cls
|
|
|
karta -= 1500000
|
|
|
placeMansion = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You have bought land for cottage'
|
|
|
+ 'You have bought the land lot. You can finally build your own dream mansion.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 500000 and placeMansion = 1:
|
|
|
- act 'Pay for water, electricity and building foundations (500,000 <b>₽</b>)':
|
|
|
+ act 'Pay for running utilies and the building foundation (500,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 500000
|
|
|
placeMansion = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for a supply of communications to the site and zero cycle'
|
|
|
+ 'You''ve paid for the utilities. You now have running water, sewage, electric power, and telephone lines. There''s even a foundation built on the land lot.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 1500000 and placeMansion = 2:
|
|
|
- act 'Pay for the construction and external finish of the building (1,500,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the finishing touches on the mansion (1,500,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 1500000
|
|
|
placeMansion = 3
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the construction of housing mansion'
|
|
|
+ 'You''ve paid for the construction of the mansion.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 500000 and placeMansion = 3 and ymanrem[3] = 0:
|
|
|
- act 'Pay for the construction of rooms (500,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the construction of the rooms (500,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 500000
|
|
|
ymanrem[3] = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the construction of the rooms.'
|
|
|
+ 'You paid for the construction of the rooms. You can finally begin designing the interior of the mansion.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
@@ -76,26 +76,26 @@ end
|
|
|
|
|
|
if placeMansion => 2:
|
|
|
if karta + bankDebtLimit >= 800000 and banaMansion = 0:
|
|
|
- act 'Pay for the construction of baths (800,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the construction of the sauna (800,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 800000
|
|
|
banaMansion = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the construction of baths.'
|
|
|
+ 'You paid for the construction of the sauna. You finally have a place where you can relax.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 500000 and bassMansion = 0:
|
|
|
- act 'Pay for the construction of the basement (500,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the construction of the pool area (500,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 500000
|
|
|
bassMansion = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the construction of the pool'
|
|
|
+ 'You paid for the construction of the pool area. You can finally take relaxing swims in private.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
@@ -103,241 +103,241 @@ if placeMansion => 2:
|
|
|
end
|
|
|
if placeMansion = 3:
|
|
|
if karta + bankDebtLimit >= 250000 and ymanrem[3] = 1:
|
|
|
- act 'Pay for repairs Hall (250,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the renovations of the main hall (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[3] = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You pay for repairs'
|
|
|
+ 'The work on the main hall is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
|
|
|
elseif karta + bankDebtLimit >= 150000 and ymanrem[3] = 2:
|
|
|
- act 'Pay lounge furniture (150,000 <b>₽</b>)':
|
|
|
+ act 'Decorate the main hall (150,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 150000
|
|
|
ymanrem[3] = 3
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the purchase of furniture'
|
|
|
+ 'The work on the main hall is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 250000 and ymanrem[4] = 0:
|
|
|
- act 'Pay for repairs sleeping (250,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the renovations of the bedroom (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[4] = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You pay for repairs'
|
|
|
+ 'The work on the bedroom is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
elseif karta + bankDebtLimit >= 300000 and ymanrem[4] = 1:
|
|
|
- act 'Pay bedroom furniture (300,000 <b>₽</b>)':
|
|
|
+ act 'Decorate the bedroom (300,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 300000
|
|
|
ymanrem[4] = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the purchase of furniture'
|
|
|
+ 'The work on the bedroom is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 250000 and ymanrem[5] = 0:
|
|
|
- act 'Pay bathroom renovation (250,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the renovations of the bathroom (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[5] = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You pay for repairs'
|
|
|
+ 'The work on the batroom is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
elseif karta + bankDebtLimit >= 250000 and ymanrem[5] = 1:
|
|
|
- act 'Pay for furniture and fixtures for the bathroom (250,000 <b>₽</b>)':
|
|
|
+ act 'Decorate the bathroom (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[5] = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the purchase of furniture and sanitary ware.'
|
|
|
+ 'The work on the batroom is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 250000 and ymanrem[6] = 0:
|
|
|
- act 'Pay renovated kitchen (250,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the renovations of the kitchen (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[6] = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You pay for repairs'
|
|
|
+ 'The work on the kitchen is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
elseif karta + bankDebtLimit >= 350000 and ymanrem[6] = 1:
|
|
|
- act 'Pay kitchen furniture (350,000 <b>₽</b>)':
|
|
|
+ act 'Decorate the kitchen (350,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[6] = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the purchase of furniture for the kitchen.'
|
|
|
+ 'The work on the kitchen is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 250000 and ymanrem[7] = 0:
|
|
|
- act 'Pay for repairs hall (250,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the renovations of the living room (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[7] = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You pay for repairs'
|
|
|
+ 'The work on the living room is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
elseif karta + bankDebtLimit >= 250000 and ymanrem[7] = 1:
|
|
|
- act 'Pay furniture hall (250,000 <b>₽</b>)':
|
|
|
+ act 'Decorate the living room (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[7] = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the purchase of furniture for the hall'
|
|
|
+ 'The work on the living room is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 250000 and ymanrem[8] = 0:
|
|
|
- act 'Pay for repairs fireplace room (250,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the renovations of the fireplace room (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[8] = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You pay for repairs'
|
|
|
+ 'The work on the fireplace room is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
elseif karta + bankDebtLimit >= 250000 and ymanrem[8] = 1:
|
|
|
- act 'Pay for the purchase of furniture for the fireplace room (250,000 <b>₽</b>)':
|
|
|
+ act 'Decorate the fireplace room (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[8] = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the purchase of furniture.'
|
|
|
+ 'The work on the fireplace room is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 250000 and ymanrem[9] = 0:
|
|
|
- act 'Children''s room to pay for repairs (250,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the renovations of the nursery room (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[9] = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You pay for repairs'
|
|
|
+ 'The work on the nursery is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
elseif karta + bankDebtLimit >= 250000 and ymanrem[9] = 1:
|
|
|
- act 'Pay for the purchase of furniture for the nursery (250,000 <b>₽</b>)':
|
|
|
+ act 'Decorate the nursery (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[9] = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the purchase of furniture'
|
|
|
+ 'The work on the nursery is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 250000 and ymanrem[10] = 0:
|
|
|
- act 'Pay for repairs library (250,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the renovations of the library (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[10] = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You pay for repairs'
|
|
|
+ 'The work on the library is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
elseif karta + bankDebtLimit >= 250000 and ymanrem[10] = 1:
|
|
|
- act 'Pay for the purchase of furniture for libraries (250,000 <b>₽</b>)':
|
|
|
+ act 'Decorate the library (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[10] = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the purchase of furniture'
|
|
|
+ 'The work on the library is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 250000 and ymanrem[11] = 0:
|
|
|
- act 'Pay for repairs gym (250,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the renovations of the gym (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[11] = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You pay for repairs'
|
|
|
+ 'The work on the gym is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
elseif karta + bankDebtLimit >= 250000 and ymanrem[11] = 1:
|
|
|
- act 'Pay furniture gym (250,000 <b>₽</b>)':
|
|
|
+ act 'Decorate the gym (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[11] = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the purchase of furniture for the gym'
|
|
|
+ 'The work on the gym is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
end
|
|
|
|
|
|
if karta + bankDebtLimit >= 250000 and ymanrem[12] = 0:
|
|
|
- act 'Pay for repair of the (250,000 <b>₽</b>)':
|
|
|
+ act 'Pay for the renovations of the office (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[12] = 1
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You pay for repairs'
|
|
|
+ 'The work on the office is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|
|
|
elseif karta + bankDebtLimit >= 250000 and ymanrem[12] = 1:
|
|
|
- act 'Pay for the purchase of furniture for the office (250,000 <b>₽</b>)':
|
|
|
+ act 'Decorate the office (250,000 <b>₽</b>)':
|
|
|
cls
|
|
|
karta -= 250000
|
|
|
ymanrem[12] = 2
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
- 'You paid for the purchase of furniture.'
|
|
|
+ 'The work on the office is finished.'
|
|
|
|
|
|
act 'Leave':gt $curloc
|
|
|
end
|