12345678910111213141516171819202122232425 |
- .xdef rand,__randseed
- .text
- rand:
- lea __randseed(%pc),%a0
- move.l #0x41C64E6D,%d2
- move.l (%a0),%d1
- move.l %d2,%d0
- mulu %d1,%d0
- swap %d2
- mulu %d1,%d2
- swap %d1
- mulu #0x4E6D,%d1
- add.w %d1,%d2
- swap %d2
- clr.w %d2
- add.l %d2,%d0
- add.l #12345,%d0
- move.l %d0,(%a0)
- lsr.l #8,%d0
- and.w #32767,%d0
- rts
- .even
- __randseed:
- .long 1
|