--- parser3/src/www/htdocs/Attic/index.html	2001/03/19 22:56:46	1.23
+++ parser3/src/www/htdocs/Attic/index.html	2001/03/29 16:12:47	1.76
@@ -1,15 +1,132 @@
-$response:body[123]
+@auto[]
+!!$html-typo[^table:set{user	html	comment
+<<	&laquo^;	длинные user вперёд
+>>	&raquo^;
+\n\n	<p>	!эти есть в таблице по умолчанию
+\n	<br>	!но т.к. заменяем, надо повторить.
+<	&lt^;	!можно этим воспользоваться,
+>	&gt^;	!и что-то сделать ДО обычных замен
+"	&quot^;	!например из << и >>
+&	&amp^;	!сделать ёлочки-кавычки.
+_	&nbsp^;
+^#AB	&laquo^;	windows коды ёлочек
+^#BB	&raquo^;	windows коды ёлочек
+(c)	&copy^;
+^#A9	&copy^;	windows (c)
+}]
 
-<form method=post enctype=multipart/form-data>
-<input name=photo type=file>
+@dump[t]
+#^t.menu{$n<BR>}
+<HR>
+@func[n]
+$n
+@twop[a;b]
+($a,$b)
+@main[]
+$a[vasya]
+^^a.pos(sy]="^a.pos[sy]"<BR>
+^^a.pos[zsy]="^a.pos[zsy]"<BR>
+^^a.left(3)="^a.left(3)"<BR>
+^^a.right(3)="^a.right(3)"<BR>
+^^a.mid(1;3)="^a.mid(1;3)"<BR>
+<HR>
+^twop[a;]
+^$request:browser.type=$request:browser.type<BR>
+^$request:browser.version=$request:browser.version<BR>
+
+$tf[^file:load[test.zip;abc.zip]]
+^$tf.name=$tf.name<BR>
+^$tf.size=$tf.size<BR>
+^$tf.mime-type=$tf.mime-type<BR>
+^$tf.text:<BR>
+$tf.text<HR>
+<HR>
+^file:find[test.cfg]<BR>
+^file:find[tes.cfg]{not found}<BR>
+<HR>
+
+$t[^table:set{n
+3
+01.3
+1.2
+2
+}]
+#$t{^locate[n;2z]^found{$n}{not found}}<BR>
+#$t{^locate[n;3]^found{found:$n}{not found}}<BR>
+^$t:<BR>
+^dump[$t]
+#^t.sort($n)
+^^t.sort(^$n):<BR>
+^dump[$t]
+#^t.sort{^:func($n)}
+^^t.sort{^^:func(^$n)}:<BR>
+^dump[$t]
+#^t.sort{$n}
+^^t.sort{^$n}:<BR>
+^dump[$t]
+#^t.sort{$n}[desc]
+^^t.sort{^$n}[desc]:<BR>
+^dump[$t]
+<HR>
+
+^if(-f index.html){y}{n}<BR>
+^taint[html-typo;не знаю
+я ничего
+
+<<слово длинное>>
+
+(c) by Я
+]<HR>
+$t[^table:load[/test.cfg]]
+^process[@b[]
+f
+]
+^b[]<BR>
+
+^$t.a=$t.a<BR>
+^t.offset[2]
+#$r[^t.record[]]
+#^$r.a=$r.a<BR>
+
+^$request:uri=$request:uri<BR>
+^$env:PATH_INFO=$env:PATH_INFO<BR>
+^$env:REMOTE_ADDR=$env:REMOTE_ADDR<BR>
+
+^rem{
+$response:body[]
+$response:location[http://parser3/123]
+}
+
+
+<HR>
+^^auto_test[]:<BR>
+<ol>
+^auto_test[]
+</ol>
+<HR>
+
+^${cookie:вот}=${cookie:вот}?<BR>
+^$request:query=$request:query<BR>
+^$request:uri=$request:uri<BR>
+
+<form method=post>
+<table border=1 width=250><tr><td>$form:name</td></tr></table>
+<textarea name=name rows=5 cols=40>^untaint[html]{^default[$form:name;не знаю]}</textarea><BR>
 <input type=submit>
 </form>
-<hr>
-^if($form:photo){
-	<pre>
-	^$form:photo.name='$form:photo.name'
-	^$form:photo.size='$form:photo.size'
-	^$form:photo.text='$form:photo.text'
-	^form:photo.save{paf.txt}
-	</pre>
-}
+
+@default[test;def]
+$result[^if(^test.length[]){$test}{$def}]
+
+@exception[origin;source;comment;type;code]
+<body bgcolor=black>
+<font color=white>
+ERROR:
+^if(def $source){$origin '$source'}
+${comment}.
+^if(def $type){type=$type}
+^if(def $code){code=$code}
+
+@auto_test[]
+^BASE.auto_test[]
+<li>${request:uri}!
\ No newline at end of file
