Changeset 46 in xtideuniversalbios for trunk/Assembly_Library/Src/LibraryTests.asm


Ignore:
Timestamp:
Oct 4, 2010, 7:38:36 AM (14 years ago)
Author:
aitotat
google:author:
aitotat
Message:

Changes to Assembly Library:
Sorting now works (pivot item is copied for comparison and index comparisons are now signed instead of unsigned).
Menu shadow now looks better on black and white modes.
Sorting is now implemented for File Fialog: directories are displayed before files.
File Dialog now displays directories with upper case letters and files with lower case letters.
Line splitter now removes all empty lines from the end.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Assembly_Library/Src/LibraryTests.asm

    r45 r46  
    3333    CALL_DISPLAY_LIBRARY ClearScreen
    3434
    35     call    LibraryTests_Sort
     35    ;call   LibraryTests_Sort
    3636    ;call   LibraryTests_ForDisplayLibrary
    3737    ;call   LibraryTests_ForKeyboardLibrary
    38     ;call   LibraryTests_ForMenuLibrary
     38    call    LibraryTests_ForMenuLibrary
    3939
    4040    ; Exit to DOS
     
    571571    push    ax
    572572    mov     ax, [si]
    573     ;DISPLAY_DEBUG_CHARACTER 'I'
    574     ;DISPLAY_DEBUG_WORD_AND_WAIT_ANY_KEY ax, 10
    575     ;DISPLAY_DEBUG_CHARACTER ','
    576     ;DISPLAY_DEBUG_WORD_AND_WAIT_ANY_KEY [es:di], 10
    577     ;DISPLAY_DEBUG_CHARACTER ' '
     573    DISPLAY_DEBUG_CHARACTER 'I'
     574    DISPLAY_DEBUG_WORD_AND_WAIT_ANY_KEY ax, 16
     575    DISPLAY_DEBUG_CHARACTER ','
     576    DISPLAY_DEBUG_WORD_AND_WAIT_ANY_KEY [es:di], 16
     577    DISPLAY_DEBUG_CHARACTER ' '
    578578    cmp     ax, [es:di]
    579579    pop     ax
     
    586586    pop     ds
    587587    mov     si, .rgwItems
    588     mov     bx, 10
     588    mov     bx, 16
    589589.Loop:
    590590    lodsw
     
    596596
    597597.rgwItems:
    598     dw      435
    599     dw      -31551
    600     dw      345
    601     dw      0
    602     dw      -18
    603     dw      23
    604     dw      435
     598    dw      '['
     599    dw      'n'
     600    dw      '5'
     601    dw      '.'
     602    dw      ']'
     603    dw      'a'
     604    dw      'A'
    605605
    606606
Note: See TracChangeset for help on using the changeset viewer.