Seri giriş paralel çıkış

[bekabus]

ben bu iş için kaydırma olarak yapmayı denedim ewet doğru bu şekilde oluyor ama arkadaşlar tüm forumlarda bunu picbasic yada c ile programlanmış pic ve shift işlemi yapan entegreler le yapmışlar. ben mikrobasic kullanıyorum ve bu programda shitout, pulsout gibi komutlar yok her işlemi kendiniz yazmanız gerekiyor, bu işlemin bir örneğini mikrobasic de verebilicek veya farklı bir yöntem gösterebilicek varmı ?

seri giriş:
a b c d e  f g h                paralel  çıkış:
1 0 0 0 1 1 0 0                                   h 0
                                                        g 0
                                                        f 1
                                                        e 1
                                                        d 0
                                                        c 0
                                                        b 0
                                                        a 1