This is a function to turn plane curves of genus 1 with a known point into objects of type EllipticCurve. It relies on MAGMA (as does EllipticCurve_from_cubic) but will add a little functionality. Here is an example of how it works:
sage: x,y,z=MPolynomialRing(QQ,Integer(3),'xyz').gens() # optional
sage: C=Curve(x^4+x^2*y^2-z^4)
sage: P=C(1,0,1)
sage: E=EllipticCurve_from_plane_curve(C,P)
sage: E
Elliptic Curve defined by y^2 = x^3 + 4*x over Rational Field
Component: algebraic geometry
Author: Lloyd Kilford, John Cremona
Reviewer: Nick Alexander
Merged: sage-4.1.alpha0
Issue created by migration from https://trac.sagemath.org/ticket/4290