Subversion Repositories Kolibri OS

Rev

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

Rev 5363 Rev 7114
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: 5363 $
 8 
$Revision: 7114 $
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
34 
cur_line_pos = 75
 35 
  cur_line_pos = 75
35 
        store byte ' ' at d80x25_top+cur_line_pos+1
 36 
        store byte ' ' at d80x25_top+cur_line_pos+1
36 
rev_var = __REV__
 37 
  rev_var = __REV__
37 
while rev_var > 0
 38 
  while rev_var > 0
38 
        store byte rev_var mod 10 + '0' at d80x25_top+cur_line_pos
 39 
        store byte rev_var mod 10 + '0' at d80x25_top+cur_line_pos
39 
        cur_line_pos = cur_line_pos - 1
 40 
        cur_line_pos = cur_line_pos - 1
40 
        rev_var = rev_var / 10
 41 
        rev_var = rev_var / 10
41 
end while
 42 
  end while
42 
        store byte ' ' at d80x25_top+cur_line_pos
 43 
        store byte ' ' at d80x25_top+cur_line_pos
43 
        store dword ' SVN' at d80x25_top+cur_line_pos-4
 44 
        store dword ' SVN' at d80x25_top+cur_line_pos-4
- 
 
 45 
end if
Line 44... Line 46...
44 
 
 46 
 
45 
space_msg:
 47 
space_msg:
46 
                line_space
 48 
                line_space
47 
verstr:
 49 
verstr: