Rev 5874 | Rev 5919 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 5874 | Rev 5875 | ||
---|---|---|---|
Line 23... | Line 23... | ||
23 | ; Set system language |
23 | ; Set system language |
24 | mov word[param],0 |
24 | mov word[param],0 |
25 | invoke ini.get_str, sz_ini, sz_system, sz_language, param, 2, 0 |
25 | invoke ini.get_str, sz_ini, sz_system, sz_language, param, 2, 0 |
26 | mov ax, [param] |
26 | mov ax, [param] |
27 | or ax, 0x2020 ; convert to lowercase |
27 | or ax, 0x2020 ; convert to lowercase |
28 | mov ecx,10 |
28 | mov ecx,8 |
29 | mov edi,langMarks |
29 | mov edi,langMarks |
30 | repnz scasw |
30 | repnz scasw |
31 | jnz @f |
31 | jnz @f |
32 | neg ecx |
32 | neg ecx |
33 | add ecx,10 |
33 | add ecx,8 |
34 | mcall 21,5 |
34 | mcall 21,5 |
35 | @@: |
35 | @@: |
Line 36... | Line 36... | ||
36 | 36 | ||
37 | ; Set font smoothing |
37 | ; Set font smoothing |
Line 260... | Line 260... | ||
260 | pop eax |
260 | pop eax |
261 | mcall -1 |
261 | mcall -1 |
262 | language1: |
262 | language1: |
263 | dec [syslang] |
263 | dec [syslang] |
264 | jns @f |
264 | jns @f |
265 | mov [syslang],9 |
265 | mov [syslang],7 |
266 | jmp @f |
266 | jmp @f |
267 | language2: |
267 | language2: |
268 | inc [syslang] |
268 | inc [syslang] |
269 | cmp [syslang],10 |
269 | cmp [syslang],8 |
270 | jc @f |
270 | jc @f |
271 | mov [syslang],0 |
271 | mov [syslang],0 |
272 | @@: |
272 | @@: |
273 | jmp loadtxt |
273 | jmp loadtxt |
274 | LBA1: |
274 | LBA1: |
Line 484... | Line 484... | ||
484 | stringsAmount = 6 |
484 | stringsAmount = 6 |
Line 485... | Line 485... | ||
485 | 485 | ||
486 | align 4 |
486 | align 4 |
487 | text dd 0 |
487 | text dd 0 |
488 | langs: |
488 | langs: |
489 | db 'ENGLISH FINNISH GERMAN RUSSIAN FRENCH ' |
- | |
490 | db 'ESTONIANUKRAINE ITALIAN BELGIAN SPANISH ' |
489 | db 'ENGLISH FINNISH GERMAN RUSSIAN FRENCH ESTONIANSPANISH ITALIAN ' |
491 | langMarks: |
490 | langMarks: |
Line 492... | Line 491... | ||
492 | db 'enfiderufretukitbesp' |
491 | db 'enfiderufretspit' |
493 | 492 | ||
494 | textrus: |
493 | textrus: |
495 | db '§ëª á¨á⥬ë : < > ਬ¥¨âì' |
494 | db '§ëª á¨á⥬ë : < > ਬ¥¨âì' |