NAME MIGANIE
LED_cz EQU P3.3
LED_z EQU P3.5
;---------------------------
CSEG at 0h
ljmp Start
Tablica:
DB 1110$1111b ;0
DB 0010$1100b ;1
DB 1011$0111b ;2
DB 1011$1110b ;3
DB 0111$1100b ;4
DB 1101$1110b ;5
DB 1101$1111b ;6
DB 1010$1100b ;7
DB 1111$1111b ;8
DB 1111$1110b ;9
DB 1111$1101b ;A
DB 0101$1111b ;b
DB 1100$0111b ;C
DB 0011$1111b ;d
DB 1101$0111b ;E
DB 1101$0101b ;F
Start:
clr LED_cz
clr LED_z
mov R0,#0
mov A,#0
Mruganie:
mov DPTR,#Tablica
movc A,@A+DPTR
mov P2,A
inc R0
mov A,R0
call stop
cjne A,1101$0101b,Mruganie
ljmp Mruganie
stop:
mov R1,#250
mov R2,#250
mov R3,#10
stop1:
djnz R1,Stop1
mov R1,#250
djnz R2,Stop1
mov R2,#250
djnz R3,Stop1
ret
END