;assemble using ACME
!cpu 6502
!to "10hprint",plain
*=$800
RND=$EFAE ;Applesoft version
RND4=$CD ;first byte of random output
COUT=$FDED
-JSRRND
LDA#'/' + $80
CMPRND4
BCS+
LDA#'\' + $80
+JSRCOUT
BEQ-

Copyright (c) 2013 Peter Ferrie
All rights reserved

This site is hosted by 000webhost.com



Free web hostingWeb hosting