[41] | 1 | ; Project name : Assembly Library |
---|
| 2 | ; Description : Debugging macros. |
---|
| 3 | %ifndef DEBUG_INC |
---|
| 4 | %define DEBUG_INC |
---|
| 5 | |
---|
| 6 | |
---|
| 7 | ;-------------------------------------------------------------------- |
---|
| 8 | ; DISPLAY_DEBUG_WORD_AND_WAIT_ANY_KEY |
---|
| 9 | ; Parameters: |
---|
| 10 | ; %1: Debug word |
---|
| 11 | ; %2: Numeric base (2, 10, 16) |
---|
| 12 | ; Returns: |
---|
| 13 | ; Nothing |
---|
| 14 | ; Corrupts registers: |
---|
| 15 | ; Nothing |
---|
| 16 | ;-------------------------------------------------------------------- |
---|
| 17 | %macro DISPLAY_DEBUG_WORD_AND_WAIT_ANY_KEY 2 |
---|
[45] | 18 | pushf |
---|
[41] | 19 | push di |
---|
| 20 | push bx |
---|
| 21 | push ax |
---|
| 22 | |
---|
| 23 | mov ax, %1 |
---|
| 24 | mov bx, %2 |
---|
| 25 | CALL_DISPLAY_LIBRARY PrintWordFromAXwithBaseInBX |
---|
[142] | 26 | %ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS |
---|
[41] | 27 | call Keyboard_RemoveAllKeystrokesFromBuffer |
---|
[142] | 28 | %endif |
---|
[41] | 29 | call Keyboard_GetKeystrokeToAXandWaitIfNecessary |
---|
| 30 | |
---|
| 31 | pop ax |
---|
| 32 | pop bx |
---|
| 33 | pop di |
---|
[45] | 34 | popf |
---|
[41] | 35 | %endmacro |
---|
| 36 | |
---|
| 37 | |
---|
| 38 | ;-------------------------------------------------------------------- |
---|
| 39 | ; DISPLAY_DEBUG_CHARACTER_AND_WAIT_ANY_KEY |
---|
| 40 | ; Parameters: |
---|
| 41 | ; %1: Character to print |
---|
| 42 | ; Returns: |
---|
| 43 | ; Nothing |
---|
| 44 | ; Corrupts registers: |
---|
| 45 | ; Nothing |
---|
| 46 | ;-------------------------------------------------------------------- |
---|
| 47 | %macro DISPLAY_DEBUG_CHARACTER_AND_WAIT_ANY_KEY 1 |
---|
[45] | 48 | pushf |
---|
[41] | 49 | push di |
---|
| 50 | push ax |
---|
| 51 | |
---|
| 52 | mov al, %1 |
---|
| 53 | CALL_DISPLAY_LIBRARY PrintCharacterFromAL |
---|
[142] | 54 | %ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS |
---|
[41] | 55 | call Keyboard_RemoveAllKeystrokesFromBuffer |
---|
[142] | 56 | %endif |
---|
[41] | 57 | call Keyboard_GetKeystrokeToAXandWaitIfNecessary |
---|
| 58 | |
---|
| 59 | pop ax |
---|
| 60 | pop di |
---|
[45] | 61 | popf |
---|
[41] | 62 | %endmacro |
---|
| 63 | |
---|
| 64 | |
---|
| 65 | ;-------------------------------------------------------------------- |
---|
| 66 | ; DISPLAY_DEBUG_CHARACTER |
---|
| 67 | ; Parameters: |
---|
| 68 | ; %1: Character to print |
---|
| 69 | ; Returns: |
---|
| 70 | ; Nothing |
---|
| 71 | ; Corrupts registers: |
---|
| 72 | ; Nothing |
---|
| 73 | ;-------------------------------------------------------------------- |
---|
| 74 | %macro DISPLAY_DEBUG_CHARACTER 1 |
---|
[45] | 75 | pushf |
---|
[41] | 76 | push di |
---|
| 77 | push ax |
---|
| 78 | mov al, %1 |
---|
| 79 | CALL_DISPLAY_LIBRARY PrintCharacterFromAL |
---|
| 80 | pop ax |
---|
| 81 | pop di |
---|
[45] | 82 | popf |
---|
[41] | 83 | %endmacro |
---|
| 84 | |
---|
| 85 | |
---|
| 86 | ;-------------------------------------------------------------------- |
---|
| 87 | ; WAIT_ANY_KEY_TO_CONTINUE |
---|
| 88 | ; Parameters: |
---|
| 89 | ; Nothing |
---|
| 90 | ; Returns: |
---|
| 91 | ; Nothing |
---|
| 92 | ; Corrupts registers: |
---|
| 93 | ; Nothing |
---|
| 94 | ;-------------------------------------------------------------------- |
---|
| 95 | %macro WAIT_ANY_KEY_TO_CONTINUE 0 |
---|
| 96 | push ax |
---|
[142] | 97 | %ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS |
---|
[41] | 98 | call Keyboard_RemoveAllKeystrokesFromBuffer |
---|
[142] | 99 | %endif |
---|
[41] | 100 | call Keyboard_GetKeystrokeToAXandWaitIfNecessary |
---|
| 101 | pop ax |
---|
| 102 | %endmacro |
---|
| 103 | |
---|
| 104 | |
---|
| 105 | %endif ; DEBUG_INC |
---|