maybe i've misunderstood something but
Code:
                                if recpos=18 then
                                    if indata<100 then
                                        address=indata
                                        write 0, address
                                        for y=1 to 10
                                            high portb.6
                                            high portb.7
                                            pause 20
                                            low portb.6
                                            low portb.7
                                            pause 20
                                        next
                                        high portb.6
                                    else
                                        low portb.6
                                        for y=1 to 10
                                            high portb.7
                                            pause 20
                                            low portb.7
                                            pause 20
                                        next
                                        high portb.6
                                    endif
                                    recpos=16