مثال 2 خطوات تُشغَّل بالترتيب في جلسة واحدة. كل خطوة نُفِّذت على المحرك والمخرج أدناه هو ما أنتجته.
text = First[First[ImportString[ExportString[Style["Wolfram", FontSize -> 24, FontFamily -> "Times"], "PDF"]]]];لا مخرجات - هذه الخطوة تجهّز شيئًا للخطوة التالية.
Graphics[{EdgeForm[Opacity[0.25]], Table[{ColorData["TemperatureMap"][t], Translate[text, 4 {-t, t}]}, {t, 0, 1, 1 / 10}]}, ImageSize -> Medium]-Graphics-