Changeset 369 in xtideuniversalbios for trunk/Assembly_Library/Src/String
- Timestamp:
- Mar 29, 2012, 9:29:28 AM (13 years ago)
- google:author:
- gregli@hotmail.com
- Location:
- trunk/Assembly_Library/Src/String
- Files:
-
- 3 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 -
trunk/Assembly_Library/Src/String/String.asm
r293 r369 15 15 ; Nothing 16 16 ;-------------------------------------------------------------------- 17 ALIGN JUMP_ALIGN17 ALIGN STRING_JUMP_ALIGN 18 18 String_ConvertDSSItoLowerCase: 19 19 push dx … … 42 42 ; Nothing 43 43 ;-------------------------------------------------------------------- 44 ALIGN JUMP_ALIGN44 ALIGN STRING_JUMP_ALIGN 45 45 String_ConvertWordToAXfromStringInDSSIwithBaseInBX: 46 46 push di … … 68 68 ; Nothing 69 69 ;-------------------------------------------------------------------- 70 ALIGN JUMP_ALIGN70 ALIGN STRING_JUMP_ALIGN 71 71 String_CopyDSSItoESDIandGetLengthToCX: 72 72 push ax 73 73 74 74 xor cx, cx 75 ALIGN JUMP_ALIGN75 ALIGN STRING_JUMP_ALIGN 76 76 .CopyNextCharacter: 77 77 lodsb ; Load from DS:SI to AL … … 82 82 jmp SHORT .CopyNextCharacter 83 83 84 ALIGN JUMP_ALIGN84 ALIGN STRING_JUMP_ALIGN 85 85 .EndOfString: 86 86 pop ax … … 97 97 ; Nothing 98 98 ;-------------------------------------------------------------------- 99 ALIGN JUMP_ALIGN99 ALIGN STRING_JUMP_ALIGN 100 100 String_GetLengthFromDSSItoCX: 101 101 push ax -
trunk/Assembly_Library/Src/String/StringProcess.asm
r162 r369 33 33 ; Nothing (processing function can corrupt BX,DI,ES) 34 34 ;-------------------------------------------------------------------- 35 ALIGN JUMP_ALIGN35 ALIGN STRING_JUMP_ALIGN 36 36 StringProcess_DSSIwithFunctionInDX: 37 37 push si … … 39 39 40 40 xor cx, cx 41 ALIGN JUMP_ALIGN41 ALIGN STRING_JUMP_ALIGN 42 42 .ProcessNextCharacter: 43 43 lodsb … … 48 48 jnc SHORT .ProcessNextCharacter 49 49 50 ALIGN JUMP_ALIGN50 ALIGN STRING_JUMP_ALIGN 51 51 .EndOfString: 52 52 pop ax … … 65 65 ; AL 66 66 ;-------------------------------------------------------------------- 67 ALIGN JUMP_ALIGN67 ALIGN STRING_JUMP_ALIGN 68 68 StringProcess_ConvertToLowerCase: 69 69 call Char_ALtoLowerCaseLetter … … 84 84 ; AX 85 85 ;-------------------------------------------------------------------- 86 ALIGN JUMP_ALIGN86 ALIGN STRING_JUMP_ALIGN 87 87 StringProcess_ConvertToWordInDIWithBaseInBX: 88 88 call Char_ConvertIntegerToALfromDigitInALwithBaseInBX
Note:
See TracChangeset
for help on using the changeset viewer.