Date   : Tue, 17 Nov 2009 11:59:55 +0000
From   : rs423@... (Mick Champion)
Subject: Quine

Rob wrote:
> On 16/11/2009, me@... <me@...> wrote:
>   
>> That is *awesomely* pointless.
>>
>>     
>
> OK. Here's mine:
>
> 10A%=TOP-2
> 20B%=A%-1:REPEATB%=B%-1:UNTIL?B%=13:REPEATA%=A%+1:B%=B%+1:?A%=?B%:UNTIL?B%=13:A%?1=255:PRINT"Hello
> World! ";
>
> Rob.
>   
This is great! I mean really pointless. ;-) (Nothing could be as useless 
as Quine though.) So as soon as you RUN it, you corrupt the program. As 
you encroach the memory and  hit HIMEM, it crashes anyway! It have to 
point out an alteration that would be so much less useless???

10 A%=TOP-2:  C%=TOP-2
20B%=A%-1:REPEAT:B%=B%-1:UNTIL?B%=13:REPEAT:A%=A%+1:B%=B%+1:?A%=?B%:UNTIL?B%=13:A%?1=255:
 IF A%>TOP+200 THEN ?C%=13:C%?1=255  :PRINT"Hello World! ";


At least you'd be able to re-list it after running ! Oh hang on. I've 
missed the point of this haven't I?


Cheers,


Mick.