Можно пожалуйста, комментарий к каждой строчке кода
#include <P16F628A.INC>
LIST p=16F628A ; директива для указания типа МК
__CONFIG 03F10H ; директива установки битов конфигурации
Sec0 equ 20h
Sec1 equ 21h
shet1 equ 22h
smehen equ 23h
shet equ 24h
kar equ 25h
var equ 26h
shet2 equ 27h
#define rb7 PORTB,7
org 0 ; Начать выполнение программы с адреса 0 PC.
goto Start
Start movlw .255 ;копирования 255 в указанный регистр w
movwf PORTB
movlw .0
movwf PORTA
movlw .7 ;копирования 7 в указанный регистр w
movwf CMCON
bsf STATUS,5 ;переход в Банк 1
movlw .0 ;
movwf TRISB
movlw .0 ;
movwf TRISA
bsf PCON,3
bcf STATUS,5 ;переход назад в Банк 0
clrf shet
nac movlw .10 ;вращ. стрелки
movwf shet2
gif1 movlw .0
movwf smehen
call pod
movlw .7
movwf smehen
call pod
movlw .14
movwf smehen
call pod
movlw .21
movwf smehen
call pod
decfsz shet2,F
goto gif1
movlw .10 ; бьющ. сердце
movwf shet2
gif2 movlw .28
movwf smehen
call pod
movlw .35
movwf smehen
call pod
movlw .28
movwf smehen
call pod
movlw .28
movwf smehen
call pod
decfsz shet2,F
goto gif2
movlw .6 ; пульсир. звезда
movwf shet2
movlw .42
movwf smehen
call pod1
movlw .42
movwf smehen
call pod1
movlw .49
movwf smehen
call pod1
movlw .56
movwf smehen
call pod1
movlw .63
movwf smehen
call pod1