123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572 |
- # autosalonF
- if $ARGS[0] = 'start':
- $metka = $ARGS[0]
- $loc = $CURLOC
- $location_type = 'event'
- menu_off = 1
- cla
- *clr
- minut += 5
- cartraid = 1
- gs 'stat'
- '<center><b>Car Dealership</b></center>'
- '<center><img <<$set_imgh>> src="images/locations/city/industrial/cardealer/manager.jpg"></center>'
- nl
- '<b><center>List of Vehicles for Sale</center></b>'
- nl
- '<center><table border=0><TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car6''">Kalina VAZ</a>.</TD><TD> - </TD><TD> New. Price: 400 th.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car7''">WHA PRIORA</a>.</TD><TD> - </TD><TD> New. Price: 450 th.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car8''">Chevrolet NIVA</a>.</TD><TD> - </TD><TD> New. Price: 500 th.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car9''">UAZ HUNTER</a>.</TD><TD> - </TD><TD> New. Price: 500 th.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car10''">UAZ Patriot</a>.</TD><TD> - </TD><TD> New. Price: 600 th.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car13''">Ford Focus 2</a>.</TD><TD> - </TD><TD> New. Price: 500 th.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car102''">Renault LOGAN</a>.</TD><TD> - </TD><TD> New. Price: 700 th.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car110''">Ford Mondeo</a>.</TD><TD> - </TD><TD> New. Price: 850 th.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car104''">Toyota Celica</a>.</TD><TD> - </TD><TD> New. Price: 1 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car95''">Mitsubishi l200</a>.</TD><TD> - </TD><TD> New. Price: 1 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car103''">Toyota Corolla</a>.</TD><TD> - </TD><TD> New. Price: 1,1 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car105''">Mazda 6</a>.</TD><TD> - </TD><TD> New. Price: 1,2 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car106''">Mercedes-Benz E 212</a>.</TD><TD> - </TD><TD> New. Price: 1,7 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car109''">Audi A6</a>.</TD><TD> - </TD><TD> New. Price: 1,9 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car97''">Cadillac Escalade</a>.</TD><TD> - </TD><TD> New. Price: 2 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car101''">BMW Z4</a>.</TD><TD> - </TD><TD> New. Price: 3 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car107''">BMW M5</a>.</TD><TD> - </TD><TD> New. Price: 4,5 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car99''">BMW X6</a>.</TD><TD> - </TD><TD> New. Price: 4,5 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car96''">Audi Q7</a>.</TD><TD> - </TD><TD> New. Price: 5 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car98''">Porsche Cayenne</a>.</TD><TD> - </TD><TD> New. Price: 5 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car108''">Jaguar XKR-S</a>.</TD><TD> - </TD><TD> New. Price: 7 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car100''">Mercedes-Benz S 600</a>.</TD><TD> - </TD><TD> New. Price: 8 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car111''">Bentley Continental gt</a>.</TD><TD> - </TD><TD> New. Price: 10 million.RUB</TD></TR>'
- '<TR><TD><a href="exec:GS ''carF1'',''car112''">Ferrari 458 Italia</a>.</TD><TD> - </TD><TD> New. Price: 20 million.RUB</TD></TR>'
- '</TR></table>'
- act 'Talk to the manager': gt 'autosalonF', 'manager1'
- act 'Return': gt 'autotraidF', 'start'
- end
- if $ARGS[0] = 'manager1':
- $metka = $ARGS[0]
- $loc = $CURLOC
- $menu_arg = 'manager1'
- $menu_loc = 'autosalonF'
- menu_off = 0
- cla
- *clr
- gs 'stat'
- minut += 5
- '<center><b>Car Dealership</b></center>'
- '<center><img <<$set_imgh>> src="images/locations/city/industrial/cardealer/manager.jpg"></center>'
- 'You have <<karta>> <b>₽</b> on your bank account.'
- 'The manager smiles affably and explains routinely what is required to purchase a car: A driver''s license and the sum, in full, on your bank account.'
- '"With how the economy is right now, we can''t accept payment by installments at this time, I''m afraid", he apologizes, "and a few new laws have been passed, too: We cannot accept cash payment - the Duma believes that will help fight crime - and it is currently not possible to own more than one car, according to the Oblast''s new anti-corruption law.'
- act 'Leave':gt 'city_industrial'
- if karta + bankDebtLimit >= 400000:
- act 'Buy a Kalina VAZ (400 th.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 400000
- $car = 'Kalina VAZ'
- car = 6
- benz = 3
- cardrive = 8
- teh = 400
- tehcar = 400
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 450000:
- act 'Buy a VAZ Priora (450 th.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 450000
- $car = 'WHA PRIORA'
- car = 7
- benz = 3
- cardrive = 8
- teh = 450
- tehcar = 450
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 500000:
- act 'Buy a Chevrolet Niva (500 th.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 500000
- $car = 'Chevrolet NIVA'
- car = 8
- benz = 3
- cardrive = 8
- teh = 500
- tehcar = 500
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 500000:
- act 'Buy a UAZ Hunter (500 th.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 500000
- $car = 'UAZ HUNTER'
- car = 9
- benz = 3
- cardrive = 8
- teh = 300
- tehcar = 300
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 600000:
- act 'Buy a UAZ Patriot (600 th.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 600000
- $car = 'UAZ Patriot'
- car = 10
- benz = 3
- cardrive = 8
- teh = 400
- tehcar = 400
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 500000:
- act 'Buy a Ford Focus 2 (500 th.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 500000
- $car = 'Ford Focus 2'
- car = 13
- benz = 3
- cardrive = 8
- teh = 800
- tehcar = 800
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 700000:
- act 'Buy a Renault LOGAN (700 th.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 700000
- $car = 'Renault LOGAN'
- car = 102
- benz = 3
- cardrive = 8
- teh = 1000
- tehcar = 1000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 850000:
- act 'Buy a Ford Mondeo (850 th.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 850000
- $car = 'Ford Mondeo'
- car = 110
- benz = 3
- cardrive = 8
- teh = 2000
- tehcar = 2000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 1000000:
- act 'Buy a Toyota Celica (1 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 1000000
- $car = 'Toyota Celica'
- car = 104
- benz = 3
- cardrive = 8
- teh = 3000
- tehcar = 3000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 1000000:
- act 'Buy a Mitsubishi l200 (1 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 1000000
- $car = 'Mitsubishi l200'
- car = 95
- benz = 3
- cardrive = 8
- teh = 2000
- tehcar = 2000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 1100000:
- act 'Buy a Toyota Corolla (1,1 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 1100000
- $car = 'Toyaboutta Corolla'
- car = 103
- benz = 3
- cardrive = 8
- teh = 3000
- tehcar = 3000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 1200000:
- act 'Buy a Mazda 6 (1,2 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 1200000
- $car = 'Mazda 6'
- car = 105
- benz = 3
- cardrive = 8
- teh = 3000
- tehcar = 3000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 1700000:
- act 'Buy a Mercedes-Benz E 212 (1,7 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 1700000
- $car = 'Mercedes-Benz E 212'
- car = 106
- benz = 3
- cardrive = 8
- teh = 5000
- tehcar = 5000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 1900000:
- act 'Buy an Audi A6 (1,9 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 1900000
- $car = 'Audi A6'
- car = 109
- benz = 3
- cardrive = 8
- teh = 5000
- tehcar = 5000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 2000000:
- act 'Buy a Cadillac Escalade (2 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 2000000
- $car = 'Cadillac Escalade'
- car = 97
- benz = 3
- cardrive = 8
- teh = 4000
- tehcar = 4000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 3000000:
- act 'Buy a BMW Z4 (3 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 3000000
- $car = 'BMW Z4'
- car = 101
- benz = 3
- cardrive = 8
- teh = 4000
- tehcar = 4000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 4500000:
- act 'Buy a BMW M5 (4,5 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 4500000
- $car = 'BMW M5'
- car = 107
- benz = 3
- cardrive = 8
- teh = 6000
- tehcar = 6000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 4500000:
- act 'Buy a BMW X6 (4,5 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 4500000
- $car = 'BMW X6'
- car = 99
- benz = 3
- cardrive = 8
- teh = 4000
- tehcar = 4000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 5000000:
- act 'Buy an Audi Q7 (5 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 5000000
- $car = 'Audi Q7'
- car = 96
- benz = 3
- cardrive = 8
- teh = 5000
- tehcar = 5000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 5000000:
- act 'Buy a Porsche Cayenne (5 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 5000000
- $car = 'Porsche Cayenne'
- car = 98
- benz = 3
- cardrive = 8
- teh = 3000
- tehcar = 3000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 7000000:
- act 'Buy a Jaguar XKR-S (7 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 7000000
- $car = 'Jaguar XKR-S'
- car = 108
- benz = 3
- cardrive = 8
- teh = 4000
- tehcar = 4000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 8000000:
- act 'Buy a Mercedes-Benz S 600 (8 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 8000000
- $car = 'Mercedes-Benz S 600'
- car = 100
- benz = 3
- cardrive = 8
- teh = 8000
- tehcar = 8000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 10000000:
- act 'Buy a Bentley Continental GT (10 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 10000000
- $car = 'Bentley Continental GT'
- car = 111
- benz = 3
- cardrive = 8
- teh = 8000
- tehcar = 8000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- if karta + bankDebtLimit >= 20000000:
- act 'Buy a Ferrari 458 Italia (10 million.RUB)':
- cla
- *clr
- menu_off = 1
- karta -= 20000000
- $car = 'Ferrari 458 Italia'
- car = 112
- benz = 3
- cardrive = 8
- teh = 10000
- tehcar = 10000
- wrek = 0
- 'The manager draws up a purchasing contract and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.'
- '"It''s waiting for you outside", she says. "The fuel tank is almost empty, though, so you should stop by the gas station right away."'
- act 'Leave':gt'city_industrial'
- end
- end
- end
- --- autosalonF ---------------------------------
|