1) yes sir it is now a test pgm.
2) I know the csum is from vb pgm. see below
so i think the csum is FFH
3) i will need to re-write the vb pgm to send address then value.
so the two byte will be addr. and value
4) yes i have a debuger but i am sending code to serial port form vb pgm so can't use debugger at the same time.
5) you were saying: "additionally
You must clear RI before to wait for it.
You must move the ???
I'll try now to clear the RI first then move what?
it's not what to write for the csum..it's how do i word it in the code? ie:
if csum = ffh then ajump ld_8802 else ajump mainloop.
so to say: the pgm is not looping now that the config. serial port is not in the main loop.
trying the clr RI now...like this.
CLR RI
JNB RI,$
MOV R0,SBUF
CLR RI
JNB RI,$
MOV R1,SBUF




<pre>
Private Sub MSComm1_OnComm()

DELAY = DATARATE * 100 '10000

MSComm1.Settings = "9600,m,8,1"
' m (mark) = 1 in 9 bit 68hc11
MSComm1.Output = Chr$(&HFF) '255)'beginning of block $ff
For I = 1 To DELAY
Next

MSComm1.Settings = "9600,s,8,1"
's (mark)= 0 in 9 bits68hc11
MSComm1.Output = Chr$(FADER1.Value)
txchksum = &HFF + FADER1.Value ' 1st byte added in
For I = 1 To DELAY
Next
'.........same for all 12 values then last two

10 If txchksum < &H100 Then GoTo 20
txchksun = txchksum - &H100
GoTo 10

20 MSComm1.Output = Chr$(txchksum)
For I = 1 To (DELAY + 1000)
Next

End Sub