X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;ds=sidebyside;f=%3Cmdl.int%3E%2Fbufmod.mid.4;fp=%3Cmdl.int%3E%2Fbufmod.mid.4;h=0d9621619690bb121d0e1817b451316ecf87a85f;hb=bab072f950a643ac109660a223b57e635492ac25;hp=0000000000000000000000000000000000000000;hpb=233a3c5245f8274882cc9d27a3c20e9b3678000c;p=pdp10-muddle.git diff --git a//bufmod.mid.4 b//bufmod.mid.4 new file mode 100644 index 0000000..0d96216 --- /dev/null +++ b//bufmod.mid.4 @@ -0,0 +1,18 @@ +TITLE BUFMOD BUFFER MODULE + +RELOCA + +; HERE TO DEFINE MUDDLES BUFFER SPACE + +.GLOBAL STRBUF,STRPAG + +HERE==$.+1777 + +.LOP ANDCM HERE 1777 + +STRBUF==.LVAL1 +.LOP STRBUF <,-10.> +STRPAG==.LVAL1 + +END +  \ No newline at end of file