--- parser3/www/htdocs/Attic/index.html	2002/11/28 12:23:39	1.188
+++ parser3/www/htdocs/Attic/index.html	2002/12/05 11:23:53	1.199
@@ -20,6 +20,7 @@ $body
 OK
 
 @main[]
+#$form:a=
 #$a(123)
 #^a.format[%.10u]
 #$result[111]
@@ -296,10 +297,110 @@ OK
 #^http_prefix[]
 #^http_prefix_table[]
 #^http_prefix_xml[]
-^imagefont[]
+#^imagefont[]
 #^downloadtest[]
 #^cachebug[]
 #^quickregexatend[]
+#^docsamplehttpfileload[]
+#^datecreatecolon[]
+#^exifdocsample[]
+#^rusagetv[]
+#^varmethnameconflict[]
+#^mimeold[]
+#^mimenew[]
+^doctableclonesample[]
+
+@doctableclonesample[]
+$orig[^table::create{name
+Вася
+Коля
+Лена
+Маша
+}]
+
+#сдвигает текущую запись таблицы from на <Коля>
+^orig.offset(1)
+
+#копирует начиная стекущей записи во from, 10 записей максимум
+$copy[^table::create[$orig;
+    $.offset[cur]
+    $.limit(10)
+]]
+
+^copy.menu{$copy.name}[,]
+
+@mimeold[]
+^mail:send[
+	$.from[paf@design.ru]
+	$.to[paf@design.ru]
+	$.text[1
+	
+	2
+	
+	
+		3]
+]
+
+@mimenew[]
+^mail:send[
+	$.from[paf@design.ru]
+	$.to[paf@design.ru]
+	$.body[1
+	
+	2
+	
+	
+		3]
+]
+
+@varmethnameconflict[]
+$varmethnameconflict[1]
+^varmethnameconflict.format[%03d]
+
+@rusagetv[]
+$s[$status:rusage]
+^s.tv_sec.format[%.0f].^s.tv_usec.format[%06.0f]
+
+@exifdocsample[]
+$image[^image::measure[jpg/DSC00003.JPG]]
+$exif[$image.exif]
+^if($exif){
+    Производитель фотоаппарата, модель: $exif.Make $exif.Model<br>
+    Время съемки: ^exif.DateTimeOriginal.sql-string[]<br>
+    Выдержка: $exif.ExposureTime секунды<br>
+    Диафрагма: F$exif.FNumber<br>
+    Использовалась вспышка: ^if(def $exif.Flash){^if($exif.Flash){да;нет};неизвестно}<br>
+}{
+    нет EXIF информации<br>
+}
+
+@exif_value[value][i]
+^if($value is date){
+	^value.sql-string[]
+}{
+	^if($value is hash){
+		^for[i](0;$value-1){$value.$i}[,]
+	}{
+		$value
+	}
+}
+
+
+
+
+@datecreatecolon[]
+#$date[^date::create[2002-12-02 14:30]]
+#$date[^date::create[2002-12-02]]
+#$date[^date::create[2002:12:02 13:30]]
+$date[^date::create[2002:12:02]]
+#$date[^date::create[12:02]]
+^date.sql-string[]
+
+@docsamplehttpfileload[]
+$file[^file::load[text;http://parser.ru/]]
+Программное обеспечение сервера: $file.SERVER
+<hr>
+<pre>$file.text</pre>
 
 @quickregexatend[]
 #$subject[xxxabcd]
@@ -339,13 +440,18 @@ $length[^image.length[$text]]
 $response:body[^image.gif[]]
 
 @http_prefix_xml[]
- $xdoc[^xdoc::load[http://www.cbr.ru/scripts/XML_daily.asp?date_req=02/03/2002;
-# 	$.method[HEAD]
- 	$.headers[
- 		$.user-agent[1]
- 	]
+$xdoc[^xdoc::load[http://www.cbr.ru/scripts/XML_daily.asp?^taint[сегодня];
+    $.headers[
+		$.user-agent[ПАФ]
+		$.accept-test[$.value[значение]$.with-option[опция]]
+	]
 ]]
+На ^xdoc.selectString[string(/ValCurs/@Date)]
+курс валюты
+$USD_node[^xdoc.selectSingle[/ValCurs/Valute[CharCode='USD']]]
+"^USD_node.selectString[string(Name)]" равен ^USD_node.selectString[string(Value)]
 
+<hr>
 <pre>^taint[^xdoc.string[]]</pre>
 
 @http_prefix_table[]
@@ -395,13 +501,16 @@ $file[^file:list[$dir;\.(jpe?g|JPE?G)^$]
 </table>
 
 @show_exif_value[value][i]
-^if($value is hash){
-	^for[i](0;$value-1){$value.$i}[,]
+^if($value is date){
+	^value.sql-string[]
 }{
-	$value
+	^if($value is hash){
+		^for[i](0;$value-1){$value.$i}[,]
+	}{
+		$value
+	}
 }
 
-
 @message-id-test[]
 ^mail:send[
 	$.from[paf@mail]