--- parser3/src/www/htdocs/Attic/index.html 2001/07/02 13:59:59 1.216 +++ parser3/src/www/htdocs/Attic/index.html 2001/07/12 11:19:06 1.225 @@ -1,4 +1,91 @@ +@USE +dtformat.p +input_date.p + +@href[href zzz;title xxxx;ставить] +^if($ставить){y;n} + @main[] +$string:z[1] +$path[/news/tululu/] +$pieces[^path.lsplit[/]] +$pieces{^count[]: ^menu{{$piece}}[,].} +
+^href[href;title](1<2) + +
+$stat[^file:stat[test.zip]] +$stat{ +^$size=$size
+adate=^long_date_format[$adate]
+mdate=^long_date_format[$mdate]
+cdate=^long_date_format[$cdate]
+} +
+$дата[^input_date:parse[9.7.2001]] +^long_date_format[$дата] +
+$дата[^parse_date[9.7.2001]] +^long_date_format[$дата] +
+$сегодня[^date:now[]] +$недельный_календарь[^table:calendar[rus]($сегодня.year;$сегодня.month;$сегодня.day)] + +$недельный_календарь{^menu{ + $year $month $day $weekday
+}} +
+
+$сегодня[^date:now[]] +$месячный_календарь[^table:calendar[rus;$сегодня.year;$сегодня.month]] + +^месячный_календарь.menu{^for[i;0;6]{ + $day[$месячный_календарь.$i] + ^if($day){$day}{ ^; ^;} +}
} +
+
+before $время[^date:now[]]^время.string[]
+year+^время.roll[year](1)^время.string[]
+month+^время.roll[month](1)^время.string[]
+year-^время.roll[year](-1)^время.string[]
+month-^время.roll[month](-1)^время.string[]
+day+^время.roll[day](1)^время.string[]
+day-^время.roll[day](-1)^время.string[]
+
+$русский_день_недели[ + $0[Воскресенье] + $1[Понедельник] + $2[Вторник] + $3[Среда] + $4[Четверг] + $5[Пятница] + $6[Суббота] +] + +$время[^date:set(0;1;1;3;30;4)] +$время{ + ^string[]
+ ${year}.${month}.${day} ${hour}:${minute}:${second} +} +
+$время[^date:set(1.5)] +^время.string[] +
+$сейчас[^date:now[]] +^^сейчас.string[]=^сейчас.string[] $день_недели($сейчас.weekday) $русский_день_недели.$день_недели
+$floatdays($сейчас) ^floatdays.format{%.20f}
+^eval(^math:frac($floatdays)*24)
+^eval(^math:frac($floatdays*24)*60)
+^eval(^math:frac($floatdays*24*60)*60) +
+ +PI=^math:PI.format{%.40f} +
+^math:random(10) +
+^math:sqrt(16) +
$люди[ $2федя[ $рост[176] @@ -20,7 +107,7 @@ $таблица[^table:set{a b }] $колонки[^таблица.columns[]] $колонки{ - ^menu{$name}[,]. + ^menu{$column}[,]. }
@@ -189,20 +276,6 @@ $th[^t2.hash[key;a]] $filelist[^table:dir[.]]
-$path[/news/tululu/] -#^path.flip[] -
-$branches[^table:set{name val -index.cgihtml 123 -}] -$splitURI[^request:uri.lsplit[/]] -name ^if(^branches.locate[name;$splitURI.1]){found;not found}: -$branches.name -
-$splitURI[^request:uri.lsplit[/]] -$splitURI.0!$splitURI.1 -
- $t2[^table:set{dir title /here Here }]