Ответ: («Телесистемы»: Конференция «Микроконтроллеры и их применение»)

---

Отправлено Romario 17 июля 2002 г. 20:26 В ответ на: Ответ: отправлено Romario 17 июля 2002 г. 20:24

CalcRandom:		RLF   	PersistRnd,w		;
			MOVLW 	1			;
			BTFSC 	PersistRnd,3		;
			XORWF	STATUS			;
			BTFSC	PersistRnd,4		;
			XORWF	STATUS			;
			BTFSC	PersistRnd,5		;
			XORWF 	STATUS			;
			RLF   	PersistRnd		;
		;----------------------------------------
		; 		CalcSmallRandom		|
		;----------------------------------------
			CLRC			 	;
			MOVLW 	1		 	;
			BTFSC 	PseudoRndSmall,5 	;
			XORWF 	STATUS		 	;
			BTFSC 	PseudoRndSmall,6 	;
			XORWF 	STATUS		 	;	 
			RLF   	PseudoRndSmall	 	;
			BCF   	PseudoRndSmall,7 	;
			RET			 	;

• Благодарю. — S_agent   (17.07.2002 20:32, пустое)