Mercurial > public > hwos_code

annotate src/text_multilang.inc @ 652:9319f90d67d9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
add tools/o3pack.bat and the required tools/libs
author heinrichsweikamp
date Fri, 11 Aug 2023 14:47:25 +0200
parents 4050675965ea
children 75e90cd0c2c3
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
heinrichsweikamp
parents:
diff changeset
1 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
2 ;
634
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
3 ; File text_multilang.inc * combined next generation V3.09.4j
0
heinrichsweikamp
parents:
diff changeset
4 ;
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
5 ; Implementation of texts in various selectable languages
0
heinrichsweikamp
parents:
diff changeset
6 ;
heinrichsweikamp
parents:
diff changeset
7 ; Copyright (c) 2011, JD Gascuel, HeinrichsWeikamp, all right reserved.
heinrichsweikamp
parents:
diff changeset
8 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
9 ; HISTORY
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
10 ; 2011-06-12 : [jDG] Creation
0
heinrichsweikamp
parents:
diff changeset
11 ;
heinrichsweikamp
parents:
diff changeset
12 ; Text definitions (text_french.asm example):
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
13 ; TCODE tYes, "Oui" ; Yes
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
14 ; TCODE tNo, "Non" ; No
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
15 ; TCODE tLogbk, "Carnet de plongées" ; Logbook
0
heinrichsweikamp
parents:
diff changeset
16 ;
634
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
17 ; Text usage via is done via macros, see strings.inc
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
18
0
heinrichsweikamp
parents:
diff changeset
19
634
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
20 ;-----------------------------------------------------------------------------
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
21 ; Pass 1: generate Index Table and define Labels
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
22 ;-----------------------------------------------------------------------------
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
23
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
24 TCODE_1 macro label, text
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
25 tcode_idx set tcode_idx+1
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
26 If LANG == 0
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
27 global label
0
heinrichsweikamp
parents:
diff changeset
28 label:
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
29 Endif
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
30 dw t#v(LANG)_#v(tcode_idx)
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
31 endm
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
32
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
33
634
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
34 ;-----------------------------------------------------------------------------
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
35 ; Pass 2: generate String Table
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
36 ;-----------------------------------------------------------------------------
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
37
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
38 TCODE_2 macro label, text
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
39 tcode_idx set tcode_idx+1
0
heinrichsweikamp
parents:
diff changeset
40 t#v(LANG)_#v(tcode_idx):
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
41 db text, 0
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 0
diff changeset
42 endm
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
43
634
4050675965ea 3.10 stable release
heinrichsweikamp
parents: 623
diff changeset
44 ;-----------------------------------------------------------------------------