Argumentos:para mostrar formularios o no

Public Sub Main()

  If Application.Args[1] = "" Then
    'modo gráfico,ya que no se ha introducido ningun numero
    FMain.Show()
  Else
    'generar imagen internamente...

    If Len(Application.Args[1]) <> 13 Then
      Print "Error: introduce un numero valido EAN-13 (" & Application.Args[1] & ")"
      Quit
    Else
      'borro la imagen anterior si la hay.
      Try Kill "/tmp/codigoBarras.png"
      'genero imagen del codigo y la guardo en
      imagen(Application.Args[1])
      Quit

    Endif
  Endif

End