Subversion Repositories Kolibri OS

Rev

Rev 7522 | Rev 7603 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7522 Rev 7601
Line 3... Line 3...
3
;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
3
;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
4
;; Distributed under terms of the GNU General Public License    ;;
4
;; Distributed under terms of the GNU General Public License    ;;
5
;;                                                              ;;
5
;;                                                              ;;
6
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
6
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 7... Line 7...
7
 
7
 
Line 8... Line 8...
8
$Revision: 7522 $
8
$Revision: 7601 $
Line 9... Line 9...
9
 
9
 
Line 215... Line 215...
215
; } mike.dld
215
; } mike.dld
Line 216... Line 216...
216
 
216
 
217
 
217
 
-
 
218
align 4
-
 
219
keyboard   dd 1
-
 
220
 
-
 
221
if lang eq en
-
 
222
  SYSLANG = 1
-
 
223
else if lang eq fi
-
 
224
  SYSLANG = 2
-
 
225
else if lang eq de
-
 
226
  SYSLANG = 3
-
 
227
else if lang eq ru
-
 
228
  SYSLANG = 4
-
 
229
else if lang eq fr
-
 
230
  SYSLANG = 5
-
 
231
else if lang eq et
-
 
232
  SYSLANG = 6
-
 
233
else if lang eq sp
-
 
234
  SYSLANG = 7
-
 
235
else if lang eq it
-
 
236
  SYSLANG = 8
-
 
237
else
218
align 4
238
  display 'unsupported language specified',13,10
Line 219... Line 239...
219
keyboard   dd 1
239
end if
Line 220... Line 240...
220
syslang    dd 1
240
syslang    dd SYSLANG
221
 
241