haaa, ich habs.

ich hab in meinem programbeispiel die pause vergessen einzutragen, sonst wäre schon einer draufgekommen. meine schleife sieht so aus:

for ii = 1 to 8
pause 1
if (WERT and &h01) = &h01 then DATA = 1 else DATA = 0
pulse CLOCK
WerT = WERT shr 1
next ii

jetzt habe ich die pause rausgenommen und siehe da es läuft nun um einiges schneller.