к сожалению сейчас времени совсем нет, завалило делами даже на форуме посидеть не могу( посмотрите урок про пересечение прямоугольников (25ый вроде). и ещё посмотрите урок 11.
у вас здесь вижу вроде всё норм, единственно подозрение вызывает строка после (if Dy </>0), где вы сначала прибавляете +70, а затем почему то в аналогичном случае вычитаете height. возможно от этого одно значение больше другого и происходит бесконечное плавание вверх вниз.