SHARE
TWEET

Untitled

a guest Mar 25th, 2012 669 Never
  1. org 100h
  2.  
  3.  mov al,0x13
  4.  int 10h
  5.  
  6.  push word 0xa000
  7.  pop es
  8.  
  9.  stosb
  10.  
  11.  mov cl,199
  12. sivut:
  13.  stosb
  14.  stosb
  15.  add di,318
  16.  
  17.  loop sivut
  18.  
  19.  mov cx,2178
  20.  rep stosb
  21.  
  22.  
  23. silmu:
  24.  
  25.  in al,60h
  26.  inc cx
  27.  test al,1
  28.  jnz ei320
  29.  mov cx,320
  30. ei320:
  31.  test al,00010100b
  32.  jnz eineg
  33.  neg cx
  34. eineg:
  35.  
  36.  repnz scasb
  37.  
  38.  mov ax,0x0b03
  39.  int 10h
  40.  sub byte [es:di],ah
  41.  cbw
  42.  
  43.  jc silmu
  44.  
  45. pois:
  46.  
  47.  int 10h
  48.  ret
RAW Paste Data
Top