kolibrios/programs/develop/oberon07/Docs/About866.txt

406 lines
17 KiB
Plaintext
Raw Normal View History

<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><20>ணࠬ<E0AEA3><E0A0AC><EFBFBD><E0AEA2><EFBFBD><EFBFBD> Oberon-07/16 <20><><EFBFBD> i486
Windows/Linux/KolibriOS.
------------------------------------------------------------------------------
<20><><EFBFBD><E0A0AC><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>
<20>室 - ⥪<><EFBFBD><E2AEA2><><E4A0A9> <20><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0A5AD><EFBFBD> ".ob07", <20><><EFBFBD><EFBFBD><EFBFBD><E0AEA2> ANSI <20><><EFBFBD>
UTF-8 <20> BOM-ᨣ<><E1A8A3><EFBFBD><EFBFBD>ன.
<20><>室 - <20><EFBFBD><EFBFBD><EFA5AC><> <20><><EFBFBD><E0ACA0> PE32, ELF <20><><EFBFBD> MENUET01/MSCOFF.
<20><><EFBFBD><E0A0AC><EFBFBD><EFBFBD>:
1) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
2) <20><><EFBFBD><><E0A5A7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E4A0A9>
3) <20><EFBFBD><E0A8AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
"console" - Windows console
"gui" - Windows GUI
"dll" - Windows DLL
"kos" - KolibriOS
"obj" - KolibriOS DLL
"elfexe" - Linux ELF-EXEC
"elfso" - Linux ELF-SO
4) <20><><EFBFBD><EFBFBD>易⥫<EFA7A0><E2A5AB><EFBFBD><EFBFBD> <20><><EFBFBD><E0A0AC><EFBFBD><EFBFBD>-<2D><><EFBFBD><EFBFBD><EFBFBD>
-stk <size> ࠧ<><E0A0A7><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><><><EFBFBD><E7A0AD> 2 <20><>)
-base <address> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E1AFAE><EFBFBD><EFA5AC><EFBFBD><><E4A0A9> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
-ver <major.minor> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> (⮫쪮 <20><><EFBFBD> obj)
-nochk <"ptibcwra"> <20><EFBFBD><E2AAAB><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><20><><EFBFBD> <20><EFBFBD><EBAFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><>. <20><><EFBFBD><EFBFBD>)
<20><><EFBFBD><E0A0AC><EFBFBD> -nochk <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><><E1A8AC><EFBFBD><EFBFBD><EFBFBD>:
"p" - 㪠<><E3AAA0><EFBFBD>
"t" - <>
"i" - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
"b" - <20><><EFBFBD><EFA2AD> <20><EFBFBD><E0A8A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD> INTEGER <20> BYTE
"c" - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E3ACA5><EFBFBD> <20>㭪樨 CHR
"w" - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E3ACA5><EFBFBD> <20>㭪樨 WCHR
"r" - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⭮ "bcw"
"a" - <20><><EFBFBD> <20><EFBFBD>
<20><><EFBFBD><EFBFBD><><E1A8AC><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD><EFBFBD><20> <20><><EFBFBD><> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
<><E1A8AC><EFBFBD><EFBFBD> <20><EFBFBD><EFBFBD> ᮮ⢥<E1AEAE><E2A2A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E0AEA2><EFBFBD><EFBFBD>.
<20><><EFBFBD><EFBFBD><E0A8AC>: -nochk it - <20><EFBFBD><E2AAAB><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E0AEA2><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><20> <20><><EFBFBD> <>.
-nochk a - <20><EFBFBD><E2AAAB><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><EFBFBD><EFBFBD><E7A0A5><EFBFBD> <20><EFBFBD>ન.
<20><><EFBFBD><EFBFBD><E0A8AC>:
Compiler.exe "C:\example.ob07" "C:\example.exe" console -stk 1
Compiler.exe "C:\example.ob07" "C:\example.dll" dll
Compiler.exe "C:\example.ob07" "C:\example.exe" gui -stk 4
Compiler.exe "C:\example.ob07" "C:\example.exe" console -nochk pti
Compiler.kex "/tmp0/1/example.ob07" "/tmp0/1/example.kex" kos -stk 2
Compiler.kex "/tmp0/1/example.ob07" "/tmp0/1/example.obj" obj -ver 2.7
Compiler.exe "C:\example.ob07" "C:\example" elfexe
<20> <20><><EFBFBD><20>ᯥ譮<E1AFA5> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>樨, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A5A4><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E8A5AD> 0, <20><><EFBFBD><EFBFBD><EFBFBD> 1.
<EFBFBD><EFBFBD><EFBFBD><><E0A0A1><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> KolibriOS, <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E8A5AD> <20><> <20><><EFBFBD><E0A5A4><EFBFBD><EFBFBD><EFBFBD>.
------------------------------------------------------------------------------
<20><EFBFBD><E2ABA8><EFBFBD> <20><> <20><EFBFBD><E0A8A3><EFBFBD><EFBFBD><EFBFBD>
1. <20><><EFBFBD><EFBFBD><EFBFBD><20><EFBFBD><E1A5A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> SYSTEM
2. <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E4A8AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><E1AAA0><EFBFBD><EFBFBD><><E1A8AC><EFBFBD> "_"
3. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E2A5AC><EFBFBD><><E4ABA0>
4. <20><EFBFBD><E1AEA2><EFBFBD><EFBFBD><E2A2AE><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> CASE (<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><E2A0AD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A0A6><EFBFBD><EFBFBD> <20>
<20><><EFBFBD> <20><><EFBFBD><20> <20><><EFBFBD><EFBFBD>易⥫쭠<E2A5AB> <20><>⪠ ELSE)
5. <20><><EFBFBD><EFBFBD><EFBFBD><20><><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4>
6. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>/<2F><EFBFBD><> <20><><EFBFBD><EFBFBD><E7ADA5> <20><><EFBFBD> <20><EFBFBD><E3ABA5><EFBFBD><EFBFBD><><E3AAA0><EFBFBD>
7. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> DIV <20> MOD <20><><EFBFBD><EFBFBD><E7ADA5> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E2A5AB><EFBFBD><EFBFBD> <20><>
8. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ਨ (<28><><EFBFBD><E7A8AD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><><E1A8AC><EFBFBD><EFBFBD><EFBFBD> "//")
9. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E1ABA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <>-㪠<><E3AAA0><EFBFBD>
10. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᨭ⠪<E1A8AD><E2A0AA><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4> <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
11. "<22><><EFBFBD>" <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E2A0AA> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>窨: '<27><><EFBFBD>'
12. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> WCHAR
------------------------------------------------------------------------------
<20><EFBFBD><E1AEA1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E0A5A0><EFBFBD><EFBFBD>
1. <20><EFBFBD><E1ADAE><EFBFBD><EFBFBD> <>
<20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E7A5AD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD>
INTEGER -2147483648 .. 2147483647 4
REAL 4.94E-324 .. 1.70E+308 8
CHAR ᨬ<><E1A8AC><EFBFBD> ASCII (0X .. 0FFX) 1
BOOLEAN FALSE, TRUE 1
SET <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><20><><><E6A5AB> <20><>ᥫ {0 .. 31} 4
BYTE 0 .. 255 1
WCHAR ᨬ<><E1A8AC><EFBFBD><><EEADA8><EFBFBD><EFBFBD> (0X .. 0FFFFX) 2
2. <20><><EFBFBD><EFBFBD><E1A8AC><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E4A8AA><EFBFBD>஢ - 1024 ᨬ<><E1A8AC><EFBFBD><EFBFBD><EFBFBD>
3. <20><><EFBFBD><EFBFBD><E1A8AC><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0AEAA><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> - 1024 ᨬ<><E1A8AC><EFBFBD><EFBFBD><EFBFBD> (UTF-8)
4. <20><><EFBFBD><EFBFBD><E1A8AC><EFBFBD><><E0A0A7><EFBFBD><E0ADAE><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E1A8A2> - 5
5. <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> NEW <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><20><EFBFBD><EBA4A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
6. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A8A0><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>
7. <20> <20>⫨稥 <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Oberon-ॠ<><E0A5A0><EFBFBD><EFBFBD>権, ᡮ<><20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><ECADAE><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
8. <20><><EFBFBD> BYTE <20> <20><><EFBFBD><E0A0A6><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E1A5A3> <20><EFBFBD><E0A8A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> INTEGER
9. <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A5AF><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E7A5AD> <20><><EFBFBD><E0A0A6><EFBFBD><EFBFBD> <20><> <20><EFBFBD><E0AEA8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
10. <20><EFBFBD><E8A8A1> <20><EFBFBD><E0A5AC><EFBFBD> <20><EFBFBD><EBAFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>:
- ASSERT(x), <20><><EFBFBD> x = FALSE
- ࠧ묥<E0A0A7><EBACA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E3ABA5><EFBFBD><EFBFBD><><E3AAA0><EFBFBD>
- 楫<><E6A5AB><EFBFBD><EFBFBD><E1ABA5><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> 0
- <20><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><><20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD> <20> <20><EFBFBD><E3ABA5><EFBFBD> <20><><EFBFBD><EFBFBD><E7A5AD><EFBFBD>
- <20><EFBFBD><E8A8A1> <20><><EFBFBD> <>
- <20><><EFBFBD><EFBFBD><EFBFBD><E8A5AD> <20><EFBFBD><E0A0AD> <20><><EFBFBD><EFBFBD>
- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0A5AD><EFBFBD> <20><><EFBFBD><EFBFBD><E7A5AD> <20><><EFBFBD><E0A0A6><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> CASE
- <20><EFBFBD><E8A8A1> <20><><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E1A8A2> v := x, <20>᫨ LEN(v) < LEN(x)
- <20><><EFBFBD><EFA2AD> <20><EFBFBD><E0A8A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD> x:INTEGER <20> v:BYTE, <20>᫨ (x < 0) OR (x > 255)
- CHR(x), <20>᫨ (x < 0) OR (x > 255)
- WCHR(x), <20>᫨ (x < 0) OR (x > 65535)
------------------------------------------------------------------------------
<20><EFBFBD><E1A5A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> SYSTEM
<20><EFBFBD><E1A5A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> SYSTEM ᮤ<><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD>,
<EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><EFBFBD><EFBFBD><ECA7AE><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4> <20><EFBFBD><E1A5A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> SYSTEM <20><><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E0A8A2><EFBFBD><EFBFBD> <20>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E0A5AC><EFBFBD> <20><EFBFBD><EBAFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><E0A8A9><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E8A5AD> <20>ணࠬ<E0AEA3><E0A0AC>.
PROCEDURE ADR(v: <20><EFBFBD> ): INTEGER
v - <20><><EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD>;
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> v
PROCEDURE SADR(x: <20><><EFBFBD><E0AEAA><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><E2A0AD> (CHAR UTF-8)): INTEGER
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> x
PROCEDURE WSADR(x: <20><><EFBFBD><E0AEAA><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><E2A0AD> (WCHAR)): INTEGER
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> x
PROCEDURE SIZE(T): INTEGER
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E0A0A7><EFBFBD> <> T
PROCEDURE TYPEID(T): INTEGER
T - -<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> -㪠<><E3AAA0><EFBFBD>,
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <> <20><><E2A0A1><EFBFBD><EFBFBD> <><E2A8AF>-<2D><><EFBFBD><EFBFBD>
PROCEDURE INF(): REAL
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᯥ樠<E1AFA5><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E2A2A5><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E7A5AD> "<22><><EFBFBD><E1AAAE><EFBFBD><E7ADAE><EFBFBD>"
PROCEDURE GET(a: INTEGER;
VAR v: <20><EFBFBD> <20><EFBFBD><E1ADAE><EFBFBD><EFBFBD> , PROCEDURE, POINTER)
v := <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>[a]
PROCEDURE PUT(a: INTEGER; x: <20><EFBFBD> <20><EFBFBD><E1ADAE><EFBFBD><EFBFBD> , PROCEDURE, POINTER)
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>[a] := x;
<20>᫨ x: BYTE <20><><EFBFBD> x: WCHAR, <20><> <20><><EFBFBD><EFBFBD><E7A5AD> x <20><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
<20><> 32 <20><><EFBFBD>, <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><20><EFBFBD><EFBFBD><ECA7AE><EFBFBD><EFBFBD> SYSTEM.PUT8,
<20><><EFBFBD> WCHAR -- SYSTEM.PUT16
PROCEDURE PUT8(a: INTEGER; x: INTEGER, SET, BYTE, CHAR, WCHAR)
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>[a] := <20><><EFBFBD><EFBFBD>訥 8 <20><><EFBFBD> (x)
PROCEDURE PUT16(a: INTEGER; x: INTEGER, SET, BYTE, CHAR, WCHAR)
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>[a] := <20><><EFBFBD><EFBFBD>訥 16 <20><><EFBFBD> (x)
PROCEDURE MOVE(Source, Dest, n: INTEGER)
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> n <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> Source <20> Dest,
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Source <20> Dest <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EBA2A0><EFBFBD><EFBFBD>
PROCEDURE COPY(VAR Source: <20><EFBFBD> ; VAR Dest: <20><EFBFBD> ; n: INTEGER)
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> n <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> Source <20> Dest.
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
SYSTEM.MOVE(SYSTEM.ADR(Source), SYSTEM.ADR(Dest), n)
PROCEDURE CODE(byte1, byte2,... : INTEGER)
<20><><EFBFBD><E2A0A2> <20><><EFBFBD><E8A8AD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>,
byte1, byte2 ... - <20><><EFBFBD><EFBFBD><EFBFBD><E2A0AD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 0..255,
<20><><EFBFBD><EFBFBD><E0A8AC>:
SYSTEM.CODE(08BH, 045H, 008H) (* mov eax, dword [ebp + 08h] *)
<20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD>㫥 SYSTEM <20><><EFBFBD><E0A5A4><EFBFBD><EFBFBD> CARD16 (2 <20><><EFBFBD><EFBFBD><EFBFBD>). <20><><EFBFBD> <> CARD16 <20><>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><EFA2AD> <20><><EFBFBD><EFBFBD><EFBFBD>樨, <20><> <20><EFBFBD><EFBFBD><E7A5AD><EFBFBD> <20><><EFBFBD><EFBFBD><E1A2A0><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> CARD16 -> INTEGER <20> INTEGER -> CARD16 <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><><E0A5A0><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
⠪:
PROCEDURE Card16ToInt (w: SYSTEM.CARD16): INTEGER;
VAR i: INTEGER;
BEGIN
SYSTEM.PUT(SYSTEM.ADR(i), w)
RETURN i
END Card16ToInt;
PROCEDURE IntToCard16 (i: INTEGER): SYSTEM.CARD16;
VAR w: SYSTEM.CARD16;
BEGIN
SYSTEM.GET(SYSTEM.ADR(i), w)
RETURN w
END IntToCard16;
<20>㭪樨 <20><EFBFBD><E1A5A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> SYSTEM <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><EFBFBD><ECA7AE><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><E2A0AD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A0A6><EFBFBD><EFBFBD><EFBFBD>.
------------------------------------------------------------------------------
<20><><EFBFBD><EFBFBD><E2A5AC><EFBFBD><><E4ABA0>
<20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFA2AB><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD><EFBFBD><EFBFBD> <><E2A8AF> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4>, <20><><20><><EFBFBD><EFBFBD><E7A5A2><EFBFBD>
<EFBFBD><EFBFBD> PROCEDURE <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><><E3AAA0><EFBFBD><><><E1AEA3><EFBFBD><E8A5AD> <20> <20><EFBFBD><EBA7AE>: [stdcall],
[ccall], [ccall16], [windows], [linux]. <20><><EFBFBD><EFBFBD><E0A8AC>:
PROCEDURE [ccall] MyProc (x, y, z: INTEGER): INTEGER;
<20>᫨ 㪠<><E3AAA0><EFBFBD><> [ccall16], <20><> <20><EFBFBD><E0A8AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E1AEA3><EFBFBD><E8A5AD> ccall, <20><> <20><>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E3AAA0><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD> <20><><EFBFBD><E0A0A2><EFBFBD> <20><> <20><EFBFBD><E0A0AD><EFBFBD> 16 <20><><EFBFBD><EFBFBD>.
<20><><EFBFBD><EFBFBD> [windows] - ᨭ<><E1A8AD><EFBFBD><EFBFBD> <20><><EFBFBD> [stdcall], [linux] - ᨭ<><E1A8AD><EFBFBD><EFBFBD> <20><><EFBFBD> [ccall16].
<20><><EFBFBD><EFBFBD> "-" <20><><20><><EFBFBD><EFBFBD><EFBFBD><><E4ABA0> ([stdcall-], [linux-], ...) <20><><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD> (<28><> <20><><EFBFBD><EFBFBD><EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><><EFBFBD> <> REAL).
<20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFA2AB><EFBFBD><EFBFBD> <><E2A8AF>-<2D><><EFBFBD><EFBFBD>ᥩ, <20><><20><><EFBFBD><EFBFBD><E7A5A2><EFBFBD><><E1ABAE> RECORD <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><> [noalign]. <20><><EFBFBD><EFBFBD> [noalign] <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A0A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><E2A5AC><EFBFBD><><E4ABA0><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E2A8AF><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD>ᥩ.
<20><><EFBFBD> <20><EFBFBD><EFBFBD><ECA7AE><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E2A5AC><EFBFBD><><E4ABA0><EFBFBD>, <20><EFBFBD><E0A5A1><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD> SYSTEM.
------------------------------------------------------------------------------
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> CASE
<20><><EFBFBD><EFBFBD><E2A0AA><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> CASE:
CaseStatement =
CASE Expression OF <20>ase {"|" <20>ase}
[ELSE StatementSequence] END.
Case = [CaseLabelList ":" StatementSequence].
CaseLabelList = CaseLabels {"," CaseLabels}.
CaseLabels = ConstExpression [".." ConstExpression].
<20><><EFBFBD><EFBFBD><E0A8AC>:
CASE x OF
|-1: DoSomething1
| 1: DoSomething2
| 0: DoSomething3
ELSE
DoSomething4
END
<20> <20><><EFBFBD> <20><><EFBFBD><20><><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><EFBFBD><ECA7AE><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><E2A0AD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A0A6><EFBFBD><EFBFBD>, <20><>⪠ ELSE
<EFBFBD><EFBFBD><EFBFBD><EFBFBD>易⥫쭠. <20><20><><EFBFBD><EFBFBD><E7A5AD> x <20><> ᮮ⢥<E1AEAE><E2A2A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A8A0><EFBFBD> <20> ELSE
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><> <20>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD><EFBFBD><EFBFBD><EBA2A0><EFBFBD><EFBFBD> <20> <20><EFBFBD><E8A8A1><EFBFBD> <20><EFBFBD><E0A5AC><EFBFBD> <20><EFBFBD><EBAFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
------------------------------------------------------------------------------
<20><><EFBFBD> WCHAR
<20><><EFBFBD> WCHAR <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><><E3A4AE><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><EEADA8><EFBFBD><EFBFBD>. <20><><EFBFBD> <><E2A8AF> WCHAR <20>
ARRAY OF WCHAR <20><><EFBFBD><EFBFBD><EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><><EFBFBD> <20><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>樨, <20><><EFBFBD> <20><><EFBFBD> <><E2A8AF> CHAR <20>
ARRAY OF CHAR, <20><> <20><EFBFBD><EFBFBD><E7A5AD><EFBFBD> <20><><EFBFBD><EFBFBD><E0AEA5><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> CHR, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
⮫쪮 CHAR. <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><E7A5AD> <20><><EFBFBD><EFBFBD><E7A5AD> <> WCHAR, ᫥<><E1ABA5><EFBFBD><EFBFBD> <20><EFBFBD><EFBFBD><ECA7AE><EFBFBD><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> WCHR <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> CHR. <20><><EFBFBD> <20><EFBFBD><E0A0A2><EFBFBD><><E0A0A1><EFBFBD> <20> <><E2A8AF>, <20><><EFBFBD><EFBFBD><EFBFBD><E5AEA4><EFBFBD> <20><><EFBFBD><EFBFBD><E0A0AD><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><E0AEA2> UTF-8 c BOM.
------------------------------------------------------------------------------
<20><EFBFBD><20> <20><><EFBFBD> <> <20><EFBFBD><E3ABA5><EFBFBD><EFBFBD><><E3AAA0><EFBFBD>
<20><EFBFBD><E0A8A3><EFBFBD><EFBFBD><EFBFBD><><EFBFBD><E9A5AD> <20> <20><><20><> <20><><EFBFBD><E0A5A4><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> p(T) <20> <20><EFBFBD><> p IS T <20><><EFBFBD> p = NIL. <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
Oberon-ॠ<><E0A5A0><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><EBAFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E2A0AA> <20><><EFBFBD><EFBFBD><EFBFBD><20><EFBFBD><E0A8A2><EFBFBD><EFBFBD> <20> <20><EFBFBD><E8A8A1> <20><EFBFBD><E0A5AC><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E0A5A0><EFBFBD><EFBFBD><20><><EFBFBD> <> <20><EFBFBD><E3ABA5><EFBFBD><EFBFBD><><E3AAA0><EFBFBD> <20><> <20><EFBFBD><E0A8A2><EFBFBD><EFBFBD> <20>
<EFBFBD><EFBFBD><EFBFBD>, <20> <20><EFBFBD><> <20><><EFBFBD><EFBFBD><><E0A5A7><EFBFBD><EFBFBD><EFBFBD><EFBFBD> FALSE. <20> <20><20><><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⥫쭮 ᮪<><E1AEAA><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E0A8AC><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <>.
------------------------------------------------------------------------------
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E2A5AB><EFBFBD><EFBFBD> <20><EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD>
DISPOSE (VAR v: <20><EFBFBD>_㪠<5F><E3AAA0><EFBFBD>)
<20><EFBFBD><E1A2AE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><EFBFBD><EBA4A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>ன NEW <20><><EFBFBD>
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD> v^, <20> <20><><EFBFBD><EFBFBD><E1A2A0><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD> v
<20><><EFBFBD><EFBFBD><E7A5AD> NIL.
COPY (x: ARRAY OF CHAR/WCHAR; VAR v: ARRAY OF CHAR/WCHAR);
v := x;
<20>᫨ LEN(v) < LEN(x), <20><> <20><><EFBFBD> x <20><EFBFBD><><E1AAAE><EFBFBD><E0AEA2><EFBFBD>
<20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
LSR (x, n: INTEGER): INTEGER
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><><E1A4A2> x <20><> n <20><><EFBFBD> <20><><EFBFBD>.
MIN (a, b: INTEGER): INTEGER
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E7A5AD>.
MAX (a, b: INTEGER): INTEGER
<20><><EFBFBD><EFBFBD><E1A8AC> <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E7A5AD>.
BITS (x: INTEGER): SET
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> x <20><><EFBFBD> <20><><EFBFBD><EFBFBD><E7A5AD> <> SET.
<20><EFBFBD><EBAFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>樨.
LENGTH (s: ARRAY OF CHAR/WCHAR): INTEGER
<20><><EFBFBD><EFBFBD><EFBFBD> 0X-<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E8A5AD><EFBFBD> <20><><EFBFBD> s, <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><><E1A8AC><EFBFBD><EFBFBD> 0X.
<20>᫨ ᨬ<><E1A8AC><EFBFBD> 0X <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><EFBFBD><E3ADAA><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
<20><><EFBFBD><EFBFBD> s. s <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>⠭⮩.
WCHR (n: INTEGER): WCHAR
<20><EFBFBD><EFBFBD><E0A0A7><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>筮 CHR(n: INTEGER): CHAR
------------------------------------------------------------------------------
DIV <20> MOD
x y x DIV y x MOD y
5 3 1 2
-5 3 -2 1
5 -3 -2 -1
-5 -3 1 -2
------------------------------------------------------------------------------
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD>
<20><><EFBFBD><EFBFBD><E2A0AA><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>:
PROCEDURE [callconv, "library", "function"] proc_name (FormalParam): Type;
- callconv -- ᮣ<><E1AEA3><EFBFBD><E8A5AD> <20> <20><EFBFBD><EBA7AE>
- "library" -- <20><><EFBFBD><><E4A0A9> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
- "function" -- <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E3A5AC> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD>
<20><><EFBFBD><EFBFBD><E0A8AC>:
PROCEDURE [windows, "kernel32.dll", "ExitProcess"] exit (code: INTEGER);
PROCEDURE [stdcall, "Console.obj", "con_exit"] exit (bCloseWindow: BOOLEAN);
<20> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFA2AB><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD>易⥫쭮) "END proc_name;"
<20><><EFBFBD><EFBFBD><EFA2AB><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E1AFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><20><><EFBFBD><EFBFBD><EFA2AB><EFBFBD><EFBFBD> <20><><EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFA2AB><EFBFBD><EFBFBD><EFBFBD>
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>" <20><><EFBFBD><EFBFBD><E6A5A4>, <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E2ABA8><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ⮫쪮 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E2A2A8>
<> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD>. <20> <20><>⠫쭮<E2A0AB>, <20><><E2A0AA> <20><><EFBFBD><EFBFBD><20><EFBFBD><E0A8AC><EFBFBD><EFBFBD><EFBFBD> <20><> <20><> <20><EFBFBD><E0A0A2><EFBFBD>:
<20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><EBA7A2><EFBFBD>, <20><><EFBFBD><EFBFBD><E1A2AE><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>.
<20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><EFBFBD><E1A5A3> <20><><EFBFBD><EFBFBD><EFBFBD><><EFA2AD><><E3AAA0><EFBFBD><EFBFBD><EFBFBD><><E1AEA3><EFBFBD><E8A5AD> <20>
<20><EFBFBD><EBA7AE>, <20><><><E1AEA2><EFBFBD><EFBFBD><E2A8AC> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD><EFBFBD><EFBFBD> <> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFA2AB> <20><><E3AAA0><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
<><E1AEA3><EFBFBD><E8A5AD> <20> <20><EFBFBD><EBA7AE>:
VAR
ExitProcess: PROCEDURE [windows] (code: INTEGER);
con_exit: PROCEDURE [stdcall] (bCloseWindow: BOOLEAN);
<20> KolibriOS <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> ⮫쪮 <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⥪, ࠧ<><E0A0A7><EFBFBD><E9A5AD><EFBFBD>
<20> /rd/1/lib. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EBA2A0> <20>㭪樨 <20><><EFBFBD><EFBFBD><E6A8A0><EFBFBD><EFBFBD><20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
(lib_init, START) <20><><EFBFBD> <20><20><> <20><EFBFBD>.
<20><><EFBFBD> Linux, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><><><E0A5A0><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
------------------------------------------------------------------------------
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A0AC><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4>
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A0AC><EFBFBD><EFBFBD>, <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> ᯨ᪥
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A0AC>஢, <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EBA2A0><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><20><><EFBFBD> <20><EFBFBD><E0A0AD><EFBFBD><20><EFBFBD><EBA7AE><EFBFBD>.
<EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><E1ABA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>:
1. <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0ACA0><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A0AC><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>ᨢ:
PROCEDURE Proc (x: ARRAY OF ARRAY OF REAL);
<20><EFBFBD> <20>࠭᫨<E0A0AD><E1ABA8><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ⠪:
Proc(LEN(x), LEN(x[0]), SYSTEM.ADR(x))
2. <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0ACA0><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><E0A0AC><EFBFBD>-<2D><><EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD> <> RECORD:
PROCEDURE Proc (VAR x: Rec);
<20><EFBFBD> <20>࠭᫨<E0A0AD><E1ABA8><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ⠪:
Proc(SYSTEM.TYPEID(Rec), SYSTEM.ADR(x))
------------------------------------------------------------------------------
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> RTL
<20><><EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD> <20><EFBFBD><E1AFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> RTL. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>࠭᫨<E0A0AD><E1ABA8><EFBFBD><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>樨 (<28><EFBFBD><20> <20><><EFBFBD> <>, <20><EFBFBD><E0A0A2><EFBFBD><EFBFBD><EFBFBD> <20><>ப, ᮮ<><EFBFBD><E9A5AD> <20><>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E0A5AC><EFBFBD> <20><EFBFBD><EBAFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><>.) <20><><EFBFBD> <20><EFBFBD><EBA7AE> <20><><EFBFBD><EFBFBD><E6A5A4> <20><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><> <20><><EFBFBD><EFBFBD><EBA2A0> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD>, <20><> <20><EFBFBD><EFBFBD><E7A5AD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4> SetDll <20> SetFini
<EFBFBD><20><EFBFBD><E0A8AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> Windows DLL <20><><EFBFBD> Linux SO, ᮮ⢥<E1AEAE><E2A2A5><EFBFBD><E2A2A5><EFBFBD>:
PROCEDURE SetDll
(process_detach, thread_detach, thread_attach: DLL_ENTRY);
<20><><EFBFBD> TYPE DLL_ENTRY =
PROCEDURE (hinstDLL, fdwReason, lpvReserved: INTEGER);
SetDll <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> process_detach, thread_detach, thread_attach
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><20><><EFBFBD>
- <20><><EFBFBD><EFBFBD><EFBFBD> dll-<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (process_detach)
- ᮧ<><E1AEA7><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> (thread_attach)
- 㭨<><EFBFBD><E2AEA6><EFBFBD><EFBFBD> <20><><EFBFBD> (thread_detach)
PROCEDURE SetFini (ProcFini: PROC);
<20><><EFBFBD> TYPE PROC = PROCEDURE (* <20><><EFBFBD> <20><><EFBFBD><E0A0AC>஢ *)
SetFini <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> ProcFini <20><><EFBFBD><EFBFBD><EBA2A0><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> so-<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.
<EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <><E2A8AF> <20><EFBFBD><E0A8AB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4> SetDll <20> SetFini <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC>.
<20><><EFBFBD><EFBFBD><EFBFBD><E9A5AD> <20><> <20><EFBFBD><E8A8A1><EFBFBD> <20><EFBFBD><E0A5AC><EFBFBD> <20><EFBFBD><EBAFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><EBA2AE><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
(Windows), <20> <20><><EFBFBD><E0ACA8><EFBFBD> (Linux), <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E2ABA0><EFBFBD> (KolibriOS).
------------------------------------------------------------------------------
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> API
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>쪮 ॠ<><E0A5A0><EFBFBD><EFBFBD><20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> API (<28><><EFBFBD><><E0A0A7><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>).
<20><><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> RTL, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> API <20><> <20><EFBFBD><E0A5A4><EFBFBD><EFBFBD><EFBFBD><20><><EFBFBD> <20><><EFBFBD><EFACAE> <20><EFBFBD><EFBFBD><ECA7AE><EFBFBD><EFBFBD><EFBFBD>.
<EFBFBD><EFBFBD> <20><><EFBFBD>ᯥ稢<E1AFA5><E7A8A2><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> RTL <20> <20><>.
------------------------------------------------------------------------------
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E1AFAE><EFBFBD><EFA5AC><><E4A0A9><EFBFBD> DLL
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E8A0A5><EFBFBD> <20><><EFBFBD><E1AFAE><EFBFBD><EFBFBD><E0AEA2><EFBFBD> ⮫쪮 <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD>. <20><><EFBFBD> <20><EFBFBD>, <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><20>ணࠬ<E0AEA3><E0A0AC>, <20> <20><> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>⬥祭<E2ACA5><><E1A8AC><EFBFBD><EFBFBD><EFBFBD>
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ("*"). KolibriOS DLL <20><EFBFBD><E1A5A3> <20><><EFBFBD><E1AFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><E4A8AA><EFBFBD><EFBFBD><EFBFBD> "version"
(<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC>) <20> "lib_init" - <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><E6A8A0><EFBFBD><EFBFBD>樨 DLL:
PROCEDURE [stdcall] lib_init (): INTEGER
<EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><EFBFBD><EBA7A2><EFBFBD> <20><><20><EFBFBD><EFBFBD><ECA7AE><EFBFBD><EFBFBD><EFBFBD><EFBFBD> DLL.
<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><E1A5A3> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 1.