Chip 2002 September

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

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

Wrap

Text File | 2002-07-21 | 21KB | 2,204 lines

;This is machine generated file, do not edit ;Generated by JavaScript module notedit.module 48 sub exit 0 0 code pushlocals getprop Application jnx 1 pop pushthis getprop Application jnx 1 pop pushsys getprop Application jnx 1 pop xraise @1: cm exit 0 jnx 0 xraise @0: pop pushnull doret 1 end sub modified 0 0 code pushlocals getprop notepart jnx 3 pop pushthis getprop notepart jnx 3 pop pushsys getprop notepart jnx 3 pop xraise @3: cm get:modified 0 jnx 2 xraise @2: doret 1 pushnull doret 1 end sub save 1 1 code pushparam 0 pushlocals setprop file polypop 2 pushlocals getprop XMLNode jnx 5 pop pushthis getprop XMLNode jnx 5 pop pushsys getprop XMLNode jnx 5 pop xraise @5: cm op:new 0 jnx 4 xraise @4: pushlocals initprop xml polypop 2 pushlocals getprop xml jnx 7 pop pushthis getprop xml jnx 7 pop pushsys getprop xml jnx 7 pop xraise @7: pushlocals getprop notepart jnx 8 pop pushthis getprop notepart jnx 8 pop pushsys getprop notepart jnx 8 pop xraise @8: cm save 1 jnx 6 xraise @6: pop pushlocals getprop file jnx 10 pop pushthis getprop file jnx 10 pop pushsys getprop file jnx 10 pop xraise @10: pushlocals getprop xml jnx 11 pop pushthis getprop xml jnx 11 pop pushsys getprop xml jnx 11 pop xraise @11: cm save 1 jnx 9 xraise @9: pop pushnull pushlocals getprop notepart jnx 13 pop pushthis getprop notepart jnx 13 pop pushsys getprop notepart jnx 13 pop xraise @13: cm set:modified 1 jnx 12 xraise @12: pop pushlocals deleteprops 1 pop pushnull doret 1 end sub load 1 1 code pushparam 0 pushlocals setprop file polypop 2 pushlocals getprop XMLNode jnx 15 pop pushthis getprop XMLNode jnx 15 pop pushsys getprop XMLNode jnx 15 pop xraise @15: cm op:new 0 jnx 14 xraise @14: pushlocals initprop xml polypop 2 pushlocals getprop file jnx 17 pop pushthis getprop file jnx 17 pop pushsys getprop file jnx 17 pop xraise @17: pushlocals getprop xml jnx 18 pop pushthis getprop xml jnx 18 pop pushsys getprop xml jnx 18 pop xraise @18: cm load 1 jnx 16 xraise @16: pop pushlocals getprop xml jnx 20 pop pushthis getprop xml jnx 20 pop pushsys getprop xml jnx 20 pop xraise @20: pushlocals getprop notepart jnx 21 pop pushthis getprop notepart jnx 21 pop pushsys getprop notepart jnx 21 pop xraise @21: cm load 1 jnx 19 xraise @19: pop pushnull pushlocals getprop notepart jnx 23 pop pushthis getprop notepart jnx 23 pop pushsys getprop notepart jnx 23 pop xraise @23: cm set:modified 1 jnx 22 xraise @22: pop pushlocals deleteprops 1 pop pushnull doret 1 end sub savefile 0 0 code pushlocals getprop sdifile jnx 25 pop pushthis getprop sdifile jnx 25 pop pushsys getprop sdifile jnx 25 pop xraise @25: cm save 0 jnx 24 xraise @24: pop pushnull doret 1 end sub saveasfile 0 0 code pushlocals getprop sdifile jnx 27 pop pushthis getprop sdifile jnx 27 pop pushsys getprop sdifile jnx 27 pop xraise @27: cm saveAs 0 jnx 26 xraise @26: pop pushnull doret 1 end sub loadfile 0 0 code pushlocals getprop sdifile jnx 29 pop pushthis getprop sdifile jnx 29 pop pushsys getprop sdifile jnx 29 pop xraise @29: cm open 0 jnx 28 xraise @28: pop pushnull doret 1 end sub newfile 0 0 code pushlocals getprop sdifile jnx 32 pop pushthis getprop sdifile jnx 32 pop pushsys getprop sdifile jnx 32 pop xraise @32: cm canNew 0 jnx 31 xraise @31: condnotjmp 30 pushlocals getprop notepart jnx 34 pop pushthis getprop notepart jnx 34 pop pushsys getprop notepart jnx 34 pop xraise @34: cm clear 0 jnx 33 xraise @33: pop pushnull pushlocals getprop notepart jnx 36 pop pushthis getprop notepart jnx 36 pop pushsys getprop notepart jnx 36 pop xraise @36: cm set:modified 1 jnx 35 xraise @35: pop @30: pushnull doret 1 end sub doclose 0 0 code pushlocals getprop sdifile jnx 41 pop pushthis getprop sdifile jnx 41 pop pushsys getprop sdifile jnx 41 pop xraise @41: cm canClose 0 jnx 40 xraise @40: condjmp 38 pushsys jmp 39 @38: pushnull @39: condnotjmp 37 pushlocals getprop win jnx 43 pop pushthis getprop win jnx 43 pop pushsys getprop win jnx 43 pop xraise @43: cm denyClose 0 jnx 42 xraise @42: pop @37: pushnull doret 1 end sub modechange 0 0 code pushstr "delky" pushlocals getprop form jnx 46 pop pushthis getprop form jnx 46 pop pushsys getprop form jnx 46 pop xraise @46: cm op:get:prop 1 cm get:cur 0 jnx 45 xraise @45: pushlocals getprop delky_not jnx 47 pop pushthis getprop delky_not jnx 47 pop pushsys getprop delky_not jnx 47 pop xraise @47: cm op:get:index 1 jnx 44 xraise @44: pushlocals initprop len polypop 2 pushstr "action" pushlocals getprop form jnx 49 pop pushthis getprop form jnx 49 pop pushsys getprop form jnx 49 pop xraise @49: cm op:get:prop 1 cm get:cur 0 jnx 48 xraise @48: pushlocals initprop action polypop 2 pushlocals getprop action jnx 59 pop pushthis getprop action jnx 59 pop pushsys getprop action jnx 59 pop xraise @59: pushnum 0 dup 2 cm op:eq 1 jnx 52 xraise @52: condnotjmp 51 pushlocals getprop len jnx 61 pop pushthis getprop len jnx 61 pop pushsys getprop len jnx 61 pop xraise @61: pushlocals getprop notedit jnx 62 pop pushthis getprop notedit jnx 62 pop pushsys getprop notedit jnx 62 pop xraise @62: cm insertNote 1 jnx 60 xraise @60: pop jmp 50 @51: pushnum 1 dup 2 cm op:eq 1 jnx 54 xraise @54: condnotjmp 53 pushlocals getprop len jnx 64 pop pushthis getprop len jnx 64 pop pushsys getprop len jnx 64 pop xraise @64: pushlocals getprop notedit jnx 65 pop pushthis getprop notedit jnx 65 pop pushsys getprop notedit jnx 65 pop xraise @65: cm insertPause 1 jnx 63 xraise @63: pop jmp 50 @53: pushnum 2 dup 2 cm op:eq 1 jnx 56 xraise @56: condnotjmp 55 pushlocals getprop notedit jnx 67 pop pushthis getprop notedit jnx 67 pop pushsys getprop notedit jnx 67 pop xraise @67: cm changePr 0 jnx 66 xraise @66: pop jmp 50 @55: pushnum 3 dup 2 cm op:eq 1 jnx 58 xraise @58: condnotjmp 57 pushlocals getprop notedit jnx 69 pop pushthis getprop notedit jnx 69 pop pushsys getprop notedit jnx 69 pop xraise @69: cm changePt 0 jnx 68 xraise @68: pop jmp 50 @57: @50: pop pushlocals deleteprops 2 pop pushnull doret 1 end sub export 0 0 code pushstr "*.mid" pushlocals getprop SaveDialog jnx 72 pop pushthis getprop SaveDialog jnx 72 pop pushsys getprop SaveDialog jnx 72 pop xraise @72: cm run 1 jnx 71 xraise @71: pushlocals initprop file pop condnotjmp 70 pushlocals getprop MidiStream jnx 74 pop pushthis getprop MidiStream jnx 74 pop pushsys getprop MidiStream jnx 74 pop xraise @74: cm op:new 0 jnx 73 xraise @73: pushlocals initprop strm polypop 2 pushlocals getprop strm jnx 76 pop pushthis getprop strm jnx 76 pop pushsys getprop strm jnx 76 pop xraise @76: pushlocals getprop notepart jnx 77 pop pushthis getprop notepart jnx 77 pop pushsys getprop notepart jnx 77 pop xraise @77: cm saveMidi 1 jnx 75 xraise @75: pop pushlocals getprop file jnx 79 pop pushthis getprop file jnx 79 pop pushsys getprop file jnx 79 pop xraise @79: pushlocals getprop strm jnx 80 pop pushthis getprop strm jnx 80 pop pushsys getprop strm jnx 80 pop xraise @80: cm save 1 jnx 78 xraise @78: pop pushlocals deleteprops 1 pop @70: pushlocals deleteprops 1 pop pushnull doret 1 end sub about 0 0 code pushstr "NotoEditor\nVyrobil Jan Prochßzka, 2002\ne-mail:zputil@centrum.cz\nWWW:zputil.hyperlink.cz" pushlocals getprop Window jnx 82 pop pushthis getprop Window jnx 82 pop pushsys getprop Window jnx 82 pop xraise @82: cm alert 1 jnx 81 xraise @81: pop pushnull doret 1 end sub notconfigure 0 0 code pushlocals getprop notedit jnx 85 pop pushthis getprop notedit jnx 85 pop pushsys getprop notedit jnx 85 pop xraise @85: cm get:configureData 0 jnx 84 xraise @84: pushstr "notconf" pushsys cm op:get:prop 1 cm run 1 jnx 83 xraise @83: pop pushnull doret 1 end sub notorgselect 0 0 code pushstr "notorgModule" pushsys cm op:get:prop 1 cm run 0 jnx 86 xraise @86: pop pushnull doret 1 end sub isplaying 0 0 code pushlocals getprop player jnx 88 pop pushthis getprop player jnx 88 pop pushsys getprop player jnx 88 pop xraise @88: condnotjmp 87 pushstr "P°ehrßvßnφ u₧ probφhß" pushlocals getprop Window jnx 90 pop pushthis getprop Window jnx 90 pop pushsys getprop Window jnx 90 pop xraise @90: cm alert 1 jnx 89 xraise @89: pop @87: pushlocals getprop player jnx 91 pop pushthis getprop player jnx 91 pop pushsys getprop player jnx 91 pop xraise @91: doret 1 pushnull doret 1 end sub stopmidi 0 0 code pushlocals getprop player jnx 94 pop pushthis getprop player jnx 94 pop pushsys getprop player jnx 94 pop xraise @94: condnotjmp 92 pushlocals getprop player jnx 96 pop pushthis getprop player jnx 96 pop pushsys getprop player jnx 96 pop xraise @96: cm stop 0 jnx 95 xraise @95: pop pushnull pushlocals assignprop player pop jnx 97 pushthis assignprop player pop jnx 97 pushsys assignprop player pop jnx 97 xraise @97: pop jmp 93 @92: pushstr "P°ehrßvßnφ neprobφhß" pushlocals getprop Window jnx 99 pop pushthis getprop Window jnx 99 pop pushsys getprop Window jnx 99 pop xraise @99: cm alert 1 jnx 98 xraise @98: pop @93: pushnull doret 1 end sub playorstopmidi 0 0 code pushlocals getprop player jnx 102 pop pushthis getprop player jnx 102 pop pushsys getprop player jnx 102 pop xraise @102: condnotjmp 100 pushthis cm stopmidi 0 jnx 103 pop pushlocals getprop stopmidi jnx 105 pop pushthis getprop stopmidi jnx 105 pop pushsys getprop stopmidi jnx 105 pop xraise @105: cm op:call 0 jnx 104 xraise @104: @103: pop jmp 101 @100: pushthis cm playmidi 0 jnx 106 pop pushlocals getprop playmidi jnx 108 pop pushthis getprop playmidi jnx 108 pop pushsys getprop playmidi jnx 108 pop xraise @108: cm op:call 0 jnx 107 xraise @107: @106: pop @101: pushnull doret 1 end sub playitem 0 0 code pushlocals getprop player jnx 112 pop pushthis getprop player jnx 112 pop pushsys getprop player jnx 112 pop xraise @112: condjmp 110 pushsys jmp 111 @110: pushnull @111: condnotjmp 109 pushnull doret 1 @109: pushlocals getprop player jnx 114 pop pushthis getprop player jnx 114 pop pushsys getprop player jnx 114 pop xraise @114: cm play 0 jnx 113 xraise @113: pop pushlocals getprop player jnx 118 pop pushthis getprop player jnx 118 pop pushsys getprop player jnx 118 pop xraise @118: cm get:hasNext 0 jnx 117 xraise @117: condnotjmp 115 pushlocals getprop player jnx 121 pop pushthis getprop player jnx 121 pop pushsys getprop player jnx 121 pop xraise @121: cm get:delay 0 jnx 120 xraise @120: pushstr "playitem" pushthis pushsys cm createDelegate 2 pushlocals getprop Timer jnx 122 pop pushthis getprop Timer jnx 122 pop pushsys getprop Timer jnx 122 pop xraise @122: cm timer 2 jnx 119 xraise @119: pop jmp 116 @115: pushnull pushlocals assignprop player pop jnx 123 pushthis assignprop player pop jnx 123 pushsys assignprop player pop jnx 123 xraise @123: pop @116: pushnull doret 1 end sub playmidifrom 1 1 code pushparam 0 pushlocals setprop from polypop 2 pushthis cm isplaying 0 jnx 125 pop pushlocals getprop isplaying jnx 127 pop pushthis getprop isplaying jnx 127 pop pushsys getprop isplaying jnx 127 pop xraise @127: cm op:call 0 jnx 126 xraise @126: @125: condnotjmp 124 pushnull doret 1 @124: pushlocals getprop MidiStream jnx 129 pop pushthis getprop MidiStream jnx 129 pop pushsys getprop MidiStream jnx 129 pop xraise @129: cm op:new 0 jnx 128 xraise @128: pushlocals initprop ms polypop 2 pushlocals getprop ms jnx 131 pop pushthis getprop ms jnx 131 pop pushsys getprop ms jnx 131 pop xraise @131: pushlocals getprop from jnx 132 pop pushthis getprop from jnx 132 pop pushsys getprop from jnx 132 pop xraise @132: pushlocals getprop notepart jnx 134 pop pushthis getprop notepart jnx 134 pop pushsys getprop notepart jnx 134 pop xraise @134: cm get:tactCount 0 jnx 133 xraise @133: pushlocals getprop notepart jnx 135 pop pushthis getprop notepart jnx 135 pop pushsys getprop notepart jnx 135 pop xraise @135: cm saveMidi 3 jnx 130 xraise @130: pop pushlocals getprop ms jnx 138 pop pushthis getprop ms jnx 138 pop pushsys getprop ms jnx 138 pop xraise @138: cm play 0 jnx 137 xraise @137: pushlocals assignprop player pop jnx 136 pushthis assignprop player pop jnx 136 pushsys assignprop player pop jnx 136 xraise @136: pop pushthis cm playitem 0 jnx 139 pop pushlocals getprop playitem jnx 141 pop pushthis getprop playitem jnx 141 pop pushsys getprop playitem jnx 141 pop xraise @141: cm op:call 0 jnx 140 xraise @140: @139: pop pushlocals deleteprops 1 pop pushnull doret 1 end sub playmidi 0 0 code pushnum 0 pushthis cm playmidifrom 1 jnx 142 pop pushlocals getprop playmidifrom jnx 144 pop pushthis getprop playmidifrom jnx 144 pop pushsys getprop playmidifrom jnx 144 pop xraise @144: cm op:call 1 jnx 143 xraise @143: @142: pop pushnull doret 1 end sub cancelorgselect 0 0 code pushnull pushlocals getprop notorg jnx 146 pop pushthis getprop notorg jnx 146 pop pushsys getprop notorg jnx 146 pop xraise @146: cm set:frame 1 jnx 145 xraise @145: pop pushnull doret 1 end sub print 0 0 code pushlocals getprop Printer jnx 148 pop pushthis getprop Printer jnx 148 pop pushsys getprop Printer jnx 148 pop xraise @148: cm op:new 0 jnx 147 xraise @147: pushlocals initprop prn polypop 2 pushstr "Notov² zßznam" pushlocals getprop prn jnx 150 pop pushthis getprop prn jnx 150 pop pushsys getprop prn jnx 150 pop xraise @150: cm beginDoc 1 jnx 149 xraise @149: pop pushlocals getprop prn jnx 152 pop pushthis getprop prn jnx 152 pop pushsys getprop prn jnx 152 pop xraise @152: pushlocals getprop notepart jnx 153 pop pushthis getprop notepart jnx 153 pop pushsys getprop notepart jnx 153 pop xraise @153: cm print 1 jnx 151 xraise @151: pop pushlocals getprop prn jnx 155 pop pushthis getprop prn jnx 155 pop pushsys getprop prn jnx 155 pop xraise @155: cm endDoc 0 jnx 154 xraise @154: pop pushlocals deleteprops 1 pop pushnull doret 1 end sub @init 0 code pushstr "NotoEditor" pushthis pushsys cm op:set:prop 2 jnx 0 xraise @0: pop ;Init block of module pushnull pushthis initprop form polypop 2 pushnull pushthis initprop win polypop 2 pushnull pushthis initprop notedit polypop 2 pushnull pushthis initprop notepart polypop 2 pushnull pushthis initprop notorg polypop 2 pushnull pushthis initprop sdifile polypop 2 pushnull pushthis initprop player polypop 2 pushstr "music" pushsys cm op:get:prop 1 pushthis initprop music polypop 2 pushlocals getprop music jnx 158 pop pushthis getprop music jnx 158 pop pushsys getprop music jnx 158 pop xraise @158: cm get:n1 0 jnx 157 xraise @157: pushlocals getprop music jnx 160 pop pushthis getprop music jnx 160 pop pushsys getprop music jnx 160 pop xraise @160: cm get:n2 0 jnx 159 xraise @159: pushlocals getprop music jnx 162 pop pushthis getprop music jnx 162 pop pushsys getprop music jnx 162 pop xraise @162: cm get:n4 0 jnx 161 xraise @161: pushlocals getprop music jnx 164 pop pushthis getprop music jnx 164 pop pushsys getprop music jnx 164 pop xraise @164: cm get:n8 0 jnx 163 xraise @163: pushlocals getprop music jnx 166 pop pushthis getprop music jnx 166 pop pushsys getprop music jnx 166 pop xraise @166: cm get:n16 0 jnx 165 xraise @165: pushsys cm createArray 5 jnx 156 xraise @156: pushthis initprop delky_not polypop 2 pushstr "bmps" pushstr "data" pushlocals getprop File jnx 171 pop pushthis getprop File jnx 171 pop pushsys getprop File jnx 171 pop xraise @171: cm get:root 0 jnx 170 xraise @170: cm op:div 1 jnx 169 xraise @169: cm op:div 1 jnx 168 xraise @168: pushlocals getprop Application jnx 172 pop pushthis getprop Application jnx 172 pop pushsys getprop Application jnx 172 pop xraise @172: cm addSearchPath 1 jnx 167 xraise @167: pop pushstr "NotoEditor" pushlocals getprop Application jnx 174 pop pushthis getprop Application jnx 174 pop pushsys getprop Application jnx 174 pop xraise @174: cm set:title 1 jnx 173 xraise @173: pop pushlocals getprop Form jnx 177 pop pushthis getprop Form jnx 177 pop pushsys getprop Form jnx 177 pop xraise @177: cm op:new 0 jnx 176 xraise @176: pushlocals assignprop form pop jnx 175 pushthis assignprop form pop jnx 175 pushsys assignprop form pop jnx 175 xraise @175: pop pushstr "notedit.mainwin" pushlocals getprop form jnx 180 pop pushthis getprop form jnx 180 pop pushsys getprop form jnx 180 pop xraise @180: cm loadWindow 1 jnx 179 xraise @179: pushlocals assignprop win pop jnx 178 pushthis assignprop win pop jnx 178 pushsys assignprop win pop jnx 178 xraise @178: pop pushthis pushlocals getprop form jnx 182 pop pushthis getprop form jnx 182 pop pushsys getprop form jnx 182 pop xraise @182: cm set:handler 1 jnx 181 xraise @181: pop pushthis pushstr "not" pushlocals getprop SDIFile jnx 185 pop pushthis getprop SDIFile jnx 185 pop pushsys getprop SDIFile jnx 185 pop xraise @185: cm op:new 2 jnx 184 xraise @184: pushlocals assignprop sdifile pop jnx 183 pushthis assignprop sdifile pop jnx 183 pushsys assignprop sdifile pop jnx 183 xraise @183: pop pushstr "notedit" pushlocals getprop form jnx 187 pop pushthis getprop form jnx 187 pop pushsys getprop form jnx 187 pop xraise @187: cm op:get:prop 1 pushlocals assignprop notedit pop jnx 186 pushthis assignprop notedit pop jnx 186 pushsys assignprop notedit pop jnx 186 xraise @186: pop pushstr "notorg" pushlocals getprop form jnx 189 pop pushthis getprop form jnx 189 pop pushsys getprop form jnx 189 pop xraise @189: cm op:get:prop 1 pushlocals assignprop notorg pop jnx 188 pushthis assignprop notorg pop jnx 188 pushsys assignprop notorg pop jnx 188 xraise @188: pop pushlocals getprop notedit jnx 192 pop pushthis getprop notedit jnx 192 pop pushsys getprop notedit jnx 192 pop xraise @192: cm get:notepart 0 jnx 191 xraise @191: pushlocals assignprop notepart pop jnx 190 pushthis assignprop notepart pop jnx 190 pushsys assignprop notepart pop jnx 190 xraise @190: pop pushlocals getprop notepart jnx 194 pop pushthis getprop notepart jnx 194 pop pushsys getprop notepart jnx 194 pop xraise @194: pushlocals getprop notorg jnx 195 pop pushthis getprop notorg jnx 195 pop pushsys getprop notorg jnx 195 pop xraise @195: cm set:notepart 1 jnx 193 xraise @193: pop pushstr "notepart" pushlocals getprop notepart jnx 197 pop pushthis getprop notepart jnx 197 pop pushsys getprop notepart jnx 197 pop xraise @197: pushsys cm op:set:prop 2 jnx 196 xraise @196: pop pushstr "notorg" pushlocals getprop notorg jnx 199 pop pushthis getprop notorg jnx 199 pop pushsys getprop notorg jnx 199 pop xraise @199: pushsys cm op:set:prop 2 jnx 198 xraise @198: pop pushstr "instrumentModule" pushsys cm op:get:prop 1 cm loadInstruments 0 jnx 200 xraise @200: pop pushstr "mainform" pushlocals getprop form jnx 202 pop pushthis getprop form jnx 202 pop pushsys getprop form jnx 202 pop xraise @202: pushsys cm op:set:prop 2 jnx 201 xraise @201: pop pushstr "noteditModule" pushthis pushsys cm op:set:prop 2 jnx 203 xraise @203: pop pushlocals getprop win jnx 205 pop pushthis getprop win jnx 205 pop pushsys getprop win jnx 205 pop xraise @205: cm show 0 jnx 204 xraise @204: pop pushlocals getprop Application jnx 207 pop pushthis getprop Application jnx 207 pop pushsys getprop Application jnx 207 pop xraise @207: cm run 0 jnx 206 xraise @206: pop doret 0 end end