Код:
Program EX4;
begin
PutSpriteClear(gg1,7+2,25-14);
end.
GG1
DEFB 24
DEFB 0,2, 15,7,3,3,7,29,246,155
DEFB 0,3, 252,254,255,234,255,245,255,255
DEFB 0,4, 0,0,0,0,0,128,128,128
DEFB 1,1, 3,7,6,14,15,31,63,63
DEFB 1,2, 237,119,183,191,127,237,246,123
DEFB 1,3, 227,240,248,248,252,252,254,95
DEFB 1,4, 128,0,0,0,0,0,0,0
DEFB 2,1, 127,126,124,63,63,31,15,7
DEFB 2,2, 104,223,254,253,94,255,245,239
DEFB 2,3, 1,255,71,255,127,234,103,243
DEFB 2,4, 12,255,255,170,255,224,224,128
DEFB 2,5, 64,240,240,188,224,64,56,0
DEFB 3,1, 3,0,0,0,0,1,1,1
DEFB 3,2, 31,255,255,255,255,252,252,252
DEFB 3,3, 248,252,254,255,255,255,127,31
DEFB 3,4, 0,0,0,0,128,192,224,240
DEFB 4,1, 1,1,3,7,14,29,51,103
DEFB 4,2, 120,184,112,240,240,224,192,128
DEFB 4,3, 15,3,1,1,0,0,0,0
DEFB 4,4, 184,88,176,248,184,184,216,92
DEFB 5,0, 0,0,0,1,1,1,1,1
DEFB 5,1, 206,220,248,240,112,248,254,127
DEFB 5,4, 108,44,60,60,46,127,127,103
DEFB 5,5, 0,0,0,0,0,128,224,240
Результат: