þþ³d%X;Example 3-using the FILL commandnX;by Karl E. WiegersxX;‚F=EIŒ>ŒD8:MACRO.LIB–X; $X;*******************************ªX; PROGRAM STARTS HERE´$X;*******************************¾X;ÈPÒX;܉GRAPHICS æ †COLOR ð…PLOT (=#ú‡DRAWTO (= ‡DRAWTO = ‰POSITION =#…POKE †FILDAT="„XIO „FILL====A‚S:A, ƒEND!ƒEND6X;@#X;include the subroutine libraryJX;T>‹D8:SUBS.LIB