Subversion Repositories Kolibri OS

Rev

Rev 3908 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
750 victor 1 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2 
;;                                                              ;;
5565 serge 3 
;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
750 victor 4 
;; Distributed under terms of the GNU General Public License    ;;
5 
;;                                                              ;;
6 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
593 mikedld 7 
 
750 victor 8 
$Revision: 5565 $
593 mikedld 9 
 
10 
 
437 diamond 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:
3908 Serge 33 
                line_full_top
437 diamond 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 
 
2434 Serge 45 
space_msg:
46 
                line_space
437 diamond 47 
verstr:
3908 Serge 48 
;               line_space
437 diamond 49 
; version string
3908 Serge 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
437 diamond 63 
d80x25_top_num = 4