Subversion Repositories Kolibri OS

Rev

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

Rev 2162 Rev 2254
Line 150... Line 150...
150 
	jz	.NoSign
 150 
	jz	.NoSign
151 
	mov	AL,'-'
 151 
	mov	AL,'-'
152 
	stosb
 152 
	stosb
153 
.NoSign:
 153 
.NoSign:
154 
;  á¯ ª®¢ âì ç¨á«® ¢ ª®¤ ASCII
 154 
;  á¯ ª®¢ âì ç¨á«® ¢ ª®¤ ASCII
155 
	mov	BX,8	 ;ᬥ饭¨¥ ¯®á«¥¤­¥© ¯ àë æ¨äà
 155 
	mov	ebx,8	 ;ᬥ饭¨¥ ¯®á«¥¤­¥© ¯ àë æ¨äà
156 
	mov	ecx,9	 ;áç¥â稪 ¯ à æ¨äà
 156 
	mov	ecx,9	 ;áç¥â稪 ¯ à æ¨äà
157 
	; Ž¯à¥¤¥«¨âì ¯®§¨æ¨î ¤¥áïâ¨ç­®© â®çª¨ ¢ ç¨á«¥
 157 
	; Ž¯à¥¤¥«¨âì ¯®§¨æ¨î ¤¥áïâ¨ç­®© â®çª¨ ¢ ç¨á«¥
158 
	mov	DX,18
 158 
	mov	DX,18
159 
	sub	DX,[NumberSymbolsAD]
 159 
	sub	DX,[NumberSymbolsAD]
160 
	js	.Error	;®è¨¡ª , ¥á«¨ ®âà¨æ â¥«ì­ ï
 160 
	js	.Error	;®è¨¡ª , ¥á«¨ ®âà¨æ â¥«ì­ ï
161 
	jz	.Error	;¨«¨ ­ã«¥¢ ï ¯®§¨æ¨ï
 161 
	jz	.Error	;¨«¨ ­ã«¥¢ ï ¯®§¨æ¨ï
162 
.NextPair:
 162 
.NextPair:
163 
	; ‡ £à㧨âì ®ç¥à¥¤­ãî ¯ àã à §à冷¢
 163 
	; ‡ £à㧨âì ®ç¥à¥¤­ãî ¯ àã à §à冷¢
164 
	mov	AL, byte [BX + Data_BCD]
 164 
	mov	AL, byte [ebx + Data_BCD]
165 
	mov	AH,AL
 165 
	mov	AH,AL
166 
	; ‚뤥«¨âì, ¯¥à¥¢¥á⨠¢ ASCII ¨
 166 
	; ‚뤥«¨âì, ¯¥à¥¢¥á⨠¢ ASCII ¨
167 
	; á®åà ­¨âì áâ àèãî â¥âà ¤ã
 167 
	; á®åà ­¨âì áâ àèãî â¥âà ¤ã
168 
	shr	AL,4
 168 
	shr	AL,4
169 
	add	AL,'0'
 169 
	add	AL,'0'