Attribute VB_Name = "Comun"
Option Explicit

'Maquina de estados para saber en que etapa del proceso voy
Public Const INICIO = 1
Public Const CARGA_TESTER = 2
Public Const ABRE_PUERTO = 3
Public Const PRUEBAS_TESTER = 4
Public Const MANDA_SERIE = 5
Public Const CONFIRMA_SERIE = 6
Public Const MANDA_RESET = 7
Public Const CARGA_APLICACION = 8
Public Const ERR = 9
Public Const FIN_OK = 10

'valor mínimo esperado de rssi
Public Const MIN_RSSI = 16

Public Type Control
    Index As Integer
    Com As Integer
    Status As Integer
    espera As Integer
    len_rx As Integer
    buffer_rx As String
    leds As Integer
    comandos_at As Integer
    sim As Integer
    wavecom As Integer
    simcom As Integer
    rssi As Integer
    attach As Integer
    ppp As Integer
    registro As Integer
    eeprom As Integer
    cn As New ADODB.Connection
    numero_serie As String
    imei As String
End Type
Public matriz(3) As Control