végül ez lett a pixelrajzoló rutin:
procedure PutPixel(x,y,color : integer);
begin
inline(#26,#00) {ld h,0};
inline(#dd,#6e,#04) {ld l,(ix+4)};
inline(#54,#5d) {ld de,hl};
inline(#29,#29,#19,#29);
inline(#29,#29,#29) {hl=hl*80};
inline(#dd,#5e,#06) {ld e,(ix+6)};
inline(#cb,#3b) {srl e};
inline(#9f) {sbc a,a};
inline(#ee,#aa) {xor 0aah};
inline(#19) {add hl,de};
inline(#cb,#fc) {set 7,h};
inline(#cb,#f4) {set 6,h};
inline(#4f) {ld c,a};
inline(#2f) {cpl};
inline(#47) {ld b,a};
inline(#dd,#7e,#02) {ld a,(ix+2)};
inline(#e6,#0f) {and 0fh};
inline(#16,#bf) {ld d,high(pixeltable)};
inline(#5f) {ld e,a};
inline(#1a) {ld a,(de)};
inline(#a1) {and c};
inline(#4f) {ld c,a};
inline(#7e) {ld a,(hl)};
inline(#a0) {and b};
inline(#b1) {or c};
inline(#77) {ld (hl),a};
end;