Stringcode

//framec=n+1;loop(n,exec2(assign(megabuf(c),megabuf(c-1)),c=c-1));c=n+1;loop(n,exec2(assign(megabuf(n*2+c),megabuf(n*2+c-1)),c=c-1));c=n+1;loop(n,exec2(assign(megabuf(n*4+c),megabuf(c)),c=c-1));c=n+1;loop(n,exec2(assign(megabuf(n*6+c),megabuf(n*2+c)),c=c-1));assign(megabuf(c),getkbmouse(1));assign(megabuf(n*2+c),getkbmouse(2));//pointam2=above(c,3);am1=above(c,2);ap1=above(n,c);ap2=above(n,c+1);assign(megabuf(c),         (am2*megabuf(n*4+c-2)+  (am1+1-am2)*megabuf(n*4+c-1)+              megabuf(n*4+c)+  (ap1+1-ap2)*megabuf(n*4+c+1)+ap2*megabuf(n*4+c+2))*0.2);assign(megabuf(n+2*c),          (am2*megabuf(n*6+c-2)+  (am1+1-am2)*megabuf(n*6+c-1)+              megabuf(n*6+c)+  (ap1+1-ap2)*megabuf(n*6+c+1)+          ap2*megabuf(n*6+c+2))*0.2);x=megabuf(c);y=megabuf(n*2+c);c=c+1;