# avb if car = 1: <<<<<<< 450_avb if wrek = 1 or teh <= 0: set bupay = RAND(10000,20000) if wrek = 0: if teh >= tehcar * 75/100 and wrek = 0: set bupay = RAND(50000,100000) if teh < tehcar*75/100 and teh >= tehcar * 50/100 and wrek = 0: set bupay = RAND(40000,60000) if teh < tehcar*50/100 and teh >= tehcar * 25/100 and wrek = 0: set bupay = RAND(20000,40000) if teh < tehcar*25/100 and wrek = 0: set bupay = RAND(10000,20000) end ======= if wrek = 1 or teh <= 0:set bupay = RAND (10000,20000) if wrek=0: if teh >= tehcar*75/100 and wrek = 0:set bupay = RAND (50000,100000) if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:set bupay = RAND (40000,60000) if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:set bupay = RAND (20000,40000) if teh < tehcar*25/100 and wrek = 0:set bupay = RAND (10000,20000) end >>>>>>> 450_avb end if car > 1 and car < 6: <<<<<<< 450_avb if wrek = 1 or teh <= 0: set bupay = RAND(10000,20000) if wrek = 0: if teh >= tehcar * 75/100 and wrek = 0: set bupay = RAND(100000,200000) if teh < tehcar*75/100 and teh >= tehcar * 50/100 and wrek = 0: set bupay = RAND(80000,120000) if teh < tehcar*50/100 and teh >= tehcar * 25/100 and wrek = 0: set bupay = RAND(60000,90000) if teh < tehcar*25/100 and wrek = 0: set bupay = RAND(50000,70000) end ======= if wrek = 1 or teh <= 0:set bupay = RAND (10000,20000) if wrek = 0: if teh >= tehcar*75/100 and wrek = 0:set bupay = RAND (100000,200000) if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:set bupay = RAND (80000,120000) if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:set bupay = RAND (60000,90000) if teh < tehcar*25/100 and wrek = 0:set bupay = RAND (50000,70000) end >>>>>>> 450_avb end if car >= 6 and car < 11: <<<<<<< 450_avb if wrek = 1 or teh <= 0: set bupay = RAND(10000,20000) if wrek = 0: if teh >= tehcar * 75/100 and wrek = 0: set bupay = RAND(150000,220000) if teh < tehcar*75/100 and teh >= tehcar * 50/100 and wrek = 0: set bupay = RAND(100000,160000) if teh < tehcar*50/100 and teh >= tehcar * 25/100 and wrek = 0: set bupay = RAND(80000,120000) if teh < tehcar*25/100 and wrek = 0: set bupay = RAND(50000,90000) end ======= if wrek = 1 or teh <= 0:set bupay = RAND (10000,20000) if wrek = 0: if teh >= tehcar*75/100 and wrek = 0:set bupay = RAND (150000,220000) if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:set bupay = RAND (100000,160000) if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:set bupay = RAND (80000,120000) if teh < tehcar*25/100 and wrek = 0:set bupay = RAND (50000,90000) end >>>>>>> 450_avb end if car >= 11 and car <= 12: <<<<<<< 450_avb if wrek = 1 or teh <= 0: set bupay = RAND(10000,20000) if wrek = 0: if teh >= tehcar * 75/100 and wrek = 0: set bupay = RAND(70000,100000) if teh < tehcar*75/100 and teh >= tehcar * 50/100 and wrek = 0: set bupay = RAND(40000,80000) if teh < tehcar*50/100 and teh >= tehcar * 25/100 and wrek = 0: set bupay = RAND(20000,60000) if teh < tehcar*25/100 and wrek = 0: set bupay = RAND(10000,30000) end ======= if wrek = 1 or teh <= 0:set bupay = RAND (10000,20000) if wrek = 0: if teh >= tehcar*75/100 and wrek = 0:set bupay = RAND (70000,100000) if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:set bupay = RAND (40000,80000) if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:set bupay = RAND (20000,60000) if teh < tehcar*25/100 and wrek = 0:set bupay = RAND (10000,30000) end >>>>>>> 450_avb end if car = 95: <<<<<<< 450_avb if wrek = 1 or teh <= 0: set bupay = RAND(20000,60000) if wrek = 0: if teh >= tehcar * 75/100 and wrek = 0: set bupay = RAND(500000,900000) if teh < tehcar*75/100 and teh >= tehcar * 50/100 and wrek = 0: set bupay = RAND(400000,600000) if teh < tehcar*50/100 and teh >= tehcar * 25/100 and wrek = 0: set bupay = RAND(300000,500000) if teh < tehcar*25/100 and wrek = 0: set bupay = RAND(50000,300000) end ======= if wrek = 1 or teh <= 0:set bupay = RAND (20000,60000) if wrek = 0: if teh >= tehcar*75/100 and wrek = 0:set bupay = RAND (500000,900000) if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:set bupay = RAND (400000,600000) if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:set bupay = RAND (300000,500000) if teh < tehcar*25/100 and wrek = 0:set bupay = RAND (50000,300000) end >>>>>>> 450_avb end if car = 96: <<<<<<< 450_avb if wrek = 1 or teh <= 0: set bupay = RAND(20000,60000) if wrek = 0: if teh >= tehcar * 75/100 and wrek = 0: set bupay = RAND(3000000,4800000) if teh < tehcar*75/100 and teh >= tehcar * 50/100 and wrek = 0: set bupay = RAND(2540000,3200000) if teh < tehcar*50/100 and teh >= tehcar * 25/100 and wrek = 0: set bupay = RAND(1150000,2550000) if teh < tehcar*25/100 and wrek = 0: set bupay = RAND(50000,1160000) end ======= if wrek = 1 or teh <= 0:set bupay = RAND (20000,60000) if wrek = 0: if teh >= tehcar*75/100 and wrek = 0:set bupay = RAND (3000000,4800000) if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:set bupay = RAND (2540000,3200000) if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:set bupay = RAND (1150000,2550000) if teh < tehcar*25/100 and wrek = 0:set bupay = RAND (50000,1160000) end >>>>>>> 450_avb end if car = 97: <<<<<<< 450_avb if wrek = 1 or teh <= 0: set bupay = RAND(20000,60000) if wrek = 0: if teh >= tehcar * 75/100 and wrek = 0: set bupay = RAND(1000000,1800000) if teh < tehcar*75/100 and teh >= tehcar * 50/100 and wrek = 0: set bupay = RAND(540000,1200000) if teh < tehcar*50/100 and teh >= tehcar * 25/100 and wrek = 0: set bupay = RAND(150000,550000) if teh < tehcar*25/100 and wrek = 0: set bupay = RAND(50000,160000) end ======= if wrek = 1 or teh <= 0:set bupay = RAND (20000,60000) if wrek = 0: if teh >= tehcar*75/100 and wrek = 0:set bupay = RAND (1000000,1800000) if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:set bupay = RAND (540000,1200000) if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:set bupay = RAND (150000,550000) if teh < tehcar*25/100 and wrek = 0:set bupay = RAND (50000,160000) end >>>>>>> 450_avb end if car = 98: <<<<<<< 450_avb if wrek = 1 or teh <= 0: set bupay = RAND(20000,60000) if wrek = 0: if teh >= tehcar * 75/100 and wrek = 0: set bupay = RAND(3000000,4800000) if teh < tehcar*75/100 and teh >= tehcar * 50/100 and wrek = 0: set bupay = RAND(2540000,3200000) if teh < tehcar*50/100 and teh >= tehcar * 25/100 and wrek = 0: set bupay = RAND(1150000,2550000) if teh < tehcar*25/100 and wrek = 0: set bupay = RAND(50000,1160000) end ======= if wrek = 1 or teh <= 0:set bupay = RAND (20000,60000) if wrek = 0: if teh >= tehcar*75/100 and wrek = 0:set bupay = RAND (3000000,4800000) if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:set bupay = RAND (2540000,3200000) if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:set bupay = RAND (1150000,2550000) if teh < tehcar*25/100 and wrek = 0:set bupay = RAND (50000,1160000) end >>>>>>> 450_avb end if car = 99: <<<<<<< 450_avb if wrek = 1 or teh <= 0: set bupay = RAND(20000,60000) if wrek = 0: if teh >= tehcar * 75/100 and wrek = 0: set bupay = RAND(2000000,3800000) if teh < tehcar*75/100 and teh >= tehcar * 50/100 and wrek = 0: set bupay = RAND(1540000,2200000) if teh < tehcar*50/100 and teh >= tehcar * 25/100 and wrek = 0: set bupay = RAND(550000,1550000) if teh < tehcar*25/100 and wrek = 0: set bupay = RAND(50000,560000) end ======= if wrek = 1 or teh <= 0:set bupay = RAND (20000,60000) if wrek = 0: if teh >= tehcar*75/100 and wrek = 0:set bupay = RAND (2000000,3800000) if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:set bupay = RAND (1540000,2200000) if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:set bupay = RAND (550000,1550000) if teh < tehcar*25/100 and wrek = 0:set bupay = RAND (50000,560000) end >>>>>>> 450_avb end if car = 100: <<<<<<< 450_avb if wrek = 1 or teh <= 0: set bupay = RAND(20000,60000) if wrek = 0: if teh >= tehcar * 75/100 and wrek = 0: set bupay = RAND(3000000,5800000) if teh < tehcar*75/100 and teh >= tehcar * 50/100 and wrek = 0: set bupay = RAND(2540000,3200000) if teh < tehcar*50/100 and teh >= tehcar * 25/100 and wrek = 0: set bupay = RAND(1550000,2550000) if teh < tehcar*25/100 and wrek = 0: set bupay = RAND(50000,1560000) end end ======= if wrek = 1 or teh <= 0:set bupay = RAND (20000,60000) if wrek = 0: if teh >= tehcar*75/100 and wrek = 0:set bupay = RAND (3000000,5800000) if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:set bupay = RAND (2540000,3200000) if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:set bupay = RAND (1550000,2550000) if teh < tehcar*25/100 and wrek = 0:set bupay = RAND (50000,1560000) end end >>>>>>> 450_avb --- avb ---------------------------------