5.64 NewGraph

 if Input("Label=")  
 then NewGraph( ["Label",num], ["Label(", %1,",", """",chaine(),""")"] ),  
      ReDraw(), Inc(num,1)  
 fi