Subversion Repositories Kolibri OS

Rev

Rev 2434 | Rev 3908 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2. ;;                                                              ;;
  3. ;; Copyright (C) KolibriOS team 2004-2011. All rights reserved. ;;
  4. ;; Distributed under terms of the GNU General Public License    ;;
  5. ;;                                                              ;;
  6. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  7.  
  8. $Revision: 2465 $
  9.  
  10.  
  11. ; boot data: common strings (for all languages)
  12. macro line_full_top {
  13.           db       201
  14.           times    78   db 205
  15.           db       187
  16. }
  17. macro line_full_bottom {
  18.           db       200
  19.           times    78   db 205
  20.           db       188
  21. }
  22. macro line_half {
  23.           db      186,' '
  24.           times    76   db 0xc4
  25.           db      ' ',186
  26. }
  27. macro line_space {
  28.           db      186
  29.           times   78 db 32
  30.           db      186
  31. }
  32. d80x25_top:
  33.                 line_full_top
  34. cur_line_pos = 75
  35.         store byte ' ' at d80x25_top+cur_line_pos+1
  36. rev_var = __REV__
  37. while rev_var > 0
  38.         store byte rev_var mod 10 + '0' at d80x25_top+cur_line_pos
  39.         cur_line_pos = cur_line_pos - 1
  40.         rev_var = rev_var / 10
  41. end while
  42.         store byte ' ' at d80x25_top+cur_line_pos
  43.         store dword ' SVN' at d80x25_top+cur_line_pos-4
  44.  
  45. space_msg:
  46.                 line_space
  47. verstr:
  48. ;               line_space
  49. ; version string
  50.         db 186,32
  51.         repeat 78
  52.                 load a byte from version+%-1
  53.                 if a = 13
  54.                         break
  55.                 end if
  56.                 db a
  57.         end repeat
  58.         repeat 78 - ($-verstr)
  59.                 db      ' '
  60.         end repeat
  61.         db 32,186
  62.                 line_half
  63. d80x25_top_num = 4
  64.