Chip 2002 September

home *** CD-ROM | disk | FTP | other *** search

/ Chip 2002 September / Chip_2002-09_cd1.bin / ctenari / Prochazka / data / lib / ADtools.zbc next >

Wrap

Text File | 2002-07-16 | 2.3 KB | 241 lines

;This is machine generated file, do not edit ;Generated by JavaScript module ADtools.module 32 sub makeAD 2 2 code pushparam 0 pushlocals setprop dataXML polypop 2 pushparam 1 pushlocals setprop designXML polypop 2 pushlocals getprop designXML jnx 1 pop pushthis getprop designXML jnx 1 pop pushsys getprop designXML jnx 1 pop xraise @1: cm clone 0 jnx 0 xraise @0: pushlocals initprop res polypop 2 pushlocals getprop res jnx 4 pop pushthis getprop res jnx 4 pop pushsys getprop res jnx 4 pop xraise @4: pushlocals getprop dataXML jnx 5 pop pushthis getprop dataXML jnx 5 pop pushsys getprop dataXML jnx 5 pop xraise @5: pushthis cm process 2 jnx 2 pop pushlocals getprop process jnx 6 pop pushthis getprop process jnx 6 pop pushsys getprop process jnx 6 pop xraise @6: cm op:call 2 jnx 3 xraise @3: @2: pop pushlocals getprop res jnx 7 pop pushthis getprop res jnx 7 pop pushsys getprop res jnx 7 pop xraise @7: doret 1 pushlocals deleteprops 1 pop pushnull doret 1 end sub process 2 2 code pushparam 0 pushlocals setprop xml polypop 2 pushparam 1 pushlocals setprop data polypop 2 pushlocals getprop xml jnx 12 pop pushthis getprop xml jnx 12 pop pushsys getprop xml jnx 12 pop xraise @12: cm getIterator 0 jnx 10 xraise @10: dup 1 cm getValue 0 dup 1 condnotjmp 11 pushlocals initprop child polypop 2 pushlocals getprop child jnx 15 pop pushthis getprop child jnx 15 pop pushsys getprop child jnx 15 pop xraise @15: pushlocals getprop data jnx 16 pop pushthis getprop data jnx 16 pop pushsys getprop data jnx 16 pop xraise @16: pushthis cm processchild 2 jnx 13 pop pushlocals getprop processchild jnx 17 pop pushthis getprop processchild jnx 17 pop pushsys getprop processchild jnx 17 pop xraise @17: cm op:call 2 jnx 14 xraise @14: @13: pop pushlocals deleteprops 1 pop @8: dup 1 cm moveNext 0 pop jmp 10 @11: pop @9: ;@break pop pushnull doret 1 end sub processchild 2 2 code pushparam 0 pushlocals setprop xml polypop 2 pushparam 1 pushlocals setprop data polypop 2 pushnull doret 1 end sub @init 0 code pushstr "ADtools" pushthis pushsys cm op:set:prop 2 jnx 0 xraise @0: pop ;Init block of module doret 0 end end