main:
    rjmp main

main:
    rjmp main

rjmp loop

; объявления констант, переменных и т.п.
     .org 0
     rjmp   Start  ; переход на начало основного участка программы
; тут размещаются векторы прерываний
     rjmp   Interrupt1 ; какой-то вектор прерываний
 
Start:
     ; тут начинается инициализация стека
     ; потом все подготовительные операции
     ; настройка портов, таймеров и т.п.
MainLoop:
    ; тут начинается участок основного цикла,
    ; т.е. тот код, который непрерывно циклически выполняется
    ; отсюда можно вызывать вспомогательные подпрограммы
    rcall    Delay

    rjmp   MainLoop ; переход к началу цикла
    ; если не надо зацикливаться, то надо как-то остановить выполнение кода в этой точке, например так:
    rjmp    PC   ; предыдущий rjmp не нужен, разумеется

; тут начинаются вспомогательные подпрограммы
Delay:
    ; подпрограмма задержки
    ret

OtherProc:
    ; еще какая-то подпрограмма
    ret

Interrupt1:
    ; обработчик какого-то прерывания
    reti

    ; и так далее

.include "C:\VMLAB\include\2313def.inc"
.def temp=r16
.def temp1=r17
.def temp2=r18
.def clear_display=r19
.def return_home=r20
.def display_on=r21
.def display_off=r22
.def function_set=r23
.def write_data=r24
.def write_command=r25
.cseg
.org 0
;векторы прерываний
rjmp RESET
       
RESET:
   rjmp START
reti
;начало проги
START:
;настройка портов
   ldi temp,0xff
   ldi temp1,0b01100000
   out ddrb,temp      ;port b выход
   out ddrd,temp1     ;port d 5 и 6 ножки выходы а остальные входы
   ldi temp,0x00
   ldi temp1,0x00
   ;порты настроены!!!

;создадим команды для дисплея
   ldi clear_display  ,0b00000001 ;записывать в порт b
   ldi return_home    ,0b00000010 ;записывать в порт b
   ldi display_on     ,0b00001100 ;записывать в порт b
   ldi display_off    ,0b00001000 ;записывать в порт b
   ldi function_set   ,0b00110100 ;записывать в порт b
   ldi write_data     ,0b00100000 ;записывать в порт D
   ldi write_command  ,0b00000000 ;записывать в порт D
   ;команды созданы

;инициализация дисплея
   out portd,write_command ; переводим дисплей в режим приема команд
   out portb,function_set  ; устанавливаем 8 битный интерфейс
   rcall E                 ; строб     -  (ВОТ ОТСЮДА МЫ ПЕРЕХОДИМ НА Е: И ЭТИМ ВСЁ ЗАКАНЧИВАЕТСЯ :( ...)
   out portb,display_on    ; включаем дисплей
   rcall E                 ; строб
   out portb,clear_display ; очищаем дисплей и обнуляем видеопамять
   rcall E                 ; строб

E:
   ldi temp,0b00100000
   out portd,temp
   nop
   ldi temp1,0b00000000
   out portd,temp1
   ret ;(здесь по идее должна прога Е: закончиться и перейти на строчку "out portb,display_on" ,но этого не происходит)
   

.nolist
.include "tn2313def.inc"
.list

.def Temp  = r16
.def Temp1 = r17
.def Temp2 = r18
.def Temp3 = r19
.def Temp4 = r20

.def Dig1 = r21
.def Dig2 = r22
.def Dig3 = r23
.def Dig4 = r24

.equ Dig1PortDdr = DDRD
.equ Dig1PortOut = PORTD
.equ Dig1PortBit = 2

.equ Dig2PortDdr = DDRD
.equ Dig2PortOut = PORTD
.equ Dig2PortBit = 3

.equ Dig3PortDdr = DDRD
.equ Dig3PortOut = PORTD
.equ Dig3PortBit = 4

.equ Dig4PortDdr = DDRD
.equ Dig4PortOut = PORTD
.equ Dig4PortBit = 5

.cseg
  .org 0

; начинаем программу прямо с нулевого адреса без всяких прыжков ;)
    ldi Temp, low(RAMEND)
    out SPL, Temp ; инициализируем указатель стэка

    ldi Temp,(1<<WDCE)|(1<<WDE)
    out WDTCSR,Temp
    ldi Temp,(1<<WDE)|(1<<WDP2)|(1<<WDP1)
    out WDTCSR,Temp     ;запускаем watchdog с интервалом 1 сек.

    sbi ACSR, ACD  ;отключаем аналоговый компаратор

; настраиваем порты
    ldi Temp, 0xFF
    out DDRB, Temp ; segments A-G + dot as outputs

    sbi Dig1PortDdr, Dig1PortBit
    sbi Dig2PortDdr, Dig2PortBit
    sbi Dig3PortDdr, Dig3PortBit
    sbi Dig4PortDdr, Dig4PortBit
; и так далее...