dioda1 equ P1.0     ;przypisanie adresowi P1.0 nazwy dioda1
dioda2 equ P1.1     ;przypisanie adresowi P1.1 nazwy dioda2
dioda3 equ P1.2     ;przypisanie adresowi P1.2 nazwy dioda3
dioda4 equ P1.3     ;przypisanie adresowi P1.3 nazwy dioda4
dioda5 equ P1.4     ;przypisanie adresowi P1.4 nazwy dioda5
dioda6 equ P1.5     ;przypisanie adresowi P1.5 nazwy dioda6
dioda7 equ P1.6     ;przypisanie adresowi P1.6 nazwy dioda7
dioda8 equ p1.7     ;przypisanie adresowi P1.7 nazwy dioda8

main:
mov A,#0            ;reset akumulatora
mov P1,#0ffh        ;ustawienie 1 na wszystkich pinach P1 - wygaszenie diod
cpl dioda1              ;włączenie 1 diody
acall opoznienie    ;wywołanie podprogramu opoznienie
cpl dioda2              ;włączenie 2 diody
acall opoznienie    ;wywołanie podprogramu opoznienie
cpl dioda3              ;włączenie 3 diody
acall opoznienie    ;wywołanie podprogramu opoznienie
cpl dioda4              ;włączenie 4 diody
acall opoznienie    ;wywołanie podprogramu opoznienie
cpl dioda5              ;włączenie 5 diody
acall opoznienie    ;wywołanie podprogramu opoznienie
cpl dioda6              ;włączenie 6 diody
acall opoznienie    ;wywołanie podprogramu opoznienie
cpl dioda7              ;włączenie 7 diody
acall opoznienie    ;wywołanie podprogramu opoznienie
cpl dioda8              ;włączenie 8 diody
acall opoznienie    ;wywołanie podprogramu opoznienie
ajmp main           ;skok do main

opoznienie:
inc A                   ;inkrementacja akumulatora
cjne A,#2, opoznienie   ;skok warunkowy zależny od wyniku porównania
mov A,#0
ret