Chip 2002 September

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

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

Wrap

Text File | 2002-07-01 | 17KB | 1,758 lines

;This is machine generated file, do not edit ;Generated by JavaScript module notconf.module 32 sub run 1 1 code pushparam 0 pushlocals setprop data polypop 2 pushlocals getprop data jnx 0 pop pushthis getprop data jnx 0 pop pushsys getprop data jnx 0 pop xraise @0: pushthis setprop data pop pop pushlocals getprop data jnx 4 pop pushthis getprop data jnx 4 pop pushsys getprop data jnx 4 pop xraise @4: cm get:ctrl 0 jnx 3 xraise @3: condnotjmp 1 pushlocals getprop data jnx 7 pop pushthis getprop data jnx 7 pop pushsys getprop data jnx 7 pop xraise @7: cm get:tact 0 jnx 6 xraise @6: pushstr "noteditModule" pushsys cm op:get:prop 1 cm playmidifrom 1 jnx 5 xraise @5: pop jmp 2 @1: pushthis cm runconf 0 jnx 8 pop pushlocals getprop runconf jnx 10 pop pushthis getprop runconf jnx 10 pop pushsys getprop runconf jnx 10 pop xraise @10: cm op:call 0 jnx 9 xraise @9: @8: pop @2: pushnull doret 1 end sub runconf 0 0 code pushlocals getprop Form jnx 13 pop pushthis getprop Form jnx 13 pop pushsys getprop Form jnx 13 pop xraise @13: cm op:new 0 jnx 12 xraise @12: pushlocals assignprop form pop jnx 11 pushthis assignprop form pop jnx 11 pushsys assignprop form pop jnx 11 xraise @11: pop pushstr "notedit.tactopt" pushlocals getprop form jnx 16 pop pushthis getprop form jnx 16 pop pushsys getprop form jnx 16 pop xraise @16: cm loadWindow 1 jnx 15 xraise @15: pushlocals assignprop win pop jnx 14 pushthis assignprop win pop jnx 14 pushsys assignprop win pop jnx 14 xraise @14: pop pushthis pushlocals getprop form jnx 18 pop pushthis getprop form jnx 18 pop pushsys getprop form jnx 18 pop xraise @18: cm set:handler 1 jnx 17 xraise @17: pop pushlocals getprop data jnx 22 pop pushthis getprop data jnx 22 pop pushsys getprop data jnx 22 pop xraise @22: cm get:line 0 jnx 21 xraise @21: pushlocals getprop data jnx 24 pop pushthis getprop data jnx 24 pop pushsys getprop data jnx 24 pop xraise @24: cm get:tact 0 jnx 23 xraise @23: pushstr "notepart" pushsys cm op:get:prop 1 cm op:get:index 2 jnx 20 xraise @20: pushlocals assignprop elem pop jnx 19 pushthis assignprop elem pop jnx 19 pushsys assignprop elem pop jnx 19 xraise @19: pop pushlocals getprop data jnx 28 pop pushthis getprop data jnx 28 pop pushsys getprop data jnx 28 pop xraise @28: cm get:tact 0 jnx 27 xraise @27: pushstr "notepart" pushsys cm op:get:prop 1 cm getTact 1 jnx 26 xraise @26: pushlocals assignprop tact pop jnx 25 pushthis assignprop tact pop jnx 25 pushsys assignprop tact pop jnx 25 xraise @25: pop pushlocals getprop data jnx 32 pop pushthis getprop data jnx 32 pop pushsys getprop data jnx 32 pop xraise @32: cm get:line 0 jnx 31 xraise @31: pushstr "notepart" pushsys cm op:get:prop 1 cm getLine 1 jnx 30 xraise @30: pushlocals assignprop line pop jnx 29 pushthis assignprop line pop jnx 29 pushsys assignprop line pop jnx 29 xraise @29: pop pushlocals getprop elem jnx 36 pop pushthis getprop elem jnx 36 pop pushsys getprop elem jnx 36 pop xraise @36: cm get:cleftype 0 jnx 35 xraise @35: pushlocals getprop clef_types jnx 37 pop pushthis getprop clef_types jnx 37 pop pushsys getprop clef_types jnx 37 pop xraise @37: cm search 1 jnx 34 xraise @34: pushstr "cleftype" pushlocals getprop form jnx 38 pop pushthis getprop form jnx 38 pop pushsys getprop form jnx 38 pop xraise @38: cm op:get:prop 1 cm set:cur 1 jnx 33 xraise @33: pop pushlocals getprop elem jnx 42 pop pushthis getprop elem jnx 42 pop pushsys getprop elem jnx 42 pop xraise @42: cm get:pr 0 jnx 41 xraise @41: pushlocals getprop pr_types jnx 43 pop pushthis getprop pr_types jnx 43 pop pushsys getprop pr_types jnx 43 pop xraise @43: cm search 1 jnx 40 xraise @40: pushstr "predzn" pushlocals getprop form jnx 44 pop pushthis getprop form jnx 44 pop pushsys getprop form jnx 44 pop xraise @44: cm op:get:prop 1 cm set:cur 1 jnx 39 xraise @39: pop pushstr "instrumentModule" pushsys cm op:get:prop 1 cm getInstruments 0 jnx 46 xraise @46: pushlocals assignprop ins pop jnx 45 pushthis assignprop ins pop jnx 45 pushsys assignprop ins pop jnx 45 xraise @45: pop pushlocals getprop ins jnx 49 pop pushthis getprop ins jnx 49 pop pushsys getprop ins jnx 49 pop xraise @49: cm getGroups 0 jnx 48 xraise @48: pushstr "igroup" pushlocals getprop form jnx 50 pop pushthis getprop form jnx 50 pop pushsys getprop form jnx 50 pop xraise @50: cm op:get:prop 1 cm set:items 1 jnx 47 xraise @47: pop pushlocals getprop line jnx 53 pop pushthis getprop line jnx 53 pop pushsys getprop line jnx 53 pop xraise @53: cm get:instrument 0 jnx 52 xraise @52: pushlocals assignprop instrumentResult pop jnx 51 pushthis assignprop instrumentResult pop jnx 51 pushsys assignprop instrumentResult pop jnx 51 xraise @51: pop pushlocals getprop instrumentResult jnx 55 pop pushthis getprop instrumentResult jnx 55 pop pushsys getprop instrumentResult jnx 55 pop xraise @55: pushlocals getprop ins jnx 56 pop pushthis getprop ins jnx 56 pop pushsys getprop ins jnx 56 pop xraise @56: cm find 1 jnx 54 xraise @54: pushlocals initprop act polypop 2 pushlocals getprop act jnx 59 pop pushthis getprop act jnx 59 pop pushsys getprop act jnx 59 pop xraise @59: cm get:groupIndex 0 jnx 58 xraise @58: pushstr "igroup" pushlocals getprop form jnx 60 pop pushthis getprop form jnx 60 pop pushsys getprop form jnx 60 pop xraise @60: cm op:get:prop 1 cm set:cur 1 jnx 57 xraise @57: pop pushthis cm changeigroup 0 jnx 61 pop pushlocals getprop changeigroup jnx 63 pop pushthis getprop changeigroup jnx 63 pop pushsys getprop changeigroup jnx 63 pop xraise @63: cm op:call 0 jnx 62 xraise @62: @61: pop pushlocals getprop act jnx 66 pop pushthis getprop act jnx 66 pop pushsys getprop act jnx 66 pop xraise @66: cm get:index 0 jnx 65 xraise @65: pushstr "instrument" pushlocals getprop form jnx 67 pop pushthis getprop form jnx 67 pop pushsys getprop form jnx 67 pop xraise @67: cm op:get:prop 1 cm set:cur 1 jnx 64 xraise @64: pop pushlocals getprop elem jnx 71 pop pushthis getprop elem jnx 71 pop pushsys getprop elem jnx 71 pop xraise @71: cm get:velocity 0 jnx 70 xraise @70: pushlocals getprop velocities jnx 72 pop pushthis getprop velocities jnx 72 pop pushsys getprop velocities jnx 72 pop xraise @72: cm search 1 jnx 69 xraise @69: pushstr "velocity" pushlocals getprop form jnx 73 pop pushthis getprop form jnx 73 pop pushsys getprop form jnx 73 pop xraise @73: cm op:get:prop 1 cm set:cur 1 jnx 68 xraise @68: pop pushlocals getprop tact jnx 77 pop pushthis getprop tact jnx 77 pop pushsys getprop tact jnx 77 pop xraise @77: cm get:type 0 jnx 76 xraise @76: pushlocals getprop tact_types jnx 78 pop pushthis getprop tact_types jnx 78 pop pushsys getprop tact_types jnx 78 pop xraise @78: cm search 1 jnx 75 xraise @75: pushstr "tact" pushlocals getprop form jnx 79 pop pushthis getprop form jnx 79 pop pushsys getprop form jnx 79 pop xraise @79: cm op:get:prop 1 cm set:cur 1 jnx 74 xraise @74: pop pushlocals getprop elem jnx 83 pop pushthis getprop elem jnx 83 pop pushsys getprop elem jnx 83 pop xraise @83: cm get:pedal 0 jnx 82 xraise @82: pushlocals getprop pedal_types jnx 84 pop pushthis getprop pedal_types jnx 84 pop pushsys getprop pedal_types jnx 84 pop xraise @84: cm search 1 jnx 81 xraise @81: pushstr "pedal" pushlocals getprop form jnx 85 pop pushthis getprop form jnx 85 pop pushsys getprop form jnx 85 pop xraise @85: cm op:get:prop 1 cm set:cur 1 jnx 80 xraise @80: pop pushlocals getprop tact jnx 88 pop pushthis getprop tact jnx 88 pop pushsys getprop tact jnx 88 pop xraise @88: cm get:tempo 0 jnx 87 xraise @87: pushstr "tempo" pushlocals getprop form jnx 89 pop pushthis getprop form jnx 89 pop pushsys getprop form jnx 89 pop xraise @89: cm op:get:prop 1 cm set:text 1 jnx 86 xraise @86: pop pushlocals getprop elem jnx 92 pop pushthis getprop elem jnx 92 pop pushsys getprop elem jnx 92 pop xraise @92: cm get:doctava 0 jnx 91 xraise @91: pushstr "doctava" pushlocals getprop form jnx 93 pop pushthis getprop form jnx 93 pop pushsys getprop form jnx 93 pop xraise @93: cm op:get:prop 1 cm set:text 1 jnx 90 xraise @90: pop pushlocals getprop win jnx 95 pop pushthis getprop win jnx 95 pop pushsys getprop win jnx 95 pop xraise @95: cm showModal 0 jnx 94 xraise @94: pop pushlocals deleteprops 1 pop pushnull doret 1 end sub changeigroup 0 0 code pushstr "igroup" pushlocals getprop form jnx 97 pop pushthis getprop form jnx 97 pop pushsys getprop form jnx 97 pop xraise @97: cm op:get:prop 1 cm get:cur 0 jnx 96 xraise @96: pushlocals initprop cg polypop 2 pushlocals getprop cg jnx 100 pop pushthis getprop cg jnx 100 pop pushsys getprop cg jnx 100 pop xraise @100: pushlocals getprop ins jnx 101 pop pushthis getprop ins jnx 101 pop pushsys getprop ins jnx 101 pop xraise @101: cm getInstruments 1 jnx 99 xraise @99: pushstr "instrument" pushlocals getprop form jnx 102 pop pushthis getprop form jnx 102 pop pushsys getprop form jnx 102 pop xraise @102: cm op:get:prop 1 cm set:items 1 jnx 98 xraise @98: pop pushnum 0 pushstr "instrument" pushlocals getprop form jnx 104 pop pushthis getprop form jnx 104 pop pushsys getprop form jnx 104 pop xraise @104: cm op:get:prop 1 cm set:cur 1 jnx 103 xraise @103: pop pushthis cm ichange 0 jnx 105 pop pushlocals getprop ichange jnx 107 pop pushthis getprop ichange jnx 107 pop pushsys getprop ichange jnx 107 pop xraise @107: cm op:call 0 jnx 106 xraise @106: @105: pop pushlocals deleteprops 1 pop pushnull doret 1 end sub ichange 0 0 code pushstr "igroup" pushlocals getprop form jnx 111 pop pushthis getprop form jnx 111 pop pushsys getprop form jnx 111 pop xraise @111: cm op:get:prop 1 cm get:cur 0 jnx 110 xraise @110: pushstr "instrument" pushlocals getprop form jnx 113 pop pushthis getprop form jnx 113 pop pushsys getprop form jnx 113 pop xraise @113: cm op:get:prop 1 cm get:cur 0 jnx 112 xraise @112: pushlocals getprop ins jnx 114 pop pushthis getprop ins jnx 114 pop pushsys getprop ins jnx 114 pop xraise @114: cm instrumentId 2 jnx 109 xraise @109: pushlocals assignprop instrumentResult pop jnx 108 pushthis assignprop instrumentResult pop jnx 108 pushsys assignprop instrumentResult pop jnx 108 xraise @108: pop pushnull doret 1 end sub okclick 0 0 code pushlocals getprop win jnx 116 pop pushthis getprop win jnx 116 pop pushsys getprop win jnx 116 pop xraise @116: cm close 0 jnx 115 xraise @115: pop pushstr "predzn" pushlocals getprop form jnx 120 pop pushthis getprop form jnx 120 pop pushsys getprop form jnx 120 pop xraise @120: cm op:get:prop 1 cm get:cur 0 jnx 119 xraise @119: pushlocals getprop pr_types jnx 121 pop pushthis getprop pr_types jnx 121 pop pushsys getprop pr_types jnx 121 pop xraise @121: cm op:get:index 1 jnx 118 xraise @118: pushlocals getprop elem jnx 122 pop pushthis getprop elem jnx 122 pop pushsys getprop elem jnx 122 pop xraise @122: cm set:pr 1 jnx 117 xraise @117: pop pushstr "cleftype" pushlocals getprop form jnx 126 pop pushthis getprop form jnx 126 pop pushsys getprop form jnx 126 pop xraise @126: cm op:get:prop 1 cm get:cur 0 jnx 125 xraise @125: pushlocals getprop clef_types jnx 127 pop pushthis getprop clef_types jnx 127 pop pushsys getprop clef_types jnx 127 pop xraise @127: cm op:get:index 1 jnx 124 xraise @124: pushlocals getprop elem jnx 128 pop pushthis getprop elem jnx 128 pop pushsys getprop elem jnx 128 pop xraise @128: cm set:cleftype 1 jnx 123 xraise @123: pop pushstr "velocity" pushlocals getprop form jnx 132 pop pushthis getprop form jnx 132 pop pushsys getprop form jnx 132 pop xraise @132: cm op:get:prop 1 cm get:cur 0 jnx 131 xraise @131: pushlocals getprop velocities jnx 133 pop pushthis getprop velocities jnx 133 pop pushsys getprop velocities jnx 133 pop xraise @133: cm op:get:index 1 jnx 130 xraise @130: pushlocals getprop elem jnx 134 pop pushthis getprop elem jnx 134 pop pushsys getprop elem jnx 134 pop xraise @134: cm set:velocity 1 jnx 129 xraise @129: pop pushlocals getprop instrumentResult jnx 136 pop pushthis getprop instrumentResult jnx 136 pop pushsys getprop instrumentResult jnx 136 pop xraise @136: pushlocals getprop line jnx 137 pop pushthis getprop line jnx 137 pop pushsys getprop line jnx 137 pop xraise @137: cm set:instrument 1 jnx 135 xraise @135: pop pushstr "tact" pushlocals getprop form jnx 141 pop pushthis getprop form jnx 141 pop pushsys getprop form jnx 141 pop xraise @141: cm op:get:prop 1 cm get:cur 0 jnx 140 xraise @140: pushlocals getprop tact_types jnx 142 pop pushthis getprop tact_types jnx 142 pop pushsys getprop tact_types jnx 142 pop xraise @142: cm op:get:index 1 jnx 139 xraise @139: pushlocals getprop tact jnx 143 pop pushthis getprop tact jnx 143 pop pushsys getprop tact jnx 143 pop xraise @143: cm set:type 1 jnx 138 xraise @138: pop pushstr "tempo" pushlocals getprop form jnx 146 pop pushthis getprop form jnx 146 pop pushsys getprop form jnx 146 pop xraise @146: cm op:get:prop 1 cm get:text 0 jnx 145 xraise @145: pushlocals getprop tact jnx 147 pop pushthis getprop tact jnx 147 pop pushsys getprop tact jnx 147 pop xraise @147: cm set:tempo 1 jnx 144 xraise @144: pop pushstr "pedal" pushlocals getprop form jnx 151 pop pushthis getprop form jnx 151 pop pushsys getprop form jnx 151 pop xraise @151: cm op:get:prop 1 cm get:cur 0 jnx 150 xraise @150: pushlocals getprop pedal_types jnx 152 pop pushthis getprop pedal_types jnx 152 pop pushsys getprop pedal_types jnx 152 pop xraise @152: cm op:get:index 1 jnx 149 xraise @149: pushlocals getprop elem jnx 153 pop pushthis getprop elem jnx 153 pop pushsys getprop elem jnx 153 pop xraise @153: cm set:pedal 1 jnx 148 xraise @148: pop pushstr "doctava" pushlocals getprop form jnx 156 pop pushthis getprop form jnx 156 pop pushsys getprop form jnx 156 pop xraise @156: cm op:get:prop 1 cm get:text 0 jnx 155 xraise @155: pushlocals getprop elem jnx 157 pop pushthis getprop elem jnx 157 pop pushsys getprop elem jnx 157 pop xraise @157: cm set:doctava 1 jnx 154 xraise @154: pop pushnull doret 1 end sub cancelclick 0 0 code pushlocals getprop win jnx 159 pop pushthis getprop win jnx 159 pop pushsys getprop win jnx 159 pop xraise @159: cm close 0 jnx 158 xraise @158: pop pushnull doret 1 end sub @init 0 code ;Init block of module pushstr "notconf" pushthis pushsys cm op:set:prop 2 jnx 160 xraise @160: pop pushnull pushthis initprop form polypop 2 pushnull pushthis initprop win polypop 2 pushnull pushthis initprop data polypop 2 pushnull pushthis initprop elem polypop 2 pushnull pushthis initprop ins polypop 2 pushnull pushthis initprop tact polypop 2 pushnull pushthis initprop line polypop 2 pushnull pushthis initprop instrumentResult polypop 2 pushstr "" pushstr "violin" pushstr "bas" pushsys cm createArray 3 jnx 161 xraise @161: pushthis initprop clef_types polypop 2 pushstr "" pushstr "ff" pushstr "f" pushstr "mf" pushstr "p" pushstr "pp" pushsys cm createArray 6 jnx 162 xraise @162: pushthis initprop velocities polypop 2 pushstr "" pushstr "4/4" pushstr "3/4" pushstr "2/4" pushstr "6/8" pushsys cm createArray 5 jnx 163 xraise @163: pushthis initprop tact_types polypop 2 pushstr "" pushstr "yes" pushstr "no" pushsys cm createArray 3 jnx 164 xraise @164: pushthis initprop pedal_types polypop 2 pushstr "" pushstr "-5" pushstr "-4" pushstr "-3" pushstr "-2" pushstr "-1" pushstr "0" pushstr "1" pushstr "2" pushstr "3" pushstr "4" pushstr "5" pushsys cm createArray 12 jnx 165 xraise @165: pushthis initprop pr_types polypop 2 doret 0 end end