Rev 709 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 709 | Rev 1047 | ||
---|---|---|---|
Line 15... | Line 15... | ||
15 | ;; 08.11.2004 expand_pathz and rename (only for hd) - ATV ;; |
15 | ;; 08.11.2004 expand_pathz and rename (only for hd) - ATV ;; |
16 | ;; 20.10.2004 Makedir/Removedir (only for hd) - ATV ;; |
16 | ;; 20.10.2004 Makedir/Removedir (only for hd) - ATV ;; |
17 | ;; ;; |
17 | ;; ;; |
18 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
18 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
Line 19... | Line 19... | ||
19 | 19 | ||
Line 20... | Line 20... | ||
20 | $Revision: 709 $ |
20 | $Revision: 1047 $ |
21 | 21 | ||
22 | 22 | ||
Line 762... | Line 762... | ||
762 | ; jb err |
762 | ; jb err |
763 | ; cmp al,'9' |
763 | ; cmp al,'9' |
764 | ; ja err |
764 | ; ja err |
765 | sub al,48 |
765 | sub al,48 |
766 | shl cx,1 |
766 | shl cx,1 |
767 | jc err |
767 | jc error |
768 | mov bx,cx |
768 | mov bx,cx |
769 | shl cx,1 |
769 | shl cx,1 |
770 | jc err |
770 | jc error |
771 | shl cx,1 |
771 | shl cx,1 |
772 | jc err |
772 | jc error |
773 | add cx,bx |
773 | add cx,bx |
774 | jc err |
774 | jc error |
775 | cbw |
775 | cbw |
776 | add cx,ax |
776 | add cx,ax |
777 | jc err |
777 | jc error |
778 | i3: |
778 | i3: |
779 | inc edi |
779 | inc edi |
780 | jmp i1 |
780 | jmp i1 |
781 | i_exit: |
781 | i_exit: |
782 | mov ax,cx |
782 | mov ax,cx |
Line 787... | Line 787... | ||
787 | pop dx |
787 | pop dx |
788 | pop cx |
788 | pop cx |
789 | pop bx |
789 | pop bx |
790 | ret |
790 | ret |
Line 791... | Line 791... | ||
791 | 791 | ||
792 | err: |
792 | error: |
793 | stc |
793 | stc |
Line 794... | Line 794... | ||
794 | jmp i4 |
794 | jmp i4 |
795 | 795 |