Accelerometer | ADC | ADXL | Adxl20 | AVR | BasicStamp | BX-35 | BX28 | BX35 | COM3 | Compiler | Downloader | EEPROM | Electromagnet | GetADC | GP2D1 | GPS | I2C | IDE | Keypad | LCD | LCD+ | MIDI | Motors | Multitasking | Netmedia | Networking | PCB | PID | PlaySound | PWM | Relays | RTC | Servo | ShiftOut | SitePlayer | SPI | Stack | Timer | USB

Hello Chris,

Thanks for your reply.
I=A0 am sorry if you did not received my message but I send all at support@=
basicx.com which is the address I found on the Netmedia Internet Site , I t=
hink.
It was on 12 January 2009 at 23H53 and on the 15 January 2009 at 03H34 and =
09H19 and I did not received any Undelivred Error message.

Anyway, I have in your below message the answers to my questions, very very=
usefull =A0and I will try it now.

Thanks for your help and best regards.

Patrick.
=A0

________________________________
From: robotlogic
To: b...@yahoogroups.com
Sent: Thursday, January 15, 2009 11:03:06 PM
Subject: [BasicX] Re: BasicX-24 X10Cmd Command for XM10E-120, TW523 or PSC0=
5 Two Way X10 Interfac
Patrick,

I can tell you that NetMedia support never received your emails. When did y=
ou send them?

What is your question? Are you using this code? :

'House ID
Const X10_A As Byte =3D &H6
Const X10_B As Byte =3D &HE
Const X10_C As Byte =3D &H2
Const X10_D As Byte =3D &HA
Const X10_E As Byte =3D &H1
Const X10_F As Byte =3D &H9
Const X10_G As Byte =3D &H5
Const X10_H As Byte =3D &HD
Const X10_I As Byte =3D &H7
Const X10_J As Byte =3D &HF
Const X10_K As Byte =3D &H3
Const X10_L As Byte =3D &HB
Const X10_M As Byte =3D &H0
Const X10_N As Byte =3D &H8
Const X10_O As Byte =3D &H4
Const X10_P As Byte =3D &HC

'Unit ID
Const X10_1 As Byte =3D &HC
Const X10_2 As Byte =3D &H1C
Const X10_3 As Byte =3D &H4
Const X10_4 As Byte =3D &H14
Const X10_5 As Byte =3D &H2
Const X10_6 As Byte =3D &H12
Const X10_7 As Byte =3D &HA
Const X10_8 As Byte =3D &H1A
Const X10_9 As Byte =3D &HE
Const X10_10 As Byte =3D &H1E
Const X10_11 As Byte =3D &H6
Const X10_12 As Byte =3D &H16
Const X10_13 As Byte =3D &H0
Const X10_14 As Byte =3D &H10
Const X10_15 As Byte =3D &H8
Const X10_16 As Byte =3D &H18

'Commands
Const X10_AllUnitsOff As Byte =3D &H1
Const X10_AllLightsOn As Byte =3D &H3
Const X10_On As Byte =3D &H5
Const X10_Off As Byte =3D &H7
Const X10_Dim As Byte =3D &H9
Const X10_Bright As Byte =3D &HB
Const X10_AllLightsOff As Byte =3D &HD
Const X10_ExtendedCode As Byte =3D &HF
Const X10_HailRequest As Byte =3D &H11
Const X10_HailAcknowledge As Byte =3D &H13
Const X10_PreSetDim0 As Byte =3D &H15
Const X10_PreSetDim1 As Byte =3D &H17
Const X10_ExtendedData As Byte =3D &H19
Const X10_StatusOn As Byte =3D &H1B
Const X10_StatusOff As Byte =3D &H1D
Const X10_StatusRequest As Byte =3D &H1F

Const Clock_Pin As Byte =3D 8
Const X10_Out As Byte =3D 7
Const X10_In As Byte =3D 6

Sub Main()

Call sleep(512)

Call x10cmd(7, 8, X10_P, X10_1, 2)

Do
Call putpin(12, 0)
Call x10cmd(X10_Out, Clock_Pin, X10_P, X10_On, 2)
Call sleep(30)
Call x10cmd(X10_Out, Clock_Pin, X10_P, X10_Off, 2)
Call putpin(12, 1)
Call sleep(30)
Loop

End Sub

=20
=20=20=20=20=20=20

[Non-text portions of this message have been removed]
------------------------------------



(You need to be a member of basicx -- send a blank email to basicx-subscribe@yahoogroups.com )