.DEF R0X18=R24
	.DEF R0X19=R25
	.DEF R0X1A=R26
	.DEF R0X1B=R27
	.DEF R0X1C=R28
	.DEF R0X1D=R29
	.DEF R0X1E=R30
	.DEF R0X1F=R31

	.MACRO __CPD1N
	CPI  R30,LOW(@0)       ;сравнить содержимое R30 с константой LOW
	LDI  R26,HIGH(@0)       ;загрузить константу HIGH  в регистр R26
	CPC  R31,R26               ;сравнить  регистры  R31  и   R26  с вычетом флага переноса  если он установлен     ?????  
	LDI  R26,BYTE3(@0)     ;загрузить константу BYTE3  в  R26
	CPC  R22,R26               ;сравнить  регистры  R22  с   R26  с вычетом флага переноса  если он установлен     ?????   
	LDI  R26,BYTE4(@0)     ;загрузить константу BYTE4  в  R26
	CPC  R23,R26               ; ;сравнить  регистры  R23  и   R26  с вычетом флага переноса  если он установлен     ?????   
	.ENDM

	.MACRO __CPD2N
	CPI  R26,LOW(@0)
	LDI  R30,HIGH(@0)
	CPC  R27,R30
	LDI  R30,BYTE3(@0)
	CPC  R24,R30
	LDI  R30,BYTE4(@0)
	CPC  R25,R30
	.ENDM