User blog comment:Abraham Software/How to make.... an infinite text program!!!/@comment-5106053-20131127014305

@A ?HEX$(RND(256),2);:GOTO@A or: @A ?CHR$(RND(256));:GOTO@A Also can add colors: @A COLOR RND(16):?CHR$(RND(256));:GOTO@A @A COLOR RND(16):?HEX$(RND(256),2);:GOTO@A Those 2 give pretty interesting results.