;   Nazwisko i Imie: Stadnicki Adrian
;
    $NOLIST
    $PAGEWIDTH (160)
    $NOPAGING
;   ---------------------------------------------------------------------------------------
;   Program 'user.asm' jest przeznaczony dla studentów informatyki UMCS, ktorzy
;   rozpoczynaja nauke programowania w jezyku asemblera i beda uzywac do tego celu zestawu
;   dydaktycznego DSM51x.
;   ---------------------------------------------------------------------------------------
;   Uwagi studenta:
;
;
;   ---------------------------------------------------------------------------------------
    $LIST
;   ---------------------------------------------------------------------------------------
;   program uzytkownika:
;   ---------------------------------------------------------------------------------------
;
;   adresy i stale programowe:
przyklad_1      equ 70              ; do zmiennej 'przyklad_1' przypisano adres 70
przyklad_2      equ 0FFF0h          ; do zmiennej 'przyklad_2' przypisano wartosc 65520


;   bity flagowe programu:
t0_flaga        bit     0
t0_flag2        bit     1
przyklad_3      bit 5               ; do bitu 'przyklad_3' przypisano adres 5


;   START PROGRAMU:
;   ---------------
            ljmp    start               ; skocz do strefy przygotowania srodowiska
;   procedury obslugi przerwan:



;   przygotowanie srodowiska:
start:
            mov tmod,#00000001b
            setb    tr0         ; wlaczamy uklad T0
            mov r0,#0

                            ; start przygotowania srodowiska


;   petla programowa:
petla:                          ; petla programowa

            cjne r0,#254d,ptla_10
            lcall obsluga_r0

ptla_10:
            inc r0
            jnb tf0,ptla_20
            lcall obsluga_t0
ptla_20:
            ljmp    petla               ; powrot do poczatku petli
;
;   podprogramy:
obsluga_t0:
            clr tf0
            setb    t0_flaga
            ret
obsluga_1:
            clr t0_flaga
            cpl p1.7
            ret
obsluga_r0:
            mov r0,#0
            cpl p1.7
            ret

;   koniec programu
end