New page wikitext, after the edit (new_wikitext) | ''''DIASYS''' ''EST EN LOG FUR DE LA COMP I DE LA CYC LOG ENT DEN DIALECTIO U DE: N, N0, N1, N2, N3 {--->...} DASO MERT ENT`EN !(!KENT) FUR DEN COMP DE LA `COMP, ESST AT DASEI.''
ESTER DASEIT:
EST:
I. CRT[N] - DE LA FORT {0 ... N} FRECHT S`NTEN.
II. MOV<N> - DE LA DIA <--->> E { [`N][N] <---- }
III. DIA<N> - { [`N][N] & ([`N][N] * OPER)) }
IV. MEM - KIER DIAL FORT (<`S>)
EST-LOG:
V. +P<N> - (--->)(<N>)
VI. -P<N> - (<--->(<N>)
VII. CIN - (`S--->[`N][N])
VIII. ASST - CYC(0, N) -> STR -> [``N]
IX. TCH - EST_CYC(N, N) -> CH -> [``N]
X. POS_MAX - (--->)(EST_CYC(... --->, N))
XI. POS_MIN - (<---)(EST_CYC(```N, <--- ...))
(LOG)(V, VI): SET - ([`N][`N(POSST_DEF)] E (``N))
XII. JMP (->>>)([`N][N(DEF)])
SYST:
XIII. MUL - (<*>, ([`N][N(SYST_DEF)], MUL_FACT))
XIV. DEC - (<->, ([`N][N(SYST_DEF)], DEC_FACT))
XV. ADD - (<+>, ([`N][N(SYST_DEF)], ADD_FACT))
XVI. DIV - (</>, ([`N][N(SYST_DEF)], DIV_FACT))
XVII. NUL - ([`N][N(POSST<+>|<->...)], ->0)
XVIII. SQRT - (<~LOG>, [`N][N(POSST_DEF)])
XIX. POW - CYC(0, POW_FACT)(<*>, [`N][N(SYST_DEF)])
XX. RND - <?>(0, <0... !N>N)
XXI. ST: - TRANSP(CYC(0, ST(LEN)), (ST_C -> [`N][N(POSST_SYST_DEF)])
XXII. PST - PRIM_LOG((0)[`N], (N)[`N])
XXIII. BITS - DELOG_(2)([`N][N(POSST_DEF)])
DE FORM_LOG:
XXIV - XOR, XXV - OR, XXVI - AND, XXVII - INV.
COMP LA PRAG:
'''HELLO WORLD:'''
>> CRT11 ST:HELLO_WORLD SET5 NUL ASST
<< DIA_SYM EST: HELLO WORLD
[0] EST 72
[1] EST 69
[2] EST 76
[3] EST 76
[4] EST 79
[5] EST 0
[6] EST 87
[7] EST 79
[8] EST 82
[9] EST 76
[10] EST 68
POS EST 5
'''AST: '''
>> CRT4 CIN RND20 +P CIN RND20 +P CIN RND20 +P CIN RND20 ASST
>> ?E(DIA[0]) ... 70
>> ?E(DIA[1]) ... 74
>> ?E(DIA[2]) ... 77
>> ?E(DIA[3]) ... 75
<< DIA_SYM EST: SW`Z
[0] EST 83
[1] EST 87
[2] EST 96
[3] EST 90
POS EST 3' |
Unified diff of changes made by edit (edit_diff) | '@@ -1,0 +1,71 @@
+'''DIASYS''' ''EST EN LOG FUR DE LA COMP I DE LA CYC LOG ENT DEN DIALECTIO U DE: N, N0, N1, N2, N3 {--->...} DASO MERT ENT`EN !(!KENT) FUR DEN COMP DE LA `COMP, ESST AT DASEI.''
+ESTER DASEIT:
+
+EST:
+I. CRT[N] - DE LA FORT {0 ... N} FRECHT S`NTEN.
+II. MOV<N> - DE LA DIA <--->> E { [`N][N] <---- }
+III. DIA<N> - { [`N][N] & ([`N][N] * OPER)) }
+IV. MEM - KIER DIAL FORT (<`S>)
+
+EST-LOG:
+V. +P<N> - (--->)(<N>)
+VI. -P<N> - (<--->(<N>)
+VII. CIN - (`S--->[`N][N])
+VIII. ASST - CYC(0, N) -> STR -> [``N]
+IX. TCH - EST_CYC(N, N) -> CH -> [``N]
+X. POS_MAX - (--->)(EST_CYC(... --->, N))
+XI. POS_MIN - (<---)(EST_CYC(```N, <--- ...))
+(LOG)(V, VI): SET - ([`N][`N(POSST_DEF)] E (``N))
+XII. JMP (->>>)([`N][N(DEF)])
+
+SYST:
+XIII. MUL - (<*>, ([`N][N(SYST_DEF)], MUL_FACT))
+XIV. DEC - (<->, ([`N][N(SYST_DEF)], DEC_FACT))
+XV. ADD - (<+>, ([`N][N(SYST_DEF)], ADD_FACT))
+XVI. DIV - (</>, ([`N][N(SYST_DEF)], DIV_FACT))
+XVII. NUL - ([`N][N(POSST<+>|<->...)], ->0)
+XVIII. SQRT - (<~LOG>, [`N][N(POSST_DEF)])
+XIX. POW - CYC(0, POW_FACT)(<*>, [`N][N(SYST_DEF)])
+XX. RND - <?>(0, <0... !N>N)
+XXI. ST: - TRANSP(CYC(0, ST(LEN)), (ST_C -> [`N][N(POSST_SYST_DEF)])
+XXII. PST - PRIM_LOG((0)[`N], (N)[`N])
+XXIII. BITS - DELOG_(2)([`N][N(POSST_DEF)])
+
+DE FORM_LOG:
+XXIV - XOR, XXV - OR, XXVI - AND, XXVII - INV.
+
+COMP LA PRAG:
+
+'''HELLO WORLD:'''
+>> CRT11 ST:HELLO_WORLD SET5 NUL ASST
+<< DIA_SYM EST: HELLO WORLD
+ [0] EST 72
+ [1] EST 69
+ [2] EST 76
+ [3] EST 76
+ [4] EST 79
+ [5] EST 0
+ [6] EST 87
+ [7] EST 79
+ [8] EST 82
+ [9] EST 76
+ [10] EST 68
+POS EST 5
+
+
+'''AST: '''
+>> CRT4 CIN RND20 +P CIN RND20 +P CIN RND20 +P CIN RND20 ASST
+
+>> ?E(DIA[0]) ... 70
+
+>> ?E(DIA[1]) ... 74
+
+>> ?E(DIA[2]) ... 77
+
+>> ?E(DIA[3]) ... 75
+<< DIA_SYM EST: SW`Z
+ [0] EST 83
+ [1] EST 87
+ [2] EST 96
+ [3] EST 90
+POS EST 3
' |
Lines added in edit (added_lines) | [
0 => ''''DIASYS''' ''EST EN LOG FUR DE LA COMP I DE LA CYC LOG ENT DEN DIALECTIO U DE: N, N0, N1, N2, N3 {--->...} DASO MERT ENT`EN !(!KENT) FUR DEN COMP DE LA `COMP, ESST AT DASEI.''',
1 => 'ESTER DASEIT:',
2 => '',
3 => 'EST:',
4 => 'I. CRT[N] - DE LA FORT {0 ... N} FRECHT S`NTEN.',
5 => 'II. MOV<N> - DE LA DIA <--->> E { [`N][N] <---- }',
6 => 'III. DIA<N> - { [`N][N] & ([`N][N] * OPER)) }',
7 => 'IV. MEM - KIER DIAL FORT (<`S>)',
8 => '',
9 => 'EST-LOG:',
10 => 'V. +P<N> - (--->)(<N>)',
11 => 'VI. -P<N> - (<--->(<N>)',
12 => 'VII. CIN - (`S--->[`N][N])',
13 => 'VIII. ASST - CYC(0, N) -> STR -> [``N]',
14 => 'IX. TCH - EST_CYC(N, N) -> CH -> [``N]',
15 => 'X. POS_MAX - (--->)(EST_CYC(... --->, N))',
16 => 'XI. POS_MIN - (<---)(EST_CYC(```N, <--- ...))',
17 => '(LOG)(V, VI): SET - ([`N][`N(POSST_DEF)] E (``N))',
18 => 'XII. JMP (->>>)([`N][N(DEF)])',
19 => '',
20 => 'SYST: ',
21 => 'XIII. MUL - (<*>, ([`N][N(SYST_DEF)], MUL_FACT))',
22 => 'XIV. DEC - (<->, ([`N][N(SYST_DEF)], DEC_FACT))',
23 => 'XV. ADD - (<+>, ([`N][N(SYST_DEF)], ADD_FACT))',
24 => 'XVI. DIV - (</>, ([`N][N(SYST_DEF)], DIV_FACT))',
25 => 'XVII. NUL - ([`N][N(POSST<+>|<->...)], ->0)',
26 => 'XVIII. SQRT - (<~LOG>, [`N][N(POSST_DEF)])',
27 => 'XIX. POW - CYC(0, POW_FACT)(<*>, [`N][N(SYST_DEF)])',
28 => 'XX. RND - <?>(0, <0... !N>N)',
29 => 'XXI. ST: - TRANSP(CYC(0, ST(LEN)), (ST_C -> [`N][N(POSST_SYST_DEF)])',
30 => 'XXII. PST - PRIM_LOG((0)[`N], (N)[`N])',
31 => 'XXIII. BITS - DELOG_(2)([`N][N(POSST_DEF)])',
32 => '',
33 => 'DE FORM_LOG:',
34 => 'XXIV - XOR, XXV - OR, XXVI - AND, XXVII - INV.',
35 => '',
36 => 'COMP LA PRAG:',
37 => '',
38 => ''''HELLO WORLD:'''',
39 => '>> CRT11 ST:HELLO_WORLD SET5 NUL ASST',
40 => '<< DIA_SYM EST: HELLO WORLD',
41 => ' [0] EST 72',
42 => ' [1] EST 69',
43 => ' [2] EST 76',
44 => ' [3] EST 76',
45 => ' [4] EST 79',
46 => ' [5] EST 0',
47 => ' [6] EST 87',
48 => ' [7] EST 79',
49 => ' [8] EST 82',
50 => ' [9] EST 76',
51 => ' [10] EST 68',
52 => 'POS EST 5',
53 => '',
54 => '',
55 => ''''AST: '''',
56 => '>> CRT4 CIN RND20 +P CIN RND20 +P CIN RND20 +P CIN RND20 ASST',
57 => '',
58 => '>> ?E(DIA[0]) ... 70',
59 => '',
60 => '>> ?E(DIA[1]) ... 74',
61 => '',
62 => '>> ?E(DIA[2]) ... 77',
63 => '',
64 => '>> ?E(DIA[3]) ... 75',
65 => '<< DIA_SYM EST: SW`Z',
66 => ' [0] EST 83',
67 => ' [1] EST 87',
68 => ' [2] EST 96',
69 => ' [3] EST 90',
70 => 'POS EST 3'
] |