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