简介：本文给出PIC单片机产生伪随机数汇编语言程序，希望对需要的朋友带来参考。

PSWEQU03

R0EQU08

R1EQU09

R2EQU0AH

R3EQU0BH

R4EQU0CH

R5EQU0DH

R6EQU0EH

R7EQU0FH

TEMPEQU13H

CNT1EQU11H

CNTHEQU12H

BUF0EQU17H

BUF1EQU18H

ESUM1EQU13H

ESUM2EQU14H

ESUM3EQU15H

ESUM4EQU16H

DSUM1EQU19H

DSUM2EQU1AH

DSUM3EQU1BH

DSUM4EQU1CH

DSUM5EQU1DH

DSUM6EQU1EH

ORG1FFH

GOTORADM

ORG000

D_ADDMOVFR0,0

ADDWFR6,1

BTFSCPSW,0

INCFR7

MOVFR1,0

ADDWFR7,1

RETLW0

DMU1MOVLW16

MOVWFTEMP

CLRFR7

CLRFR6

DMUL_1RRFR3

RRFR2

BTFSCPSW,0

CALLD_ADD

RRFR7

RRFR6

RRFR5

RRFR4

DECFSZTEMP

GOTODMUL_1

RETLW0

RADMCLRFESUM1

CLRFESUM2

CLRFESUM3

CLRFESUM4

CLRFDSUM1

CLRFDSUM2

CLRFDSUM3

CLRFDSUM4

CLRFDSUM5

CLRFDSUM6

MOVLW20H

MOVWFCNTH

RADM_1MOVLW00

MOVWFCNTL

RADM_2MOVLW64H

MOVWFR3

MOVLW85H

MOVWFR2

MOVFBUF1,0

MOVWFR1

MOVFBUF0,0

MOVWFR0

CALLDMUL

MOVLW19H

ADDWFR4,0

MOVWFR0

MOVWFBUF0

BTFSCPSW,0

INCFR5

MOVLW36H

ADDWFR5,0

MOVWFR1

MOVWFBUF1

MOVFR0,0

ADDWFESUM1,1

BUFSSPSW,0

GOTOEADD_1

INCFESUM2

BTFSSPSW,2

GOTOEADD_1

INCFESUM3

BTFSSPSW,2

GOTOEADD_1

INCFESUM4

EADD_1MOVFR1,0

ADDWFESUM2,1

BTFSSPSW,0

GOTOEADD_2

BTFSSPSW,2

GOTOEADD_2

INCFESUM4

EADD_2BTFSCR1,7

GOTORADM_3

COMFR0,1

COMFR1,1

MOVLW1

ADDWFR0,1

BTFSCPSW,0

INCFR1

RADM_3MOVLW80H

ADDWFR1,1

MOVFR1,0

MOVWFR3

MOVFR0,0

MOVWFR2

CALLDMUL

MOVFR4,0

ADDWFDSUM1,1

BTFSSPSW,0

GOTODADD_1

INCFDSUM2

BTFSSPSW,2

GOTODADD_1

INCFDSUM3

BTFSSPSW,2

GOTODADD_1

INCFDSUM4

BTFSSPSW,2

GOTODADD_1

INCFDSUM6

DADD_1MOVFR5,0

ADDWFDSUM2,1

BTFSSPSW,0

GOTODADD_2

INCFDSUM3

BTFSSPSW,2

GOTODADD_2

INCFDSUM4

BTFSSPSW,2

GOTODADD_2

INCFDSUM5

BTFSSPSW,2

GOTODADD_2

INCFDSSUM6

DADD_2MOVFR6,0

ADDWFDSUM3,1

BTFSSPSW,0

GOTODADD_3

INCFDSUM4

BTFSSPSW,2

GOTODADD_3

INCFDSUM5

BTFSSPSW,2

GOTODADD_3

INCFDSUM6

DADD_3MOVFR7,0

ADDWFDSUM4,1

BTFSSPSW,0

GOTODADD_4

INCFDSUM5

BTFSSPSW,2

GOTODADD_4

INCFDSUM6

DADD_4DECFSZCNTL

GOTORADM_2

DECFSZCNTH

GOTORADM_1

MOVLW5

MOVWFCNTL

RADM_4BCFPSW,0

RRFESUM4

RRFESUM3

RRFESUM2

RRFESUM1

DECFSZCNTL

GOTORADM_4

MOVLW5

MOVWFCNTL

RADM_5BCFPSW,0

RRFDSUM6

RRFDSUM5

RRFDSUM4

RRFDSUM3

RRFDSUM2

RRFDSUM1

DECFSZCNTL

GOTORADM_5

LOOPGOTOLOOP

END