Subversion Repositories Kolibri OS

Rev

Rev 437 | Rev 750 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 437 Rev 593
-
 
1
$Revision: 0 $
-
 
2
 
-
 
3
 
-
 
4
; boot data: common strings (for all languages)
1
; boot data: common strings (for all languages)
5
macro line_full_top {
2
macro line_full_top {
6
          db       201
3
          db       201
7
          times    78   db 205
4
          times    78   db 205
8
          db       187
5
          db       187
9
}
6
}
10
macro line_full_bottom {
7
macro line_full_bottom {
11
          db       200
8
          db       200
12
          times    78   db 205
9
          times    78   db 205
13
          db       188
10
          db       188
14
}
11
}
15
macro line_half {
12
macro line_half {
16
          db      186,' '
13
          db      186,' '
17
          times    76   db 0xc4
14
          times    76   db 0xc4
18
          db      ' ',186
15
          db      ' ',186
19
}
16
}
20
macro line_space {
17
macro line_space {
21
          db      186
18
          db      186
22
          times   78 db 32
19
          times   78 db 32
23
          db      186
20
          db      186
24
}
21
}
25
d80x25_top:
22
d80x25_top:
26
		line_full_top
23
		line_full_top
27
cur_line_pos = 75
24
cur_line_pos = 75
28
        store byte ' ' at d80x25_top+cur_line_pos+1
25
        store byte ' ' at d80x25_top+cur_line_pos+1
29
rev_var = __REV__
26
rev_var = __REV__
30
while rev_var > 0
27
while rev_var > 0
31
        store byte rev_var mod 10 + '0' at d80x25_top+cur_line_pos
28
        store byte rev_var mod 10 + '0' at d80x25_top+cur_line_pos
32
        cur_line_pos = cur_line_pos - 1
29
        cur_line_pos = cur_line_pos - 1
33
        rev_var = rev_var / 10
30
        rev_var = rev_var / 10
34
end while
31
end while
35
        store byte ' ' at d80x25_top+cur_line_pos
32
        store byte ' ' at d80x25_top+cur_line_pos
36
        store dword ' SVN' at d80x25_top+cur_line_pos-4
33
        store dword ' SVN' at d80x25_top+cur_line_pos-4
37
 
34
 
38
space_msg:	line_space
35
space_msg:	line_space
39
verstr:
36
verstr:
40
;		line_space
37
;		line_space
41
; version string
38
; version string
42
	db 186,32
39
	db 186,32
43
	repeat 78
40
	repeat 78
44
		load a byte from version+%-1
41
		load a byte from version+%-1
45
		if a = 13
42
		if a = 13
46
			break
43
			break
47
		end if
44
		end if
48
		db a
45
		db a
49
	end repeat
46
	end repeat
50
	repeat 78 - ($-verstr)
47
	repeat 78 - ($-verstr)
51
		db	' '
48
		db	' '
52
	end repeat
49
	end repeat
53
	db 32,186
50
	db 32,186
54
		line_half
51
		line_half
55
d80x25_top_num = 4
52
d80x25_top_num = 4
-