Subversion Repositories Kolibri OS

Rev

Rev 750 | Rev 1425 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 750 Rev 1229
Line 53... Line 53...
53 
        jz      @f
 53 
        jz      @f
54 
        inc     ax
 54 
        inc     ax
55 
        inc     ax
 55 
        inc     ax
56 
        cmp     word [si], 170h
 56 
        cmp     word [si], 170h
57 
        jz      @f
 57 
        jz      @f
- 
 
 58 
	or	ax,-1
58 
        mov     ax, -1
 59 
;        mov     ax, -1
59 
@@:
 60 
@@:
60 
        stosw
 61 
        stosw
61 
        pop     ds
 62 
        pop     ds
62 
        jmp     bddc2
 63 
        jmp     bddc2
63 
bddl:
 64 
bddl:
64 
        mov     al, dl
 65 
        mov     al, dl
65 
        stosb
 66 
        stosb
66 
        mov     al, 0
 67 
	xor	ax,ax
67 
        stosb
 68 
	stosb
68 
        mov     ax, -1
 69 
	dec	ax
69 
        stosw
 70 
	stosw
- 
 
 71 
;        mov     al, 0
- 
 
 72 
;        stosb
- 
 
 73 
;        mov     ax, -1
- 
 
 74 
;        stosw
70 
bddc2:
 75 
bddc2:
71 
        cmp     cl, [es:0x475]
 76 
        cmp     cl, [es:0x475]
72 
        jae     bdde
 77 
        jae     bdde
73 
bddc:
 78 
bddc:
74 
        inc     dl
 79 
        inc     dl