# autotraidF <<<<<<< 454_autotraidF if $ARGS[0] = 'start': ======= if $ARGS[0]='start': >>>>>>> 454_autotraidF $metka = $ARGS[0] $loc = $CURLOC <<<<<<< 454_autotraidF set minut += 5 gs 'stat' ======= set minut = minut + 5 gs'stat' >>>>>>> 454_autotraidF cla *clr <<<<<<< 454_autotraidF '
Car
' '
' 'Machine can only be bought if you have permission. And you can not have two cars.' if hour <= 17: if car > 0: act 'Approach to cornerer': gt 'autotraidF','manager1' act 'View cars put up for sale': gt 'autotraidF','car' end act 'Leave': gt 'Nord' ======= '
Car_market
' '
' 'The machine can be purchased only at presence of the rights. And you can not have two cars.' if hour <= 17: if car > 0:act 'Approach to the buyer-':gt'autotraidF','manager1' act 'View cars for sale':gt'autotraidF','car' end act 'Get_Away':gt'Nord' >>>>>>> 454_autotraidF end <<<<<<< 454_autotraidF if $ARGS[0] = 'manager1': ======= if $ARGS[0]='manager1': >>>>>>> 454_autotraidF $metka = $ARGS[0] $loc = $CURLOC <<<<<<< 454_autotraidF set minut += 5 gs 'stat' ======= set minut = minut + 5 gs'stat' >>>>>>> 454_autotraidF cla *clr <<<<<<< 454_autotraidF '
Car
' '
' gs 'avb' if cardrive = 9 and car > 0: 'Fence walked around the car and offered you for it <> rubles' act 'Sell ​​for <> (1:00)': cla set minut += 60 money = money + bupay car = 0 'You sold your car.' act 'Leave': gt 'Nord' end end if cardrive ! 9: 'Fence says that he needs to look at the car before you set a price, and if you want, it will call a tow truck for 2500 that would take your car to the market.' if money >= 2500: act 'Tow truck to market 2500rub (1:00)': cla set minut += 60 set cardrive = 9 set money -= 2500 'You gave the money and waited for an hour and when you bring a car, you will finally see her tow truck unloaded near the market.' act 'To cornerer': gt 'autotraidF','manager1' end end end act 'Leave': gt 'Nord' ======= '
Car_market
' '
' gs'avb' if cardrive = 9 and car > 0: 'Fence walked around the car and asked you for it <> rubles' act 'sell for <> (1 h)': cla set minut = minut + 60 money=money+bupay car=0 'You sold your car.' act 'Get_Away':gt'Nord' end end if cardrive ! 9: 'Fence says, that he needs to look at the car, before you put a price, and if you want, it calls for a tow truck 2500, that would deliver your car to the market.' if money >= 2500: act 'Tow truck to market 2500RUB (1 h)': cla set minut = minut + 60 set cardrive = 9 set money = money - 2500 'You gave money and waited for an hour and when you bring the car, Finally.' act 'For buyers-up':gt'autotraidF','manager1' end end end act 'Get_Away':gt'Nord' >>>>>>> 454_autotraidF end <<<<<<< 454_autotraidF if $ARGS[0] = 'car': ======= if $ARGS[0]='car': >>>>>>> 454_autotraidF $metka = $ARGS[0] $loc = $CURLOC <<<<<<< 454_autotraidF set minut += 5 gs 'stat' ======= set minut = minut + 5 gs'stat' >>>>>>> 454_autotraidF cla *clr <<<<<<< 454_autotraidF '
Car
' '
' 'So many cars in the parking lot that you can spend a lifetime and never osmotrish all machines, even if the machines on the go, you can understand their technical condition, the machine moves is not a cat in a bag can be a bargain, and can be a waste money, and do not forget, you still deliver it to the service will need.' ======= '
Car_market
' '
' 'So many cars in the parking lot, that you can spend a lifetime and never osmotrish all cars, if still with the machines on the go , then the machine is not on the moves is a cat in a bag, may be a bargain, and can be a waste of money, and do not forget, you still deliver it to the service will need to be.' >>>>>>> 454_autotraidF set carT = 0 if hour <= 17: <<<<<<< 454_autotraidF act 'Inspect 2107 (on the go)': cla *clr '
2107 (on the move)
' '
' set tehNT = 200 set tehT = RAND(10, tehNT) set carT = 1 gs 'avt' '<<$tehT>> The dealer wants <> rubles' act 'Leave': gt 'autotraidF','car' if car = 0 and prava = 1 and money >= bupay: act 'Buy <>rubles': cla set money -= bupay set $car = '2107' set car = 1 set benz = 3 set cardrive = 9 set teh = tehT set tehcar = 200 set wrek = 0 'You pay <> rubles and bought a car. Merchant put her near the market and warned that there is little gasoline.' act 'Leave': gt 'Nord' end end end act 'Inspect 2107 (not move)': cla *clr set tehNT = 200 set tehT = RAND(10, tehNT) set bupay = RAND(10000,50000) 'The machine is not on the move. Merchant wants to <> rubles' act 'Leave': gt 'autotraidf','car' if car = 0 and prava = 1 and money >= bupay: act 'Buy <>rubles': cla set money -= bupay set $car = '2107' set car = 1 set benz = 3 set cardrive = 9 set teh = tehT set tehcar = 200 set wrek = 1 'You pay <> rubles and bought a car. Merchant put her near the market.' act 'Leave': gt 'Nord' end end end act 'Inspect GAZ 3102 (on the go)': cla *clr '
3102 GAS (on the move)
' '
' set tehNT = 1000 set tehT = RAND(10, tehNT) set carT = 2 gs 'avt' '<<$tehT>> The dealer wants <> rubles' act 'Leave': gt 'autotraidf','car' if car = 0 and prava = 1 and money >= bupay: act 'Buy <>rubles': cla set money -= bupay set $car = 'GAZ 3102' set car = 11 set benz = 5 set cardrive = 9 set teh = tehT set tehcar = 1000 set wrek = 0 'You pay <> rubles and bought a car. Merchant put her near the market and warned that there is little gasoline.' act 'Leave': gt 'Nord' end end end act 'Inspect 3110 (on the go)': cla *clr '
3110 (on the move)
' '
' set tehNT = 800 set tehT = RAND(10, tehNT) set carT = 2 gs 'avt' '<<$tehT>> The dealer wants <> rubles' act 'Leave': gt 'autotraidF','car' if car = 0 and prava = 1 and money >= bupay: act 'Buy <>rubles': cla set money -= bupay set $car = '3110' set car = 12 set benz = 5 set cardrive = 9 set teh = tehT set tehcar = 800 set wrek = 0 'You pay <> rubles and bought a car. Merchant put her near the market and warned that there is little gasoline.' act 'Leave': gt 'Nord' end end end end act 'Leave': gt 'Nord' end ======= act 'inspect VAZ 2107 (on the run)': cla *clr '
VAZ 2107 (on the run)
' '
' set tehNT = 200 set tehT = RAND (10,tehNT) set carT = 1 gs'avt' '<<$tehT>> trader wants <> rubles' act 'Get_Away':gt'autotraidF','car' if car = 0 and prava = 1 and money >= bupay: act 'Buy for <> rubles': cla set money = money - bupay set $car = 'VAZ 2107' set car = 1 set benz = 3 set cardrive = 9 set teh = tehT set tehcar = 200 set wrek = 0 'you paid <> rubles and bought a car. Trader put it near the market and warned, that there is little gasoline.' act 'Get_Away':gt'Nord' end end end act 'inspect VAZ 2107 (not on the move)': cla *clr set tehNT = 200 set tehT = RAND (10,tehNT) set bupay = RAND (10000,50000) 'The machine is not on the move. trader wants <> rubles' act 'Get_Away':gt'autotraidf','car' if car = 0 and prava = 1 and money >= bupay: act 'Buy for <> rubles': cla set money = money - bupay set $car = 'VAZ 2107' set car = 1 set benz = 3 set cardrive = 9 set teh = tehT set tehcar = 200 set wrek = 1 'you paid <> rubles and bought a car. Trader put it near the market.' act 'Get_Away':gt'Nord' end end end act 'inspect GAS 3102 (on the run)': cla *clr '
GAZ 3102 (on the run)
' '
' set tehNT = 1000 set tehT = RAND (10,tehNT) set carT = 2 gs'avt' '<<$tehT>> trader wants <> rubles' act 'Get_Away':gt'autotraidf','car' if car = 0 and prava = 1 and money >= bupay: act 'Buy for <> rubles': cla set money = money - bupay set $car = 'GAZ 3102' set car = 11 set benz = 5 set cardrive = 9 set teh = tehT set tehcar = 1000 set wrek = 0 'you paid <> rubles and bought a car. Trader put it near the market and warned, that there is little gasoline.' act 'Get_Away':gt'Nord' end end end act 'inspect GAS 3110 (on the run)': cla *clr '
GAZ 3110 (on the run)
' '
' set tehNT = 800 set tehT = RAND (10,tehNT) set carT = 2 gs'avt' '<<$tehT>> trader wants <> rubles' act 'Get_Away':gt'autotraidF','car' if car = 0 and prava = 1 and money >= bupay: act 'Buy for <> rubles': cla set money = money - bupay set $car = 'GAZ 3110' set car = 12 set benz = 5 set cardrive = 9 set teh = tehT set tehcar = 800 set wrek = 0 'you paid <> rubles and bought a car. Trader put it near the market and warned, that there is little gasoline.' act 'Get_Away':gt'Nord' end end end end act 'Get_Away':gt'Nord' end >>>>>>> 454_autotraidF --- autotraidF ---------------------------------