home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / GCC / GERLIB_USR08B.LHA / gerlib / examples / test / startup / urandom.asm < prev   
Encoding:
Assembly Source File  |  1993-12-12  |  259 b   |  18 lines
  1.     XDEF _u_random
  2. _u_random:
  3.     lea    randomdatas(pc),a0
  4.     move.w    (a0)+,d0
  5.     move.l    a0,a1
  6.     add.w    -(a0),d0
  7.     move.l    (a1)+,(a0)+
  8.     move.l    (a1)+,(a0)+
  9.     move.w    (a0),d1
  10.     addx.w    d1,d0
  11.     move.w    d0,(a0)+
  12.     move.w    d0,(a0)
  13.     rts
  14.  
  15.  
  16. randomdatas
  17.     dc.w    34344,-4435,5646,8865,12322,-320
  18.