Subversion Repositories Kolibri OS

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
750 victor 1 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2 
;;                                                              ;;
2540 hidnplayr 3 
;; Copyright (C) KolibriOS team 2004-2011. All rights reserved. ;;
750 victor 4 
;; Distributed under terms of the GNU General Public License    ;;
5 
;;                                                              ;;
6 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
593 mikedld 7 
 
2540 hidnplayr 8 
$Revision $
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:
2540 hidnplayr 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 
 
2540 hidnplayr 45 
space_msg:      line_space
437 diamond 46 
verstr:
2540 hidnplayr 47 
;               line_space
437 diamond 48 
; version string
2540 hidnplayr 49 
        db 186,32
50 
        repeat 78
51 
                load a byte from version+%-1
52 
                if a = 13
53 
                        break
54 
                end if
55 
                db a
56 
        end repeat
57 
        repeat 78 - ($-verstr)
58 
                db      ' '
59 
        end repeat
60 
        db 32,186
61 
                line_half
437 diamond 62 
d80x25_top_num = 4