function b()
if GetPlayerResource(1, 6) >= 10000 then
--money ok--
QuestionBox("согласен_ли_ты.txt", "yes" , "no")
else
--money no--
MessageBox("золота нет.txt")
end
end
function yes()
--da soglasen--
SetPlayerResource(1, 6, GetPlayerResource(1, 6) - 10000)
obs = obs + 10
end
function no()
--net ne hochu--
end