Witam, mam problem z SL45i. połączenie jak na obrazku i nic się nie dzieje. (napięcie obniżone tylko na TXuc>>RXtel). Tel nawet nie mignie.
Zauważyłem że staje na
na jakies 2 minuty
$regfile = "m32def.dat"
$crystal = 8000000
$Baud = 19200
Config Serialin = Buffered , Size = 200
Dim Kod As Byte
Dim Bufor As Byte
Config Porta = Output 'cały port a jako wyjście
Porta = &B00000000
Do
Print "ATE0" ; Chr(13)
Porta.0 = 1
Print "ATD669123609;" ; Chr(13) 'zamiast 777777777 to moj tel podalem na ktory ma dzwnonic
Porta.1 = 1
Wait 15
Print "ATH" ; Chr(13)
Porta.2 = 1
Wait 1
Gosub Oproznij_bufor
Loop
End
Oproznij_bufor: 'Opróżnia bufor z odpowiedzi telefonu
Do
Kod = Inkey()
Bufor = Ischarwaiting()
Loop Until Bufor = 0
Zauważyłem że staje na
Wait 15na jakies 2 minuty
