Linux localhost.localdomain 3.10.0-1160.80.1.el7.x86_64 #1 SMP Tue Nov 8 15:48:59 UTC 2022 x86_64
Apache
: 10.29.51.72 | : 216.73.216.153
Cant Read [ /etc/named.conf ]
7.2.34
apache
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
share /
m17n /
[ HOME SHELL ]
Name
Size
Permission
Action
icons
[ DIR ]
drwxr-xr-x
scripts
[ DIR ]
drwxr-xr-x
ARAB-OTF-NO-GPOS.flt
6.18
KB
-rw-r--r--
ARAB-OTF.flt
4.79
KB
-rw-r--r--
ARAB.flt
11.06
KB
-rw-r--r--
BENG-OTF.flt
7.32
KB
-rw-r--r--
BNG2-OTF.flt
6.71
KB
-rw-r--r--
CHAM-GENERIC.flt
2.15
KB
-rw-r--r--
CHARSET.tbl
14.23
KB
-rw-r--r--
CODING.tbl
3.91
KB
-rw-r--r--
COMBINING.flt
2.03
KB
-rw-r--r--
DEV2-OTF.flt
6.73
KB
-rw-r--r--
DEVA-CDAC.flt
11.49
KB
-rw-r--r--
DEVA-OTF.flt
6.88
KB
-rw-r--r--
FONTENC.tbl
2.97
KB
-rw-r--r--
FONTSIZE.tbl
1.41
KB
-rw-r--r--
GJR2-OTF.flt
5.1
KB
-rw-r--r--
GUJR-OTF.flt
5.55
KB
-rw-r--r--
GUR2-OTF.flt
4.02
KB
-rw-r--r--
GURU-OTF.flt
5.33
KB
-rw-r--r--
HEBR-FF.flt
2.86
KB
-rw-r--r--
HEBR-OTF.flt
2.11
KB
-rw-r--r--
HEBR.flt
2.74
KB
-rw-r--r--
KHMR-ANLONG.flt
6.87
KB
-rw-r--r--
KHMR-OTF.flt
5.33
KB
-rw-r--r--
KND2-OTF.flt
5.68
KB
-rw-r--r--
KNDA-OTF.flt
5.84
KB
-rw-r--r--
LANGUAGE.tbl
17.38
KB
-rw-r--r--
LAOO-ALICE.flt
4.8
KB
-rw-r--r--
LAOO-GENERIC.flt
2.28
KB
-rw-r--r--
LAOO-MULE.flt
3.24
KB
-rw-r--r--
LAOO-OTF.flt
1.99
KB
-rw-r--r--
MLM2-OTF.flt
5.95
KB
-rw-r--r--
MLYM-CDAC.flt
6.35
KB
-rw-r--r--
MLYM-OTF.flt
6.11
KB
-rw-r--r--
MLYM-RACHANA.flt
3.73
KB
-rw-r--r--
MYMR-MYAZEDI.flt
8.97
KB
-rw-r--r--
MYMR-SIL.flt
4.71
KB
-rw-r--r--
NO-CTL.flt
1.47
KB
-rw-r--r--
ORY2-OTF.flt
6.04
KB
-rw-r--r--
ORYA-OTF.flt
6.61
KB
-rw-r--r--
SCRIPT-LANGUAGE.tbl
2.23
KB
-rw-r--r--
SCRIPT-OTF.tbl
1.72
KB
-rw-r--r--
SCRIPT.tbl
5.69
KB
-rw-r--r--
SINH-OTF.flt
2.91
KB
-rw-r--r--
SYRC-OTF.flt
3.32
KB
-rw-r--r--
TAML-CDAC.flt
8.13
KB
-rw-r--r--
TAML-OTF.flt
3.89
KB
-rw-r--r--
TEL2-OTF.flt
3.77
KB
-rw-r--r--
TELU-OTF.flt
4.59
KB
-rw-r--r--
THAA-OTF.flt
1.59
KB
-rw-r--r--
THAI-GENERIC.flt
2.25
KB
-rw-r--r--
THAI-NORASI.flt
2.98
KB
-rw-r--r--
THAI-OTF.flt
2.55
KB
-rw-r--r--
THAI-TIS620.flt
2
KB
-rw-r--r--
TIBT-MTIB.flt
7.18
KB
-rw-r--r--
TIBT-MULE.flt
7.38
KB
-rw-r--r--
TIBT-OTF.flt
3.28
KB
-rw-r--r--
TML2-OTF.flt
3.81
KB
-rw-r--r--
am-sera.mim
10.91
KB
-rw-r--r--
ar-kbd.mim
2.46
KB
-rw-r--r--
as-inscript.mim
5.07
KB
-rw-r--r--
as-inscript2.mim
5.17
KB
-rw-r--r--
as-itrans.mim
4.36
KB
-rw-r--r--
as-phonetic.mim
4.31
KB
-rw-r--r--
ath-phonetic.mim
6.37
KB
-rw-r--r--
be-kbd.mim
2.31
KB
-rw-r--r--
bla-phonetic.mim
7.83
KB
-rw-r--r--
bn-inscript.mim
3.16
KB
-rw-r--r--
bn-inscript2.mim
3.34
KB
-rw-r--r--
bn-itrans.mim
5.1
KB
-rw-r--r--
bn-probhat.mim
2.99
KB
-rw-r--r--
bo-ewts.mim
7.9
KB
-rw-r--r--
bo-tcrc.mim
4.72
KB
-rw-r--r--
bo-wylie.mim
6.34
KB
-rw-r--r--
brx-inscript2-deva.mim
2.98
KB
-rw-r--r--
cjk-util.mim
3.05
KB
-rw-r--r--
cmc-kbd.mim
4.74
KB
-rw-r--r--
cr-western.mim
4.85
KB
-rw-r--r--
cs-kbd.mim
4.01
KB
-rw-r--r--
da-post.mim
1.38
KB
-rw-r--r--
doi-inscript2-deva.mim
3.02
KB
-rw-r--r--
dv-phonetic.mim
2.11
KB
-rw-r--r--
el-kbd.mim
2.85
KB
-rw-r--r--
eo-h-f.mim
1.68
KB
-rw-r--r--
eo-h.mim
1.57
KB
-rw-r--r--
eo-plena.mim
2.15
KB
-rw-r--r--
eo-q.mim
1.57
KB
-rw-r--r--
eo-vi.mim
1.82
KB
-rw-r--r--
eo-x.mim
1.59
KB
-rw-r--r--
fa-isiri.mim
2.79
KB
-rw-r--r--
fr-azerty.mim
3.96
KB
-rw-r--r--
global.mim
4.98
KB
-rw-r--r--
grc-mizuochi.mim
13.85
KB
-rw-r--r--
gu-inscript.mim
3.48
KB
-rw-r--r--
gu-inscript2.mim
3.66
KB
-rw-r--r--
gu-itrans.mim
4.97
KB
-rw-r--r--
gu-phonetic.mim
3.11
KB
-rw-r--r--
he-kbd.mim
2.34
KB
-rw-r--r--
hi-inscript.mim
3.41
KB
-rw-r--r--
hi-inscript2.mim
3.71
KB
-rw-r--r--
hi-itrans.mim
6.32
KB
-rw-r--r--
hi-phonetic.mim
3.2
KB
-rw-r--r--
hi-remington.mim
3.91
KB
-rw-r--r--
hi-typewriter.mim
3.21
KB
-rw-r--r--
hi-vedmata.mim
10.26
KB
-rw-r--r--
hr-kbd.mim
2.32
KB
-rw-r--r--
hy-kbd.mim
3.01
KB
-rw-r--r--
ii-phonetic.mim
20.49
KB
-rw-r--r--
iu-phonetic.mim
4.96
KB
-rw-r--r--
ka-kbd.mim
2.1
KB
-rw-r--r--
kk-arabic.mim
2.03
KB
-rw-r--r--
kk-kbd.mim
2.77
KB
-rw-r--r--
km-yannis.mim
2.94
KB
-rw-r--r--
kn-inscript.mim
3.55
KB
-rw-r--r--
kn-inscript2.mim
3.85
KB
-rw-r--r--
kn-itrans.mim
7.09
KB
-rw-r--r--
kn-kgp.mim
3.41
KB
-rw-r--r--
kn-typewriter.mim
19.64
KB
-rw-r--r--
ko-han2.mim
12.69
KB
-rw-r--r--
ko-romaja.mim
9.84
KB
-rw-r--r--
kok-inscript2-deva.mim
2.99
KB
-rw-r--r--
ks-inscript.mim
3.71
KB
-rw-r--r--
ks-kbd.mim
2.67
KB
-rw-r--r--
latn-post.mim
9.19
KB
-rw-r--r--
latn-pre.mim
5.71
KB
-rw-r--r--
latn1-pre.mim
4.07
KB
-rwxr-xr-x
lo-kbd.mim
3.24
KB
-rw-r--r--
lo-lrt.mim
5.84
KB
-rw-r--r--
mai-inscript.mim
3.42
KB
-rw-r--r--
mai-inscript2.mim
3.02
KB
-rw-r--r--
mdb.dir
4.58
KB
-rw-r--r--
ml-inscript.mim
6.55
KB
-rw-r--r--
ml-inscript2.mim
5.92
KB
-rw-r--r--
ml-itrans.mim
5.51
KB
-rw-r--r--
ml-mozhi.mim
5.28
KB
-rw-r--r--
ml-swanalekha.mim
48.19
KB
-rw-r--r--
mni-inscript2-beng.mim
3.1
KB
-rw-r--r--
mni-inscript2-mtei.mim
2.46
KB
-rw-r--r--
mr-inscript.mim
3.64
KB
-rw-r--r--
mr-inscript2.mim
3.66
KB
-rw-r--r--
mr-itrans.mim
6.08
KB
-rw-r--r--
mr-phonetic.mim
3.16
KB
-rw-r--r--
my-kbd.mim
2.96
KB
-rw-r--r--
ne-inscript2-deva.mim
2.98
KB
-rw-r--r--
ne-rom.mim
2.31
KB
-rw-r--r--
ne-trad.mim
2.47
KB
-rw-r--r--
nsk-phonetic.mim
2.85
KB
-rw-r--r--
oj-phonetic.mim
5.28
KB
-rw-r--r--
or-inscript.mim
3.23
KB
-rw-r--r--
or-inscript2.mim
3.42
KB
-rw-r--r--
or-itrans.mim
4.35
KB
-rw-r--r--
or-phonetic.mim
3.2
KB
-rw-r--r--
pa-inscript.mim
3.01
KB
-rw-r--r--
pa-inscript2-guru.mim
3.35
KB
-rw-r--r--
pa-itrans.mim
4.63
KB
-rw-r--r--
pa-jhelum.mim
3.25
KB
-rw-r--r--
pa-phonetic.mim
2.55
KB
-rw-r--r--
ps-phonetic.mim
2.37
KB
-rw-r--r--
rfc1345.mim
31.46
KB
-rw-r--r--
ru-kbd.mim
2.54
KB
-rw-r--r--
ru-phonetic.mim
2.98
KB
-rw-r--r--
ru-translit.mim
4.02
KB
-rw-r--r--
ru-yawerty.mim
3.78
KB
-rw-r--r--
sa-harvard-kyoto.mim
3.5
KB
-rw-r--r--
sa-iast.mim
1.81
KB
-rw-r--r--
sa-inscript2.mim
2.96
KB
-rw-r--r--
sat-inscript2-deva.mim
2.83
KB
-rw-r--r--
sat-inscript2-olck.mim
1.97
KB
-rw-r--r--
sd-inscript.mim
3.37
KB
-rw-r--r--
sd-inscript2-deva.mim
3.57
KB
-rw-r--r--
si-phonetic-dynamic.mim
7.61
KB
-rw-r--r--
si-samanala.mim
3.34
KB
-rw-r--r--
si-singlish.mim
6.21
KB
-rw-r--r--
si-sumihiri.mim
6.33
KB
-rw-r--r--
si-trans.mim
6.42
KB
-rw-r--r--
si-wijesekera.mim
17.21
KB
-rw-r--r--
sk-kbd.mim
4.04
KB
-rw-r--r--
sr-kbd.mim
2.85
KB
-rw-r--r--
sv-post.mim
1.38
KB
-rw-r--r--
syrc-phonetic.mim
2.73
KB
-rw-r--r--
ta-inscript.mim
2.34
KB
-rw-r--r--
ta-inscript2.mim
2.52
KB
-rw-r--r--
ta-itrans.mim
4.56
KB
-rw-r--r--
ta-lk-renganathan.mim
13.86
KB
-rw-r--r--
ta-phonetic.mim
9.55
KB
-rw-r--r--
ta-tamil99.mim
18.66
KB
-rw-r--r--
ta-typewriter.mim
9.54
KB
-rw-r--r--
ta-vutam.mim
5.07
KB
-rw-r--r--
tai-sonla.mim
4.78
KB
-rw-r--r--
te-apple.mim
4.93
KB
-rw-r--r--
te-inscript.mim
3.4
KB
-rw-r--r--
te-inscript2.mim
3.79
KB
-rw-r--r--
te-itrans.mim
4.96
KB
-rw-r--r--
te-pothana.mim
4.87
KB
-rw-r--r--
te-rts.mim
13.63
KB
-rw-r--r--
th-kesmanee.mim
8.97
KB
-rw-r--r--
th-pattachote.mim
5.71
KB
-rw-r--r--
th-tis820.mim
5.73
KB
-rw-r--r--
ua-kbd.mim
2.63
KB
-rw-r--r--
ug-kbd.mim
2.18
KB
-rw-r--r--
unicode.mim
2.14
KB
-rw-r--r--
ur-phonetic.mim
2.33
KB
-rw-r--r--
uz-kbd.mim
2.42
KB
-rw-r--r--
vi-base.mim
5.16
KB
-rw-r--r--
vi-han.mim
74.99
KB
-rw-r--r--
vi-nom-vni.mim
233.61
KB
-rw-r--r--
vi-nom.mim
230.88
KB
-rw-r--r--
vi-tcvn.mim
5.95
KB
-rw-r--r--
vi-telex.mim
7.74
KB
-rw-r--r--
vi-viqr.mim
5.61
KB
-rw-r--r--
vi-vni.mim
5.6
KB
-rw-r--r--
yi-yivo.mim
3.6
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : th-kesmanee.mim
;; th-kesmanee.mim -- Thai input method with Kesmanee keyboard layout ;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009 ;; National Institute of Advanced Industrial Science and Technology (AIST) ;; Registration Number H15PRO112 ;; This file is part of the m17n database; a sub-part of the m17n ;; library. ;; The m17n library is free software; you can redistribute it and/or ;; modify it under the terms of the GNU Lesser General Public License ;; as published by the Free Software Foundation; either version 2.1 of ;; the License, or (at your option) any later version. ;; The m17n library is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ;; Lesser General Public License for more details. ;; You should have received a copy of the GNU Lesser General Public ;; License along with the m17n library; if not, write to the Free ;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor, ;; Boston, MA 02110-1301, USA. (input-method th kesmanee) (description "Thai input method simulating the Kesmanee keyboard with WTT 2.0 input sequence correction. The correction algorithm follows the one shown in the following <http://linux.thai.net/~thep/th-xim/> ") (title "ท") (variable (level (_"Acceptance level The level of character sequence acceptance defined in WTT 2.0. 0 accepts any key sequence. 2 accepts only orthographic ones. 1 is somewhere between.") 1 0 1 2)) (macro ;; input global variables : arg1, arg2 ;; output global variable : ret (cp (cond ((= level 0) (set ret 1)) (1 (cp12)))) ;; input global variables : arg1, arg2 ;; output global variable : ret (ac (cond ((= level 0) (set ret 1)) ((= level 1) (ac1)) (1 (ac2)))) ;; Level 1 & 2 composability (cp12 (set ret 0) (cond ;; next = BV1|BV2|BD|AD3|AV1|AV2|AV3, previous = CONS ((| (= arg2 0x0E31) (& (>= arg2 0x0E34) (<= arg2 0x0E3A)) (= arg2 0x0E4E)) (cond ((| (& (>= arg1 0x0E01) (<= arg1 0x0E23)) (= arg1 0x0E25) (& (>= arg1 0x0E27) (<= arg1 0x0E2E))) (set ret 1)))) ;; next = TONE, previous = CONS|BV1|BV2|AV1|AV2|AV3 ((& (>= arg2 0x0E48) (<= arg2 0x0E4B)) (cond ((| (& (>= arg1 0x0E01) (<= arg1 0x0E23)) (= arg1 0x0E25) (& (>= arg1 0x0E27) (<= arg1 0x0E2E)) (= arg1 0x0E31) (& (>= arg1 0x0E34) (<= arg1 0x0E39))) (set ret 1)))) ;; next = AD1, previous = CONS|BV1|AV1 ((& (>= arg2 0x0E4C) (<= arg2 0x0E4D)) (cond ((| (& (>= arg1 0x0E01) (<= arg1 0x0E23)) (= arg1 0x0E25) (& (>= arg1 0x0E27) (<= arg1 0x0E2E)) (= arg1 0x0E38) (= arg1 0x0E34)) (set ret 1)))) ;; next = AD2, previous = TONE| AV3 ((= arg2 0x0E47) (cond ((| (& (>= arg1 0x0E01) (<= arg1 0x0E23)) (= arg1 0x0E25) (& (>= arg1 0x0E27) (<= arg1 0x0E2E)) (= arg1 0x0E35) (= arg1 0x0E37)) (set ret 1)))))) ;; Level 1 acceptance (ac1 (set ret 1) (cond ((| (= arg2 0x0E31) (& (>= arg2 0x0E34) (<= arg2 0x0E3A)) (& (>= arg2 0x0E47) (<= arg2 0x0E4E))) (set ret 0)))) ;; Level 2 acceptance (ac2 (set ret 0) (cond ;; next = CTRL|CONS, previous = * ((| (<= arg2 0x001F) (& (>= arg2 0x0080) (<= arg2 0x009F)) (& (>= arg2 0x0E01) (<= arg2 0x0E23)) (= arg2 0x0E25) (& (>= arg2 0x0E27) (<= arg2 0x0E2E))) (set ret 1)) ;; next = NON|LV, previous = ~LV, ((| (& (>= arg2 0x0020) (<= arg2 0x007E)) (& (>= arg2 0x00A0) (<= arg2 0x0E00)) (= arg2 0x0E2F) (& (>= arg2 0x0E3F) (<= arg2 0x0E44)) (= arg2 0x0E46) (> arg2 0x0E4E)) (cond ((| (< arg1 0x0E40) (> arg1 0x0E44)) (set ret 1)))) ;; next = FV1, previous = CONS|FV1|FV2|BV1|TONE ((| (= arg2 0x0E30) (= arg2 0x0E32) (= arg2 0x0E33)) (cond ((| (& (>= arg1 0x0E01) (<= arg1 0x0E23)) (= arg1 0x0E25) (& (>= arg1 0x0E27) (<= arg1 0x0E2E)) (= arg1 0x0E30) (= arg1 0x0E32) (= arg1 0x0E33) (= arg1 0x0E45) (= arg1 0x0E38) (& (>= arg1 0x0E48) (<= arg1 0x0E4B))) (set ret 1)))) ;; next = FV2, previous = FV3|TONE ((= arg2 0x0E45) (cond ((| (= arg1 0x0E24) (= arg1 0x0E26) (& (>= arg1 0x0E48) (<= arg1 0x0E4B))) (set ret 1)))) ;; next = FV3, previous = ~LV~FV3 ((| (= arg2 0x0E24) (= arg2 0x0E26)) (cond ((& (| (< arg1 0x0E40) (> arg1 0x0E44)) (! (= arg1 0x0E24)) (! (= arg1 0x0E26))) (set ret 1))))))) (map (map ("!" "+") ("\"" ".") ("#" "๒") ("$" "๓") ("%" "๔") ("&" "฿") ("'" "ง") ("(" "๖") (")" "๗") ("*" "๕") ("+" "๙") ("," "ม") ("-" "ข") ("." "ใ") ("/" "ฝ") ("0" "จ") ("1" "ๅ") ("2" "/") ("3" "-") ("4" "ภ") ("5" "ถ") ("6" "ุ") ("7" "ึ") ("8" "ค") ("9" "ต") (":" "ซ") (";" "ว") ("<" "ฒ") ("=" "ช") (">" "ฬ") ("?" "ฦ") ("@" "๑") ("A" "ฤ") ("B" "ฺ") ("C" "ฉ") ("D" "ฏ") ("E" "ฎ") ("F" "โ") ("G" "ฌ") ("H" "็") ("I" "ณ") ("J" "๋") ("K" "ษ") ("L" "ศ") ("M" "?") ("N" "์") ("O" "ฯ") ("P" "ญ") ("Q" "๐") ("R" "ฑ") ("S" "ฆ") ("T" "ธ") ("U" "๊") ("V" "ฮ") ("W" "\"") ("X" ")") ("Y" "ํ") ("Z" "(") ("[" "บ") ("\\" "ฃ") ("]" "ล") ("^" "ู") ("_" "๘") ("`" "_") ("a" "ฟ") ("b" "ิ") ("c" "แ") ("d" "ก") ("e" "ำ") ("f" "ด") ("g" "เ") ("h" "้") ("i" "ร") ("j" "่") ("k" "า") ("l" "ส") ("m" "ท") ("n" "ื") ("o" "น") ("p" "ย") ("q" "ๆ") ("r" "พ") ("s" "ห") ("t" "ะ") ("u" "ี") ("v" "อ") ("w" "ไ") ("x" "ป") ("y" "ั") ("z" "ผ") ("{" "ฐ") ("|" "ฅ") ("}" ",") ("~" "%"))) ;; CTRL : 0000..0020, 007F..009F ;; NON : 0021..007E, 00A0..0E00 ;; CONS : 0E01..0E23, 0E25, 0E27..0E2E ;; LV : 0E40..0E44 ;; FV1 : 0E30, 0E32, 0E33 ;; FV2 : 0E45 ;; FV3 : 0E24, 0E26 ;; BV1 : 0E38 ;; BV2 : 0E39 ;; BD : 0E3A ;; TONE : 0E48..0E4B ;; AD1 : 0E4C, 0E4D ;; AD2 : 0E47 ;; AD3 : ;; AV1 : 0E34 ;; AV2 : 0E31, 0E36 ;; AV3 : 0E35, 0E37 (state (init (map (delete @<) (pushback 1) (shift main))) (main (map (set x @-3) (set y @-2) (set z @-1) (set arg1 y) (set arg2 z) (cp) (cond ((= ret 1)) ;; CP(y,z) succeeded. (1 (ac) (cond ((= ret 1)) ;; AC(y,z) succeeded. (1 ;; WTT-based input sequence correction starts here. ;; begin ;; if CP(x,z) then (set arg1 x) (set arg2 z) (cp) (cond ((= ret 1) ;; if CP(z,y) then (set arg1 z) (set arg2 y) (cp) (cond ((= ret 1) ;; reorder(y -> zy) (delete @-2) (insert z) (insert y)) ;; elif CP(x,y) then (1 (set arg1 x) (set arg2 y) (cp) (cond ((= ret 1) ;; replace(y -> z) (delete @-2) (insert z)) ;; elif y is FV1 and z is TONE then ((& (| (= y 0x0E30) (= y 0x0E32) (= y 0x0E33)) (>= z 0x0E48) (<= z 0x0E4B)) ;; reorder(y -> zy) (delete @-2) (insert z) (insert y)) ;; else ;; reject(z) (1 (delete @-1)) ;;endif )))) ;; elif AC(x,z) then (1 (set arg1 x) (set arg2 z) (ac) (cond ((& (= ret 1) ;; Only Thai characters should be replaced. (& (>= y 0x0E01) (<= y 0x0E5B)) (& (>= z 0x0E01) (<= z 0x0E5B))) ;; replace(y -> z) (delete @-2) (insert z)) ;; else ;; reject(z) (1 (delete @-1)) ;; endif ))) ;; end )))) ;; Now we commit the preedit chars that are fixed. (set w @-1) (cond ;; If surrounding text is supported, commit the only char in preedit. ((> @-0 -2) (commit)) ;; If the last char is CTRL or NON, we can commit everything. ((| (& (>= w 0x0000) (<= w 0x0E00)) (= w 0x0E2F) (= w 0x0E3F) (= w 0x0E46) (>= w 0x0E4F)) (commit)) ;; If the last char is CONS, we can commit everything but the last ;; unless the second last is FV3. ((| (& (>= w 0x0E01) (<= w 0x0E23)) (= w 0x0E25) (& (>= w 0x0E27) (<= w 0x0E2E))) (cond ((| (= @-2 0x0E24) (= @-2 0x0E26)) ; not commit yet ) (1 (delete @-1) (commit) (insert w)))) ;; If the last char is LV, FV2 or FV3, we can commit ;; everything but the last. ((| (& (>= w 0x0E40) (<= w 0x0E45)) (= w 0x0E24) (= w 0x0E26)) (delete @-1) (commit) (insert w)) ;; If the last char is FV1 (excluding AM) and ... ((| (= w 0x0E30) (= w 0x0E32)) (delete @-1) (set v @-1) (cond ;; ... the before last is CONS, we can commit other than the ;; last two. ((| (& (>= v 0x0E01) (<= v 0x0E23)) (= v 0x0E25) (& (>= v 0x0E27) (<= v 0x0E2E))) (delete @-1) (commit) (insert v) (insert w)) ;; ... else if the before last is not CONS, we can commit ;; everything but the last. (1 (commit) (insert w)))) )))) ;; Local Variables: ;; coding: utf-8 ;; mode: emacs-lisp ;; End:
Close
