kolibrios/kernel/trunk/boot/bootstr.inc

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                                                              ;;
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
;; Distributed under terms of the GNU General Public License    ;;
;;                                                              ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$Revision$


; boot data: common strings (for all languages)
macro line_full_top {
          db       201
          times    78   db 205
          db       187
}
macro line_full_bottom {
          db       200
          times    78   db 205
          db       188
}
macro line_half {
          db      186,' '
          times    76   db 0xc4
          db      ' ',186
}
macro line_space {
          db      186
          times   78 db 32
          db      186
}
d80x25_top:
		line_full_top
cur_line_pos = 75
        store byte ' ' at d80x25_top+cur_line_pos+1
rev_var = __REV__
while rev_var > 0
        store byte rev_var mod 10 + '0' at d80x25_top+cur_line_pos
        cur_line_pos = cur_line_pos - 1
        rev_var = rev_var / 10
end while
        store byte ' ' at d80x25_top+cur_line_pos
        store dword ' SVN' at d80x25_top+cur_line_pos-4

space_msg:	line_space
verstr:
;		line_space
; version string
	db 186,32
	repeat 78
		load a byte from version+%-1
		if a = 13
			break
		end if
		db a
	end repeat
	repeat 78 - ($-verstr)
		db	' '
	end repeat
	db 32,186
		line_half
d80x25_top_num = 4