Subversion Repositories Kolibri OS

Rev

Rev 750 | Rev 2455 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2288 clevermous 1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2
;;                                                              ;;
3
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
4
;; Distributed under terms of the GNU General Public License    ;;
5
;;                                                              ;;
6
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
7
 
8
$Revision: 2288 $
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