Autor Tema: depurar programa gsm  (Leído 2411 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado flaminco

  • PIC10
  • *
  • Mensajes: 5
depurar programa gsm
« en: 02 de Febrero de 2014, 17:24:05 »
Muy buenas .
En su dia estube con ustedes ,la verdad es que no aporte mucho ,quisiera empezar de nuevo
aportando este proyecto ,a falta de depurar lo .
La idea es de una alarma de una sola entrada que con el tiempo ampliaremos conectada a un modulo gsm siemens tc35.
las pruevas  el Proteus van  bien en mi ordenador.
 Se lo he pasado a un compañero que
fue el quien inicio el proyecto ,me comenta que el hiperterminal le dice tonterias ,
por que el TC 35 lo podemos simular como el hiperterminal ?

Desconectado flaminco

  • PIC10
  • *
  • Mensajes: 5
Re: depurar programa gsm
« Respuesta #1 en: 02 de Febrero de 2014, 17:38:17 »
los archiovos.
Como envio el esquema del proteus?+

Desconectado flaminco

  • PIC10
  • *
  • Mensajes: 5
Re: depurar programa gsm
« Respuesta #2 en: 02 de Febrero de 2014, 17:40:18 »
Los siento el hex. parece que da  un error al descargar .

Desconectado flaminco

  • PIC10
  • *
  • Mensajes: 5
Re: depurar programa gsm
« Respuesta #3 en: 02 de Febrero de 2014, 17:48:39 »

program gsm

' Declarations section
symbol led = PORTC.0     ' pues eso conexion del led al portc.0

dim i as byte
dim txt1 as char[36]
dim txt2 as char[15]


sub procedure lf_cr()             ' Pues eso nueva linea y retorno de carro
    UART1_Write(10)                ' Line Feed
    UART1_Write(13)                ' Carriage Return
end sub

sub procedure configuracion()        'Configuracion del 16f876 y variables
    adcon0 = %00000000
    adcon1 = %00000110
    trisa = %11111111
    trisb = %11101101
    trisc = %10111110
    led = 1         ' Led encendido
    Delay_ms(500)
    led = 0          ' Led  apagado
                     ' Configuracion interrupciones
    GIE_bit  = 0     ' Interrupciones GLOBALES
    PEIE_bit = 0     ' Interrupciones de PERIFERICOS
    RCIE_bit = 0     ' Interrupcion Recepcion USART

    UART1_Init(9600) ' Inicializacion USART
    Delay_ms(250)
    lf_cr()
    Delay_ms(250)

end sub


main:
'   Main program

         configuracion()
         UART1_Write_Text("AT+CMGF=1")
         Delay_ms(1000)
           lf_cr()
         UART1_Write_Text("AT+CMGS=000000000")
         Delay_ms(1000)
           lf_cr()
         UART1_Write_Text("ALARMA")
               Delay_ms(1000)
           UART1_Write(26)  ' esto creo que es control Z

         while true
            led = 1     ' Led
            Delay_ms(100)
            led = 0     ' Led
            Delay_ms(250)
         wend

end.


Quisira publicar el esquema en proteus lo puedo deja en una pagina de descargas

Desconectado flaminco

  • PIC10
  • *
  • Mensajes: 5
Re: depurar programa gsm
« Respuesta #4 en: 04 de Febrero de 2014, 17:22:30 »
Parte del esquema


 

anything