MCVSMzwŸrfel VectorScripts σ R “zwŸrfelgZIn diesem Bereich bestimmen Sie, unter welchen Bedingungen das Objekt neu gezeichnet wird. R RD  ùùùùùùùùùùùùùùùùùùùùùùìììùùìììùùìììùùùùùùùùùùùùùùùùùùùùùùü@@@@C„C„C„@@@@üü@@@@C„C„C„@@@@ü¶a8PROCEDURE nina; VAR a:REAL; BEGIN a:=PA; Rect(0,0,a,a); Rect(a,0,2*a,a); Rect(2*a,0,3*a,a); Rect(3*a,0,4*a,a); Rect(a,-a,2*a,0); Rect(a,a,2*a,2*a); Rect(0,0,0.25*a,0.25*a); Rect(0.75*a,0,a,0.25*a); Rect(0,0.75*a,0.25*a,a); Rect(0.75*a,0.75*a,a,a); Rect(a,0,1.25*a,0.25*a); Rect(1.75*a,0,2*a,0.25*a); Rect(a,0.75*a,1.25*a,a); Rect(1.75*a,0.75*a,2*a,a); Rect(2*a,0,2.25*a,0.25*a); Rect(2.75*a,0,3*a,0.25*a); Rect(2*a,0.75*a,2.25*a,a); Rect(2.75*a,0.75*a,3*a,a); Rect(3*a,0,3.25*a,0.25*a); Rect(3.75*a,0,4*a,0.25*a); Rect(3*a,0.75*a,3.25*a,a); Rect(3.75*a,0.75*a,4*a,a); Rect(a,-a,1.25*a,-0.75*a); Rect(1.75*a,-a,2*a,-0.75*a); Rect(a,-0.25*a,1.25*a,0); Rect(1.75*a,-0.25*a,2*a,0); Rect(a,a,1.25*a,1.25*a); Rect(1.75*a,a,2*a,1.25*a); Rect(a,1.75*a,1.25*a,2*a); Rect(1.75*a,1.75*a,2*a,2*a); END; RUN(nina); LŠnge