bsf STATUS, RP1 ;‹‹Bank2››
bcf STATUS, RP0 ;
bcf STATUS, IRP
movlw 0x20
movwf EEADR ;начало адресов в Bank0
Copy_Cycle
movf EEADR, W ;адрес регистра Bank0
movwf FSR ;в указатель
movf INDF, W ;чтение регистра из Bank0
movwf EEDATA ;временное сохранение
movf EEADR, W ;текущий адрес
sublw 0xFF ;0xFF - текущий адрес
addlw 0x20 ;+ 0x20
movwf FSR ;дарес рег.Bank1 в указатель
movf EEDATA, W ;из временного
movwf INDF ;запись регистра в Bank1
incf EEADR ;инкремент адреса
movlw 0x80 ;проверка на достижение..
xorwf EEADR, W ;..конца Bank0
btfss STATUS, Z
goto Copy_Cycle ;повтор копирования
nop ;ЗАВЕРШЕНИЕ КОПИРОВАНИЯ |