source: trunk/bootcode/bldlevel.inc@ 60

Last change on this file since 60 was 57, checked in by Ben Rietbroek, 10 years ago

All source-files lowercased [v1.1.1-testing]

Some standard files like 'COPYING', 'LICENSE', etc. have not been
converted to lower case because they are usually distributed uppercased.

File size: 4.5 KB
Line 
1;
2; AiR-BOOT (c) Copyright 1998-2008 M. Kiewitz
3;
4; This file is part of AiR-BOOT
5;
6; AiR-BOOT is free software: you can redistribute it and/or modify it under
7; the terms of the GNU General Public License as published by the Free
8; Software Foundation, either version 3 of the License, or (at your option)
9; any later version.
10;
11; AiR-BOOT is distributed in the hope that it will be useful, but WITHOUT ANY
12; WARRANTY: without even the implied warranty of MERCHANTABILITY or FITNESS
13; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
14; details.
15;
16; You should have received a copy of the GNU General Public License along with
17; AiR-BOOT. If not, see <http://www.gnu.org/licenses/>.
18;
19
20
21
22
23;
24; OS/2 BLDLEVEL Information.
25;
26
27
28;
29; The version values in here are derived from the AiR-BOOT versions
30; as defined in VERSION.INC.
31;
32
33;
34; For some reason JWasm and Tasm don't accept 'EN' for instance, but need
35; it to be split-up. While 'iEN' does work. So all the strings that were not
36; accepted are split-up.
37;
38; Changed langid to be just one letter in build-level, conforming to the
39; AiR-BOOT signature.
40;
41
42; Vendor
43BLDLVL_VENDOR EQU 'KIEWITZ'
44; Version
45BLDLVL_MAJOR_VERSION EQU AB_MAJOR_VERSION + '0'
46BLDLVL_MIDDLE_VERSION EQU AB_MIDDLE_VERSION + '0'
47BLDLVL_MINOR_VERSION EQU AB_MINOR_VERSION + '0'
48; Build date
49BLDLVL_YEAR EQU (AB_YEAR SHR 12 AND 0Fh)+'0',(AB_YEAR SHR 8 AND 0Fh)+'0',(AB_YEAR SHR 4 AND 0Fh)+'0',(AB_YEAR AND 0Fh)+'0'
50BLDLVL_MONTH EQU (AB_MONTH SHR 4)+'0',(AB_MONTH AND 0Fh)+'0'
51BLDLVL_DAY EQU (AB_DAY SHR 4)+'0',(AB_DAY AND 0Fh)+'0'
52; Build time
53BLDLVL_HOURS EQU (AB_HOURS SHR 4)+'0',(AB_HOURS AND 0Fh)+'0'
54BLDLVL_MINUTES EQU (AB_MINUTES SHR 4)+'0',(AB_MINUTES AND 0Fh)+'0'
55BLDLVL_SECONDS EQU (AB_SECONDS SHR 4)+'0',(AB_SECONDS AND 0Fh)+'0'
56; Build machine
57BLDLVL_MACHINE EQU '*UNKNOWN*' ; 16 chars max.
58; Build language
59IFDEF WASM
60 ; Wasm can only process the reference to 'lang' in pass 2 because it comes
61 ; from an included file which it has not processed yet at pass 1.
62 IF2
63 BLDLVL_LANGUAGE EQU TXT_LanguageID
64 ENDIF
65; The other assemblers process 'lang' correctly in pass 1.
66ELSE
67 BLDLVL_LANGUAGE EQU TXT_LanguageID
68ENDIF
69; Description
70BLDLVL_DESCRIPTION EQU 'AiR-BOOT Boot Manager'
71
72
73
74;~ bliep struct
75 ;~ db '@#'
76 ;~ db BLDLVL_VENDOR
77 ;~ db ':'
78 ;~ db BLDLVL_MAJOR_VERSION
79 ;~ db '.'
80 ;~ db BLDLVL_MIDDLE_VERSION
81 ;~ db '.'
82 ;~ db BLDLVL_MINOR_VERSION
83 ;~ db '#@##1## '
84;~ bld_level_date_start db BLDLVL_YEAR
85 ;~ db '/'
86 ;~ db BLDLVL_MONTH
87 ;~ db '/'
88 ;~ db BLDLVL_DAY
89 ;~ db ' '
90 ;~ db BLDLVL_HOURS
91 ;~ db ':'
92 ;~ db BLDLVL_MINUTES
93 ;~ db ':'
94 ;~ db BLDLVL_SECONDS
95;~ bld_level_date_end db ' '
96 ;~ db BLDLVL_MACHINE
97 ;~ db '::'
98 ;~ ; Wasm can only process the reference to 'lang' in pass 2 because it
99 ;~ ;comes from an included file which it has not processed yet at pass 1.
100 ;~ IFDEF WASM
101 ;~ IF2
102 ;~ db BLDLVL_LANGUAGE
103 ;~ ENDIF
104 ;~ ; The other assemblers process 'lang' correctly in pass 1.
105 ;~ ELSE
106 ;~ db BLDLVL_LANGUAGE
107 ;~ ENDIF
108 ;~ db '::'
109 ;~ db BLDLVL_MINOR_VERSION
110 ;~ db '::@@'
111 ;~ db BLDLVL_DESCRIPTION
112 ;~ db 0
113;~ bliep ends
114
115
116;
117; This macro inserts the BLDLEVEL string at the place where it is invoked.
118;
119InsertBuildLevel MACRO
120 db '@#'
121 db BLDLVL_VENDOR
122 db ':'
123 db BLDLVL_MAJOR_VERSION
124 db '.'
125 db BLDLVL_MIDDLE_VERSION
126 db '.'
127 db BLDLVL_MINOR_VERSION
128 db '#@##1## '
129bld_level_date_start:
130 db BLDLVL_YEAR
131 db '/'
132 db BLDLVL_MONTH
133 db '/'
134 db BLDLVL_DAY
135 db ' '
136 db BLDLVL_HOURS
137 db ':'
138 db BLDLVL_MINUTES
139 db ':'
140 db BLDLVL_SECONDS
141bld_level_date_end:
142 db ' '
143 db BLDLVL_MACHINE
144 db '::'
145 ; Wasm can only process the reference to 'lang' in pass 2 because it comes
146 ; from an included file which it has not processed yet at pass 1.
147 IFDEF WASM
148 IF2
149 db BLDLVL_LANGUAGE
150 ENDIF
151 ; The other assemblers process 'lang' correctly in pass 1.
152 ELSE
153 db BLDLVL_LANGUAGE
154 ENDIF
155 db '::'
156 db BLDLVL_MINOR_VERSION
157 db '::@@'
158 db BLDLVL_DESCRIPTION
159 db 0
160ENDM
161
Note: See TracBrowser for help on using the repository browser.