Merge remote-tracking branch 'origin/6.1'
[scilab.git] / scilab / modules / localization / tests / unit_tests / unicode_io.win.dia.ref
1 // ============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2008 - Yung-Jang Lee <yjlee123@gmail.com>
4 // Copyright (C) 2008 - INRIA - Sylvestre LEDRU <sylvestre.ledru@inria.fr>
5 //
6 //  This file is distributed under the same license as the Scilab package.
7 // ============================================================================
8 lines(0);
9 // zh_TW / Cyrillic / amharique / Japanese / Chinese / Thai / Corean
10 text=[ "中文測試", "азеазеясдвклгхклмвцмзер" ..
11  "ድቅስድቅስግጅክልውሽችክልዝ" ..
12 "すべての人間は、生まれながらにして自由であり、かつ、尊厳と権利と について平等である。人間は、理性と良心とを授けられており、互いに同 胞の精神をもって行動しなければならない。" ..
13 "人 人 生 而 自 由, 在 尊 严 和 权 利 上 一 律 平 等。 他 们 赋 有 理 性 和 良 心, 并 应 以 兄 弟 关 系 的 精 神 相 对 待。" ..
14 "ราทุกคนเกิดมาอย่างอิสระ เราทุกคนมีความคิดและความเข้าใจเป็นของเราเอง เราทุกคนควรได้รับการปฏิบัติในทางเดียวกัน." ..
15 "모든 인간은 태어날 때부터 자유로우며 그 존엄과 권리에 있어 동등하다. 인간은 천부적으로 이성과 양심을 부여받았으며 서로 형제애의 정신으로 행동하여야 한다." ..
16 "لد جميع الناس أحرارًا متساوين في الكرامة والحقوق. وقد وهبوا عقلاً وضميرًا وعليهم أن يعامل بعضهم بعضًا بروح الإخاء"..
17 "כל בני האדם נולדו בני חורין ושווים בערכם ובזכיותיהם. כולם חוננו בתבונה ובמצפון, לפיכך חובה עליהם לנהג איש ברעהו ברוח של אחוה"
18 ];
19 for i=1:size(text,"*") 
20 if msprintf(text(i)) <> text(i) then bugmes();quit;end
21 //  Fortran-Style output<------- no yet fixed in this patch
22 //u=file('open','resultsA','unknown') //<--------Test 2 file encoding for Fortran Style output
23 //write(u,text(i),'(a)') // encoding wrong, not in system locale
24 //file('close',u)
25 // C style output
26 myFile="resultsA";
27 u=mopen(TMPDIR+"/"+myFile,'w');
28 mfprintf(u,text(i)+" plus %s",text(i));
29 mclose(u); 
30 if mgetl(TMPDIR+"/"+myFile,1) <> text(i) + " plus "+text(i) then bugmes();quit;end
31 myStr=" with another %s";
32 myStr2=" with another ";
33 if msprintf(text(i)+myStr,text(i)) <> text(i)+myStr2+text(i) then bugmes();quit;end
34 // Classic display
35 disp(text(i));
36 end
37   "中文測試"
38   "азеазеясдвклгхклмвцмзер"
39   "ድቅስድቅስግጅክልውሽችክልዝ"
40   "すべての人間は、生まれながらにして自由であり、かつ、尊厳と権利と について平等である。人間は、理性と良心とを授けられており、互いに同 胞の精神をもって行動しなければならない。"
41   "人 人 生 而 自 由, 在 尊 严 和 权 利 上 一 律 平 等。 他 们 赋 有 理 性 和 良 心, 并 应 以 兄 弟 关 系 的 精 神 相 对 待。"
42   "ราทุกคนเกิดมาอย่างอิสระ เราทุกคนมีความคิดและความเข้าใจเป็นของเราเอง เราทุกคนควรได้รับการปฏิบัติในทางเดียวกัน."
43   "모든 인간은 태어날 때부터 자유로우며 그 존엄과 권리에 있어 동등하다. 인간은 천부적으로 이성과 양심을 부여받았으며 서로 형제애의 정신으로 행동하여야 한다."
44   "لد جميع الناس أحرارًا متساوين في الكرامة والحقوق. وقد وهبوا عقلاً وضميرًا وعليهم أن يعامل بعضهم بعضًا بروح الإخاء"
45   "כל בני האדם נולדו בני חורין ושווים בערכם ובזכיותיהם. כולם חוננו בתבונה ובמצפון, לפיכך חובה עליהם לנהג איש ברעהו ברוח של אחוה"
46 //title('title test'+text); t=0:0.1:2*%pi; //<------Test 7  text drawing test
47 //plot2d(t,[sin(t'),cos(t')],[-1,2]); 
48 //legends(['legends test'+text ;'text B '+text],[-1,2], opt=3 );
49 // ScilabVersion/OS/LANG/CONSOLE = EncodingPatch/WindowsXp/zh_TW.CP950/Dos Console
50 //about();                         //<------Test 8  Scilab gettext Test