[ Pascal ] "ReSnake"