Chip 2002 September

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

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

Wrap

Text File | 2002-06-21 | 7KB | 788 lines

;This is machine generated file, do not edit ;Generated by JavaScript interface SDIFile.class sub op:new 2 2 code pop co SDIFile.instance cm @init:op:new 2 doret 1 end end interface SDIFile.instance sub save 0 0 code pushlocals getprop file jnx 2 pop pushthis getprop file jnx 2 pop pushsys getprop file jnx 2 pop xraise @2: condnotjmp 0 pushlocals getprop file jnx 4 pop pushthis getprop file jnx 4 pop pushsys getprop file jnx 4 pop xraise @4: pushlocals getprop intf jnx 5 pop pushthis getprop intf jnx 5 pop pushsys getprop intf jnx 5 pop xraise @5: cm save 1 jnx 3 xraise @3: pop pushnull pushlocals assignprop modified pop jnx 6 pushthis assignprop modified pop jnx 6 pushsys assignprop modified pop jnx 6 xraise @6: pop pushsys doret 1 jmp 1 @0: pushthis cm saveAs 0 jnx 7 pop pushlocals getprop saveAs jnx 9 pop pushthis getprop saveAs jnx 9 pop pushsys getprop saveAs jnx 9 pop xraise @9: cm op:call 0 jnx 8 xraise @8: @7: doret 1 @1: pushnull doret 1 end sub saveAs 0 0 code pushlocals getprop filetype jnx 13 pop pushthis getprop filetype jnx 13 pop pushsys getprop filetype jnx 13 pop xraise @13: pushstr "*." cm op:add 1 jnx 12 xraise @12: pushlocals getprop SaveDialog jnx 14 pop pushthis getprop SaveDialog jnx 14 pop pushsys getprop SaveDialog jnx 14 pop xraise @14: cm run 1 jnx 11 xraise @11: pushlocals initprop res pop condnotjmp 10 pushlocals getprop res jnx 16 pop pushthis getprop res jnx 16 pop pushsys getprop res jnx 16 pop xraise @16: pushlocals assignprop file pop jnx 15 pushthis assignprop file pop jnx 15 pushsys assignprop file pop jnx 15 xraise @15: pop pushlocals getprop file jnx 18 pop pushthis getprop file jnx 18 pop pushsys getprop file jnx 18 pop xraise @18: pushlocals getprop intf jnx 19 pop pushthis getprop intf jnx 19 pop pushsys getprop intf jnx 19 pop xraise @19: cm save 1 jnx 17 xraise @17: pop pushnull pushlocals assignprop modified pop jnx 20 pushthis assignprop modified pop jnx 20 pushsys assignprop modified pop jnx 20 xraise @20: pop pushsys doret 1 @10: pushlocals deleteprops 1 pop pushnull doret 1 pushnull doret 1 end sub canNew 0 0 code pushthis cm canClose 0 jnx 22 pop pushlocals getprop canClose jnx 24 pop pushthis getprop canClose jnx 24 pop pushsys getprop canClose jnx 24 pop xraise @24: cm op:call 0 jnx 23 xraise @23: @22: condnotjmp 21 pushnull pushlocals assignprop file pop jnx 25 pushthis assignprop file pop jnx 25 pushsys assignprop file pop jnx 25 xraise @25: pop pushnull pushlocals assignprop modified pop jnx 26 pushthis assignprop modified pop jnx 26 pushsys assignprop modified pop jnx 26 xraise @26: pop pushsys doret 1 @21: pushnull doret 1 pushnull doret 1 end sub open 0 0 code pushthis cm canClose 0 jnx 28 pop pushlocals getprop canClose jnx 30 pop pushthis getprop canClose jnx 30 pop pushsys getprop canClose jnx 30 pop xraise @30: cm op:call 0 jnx 29 xraise @29: @28: condnotjmp 27 pushlocals getprop filetype jnx 34 pop pushthis getprop filetype jnx 34 pop pushsys getprop filetype jnx 34 pop xraise @34: pushstr "*." cm op:add 1 jnx 33 xraise @33: pushlocals getprop OpenDialog jnx 35 pop pushthis getprop OpenDialog jnx 35 pop pushsys getprop OpenDialog jnx 35 pop xraise @35: cm run 1 jnx 32 xraise @32: pushlocals initprop res pop condnotjmp 31 pushlocals getprop res jnx 37 pop pushthis getprop res jnx 37 pop pushsys getprop res jnx 37 pop xraise @37: pushlocals assignprop file pop jnx 36 pushthis assignprop file pop jnx 36 pushsys assignprop file pop jnx 36 xraise @36: pop pushlocals getprop file jnx 39 pop pushthis getprop file jnx 39 pop pushsys getprop file jnx 39 pop xraise @39: pushlocals getprop intf jnx 40 pop pushthis getprop intf jnx 40 pop pushsys getprop intf jnx 40 pop xraise @40: cm load 1 jnx 38 xraise @38: pop pushnull pushlocals assignprop modified pop jnx 41 pushthis assignprop modified pop jnx 41 pushsys assignprop modified pop jnx 41 xraise @41: pop @31: pushlocals deleteprops 1 pop @27: pushnull doret 1 end sub canClose 0 0 code pushlocals getprop modified jnx 45 pop pushthis getprop modified jnx 45 pop pushsys getprop modified jnx 45 pop xraise @45: condjmp 43 pushlocals getprop intf jnx 47 pop pushthis getprop intf jnx 47 pop pushsys getprop intf jnx 47 pop xraise @47: cm modified 0 jnx 46 xraise @46: condjmp 43 pushnull jmp 44 @43: pushsys @44: condnotjmp 42 pushstr " zmenen, ulozit?" pushlocals getprop file jnx 60 pop pushthis getprop file jnx 60 pop pushsys getprop file jnx 60 pop xraise @60: condnotjmp 58 pushstr "[Beze jmena]" jmp 59 @58: pushlocals getprop file jnx 61 pop pushthis getprop file jnx 61 pop pushsys getprop file jnx 61 pop xraise @61: @59: pushstr "Soubor " cm op:add 1 jnx 57 xraise @57: cm op:add 1 jnx 56 xraise @56: pushstr "ync" pushlocals getprop Window jnx 62 pop pushthis getprop Window jnx 62 pop pushsys getprop Window jnx 62 pop xraise @62: cm msgbox 2 jnx 55 xraise @55: pushstr "y" dup 2 cm op:eq 1 jnx 50 xraise @50: condnotjmp 49 pushthis cm save 0 jnx 63 pop pushlocals getprop save jnx 65 pop pushthis getprop save jnx 65 pop pushsys getprop save jnx 65 pop xraise @65: cm op:call 0 jnx 64 xraise @64: @63: doret 1 jmp 48 @49: pushstr "n" dup 2 cm op:eq 1 jnx 52 xraise @52: condnotjmp 51 pushsys doret 1 jmp 48 @51: pushstr "c" dup 2 cm op:eq 1 jnx 54 xraise @54: condnotjmp 53 pushnull doret 1 jmp 48 @53: @48: pop @42: pushsys doret 1 pushnull doret 1 end sub modify 0 0 code pushsys pushlocals assignprop modified pop jnx 66 pushthis assignprop modified pop jnx 66 pushsys assignprop modified pop jnx 66 xraise @66: pop pushnull doret 1 end sub get:file 0 0 code pushlocals getprop file jnx 69 pop pushthis getprop file jnx 69 pop pushsys getprop file jnx 69 pop xraise @69: condnotjmp 67 pushlocals getprop file jnx 70 pop pushthis getprop file jnx 70 pop pushsys getprop file jnx 70 pop xraise @70: jmp 68 @67: pushstr "[Beze jmena]" @68: doret 1 pushnull doret 1 end sub @init:op:new 2 2 code pushparam 0 pushlocals setprop intf polypop 2 pushparam 1 pushlocals setprop filetype polypop 2 pushnull pushthis initprop intf polypop 2 pushnull pushthis initprop file polypop 2 pushnull pushthis initprop modified polypop 2 pushnull pushthis initprop filetype polypop 2 pushlocals getprop intf jnx 71 pop pushthis getprop intf jnx 71 pop pushsys getprop intf jnx 71 pop xraise @71: pushthis setprop intf pop pop pushlocals getprop filetype jnx 72 pop pushthis getprop filetype jnx 72 pop pushsys getprop filetype jnx 72 pop xraise @72: pushthis setprop filetype pop pop pushthis doret 1 end end module wintools.module 32 sub @init 0 code ;Initialization of class SDIFile co SDIFile.class pushsys setprop SDIFile pop pushthis setprop SDIFile xchg 1 2 setprop module polypop 2 ;Init block of module doret 0 end end