10 CLS:COLOR 1,15,8:SCREEN 2 '"Блоха"
30 BDY$="BM=H;,=V; L20 U20 R20 D20 F10 D10 R2"
40 LEG$="BM=H;,=V; G10 D10 L2":A1$="BM=H;,=V; L10 D10 L2"
60 A2$="BM=H;,=V; E10 H10 R2":NECK$="BM=H;,=V; U4"
80 HEAD$="BM=H;,=V; R10 H6 G6":F1$="BM=H;,=V; H6"
100 F2$="BM=H;,=V; E6":DRAW "C2":H=140:V=95:DRAW "XBDY$;"
230 H=H-20:DRAW "XLEG$;":V=V-20:DRAW "XA1$;":H=H+20
280 DRAW "XA2$;":H=H-10:DRAW "XNECK$;":H=H-5:V=V-4
320 DRAW "XHEAD$;":V=V-3:DRAW "XF1$;":H=H+7:DRAW "XF2$;"
370 GOTO 370