Программка для 8051

@NYRA · Регистрация: 09.11.2015

Author24 — интернет-сервис помощи студентам

Здравствуйте. Нужна помощь. я не совсем понимаю как организовать отнимание 1 и отображение.
вот задание:
Попеременно отображать на статическом индикаторе числа от 0 до 9, дублировать эти числа на линейке светодиодов (в двоичной форме).

Assembler

ORG  0
Begin:
mov R1,#09h 
mov A,R1     
mov R3, A
mov P1,#01010101b  
mov A,R3
call decod      
mov P3,#1000b
mov P2,A
call DEL        
 
mov A,R3
call decod      
mov P3,#1000b
mov P2,A
mov P1,#10101010b 
call DEL    
 
label:
mov A,R3
call decod
djnz R1,label
 
jmp Begin   
 
decod:
  mov DPTR,#TabDecod 
  movc A,@A+DPTR     
  ret
   TabDecod:
  db 11000000b; ñèìâ "0"
  db 11111001b; ñèìâ "1"
  db 10100100b; ñèìâ "2"
  db 10110000b; ñèìâ "3"
  db 10011001b; ñèìâ "4"
  db 10010010b; ñèìâ "5" 
  db 10000010b; ñèìâ "6"
  db 11111000b; ñèìâ "7"
  db 10000000b; ñèìâ "8"
  db 10010000b; ñèìâ "9"
  db 10001000b; ñèìâ "À"
  ret
 
 
DEL:                     
          mov R6,#0FFh
          mov R5,#0Ah
C2:       mov R7,#0FFh
C4:       djnz R7, C4
          djnz R6, C2
          djnz R5, C2
          ret           
 
END

@pyzhman · 14.05.2017, 18:45

Сообщение от NYRA

как организовать отнимание 1

От 0 до 9 нужно прибавлять по 1. Команда инкремента.

Сообщение от NYRA

отображение.

Выводим в порт, к которому подключен индикатор. Тут играет роль тип индикатора.

@NYRA · 15.05.2017, 16:06 **[ТС]**

вот, вроде так. но не работает. выдает только 9

Assembler

ORG  0
Begin:
mov R1,#09h 
mov A,R1     
mov R3, A
mov P1,#01010101b  
mov A,R3
call decod      
mov P3,#1000b
mov P2,A
call DEL        
 
mov A,R3
call decod      
mov P3,#1000b
mov P2,A
mov P1,#10101010b 
call DEL    
 
label:
mov A,R3
call decod
djnz R1,label
DEC A
mov P3,A
 
jmp Begin   
 
decod:
  mov DPTR,#TabDecod 
  movc A,@A+DPTR     
  ret
   TabDecod:
  db 11000000b; ñèìâ "0"
  db 11111001b; ñèìâ "1"
  db 10100100b; ñèìâ "2"
  db 10110000b; ñèìâ "3"
  db 10011001b; ñèìâ "4"
  db 10010010b; ñèìâ "5" 
  db 10000010b; ñèìâ "6"
  db 11111000b; ñèìâ "7"
  db 10000000b; ñèìâ "8"
  db 10010000b; ñèìâ "9"
  db 10001000b; ñèìâ "À"
  ret
 
 
DEL:                     
          mov R6,#0FFh
          mov R5,#0Ah
C2:       mov R7,#0FFh
C4:       djnz R7, C4
          djnz R6, C2
          djnz R5, C2
          ret           
 
END

Комментарий модератора

используйте теги для выделения кода

@pyzhman · 15.05.2017, 17:43

Схему бы увидеть.

@NYRA · 15.05.2017, 19:09 **[ТС]**

вот.

@pyzhman · 15.05.2017, 19:35

Зажгите какой-либо разряд одним из портов Р3. Портом Р2 выводите код нужной цифры, а некод выводите в Р1.

@ntlinuxnt · 30.05.2017, 02:16

Ну заносим в R1 допустим 9 на старте, потом делаем метку старт луп например, в ней отображаем содержимое R1 там где нужно, потом делаем djnz старт луп. Изи же.

Добавлено через 2 минуты
Это с декрементом, если охота наборот то можно через CJNE сравнивать и прибавлять пока не 9 при этом отображать.

@pyzhman 1176 / 653 / 111 Регистрация: 15.05.2012 Сообщений: 4,015
	14.05.2017, 18:45	2
	Сообщение от NYRA как организовать отнимание 1 От 0 до 9 нужно прибавлять по 1. Команда инкремента. Сообщение от NYRA отображение. Выводим в порт, к которому подключен индикатор. Тут играет роль тип индикатора. 0

@pyzhman 1176 / 653 / 111 Регистрация: 15.05.2012 Сообщений: 4,015
	15.05.2017, 17:43	4
	Схему бы увидеть. 0

@pyzhman 1176 / 653 / 111 Регистрация: 15.05.2012 Сообщений: 4,015
	15.05.2017, 19:35	6
	Зажгите какой-либо разряд одним из портов Р3. Портом Р2 выводите код нужной цифры, а некод выводите в Р1. 0

@ntlinuxnt $ su 1605 / 520 / 97 Регистрация: 18.11.2010 Сообщений: 2,807 Записей в блоге: 2
	30.05.2017, 02:16	7
	Ну заносим в R1 допустим 9 на старте, потом делаем метку старт луп например, в ней отображаем содержимое R1 там где нужно, потом делаем djnz старт луп. Изи же. Добавлено через 2 минуты Это с декрементом, если охота наборот то можно через CJNE сравнивать и прибавлять пока не 9 при этом отображать. 0