Parcels @@{Bd parcels n$1000:bl=1:2000 xE0,0,0,63?,127,63?,1,0 I0,2,6,254,255,224,192,0 0w=30:d=20:l=0:b=200 5:5:0: \s=0:t=110 :p=1:v=d+1:h=0:f=r(w-16)+3 #6000p:"farm ";t:5000 #6:n=031:" "; n:h=f-3:5000 "--<+>--":5 )k=2:r=r(7)+l:c=w+1 500:7000X k$"d"220 %v=r+1:h=c+1:z=0 5000:"#":500 /nv=v+(2*z+1)/5:z=z+1 :nh=h-1:nv>dnh=h-((d-v)/(nv-v)+0.5):nv=d 5000:" ":v=(nv) ""h=nh:5000:"#":500 ,v0260 63v3q=0:350^ J-m=(h-f):q=110n-5*m*(m+1) T,m=00.2~L,0:q=q+90Z ^!c>0500:350^ h?s=s+q*k:p=15:6000p:"score so far ";s:p=1 r4000:" " |j=1b:j 5000:" ":t 46000p:" your total score is ";s;" ":: 4000:" ":c=c-1 c<0c=w:k=1 4000:2;u$;z$: !n=015:d:"a"+n,d !n:u$=144:z$=145  r(n)=(*n)+1 :   r,c;:  v,h;: p l,p;: Xk$=: