Mercurial > public > mk2
annotate code_part1/OSTC_code_asm_part1/multilang_text.asm @ 824:6cb5518e74d2
NEW: Quit Simulator automatically when starting a real dive
author | heinrichsweikamp |
---|---|
date | Wed, 29 Jul 2015 19:22:50 +0200 |
parents | 2a0e5d884fc3 |
children |
rev | line source |
---|---|
174 | 1 |
815 | 2 ; OSTC Mk.2, 2N and 2C - diving computer code |
807
c50296c3059e
BUGFIX: Divetime had unwanted "." behind the minutes
heinrichsweikamp
parents:
604
diff
changeset
|
3 ; Copyright (C) 2015 HeinrichsWeikamp GbR |
174 | 4 |
5 ; This program is free software: you can redistribute it and/or modify | |
6 ; it under the terms of the GNU General Public License as published by | |
7 ; the Free Software Foundation, either version 3 of the License, or | |
8 ; (at your option) any later version. | |
9 | |
10 ; This program is distributed in the hope that it will be useful, | |
11 ; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
13 ; GNU General Public License for more details. | |
14 | |
15 ; You should have received a copy of the GNU General Public License | |
16 ; along with this program. If not, see <http://www.gnu.org/licenses/>. | |
17 | |
18 | |
19 ; hold texts and parameters for the texts | |
20 ; written by: Matthias Heinrichs, info@heinrichsweikamp.com | |
21 ; History: | |
22 ; 2007/10/13: written | |
23 ; 2008/05/24: Last update Matthias | |
24 ; 2011/02/02: moving texts to english_text.asm to prepare multilingual. | |
25 ; known bugs: | |
26 ; ToDo: | |
27 | |
187 | 28 texts code_pack 0x15000 |
174 | 29 |
30 TCODE_1 macro x, y, text | |
31 ; Compile-time checking on provided parameters: | |
32 If x<0 || x>.159 | |
33 Error "Bad X coordinate ", #v(tcode_idx), x | |
34 Endif | |
35 If y<0 || y>.239 | |
36 Error "Bad Y coordinate ", y | |
37 Endif | |
38 dw tcode_ptr_#v(tcode_idx) | |
39 db 0+x, 0+y | |
40 tcode_idx set tcode_idx+1 | |
41 endm | |
42 | |
43 TCODE_2 macro x, y, text | |
44 tcode_ptr_#v(tcode_idx): | |
45 db text, 0 | |
46 tcode_idx set tcode_idx+1 | |
47 endm | |
48 | |
49 ;---- Manage language ------------------------------------------------------- | |
50 ; Compile with ASM macro definition GERMAN=1 to use another | |
51 ; file... | |
604 | 52 #ifdef ITALIAN |
53 #define LANGUAGE_FILE "italian_text.asm" | |
54 #endif | |
182 | 55 #ifdef SPANISH |
56 #define LANGUAGE_FILE "spanish_text.asm" | |
57 #endif | |
174 | 58 #ifdef GERMAN |
59 #define LANGUAGE_FILE "german_text.asm" | |
60 #endif | |
61 #ifdef FRENCH | |
62 #define LANGUAGE_FILE "french_text.asm" | |
63 #endif | |
424 | 64 #ifdef RUSSIAN |
65 #define LANGUAGE_FILE "russian_text.asm" | |
66 #endif | |
495 | 67 #ifdef TURKISH |
68 #define LANGUAGE_FILE "turkish_text.asm" | |
69 #endif | |
174 | 70 #ifndef LANGUAGE_FILE |
71 #define LANGUAGE_FILE "english_text.asm" | |
72 #endif | |
73 | |
74 ;---- PASS 1 : generate description block ------------------------------------ | |
75 text_pointer: | |
76 | |
77 tcode_idx set 1 | |
78 #define TCODE TCODE_1 | |
79 #include LANGUAGE_FILE | |
80 #undefine TCODE | |
81 | |
82 ;---- PASS 2 : generate text contens ----------------------------------------- | |
83 tcode_idx set 1 | |
84 #define TCODE TCODE_2 | |
85 #include LANGUAGE_FILE | |
86 #undefine TCODE | |
87 | |
88 code | |
89 |