Changeset 369 in xtideuniversalbios for trunk/Assembly_Library/Src/String/Char.asm
- Timestamp:
- Mar 29, 2012, 9:29:28 AM (13 years ago)
- google:author:
- gregli@hotmail.com
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Assembly_Library/Src/String/Char.asm
r201 r369 35 35 ; Nothing 36 36 ;-------------------------------------------------------------------- 37 ALIGN JUMP_ALIGN37 ALIGN STRING_JUMP_ALIGN 38 38 Char_IsLowerCaseLetterInAL: 39 39 IS_BETWEEN_IMMEDIATES al, 'a', 'z' … … 51 51 ;-------------------------------------------------------------------- 52 52 %ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS 53 ALIGN JUMP_ALIGN53 ALIGN STRING_JUMP_ALIGN 54 54 Char_IsUpperCaseLetterInAL: 55 55 IS_BETWEEN_IMMEDIATES al, 'A', 'Z' … … 69 69 ;-------------------------------------------------------------------- 70 70 %ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS 71 ALIGN JUMP_ALIGN71 ALIGN STRING_JUMP_ALIGN 72 72 Char_IsHexadecimalDigitInAL: 73 73 call Char_IsDecimalDigitInAL … … 89 89 ;-------------------------------------------------------------------- 90 90 %ifndef MODULE_STRINGS_COMPRESSED 91 ALIGN JUMP_ALIGN91 ALIGN STRING_JUMP_ALIGN 92 92 Char_IsDecimalDigitInAL: 93 93 IS_BETWEEN_IMMEDIATES al, '0', '9' … … 108 108 ;-------------------------------------------------------------------- 109 109 %ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS 110 ALIGN JUMP_ALIGN110 ALIGN STRING_JUMP_ALIGN 111 111 Char_ConvertIntegerToALfromDigitInALwithBaseInBX: 112 112 push dx … … 119 119 jbe SHORT .ConvertToDecimalDigit 120 120 sub al, 'a'-'0'-10 ; Convert to hexadecimal integer 121 ALIGN JUMP_ALIGN121 ALIGN STRING_JUMP_ALIGN 122 122 .ConvertToDecimalDigit: 123 123 sub al, '0' ; Convert to decimal integer … … 137 137 ;-------------------------------------------------------------------- 138 138 %ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS 139 ALIGN JUMP_ALIGN139 ALIGN STRING_JUMP_ALIGN 140 140 Char_CharIsValid: 141 141 stc … … 143 143 %endif 144 144 145 ALIGN JUMP_ALIGN145 ALIGN STRING_JUMP_ALIGN 146 146 Char_CharIsNotValid: 147 147 clc … … 159 159 ;-------------------------------------------------------------------- 160 160 %ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS 161 ALIGN JUMP_ALIGN161 ALIGN STRING_JUMP_ALIGN 162 162 Char_ALtoLowerCaseLetter: 163 163 call Char_IsUpperCaseLetterInAL ; Is upper case character? … … 174 174 ; Nothing 175 175 ;-------------------------------------------------------------------- 176 ALIGN JUMP_ALIGN176 ALIGN STRING_JUMP_ALIGN 177 177 Char_ALtoUpperCaseLetter: 178 178 call Char_IsLowerCaseLetterInAL ; Is lower case character? … … 205 205 ;-------------------------------------------------------------------- 206 206 %ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS 207 ALIGN JUMP_ALIGN207 ALIGN STRING_JUMP_ALIGN 208 208 Char_GetFilterFunctionToDXforNumericBaseInBX: 209 209 mov dx, Char_IsDecimalDigitInAL
Note:
See TracChangeset
for help on using the changeset viewer.