\
АВТОМАТИКА
І
ldi r20,ObOOOOOllO
; 1
mov datal,r20
ldi r20,ObOlOllOll
; 2
mov data2,r20
ldi r20,ObOlOOllll
; 3
mov data3,r20
ldi r20,ObOllOOllO
; 4
mov data4,r20
ldi r20,ObOllOllOl
; 5
mov data5,r20
ldi r20,ObOlllllOl
; 6
mov data6,r20
ldi r20,ObOOOOOlll
; 7
mov data7,r20
ldi r20,ObOlllllll
; 8
mov data8,r20
ldi r20,ObOllOllll
; 9
mov data9,r20
Основная Программа
ldi znak, ObOOOOOllO
out 0x12,znak
out 0xl8,data0
rcall zz
ldi znak,ObOOOOOlll
out 0x12,znak
out 0xl8,datal
rcall zz
ldi znak,ObOOOOlllO
out 0x12,znak
out 0xl8,data2
rcall zz
ldi znak,0b00001111
out 0x12,znak
out 0x18,data3
rcall zz
ldi znak,0b00010110
out 0x12,znak
out 0xl8,data4
rcall zz
ldi znak,ObOOOlOlll
out 0x12,znak
out 0xl8,data5
rcall zz
ldi znak,ObOOOl1110
out 0x12,znak
out 0xl8,data6
rcall zz
ldi znak,ObOOOlllll
out 0x12,znak
out 0xl8,data7
rcall zz
ldi znak,0b00100110
out 0x12,znak
out 0xl8,data8
rcall zz
ldi znak,ObOOlOOlll
out 0x12,znak
out 0xl8,data9
rcall zz
rjmp main
; Подпрограмма декодирования шестнадцатиричного значения
семисегментное.
; Знакоместо 0
; Знакоместо 1
; Знакоместо 2
; Знакоместо 3
; Знакоместо 4
; Знакоместо 5
; Знакоместо б
; Знакоместо 7
; Знакоместо 8
; Знакоместо 9
ері г20,0х0б
breq S6
ері r20,0x07
breq S7
ері r20,0x08
breq S8
ері r20,0x09
breq S9
ері r20,0x0A
breq SA
ері r20,0x0B
breq SF
ері r20,0x0C
breq SSI
ері r20,0x0D
breq SS2
ері r20,0x0E
breq SP
cpi r20,0x0F
breq Sm
SO:
ldi r21,0x00
rjmp DD
SI:
ldi r21,ObOO000110
rjmp DD
S2:
ldi r21,ObOlOllOll
rjmp DD
S3:
ldi r21,ObOlOOllll
rjmp DD
S4:
ldi r21,ObOllOOllO
rjmp DD
S5:
ldi r21,ObOllOllOl
rjmp DD
S6:
ldi r21,ObOlllllOl
rjmp DD
S7:
ldi r21,ObOOOOOlll
rjmp DD
S8:
ldi г21,0Ь01111111
rjmp DD
S9:
ldi r21,ObOllOllll
rjmp DD
SA:
ldi r21,ObOOllllll
rjmp DD
SB:
ldi r21,ObOOOOOOOO
rjmp DD
SP:
ldi r21,ObOlllOOll
rjmp DD
SF:
ldi r21,ObOlllOOOl
rjmp DD
Sm:
ldi r21,ObOlOOOOOO
rjmp DD
SSI:
ldi r21,ObOOOOllOO
rjmp DD
SS2:
ldi r21,ObOOOllOOO
DD:
ret
; Подпрограмма ЗАДЕРЖКА 1 мсек.
ZZ:
ldi r28,0x03
; Тут 03
SOU:
ldi r27, OxFF
; Тут FF
SOU1:
__hgfedeba - сегменты
ObOOOOOOOO - биты в регистре
decod:
wdr
andi r20,OxOF
cpi r20,0x00
breq SO
cpi r20,0x01
breq SI
cpi r20,0x02
breq S2
cpi r20,0x03
breq S3
cpi r20,0x04
breq S4
cpi r20,0x05
breq S5
ldi r28,0x03
ldi r27,OxFF
wdr
nop
dec r27
bme SOU1
dec r28
bme SOU
tst flag
breq FF
ret
clr long
clr fl
clr f2
clr f3
clr f4
clr f5
inc flag
ret
; Повтор FF pas.
; Повтор 2 раза.
; Принудительное обнуление
; счетчика long.
Радиолюбитель - 0 8 /2 0 0 5 |
предыдущая страница 17 Радиолюбитель 2005-08 читать онлайн следующая страница 19 Радиолюбитель 2005-08 читать онлайн Домой Выключить/включить текст