[electrum]

Here's one I wrote a long time ago in Z80 assembly for the TI-86 graphing calculator: https://gist.github.com/electrum/76ac88de2e1d6c9254deaba003a...

[bbcbasic]

The "Random" subroutine looks surprisingly simple