Annotation of parser3/src/www/htdocs/index.html, revision 1.397
1.397 ! parser 1: @main[]
^faceesize[]
! 2: #^imageresize[]
1.395 parser 3: #^ifassignhash[]
#^tintdefault[]
#$response:status[404]
1.390 parser 4: #^ifpasshash[]
1.387 parser 5: #^movedir[]
6: #^replace[]
1.386 parser 7: #^set[]
1.385 parser 8: #^hash[]<hr>
1.384 parser 9: #$t[^methresult[]] ->$t
1.382 parser 10: #^terror[]
1.378 parser 11: #^ssave[]
1.377 parser 12: #^calendar[]
1.376 parser 13: #^thash[]
1.373 parser 14: #^tdef[]
1.375 parser 15: #^ford[]
1.371 parser 16: #^tif[]
1.383 parser 17: #^image[]
1.369 parser 18: #^mail2[]
1.367 parser 19: #^cookie[]
1.365 parser 20: #^response[]
1.364 parser 21: #^regexp2[]
22: #^ttablerem[]
23: #^pcre[]
24: #^regexp[]<hr>
25: #^mail[]
26: #^exec[]
27: #^fori[]
28: #^tconnect[]
1.383 parser 29: #^xslt[]
1.395 parser 30: #^xml[]
1.364 parser 31: #^header[]
32: OK
1.395 parser 33:
1.397 ! parser 34: @faceesize[]
! 35: $k(2)
! 36: $pict[^image::load[paf.gif]]
! 37: $small[^image::create($pict.width/$k;$pict.height/$k)]
! 38: ^small.copy[$pict](0;0;$pict.width;$pict.height;0;0;$small.width;$small.height)
! 39: $response:body[^small.gif[]]
! 40:
1.395 parser 41: @imageresize[]
42: $k(2)
43: $pict[^image::create(400*$k;200*$k)]
44: $pict.line-width(2)
45: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000)
1.397 ! parser 46: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-20;$pict.height-20;0+20;360-20;0xff0000)
1.395 parser 47: #^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000)
1.397 ! parser 48: ^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-20;0x0000ff)
! 49: ^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+20;360-20;0xff0000)
1.395 parser 50: #$response:body[^pict.gif[]]
51:
52: $small[^image::create($pict.width/$k;$pict.height/$k)]
1.396 parser 53: #^small.copy[$pict](0;0;$pict.width;$pict.height;0;0)
54: ^small.copy[$pict](0;0;$pict.width;$pict.height;0;0;$small.width;$small.height)
1.395 parser 55:
56: $response:body[^small.gif[]]
57:
1.388 parser 58:
59: @tintdefault[]
60: #$abc[abc]
61: $abc[33]
62: ^abc.int[z]
63: #^abc.int(123)
1.390 parser 64:
65: @ifassignhash[]
66: $h[^if(1){$.a(1);$.a(2)}]
67: $h.a
1.387 parser 68:
69: @ifpasshash[]
70: $a[$.e[a]]
71: $b[$.e[b]]
1.389 parser 72: ^ifpasshashdest[^if(1){$a;$b}]
1.387 parser 73: #$x[^if(1){$a}{$b}]
74: #^ifpasshashdest[$x]
75:
76: @ifpasshashdest[p]
77: $p.e
78:
79: @movedir[]
80: ^file:move[a;deeper/a]
1.386 parser 81:
82: @replace[]
83: $a[12^;3]
84: ^a.replace[^table::set{from to
85: 2^; !
86: }]
87:
1.385 parser 88:
89: @set[]
90: ^setdata[]
91: ^a.add[$b]
92: add:$a.3<br>
93:
94: ^setdata[]
95: ^a.sub[$b]
96: sub2:$a.2<br>
97: sub1:$a.1<br>
98:
99: ^setdata[]
100: $c[^a.union[$b]]
101: union3:$c.3<br>
102: union2:$c.2<br>
103:
104: ^setdata[]
105: $c[^a.intersection[$b]]
106: intersection3:$c.3<br>
107: intersection2:$c.2<br>
108:
109: ^setdata[]
110: intersects:^if(^a.intersects[$b]){y;n}<br>
111: intersects2:^if(^a.intersects[ ]){y;n}<br>
112:
113:
114: <hr>
115:
116: @setdata[]
117: $a[$.1[a1] $.2[a2]]
118: $b[ $.2[b2] $.3[b3]]
119:
1.383 parser 120:
1.384 parser 121: @hash[]
122: $h[^hash::create[$._default[123]]]
123: $h.paf[not kretin]
124: $h.paf<br>
125: =$h.that=<br>
126:
127: @methresult[]
128: $result[^table::set{1}]
1.377 parser 129:
1.381 parser 130: @terror[]
131: ^error[method z must be called with z]
132:
1.380 parser 133: @syntax1[]
134: #^a[^b]
135:
136: @syntax2[]
1.381 parser 137: #^a[
1.379 parser 138:
1.377 parser 139: @ssave[]
140: $abc[abc]
141: ^abc.save[abc]
1.376 parser 142:
143: @calendar[]
144: 2001;11:<br>
145: $week_days[^date:calendar[rus](2001;11)]
146: <pre>
147: ^week_days.menu{^for[wday](0;7){^if($week_days.$wday){$week_days.$wday; ^; ^;} }<br>}
148: </pre>
1.372 parser 149:
1.375 parser 150: @thash[]
151: $table[^table::set{id name age
152: 1 paf 278
153: 2 пиф 234
154: }]
155: $hash[^table.hash[id;^table::set[nameless]{id
156: name}]]
157: $hash.2.id $hash.2.name $hash.2.age
158:
1.372 parser 159: @tdef[]
160: $s[0]
161: if 0=^if($s){}{n}<br>
162: if def 0=^if(def $s){y}{}<br>
163: <hr>
1.371 parser 164:
165: @ford[]
1.374 parser 166: ^for[i](0;5){$i}{($i)}
1.368 parser 167:
1.370 parser 168: @tif[]
169: ^if[def]{y;n}
170:
1.368 parser 171: @image[]
172: $pict[^image::create(400;200)]
1.379 parser 173: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-1;$pict.height-1;0;360;0x000000)
174: ^pict.arc($pict.width/2;$pict.height/2;$pict.width-10;$pict.height-10;0+10;360-10;0xff0000)
175: #^pict.arc($pict.width/2;$pict.height/2;$pict.width;$pict.height;0;360;0xff0000)
176: ^pict.circle($pict.width/2;$pict.height/2;$pict.height/2-10;0x0000ff)
177: ^pict.arc($pict.width/2;$pict.height/2;$pict.height-26;$pict.height-26;0+10;360-10;0xff0000)
1.368 parser 178: $response:body[^pict.gif[]]
179:
180:
1.366 parser 181:
1.369 parser 182: @mail2[]
1.367 parser 183: ^mail:send[
1.369 parser 184: $.content-type[$.value[text/plain] $.charset[windows-1251]]
185: $.from[Александр Петросян <paf@design.ru>]
1.367 parser 186: $.to[Александр Петросян <paf@design.ru>]
1.369 parser 187: $.subject[проверка]
188: $.body[проверка]
1.367 parser 189: ]
190:
1.366 parser 191: @cookie[]
1.367 parser 192: $env:HTTP_COOKIE<br>
193:
194: #$cookie:переменная[test тест ТЕСТ2]
195: =$cookie:переменная=<br>
196: #$cookie:переменная2[test тест ТЕСТ3]
197: =$cookie:переменная2=<br>
1.365 parser 198:
199: @response[]
200: #^if($form:reload){
201: $response:refresh[$.value[0] $.url[./t.html?uri=$env:SERVER_NAME]]
202: #}
1.364 parser 203:
204: @xslt[]
205: ^xdata[]
1.375 parser 206: ^show-xdoc2[^xdoc.transform[global.xsl;$.param1[123/]]]
1.364 parser 207:
208: @regexp2[]
209: $s[ select]
210: $s[^s.match[^^\s*][]{!}]
211: $s
212:
213: @header[]
214: $response:refresh[
215: $.value[0]
216: $.url[http://design.ru?a=^taint[123]]
217: ]
218:
219: @ttablerem[]
220: $table[^table::load[a.cfg]]
221: ^table.menu{$table.a}
222:
223: @tconnect[]
224: ^connect[mysql://test:test@paf/test?charset=cp1251_koi8&compress=1&timeout=1&named_pipe=1]{
225: $tables[^table::sql{show tables}]
226: #$cols[^tables.columns[]]
227: #$cols.column
228: ^tables.menu{
229: $tables.[Tables_in_test]<br>
230: }
231: }
232:
233: @pcre[]
234: $s[1 2]
235: ^s.match[\s;ig]{!}
236: #^s.match[\d;ig]{!}
237:
238:
239: @regexp[]
240: $s[abcАБВ]
241: ^if(^s.match[б][i]){y}{n}
242:
243: @mail[]
244: #$ORIGINS(1)
245: ^mail:send[
246: $.from[paf@design.ru]
247: $.to[paf@design.ru]
248: $.body[1
249:
250: 2
251:
252:
253: 3]
254: ]
255:
256: @exec[]
1.370 parser 257: $a[^file::exec[fc.exe;;a;b]]
1.364 parser 258: $a.status|$a.stderr<hr>
259:
260: @fori[][i]
261: ^for[i](1;3){... =$i= ...}
262:
263: @xdata[]
264: #$response:content-type[$.value[text/html] $.charset[windows-1251]]
265: $xdoc[^xdoc::load[input.xml]]
266:
267: @xml[]
268: ^xdata[]
269:
270: ^show-xdoc2[$xdoc]<hr>
271: #^show-xnode1[$xdoc]<hr>
272: $people[^xdoc.select[*/man]]
273: #^show1[]
274: ^show-xnodes1[$people]<hr>
275: #^people.0.owner.hren[]
276:
1.393 parser 277: ^show-xnode1[^xdoc.selectSingle[*/man[2]/name];0;1]<hr>
1.364 parser 278:
279: by id:
280: ^show-xnode1[^xdoc.getElementById[1];0;1]
281: <hr>
282:
283: @show1[array]
284: ^for[i](0;^array._count[]-1){
285: $x[$array.$i]
286: $x.firstChild.nodeValue:
287: $pattributes[$x.parentNode.attributes]
288: ^if(^pattributes._count[]){
289: $pattributes.id.name=$pattributes.id.nodeValue
290: }
291: <br>
292: }
293:
294: @show-xnodes1[array][i]
295: ^for[i](0;^array._count[]-1){
296: ^show-xnode1[$array.$i;0;1]
297: }
298:
299: @show-xnode1[x;level;single][l]
300: ^if(def $x){
301: ^for[l](0;$level-1){ ^; ^; ^; ^;}
302: ^if($x.nodeType == $xnode:ELEMENT_NODE){
303: <^;$x.nodeName
304: $pairs[$x.attributes]
305: ^if(def $pairs){
306: $names[^pairs._keys[]]
307: ^names.menu{ $names.key="$pairs.[$names.key].nodeValue"}
308: }
309: >^;
310: }{
311: [$x.nodeType]
312: }
313:
314: ^if(def $x.nodeValue){$x.nodeValue}<br>
315: ^show-xnode1[$x.firstChild]($level+1)
316: ^if(!$single){
317: ^show-xnode1[$x.nextSibling]($level)
318: }
319:
320: ^if($x.nodeType == $xnode:ELEMENT_NODE){
321: ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;<br>
322: }
323: }
324:
325: @show-xdoc2[xdoc]
326: ^xdoc.save[save.xml;
327: # $.encoding[windows-1251]
328: $.method[xml]
329: ]
330: $file[^xdoc.file[
331: # $.encoding[windows-1251]
332: $.method[html]
333: ]]
334: ^file.save[text;save_file.html]
335: <pre>^taint[^xdoc.string[]]</pre>
336: # $.encoding[windows-1251]
337: # $.method[xml]
338: #]]
E-mail: