110 set bitmap size 321,321
120 SET COLOR MODE "NATIVE"
130 SET TEXT COLOR 0
140 SET AREA COLOR 2^24-1
150 PLOT AREA : 0,0;0,1;1,1;1,0
160 DIM M(1001,301)
    SET TEXT HEIGHT 0.05
190 PLOT TEXT ,AT 0.2,0.1:"BASIC"
200 ASK PIXEL SIZE (0,0.3; 1,0)A,B
210 MAT M=ZER(A,B)                
220 ASK PIXEL ARRAY (0,0.3) M
230 PLOT AREA : 0,0;0,1;1,1;1,0
240 DRAW PLOT_M WITH SHEAR (PI/4)*ROTATE(PI/6)*SCALE(2)
250 PICTURE PLOT_M
260    MAT PLOT CELLS, IN 0, 0.3; 1,0:M
270 END PICTURE
280 END
  
