replace RicoRies.VehicleDialog by
phrase RicoRies_VehicleDialog_Bonuzz()

if (Has this HasWillis)
print("Есть Виллис с прицепом - 60000 эльдо.")
if (callm Player.GetMoney()>=60000) then userch("Беру Виллис.", 1)
end if

if (Has this HasHummer)
print("Есть Хаммер - 500000 эльдо.")
if (callm Player.GetMoney()>=500000) then userch("Беру Хамвик.", 2)
end if

if (Has this HasBTR)
print(" Есть бронетранспортёр БТР-70, правда, без пушки... За него хочу миллион.")
if (callm Player.GetMoney()>=1000000) then userch("Беру БТР.", 3)
end if

if (Has this HasFMTV_A1R)
print(" Имеется армейский грузовик FMTV A1R, за такой тебе придется выложить пару миллионов.")
if (callm Player.GetMoney()>=2000000) then userch("Беру FMTV.", 4)
end if

if (not has this Prepaid)
if (has this HasWillis or has this HasHummer or has this HasBTR or has this HasFMTV_A1R)
print(" Кроме того, можно оставить задаток в размере 1000 эльдо и заказать другую машину, причем нужного цвета и комплектации...")
else
print("Сейчас машин в наличии нет. Но можно оставить задаток в размере 1000 эльдо и заказать машину нужного цвета и комплектации...")
end if

if (callm Player.GetMoney()>=1000)
userch("Хорошо, я готов оставить задаток.", 5)
end if
else
if (not has this HasWillis and not has this HasHummer and not has this HasBTR and not has this HasFMTV_A1R)
print("Ничего нет.")
userch("Чёрт! (конец разговора)", ucExit)

askch

stop chat imm
end if
end if

userch("Хорошо, я подумаю. (конец разговора)", ucExit)

switch (askch)
when 1:
Player.DecMoney(60000)
call AddCar(VehWillis)
this.Delete HasWillis
when 2:
Player.DecMoney(500000)
call AddCar(VehHummer)
this.Delete HasHummer
when 3:
Player.DecMoney(1000000)
call AddCar(VehBTR)
this.Delete HasBTR
when 4:
Player.DecMoney(2000000)
call AddCar(VehFMTV_A1R)
this.Delete HasFMTV_A1R
when 5:
print("Замечательно! Так какую машину ты желаешь иметь в своем гараже?")
userch("Я еще подумаю. (конец разговора)", ucExit)

if (not has this HasWillis) then userch("Хочу Виллис с прицепом.", ucOK)
userch("Хочу ГАЗ69.", ucOK)
userch("Хочу Урал.", ucOK)
userch("Хочу грузовик FMTV A1R.", ucOK)
userch("Хочу Хаммер.", ucOK)
if (not has this HasBTR) then userch("Хочу БТР.", ucOK)

if (askch==ucOK)
print("Отлично! А цвет?")

userch("Красный, конечно.", ucOK)
userch("Чисто черный.", ucOK)
userch("Серебристый металлик.", ucOK)
userch("Голубой...", ucOK)
userch("Камуфляж.", ucOK)
userch("Да любой, лишь бы веселенький!", ucOK)
askch

print("Без проблем! Давай сюда задаток, через неделю-другую приходи... Кстати, вот договор, обрати внимание, что в случае отказа от машины до ее прихода в Кали-Кантинос задаток не возвращается.")

userch("Ладно, я передумал, обойдусь пока без машины...", ucExit)
userch("Вот деньги.", ucOK)

if (askch==ucOK)
this.Add Prepaid
Player.DecMoney(1000)

print("Я позвоню, как машина прибудет на склад...")
wait
else
print("Приходи, как надумаешь.")
wait
end if
end if
end switch
end phrase