|
|
| version 1.84.4.14, 2005/11/22 15:11:05 | version 1.117, 2006/04/09 13:38:48 |
|---|---|
| Line 1 | Line 1 |
| @print[dt][_tmp] | |
| $dt.year/$dt.month/$dt.day, ${dt.hour}:${dt.minute}:${dt.second} | |
| $hash[ | |
| $.1(1) | |
| $.2(2) | |
| ] | |
| ^hash.foreach[k;v]{ | |
| k=$k,v=$v^break[];! | |
| } | |
| @main[] | $table[^table::create{a |
| Сейчас: ^print[^date::now[]]<br /> | 1 |
| 2 | |
| 3}] | |
| ^table.menu{ | |
| <$table.a^if($table.a==2){^break[]!}> | |
| }[,] | |
| ------------- | |
| $dt[^date::now[]] | ^while(1<2){ |
| ^dt.roll[TZ;GMT0BST] | $i($i+1) |
| В GMT : ^print[$dt]<br /> | ^if(1<3){ |
| { | |
| <$i^if($i==3){^break[]}> | |
| } | |
| } | |
| } | |
| Сейчас: ^print[^date::now[]] | ^for[i](1;3){ |
| $env:TZ? | $i before |
| ^if($i==2){^continue[]} | |
| after | |
| }[,] | |
| $response:paf[test] | |
| $response:paf[] | |
| --- | |
| $hashfile[^hashfile::open[hf]] | |
| $hashfile.1(1) | |
| $hashfile.2(2) | |
| ^hashfile.foreach[k;v]{ | |
| k=$k,v=$v^break[];! | |
| } |