.MODEL TINY
.186
.CODE
ORG 100h

MAIN:
   mov ax,13h
   int 10h

   push 0A73ch
   pop ds
   mov cl,1
   mov bl,32
   @bigmain:
   mov al,8
   mov dl,cs:[offset pic+bx-1]
   @l:
       dec cx
       jnz @ok
       mov cl,50
       add di,320-50
     @ok:
       shl dl,1
       adc byte ptr [di],15
       inc di
       dec ax
       jnz @l
   dec bx
   jnz @bigmain
   int 16h
   mov ax,3h
   int 10h
   ret

pic  db 10111111b
     db 01100010b,00110111b,01011010b,11101101b,00011011b,01110111b,10111001b
     db 10101101b,01011011b,10110101b,01101111b,10111111b,01100010b
     db 10101010b,11100110b,11000100b,10111110b,11110001b,10101101b
     db 10101011b,10111010b,01010101b,01111011b,01010111b,00101011b
     db 10100010b,00110110b,11011010b,11000110b,00010001b,01110101b



END main