prosze o pomoc czy jest to możliwe przy pomocy nadajnika o sygnale wejściowym
TTL: CMOS
modulacja am?
nie znam się zbytnio proszę o pomoc
Radiowy przesył sygnału Rs 232 jak to zrobić ?
witam
oczywiscie ze jest to mozliwe
modulacjia jak najbardziej AM nie napisałeś jak dokładnie chcesz przesyłać ten sygnał czy to ma być tor jedno czy dwukierunkowy i na jaką mniej więcej odległość. Jeżeli chcesz użyć toru jednokierunkowego to gorąco polecam układy TR3000 firmy RFM które mogą pracować zarówno jako nadajnik i jako odbiornik. Sam ich często używam i sądzę że ich parametry są wystarczająco dobre w stosunku do ich ceny (która zależy bardzo od ilości zamówionych sztuk ).
oczywiscie ze jest to mozliwe
modulacjia jak najbardziej AM nie napisałeś jak dokładnie chcesz przesyłać ten sygnał czy to ma być tor jedno czy dwukierunkowy i na jaką mniej więcej odległość. Jeżeli chcesz użyć toru jednokierunkowego to gorąco polecam układy TR3000 firmy RFM które mogą pracować zarówno jako nadajnik i jako odbiornik. Sam ich często używam i sądzę że ich parametry są wystarczająco dobre w stosunku do ich ceny (która zależy bardzo od ilości zamówionych sztuk ).chodzi o tor jednokierunkowy odległość 200 - 300m
nie wiem czy dobrze robie ale sygnał chcę nadać poprzez procesor at90s2313
(inaczej nie potrafię nie jestem elektronikiem)oraz układ max232
a odbierać ma także układ max232 i procesor at90s2313
czy mogę sygnał z maxa puścic bezopśrednio na In nadajnika ??
[ Dodano: 11-10-2005, 18:20 ]
jeszcze jendo nadajnik i odbiornik już mam kiedyś firma magsoft (ok 15zł sztuka)na 433MHz niestety na te TR3000 to zabardzo mnie nie stać
nie wiem czy dobrze robie ale sygnał chcę nadać poprzez procesor at90s2313(inaczej nie potrafię nie jestem elektronikiem)oraz układ max232
a odbierać ma także układ max232 i procesor at90s2313
czy mogę sygnał z maxa puścic bezopśrednio na In nadajnika ??
[ Dodano: 11-10-2005, 18:20 ]
jeszcze jendo nadajnik i odbiornik już mam kiedyś firma magsoft (ok 15zł sztuka)na 433MHz niestety na te TR3000 to zabardzo mnie nie stać
max232 jest tu zupelnie zbedny a nawet moglby spowodowac uszkodzenie nadajnika poniewaz na jego wyjsciu amplituda sygnalu moze miec kilkanascie volt co dla nadajnika moze okazac sie zabojcze 
. Do nadajnika mozna sie wprost podlaczyc poprzez wyjscie Tx procesora lub ewentualnie nalezy sygnal zanegowac poprzez ranzystor i rezystor. Również po stronie odbiorczej nie jest potrzbny max232 (choc w tym przypadku nic on nie uszkodzi) ale moze byc potrzebne rowniez zanegowanie sygnalu wyjsciowego z nadajnika a dalej sygnal można podac bezporednio do wejscia Rx procesora. Co do ukladow za 15zł to nie wiem czy beda mialy one wystarczajace parametry dla uzyskania poprawnej transmisji na odleglosc 200-300m- racze w to watpię i odleglosc bedzie mniejsza ale zawsze aby byc pewnym nalezy sprobowac
. Do nadajnika mozna sie wprost podlaczyc poprzez wyjscie Tx procesora lub ewentualnie nalezy sygnal zanegowac poprzez ranzystor i rezystor. Również po stronie odbiorczej nie jest potrzbny max232 (choc w tym przypadku nic on nie uszkodzi) ale moze byc potrzebne rowniez zanegowanie sygnalu wyjsciowego z nadajnika a dalej sygnal można podac bezporednio do wejscia Rx procesora. Co do ukladow za 15zł to nie wiem czy beda mialy one wystarczajace parametry dla uzyskania poprawnej transmisji na odleglosc 200-300m- racze w to watpię i odleglosc bedzie mniejsza ale zawsze aby byc pewnym nalezy sprobowac dzięki jak poskładam to się pochwale co z tego wyszło Jeszcze raz dzięki za pomoc
[ Dodano: 14-10-2005, 15:54 ]
Niestety nic nie wyszło
negowałem nie negowałem i nic
TO jest program odbiornika:
Config Portb = Output
Portb = &B00000000
Config Portd = &B1111110
Portd = &B0000000
$baud = 2400
$crystal = 8000000
Dim B As Byte
'B = 50
'C = 100
Do
B = Inkey()
If B > 0 Then
Portd.6 = 1 'sygnalizacja odebrania didą
End If
If B => 100 Then
Portd.4 = 1 'sygnalizacja odebrania didą
End If
Portd.5 = 1 'sygnalizacja pracy procesora miganie co 100ms
Waitms 100
Portd = 0
Waitms 100
Loop
a to nadajnika:
Config Portb = Output
Portb = &B00000000
Config Portd = &B1111110
Portd = &B0000000
$baud = 2400
$crystal = 8000000
Dim B As Byte
Dim C As Byte
B = 50
C = 100
Do
Print B 'wysyła co 4 sekundy sygnał B
Wait 4
Print C 'wysyła co 4 sekundy sygmnał C
Wait 4
Loop
MOZE coś żle napisałem w programie proszę o pomoc!!!!
[ Dodano: 14-10-2005, 15:54 ]
Niestety nic nie wyszło
negowałem nie negowałem i nic
TO jest program odbiornika:
Config Portb = Output
Portb = &B00000000
Config Portd = &B1111110
Portd = &B0000000
$baud = 2400
$crystal = 8000000
Dim B As Byte
'B = 50
'C = 100
Do
B = Inkey()
If B > 0 Then
Portd.6 = 1 'sygnalizacja odebrania didą
End If
If B => 100 Then
Portd.4 = 1 'sygnalizacja odebrania didą
End If
Portd.5 = 1 'sygnalizacja pracy procesora miganie co 100ms
Waitms 100
Portd = 0
Waitms 100
Loop
a to nadajnika:
Config Portb = Output
Portb = &B00000000
Config Portd = &B1111110
Portd = &B0000000
$baud = 2400
$crystal = 8000000
Dim B As Byte
Dim C As Byte
B = 50
C = 100
Do
Print B 'wysyła co 4 sekundy sygnał B
Wait 4
Print C 'wysyła co 4 sekundy sygmnał C
Wait 4
Loop
MOZE coś żle napisałem w programie proszę o pomoc!!!!