123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514 |
- # autosalonF
- if $ARGS[0] = 'start':
- $metka = $ARGS[0]
- $loc = $CURLOC
- cla
- *clr
- minut += 5
- cartraid = 1
- gs 'stat'
- '<center><b>Auto Show</b></center>'
- '<center><img src="images/etogame/manager.jpg"></center>'
- 'List of vehicles for sale'
- '<a href="exec:GS ''carF1'',''car6''">Kalina VAZ</a>. - new, price 400 th.RUB'
- '<a href="exec:GS ''carF1'',''car7''">WHA PRIORA</a>. - new, price 450 th.RUB'
- '<a href="exec:GS ''carF1'',''car8''">Chevrolet NIVA</a>. - new, price 500 th.RUB'
- '<a href="exec:GS ''carF1'',''car9''">UAZ HUNTER</a>. - new, price 500 th.RUB'
- '<a href="exec:GS ''carF1'',''car10''">UAZ Patriot</a>. - new, price 600 th.RUB'
- '<a href="exec:GS ''carF1'',''car13''">Ford Focus 2</a>. - new, price 500 th.RUB'
- '<a href="exec:GS ''carF1'',''car102''">Renault LOGAN</a>. - new, price 700 th.RUB'
- '<a href="exec:GS ''carF1'',''car110''">Ford Mondeo</a>. - new, price 850 th.RUB'
- '<a href="exec:GS ''carF1'',''car104''">Toyota Celica</a>. - new, price 1 million.RUB'
- '<a href="exec:GS ''carF1'',''car95''">Mitsubishi l200</a>. - new, price 1 million.RUB'
- '<a href="exec:GS ''carF1'',''car103''">Toyota Corolla</a>. - new, price 1,1 million.RUB'
- '<a href="exec:GS ''carF1'',''car105''">Mazda 6</a>. - new, price 1,2 million.RUB'
- '<a href="exec:GS ''carF1'',''car106''">Mercedes-Benz E 212</a>. - new, price 1,7 million.RUB'
- '<a href="exec:GS ''carF1'',''car109''">Audi A6</a>. - new, price 1,9 million.RUB'
- '<a href="exec:GS ''carF1'',''car97''">Cadillac Escalade</a>. - new, price 2 million.RUB'
- '<a href="exec:GS ''carF1'',''car101''">BMW Z4</a>. - new, price 3 million.RUB'
- '<a href="exec:GS ''carF1'',''car107''">BMW M5</a>. - new, price 4,5 million.RUB'
- '<a href="exec:GS ''carF1'',''car99''">BMW X6</a>. - new, price 4,5 million.RUB'
- '<a href="exec:GS ''carF1'',''car96''">Audi Q7</a>. - new, price 5 million.RUB'
- '<a href="exec:GS ''carF1'',''car98''">Porsche Cayenne</a>. - new, price 5 million.RUB'
- '<a href="exec:GS ''carF1'',''car108''">Jaguar XKR-S</a>. - new, price 7 million.RUB'
- '<a href="exec:GS ''carF1'',''car100''">Mercedes-Benz S 600</a>. - new, price 8 million.RUB'
- '<a href="exec:GS ''carF1'',''car111''">Bentley Continental GT</a>. - new, price 10 million.RUB'
- '<a href="exec:GS ''carF1'',''car112''">Ferrari 458 Italia</a>. - new, price 20 million.RUB'
- act 'Talk to the manager':gt 'autosalonF', 'manager1'
- act 'Leave':gt 'Nord'
- end
- if $ARGS[0] = 'manager1':
- $metka = $ARGS[0]
- $loc = $CURLOC
- cla
- *clr
- gs 'stat'
- minut += 5
- '<center><b>Auto Show</b></center>'
- '<center><img src="images/etogame/manager.jpg"></center>'
- 'In the bank <<karta>> <b>₽</b>'
- 'The manager smiled and said affably. To purchase, you must have the right and enough cash in the bank, we do not work for cash. As it is impossible to have two cars, I am sorry, but this new law antiprobkovy City Hall.'
- act 'Leave':gt 'Nord'
- if karta >= 400000:
- act 'Buy Kalina VAZ (400 th.RUB)':
- cla
- *clr
- karta = karta - 400000
- $car = 'Kalina VAZ'
- car = 6
- benz = 3
- cardrive = 8
- teh = 400
- tehcar = 400
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 450000:
- act 'Buy VAZ Priora (450 th.RUB)':
- cla
- *clr
- karta = karta - 450000
- $car = 'WHA PRIORA'
- car = 7
- benz = 3
- cardrive = 8
- teh = 450
- tehcar = 450
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 500000:
- act 'Buy Chevrolet Niva (500 th.RUB)':
- cla
- *clr
- karta = karta - 500000
- $car = 'Chevrolet NIVA'
- car = 8
- benz = 3
- cardrive = 8
- teh = 500
- tehcar = 500
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 500000:
- act 'Buy UAZ Hunter (500 th.RUB)':
- cla
- *clr
- karta = karta - 500000
- $car = 'UAZ HUNTER'
- car = 9
- benz = 3
- cardrive = 8
- teh = 300
- tehcar = 300
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 600000:
- act 'Buy UAZ Patriot (600 th.RUB)':
- cla
- *clr
- karta = karta - 600000
- $car = 'UAZ Patriot'
- car = 10
- benz = 3
- cardrive = 8
- teh = 400
- tehcar = 400
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 500000:
- act 'Ford Focus 2 (500 th.RUB)':
- cla
- *clr
- karta = karta - 500000
- $car = 'Ford Focus 2'
- car = 13
- benz = 3
- cardrive = 8
- teh = 800
- tehcar = 800
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 700000:
- act 'Renault LOGAN (700 th.RUB)':
- cla
- *clr
- karta = karta - 700000
- $car = 'Renault LOGAN'
- car = 102
- benz = 3
- cardrive = 8
- teh = 1000
- tehcar = 1000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 850000:
- act 'Ford Mondeo (850 th.RUB)':
- cla
- *clr
- karta = karta - 850000
- $car = 'Ford Mondeo'
- car = 110
- benz = 3
- cardrive = 8
- teh = 2000
- tehcar = 2000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 1000000:
- act 'Buy Toyota Celica (1 million.RUB)':
- cla
- *clr
- karta = karta - 1000000
- $car = 'Toyota Celica'
- car = 104
- benz = 3
- cardrive = 8
- teh = 3000
- tehcar = 3000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 1000000:
- act 'Buy Mitsubishi l200 (1 million.RUB)':
- cla
- *clr
- karta = karta - 1000000
- $car = 'Mitsubishi l200'
- car = 95
- benz = 3
- cardrive = 8
- teh = 2000
- tehcar = 2000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 1100000:
- act 'Buy Toyaboutta Corolla (1,1 million.RUB)':
- cla
- *clr
- karta = karta - 1100000
- $car = 'Toyaboutta Corolla'
- car = 103
- benz = 3
- cardrive = 8
- teh = 3000
- tehcar = 3000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 1200000:
- act 'Buy Mazda 6 (1,2 million.RUB)':
- cla
- *clr
- karta = karta - 1200000
- $car = 'Mazda 6'
- car = 105
- benz = 3
- cardrive = 8
- teh = 3000
- tehcar = 3000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 1700000:
- act 'Mercedes-Benz E 212 (1,7 million.RUB)':
- cla
- *clr
- karta = karta - 1700000
- $car = 'Mercedes-Benz E 212'
- car = 106
- benz = 3
- cardrive = 8
- teh = 5000
- tehcar = 5000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 1900000:
- act 'Buy Audi A6 (1,9 million.RUB)':
- cla
- *clr
- karta = karta - 1900000
- $car = 'Audi A6'
- car = 109
- benz = 3
- cardrive = 8
- teh = 5000
- tehcar = 5000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 2000000:
- act 'Buy Cadillac Escalade (2 million.RUB)':
- cla
- *clr
- karta = karta - 2000000
- $car = 'Cadillac Escalade'
- car = 97
- benz = 3
- cardrive = 8
- teh = 4000
- tehcar = 4000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 3000000:
- act 'Buy BMW Z4 (3 million.RUB)':
- cla
- *clr
- karta = karta - 3000000
- $car = 'BMW Z4'
- car = 101
- benz = 3
- cardrive = 8
- teh = 4000
- tehcar = 4000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 4500000:
- act 'Buy BMW M5 (4,5 million.RUB)':
- cla
- *clr
- karta = karta - 4500000
- $car = 'BMW M5'
- car = 107
- benz = 3
- cardrive = 8
- teh = 6000
- tehcar = 6000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 4500000:
- act 'Buy BMW X6 (4,5 million.RUB)':
- cla
- *clr
- karta = karta - 4500000
- $car = 'BMW X6'
- car = 99
- benz = 3
- cardrive = 8
- teh = 4000
- tehcar = 4000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 5000000:
- act 'Buy Audi Q7 (5 million.RUB)':
- cla
- *clr
- karta = karta - 5000000
- $car = 'Audi Q7'
- car = 96
- benz = 3
- cardrive = 8
- teh = 5000
- tehcar = 5000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 5000000:
- act 'Buy Porsche Cayenne (5 million.RUB)':
- cla
- *clr
- karta = karta - 5000000
- $car = 'Porsche Cayenne'
- car = 98
- benz = 3
- cardrive = 8
- teh = 3000
- tehcar = 3000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 7000000:
- act 'Buy Jaguar XKR-S (7 million.RUB)':
- cla
- *clr
- karta = karta - 7000000
- $car = 'Jaguar XKR-S'
- car = 108
- benz = 3
- cardrive = 8
- teh = 4000
- tehcar = 4000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 8000000:
- act 'Buy Mercedes-Benz S 600 (8 million.RUB)':
- cla
- *clr
- karta = karta - 8000000
- $car = 'Mercedes-Benz S 600'
- car = 100
- benz = 3
- cardrive = 8
- teh = 8000
- tehcar = 8000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 10000000:
- act 'Buy Bentley Continental GT (10 million.RUB)':
- cla
- *clr
- karta = karta - 10000000
- $car = 'Bentley Continental GT'
- car = 111
- benz = 3
- cardrive = 8
- teh = 8000
- tehcar = 8000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Escape':gt'Nord'
- end
- end
- if karta >= 20000000:
- act 'Buy Ferrari 458 Italia (10 million.RUB)':
- cla
- *clr
- karta = karta - 20000000
- $car = 'Ferrari 458 Italia'
- car = 112
- benz = 3
- cardrive = 8
- teh = 10000
- tehcar = 10000
- wrek = 0
- 'You transferred money manager and you receive a key. She said that your car is already on the street. Gasoline little and she recommends that you refuel.'
- act 'Leave':gt 'Nord'
- end
- end
- end
- --- autosalonF ---------------------------------
|