VERSION 4.00
Begin VB.Form Form1 
   Caption         =   " Faisceaux"
   ClientHeight    =   9570
   ClientLeft      =   3660
   ClientTop       =   3195
   ClientWidth     =   11670
   Height          =   10140
   Left            =   3600
   LinkTopic       =   "Form1"
   ScaleHeight     =   9570
   ScaleWidth      =   11670
   Top             =   2685
   Width           =   11790
   Begin VB.CommandButton Command1 
      Caption         =   "Go"
      Height          =   375
      Left            =   10200
      TabIndex        =   0
      Top             =   8880
      Width           =   855
   End
End
Attribute VB_Name = "Form1"
Attribute VB_Creatable = False
Attribute VB_Exposed = False
Private Sub Command1_Click()
  MaxX = 11500: MaxY = 8500
  aff_faisceaux
End Sub