--- parser3/src/www/htdocs/Attic/index.html 2001/04/19 18:30:43 1.147
+++ parser3/src/www/htdocs/Attic/index.html 2001/04/23 13:38:36 1.153
@@ -1,20 +1,3 @@
-@auto[]
-$html-typo[^table:set{user html comment
-<< «^; длинные user вперёд
->> »^;
-\n\n
!эти есть в таблице по умолчанию
-\n
!но т.к. заменяем, надо повторить.
-< <^; !можно этим воспользоваться,
-> >^; !и что-то сделать ДО обычных замен
-" "^; !например из << и >>
-& &^; !сделать ёлочки-кавычки.
-_  ^;
-^#AB «^; windows коды ёлочек
-^#BB »^; windows коды ёлочек
-(c) ©^;
-^#A9 ©^; windows (c)
-}]
-
@dump[t]
^t.menu{$n
}
@@ -23,7 +6,7 @@ $n
@twop[a;b]
($a,$b)
-@Я post-process[data]
+@Zpostprocess[data]
#(
$data)
^data.match[1][g]{X}
@@ -31,8 +14,16 @@ $n
$m ^if(^s.match[$:m;i]){matches}{does not match} $s
@main[]
+match xmg:
+$s[2
+2]
+$r[^s.match[(2^$ #comment
+)][xmg]]
+^r.menu{$match}[,]
+
+
image:create
$itext[^image:create(300;100)]
$itext{
@@ -44,8 +35,12 @@ $itext{
^text(10;30)[ПАФ сделал это fixed]
}
$ff[^itext.gif[]]
-^ff.save[itext.gif]
-^itext.html[$src[itext.gif]]
+^ff.save[i/itext.gif]
+^rem{
+^ff.save[i2/itext.gif]
+^file:delete[i2/itext.gif]
+}
+^itext.html[$src[i/itext.gif]]
@@ -118,8 +113,9 @@ $face[^image:measure[001004paf(c)lena_ka
^rem{
^mail:send[
$to[paf@design.ru]
- $subject[test]
+ $subject[test проверка]
$body[test]
+ $content-type[$charset[windows-1251]]
]
}
@@ -245,9 +241,9 @@ $sm[^s.match[(.)][g]]
^^"$s".match[(.)][g]:
^sm.menu{
^line[]:
- ^$pre-match=$pre-match
+ ^$prematch=$prematch
^$match=$match
- ^$post-match=$post-match
+ ^$postmatch=$postmatch
^$1=$1
}
@@ -255,9 +251,9 @@ $sm[^s.match[(.)][]]
^^"$s".match[(.)][]:
^sm.menu{
^line[]:
- ^$pre-match=$pre-match
+ ^$prematch=$prematch
^$match=$match
- ^$post-match=$post-match
+ ^$postmatch=$postmatch
^$1=$1
}
@@ -291,7 +287,13 @@ $src[^table:set{a b c d
s1 s2 s3 s4
}]
^dest.join[$src]
-^dest.menu{$a!$b!$c!
}
+dest.menu:
+^dest.menu{$a!$b!$c!
+^rem{lock violation^table:set[nameless]{1
+2
+3}]
+}
+}
^^random:generate(10)=^random:generate(10)