Subversion Repositories Kolibri OS

Rev

Rev 7114 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7114 Rev 7129
Line 3... Line 3...
3 
;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
 3 
;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
4 
;; Distributed under terms of the GNU General Public License    ;;
 4 
;; Distributed under terms of the GNU General Public License    ;;
5 
;;                                                              ;;
 5 
;;                                                              ;;
6 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 6 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 7... Line 7...
7 
 
 7 
 
Line 8... Line 8...
8 
$Revision: 7114 $
 8 
$Revision: 7129 $
9 
 
 9 
 
10 
 
 10 
 
Line 29... Line 29...
29 
          times   78 db 32
 29 
          times   78 db 32
30 
          db      186
 30 
          db      186
31 
}
 31 
}
32 
d80x25_top:
 32 
d80x25_top:
33 
                line_full_top
 33 
                line_full_top
34 
if __REV__ > 0
 - 
 
35 
  cur_line_pos = 75
 34 
    cur_line_pos = 72
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
 35 
    ; this signature will be replaced with revision number (in kernel.asm)
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
 36 
    store dword '****' at d80x25_top + cur_line_pos
45 
end if
 - 
 
Line 46... Line 37...
46 
 
 37 
 
47 
space_msg:
 38 
space_msg:
48 
                line_space
 39 
                line_space
49 
verstr:
 40 
verstr: