#define Pixel \
        c =PALETTE[*(u8*) Buf     ]; \
        c+=PALETTE[*(u8*)(Buf+  1)]; \
        c+=PALETTE[*(u8*)(Buf+256)]; \
        c+=PALETTE[*(u8*)(Buf+257)]; \
        Display_Data=((c>>2)&0x03)|((c>>4)&0x1C)|((c>>6)&0xE0); \
        Buf+=2;

void BlitScreen(u8 *Buf) //Отрисовка экрана
{
 register u32 y,BufE,c;
 for(y=0;y<120;y++)
 {
  BufE=(u32)Buf+256;
  for(;(u32)Buf<BufE;)
  {
   Pixel
   Pixel
   Pixel
   Pixel
  }
  Buf+=256;
 }
}

                  BlitScreen PROC
;;;91     void BlitScreen(u8 *Buf) //Отрисовка экрана
;;;92     {
000468  e92d01f0          PUSH     {r4-r8}
00046c  e59f1334          LDR      r1,|L1.1960|
000470  e3a07000          MOV      r7,#0
000474  e5911010          LDR      r1,[r1,#0x10]
000478  e3a04101          MOV      r4,#0x40000000
00047c  e3a0c0e0          MOV      r12,#0xe0
000480  e3a0301c          MOV      r3,#0x1c
                  |L1.1156|
000484  e2805c01          ADD      r5,r0,#0x100
000488  e1500005          CMP      r0,r5
00048c  2a000056          BCS      |L1.1516|
                  |L1.1168|
000490  e5d02000          LDRB     r2,[r0,#0]
000494  e5d06001          LDRB     r6,[r0,#1]
000498  e0812082          ADD      r2,r1,r2,LSL #1
00049c  e0816086          ADD      r6,r1,r6,LSL #1
0004a0  e1d220b0          LDRH     r2,[r2,#0]
0004a4  e1d660b0          LDRH     r6,[r6,#0]
0004a8  e0822006          ADD      r2,r2,r6
0004ac  e5d06100          LDRB     r6,[r0,#0x100]
0004b0  e0816086          ADD      r6,r1,r6,LSL #1
0004b4  e1d660b0          LDRH     r6,[r6,#0]
0004b8  e0822006          ADD      r2,r2,r6
0004bc  e5d06101          LDRB     r6,[r0,#0x101]
0004c0  e0816086          ADD      r6,r1,r6,LSL #1
0004c4  e1d660b0          LDRH     r6,[r6,#0]
0004c8  e0822006          ADD      r2,r2,r6
0004cc  e0036222          AND      r6,r3,r2,LSR #4
0004d0  e1a08e02          LSL      r8,r2,#28
0004d4  e1866f28          ORR      r6,r6,r8,LSR #30
0004d8  e00c2322          AND      r2,r12,r2,LSR #6
0004dc  e1822006          ORR      r2,r2,r6
0004e0  e1c420b2          STRH     r2,[r4,#2]
0004e4  e5f02002          LDRB     r2,[r0,#2]!
0004e8  e5d06001          LDRB     r6,[r0,#1]
0004ec  e0812082          ADD      r2,r1,r2,LSL #1
0004f0  e0816086          ADD      r6,r1,r6,LSL #1
0004f4  e1d220b0          LDRH     r2,[r2,#0]
0004f8  e1d660b0          LDRH     r6,[r6,#0]
0004fc  e0822006          ADD      r2,r2,r6
000500  e5d06100          LDRB     r6,[r0,#0x100]
000504  e0816086          ADD      r6,r1,r6,LSL #1
000508  e1d660b0          LDRH     r6,[r6,#0]
00050c  e0822006          ADD      r2,r2,r6
000510  e5d06101          LDRB     r6,[r0,#0x101]
000514  e0816086          ADD      r6,r1,r6,LSL #1
000518  e1d660b0          LDRH     r6,[r6,#0]
00051c  e0822006          ADD      r2,r2,r6
000520  e0036222          AND      r6,r3,r2,LSR #4
000524  e1a08e02          LSL      r8,r2,#28
000528  e1866f28          ORR      r6,r6,r8,LSR #30
00052c  e00c2322          AND      r2,r12,r2,LSR #6
000530  e1822006          ORR      r2,r2,r6
000534  e1c420b2          STRH     r2,[r4,#2]
000538  e5f02002          LDRB     r2,[r0,#2]!
00053c  e5d06001          LDRB     r6,[r0,#1]
000540  e0812082          ADD      r2,r1,r2,LSL #1
000544  e0816086          ADD      r6,r1,r6,LSL #1
000548  e1d220b0          LDRH     r2,[r2,#0]
00054c  e1d660b0          LDRH     r6,[r6,#0]
000550  e0822006          ADD      r2,r2,r6
000554  e5d06100          LDRB     r6,[r0,#0x100]
000558  e0816086          ADD      r6,r1,r6,LSL #1
00055c  e1d660b0          LDRH     r6,[r6,#0]
000560  e0822006          ADD      r2,r2,r6
000564  e5d06101          LDRB     r6,[r0,#0x101]
000568  e0816086          ADD      r6,r1,r6,LSL #1
00056c  e1d660b0          LDRH     r6,[r6,#0]
000570  e0822006          ADD      r2,r2,r6
000574  e0036222          AND      r6,r3,r2,LSR #4
000578  e1a08e02          LSL      r8,r2,#28
00057c  e1866f28          ORR      r6,r6,r8,LSR #30
000580  e00c2322          AND      r2,r12,r2,LSR #6
000584  e1822006          ORR      r2,r2,r6
000588  e1c420b2          STRH     r2,[r4,#2]
00058c  e5f02002          LDRB     r2,[r0,#2]!
000590  e5d06001          LDRB     r6,[r0,#1]
000594  e0812082          ADD      r2,r1,r2,LSL #1
000598  e0816086          ADD      r6,r1,r6,LSL #1
00059c  e1d220b0          LDRH     r2,[r2,#0]
0005a0  e1d660b0          LDRH     r6,[r6,#0]
0005a4  e0822006          ADD      r2,r2,r6
0005a8  e5d06100          LDRB     r6,[r0,#0x100]
0005ac  e0816086          ADD      r6,r1,r6,LSL #1
0005b0  e1d660b0          LDRH     r6,[r6,#0]
0005b4  e0822006          ADD      r2,r2,r6
0005b8  e5d06101          LDRB     r6,[r0,#0x101]
0005bc  e0816086          ADD      r6,r1,r6,LSL #1
0005c0  e1d660b0          LDRH     r6,[r6,#0]
0005c4  e0822006          ADD      r2,r2,r6
0005c8  e0036222          AND      r6,r3,r2,LSR #4
0005cc  e1a08e02          LSL      r8,r2,#28
0005d0  e1866f28          ORR      r6,r6,r8,LSR #30
0005d4  e00c2322          AND      r2,r12,r2,LSR #6
0005d8  e1822006          ORR      r2,r2,r6
0005dc  e1c420b2          STRH     r2,[r4,#2]
0005e0  e2800002          ADD      r0,r0,#2
0005e4  e1500005          CMP      r0,r5
0005e8  3affffa8          BCC      |L1.1168|
                  |L1.1516|
0005ec  e2877001          ADD      r7,r7,#1
0005f0  e3570078          CMP      r7,#0x78
0005f4  e2800c01          ADD      r0,r0,#0x100
0005f8  3affffa1          BCC      |L1.1156|
0005fc  e8bd01f0          POP      {r4-r8}
000600  e12fff1e          BX       lr
;;;93      register u32 y,BufE,c;
;;;94      for(y=0;y<120;y++)
;;;95      {
;;;96       BufE=(u32)Buf+256;
;;;97       for(;(u32)Buf<BufE;)
;;;98       {
;;;99        Pixel
;;;100       Pixel
;;;101       Pixel
;;;102       Pixel
;;;103      }
;;;104      Buf+=256;
;;;105     }
;;;106    }
                          ENDP