Subversion Repositories Kolibri OS

Rev

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

  1. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2. ;;                                                              ;;
  3. ;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
  4. ;; Distributed under terms of the GNU General Public License    ;;
  5. ;;                                                              ;;
  6. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  7.  
  8. $Revision: 7114 $
  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. if __REV__ > 0
  35.   cur_line_pos = 75
  36.         store byte ' ' at d80x25_top+cur_line_pos+1
  37.   rev_var = __REV__
  38.   while rev_var > 0
  39.         store byte rev_var mod 10 + '0' at d80x25_top+cur_line_pos
  40.         cur_line_pos = cur_line_pos - 1
  41.         rev_var = rev_var / 10
  42.   end while
  43.         store byte ' ' at d80x25_top+cur_line_pos
  44.         store dword ' SVN' at d80x25_top+cur_line_pos-4
  45. end if
  46.  
  47. space_msg:
  48.                 line_space
  49. verstr:
  50. ;               line_space
  51. ; version string
  52.         db 186,32
  53.         repeat 78
  54.                 load a byte from version+%-1
  55.                 if a = 13
  56.                         break
  57.                 end if
  58.                 db a
  59.         end repeat
  60.         repeat 78 - ($-verstr)
  61.                 db      ' '
  62.         end repeat
  63.         db 32,186
  64.                 line_half
  65. d80x25_top_num = 4
  66.