Transceiver code
boyinokc
Posts: 8
I have this code:
' Tcvr_TxCode_v1.1.bs2
'{$STAMP BS2}
'{$PBASIC 2.5}
x VAR Word
y VAR Word
HIGH 1 ' T/R Line
DO
PULSOUT 0, 1200 'Sync pulse for the receiver
SEROUT 0, 16468, [ "!", x.HIGHBYTE, x.LOWBYTE, y.HIGHBYTE, y.LOWBYTE]
x = x + 1
y = y + 1
PAUSE 10
LOOP
Receiver:
'Tcvr_RxCode_v1.1.bs2
'{$STAMP BS2}
'{$PBASIC 2.5}
x VAR Word
y VAR Word
LOW 1 ' T/R Line
DO
LOW 0
SERIN 0, 16468, [WAIT("!"), x.HIGHBYTE, x.LOWBYTE, y.HIGHBYTE, y.LOWBYTE]
HIGH 0
DEBUG ? x
DEBUG ? y
LOOP
'Tcvr_RxCode_v1.1.bs2
'{$STAMP BS2}
'{$PBASIC 2.5}
x VAR Word
y VAR Word
LOW 1 ' T/R Line
DO
LOW 0
SERIN 0, 16468, [WAIT("!"), x.HIGHBYTE, x.LOWBYTE, y.HIGHBYTE, y.LOWBYTE]
HIGH 0
DEBUG ? x
DEBUG ? y
LOOP
I wanna know how to test if the reviver revives the signal from the transmitter? and I'm using 433Mhz Parralax transeciver
' Tcvr_TxCode_v1.1.bs2
'{$STAMP BS2}
'{$PBASIC 2.5}
x VAR Word
y VAR Word
HIGH 1 ' T/R Line
DO
PULSOUT 0, 1200 'Sync pulse for the receiver
SEROUT 0, 16468, [ "!", x.HIGHBYTE, x.LOWBYTE, y.HIGHBYTE, y.LOWBYTE]
x = x + 1
y = y + 1
PAUSE 10
LOOP
Receiver:
'Tcvr_RxCode_v1.1.bs2
'{$STAMP BS2}
'{$PBASIC 2.5}
x VAR Word
y VAR Word
LOW 1 ' T/R Line
DO
LOW 0
SERIN 0, 16468, [WAIT("!"), x.HIGHBYTE, x.LOWBYTE, y.HIGHBYTE, y.LOWBYTE]
HIGH 0
DEBUG ? x
DEBUG ? y
LOOP
'Tcvr_RxCode_v1.1.bs2
'{$STAMP BS2}
'{$PBASIC 2.5}
x VAR Word
y VAR Word
LOW 1 ' T/R Line
DO
LOW 0
SERIN 0, 16468, [WAIT("!"), x.HIGHBYTE, x.LOWBYTE, y.HIGHBYTE, y.LOWBYTE]
HIGH 0
DEBUG ? x
DEBUG ? y
LOOP
I wanna know how to test if the reviver revives the signal from the transmitter? and I'm using 433Mhz Parralax transeciver
Comments
Check your wiring. Check your power supplies. Try the CRC examples from the product page ... they transmit and receive more complex data than the simple example from the documentation.
May you give more details please?
'Tcvr_RxCode_v1.1.bs2
'{$STAMP BS2}
'{$PBASIC 2.5}
x VAR Word
y VAR Word
LOW 1 ' T/R Line
DO
LOW 0
SERIN 0, 16468, [WAIT("!"), x.HIGHBYTE, x.LOWBYTE, y.HIGHBYTE, y.LOWBYTE]
HIGH 0
DEBUG ? x
DEBUG ? y
LOOP
'Tcvr_RxCode_v1.1.bs2
'{$STAMP BS2}
'{$PBASIC 2.5}
x VAR Word
y VAR Word
LOW 1 ' T/R Line
DO
LOW 0
SERIN 0, 16468, [WAIT("!"), x.HIGHBYTE, x.LOWBYTE, y.HIGHBYTE, y.LOWBYTE]
HIGH 0
DEBUG ? x
DEBUG ? y
LOOP
For example: I already adjusted the 2sx on the header of code if that is the 2sx stamp. And still, I can't receive any signal ??