proc draw_food
    for i: 1 .. 20
        loop
            randint(foodx(i),0,maxx)
            randint(foody(i),0,maxy-infobar_size)
            loop
                if foodx(i) >= 0 and foodx(i) <= 470 and foody(i) <= 240 and foody(i) <= 155 or     %%bottom left cliff
                    foodx(i) >= 545 and foodx(i) <= maxx and foody(i) <= 240 and foody(i) >= 155 or %%bottom right cliff
                    foodx(i) >= 395 and foodx(i) <= 590 and foody(i) <= 375 and foody(i) >= 300 or  %%Middle Pond
                    foodx(i) >= 480 and foodx(i) <= 0 and foody(i) <= 515 and foody(i) >= 425 or    %%Top left cliff
                    foodx(i) >= 545 and foodx(i) <= maxx and foody(i) <= 240 and foody(i) >= 425 then%Top right cliff
                    randint(foodx(i),0,maxx)
                    randint(foody(i),0,maxy-infobar_size)
                else
                    exit
                end if
            end loop
            exit when i = 20
        end loop
        drawfilloval(foodx(i),foody(i),5,5,7)
    end for
end draw_food