mov R0, #1d setb 5 ;; bit 5 označuje směr 1=vlevo 0= vpravo ; hlavní proramová smyčka start: call zobrazuj call del800 jmp start ; podprogram pro zobrazení světla na LED zobrazuj: mov A, R0 jb 5, rotujVlevo jmp rotujVpravo rotujVlevo: RL A jmp uloz rotujVpravo: RR A jmp uloz uloz: mov R0, A ; uchovává číslo logicky cpl A mov P0, A ; P0 zobrazuje ; kontroluju jestli jsem došel doleva -- pomocí CJNE CJNE R0, #10000000b, preskoc jmp vpravo preskoc: ; kontroluju jestli jsem došel doprava -- pomocí ANL mov A, #00000001b ANL A, R0 jnz vlevo RET ; otáčí směr pohyby doprava vpravo: clr 5 RET ; otáčí směr pohybu doleva vlevo: setb 5 RET ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; include delay.inc END