forked from KolibriOS/kolibrios
fix function 'DoubleFloat_to_String'
git-svn-id: svn://kolibrios.org@2254 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
a63cc061c2
commit
fcc6c62880
@ -92,7 +92,7 @@ DoubleFloat_to_String:
|
|||||||
stosb
|
stosb
|
||||||
.NoSign:
|
.NoSign:
|
||||||
; <EFBFBD> α― <EFBFBD>®Ά βμ η¨α«® Ά <EFBFBD>®¤ ASCII
|
; <EFBFBD> α― <EFBFBD>®Ά βμ η¨α«® Ά <EFBFBD>®¤ ASCII
|
||||||
mov BX,8 ;ᬥ饨¥ ¯®á«¥¤¥© ¯ àë æ¨äà
|
mov ebx,8 ;ᬥ饨¥ ¯®á«¥¤¥© ¯ àë æ¨äà
|
||||||
mov ecx,9 ;αη¥βη¨<EFBFBD> ― ΰ ζ¨δΰ
|
mov ecx,9 ;αη¥βη¨<EFBFBD> ― ΰ ζ¨δΰ
|
||||||
; <EFBFBD>―।¥«¨βμ ―®§¨ζ¨ξ ¤¥αοβ¨η®© β®η<EFBFBD>¨ Ά η¨α«¥
|
; <EFBFBD>―।¥«¨βμ ―®§¨ζ¨ξ ¤¥αοβ¨η®© β®η<EFBFBD>¨ Ά η¨α«¥
|
||||||
mov DX,18
|
mov DX,18
|
||||||
@ -101,7 +101,7 @@ DoubleFloat_to_String:
|
|||||||
jz .Error ;¨«¨ γ«¥Ά ο ―®§¨ζ¨ο
|
jz .Error ;¨«¨ γ«¥Ά ο ―®§¨ζ¨ο
|
||||||
.NextPair:
|
.NextPair:
|
||||||
; ‡ £ΰ㧨βμ ®η¥ΰ¥¤γξ ― ΰγ ΰ §ΰ冷Ά
|
; ‡ £ΰ㧨βμ ®η¥ΰ¥¤γξ ― ΰγ ΰ §ΰ冷Ά
|
||||||
mov AL, byte [BX + Data_BCD]
|
mov AL, byte [ebx + Data_BCD]
|
||||||
mov AH,AL
|
mov AH,AL
|
||||||
; ‚뤥«¨βμ, ―¥ΰ¥Ά¥αβ¨ Ά ASCII ¨
|
; ‚뤥«¨βμ, ―¥ΰ¥Ά¥αβ¨ Ά ASCII ¨
|
||||||
; α®εΰ ¨βμ αβ ΰθγξ β¥βΰ ¤γ
|
; α®εΰ ¨βμ αβ ΰθγξ β¥βΰ ¤γ
|
||||||
|
@ -152,7 +152,7 @@ DoubleFloat_to_String:
|
|||||||
stosb
|
stosb
|
||||||
.NoSign:
|
.NoSign:
|
||||||
; <20> α― <E28095>®Ά βμ η¨α«® Ά <20>®¤ ASCII
|
; <20> α― <E28095>®Ά βμ η¨α«® Ά <20>®¤ ASCII
|
||||||
mov BX,8 ;ᬥ饨¥ ¯®á«¥¤¥© ¯ àë æ¨äà
|
mov ebx,8 ;ᬥ饨¥ ¯®á«¥¤¥© ¯ àë æ¨äà
|
||||||
mov ecx,9 ;αη¥βη¨<CEB7> ― ΰ ζ¨δΰ
|
mov ecx,9 ;αη¥βη¨<CEB7> ― ΰ ζ¨δΰ
|
||||||
; <20>―।¥«¨βμ ―®§¨ζ¨ξ ¤¥αοβ¨η®© β®η<C2AE>¨ Ά η¨α«¥
|
; <20>―।¥«¨βμ ―®§¨ζ¨ξ ¤¥αοβ¨η®© β®η<C2AE>¨ Ά η¨α«¥
|
||||||
mov DX,18
|
mov DX,18
|
||||||
@ -161,7 +161,7 @@ DoubleFloat_to_String:
|
|||||||
jz .Error ;¨«¨ γ«¥Ά ο ―®§¨ζ¨ο
|
jz .Error ;¨«¨ γ«¥Ά ο ―®§¨ζ¨ο
|
||||||
.NextPair:
|
.NextPair:
|
||||||
; ‡ £ΰ㧨βμ ®η¥ΰ¥¤γξ ― ΰγ ΰ §ΰ冷Ά
|
; ‡ £ΰ㧨βμ ®η¥ΰ¥¤γξ ― ΰγ ΰ §ΰ冷Ά
|
||||||
mov AL, byte [BX + Data_BCD]
|
mov AL, byte [ebx + Data_BCD]
|
||||||
mov AH,AL
|
mov AH,AL
|
||||||
; ‚뤥«¨βμ, ―¥ΰ¥Ά¥αβ¨ Ά ASCII ¨
|
; ‚뤥«¨βμ, ―¥ΰ¥Ά¥αβ¨ Ά ASCII ¨
|
||||||
; α®εΰ ¨βμ αβ ΰθγξ β¥βΰ ¤γ
|
; α®εΰ ¨βμ αβ ΰθγξ β¥βΰ ¤γ
|
||||||
|
File diff suppressed because one or more lines are too long
Loading…
Reference in New Issue
Block a user