Multitech MTCBA-G-F User Manual download pdf (Page 228)

190

Delay_ms(1000)

Usart_Write_Text("AT#SENDERNAME="+CHR(0X22))

var1 = calculolongitud(64,31)

lecturaeeprom(64,var1)

Usart_Write(CHR(0X22))

Usart_Write(enter)

Delay_ms(1000)

end sub

sub procedure conectargprs() 'Procedimiento que envía al módem celular los

Usart_Write_Text("AT+WOPEN=1") 'comandos para conectarlo a la red GPRS

Usart_Write(enter)

Delay_ms(3000)

Usart_Write_Text("AT#GPRSMODE=1")

Usart_Write(enter)

Delay_ms(3000)

Usart_Write_Text("AT+CGATT=1")

Usart_Write(enter)

Delay_ms(10000)

Usart_Write_Text("AT#CONNECTIONSTART")

Usart_Write(enter)

Delay_ms(10000)

Usart_Write_Text("AT#LTCPSTART=1")

Usart_Write(enter)

Delay_ms(5000)

end sub

1 2 ... 223 224 225 226 227 228 229 230 231 232 233 ... 236 237

No comments

Multitech MTCBA-G-F User Manual Page 228