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
|
2KB
|
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