TXT.⠀⠀⠀⠀◯⠀✤ߦꖴᴥᑐᑕᔓᔕ⠀◯⠀✤옷ᕤᕦꖴᙁ옷ᔓᔕᗩ⠀◯⠀⠀⠀⠀ⵙ⠀⠀⠀⠀◯⠀ᗩᔓᔕ옷ᙁꖴᕤᕦ옷✤⠀◯⠀ᔓᔕᑐᑕᴥꖴߦ✤⠀◯⠀⠀⠀⠀.TXT 1.1MB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143514451455146514751485149515051515152515351545155515651575158515951605161516251635164516551665167516851695170517151725173517451755176517751785179518051815182518351845185518651875188518951905191519251935194519551965197519851995200520152025203520452055206520752085209521052115212521352145215521652175218521952205221522252235224522552265227522852295230523152325233523452355236523752385239524052415242524352445245524652475248524952505251525252535254525552565257525852595260526152625263526452655266526752685269527052715272527352745275527652775278527952805281528252835284528552865287528852895290529152925293529452955296529752985299530053015302530353045305530653075308530953105311531253135314531553165317531853195320532153225323532453255326532753285329533053315332533353345335533653375338533953405341534253435344534553465347534853495350535153525353535453555356535753585359536053615362536353645365536653675368536953705371537253735374537553765377537853795380538153825383538453855386538753885389539053915392539353945395539653975398539954005401540254035404540554065407540854095410541154125413541454155416541754185419542054215422542354245425542654275428542954305431543254335434543554365437543854395440544154425443544454455446544754485449545054515452545354545455545654575458545954605461546254635464546554665467546854695470547154725473547454755476547754785479548054815482548354845485548654875488548954905491549254935494549554965497549854995500550155025503550455055506550755085509551055115512551355145515551655175518551955205521552255235524552555265527552855295530553155325533553455355536553755385539554055415542554355445545554655475548554955505551555255535554555555565557555855595560556155625563556455655566556755685569557055715572557355745575557655775578557955805581558255835584558555865587558855895590559155925593559455955596559755985599560056015602560356045605560656075608560956105611561256135614561556165617561856195620562156225623562456255626562756285629563056315632563356345635563656375638563956405641564256435644564556465647564856495650565156525653565456555656565756585659566056615662566356645665566656675668566956705671567256735674567556765677567856795680568156825683568456855686568756885689569056915692569356945695569656975698569957005701570257035704570557065707570857095710571157125713571457155716571757185719572057215722572357245725572657275728572957305731573257335734573557365737573857395740574157425743574457455746574757485749575057515752575357545755575657575758575957605761576257635764576557665767576857695770577157725773577457755776577757785779578057815782578357845785578657875788578957905791579257935794579557965797579857995800580158025803580458055806580758085809581058115812581358145815581658175818581958205821582258235824582558265827582858295830583158325833583458355836583758385839584058415842584358445845584658475848584958505851585258535854585558565857585858595860586158625863586458655866586758685869587058715872587358745875587658775878587958805881588258835884588558865887588858895890589158925893589458955896589758985899590059015902590359045905590659075908590959105911591259135914591559165917591859195920592159225923592459255926592759285929593059315932593359345935593659375938593959405941594259435944594559465947594859495950595159525953595459555956595759585959596059615962596359645965596659675968596959705971597259735974597559765977597859795980598159825983598459855986598759885989599059915992599359945995599659975998599960006001600260036004600560066007600860096010601160126013601460156016601760186019602060216022602360246025602660276028602960306031603260336034603560366037603860396040604160426043604460456046604760486049605060516052605360546055605660576058605960606061606260636064606560666067606860696070607160726073607460756076607760786079608060816082608360846085608660876088608960906091609260936094609560966097609860996100610161026103610461056106610761086109611061116112611361146115611661176118611961206121612261236124612561266127612861296130613161326133613461356136613761386139614061416142614361446145614661476148614961506151615261536154615561566157615861596160616161626163616461656166616761686169617061716172617361746175617661776178617961806181618261836184618561866187618861896190619161926193619461956196619761986199620062016202620362046205620662076208620962106211621262136214621562166217621862196220622162226223622462256226622762286229623062316232623362346235623662376238623962406241624262436244624562466247624862496250625162526253625462556256625762586259626062616262626362646265626662676268626962706271627262736274627562766277627862796280628162826283628462856286628762886289629062916292629362946295629662976298629963006301630263036304630563066307630863096310631163126313631463156316631763186319632063216322632363246325632663276328632963306331633263336334633563366337633863396340634163426343634463456346634763486349635063516352635363546355635663576358635963606361636263636364636563666367636863696370637163726373637463756376637763786379638063816382638363846385638663876388638963906391639263936394639563966397639863996400640164026403640464056406640764086409641064116412641364146415641664176418641964206421642264236424642564266427642864296430643164326433643464356436643764386439644064416442644364446445644664476448644964506451645264536454645564566457645864596460646164626463646464656466646764686469647064716472647364746475647664776478647964806481648264836484648564866487648864896490649164926493649464956496649764986499650065016502650365046505650665076508650965106511651265136514651565166517651865196520652165226523652465256526652765286529653065316532653365346535653665376538653965406541654265436544654565466547654865496550655165526553655465556556655765586559656065616562656365646565656665676568656965706571657265736574657565766577657865796580658165826583658465856586658765886589659065916592659365946595659665976598659966006601660266036604660566066607660866096610661166126613661466156616661766186619662066216622662366246625662666276628662966306631663266336634663566366637663866396640664166426643664466456646664766486649665066516652665366546655665666576658665966606661666266636664666566666667666866696670667166726673667466756676667766786679668066816682668366846685668666876688668966906691669266936694669566966697669866996700670167026703670467056706670767086709671067116712671367146715671667176718671967206721672267236724672567266727672867296730673167326733673467356736673767386739674067416742674367446745674667476748674967506751675267536754675567566757675867596760676167626763676467656766676767686769677067716772677367746775677667776778677967806781678267836784678567866787678867896790679167926793679467956796679767986799680068016802680368046805680668076808680968106811681268136814681568166817681868196820682168226823682468256826682768286829683068316832683368346835683668376838683968406841684268436844684568466847684868496850685168526853685468556856685768586859686068616862686368646865686668676868686968706871687268736874687568766877687868796880688168826883688468856886688768886889689068916892689368946895689668976898689969006901690269036904690569066907690869096910691169126913691469156916691769186919692069216922692369246925692669276928692969306931693269336934693569366937693869396940694169426943694469456946694769486949695069516952695369546955695669576958695969606961696269636964696569666967696869696970697169726973697469756976697769786979698069816982698369846985698669876988698969906991699269936994699569966997699869997000700170027003700470057006700770087009701070117012701370147015701670177018701970207021702270237024702570267027702870297030703170327033703470357036703770387039704070417042704370447045704670477048704970507051705270537054705570567057705870597060706170627063706470657066706770687069707070717072707370747075707670777078707970807081708270837084708570867087708870897090709170927093709470957096709770987099710071017102710371047105710671077108710971107111711271137114711571167117711871197120712171227123712471257126712771287129713071317132713371347135713671377138713971407141714271437144714571467147714871497150715171527153715471557156715771587159716071617162716371647165716671677168716971707171717271737174717571767177717871797180718171827183718471857186718771887189719071917192719371947195719671977198719972007201720272037204720572067207720872097210721172127213721472157216721772187219722072217222722372247225722672277228722972307231723272337234723572367237723872397240724172427243724472457246724772487249725072517252725372547255725672577258725972607261726272637264726572667267726872697270727172727273727472757276727772787279728072817282728372847285728672877288728972907291729272937294729572967297729872997300730173027303730473057306730773087309731073117312731373147315731673177318731973207321732273237324732573267327732873297330733173327333733473357336733773387339734073417342734373447345734673477348734973507351735273537354735573567357735873597360736173627363736473657366736773687369737073717372737373747375737673777378737973807381738273837384738573867387738873897390739173927393739473957396739773987399740074017402740374047405740674077408740974107411741274137414741574167417741874197420742174227423742474257426742774287429743074317432743374347435743674377438743974407441744274437444744574467447744874497450745174527453745474557456745774587459746074617462746374647465746674677468746974707471747274737474747574767477747874797480748174827483748474857486748774887489749074917492749374947495749674977498749975007501750275037504750575067507750875097510751175127513751475157516751775187519752075217522752375247525752675277528752975307531753275337534753575367537753875397540754175427543754475457546754775487549755075517552755375547555755675577558755975607561756275637564756575667567756875697570757175727573757475757576757775787579758075817582758375847585758675877588758975907591759275937594759575967597759875997600760176027603760476057606760776087609761076117612761376147615761676177618761976207621762276237624762576267627762876297630763176327633763476357636763776387639764076417642764376447645764676477648764976507651765276537654765576567657765876597660766176627663766476657666766776687669767076717672767376747675767676777678767976807681768276837684768576867687768876897690769176927693769476957696769776987699770077017702770377047705770677077708770977107711771277137714771577167717771877197720772177227723772477257726772777287729773077317732773377347735773677377738773977407741774277437744774577467747774877497750775177527753775477557756775777587759776077617762776377647765776677677768776977707771777277737774777577767777777877797780778177827783778477857786778777887789779077917792779377947795779677977798779978007801780278037804780578067807780878097810781178127813781478157816781778187819782078217822782378247825782678277828782978307831783278337834783578367837783878397840784178427843784478457846784778487849785078517852785378547855785678577858785978607861786278637864786578667867786878697870787178727873787478757876787778787879788078817882788378847885788678877888788978907891789278937894789578967897789878997900790179027903790479057906790779087909791079117912791379147915791679177918791979207921792279237924792579267927792879297930793179327933793479357936793779387939794079417942794379447945794679477948794979507951795279537954795579567957795879597960796179627963796479657966796779687969797079717972797379747975797679777978797979807981798279837984798579867987798879897990799179927993799479957996799779987999800080018002800380048005800680078008800980108011801280138014801580168017801880198020802180228023802480258026802780288029803080318032803380348035803680378038803980408041804280438044804580468047804880498050805180528053805480558056805780588059806080618062806380648065806680678068806980708071807280738074807580768077807880798080808180828083808480858086808780888089809080918092809380948095809680978098809981008101810281038104810581068107810881098110811181128113811481158116811781188119812081218122812381248125812681278128812981308131813281338134813581368137813881398140814181428143814481458146814781488149815081518152815381548155815681578158815981608161816281638164816581668167816881698170817181728173817481758176817781788179818081818182818381848185818681878188818981908191819281938194819581968197819881998200820182028203820482058206820782088209821082118212821382148215821682178218821982208221822282238224822582268227822882298230823182328233823482358236823782388239824082418242824382448245824682478248824982508251825282538254825582568257825882598260826182628263826482658266826782688269827082718272827382748275827682778278827982808281828282838284828582868287828882898290829182928293829482958296829782988299830083018302830383048305830683078308830983108311831283138314831583168317831883198320832183228323832483258326832783288329833083318332833383348335833683378338833983408341834283438344834583468347834883498350835183528353835483558356835783588359836083618362836383648365836683678368836983708371837283738374837583768377837883798380838183828383838483858386838783888389839083918392839383948395839683978398839984008401840284038404840584068407840884098410841184128413841484158416841784188419842084218422842384248425842684278428842984308431843284338434843584368437843884398440844184428443844484458446844784488449845084518452845384548455845684578458845984608461846284638464846584668467846884698470847184728473847484758476847784788479848084818482848384848485848684878488848984908491849284938494849584968497849884998500850185028503850485058506850785088509851085118512851385148515851685178518851985208521852285238524852585268527852885298530853185328533853485358536853785388539854085418542854385448545854685478548854985508551855285538554855585568557855885598560856185628563856485658566856785688569857085718572857385748575857685778578857985808581858285838584858585868587858885898590859185928593859485958596859785988599860086018602860386048605860686078608860986108611861286138614861586168617861886198620862186228623862486258626862786288629863086318632863386348635863686378638863986408641864286438644864586468647864886498650865186528653865486558656865786588659866086618662866386648665866686678668866986708671867286738674867586768677867886798680868186828683868486858686868786888689869086918692869386948695869686978698869987008701870287038704870587068707870887098710871187128713871487158716871787188719872087218722872387248725872687278728872987308731873287338734873587368737873887398740874187428743874487458746874787488749875087518752875387548755875687578758875987608761876287638764876587668767876887698770877187728773877487758776877787788779878087818782878387848785878687878788878987908791879287938794879587968797879887998800880188028803880488058806880788088809881088118812881388148815881688178818881988208821882288238824882588268827882888298830883188328833883488358836883788388839884088418842884388448845884688478848884988508851885288538854885588568857885888598860886188628863886488658866886788688869887088718872887388748875887688778878887988808881888288838884888588868887888888898890889188928893889488958896889788988899890089018902890389048905890689078908890989108911891289138914891589168917891889198920892189228923892489258926892789288929893089318932893389348935893689378938893989408941894289438944894589468947894889498950895189528953895489558956895789588959896089618962896389648965896689678968896989708971897289738974897589768977897889798980898189828983898489858986898789888989899089918992899389948995899689978998899990009001900290039004900590069007900890099010901190129013901490159016901790189019902090219022902390249025902690279028902990309031903290339034903590369037903890399040904190429043904490459046904790489049905090519052905390549055905690579058905990609061906290639064906590669067906890699070907190729073907490759076907790789079908090819082908390849085908690879088908990909091909290939094909590969097909890999100910191029103910491059106910791089109911091119112911391149115911691179118911991209121912291239124912591269127912891299130913191329133913491359136913791389139914091419142914391449145914691479148914991509151915291539154915591569157915891599160916191629163916491659166916791689169917091719172917391749175917691779178917991809181918291839184918591869187918891899190919191929193919491959196919791989199920092019202920392049205920692079208920992109211921292139214921592169217921892199220922192229223922492259226922792289229923092319232923392349235923692379238923992409241924292439244924592469247924892499250925192529253925492559256925792589259926092619262926392649265926692679268926992709271927292739274927592769277927892799280928192829283928492859286928792889289929092919292929392949295929692979298929993009301930293039304930593069307930893099310931193129313931493159316931793189319932093219322932393249325932693279328932993309331933293339334933593369337933893399340934193429343934493459346934793489349935093519352935393549355935693579358935993609361936293639364936593669367936893699370937193729373937493759376937793789379938093819382938393849385938693879388938993909391939293939394939593969397939893999400940194029403940494059406940794089409941094119412941394149415941694179418941994209421942294239424942594269427942894299430943194329433943494359436943794389439944094419442944394449445944694479448944994509451945294539454945594569457945894599460946194629463946494659466946794689469947094719472947394749475947694779478947994809481948294839484948594869487948894899490949194929493949494959496949794989499950095019502950395049505950695079508950995109511951295139514951595169517951895199520952195229523952495259526952795289529953095319532953395349535953695379538953995409541954295439544954595469547954895499550955195529553955495559556955795589559956095619562956395649565956695679568956995709571957295739574957595769577957895799580958195829583958495859586958795889589959095919592959395949595959695979598959996009601960296039604960596069607960896099610961196129613961496159616961796189619962096219622962396249625962696279628962996309631963296339634963596369637963896399640964196429643964496459646964796489649965096519652965396549655965696579658965996609661966296639664966596669667966896699670967196729673967496759676967796789679968096819682968396849685968696879688968996909691969296939694969596969697969896999700970197029703970497059706970797089709971097119712971397149715971697179718971997209721972297239724972597269727972897299730973197329733973497359736973797389739974097419742974397449745974697479748974997509751975297539754975597569757975897599760976197629763976497659766976797689769977097719772977397749775977697779778977997809781978297839784978597869787978897899790979197929793979497959796979797989799980098019802980398049805980698079808980998109811981298139814981598169817981898199820982198229823982498259826982798289829983098319832983398349835983698379838983998409841984298439844984598469847984898499850985198529853985498559856985798589859986098619862986398649865986698679868986998709871987298739874987598769877987898799880988198829883988498859886988798889889989098919892989398949895989698979898989999009901990299039904990599069907990899099910991199129913991499159916991799189919992099219922992399249925992699279928992999309931993299339934993599369937993899399940994199429943994499459946994799489949995099519952995399549955995699579958995999609961996299639964996599669967996899699970997199729973997499759976997799789979998099819982998399849985998699879988998999909991999299939994999599969997999899991000010001100021000310004100051000610007100081000910010100111001210013100141001510016100171001810019100201002110022100231002410025100261002710028100291003010031100321003310034100351003610037100381003910040100411004210043100441004510046100471004810049100501005110052100531005410055100561005710058100591006010061100621006310064100651006610067100681006910070100711007210073100741007510076100771007810079100801008110082100831008410085100861008710088100891009010091100921009310094100951009610097100981009910100101011010210103101041010510106101071010810109101101011110112101131011410115101161011710118101191012010121101221012310124101251012610127101281012910130101311013210133101341013510136101371013810139101401014110142101431014410145101461014710148101491015010151101521015310154101551015610157101581015910160101611016210163101641016510166101671016810169101701017110172101731017410175101761017710178101791018010181101821018310184101851018610187101881018910190101911019210193101941019510196101971019810199102001020110202102031020410205102061020710208102091021010211102121021310214102151021610217102181021910220102211022210223102241022510226102271022810229102301023110232102331023410235102361023710238102391024010241102421024310244102451024610247102481024910250102511025210253102541025510256102571025810259102601026110262102631026410265102661026710268102691027010271102721027310274102751027610277102781027910280102811028210283102841028510286102871028810289102901029110292102931029410295102961029710298102991030010301103021030310304103051030610307103081030910310103111031210313103141031510316103171031810319103201032110322103231032410325103261032710328103291033010331103321033310334103351033610337103381033910340103411034210343103441034510346103471034810349103501035110352103531035410355103561035710358103591036010361103621036310364103651036610367103681036910370103711037210373103741037510376103771037810379103801038110382103831038410385103861038710388103891039010391103921039310394103951039610397103981039910400104011040210403104041040510406104071040810409104101041110412104131041410415104161041710418104191042010421104221042310424104251042610427104281042910430104311043210433104341043510436104371043810439104401044110442104431044410445104461044710448104491045010451104521045310454104551045610457104581045910460104611046210463104641046510466104671046810469104701047110472104731047410475104761047710478104791048010481104821048310484104851048610487104881048910490104911049210493104941049510496104971049810499105001050110502105031050410505105061050710508105091051010511105121051310514105151051610517105181051910520105211052210523105241052510526105271052810529105301053110532105331053410535105361053710538105391054010541105421054310544105451054610547105481054910550105511055210553105541055510556105571055810559105601056110562105631056410565105661056710568105691057010571105721057310574105751057610577105781057910580105811058210583105841058510586105871058810589105901059110592105931059410595105961059710598105991060010601106021060310604106051060610607106081060910610106111061210613106141061510616106171061810619106201062110622106231062410625106261062710628106291063010631106321063310634106351063610637106381063910640106411064210643106441064510646106471064810649106501065110652106531065410655106561065710658106591066010661106621066310664106651066610667106681066910670106711067210673106741067510676106771067810679106801068110682106831068410685106861068710688106891069010691106921069310694106951069610697106981069910700107011070210703107041070510706107071070810709107101071110712107131071410715107161071710718107191072010721107221072310724107251072610727107281072910730107311073210733107341073510736107371073810739107401074110742107431074410745107461074710748107491075010751107521075310754107551075610757107581075910760107611076210763107641076510766107671076810769107701077110772107731077410775107761077710778107791078010781107821078310784107851078610787107881078910790107911079210793107941079510796107971079810799108001080110802108031080410805108061080710808108091081010811108121081310814108151081610817108181081910820108211082210823108241082510826108271082810829108301083110832108331083410835108361083710838108391084010841108421084310844108451084610847108481084910850108511085210853108541085510856108571085810859108601086110862108631086410865108661086710868108691087010871108721087310874108751087610877108781087910880108811088210883108841088510886108871088810889108901089110892108931089410895108961089710898108991090010901109021090310904109051090610907109081090910910109111091210913109141091510916109171091810919109201092110922109231092410925109261092710928109291093010931109321093310934109351093610937109381093910940109411094210943109441094510946109471094810949109501095110952109531095410955109561095710958109591096010961109621096310964109651096610967109681096910970109711097210973109741097510976109771097810979109801098110982109831098410985109861098710988109891099010991109921099310994109951099610997109981099911000110011100211003110041100511006110071100811009110101101111012110131101411015110161101711018110191102011021110221102311024110251102611027110281102911030110311103211033110341103511036110371103811039110401104111042110431104411045110461104711048110491105011051110521105311054110551105611057110581105911060110611106211063110641106511066110671106811069110701107111072110731107411075110761107711078110791108011081110821108311084110851108611087110881108911090110911109211093110941109511096110971109811099111001110111102111031110411105111061110711108111091111011111111121111311114111151111611117111181111911120111211112211123111241112511126111271112811129111301113111132111331113411135111361113711138111391114011141111421114311144111451114611147111481114911150111511115211153111541115511156111571115811159111601116111162111631116411165111661116711168111691117011171111721117311174111751117611177111781117911180111811118211183111841118511186111871118811189111901119111192111931119411195111961119711198111991120011201112021120311204112051120611207112081120911210112111121211213112141121511216112171121811219112201122111222112231122411225112261122711228112291123011231112321123311234112351123611237112381123911240112411124211243112441124511246112471124811249112501125111252112531125411255112561125711258112591126011261112621126311264112651126611267112681126911270112711127211273112741127511276112771127811279112801128111282112831128411285112861128711288112891129011291112921129311294112951129611297112981129911300113011130211303113041130511306113071130811309113101131111312113131131411315113161131711318113191132011321113221132311324113251132611327113281132911330113311133211333113341133511336113371133811339113401134111342113431134411345113461134711348113491135011351113521135311354113551135611357113581135911360113611136211363113641136511366113671136811369113701137111372113731137411375113761137711378113791138011381113821138311384113851138611387113881138911390113911139211393113941139511396113971139811399114001140111402114031140411405114061140711408114091141011411114121141311414114151141611417114181141911420114211142211423114241142511426114271142811429114301143111432114331143411435114361143711438114391144011441114421144311444114451144611447114481144911450114511145211453114541145511456114571145811459114601146111462114631146411465114661146711468114691147011471114721147311474114751147611477114781147911480114811148211483114841148511486114871148811489114901149111492114931149411495114961149711498114991150011501115021150311504115051150611507115081150911510115111151211513115141151511516115171151811519115201152111522115231152411525115261152711528115291153011531115321153311534115351153611537115381153911540115411154211543115441154511546115471154811549115501155111552115531155411555115561155711558115591156011561115621156311564115651156611567115681156911570115711157211573115741157511576115771157811579115801158111582115831158411585115861158711588115891159011591115921159311594115951159611597115981159911600116011160211603116041160511606116071160811609116101161111612116131161411615116161161711618116191162011621116221162311624116251162611627116281162911630116311163211633116341163511636116371163811639116401164111642116431164411645116461164711648116491165011651116521165311654116551165611657116581165911660116611166211663116641166511666116671166811669116701167111672116731167411675116761167711678116791168011681116821168311684116851168611687116881168911690116911169211693116941169511696116971169811699117001170111702117031170411705117061170711708117091171011711117121171311714117151171611717117181171911720117211172211723117241172511726117271172811729117301173111732117331173411735117361173711738117391174011741117421174311744117451174611747117481174911750117511175211753117541175511756117571175811759117601176111762117631176411765117661176711768117691177011771117721177311774117751177611777117781177911780117811178211783117841178511786117871178811789117901179111792117931179411795117961179711798117991180011801118021180311804118051180611807118081180911810118111181211813118141181511816118171181811819118201182111822118231182411825118261182711828118291183011831118321183311834118351183611837118381183911840118411184211843118441184511846118471184811849118501185111852118531185411855118561185711858118591186011861118621186311864118651186611867118681186911870118711187211873118741187511876118771187811879118801188111882118831188411885118861188711888118891189011891118921189311894118951189611897118981189911900119011190211903119041190511906119071190811909119101191111912119131191411915119161191711918119191192011921119221192311924119251192611927119281192911930119311193211933119341193511936119371193811939119401194111942119431194411945119461194711948119491195011951119521195311954119551195611957119581195911960119611196211963119641196511966119671196811969119701197111972119731197411975119761197711978119791198011981119821198311984119851198611987119881198911990119911199211993119941199511996119971199811999120001200112002120031200412005120061200712008120091201012011120121201312014120151201612017120181201912020120211202212023120241202512026120271202812029120301203112032120331203412035120361203712038120391204012041120421204312044120451204612047120481204912050120511205212053120541205512056120571205812059120601206112062120631206412065120661206712068120691207012071120721207312074120751207612077120781207912080120811208212083120841208512086120871208812089120901209112092120931209412095120961209712098120991210012101121021210312104121051210612107121081210912110121111211212113121141211512116121171211812119121201212112122121231212412125121261212712128121291213012131121321213312134121351213612137121381213912140121411214212143121441214512146121471214812149121501215112152121531215412155121561215712158121591216012161121621216312164121651216612167121681216912170121711217212173121741217512176121771217812179121801218112182121831218412185121861218712188121891219012191121921219312194121951219612197121981219912200122011220212203122041220512206122071220812209122101221112212122131221412215122161221712218122191222012221122221222312224122251222612227122281222912230122311223212233122341223512236122371223812239122401224112242122431224412245122461224712248122491225012251122521225312254122551225612257122581225912260122611226212263122641226512266122671226812269122701227112272122731227412275122761227712278122791228012281122821228312284122851228612287122881228912290122911229212293122941229512296122971229812299123001230112302123031230412305123061230712308123091231012311123121231312314123151231612317123181231912320123211232212323123241232512326123271232812329123301233112332123331233412335123361233712338123391234012341123421234312344123451234612347123481234912350123511235212353123541235512356123571235812359123601236112362123631236412365123661236712368123691237012371123721237312374123751237612377123781237912380123811238212383123841238512386123871238812389123901239112392123931239412395123961239712398123991240012401124021240312404124051240612407124081240912410124111241212413124141241512416124171241812419124201242112422124231242412425124261242712428124291243012431124321243312434124351243612437124381243912440124411244212443124441244512446124471244812449124501245112452124531245412455124561245712458124591246012461124621246312464124651246612467124681246912470124711247212473124741247512476124771247812479124801248112482124831248412485124861248712488124891249012491124921249312494124951249612497124981249912500125011250212503125041250512506125071250812509125101251112512125131251412515125161251712518125191252012521125221252312524125251252612527125281252912530125311253212533125341253512536125371253812539125401254112542125431254412545125461254712548125491255012551125521255312554125551255612557125581255912560125611256212563125641256512566125671256812569125701257112572125731257412575125761257712578125791258012581125821258312584125851258612587125881258912590125911259212593125941259512596125971259812599126001260112602126031260412605126061260712608126091261012611126121261312614126151261612617126181261912620126211262212623126241262512626126271262812629126301263112632126331263412635126361263712638126391264012641126421264312644126451264612647126481264912650126511265212653126541265512656126571265812659126601266112662126631266412665126661266712668126691267012671126721267312674126751267612677126781267912680126811268212683126841268512686126871268812689126901269112692126931269412695126961269712698126991270012701127021270312704127051270612707127081270912710127111271212713127141271512716127171271812719127201272112722127231272412725127261272712728127291273012731127321273312734127351273612737127381273912740127411274212743127441274512746127471274812749127501275112752127531275412755127561275712758127591276012761127621276312764127651276612767127681276912770127711277212773127741277512776127771277812779127801278112782127831278412785127861278712788127891279012791127921279312794127951279612797127981279912800128011280212803128041280512806128071280812809128101281112812128131281412815128161281712818128191282012821128221282312824128251282612827128281282912830128311283212833128341283512836128371283812839128401284112842128431284412845128461284712848128491285012851128521285312854128551285612857128581285912860128611286212863128641286512866128671286812869128701287112872128731287412875128761287712878128791288012881128821288312884128851288612887128881288912890128911289212893128941289512896128971289812899129001290112902129031290412905129061290712908129091291012911129121291312914129151291612917129181291912920129211292212923129241292512926129271292812929129301293112932129331293412935129361293712938129391294012941129421294312944129451294612947129481294912950129511295212953129541295512956129571295812959129601296112962129631296412965129661296712968129691297012971129721297312974129751297612977129781297912980129811298212983129841298512986129871298812989129901299112992129931299412995129961299712998129991300013001130021300313004130051300613007130081300913010130111301213013130141301513016130171301813019130201302113022130231302413025130261302713028130291303013031130321303313034130351303613037130381303913040130411304213043130441304513046130471304813049130501305113052130531305413055130561305713058130591306013061130621306313064130651306613067130681306913070130711307213073130741307513076130771307813079130801308113082130831308413085130861308713088130891309013091130921309313094130951309613097130981309913100131011310213103131041310513106131071310813109131101311113112131131311413115131161311713118131191312013121131221312313124131251312613127131281312913130131311313213133131341313513136131371313813139131401314113142131431314413145131461314713148131491315013151131521315313154131551315613157131581315913160131611316213163131641316513166131671316813169131701317113172131731317413175131761317713178131791318013181131821318313184131851318613187131881318913190131911319213193131941319513196131971319813199132001320113202132031320413205132061320713208132091321013211132121321313214132151321613217132181321913220132211322213223132241322513226132271322813229132301323113232132331323413235132361323713238132391324013241132421324313244132451324613247132481324913250132511325213253132541325513256132571325813259132601326113262132631326413265132661326713268132691327013271132721327313274132751327613277132781327913280132811328213283132841328513286132871328813289132901329113292132931329413295132961329713298132991330013301133021330313304133051330613307133081330913310133111331213313133141331513316133171331813319133201332113322133231332413325133261332713328133291333013331133321333313334133351333613337133381333913340133411334213343133441334513346133471334813349133501335113352133531335413355133561335713358133591336013361133621336313364133651336613367133681336913370133711337213373133741337513376133771337813379133801338113382133831338413385133861338713388133891339013391133921339313394133951339613397133981339913400134011340213403134041340513406134071340813409134101341113412134131341413415134161341713418134191342013421134221342313424134251342613427134281342913430134311343213433134341343513436134371343813439134401344113442134431344413445134461344713448134491345013451134521345313454134551345613457134581345913460134611346213463134641346513466134671346813469134701347113472134731347413475134761347713478134791348013481134821348313484134851348613487134881348913490134911349213493134941349513496134971349813499135001350113502135031350413505135061350713508135091351013511135121351313514135151351613517135181351913520135211352213523135241352513526135271352813529135301353113532135331353413535135361353713538135391354013541135421354313544135451354613547135481354913550135511355213553135541355513556135571355813559135601356113562135631356413565135661356713568135691357013571135721357313574135751357613577135781357913580135811358213583135841358513586135871358813589135901359113592135931359413595135961359713598135991360013601136021360313604136051360613607136081360913610136111361213613136141361513616136171361813619136201362113622136231362413625136261362713628136291363013631136321363313634136351363613637136381363913640136411364213643136441364513646136471364813649136501365113652136531365413655136561365713658136591366013661136621366313664136651366613667136681366913670136711367213673136741367513676136771367813679136801368113682136831368413685136861368713688136891369013691136921369313694136951369613697136981369913700137011370213703137041370513706137071370813709137101371113712137131371413715137161371713718137191372013721137221372313724137251372613727137281372913730137311373213733137341373513736137371373813739137401374113742137431374413745137461374713748137491375013751137521375313754137551375613757137581375913760137611376213763137641376513766137671376813769137701377113772137731377413775137761377713778137791378013781137821378313784137851378613787137881378913790137911379213793137941379513796137971379813799138001380113802138031380413805138061380713808138091381013811138121381313814138151381613817138181381913820138211382213823138241382513826138271382813829138301383113832138331383413835138361383713838138391384013841138421384313844138451384613847138481384913850138511385213853138541385513856138571385813859138601386113862138631386413865138661386713868138691387013871138721387313874138751387613877138781387913880138811388213883138841388513886138871388813889138901389113892138931389413895138961389713898138991390013901139021390313904139051390613907139081390913910139111391213913139141391513916139171391813919139201392113922139231392413925139261392713928139291393013931139321393313934139351393613937139381393913940139411394213943139441394513946139471394813949139501395113952139531395413955139561395713958139591396013961139621396313964139651396613967139681396913970139711397213973139741397513976139771397813979139801398113982139831398413985139861398713988139891399013991139921399313994139951399613997139981399914000140011400214003140041400514006140071400814009140101401114012140131401414015140161401714018140191402014021140221402314024140251402614027140281402914030140311403214033140341403514036140371403814039140401404114042140431404414045140461404714048140491405014051140521405314054140551405614057140581405914060140611406214063140641406514066140671406814069140701407114072140731407414075140761407714078140791408014081140821408314084140851408614087140881408914090140911409214093140941409514096140971409814099141001410114102141031410414105141061410714108141091411014111141121411314114141151411614117141181411914120141211412214123141241412514126141271412814129141301413114132141331413414135141361413714138141391414014141141421414314144141451414614147141481414914150141511415214153141541415514156141571415814159141601416114162141631416414165141661416714168141691417014171141721417314174141751417614177141781417914180141811418214183141841418514186141871418814189141901419114192141931419414195141961419714198141991420014201142021420314204142051420614207142081420914210142111421214213142141421514216142171421814219142201422114222142231422414225142261422714228142291423014231142321423314234142351423614237142381423914240142411424214243142441424514246142471424814249142501425114252142531425414255142561425714258142591426014261142621426314264142651426614267142681426914270142711427214273142741427514276142771427814279142801428114282142831428414285142861428714288142891429014291142921429314294142951429614297142981429914300143011430214303143041430514306143071430814309143101431114312143131431414315143161431714318143191432014321143221432314324143251432614327143281432914330143311433214333143341433514336143371433814339143401434114342143431434414345143461434714348143491435014351143521435314354143551435614357143581435914360143611436214363143641436514366143671436814369143701437114372143731437414375143761437714378143791438014381143821438314384143851438614387143881438914390143911439214393143941439514396143971439814399144001440114402144031440414405144061440714408144091441014411144121441314414144151441614417144181441914420144211442214423144241442514426144271442814429144301443114432144331443414435144361443714438144391444014441144421444314444144451444614447144481444914450144511445214453144541445514456144571445814459144601446114462144631446414465144661446714468144691447014471144721447314474144751447614477144781447914480144811448214483144841448514486144871448814489144901449114492144931449414495144961449714498144991450014501145021450314504145051450614507145081450914510145111451214513145141451514516145171451814519145201452114522145231452414525145261452714528145291453014531145321453314534145351453614537145381453914540145411454214543145441454514546145471454814549145501455114552145531455414555145561455714558145591456014561145621456314564145651456614567145681456914570145711457214573145741457514576145771457814579145801458114582145831458414585145861458714588145891459014591145921459314594145951459614597145981459914600146011460214603146041460514606146071460814609146101461114612146131461414615146161461714618146191462014621146221462314624146251462614627146281462914630146311463214633146341463514636146371463814639146401464114642146431464414645146461464714648146491465014651146521465314654146551465614657146581465914660146611466214663146641466514666146671466814669146701467114672146731467414675146761467714678146791468014681146821468314684146851468614687146881468914690146911469214693146941469514696146971469814699147001470114702147031470414705147061470714708147091471014711147121471314714147151471614717147181471914720147211472214723147241472514726147271472814729147301473114732147331473414735147361473714738147391474014741147421474314744147451474614747147481474914750147511475214753147541475514756147571475814759147601476114762147631476414765147661476714768147691477014771147721477314774147751477614777147781477914780147811478214783147841478514786147871478814789147901479114792147931479414795147961479714798147991480014801148021480314804148051480614807148081480914810148111481214813148141481514816148171481814819148201482114822148231482414825148261482714828148291483014831148321483314834148351483614837148381483914840148411484214843148441484514846148471484814849148501485114852148531485414855148561485714858148591486014861148621486314864148651486614867148681486914870148711487214873148741487514876148771487814879148801488114882148831488414885148861488714888148891489014891148921489314894148951489614897148981489914900149011490214903149041490514906149071490814909149101491114912149131491414915149161491714918149191492014921149221492314924149251492614927149281492914930149311493214933149341493514936149371493814939149401494114942149431494414945149461494714948149491495014951149521495314954149551495614957149581495914960149611496214963149641496514966149671496814969149701497114972149731497414975149761497714978149791498014981149821498314984149851498614987149881498914990149911499214993149941499514996149971499814999150001500115002150031500415005150061500715008150091501015011150121501315014150151501615017150181501915020150211502215023150241502515026150271502815029150301503115032150331503415035150361503715038150391504015041150421504315044150451504615047150481504915050150511505215053150541505515056150571505815059150601506115062150631506415065150661506715068150691507015071150721507315074150751507615077150781507915080150811508215083150841508515086150871508815089150901509115092150931509415095150961509715098150991510015101151021510315104151051510615107151081510915110151111511215113151141511515116151171511815119151201512115122151231512415125151261512715128151291513015131151321513315134151351513615137151381513915140151411514215143151441514515146151471514815149151501515115152151531515415155151561515715158151591516015161151621516315164151651516615167151681516915170151711517215173151741517515176151771517815179151801518115182151831518415185151861518715188151891519015191151921519315194151951519615197151981519915200152011520215203152041520515206152071520815209152101521115212152131521415215152161521715218152191522015221152221522315224152251522615227152281522915230152311523215233152341523515236152371523815239152401524115242152431524415245152461524715248152491525015251152521525315254152551525615257152581525915260152611526215263152641526515266152671526815269152701527115272152731527415275152761527715278152791528015281152821528315284152851528615287152881528915290152911529215293152941529515296152971529815299153001530115302153031530415305153061530715308153091531015311153121531315314153151531615317153181531915320153211532215323153241532515326153271532815329153301533115332153331533415335153361533715338153391534015341153421534315344153451534615347153481534915350153511535215353153541535515356153571535815359153601536115362153631536415365153661536715368153691537015371153721537315374153751537615377153781537915380153811538215383153841538515386153871538815389153901539115392153931539415395153961539715398153991540015401154021540315404154051540615407154081540915410154111541215413154141541515416154171541815419154201542115422154231542415425154261542715428154291543015431154321543315434154351543615437154381543915440154411544215443154441544515446154471544815449154501545115452154531545415455154561545715458154591546015461154621546315464154651546615467154681546915470154711547215473154741547515476154771547815479154801548115482154831548415485154861548715488154891549015491154921549315494154951549615497154981549915500155011550215503155041550515506155071550815509155101551115512155131551415515155161551715518155191552015521155221552315524155251552615527155281552915530155311553215533155341553515536155371553815539155401554115542155431554415545155461554715548155491555015551155521555315554155551555615557155581555915560155611556215563155641556515566155671556815569155701557115572155731557415575155761557715578155791558015581155821558315584155851558615587155881558915590155911559215593155941559515596155971559815599156001560115602156031560415605156061560715608156091561015611156121561315614156151561615617156181561915620156211562215623156241562515626156271562815629156301563115632156331563415635156361563715638156391564015641156421564315644156451564615647156481564915650156511565215653156541565515656156571565815659156601566115662156631566415665156661566715668156691567015671156721567315674156751567615677156781567915680156811568215683156841568515686156871568815689156901569115692156931569415695156961569715698156991570015701157021570315704157051570615707157081570915710157111571215713157141571515716157171571815719157201572115722157231572415725157261572715728157291573015731157321573315734157351573615737157381573915740157411574215743157441574515746157471574815749157501575115752157531575415755157561575715758157591576015761157621576315764157651576615767157681576915770157711577215773157741577515776157771577815779157801578115782157831578415785157861578715788157891579015791157921579315794157951579615797157981579915800158011580215803158041580515806158071580815809158101581115812158131581415815158161581715818158191582015821158221582315824158251582615827158281582915830158311583215833158341583515836158371583815839158401584115842158431584415845158461584715848158491585015851158521585315854158551585615857158581585915860158611586215863158641586515866158671586815869158701587115872158731587415875158761587715878158791588015881158821588315884158851588615887158881588915890158911589215893158941589515896158971589815899159001590115902159031590415905159061590715908159091591015911159121591315914159151591615917159181591915920159211592215923159241592515926159271592815929159301593115932159331593415935159361593715938159391594015941159421594315944159451594615947159481594915950159511595215953159541595515956159571595815959159601596115962159631596415965159661596715968159691597015971159721597315974159751597615977159781597915980159811598215983159841598515986159871598815989159901599115992159931599415995159961599715998159991600016001160021600316004160051600616007160081600916010160111601216013160141601516016160171601816019160201602116022160231602416025160261602716028160291603016031160321603316034160351603616037160381603916040160411604216043160441604516046160471604816049160501605116052160531605416055160561605716058160591606016061160621606316064160651606616067160681606916070160711607216073160741607516076160771607816079160801608116082160831608416085160861608716088160891609016091160921609316094160951609616097160981609916100161011610216103161041610516106161071610816109161101611116112161131611416115161161611716118161191612016121161221612316124161251612616127161281612916130161311613216133161341613516136161371613816139161401614116142161431614416145161461614716148161491615016151161521615316154161551615616157161581615916160161611616216163161641616516166161671616816169161701617116172161731617416175161761617716178161791618016181161821618316184161851618616187161881618916190161911619216193161941619516196161971619816199162001620116202162031620416205162061620716208162091621016211162121621316214162151621616217162181621916220162211622216223162241622516226162271622816229162301623116232162331623416235162361623716238162391624016241162421624316244162451624616247162481624916250162511625216253162541625516256162571625816259162601626116262162631626416265162661626716268162691627016271162721627316274162751627616277162781627916280162811628216283162841628516286162871628816289162901629116292162931629416295162961629716298162991630016301163021630316304163051630616307163081630916310163111631216313163141631516316163171631816319163201632116322163231632416325163261632716328163291633016331163321633316334163351633616337163381633916340163411634216343163441634516346163471634816349163501635116352163531635416355163561635716358163591636016361163621636316364163651636616367163681636916370163711637216373163741637516376163771637816379163801638116382163831638416385163861638716388163891639016391163921639316394163951639616397163981639916400164011640216403164041640516406164071640816409164101641116412164131641416415164161641716418164191642016421164221642316424164251642616427164281642916430164311643216433164341643516436164371643816439164401644116442164431644416445164461644716448164491645016451164521645316454164551645616457164581645916460164611646216463164641646516466164671646816469164701647116472164731647416475164761647716478164791648016481164821648316484164851648616487164881648916490164911649216493164941649516496164971649816499165001650116502165031650416505165061650716508165091651016511165121651316514165151651616517165181651916520165211652216523165241652516526165271652816529165301653116532165331653416535165361653716538165391654016541165421654316544165451654616547165481654916550165511655216553165541655516556165571655816559165601656116562165631656416565165661656716568165691657016571165721657316574165751657616577165781657916580165811658216583165841658516586165871658816589165901659116592165931659416595165961659716598165991660016601166021660316604166051660616607166081660916610166111661216613166141661516616166171661816619166201662116622166231662416625166261662716628166291663016631166321663316634166351663616637166381663916640166411664216643166441664516646166471664816649166501665116652166531665416655166561665716658166591666016661166621666316664166651666616667166681666916670166711667216673166741667516676166771667816679166801668116682166831668416685166861668716688166891669016691166921669316694166951669616697166981669916700167011670216703167041670516706167071670816709167101671116712167131671416715167161671716718167191672016721167221672316724167251672616727167281672916730167311673216733167341673516736167371673816739167401674116742167431674416745167461674716748167491675016751167521675316754167551675616757167581675916760167611676216763167641676516766167671676816769167701677116772167731677416775167761677716778167791678016781167821678316784167851678616787167881678916790167911679216793167941679516796167971679816799168001680116802168031680416805168061680716808168091681016811168121681316814168151681616817168181681916820168211682216823168241682516826168271682816829168301683116832168331683416835168361683716838168391684016841168421684316844168451684616847168481684916850168511685216853168541685516856168571685816859168601686116862168631686416865168661686716868168691687016871168721687316874168751687616877168781687916880168811688216883168841688516886168871688816889168901689116892168931689416895168961689716898168991690016901169021690316904169051690616907169081690916910169111691216913169141691516916169171691816919169201692116922169231692416925169261692716928169291693016931169321693316934169351693616937169381693916940169411694216943169441694516946169471694816949169501695116952169531695416955169561695716958169591696016961169621696316964169651696616967169681696916970169711697216973169741697516976169771697816979169801698116982169831698416985169861698716988169891699016991169921699316994169951699616997169981699917000170011700217003170041700517006170071700817009170101701117012170131701417015170161701717018170191702017021170221702317024170251702617027170281702917030170311703217033170341703517036170371703817039170401704117042170431704417045170461704717048170491705017051170521705317054170551705617057170581705917060170611706217063170641706517066170671706817069170701707117072170731707417075170761707717078170791708017081170821708317084170851708617087170881708917090170911709217093170941709517096170971709817099171001710117102171031710417105171061710717108171091711017111171121711317114171151711617117171181711917120171211712217123171241712517126171271712817129171301713117132171331713417135171361713717138171391714017141171421714317144171451714617147171481714917150171511715217153171541715517156171571715817159171601716117162171631716417165171661716717168171691717017171171721717317174171751717617177171781717917180171811718217183171841718517186171871718817189171901719117192171931719417195171961719717198171991720017201172021720317204172051720617207172081720917210172111721217213172141721517216172171721817219172201722117222172231722417225172261722717228172291723017231172321723317234172351723617237172381723917240172411724217243172441724517246172471724817249172501725117252172531725417255172561725717258172591726017261172621726317264172651726617267172681726917270172711727217273172741727517276172771727817279172801728117282172831728417285172861728717288172891729017291172921729317294172951729617297172981729917300173011730217303173041730517306173071730817309173101731117312173131731417315173161731717318173191732017321173221732317324173251732617327173281732917330173311733217333173341733517336173371733817339173401734117342173431734417345173461734717348173491735017351173521735317354173551735617357173581735917360173611736217363173641736517366173671736817369173701737117372173731737417375173761737717378173791738017381173821738317384173851738617387173881738917390173911739217393173941739517396173971739817399174001740117402174031740417405174061740717408174091741017411174121741317414174151741617417174181741917420174211742217423174241742517426174271742817429174301743117432174331743417435174361743717438174391744017441174421744317444174451744617447174481744917450174511745217453174541745517456174571745817459174601746117462174631746417465174661746717468174691747017471174721747317474174751747617477174781747917480174811748217483174841748517486174871748817489174901749117492174931749417495174961749717498174991750017501175021750317504175051750617507175081750917510175111751217513175141751517516175171751817519175201752117522175231752417525175261752717528175291753017531175321753317534175351753617537175381753917540175411754217543175441754517546175471754817549175501755117552175531755417555175561755717558175591756017561175621756317564175651756617567175681756917570175711757217573175741757517576175771757817579175801758117582175831758417585175861758717588175891759017591175921759317594175951759617597175981759917600176011760217603176041760517606176071760817609176101761117612176131761417615176161761717618176191762017621176221762317624176251762617627176281762917630176311763217633176341763517636176371763817639176401764117642176431764417645176461764717648176491765017651176521765317654176551765617657176581765917660176611766217663176641766517666176671766817669176701767117672176731767417675176761767717678176791768017681176821768317684176851768617687176881768917690176911769217693176941769517696176971769817699177001770117702177031770417705177061770717708177091771017711177121771317714177151771617717177181771917720177211772217723177241772517726177271772817729177301773117732177331773417735177361773717738177391774017741177421774317744177451774617747177481774917750177511775217753177541775517756177571775817759177601776117762177631776417765177661776717768177691777017771177721777317774177751777617777177781777917780177811778217783177841778517786177871778817789177901779117792177931779417795177961779717798177991780017801178021780317804178051780617807178081780917810178111781217813178141781517816178171781817819178201782117822178231782417825178261782717828178291783017831178321783317834178351783617837178381783917840178411784217843178441784517846178471784817849178501785117852178531785417855178561785717858178591786017861178621786317864178651786617867178681786917870178711787217873178741787517876178771787817879178801788117882178831788417885178861788717888178891789017891178921789317894178951789617897178981789917900179011790217903179041790517906179071790817909179101791117912179131791417915179161791717918179191792017921179221792317924179251792617927179281792917930179311793217933179341793517936179371793817939179401794117942179431794417945179461794717948179491795017951179521795317954179551795617957179581795917960179611796217963179641796517966179671796817969179701797117972179731797417975179761797717978179791798017981179821798317984179851798617987179881798917990179911799217993179941799517996179971799817999180001800118002180031800418005180061800718008180091801018011180121801318014180151801618017180181801918020180211802218023180241802518026180271802818029180301803118032180331803418035180361803718038180391804018041180421804318044180451804618047180481804918050180511805218053180541805518056180571805818059180601806118062180631806418065180661806718068180691807018071180721807318074180751807618077180781807918080180811808218083180841808518086180871808818089180901809118092180931809418095180961809718098180991810018101181021810318104181051810618107181081810918110181111811218113181141811518116181171811818119181201812118122181231812418125181261812718128181291813018131181321813318134181351813618137181381813918140181411814218143181441814518146181471814818149181501815118152181531815418155181561815718158181591816018161181621816318164181651816618167181681816918170181711817218173181741817518176181771817818179181801818118182181831818418185181861818718188181891819018191181921819318194181951819618197181981819918200182011820218203182041820518206182071820818209182101821118212182131821418215182161821718218182191822018221182221822318224182251822618227182281822918230182311823218233182341823518236182371823818239182401824118242182431824418245182461824718248182491825018251182521825318254182551825618257182581825918260182611826218263182641826518266182671826818269182701827118272182731827418275182761827718278182791828018281182821828318284182851828618287182881828918290182911829218293182941829518296182971829818299183001830118302183031830418305183061830718308183091831018311183121831318314183151831618317183181831918320183211832218323183241832518326183271832818329183301833118332183331833418335183361833718338183391834018341183421834318344183451834618347183481834918350183511835218353183541835518356183571835818359183601836118362183631836418365183661836718368183691837018371183721837318374183751837618377183781837918380183811838218383183841838518386183871838818389183901839118392183931839418395183961839718398183991840018401184021840318404184051840618407184081840918410184111841218413184141841518416184171841818419184201842118422184231842418425184261842718428184291843018431184321843318434184351843618437184381843918440184411844218443184441844518446184471844818449184501845118452184531845418455184561845718458184591846018461184621846318464184651846618467184681846918470184711847218473184741847518476184771847818479184801848118482184831848418485184861848718488184891849018491184921849318494184951849618497184981849918500185011850218503185041850518506185071850818509185101851118512185131851418515185161851718518185191852018521185221852318524185251852618527185281852918530185311853218533185341853518536185371853818539185401854118542185431854418545185461854718548185491855018551185521855318554185551855618557185581855918560185611856218563185641856518566185671856818569185701857118572185731857418575185761857718578185791858018581185821858318584185851858618587185881858918590185911859218593185941859518596185971859818599186001860118602186031860418605186061860718608186091861018611186121861318614186151861618617186181861918620186211862218623186241862518626186271862818629186301863118632186331863418635186361863718638186391864018641186421864318644186451864618647186481864918650186511865218653186541865518656186571865818659186601866118662186631866418665186661866718668186691867018671186721867318674186751867618677186781867918680186811868218683186841868518686186871868818689186901869118692186931869418695186961869718698186991870018701187021870318704187051870618707187081870918710187111871218713187141871518716187171871818719187201872118722187231872418725187261872718728187291873018731187321873318734187351873618737187381873918740187411874218743187441874518746187471874818749187501875118752187531875418755187561875718758187591876018761187621876318764187651876618767187681876918770187711877218773187741877518776187771877818779187801878118782187831878418785187861878718788187891879018791187921879318794187951879618797187981879918800188011880218803188041880518806188071880818809188101881118812188131881418815188161881718818188191882018821188221882318824188251882618827188281882918830188311883218833188341883518836188371883818839188401884118842188431884418845188461884718848188491885018851188521885318854188551885618857188581885918860188611886218863188641886518866188671886818869188701887118872188731887418875188761887718878188791888018881188821888318884188851888618887188881888918890188911889218893188941889518896188971889818899189001890118902189031890418905189061890718908189091891018911189121891318914189151891618917189181891918920189211892218923189241892518926189271892818929189301893118932189331893418935189361893718938189391894018941189421894318944189451894618947189481894918950189511895218953189541895518956189571895818959189601896118962189631896418965189661896718968189691897018971189721897318974189751897618977189781897918980189811898218983189841898518986189871898818989189901899118992189931899418995189961899718998189991900019001190021900319004190051900619007190081900919010190111901219013190141901519016190171901819019190201902119022190231902419025190261902719028190291903019031190321903319034190351903619037190381903919040190411904219043190441904519046190471904819049190501905119052190531905419055190561905719058190591906019061190621906319064190651906619067190681906919070190711907219073190741907519076190771907819079190801908119082190831908419085190861908719088190891909019091190921909319094190951909619097190981909919100191011910219103191041910519106191071910819109191101911119112191131911419115191161911719118191191912019121191221912319124191251912619127191281912919130191311913219133191341913519136191371913819139191401914119142191431914419145191461914719148191491915019151191521915319154191551915619157191581915919160191611916219163191641916519166191671916819169191701917119172191731917419175191761917719178191791918019181191821918319184191851918619187191881918919190191911919219193191941919519196191971919819199192001920119202192031920419205192061920719208192091921019211192121921319214192151921619217192181921919220192211922219223192241922519226192271922819229192301923119232192331923419235192361923719238192391924019241192421924319244192451924619247192481924919250192511925219253192541925519256192571925819259192601926119262192631926419265192661926719268192691927019271192721927319274192751927619277192781927919280192811928219283192841928519286192871928819289192901929119292192931929419295192961929719298192991930019301193021930319304193051930619307193081930919310193111931219313193141931519316193171931819319193201932119322193231932419325193261932719328193291933019331193321933319334193351933619337193381933919340193411934219343193441934519346193471934819349193501935119352193531935419355193561935719358193591936019361193621936319364193651936619367193681936919370193711937219373193741937519376193771937819379193801938119382193831938419385193861938719388193891939019391193921939319394193951939619397193981939919400194011940219403194041940519406194071940819409194101941119412194131941419415194161941719418194191942019421194221942319424194251942619427194281942919430194311943219433194341943519436194371943819439194401944119442194431944419445194461944719448194491945019451194521945319454194551945619457194581945919460194611946219463194641946519466194671946819469194701947119472194731947419475194761947719478194791948019481194821948319484194851948619487194881948919490194911949219493194941949519496194971949819499195001950119502195031950419505195061950719508195091951019511195121951319514195151951619517195181951919520195211952219523195241952519526195271952819529195301953119532195331953419535195361953719538195391954019541195421954319544195451954619547195481954919550195511955219553195541955519556195571955819559195601956119562195631956419565195661956719568195691957019571195721957319574195751957619577195781957919580195811958219583195841958519586195871958819589195901959119592195931959419595195961959719598195991960019601196021960319604196051960619607196081960919610196111961219613196141961519616196171961819619196201962119622196231962419625196261962719628196291963019631196321963319634196351963619637196381963919640196411964219643196441964519646196471964819649196501965119652196531965419655196561965719658196591966019661196621966319664196651966619667196681966919670196711967219673196741967519676196771967819679196801968119682196831968419685196861968719688196891969019691196921969319694196951969619697196981969919700197011970219703197041970519706197071970819709197101971119712197131971419715197161971719718197191972019721197221972319724197251972619727197281972919730197311973219733197341973519736197371973819739197401974119742197431974419745197461974719748197491975019751197521975319754197551975619757197581975919760197611976219763197641976519766197671976819769197701977119772197731977419775197761977719778197791978019781197821978319784197851978619787197881978919790197911979219793197941979519796197971979819799198001980119802198031980419805198061980719808198091981019811198121981319814198151981619817198181981919820198211982219823198241982519826198271982819829198301983119832198331983419835198361983719838198391984019841198421984319844198451984619847198481984919850198511985219853198541985519856198571985819859198601986119862198631986419865198661986719868198691987019871198721987319874198751987619877198781987919880198811988219883198841988519886198871988819889198901989119892198931989419895198961989719898198991990019901199021990319904199051990619907199081990919910199111991219913199141991519916199171991819919199201992119922199231992419925199261992719928199291993019931199321993319934199351993619937199381993919940199411994219943199441994519946199471994819949199501995119952199531995419955199561995719958199591996019961199621996319964199651996619967199681996919970199711997219973199741997519976199771997819979199801998119982199831998419985199861998719988199891999019991199921999319994199951999619997199981999920000200012000220003200042000520006200072000820009200102001120012200132001420015200162001720018200192002020021200222002320024200252002620027200282002920030200312003220033200342003520036200372003820039200402004120042200432004420045200462004720048200492005020051200522005320054200552005620057200582005920060200612006220063200642006520066200672006820069200702007120072200732007420075200762007720078200792008020081200822008320084200852008620087200882008920090200912009220093200942009520096200972009820099201002010120102201032010420105201062010720108201092011020111201122011320114201152011620117201182011920120201212012220123201242012520126201272012820129201302013120132201332013420135201362013720138201392014020141201422014320144201452014620147201482014920150201512015220153201542015520156201572015820159201602016120162201632016420165201662016720168201692017020171201722017320174201752017620177201782017920180201812018220183201842018520186201872018820189201902019120192201932019420195201962019720198201992020020201202022020320204202052020620207202082020920210202112021220213202142021520216202172021820219202202022120222202232022420225202262022720228202292023020231202322023320234202352023620237202382023920240202412024220243202442024520246202472024820249202502025120252202532025420255202562025720258202592026020261202622026320264202652026620267202682026920270202712027220273202742027520276202772027820279202802028120282202832028420285202862028720288202892029020291202922029320294202952029620297202982029920300203012030220303203042030520306203072030820309203102031120312203132031420315203162031720318203192032020321203222032320324203252032620327203282032920330203312033220333203342033520336203372033820339203402034120342203432034420345203462034720348203492035020351203522035320354203552035620357203582035920360203612036220363203642036520366203672036820369203702037120372203732037420375203762037720378203792038020381203822038320384203852038620387203882038920390203912039220393203942039520396203972039820399204002040120402204032040420405204062040720408204092041020411204122041320414204152041620417204182041920420204212042220423204242042520426204272042820429204302043120432204332043420435204362043720438204392044020441204422044320444204452044620447204482044920450204512045220453204542045520456204572045820459204602046120462204632046420465204662046720468204692047020471204722047320474204752047620477204782047920480204812048220483204842048520486204872048820489204902049120492204932049420495204962049720498204992050020501205022050320504205052050620507205082050920510205112051220513205142051520516205172051820519205202052120522205232052420525205262052720528205292053020531205322053320534205352053620537205382053920540205412054220543205442054520546205472054820549205502055120552205532055420555205562055720558205592056020561205622056320564205652056620567205682056920570205712057220573205742057520576205772057820579205802058120582205832058420585205862058720588205892059020591205922059320594205952059620597205982059920600206012060220603206042060520606206072060820609206102061120612206132061420615206162061720618206192062020621206222062320624206252062620627206282062920630206312063220633206342063520636206372063820639206402064120642206432064420645206462064720648206492065020651206522065320654206552065620657206582065920660206612066220663206642066520666206672066820669206702067120672206732067420675206762067720678206792068020681206822068320684206852068620687206882068920690206912069220693206942069520696206972069820699207002070120702207032070420705207062070720708207092071020711207122071320714207152071620717207182071920720207212072220723207242072520726207272072820729207302073120732207332073420735207362073720738207392074020741207422074320744207452074620747207482074920750207512075220753207542075520756207572075820759207602076120762207632076420765207662076720768207692077020771207722077320774207752077620777207782077920780207812078220783207842078520786207872078820789207902079120792207932079420795207962079720798207992080020801208022080320804208052080620807208082080920810208112081220813208142081520816208172081820819208202082120822208232082420825208262082720828208292083020831208322083320834208352083620837208382083920840208412084220843208442084520846208472084820849208502085120852208532085420855208562085720858208592086020861208622086320864208652086620867208682086920870208712087220873208742087520876208772087820879208802088120882208832088420885208862088720888208892089020891208922089320894208952089620897208982089920900209012090220903209042090520906209072090820909209102091120912209132091420915209162091720918209192092020921209222092320924209252092620927209282092920930209312093220933209342093520936209372093820939209402094120942209432094420945209462094720948209492095020951209522095320954209552095620957209582095920960209612096220963209642096520966209672096820969209702097120972209732097420975209762097720978209792098020981209822098320984209852098620987209882098920990209912099220993209942099520996209972099820999210002100121002210032100421005210062100721008210092101021011210122101321014210152101621017210182101921020210212102221023210242102521026210272102821029210302103121032210332103421035210362103721038210392104021041210422104321044210452104621047210482104921050210512105221053210542105521056210572105821059210602106121062210632106421065210662106721068210692107021071210722107321074210752107621077210782107921080210812108221083210842108521086210872108821089210902109121092210932109421095210962109721098210992110021101211022110321104211052110621107211082110921110211112111221113211142111521116211172111821119211202112121122211232112421125211262112721128211292113021131211322113321134211352113621137211382113921140211412114221143211442114521146211472114821149211502115121152211532115421155211562115721158211592116021161211622116321164211652116621167211682116921170211712117221173211742117521176211772117821179211802118121182211832118421185211862118721188211892119021191211922119321194211952119621197211982119921200212012120221203212042120521206212072120821209212102121121212212132121421215212162121721218212192122021221212222122321224212252122621227212282122921230212312123221233212342123521236212372123821239212402124121242212432124421245212462124721248212492125021251212522125321254212552125621257212582125921260212612126221263212642126521266212672126821269212702127121272212732127421275212762127721278212792128021281212822128321284212852128621287212882128921290212912129221293212942129521296212972129821299213002130121302213032130421305213062130721308213092131021311213122131321314213152131621317213182131921320213212132221323213242132521326213272132821329213302133121332213332133421335213362133721338213392134021341213422134321344213452134621347213482134921350213512135221353213542135521356213572135821359213602136121362213632136421365213662136721368213692137021371213722137321374213752137621377213782137921380213812138221383213842138521386213872138821389213902139121392213932139421395213962139721398213992140021401214022140321404214052140621407214082140921410214112141221413214142141521416214172141821419214202142121422214232142421425214262142721428214292143021431214322143321434214352143621437214382143921440214412144221443214442144521446214472144821449214502145121452214532145421455214562145721458214592146021461214622146321464214652146621467214682146921470214712147221473214742147521476214772147821479214802148121482214832148421485214862148721488214892149021491214922149321494214952149621497214982149921500215012150221503215042150521506215072150821509215102151121512215132151421515215162151721518215192152021521215222152321524215252152621527215282152921530215312153221533215342153521536215372153821539215402154121542215432154421545215462154721548215492155021551215522155321554215552155621557215582155921560215612156221563215642156521566215672156821569215702157121572215732157421575215762157721578215792158021581215822158321584215852158621587215882158921590215912159221593215942159521596215972159821599216002160121602216032160421605216062160721608216092161021611216122161321614216152161621617216182161921620216212162221623216242162521626216272162821629216302163121632216332163421635216362163721638216392164021641216422164321644216452164621647216482164921650216512165221653216542165521656216572165821659216602166121662216632166421665216662166721668216692167021671216722167321674216752167621677216782167921680216812168221683216842168521686216872168821689216902169121692216932169421695216962169721698216992170021701217022170321704217052170621707217082170921710217112171221713217142171521716217172171821719217202172121722217232172421725217262172721728217292173021731217322173321734217352173621737217382173921740217412174221743217442174521746217472174821749217502175121752217532175421755217562175721758217592176021761217622176321764217652176621767217682176921770217712177221773217742177521776217772177821779217802178121782217832178421785217862178721788217892179021791217922179321794217952179621797217982179921800218012180221803218042180521806218072180821809218102181121812218132181421815218162181721818218192182021821218222182321824218252182621827218282182921830218312183221833218342183521836218372183821839218402184121842218432184421845218462184721848218492185021851218522185321854218552185621857218582185921860218612186221863218642186521866218672186821869218702187121872218732187421875218762187721878218792188021881218822188321884218852188621887218882188921890218912189221893218942189521896218972189821899219002190121902219032190421905219062190721908219092191021911219122191321914219152191621917219182191921920219212192221923219242192521926219272192821929219302193121932219332193421935219362193721938219392194021941219422194321944219452194621947219482194921950219512195221953219542195521956219572195821959219602196121962219632196421965219662196721968219692197021971219722197321974219752197621977219782197921980219812198221983219842198521986219872198821989219902199121992219932199421995219962199721998219992200022001220022200322004220052200622007220082200922010220112201222013220142201522016220172201822019220202202122022220232202422025220262202722028220292203022031220322203322034220352203622037220382203922040220412204222043220442204522046220472204822049220502205122052220532205422055220562205722058220592206022061220622206322064220652206622067220682206922070220712207222073220742207522076220772207822079220802208122082220832208422085220862208722088220892209022091220922209322094220952209622097220982209922100221012210222103221042210522106221072210822109221102211122112221132211422115221162211722118221192212022121221222212322124221252212622127221282212922130221312213222133221342213522136221372213822139221402214122142221432214422145221462214722148221492215022151221522215322154221552215622157221582215922160221612216222163221642216522166221672216822169221702217122172221732217422175221762217722178221792218022181221822218322184221852218622187221882218922190221912219222193221942219522196221972219822199222002220122202222032220422205222062220722208222092221022211222122221322214222152221622217222182221922220222212222222223222242222522226222272222822229222302223122232222332223422235222362223722238222392224022241222422224322244222452224622247222482224922250222512225222253222542225522256222572225822259222602226122262222632226422265222662226722268222692227022271222722227322274222752227622277222782227922280222812228222283222842228522286222872228822289222902229122292222932229422295222962229722298222992230022301223022230322304223052230622307223082230922310223112231222313223142231522316223172231822319223202232122322223232232422325223262232722328223292233022331223322233322334223352233622337223382233922340223412234222343223442234522346223472234822349223502235122352223532235422355223562235722358223592236022361223622236322364223652236622367223682236922370223712237222373223742237522376223772237822379223802238122382223832238422385223862238722388223892239022391223922239322394223952239622397223982239922400224012240222403224042240522406224072240822409224102241122412224132241422415224162241722418224192242022421224222242322424224252242622427224282242922430224312243222433224342243522436224372243822439224402244122442224432244422445224462244722448224492245022451224522245322454224552245622457224582245922460224612246222463224642246522466224672246822469224702247122472224732247422475224762247722478224792248022481224822248322484224852248622487224882248922490224912249222493224942249522496224972249822499225002250122502225032250422505225062250722508225092251022511225122251322514225152251622517225182251922520225212252222523225242252522526225272252822529225302253122532225332253422535225362253722538225392254022541225422254322544225452254622547225482254922550225512255222553225542255522556225572255822559225602256122562225632256422565225662256722568225692257022571225722257322574225752257622577225782257922580225812258222583225842258522586225872258822589225902259122592225932259422595225962259722598225992260022601226022260322604226052260622607226082260922610226112261222613226142261522616226172261822619226202262122622226232262422625226262262722628226292263022631226322263322634226352263622637226382263922640226412264222643226442264522646226472264822649226502265122652226532265422655226562265722658226592266022661226622266322664226652266622667226682266922670226712267222673226742267522676226772267822679226802268122682226832268422685226862268722688226892269022691226922269322694226952269622697226982269922700227012270222703227042270522706227072270822709227102271122712227132271422715227162271722718227192272022721227222272322724227252272622727227282272922730227312273222733227342273522736227372273822739227402274122742227432274422745227462274722748227492275022751227522275322754227552275622757227582275922760227612276222763227642276522766227672276822769227702277122772227732277422775227762277722778227792278022781227822278322784227852278622787227882278922790227912279222793227942279522796227972279822799228002280122802228032280422805228062280722808228092281022811228122281322814228152281622817228182281922820228212282222823228242282522826228272282822829228302283122832228332283422835228362283722838228392284022841228422284322844228452284622847228482284922850228512285222853228542285522856228572285822859228602286122862228632286422865228662286722868228692287022871228722287322874228752287622877228782287922880228812288222883228842288522886228872288822889228902289122892228932289422895228962289722898228992290022901229022290322904229052290622907229082290922910229112291222913229142291522916229172291822919229202292122922229232292422925229262292722928229292293022931229322293322934229352293622937229382293922940229412294222943229442294522946229472294822949229502295122952229532295422955229562295722958229592296022961229622296322964229652296622967229682296922970229712297222973229742297522976229772297822979229802298122982229832298422985229862298722988229892299022991229922299322994229952299622997229982299923000230012300223003230042300523006230072300823009230102301123012230132301423015230162301723018230192302023021230222302323024230252302623027230282302923030230312303223033230342303523036230372303823039230402304123042230432304423045230462304723048230492305023051230522305323054230552305623057230582305923060230612306223063230642306523066230672306823069230702307123072230732307423075230762307723078230792308023081230822308323084230852308623087230882308923090230912309223093230942309523096230972309823099231002310123102231032310423105231062310723108231092311023111231122311323114231152311623117231182311923120231212312223123231242312523126231272312823129231302313123132231332313423135231362313723138231392314023141231422314323144231452314623147231482314923150231512315223153231542315523156231572315823159231602316123162231632316423165231662316723168231692317023171231722317323174231752317623177231782317923180231812318223183231842318523186231872318823189231902319123192231932319423195231962319723198231992320023201232022320323204232052320623207232082320923210232112321223213232142321523216232172321823219232202322123222232232322423225232262322723228232292323023231232322323323234232352323623237232382323923240232412324223243232442324523246232472324823249232502325123252232532325423255232562325723258232592326023261232622326323264232652326623267232682326923270232712327223273232742327523276232772327823279232802328123282232832328423285232862328723288232892329023291232922329323294232952329623297232982329923300233012330223303233042330523306233072330823309233102331123312233132331423315233162331723318
  1. { Compiled on Fri Jul 30 09:16:42 2021 }
  2. on init
  3. declare $jldiw
  4. declare $qlteh
  5. declare $gmcfe
  6. declare %zeecp[20]
  7. declare %dpoyh[20]
  8. declare %tyrok[20]
  9. declare $v54fu
  10. declare %latnx[2]
  11. declare $hokt3
  12. declare $w0x5j
  13. declare $otddp
  14. declare $wg0d2
  15. declare $gpzoi
  16. declare $yjjle
  17. declare $q3qgi
  18. declare $vlhs0
  19. declare $pvuhq
  20. declare !g0j20[12]
  21. !g0j20[0] := ""
  22. !g0j20[1] := "_1"
  23. !g0j20[2] := "_2"
  24. !g0j20[3] := "_3"
  25. !g0j20[4] := "_4"
  26. !g0j20[5] := "_5"
  27. !g0j20[6] := "_6"
  28. !g0j20[7] := "_7"
  29. !g0j20[8] := "_8"
  30. !g0j20[9] := "_9"
  31. !g0j20[10] := "_10"
  32. !g0j20[11] := "_11"
  33. declare $fg4rw
  34. declare $y3mgr
  35. declare $iz4ec
  36. declare $dyt1q
  37. declare $r0pwv
  38. declare $t1jz4
  39. declare ~u0ht0
  40. declare $jdgl1
  41. declare @uamno
  42. declare $tuwra
  43. declare $uummz
  44. declare $e1wl4
  45. declare %ihqwp[48]
  46. SET_CONDITION(NO_SYS_SCRIPT_PEDAL)
  47. set_snapshot_type(1)
  48. set_script_title("Ashlight")
  49. declare $kyxij
  50. declare !dwujg[12]
  51. !dwujg[0] := "C"
  52. !dwujg[1] := "C#"
  53. !dwujg[2] := "D"
  54. !dwujg[3] := "D#"
  55. !dwujg[4] := "E"
  56. !dwujg[5] := "F"
  57. !dwujg[6] := "F#"
  58. !dwujg[7] := "G"
  59. !dwujg[8] := "G#"
  60. !dwujg[9] := "A"
  61. !dwujg[10] := "Bb"
  62. !dwujg[11] := "B"
  63. declare @cdyen
  64. @cdyen := get_folder($GET_FOLDER_LIBRARY_DIR) & "Samples/" & "Data/PREF/"
  65. declare @ugwfc
  66. @ugwfc := get_folder($GET_FOLDER_LIBRARY_DIR) & "Samples/" & "Resources/Data/"
  67. declare %nki_prefs[30]
  68. load_array(%nki_prefs,2)
  69. declare !help_strings[285]
  70. declare !automation_strings[206]
  71. if (1=1)
  72. declare !font_names[17]
  73. !font_names[0] := "Font_Roboto_Regular_11pt_white_40_Edit"
  74. !font_names[1] := "Font_Roboto_Regular_11pt_black_70_Edit"
  75. !font_names[2] := "Font_Roboto_Regular_11pt_black_90_Edit"
  76. !font_names[3] := "Font_Roboto_Regular_13pt_FFFFFF_Edit"
  77. !font_names[4] := "Font_Roboto_Regular_13pt_white_Edit"
  78. !font_names[5] := "Font_Roboto_Regular_13pt_FFFFFF_disabled_Edit"
  79. !font_names[6] := "Font_Roboto_Regular_13pt_yellow_Edit"
  80. !font_names[7] := "Font_Roboto_Medium_14pt_FFFFFFA70"
  81. !font_names[8] := "Font_Roboto_Medium_14pt_FFFFFFA90"
  82. !font_names[9] := "Font_Roboto_Medium_14pt_blackA70"
  83. !font_names[10] := "Font_Roboto_Medium_14pt_blackA90"
  84. !font_names[11] := "Font_Roboto_Regular_11pt_white_70_Edit"
  85. !font_names[12] := "Font_Roboto_Regular_13pt_FFFFFF_Hover_Edit.png"
  86. !font_names[13] := "Font_Roboto_Regular_13pt_yellow_Strike.png"
  87. !font_names[14] := "Font_Roboto_Regular_13pt_white_Strike.png"
  88. !font_names[15] := "Font_Roboto_Regular_11pt_white_90"
  89. !font_names[16] := "Font_Roboto_Medium_14pt_FFFFFFA80"
  90. declare %aydym[17]
  91. $fg4rw := 0
  92. while ($fg4rw<17)
  93. %aydym[$fg4rw] := get_font_id(!font_names[$fg4rw])
  94. inc($fg4rw)
  95. end while
  96. declare $g5k3r
  97. declare $25gvz
  98. declare %x4loa[19] := ($CONTROL_PAR_POS_X, $CONTROL_PAR_POS_Y, $CONTROL_PAR_WIDTH, $CONTROL_PAR_HEIGHT, $CONTROL_PAR_Z_LAYER, $CONTROL_PAR_HIDE, $CONTROL_PAR_AUTOMATION_ID, $CONTROL_PAR_DEFAULT_VALUE, $CONTROL_PAR_MOUSE_BEHAVIOUR, $CONTROL_PAR_PICTURE_STATE, $CONTROL_PAR_FONT_TYPE, $CONTROL_PAR_FONT_TYPE_OFF_PRESSED, $CONTROL_PAR_FONT_TYPE_OFF_HOVER, $CONTROL_PAR_FONT_TYPE_ON, $CONTROL_PAR_FONT_TYPE_ON_PRESSED, $CONTROL_PAR_FONT_TYPE_ON_HOVER, $CONTROL_PAR_TEXTPOS_Y, $CONTROL_PAR_TEXT_ALIGNMENT, $CONTROL_PAR_ALLOW_AUTOMATION)
  99. declare %xwg5s[2000] := (-1)
  100. declare %cqg2m[200] := (-1)
  101. declare %_GUI_state[38000] := (-1)
  102. declare $0ib2k
  103. make_instr_persistent($0ib2k)
  104. declare $yhwrb
  105. declare $4hpei
  106. read_persistent_var($0ib2k)
  107. declare %0eutz[5]
  108. declare ui_button $bjll0
  109. make_instr_persistent($bjll0)
  110. declare ui_button $myubi
  111. make_instr_persistent($myubi)
  112. declare ui_button $xgbml
  113. make_instr_persistent($xgbml)
  114. declare ui_button $b3dyn
  115. make_instr_persistent($b3dyn)
  116. declare ui_button $akgz1
  117. make_instr_persistent($akgz1)
  118. $pvuhq := 0
  119. while ($pvuhq<=4)
  120. %0eutz[$pvuhq] := get_ui_id($bjll0)+$pvuhq
  121. inc($pvuhq)
  122. end while
  123. $g5k3r := 0
  124. while ($g5k3r<num_elements(%0eutz))
  125. %xwg5s[660+$g5k3r] := %0eutz[$g5k3r]
  126. %cqg2m[66] := 527
  127. inc($g5k3r)
  128. end while
  129. $fg4rw := 0
  130. while ($fg4rw<5)
  131. set_control_par_str(%0eutz[$fg4rw],$CONTROL_PAR_TEXT,"")
  132. set_control_par_str(%0eutz[$fg4rw],$CONTROL_PAR_PICTURE,"GE_MAIN_NAV_" & $fg4rw)
  133. inc($fg4rw)
  134. end while
  135. declare $mdykc
  136. make_instr_persistent($mdykc)
  137. declare %konvz[3] := (64, 1024, 16)
  138. declare %23vl1[3]
  139. declare ui_button $v2hxc
  140. make_instr_persistent($v2hxc)
  141. declare ui_button $raqd0
  142. make_instr_persistent($raqd0)
  143. declare ui_button $txw2h
  144. make_instr_persistent($txw2h)
  145. $pvuhq := 0
  146. while ($pvuhq<=2)
  147. %23vl1[$pvuhq] := get_ui_id($v2hxc)+$pvuhq
  148. inc($pvuhq)
  149. end while
  150. $g5k3r := 0
  151. while ($g5k3r<num_elements(%23vl1))
  152. %xwg5s[670+$g5k3r] := %23vl1[$g5k3r]
  153. %cqg2m[67] := 15
  154. inc($g5k3r)
  155. end while
  156. $fg4rw := 0
  157. while ($fg4rw<3)
  158. set_control_par_str(%23vl1[$fg4rw],$CONTROL_PAR_TEXT,"")
  159. set_control_par_str(%23vl1[$fg4rw],$CONTROL_PAR_PICTURE,"GE_BOT_NAV_" & $fg4rw)
  160. inc($fg4rw)
  161. end while
  162. declare ui_label $fgho2(1, 1)
  163. set_control_par_str(get_ui_id($fgho2),$CONTROL_PAR_TEXT,"")
  164. set_control_par_str(get_ui_id($fgho2),$CONTROL_PAR_PICTURE,"GE_BTM_NAV_BG")
  165. $g5k3r := 0
  166. while (%xwg5s[670+$g5k3r]>0 and ($g5k3r<10))
  167. inc($g5k3r)
  168. end while
  169. %xwg5s[670+$g5k3r] := get_ui_id($fgho2)
  170. declare ui_label $fpo2t(1, 1)
  171. set_control_par_str(get_ui_id($fpo2t),$CONTROL_PAR_TEXT,"")
  172. set_control_par_str(get_ui_id($fpo2t),$CONTROL_PAR_PICTURE,"GE_MOD_TYPE_LABEL")
  173. $g5k3r := 0
  174. while (%xwg5s[670+$g5k3r]>0 and ($g5k3r<10))
  175. inc($g5k3r)
  176. end while
  177. %xwg5s[670+$g5k3r] := get_ui_id($fpo2t)
  178. declare %mjtqu[16] := (10529713, 14870248, 10529713, 14870248, 8559272, 2044730, 4013373, 7763575, 4013373, 7763575, 8559272, 2044730, 8559272, 2044730, 8559272, 2044730)
  179. declare %e4ffk[8] := (10, 11, 2, 4, 4, 2, 2, 2)
  180. end if
  181. declare $4djds
  182. declare %aazjf[26]
  183. declare %5comw[26]
  184. declare %ha0dc[26]
  185. declare %aebtw[26]
  186. declare %hgu5c[26]
  187. declare %i5z0e[26]
  188. declare %c40o1[26]
  189. declare %bjbtn[26]
  190. declare %qpgwq[26]
  191. declare %gndxq[26]
  192. declare %cy2pa[26]
  193. declare !5hawr[26]
  194. declare !znpd1[26]
  195. declare %ipim0[26]
  196. declare %qdiwi[26]
  197. declare $b4lv0 := 45
  198. make_persistent($b4lv0)
  199. declare $cm312
  200. make_persistent($cm312)
  201. set_control_par_str($INST_WALLPAPER_ID,$CONTROL_PAR_PICTURE,"GE_wallpaper")
  202. set_control_par_str($INST_ICON_ID,$CONTROL_PAR_PICTURE,"NID_instrument_icon_w")
  203. set_control_par_str($INST_LIB_PIC_ONE_ID,$CONTROL_PAR_PICTURE,"AboutIconLibrary")
  204. set_control_par_str($INST_LIB_PIC_TWO_ID,$CONTROL_PAR_PICTURE,"AboutIconLibAuthor")
  205. set_control_par_str($INST_LIB_COPYRIGHT_ID,$CONTROL_PAR_TEXT,"Copyright 2021 by the most human colors")
  206. set_control_par_str($INST_LIB_DESCRIPTION_ID,$CONTROL_PAR_TEXT,"was developed by the most human color in collaboration with The SOLOS and Native Instruments.")
  207. set_ui_height_px(600)
  208. set_ui_width_px(970)
  209. make_perfview
  210. message("")
  211. declare @ichwi
  212. @ichwi := get_folder($GET_FOLDER_LIBRARY_DIR) & "Samples/" & "Data/FX_PRESETS/"
  213. set_listener($NI_SIGNAL_TIMER_MS,6666)
  214. declare $dc3zm
  215. declare $frfox
  216. declare %n34di[82] := (-1)
  217. declare %41o3s[82] := (-1)
  218. declare %c1qym[82] := (-1)
  219. declare %z15qu[82] := (-1)
  220. declare %2hswt[82] := (-1)
  221. declare %qxmpr[82] := (-1)
  222. declare %dwdw3[82] := (-1)
  223. declare %sbnwu[82] := (-1)
  224. declare %nwlgb[82]
  225. declare %lm23w[82] := (-1)
  226. declare !4gjzd[82]
  227. declare %q4mzh[82] := (-1)
  228. declare %fogcg[82] := (0)
  229. declare %eujmz[82] := (0)
  230. declare %hpc0e[82] := (0)
  231. declare %vc4gu[82] := (0)
  232. declare %5zak5[82] := (0)
  233. declare %jeswc[82] := (0)
  234. declare %vvlef[82] := (-1)
  235. declare ?rylw5[82]
  236. declare %oazdd[82]
  237. declare !gh3f0[82]
  238. declare !isqic[82]
  239. declare %mnk53[82] := (0)
  240. declare %gmios[82] := (0)
  241. declare %hivzv[82] := (-1)
  242. declare %hxpuh[82] := (-1)
  243. declare $upapg
  244. declare %q4rwz[1640] := (-1)
  245. declare %3hbq2[82] := (-1)
  246. declare %qnt5w[24] := (0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23)
  247. declare %plcoy[24] := (-11, -11, -14, -14, -13, -13, -14, -14, -19, -14, -18, -21, -15, -14, -11, -11, -11, -11, -21, -14, -19, -18, -18, -18)
  248. declare %bnygy[24] := (0, 1, 14, 15, 16, 17, 2, 3, 4, 5, 6, 7, 8, 10, 11, 13, 22, 9, 21, 12, 19, 20, 18, 23)
  249. declare $1bi4b
  250. declare $3yie0
  251. declare %laljf[8192]
  252. declare %5ggz3[256]
  253. declare %asdef[256]
  254. declare %w1vde[256]
  255. declare %ilm5d[256]
  256. declare %c1kc4[256]
  257. declare %jnhix[256]
  258. declare %gvnxp[256]
  259. declare %oy5fa[256]
  260. declare %45gob[256]
  261. declare %eehid[16]
  262. declare %a31v5[16]
  263. declare %2zfuu[16]
  264. declare %vftan[128]
  265. declare $yrh4w
  266. declare %z3n3e[16]
  267. declare $ga54u
  268. declare %ppvim[24]
  269. make_persistent(%ppvim)
  270. declare %qum0u[24]
  271. declare %h1b0t[24]
  272. declare $y3puj := 1
  273. declare $meuyq := 0
  274. declare $4ggtc := 1
  275. declare $bh4s5 := 0
  276. declare $wkxzh
  277. declare $bctbb := -1
  278. declare %nwcvz[4] := (0, 1, 2, 3)
  279. declare !b5nul[4]
  280. !b5nul[0] := "First"
  281. !b5nul[1] := "Every"
  282. !b5nul[2] := "Highest"
  283. !b5nul[3] := "Lowest"
  284. declare $qbqpm
  285. declare ui_menu $zdrta
  286. make_persistent($zdrta)
  287. set_control_par_str(get_ui_id($zdrta),$CONTROL_PAR_PICTURE,"blank")
  288. $fg4rw := 0
  289. while ($fg4rw<4)
  290. add_menu_item($zdrta,!b5nul[$fg4rw] & " Note",%nwcvz[$fg4rw])
  291. inc($fg4rw)
  292. end while
  293. %xwg5s[600] := get_ui_id($zdrta)
  294. %cqg2m[60] := 16
  295. declare %oktyv[6] := (4, 5, 12, 19, 20, 23)
  296. declare %s0rie[10] := (12, 10, 4, 5, 13, 19, 9, 21, 22, 23)
  297. declare %45suw[7] := (6, 7, 2, 3, 8, 4, 5)
  298. declare %tjjl2[7] := (0, 1, 11, 14, 15, 16, 17)
  299. declare %vzkyc[24]
  300. declare %o4h4i[24]
  301. declare !flm4j[24]
  302. !flm4j[0] := "X"
  303. !flm4j[1] := "Y"
  304. !flm4j[2] := "S1"
  305. !flm4j[3] := "S2"
  306. !flm4j[4] := "L1"
  307. !flm4j[5] := "L2"
  308. !flm4j[6] := "B1"
  309. !flm4j[7] := "B2"
  310. !flm4j[8] := "SUM"
  311. !flm4j[9] := "AT"
  312. !flm4j[10] := "Vel"
  313. !flm4j[11] := "LVel"
  314. !flm4j[12] := "Dur"
  315. !flm4j[13] := "KT"
  316. !flm4j[14] := "A"
  317. !flm4j[15] := "B"
  318. !flm4j[16] := "C"
  319. !flm4j[17] := "D"
  320. !flm4j[18] := "Max"
  321. !flm4j[19] := "RL"
  322. !flm4j[20] := "Arp"
  323. !flm4j[21] := "SLD"
  324. !flm4j[22] := "RND"
  325. !flm4j[23] := "POS"
  326. declare !bw1t3[24]
  327. !bw1t3[0] := "X XY Pad"
  328. !bw1t3[1] := "Y XY Pad"
  329. !bw1t3[2] := "S1 Shaper"
  330. !bw1t3[3] := "S2 Shaper"
  331. !bw1t3[4] := "L1 LFO"
  332. !bw1t3[5] := "L2 LFO"
  333. !bw1t3[6] := "B1 Matrix Bus"
  334. !bw1t3[7] := "B2 Matrix Bus"
  335. !bw1t3[8] := "SUM Matrix Sum"
  336. !bw1t3[9] := "AT Aftertouch"
  337. !bw1t3[10] := "VEL Velocity"
  338. !bw1t3[11] := "LVEL Last Velocity"
  339. !bw1t3[12] := "DU Duration"
  340. !bw1t3[13] := "KT Key Tracking"
  341. !bw1t3[14] := "A Macro"
  342. !bw1t3[15] := "B Macro"
  343. !bw1t3[16] := "C Macro"
  344. !bw1t3[17] := "D Macro"
  345. !bw1t3[18] := "MAX Constant"
  346. !bw1t3[19] := "RL Release"
  347. !bw1t3[20] := "ARP Modulator"
  348. !bw1t3[21] := "SLD MPE Slide"
  349. !bw1t3[22] := "RND Key Random"
  350. !bw1t3[23] := "POS Cursor Position"
  351. declare %prryo[24] := (200, 200, 20, 20, 50, 50, 10, 10, 15, 40, 40, 10, 15, 10, 0, 0, 0, 0, 0, 0, 20, 0, 20, 0)
  352. declare %ludky[690]
  353. declare %zpgb5[720]
  354. $y3mgr := 0
  355. $fg4rw := 0
  356. while ($fg4rw<24)
  357. if ($fg4rw # 10)
  358. $g5k3r := 0
  359. while ($g5k3r<%prryo[$fg4rw])
  360. %ludky[$y3mgr] := $fg4rw
  361. inc($y3mgr)
  362. inc($g5k3r)
  363. end while
  364. end if
  365. inc($fg4rw)
  366. end while
  367. $y3mgr := 0
  368. $fg4rw := 0
  369. while ($fg4rw<24)
  370. if ($fg4rw # 11)
  371. $g5k3r := 0
  372. while ($g5k3r<%prryo[$fg4rw])
  373. %zpgb5[$y3mgr] := $fg4rw
  374. inc($y3mgr)
  375. inc($g5k3r)
  376. end while
  377. end if
  378. inc($fg4rw)
  379. end while
  380. $fg4rw := 0
  381. while ($fg4rw<24)
  382. if (search(%s0rie,%qnt5w[$fg4rw])=-1)
  383. %vzkyc[$fg4rw] := 0
  384. else
  385. %vzkyc[$fg4rw] := 1
  386. end if
  387. if (search(%oktyv,%qnt5w[$fg4rw])=-1)
  388. %o4h4i[$fg4rw] := 0
  389. else
  390. %o4h4i[$fg4rw] := 1
  391. end if
  392. inc($fg4rw)
  393. end while
  394. declare ui_slider $3tqoo(-1000, 1000)
  395. make_persistent($3tqoo)
  396. declare ui_slider $yexen(-2001, 2001)
  397. make_persistent($yexen)
  398. set_control_par_str(get_ui_id($yexen),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  399. declare ui_menu $zi2jx
  400. make_persistent($zi2jx)
  401. set_control_par_str(get_ui_id($zi2jx),$CONTROL_PAR_PICTURE,"blank")
  402. $fg4rw := 0
  403. while ($fg4rw<num_elements(!flm4j))
  404. add_menu_item($zi2jx,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  405. inc($fg4rw)
  406. end while
  407. set_menu_item_visibility(get_ui_id($zi2jx),search(%bnygy,11),0)
  408. $upapg := 0
  409. %n34di[$upapg] := get_ui_id($zi2jx)
  410. %nwlgb[$upapg] := get_ui_id($yexen)
  411. !4gjzd[0] := "_5"
  412. %c1qym[0] := get_ui_id($yexen)
  413. %41o3s[0] := get_ui_id($3tqoo)
  414. declare ui_label $him5m(1, 1)
  415. set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_TEXT,"")
  416. set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  417. %vvlef[0] := get_ui_id($him5m)
  418. declare ui_label $zhici(1, 1)
  419. set_control_par_str(get_ui_id($zhici),$CONTROL_PAR_TEXT,"")
  420. set_control_par_str(get_ui_id($zhici),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  421. %2hswt[0] := get_ui_id($zhici)
  422. declare ui_label $q0mzv(1, 1)
  423. set_control_par_str(get_ui_id($q0mzv),$CONTROL_PAR_TEXT,"")
  424. set_control_par_str(get_ui_id($q0mzv),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  425. set_control_par(get_ui_id($q0mzv),$CONTROL_PAR_Z_LAYER,1)
  426. %lm23w[0] := get_ui_id($q0mzv)
  427. %qxmpr[0] := 2001
  428. %oazdd[0] := 10
  429. !gh3f0[0] := "%"
  430. ?rylw5[0] := 1.0
  431. %q4mzh[0] := -1
  432. %vc4gu[0] := 100000
  433. %hpc0e[0] := -1
  434. %eujmz[0] := -1
  435. %fogcg[0] := 0
  436. %5zak5[0] := 0
  437. %dwdw3[0] := -1000
  438. %sbnwu[0] := 1000
  439. %jeswc[0] := 330
  440. %mnk53[0] := 40
  441. declare %mwgv5[10] := (get_ui_id($3tqoo), get_ui_id($yexen), get_ui_id($him5m), get_ui_id($zhici), get_ui_id($q0mzv), get_ui_id($zi2jx), -1)
  442. $g5k3r := 0
  443. while ($g5k3r<num_elements(%mwgv5))
  444. %xwg5s[400+$g5k3r] := %mwgv5[$g5k3r]
  445. %cqg2m[40] := 16
  446. inc($g5k3r)
  447. end while
  448. declare ui_switch $3k3u2
  449. make_persistent($3k3u2)
  450. read_persistent_var($3k3u2)
  451. set_control_par_str(get_ui_id($3k3u2),$CONTROL_PAR_TEXT,"")
  452. set_control_par_str(get_ui_id($3k3u2),$CONTROL_PAR_PICTURE,"MTX_ant_mode_sw")
  453. declare ui_switch $ttvix
  454. make_persistent($ttvix)
  455. read_persistent_var($ttvix)
  456. set_control_par_str(get_ui_id($ttvix),$CONTROL_PAR_TEXT,"")
  457. set_control_par_str(get_ui_id($ttvix),$CONTROL_PAR_PICTURE,"GE_MTX_BI_POL_BTN")
  458. declare ui_switch $hj1x4
  459. make_persistent($hj1x4)
  460. read_persistent_var($hj1x4)
  461. set_control_par_str(get_ui_id($hj1x4),$CONTROL_PAR_TEXT,"")
  462. set_control_par_str(get_ui_id($hj1x4),$CONTROL_PAR_PICTURE,"GE_MTX_BI_POL_BTN")
  463. declare ui_slider $gehcz(-1000, 1000)
  464. make_persistent($gehcz)
  465. set_control_par_str(get_ui_id($gehcz),$CONTROL_PAR_PICTURE,"GE_MATRIX_SLIDER")
  466. declare ui_slider $0qzrr(-1000, 1000)
  467. make_persistent($0qzrr)
  468. set_control_par_str(get_ui_id($0qzrr),$CONTROL_PAR_PICTURE,"GE_MATRIX_SLIDER")
  469. declare ui_menu $1fo5x
  470. make_persistent($1fo5x)
  471. set_control_par_str(get_ui_id($1fo5x),$CONTROL_PAR_PICTURE,"blank")
  472. $fg4rw := 0
  473. while ($fg4rw<num_elements(!flm4j))
  474. add_menu_item($1fo5x,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  475. inc($fg4rw)
  476. end while
  477. set_menu_item_visibility(get_ui_id($1fo5x),search(%bnygy,11),0)
  478. $upapg := 1
  479. %n34di[$upapg] := get_ui_id($1fo5x)
  480. %nwlgb[$upapg] := $3k3u2*get_ui_id($gehcz)+((.not. $3k3u2 .and. 1)*get_ui_id($3tqoo))
  481. declare ui_slider $1tszb(-1000, 1000)
  482. make_persistent($1tszb)
  483. declare ui_slider $v1jgb(-2001, 2001)
  484. make_persistent($v1jgb)
  485. set_control_par_str(get_ui_id($v1jgb),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  486. declare ui_menu $gxopj
  487. make_persistent($gxopj)
  488. set_control_par_str(get_ui_id($gxopj),$CONTROL_PAR_PICTURE,"blank")
  489. $fg4rw := 0
  490. while ($fg4rw<num_elements(!flm4j))
  491. add_menu_item($gxopj,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  492. inc($fg4rw)
  493. end while
  494. set_menu_item_visibility(get_ui_id($gxopj),search(%bnygy,11),0)
  495. $upapg := 2
  496. %n34di[$upapg] := get_ui_id($gxopj)
  497. %nwlgb[$upapg] := get_ui_id($v1jgb)
  498. !4gjzd[2] := "_5"
  499. %c1qym[2] := get_ui_id($v1jgb)
  500. %41o3s[2] := get_ui_id($1tszb)
  501. declare ui_label $twgeq(1, 1)
  502. set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_TEXT,"")
  503. set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  504. %vvlef[2] := get_ui_id($twgeq)
  505. declare ui_label $gnppc(1, 1)
  506. set_control_par_str(get_ui_id($gnppc),$CONTROL_PAR_TEXT,"")
  507. set_control_par_str(get_ui_id($gnppc),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  508. %2hswt[2] := get_ui_id($gnppc)
  509. declare ui_label $ddcxd(1, 1)
  510. set_control_par_str(get_ui_id($ddcxd),$CONTROL_PAR_TEXT,"")
  511. set_control_par_str(get_ui_id($ddcxd),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  512. set_control_par(get_ui_id($ddcxd),$CONTROL_PAR_Z_LAYER,1)
  513. %lm23w[2] := get_ui_id($ddcxd)
  514. %qxmpr[2] := 2001
  515. %oazdd[2] := 10
  516. !gh3f0[2] := "%"
  517. ?rylw5[2] := 1.0
  518. %q4mzh[2] := -1
  519. %vc4gu[2] := 100000
  520. %hpc0e[2] := -1
  521. %eujmz[2] := -1
  522. %fogcg[2] := 0
  523. %5zak5[2] := 0
  524. %dwdw3[2] := -1000
  525. %sbnwu[2] := 1000
  526. %jeswc[2] := 335
  527. %mnk53[2] := 41
  528. declare %ettog[10] := (get_ui_id($1tszb), get_ui_id($v1jgb), get_ui_id($twgeq), get_ui_id($gnppc), get_ui_id($ddcxd), get_ui_id($gxopj), -1)
  529. $g5k3r := 0
  530. while ($g5k3r<num_elements(%ettog))
  531. %xwg5s[410+$g5k3r] := %ettog[$g5k3r]
  532. %cqg2m[41] := 16
  533. inc($g5k3r)
  534. end while
  535. declare ui_switch $13ap0
  536. make_persistent($13ap0)
  537. read_persistent_var($13ap0)
  538. set_control_par_str(get_ui_id($13ap0),$CONTROL_PAR_TEXT,"")
  539. set_control_par_str(get_ui_id($13ap0),$CONTROL_PAR_PICTURE,"MTX_ant_mode_sw")
  540. declare ui_slider $ihtwl(-1000, 1000)
  541. make_persistent($ihtwl)
  542. set_control_par_str(get_ui_id($ihtwl),$CONTROL_PAR_PICTURE,"GE_MATRIX_SLIDER")
  543. declare ui_slider $pzeed(-1000, 1000)
  544. make_persistent($pzeed)
  545. set_control_par_str(get_ui_id($pzeed),$CONTROL_PAR_PICTURE,"GE_MATRIX_SLIDER")
  546. declare ui_menu $z1x5e
  547. make_persistent($z1x5e)
  548. set_control_par_str(get_ui_id($z1x5e),$CONTROL_PAR_PICTURE,"blank")
  549. $fg4rw := 0
  550. while ($fg4rw<num_elements(!flm4j))
  551. add_menu_item($z1x5e,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  552. inc($fg4rw)
  553. end while
  554. set_menu_item_visibility(get_ui_id($z1x5e),search(%bnygy,11),0)
  555. $upapg := 3
  556. %n34di[$upapg] := get_ui_id($z1x5e)
  557. %nwlgb[$upapg] := $13ap0*get_ui_id($ihtwl)+((.not. $13ap0 .and. 1)*get_ui_id($1tszb))
  558. declare ui_label $dfysh(1, 1)
  559. set_control_par_str(get_ui_id($dfysh),$CONTROL_PAR_TEXT,"")
  560. set_control_par_str(get_ui_id($dfysh),$CONTROL_PAR_PICTURE,"GE_mod_bus_level_meter")
  561. declare ui_label $p0xv1(1, 1)
  562. set_control_par_str(get_ui_id($p0xv1),$CONTROL_PAR_TEXT,"")
  563. set_control_par_str(get_ui_id($p0xv1),$CONTROL_PAR_PICTURE,"GE_mod_bus_level_meter")
  564. declare ui_label $ako01(1, 1)
  565. set_control_par_str(get_ui_id($ako01),$CONTROL_PAR_TEXT,"")
  566. set_control_par_str(get_ui_id($ako01),$CONTROL_PAR_PICTURE,"GE_mod_bus_level_meter")
  567. $g5k3r := 0
  568. while (%xwg5s[400+$g5k3r]>0 and ($g5k3r<10))
  569. inc($g5k3r)
  570. end while
  571. %xwg5s[400+$g5k3r] := get_ui_id($gehcz)
  572. $g5k3r := 0
  573. while (%xwg5s[400+$g5k3r]>0 and ($g5k3r<10))
  574. inc($g5k3r)
  575. end while
  576. %xwg5s[400+$g5k3r] := get_ui_id($0qzrr)
  577. $g5k3r := 0
  578. while (%xwg5s[400+$g5k3r]>0 and ($g5k3r<10))
  579. inc($g5k3r)
  580. end while
  581. %xwg5s[400+$g5k3r] := get_ui_id($ttvix)
  582. $g5k3r := 0
  583. while (%xwg5s[410+$g5k3r]>0 and ($g5k3r<10))
  584. inc($g5k3r)
  585. end while
  586. %xwg5s[410+$g5k3r] := get_ui_id($ihtwl)
  587. $g5k3r := 0
  588. while (%xwg5s[410+$g5k3r]>0 and ($g5k3r<10))
  589. inc($g5k3r)
  590. end while
  591. %xwg5s[410+$g5k3r] := get_ui_id($pzeed)
  592. $g5k3r := 0
  593. while (%xwg5s[410+$g5k3r]>0 and ($g5k3r<10))
  594. inc($g5k3r)
  595. end while
  596. %xwg5s[410+$g5k3r] := get_ui_id($hj1x4)
  597. declare %wqpwq[7] := (get_ui_id($1fo5x), get_ui_id($z1x5e), get_ui_id($dfysh), get_ui_id($p0xv1), get_ui_id($3k3u2), get_ui_id($13ap0), get_ui_id($ako01))
  598. $g5k3r := 0
  599. while ($g5k3r<num_elements(%wqpwq))
  600. %xwg5s[680+$g5k3r] := %wqpwq[$g5k3r]
  601. %cqg2m[68] := 16
  602. inc($g5k3r)
  603. end while
  604. declare ui_table %w0xec[128](3, 3, 1000)
  605. make_persistent(%w0xec)
  606. set_control_par(get_ui_id(%w0xec),$CONTROL_PAR_BAR_COLOR,7960953)
  607. set_control_par(get_ui_id(%w0xec),$CONTROL_PAR_ZERO_LINE_COLOR,7960953)
  608. set_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  609. declare ui_menu $ytzwi
  610. make_persistent($ytzwi)
  611. read_persistent_var($ytzwi)
  612. set_control_par_str(get_ui_id($ytzwi),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
  613. add_menu_item($ytzwi,"Interpolation",-1)
  614. add_menu_item($ytzwi," Quant ",0)
  615. add_menu_item($ytzwi," Linear ",1)
  616. add_menu_item($ytzwi," Ease In Out ",2)
  617. add_menu_item($ytzwi,"Functions",3)
  618. add_menu_item($ytzwi," Fill Expo 1.5",4)
  619. add_menu_item($ytzwi," Fill Expo 3",5)
  620. add_menu_item($ytzwi," Fill Expo 4.5",6)
  621. add_menu_item($ytzwi," Fill Expo 6",7)
  622. add_menu_item($ytzwi," Reverse",8)
  623. add_menu_item($ytzwi," +10%",12)
  624. add_menu_item($ytzwi," -10%",13)
  625. add_menu_item($ytzwi," Invert",14)
  626. add_menu_item($ytzwi," Quantize 12",9)
  627. add_menu_item($ytzwi," Shift 1/4",10)
  628. add_menu_item($ytzwi," Shift 1/2",11)
  629. add_menu_item($ytzwi," Random",15)
  630. add_menu_item($ytzwi," Smooth",16)
  631. add_menu_item($ytzwi," Smooth Wrap",17)
  632. declare $uh2d4
  633. $uh2d4 := $ytzwi
  634. declare ui_value_edit $gllpo(2, 128, 1)
  635. make_persistent($gllpo)
  636. read_persistent_var($gllpo)
  637. set_table_steps_shown(%w0xec,$gllpo)
  638. set_control_par_str(get_ui_id($gllpo),$CONTROL_PAR_TEXT,"")
  639. set_control_par_str(get_ui_id($gllpo),$CONTROL_PAR_PICTURE,"blank")
  640. declare ui_label $paonj(1, 1)
  641. set_control_par(get_ui_id($paonj),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  642. declare ~zxkmy
  643. ~zxkmy := 256.0/int_to_real($gllpo)
  644. set_control_par_str(get_ui_id($paonj),$CONTROL_PAR_TEXT,"")
  645. set_control_par_str(get_ui_id($paonj),$CONTROL_PAR_PICTURE,"GE_Seq_Cursor")
  646. set_control_par(get_ui_id($paonj),$CONTROL_PAR_Z_LAYER,1)
  647. declare ui_menu $cvjhr
  648. make_persistent($cvjhr)
  649. set_control_par_str(get_ui_id($cvjhr),$CONTROL_PAR_PICTURE,"blank")
  650. $fg4rw := 0
  651. while ($fg4rw<num_elements(!flm4j))
  652. add_menu_item($cvjhr,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  653. inc($fg4rw)
  654. end while
  655. set_menu_item_visibility(get_ui_id($cvjhr),search(%bnygy,11),0)
  656. $upapg := 4
  657. %n34di[$upapg] := get_ui_id($cvjhr)
  658. %nwlgb[$upapg] := -1
  659. set_menu_item_visibility(get_ui_id($cvjhr),search(%bnygy,2),0)
  660. declare %tw2nn[5] := (get_ui_id(%w0xec), get_ui_id($ytzwi), get_ui_id($gllpo), get_ui_id($paonj), get_ui_id($cvjhr))
  661. $g5k3r := 0
  662. while ($g5k3r<num_elements(%tw2nn))
  663. %xwg5s[420+$g5k3r] := %tw2nn[$g5k3r]
  664. %cqg2m[42] := 16
  665. inc($g5k3r)
  666. end while
  667. declare ui_table %rzzs4[128](3, 3, 1000)
  668. make_persistent(%rzzs4)
  669. set_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_BAR_COLOR,7960953)
  670. set_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_ZERO_LINE_COLOR,7960953)
  671. set_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  672. declare ui_menu $f3u5d
  673. make_persistent($f3u5d)
  674. read_persistent_var($f3u5d)
  675. set_control_par_str(get_ui_id($f3u5d),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
  676. add_menu_item($f3u5d,"Interpolation",-1)
  677. add_menu_item($f3u5d," Quant ",0)
  678. add_menu_item($f3u5d," Linear ",1)
  679. add_menu_item($f3u5d," Ease In Out ",2)
  680. add_menu_item($f3u5d,"Functions",3)
  681. add_menu_item($f3u5d," Fill Expo 1.5",4)
  682. add_menu_item($f3u5d," Fill Expo 3",5)
  683. add_menu_item($f3u5d," Fill Expo 4.5",6)
  684. add_menu_item($f3u5d," Fill Expo 6",7)
  685. add_menu_item($f3u5d," Reverse",8)
  686. add_menu_item($f3u5d," +10%",12)
  687. add_menu_item($f3u5d," -10%",13)
  688. add_menu_item($f3u5d," Invert",14)
  689. add_menu_item($f3u5d," Quantize 12",9)
  690. add_menu_item($f3u5d," Shift 1/4",10)
  691. add_menu_item($f3u5d," Shift 1/2",11)
  692. add_menu_item($f3u5d," Random",15)
  693. add_menu_item($f3u5d," Smooth",16)
  694. add_menu_item($f3u5d," Smooth Wrap",17)
  695. declare $0zmjz
  696. $0zmjz := $f3u5d
  697. declare ui_value_edit $hn35i(2, 128, 1)
  698. make_persistent($hn35i)
  699. read_persistent_var($hn35i)
  700. set_table_steps_shown(%rzzs4,$hn35i)
  701. set_control_par_str(get_ui_id($hn35i),$CONTROL_PAR_TEXT,"")
  702. set_control_par_str(get_ui_id($hn35i),$CONTROL_PAR_PICTURE,"blank")
  703. declare ui_label $qnejb(1, 1)
  704. set_control_par(get_ui_id($qnejb),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  705. declare ~c2vo0
  706. ~c2vo0 := 256.0/int_to_real($hn35i)
  707. set_control_par_str(get_ui_id($qnejb),$CONTROL_PAR_TEXT,"")
  708. set_control_par_str(get_ui_id($qnejb),$CONTROL_PAR_PICTURE,"GE_Seq_Cursor")
  709. set_control_par(get_ui_id($qnejb),$CONTROL_PAR_Z_LAYER,1)
  710. declare ui_menu $fpvgj
  711. make_persistent($fpvgj)
  712. set_control_par_str(get_ui_id($fpvgj),$CONTROL_PAR_PICTURE,"blank")
  713. $fg4rw := 0
  714. while ($fg4rw<num_elements(!flm4j))
  715. add_menu_item($fpvgj,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  716. inc($fg4rw)
  717. end while
  718. set_menu_item_visibility(get_ui_id($fpvgj),search(%bnygy,11),0)
  719. $upapg := 5
  720. %n34di[$upapg] := get_ui_id($fpvgj)
  721. %nwlgb[$upapg] := -1
  722. set_menu_item_visibility(get_ui_id($fpvgj),search(%bnygy,3),0)
  723. declare %4osbd[5] := (get_ui_id(%rzzs4), get_ui_id($f3u5d), get_ui_id($hn35i), get_ui_id($qnejb), get_ui_id($fpvgj))
  724. $g5k3r := 0
  725. while ($g5k3r<num_elements(%4osbd))
  726. %xwg5s[430+$g5k3r] := %4osbd[$g5k3r]
  727. %cqg2m[43] := 16
  728. inc($g5k3r)
  729. end while
  730. declare %2piom[128]
  731. declare $m12vk
  732. declare $5vbbt
  733. declare ui_button $oov5z
  734. make_instr_persistent($oov5z)
  735. set_control_par_str(get_ui_id($oov5z),$CONTROL_PAR_TEXT,"")
  736. set_control_par_str(get_ui_id($oov5z),$CONTROL_PAR_PICTURE,"GE_SHP_select_btn")
  737. $g5k3r := 0
  738. while (%xwg5s[420+$g5k3r]>0 and ($g5k3r<10))
  739. inc($g5k3r)
  740. end while
  741. %xwg5s[420+$g5k3r] := get_ui_id($oov5z)
  742. declare ui_button $xaqda
  743. set_control_par_str(get_ui_id($xaqda),$CONTROL_PAR_TEXT,"")
  744. set_control_par_str(get_ui_id($xaqda),$CONTROL_PAR_PICTURE,"GE_SHP_smooth_btn")
  745. $g5k3r := 0
  746. while (%xwg5s[420+$g5k3r]>0 and ($g5k3r<10))
  747. inc($g5k3r)
  748. end while
  749. %xwg5s[420+$g5k3r] := get_ui_id($xaqda)
  750. declare $oj0wr
  751. set_listener($NI_SIGNAL_TIMER_BEAT,16)
  752. declare %krazg[32]
  753. declare ui_label $z254v(1, 1)
  754. declare ui_label $ckwyw(1, 1)
  755. declare ui_label $i5ovs(1, 1)
  756. declare ui_label $1efoq(1, 1)
  757. declare ui_label $xpm1z(1, 1)
  758. declare ui_label $epx5p(1, 1)
  759. declare ui_label $dcxek(1, 1)
  760. declare ui_label $odl43(1, 1)
  761. declare ui_label $i1jy5(1, 1)
  762. declare ui_label $msnpv(1, 1)
  763. declare ui_label $kfbps(1, 1)
  764. declare ui_label $v1gmo(1, 1)
  765. declare ui_label $0xi4w(1, 1)
  766. declare ui_label $gymbq(1, 1)
  767. declare ui_label $htfgx(1, 1)
  768. declare ui_label $2sbod(1, 1)
  769. declare ui_label $ef5b2(1, 1)
  770. declare ui_label $un24p(1, 1)
  771. declare ui_label $hjefy(1, 1)
  772. declare ui_label $pq24s(1, 1)
  773. declare ui_label $qyonu(1, 1)
  774. declare ui_label $laxmc(1, 1)
  775. declare ui_label $2ic4d(1, 1)
  776. declare ui_label $deaut(1, 1)
  777. declare ui_label $cqfrg(1, 1)
  778. declare ui_label $2updq(1, 1)
  779. declare ui_label $hrsac(1, 1)
  780. declare ui_label $zplrx(1, 1)
  781. declare ui_label $5wg3g(1, 1)
  782. declare ui_label $trdik(1, 1)
  783. declare ui_label $mand4(1, 1)
  784. declare ui_label $ccc2y(1, 1)
  785. $pvuhq := 0
  786. while ($pvuhq<=31)
  787. %krazg[$pvuhq] := get_ui_id($z254v)+$pvuhq
  788. inc($pvuhq)
  789. end while
  790. $fg4rw := 0
  791. while ($fg4rw<32)
  792. set_control_par_str(%krazg[$fg4rw],$CONTROL_PAR_PICTURE,"GE_GATER_INIDICATOR_LBL")
  793. set_control_par_str(%krazg[$fg4rw],$CONTROL_PAR_TEXT,"")
  794. set_control_par(%krazg[$fg4rw],$CONTROL_PAR_Z_LAYER,1)
  795. set_control_par(%krazg[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  796. inc($fg4rw)
  797. end while
  798. declare @df1fd
  799. @df1fd := "/GATER/"
  800. declare $v2ky0
  801. declare $qscu5
  802. declare $3qz3a
  803. declare $ejy35
  804. declare %fxqnu[5] := (36, 676, 676, 36, 36)
  805. declare %lfbyb[32]
  806. make_persistent(%lfbyb)
  807. declare %bswku[32]
  808. make_persistent(%bswku)
  809. declare %t40az[32]
  810. make_persistent(%t40az)
  811. declare ui_table %qysah[32](3, 3, 1000)
  812. make_persistent(%qysah)
  813. set_control_par(get_ui_id(%qysah),$CONTROL_PAR_BAR_COLOR,2044730)
  814. set_control_par(get_ui_id(%qysah),$CONTROL_PAR_ZERO_LINE_COLOR,2044730)
  815. declare ui_button $i3fbq
  816. make_instr_persistent($i3fbq)
  817. set_control_par_str(get_ui_id($i3fbq),$CONTROL_PAR_TEXT,"")
  818. set_control_par_str(get_ui_id($i3fbq),$CONTROL_PAR_PICTURE,"GE_A_B_btn")
  819. declare ui_menu $c1dov
  820. set_control_par_str(get_ui_id($c1dov),$CONTROL_PAR_PICTURE,"GE_MENU_DOTS")
  821. set_control_par(get_ui_id($c1dov),$CONTROL_PAR_TEXTPOS_Y,20)
  822. add_menu_item($c1dov,"Copy A > B",0)
  823. add_menu_item($c1dov,"Copy B > A",1)
  824. add_menu_item($c1dov,"Copy Morph > A",2)
  825. add_menu_item($c1dov,"Copy Morph > B",3)
  826. add_menu_item($c1dov,"Swap A <> B",4)
  827. add_menu_item($c1dov,"Double Resolution",5)
  828. add_menu_item($c1dov,"Halven Resolution",6)
  829. add_menu_item($c1dov,"Randomize",7)
  830. declare $zgcke
  831. declare $fojqp
  832. declare $5jkam
  833. declare ui_menu $qxgdn
  834. make_persistent($qxgdn)
  835. set_control_par_str(get_ui_id($qxgdn),$CONTROL_PAR_PICTURE,"blank")
  836. add_menu_item($qxgdn,"1/4",16)
  837. add_menu_item($qxgdn,"1/8",8)
  838. add_menu_item($qxgdn,"1/16",4)
  839. add_menu_item($qxgdn,"1/32",2)
  840. add_menu_item($qxgdn,"1/64",1)
  841. declare ui_value_edit $ilpk2(2, 32, 1)
  842. make_persistent($ilpk2)
  843. set_control_par_str(get_ui_id($ilpk2),$CONTROL_PAR_TEXT,"Size")
  844. set_control_par_str(get_ui_id($ilpk2),$CONTROL_PAR_PICTURE,"blank")
  845. set_control_par(get_ui_id($ilpk2),$CONTROL_PAR_SHOW_ARROWS,0)
  846. declare ui_label $t4lmn(1, 1)
  847. set_control_par_str(get_ui_id($t4lmn),$CONTROL_PAR_TEXT,"")
  848. set_control_par_str(get_ui_id($t4lmn),$CONTROL_PAR_PICTURE,"GE_GATER_POS")
  849. set_control_par(get_ui_id($t4lmn),$CONTROL_PAR_Z_LAYER,1)
  850. declare %stepper__preset_vals[66]
  851. declare ui_button $3f4bh
  852. set_control_par_str(get_ui_id($3f4bh),$CONTROL_PAR_TEXT,"")
  853. set_control_par_str(get_ui_id($3f4bh),$CONTROL_PAR_PICTURE,"GE_Next_btn_00")
  854. declare ui_button $bryp1
  855. set_control_par_str(get_ui_id($bryp1),$CONTROL_PAR_TEXT,"")
  856. set_control_par_str(get_ui_id($bryp1),$CONTROL_PAR_PICTURE,"GE_Prev_btn_00")
  857. declare ~z3izd
  858. declare ui_menu $jiutx
  859. make_persistent($jiutx)
  860. set_control_par_str(get_ui_id($jiutx),$CONTROL_PAR_PICTURE,"blank")
  861. $fg4rw := 0
  862. while ($fg4rw<num_elements(!flm4j))
  863. add_menu_item($jiutx,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  864. inc($fg4rw)
  865. end while
  866. set_menu_item_str(get_ui_id($jiutx),search(%bnygy,10),"VEL Mono Velocity")
  867. $upapg := 6
  868. %n34di[$upapg] := get_ui_id($jiutx)
  869. %nwlgb[$upapg] := -1
  870. declare %v5b5r[9] := (get_ui_id(%qysah), get_ui_id($qxgdn), get_ui_id($ilpk2), get_ui_id($t4lmn), get_ui_id($jiutx), get_ui_id($i3fbq), get_ui_id($c1dov), get_ui_id($bryp1), get_ui_id($3f4bh))
  871. $g5k3r := 0
  872. while ($g5k3r<num_elements(%v5b5r))
  873. %xwg5s[270+$g5k3r] := %v5b5r[$g5k3r]
  874. %cqg2m[27] := 0
  875. inc($g5k3r)
  876. end while
  877. declare %iv2n3[5] := (0, 1, 0, 0, 1)
  878. declare ui_slider $zktrd(1, 1500)
  879. make_persistent($zktrd)
  880. declare ui_slider $2zugt(-1500, 1500)
  881. make_persistent($2zugt)
  882. set_control_par_str(get_ui_id($2zugt),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  883. declare ui_menu $vas4o
  884. make_persistent($vas4o)
  885. set_control_par_str(get_ui_id($vas4o),$CONTROL_PAR_PICTURE,"blank")
  886. $fg4rw := 0
  887. while ($fg4rw<num_elements(!flm4j))
  888. add_menu_item($vas4o,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  889. inc($fg4rw)
  890. end while
  891. set_menu_item_visibility(get_ui_id($vas4o),search(%bnygy,11),0)
  892. $upapg := 7
  893. %n34di[$upapg] := get_ui_id($vas4o)
  894. %nwlgb[$upapg] := get_ui_id($2zugt)
  895. !4gjzd[7] := "_5"
  896. %c1qym[7] := get_ui_id($2zugt)
  897. %41o3s[7] := get_ui_id($zktrd)
  898. declare ui_label $hfyob(1, 1)
  899. set_control_par_str(get_ui_id($hfyob),$CONTROL_PAR_TEXT,"")
  900. set_control_par_str(get_ui_id($hfyob),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  901. %vvlef[7] := get_ui_id($hfyob)
  902. declare ui_label $lr2pv(1, 1)
  903. set_control_par_str(get_ui_id($lr2pv),$CONTROL_PAR_TEXT,"")
  904. set_control_par_str(get_ui_id($lr2pv),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  905. %2hswt[7] := get_ui_id($lr2pv)
  906. declare ui_label $bgobj(1, 1)
  907. set_control_par_str(get_ui_id($bgobj),$CONTROL_PAR_TEXT,"")
  908. set_control_par_str(get_ui_id($bgobj),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  909. set_control_par(get_ui_id($bgobj),$CONTROL_PAR_Z_LAYER,1)
  910. %lm23w[7] := get_ui_id($bgobj)
  911. %qxmpr[7] := 1499
  912. %oazdd[7] := 100
  913. !gh3f0[7] := "Hz"
  914. ?rylw5[7] := 3.0
  915. %q4mzh[7] := -1
  916. %vc4gu[7] := 100000
  917. %hpc0e[7] := -1
  918. %eujmz[7] := -1
  919. %fogcg[7] := 0
  920. %5zak5[7] := 0
  921. %dwdw3[7] := 1
  922. %sbnwu[7] := 1500
  923. %jeswc[7] := 310
  924. %mnk53[7] := 38
  925. declare %lywxl[10] := (get_ui_id($zktrd), get_ui_id($2zugt), get_ui_id($hfyob), get_ui_id($lr2pv), get_ui_id($bgobj), get_ui_id($vas4o), -1)
  926. $g5k3r := 0
  927. while ($g5k3r<num_elements(%lywxl))
  928. %xwg5s[380+$g5k3r] := %lywxl[$g5k3r]
  929. %cqg2m[38] := 16
  930. inc($g5k3r)
  931. end while
  932. declare ui_menu $doz2m
  933. make_persistent($doz2m)
  934. add_menu_item($doz2m,"Sine",0)
  935. add_menu_item($doz2m,"Triangle",1)
  936. add_menu_item($doz2m,"Square",7)
  937. add_menu_item($doz2m,"Ramp up",2)
  938. add_menu_item($doz2m,"Ramp dn",3)
  939. add_menu_item($doz2m,"Random",4)
  940. add_menu_item($doz2m,"Seek 1",5)
  941. add_menu_item($doz2m,"Seek 2",6)
  942. set_control_par_str(get_ui_id($doz2m),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
  943. declare ui_menu $e2mne
  944. make_persistent($e2mne)
  945. add_menu_item($e2mne,"Free ",0)
  946. add_menu_item($e2mne,"First ",1)
  947. add_menu_item($e2mne,"Retr ",2)
  948. add_menu_item($e2mne,"Once ",3)
  949. add_menu_item($e2mne,"1st 1x ",4)
  950. set_control_par_str(get_ui_id($e2mne),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
  951. set_control_par(get_ui_id($e2mne),$CONTROL_PAR_FONT_TYPE,2)
  952. set_control_par(get_ui_id($e2mne),$CONTROL_PAR_TEXT_ALIGNMENT,0)
  953. declare ui_switch $l4ujc
  954. make_persistent($l4ujc)
  955. set_control_par_str(get_ui_id($l4ujc),$CONTROL_PAR_TEXT,"")
  956. set_control_par_str(get_ui_id($l4ujc),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_1")
  957. declare ui_label $zcuf4(1, 1)
  958. set_control_par_str(get_ui_id($zcuf4),$CONTROL_PAR_TEXT,"")
  959. set_control_par_str(get_ui_id($zcuf4),$CONTROL_PAR_PICTURE,"GE_LFO_WAVES")
  960. declare ui_slider $rj2yq(0, 360)
  961. make_persistent($rj2yq)
  962. set_control_par_str(get_ui_id($rj2yq),$CONTROL_PAR_PICTURE,"GE_LFO_Phase_Offset_slider")
  963. %xwg5s[1480] := get_ui_id($rj2yq)
  964. %cqg2m[148] := 16
  965. declare $a2nqk
  966. declare ?lrdg1[256]
  967. declare ?2bxj3[256]
  968. declare %hqihq[256]
  969. declare %icfc1[256]
  970. declare %105bp[256]
  971. $kyxij := 0
  972. while ($kyxij<num_elements(%105bp))
  973. %105bp[$kyxij] := random(0,1000)
  974. inc($kyxij)
  975. end while
  976. $g5k3r := 0
  977. while (%xwg5s[380+$g5k3r]>0 and ($g5k3r<10))
  978. inc($g5k3r)
  979. end while
  980. %xwg5s[380+$g5k3r] := get_ui_id($doz2m)
  981. $g5k3r := 0
  982. while (%xwg5s[380+$g5k3r]>0 and ($g5k3r<10))
  983. inc($g5k3r)
  984. end while
  985. %xwg5s[380+$g5k3r] := get_ui_id($e2mne)
  986. $g5k3r := 0
  987. while (%xwg5s[380+$g5k3r]>0 and ($g5k3r<10))
  988. inc($g5k3r)
  989. end while
  990. %xwg5s[380+$g5k3r] := get_ui_id($l4ujc)
  991. $g5k3r := 0
  992. while (%xwg5s[380+$g5k3r]>0 and ($g5k3r<10))
  993. inc($g5k3r)
  994. end while
  995. %xwg5s[380+$g5k3r] := get_ui_id($zcuf4)
  996. declare ui_slider $sseum(1, 1500)
  997. make_persistent($sseum)
  998. declare ui_slider $bi544(-1500, 1500)
  999. make_persistent($bi544)
  1000. set_control_par_str(get_ui_id($bi544),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  1001. declare ui_menu $y3s33
  1002. make_persistent($y3s33)
  1003. set_control_par_str(get_ui_id($y3s33),$CONTROL_PAR_PICTURE,"blank")
  1004. $fg4rw := 0
  1005. while ($fg4rw<num_elements(!flm4j))
  1006. add_menu_item($y3s33,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1007. inc($fg4rw)
  1008. end while
  1009. set_menu_item_visibility(get_ui_id($y3s33),search(%bnygy,11),0)
  1010. $upapg := 8
  1011. %n34di[$upapg] := get_ui_id($y3s33)
  1012. %nwlgb[$upapg] := get_ui_id($bi544)
  1013. !4gjzd[8] := "_5"
  1014. %c1qym[8] := get_ui_id($bi544)
  1015. %41o3s[8] := get_ui_id($sseum)
  1016. declare ui_label $kjihf(1, 1)
  1017. set_control_par_str(get_ui_id($kjihf),$CONTROL_PAR_TEXT,"")
  1018. set_control_par_str(get_ui_id($kjihf),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  1019. %vvlef[8] := get_ui_id($kjihf)
  1020. declare ui_label $d40fx(1, 1)
  1021. set_control_par_str(get_ui_id($d40fx),$CONTROL_PAR_TEXT,"")
  1022. set_control_par_str(get_ui_id($d40fx),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  1023. %2hswt[8] := get_ui_id($d40fx)
  1024. declare ui_label $cr2dl(1, 1)
  1025. set_control_par_str(get_ui_id($cr2dl),$CONTROL_PAR_TEXT,"")
  1026. set_control_par_str(get_ui_id($cr2dl),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  1027. set_control_par(get_ui_id($cr2dl),$CONTROL_PAR_Z_LAYER,1)
  1028. %lm23w[8] := get_ui_id($cr2dl)
  1029. %qxmpr[8] := 1499
  1030. %oazdd[8] := 100
  1031. !gh3f0[8] := "Hz"
  1032. ?rylw5[8] := 3.0
  1033. %q4mzh[8] := -1
  1034. %vc4gu[8] := 100000
  1035. %hpc0e[8] := -1
  1036. %eujmz[8] := -1
  1037. %fogcg[8] := 0
  1038. %5zak5[8] := 0
  1039. %dwdw3[8] := 1
  1040. %sbnwu[8] := 1500
  1041. %jeswc[8] := 320
  1042. %mnk53[8] := 39
  1043. declare %bivvl[10] := (get_ui_id($sseum), get_ui_id($bi544), get_ui_id($kjihf), get_ui_id($d40fx), get_ui_id($cr2dl), get_ui_id($y3s33), -1)
  1044. $g5k3r := 0
  1045. while ($g5k3r<num_elements(%bivvl))
  1046. %xwg5s[390+$g5k3r] := %bivvl[$g5k3r]
  1047. %cqg2m[39] := 16
  1048. inc($g5k3r)
  1049. end while
  1050. declare ui_menu $1wrdd
  1051. make_persistent($1wrdd)
  1052. add_menu_item($1wrdd,"Sine",0)
  1053. add_menu_item($1wrdd,"Triangle",1)
  1054. add_menu_item($1wrdd,"Square",7)
  1055. add_menu_item($1wrdd,"Ramp up",2)
  1056. add_menu_item($1wrdd,"Ramp dn",3)
  1057. add_menu_item($1wrdd,"Random",4)
  1058. add_menu_item($1wrdd,"Seek 1",5)
  1059. add_menu_item($1wrdd,"Seek 2",6)
  1060. set_control_par_str(get_ui_id($1wrdd),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
  1061. declare ui_menu $eu0kx
  1062. make_persistent($eu0kx)
  1063. add_menu_item($eu0kx,"Free ",0)
  1064. add_menu_item($eu0kx,"First ",1)
  1065. add_menu_item($eu0kx,"Retr ",2)
  1066. add_menu_item($eu0kx,"Once ",3)
  1067. add_menu_item($eu0kx,"1st 1x ",4)
  1068. set_control_par_str(get_ui_id($eu0kx),$CONTROL_PAR_PICTURE,"GE_DROP_DN_1")
  1069. set_control_par(get_ui_id($eu0kx),$CONTROL_PAR_FONT_TYPE,2)
  1070. set_control_par(get_ui_id($eu0kx),$CONTROL_PAR_TEXT_ALIGNMENT,0)
  1071. declare ui_switch $x02cl
  1072. make_persistent($x02cl)
  1073. set_control_par_str(get_ui_id($x02cl),$CONTROL_PAR_TEXT,"")
  1074. set_control_par_str(get_ui_id($x02cl),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_1")
  1075. declare ui_label $i5fky(1, 1)
  1076. set_control_par_str(get_ui_id($i5fky),$CONTROL_PAR_TEXT,"")
  1077. set_control_par_str(get_ui_id($i5fky),$CONTROL_PAR_PICTURE,"GE_LFO_WAVES")
  1078. declare ui_slider $s2bg4(0, 360)
  1079. make_persistent($s2bg4)
  1080. set_control_par_str(get_ui_id($s2bg4),$CONTROL_PAR_PICTURE,"GE_LFO_Phase_Offset_slider")
  1081. %xwg5s[1490] := get_ui_id($s2bg4)
  1082. %cqg2m[149] := 16
  1083. declare $xpr4r
  1084. declare ?pu5ib[256]
  1085. declare ?p2rij[256]
  1086. declare %qvhhl[256]
  1087. declare %1cwa0[256]
  1088. declare %igs1h[256]
  1089. $kyxij := 0
  1090. while ($kyxij<num_elements(%igs1h))
  1091. %igs1h[$kyxij] := random(0,1000)
  1092. inc($kyxij)
  1093. end while
  1094. $g5k3r := 0
  1095. while (%xwg5s[390+$g5k3r]>0 and ($g5k3r<10))
  1096. inc($g5k3r)
  1097. end while
  1098. %xwg5s[390+$g5k3r] := get_ui_id($1wrdd)
  1099. $g5k3r := 0
  1100. while (%xwg5s[390+$g5k3r]>0 and ($g5k3r<10))
  1101. inc($g5k3r)
  1102. end while
  1103. %xwg5s[390+$g5k3r] := get_ui_id($eu0kx)
  1104. $g5k3r := 0
  1105. while (%xwg5s[390+$g5k3r]>0 and ($g5k3r<10))
  1106. inc($g5k3r)
  1107. end while
  1108. %xwg5s[390+$g5k3r] := get_ui_id($x02cl)
  1109. $g5k3r := 0
  1110. while (%xwg5s[390+$g5k3r]>0 and ($g5k3r<10))
  1111. inc($g5k3r)
  1112. end while
  1113. %xwg5s[390+$g5k3r] := get_ui_id($i5fky)
  1114. declare $jqz2q
  1115. declare ?3nlwo[17] := (-4.0, -2.0, 1.5, -1.0, 0.75, 0.5, 0.375, 0.25, 0.1875, 0.16666666666666666, 0.125, 0.09375, 0.08333333333333333, 0.0625, 0.046875, 0.041666666666666664, 0.03125)
  1116. declare !je2na[17]
  1117. !je2na[0] := "4 Bars"
  1118. !je2na[1] := "2 Bars"
  1119. !je2na[2] := "3/2"
  1120. !je2na[3] := "1 Bar"
  1121. !je2na[4] := "1/2 dot"
  1122. !je2na[5] := "1/2"
  1123. !je2na[6] := "1/4 dot"
  1124. !je2na[7] := "1/4"
  1125. !je2na[8] := "1/8 dot"
  1126. !je2na[9] := "1/4 trip"
  1127. !je2na[10] := "1/8"
  1128. !je2na[11] := "1/16 dot"
  1129. !je2na[12] := "1/8 trip"
  1130. !je2na[13] := "1/16"
  1131. !je2na[14] := "1/32 dot"
  1132. !je2na[15] := "1/16 trip"
  1133. !je2na[16] := "1/32"
  1134. declare ui_xy ?xy[2]
  1135. make_persistent(?xy)
  1136. set_control_par_arr(get_ui_id(?xy),$CONTROL_PAR_AUTOMATION_ID,0,0)
  1137. set_control_par_arr(get_ui_id(?xy),$CONTROL_PAR_AUTOMATION_ID,1,1)
  1138. set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_HELP,"XY Pad: Allows to control the sound of the snapshot in realtime according to modulation assignment for the X and Y paramters. The axis labels give a hint what to expect when moving the cursor. Midi controllers for the XY pad can be assigned on the Master Page.")
  1139. set_control_par(get_ui_id(?xy),$CONTROL_PAR_MOUSE_MODE,2)
  1140. declare $2thol
  1141. make_persistent($2thol)
  1142. declare $jy3sd
  1143. make_persistent($jy3sd)
  1144. declare ui_menu $4ainj
  1145. make_instr_persistent($4ainj)
  1146. declare ui_menu $gcjlt
  1147. make_instr_persistent($gcjlt)
  1148. set_control_par_str(get_ui_id($4ainj),$CONTROL_PAR_PICTURE,"blank")
  1149. set_control_par_str(get_ui_id($gcjlt),$CONTROL_PAR_PICTURE,"blank")
  1150. $fg4rw := 0
  1151. while ($fg4rw<=127)
  1152. add_menu_item($4ainj,$fg4rw,$fg4rw)
  1153. add_menu_item($gcjlt,$fg4rw,$fg4rw)
  1154. inc($fg4rw)
  1155. end while
  1156. declare ui_switch $iyqua
  1157. set_control_par_str(get_ui_id($iyqua),$CONTROL_PAR_TEXT,"")
  1158. set_control_par_str(get_ui_id($iyqua),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_0")
  1159. declare $qrpdp
  1160. declare ui_switch $otffr
  1161. set_control_par_str(get_ui_id($otffr),$CONTROL_PAR_TEXT,"")
  1162. set_control_par_str(get_ui_id($otffr),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_0")
  1163. declare $euiqi
  1164. declare !xy__axis_lbls[28]
  1165. load_array(!xy__axis_lbls,2)
  1166. declare !xy__axis_lbls_long[28]
  1167. load_array(!xy__axis_lbls_long,2)
  1168. declare ui_menu $siaxq
  1169. make_persistent($siaxq)
  1170. declare ui_menu $yazuk
  1171. make_persistent($yazuk)
  1172. set_control_par_str(get_ui_id($siaxq),$CONTROL_PAR_PICTURE,"blank")
  1173. set_control_par_str(get_ui_id($yazuk),$CONTROL_PAR_PICTURE,"blank")
  1174. declare ui_label $ajvki(1, 1)
  1175. set_control_par_str(get_ui_id($ajvki),$CONTROL_PAR_TEXT,"")
  1176. set_control_par_str(get_ui_id($ajvki),$CONTROL_PAR_PICTURE,"GE_MACRO_LABELS_1")
  1177. declare ui_label $a4om3(1, 1)
  1178. set_control_par_str(get_ui_id($a4om3),$CONTROL_PAR_TEXT,"")
  1179. set_control_par_str(get_ui_id($a4om3),$CONTROL_PAR_PICTURE,"GE_MACRO_LABELS_1")
  1180. declare %ndk2i[1] := (get_ui_id(?xy))
  1181. $g5k3r := 0
  1182. while ($g5k3r<num_elements(%ndk2i))
  1183. %xwg5s[540+$g5k3r] := %ndk2i[$g5k3r]
  1184. %cqg2m[54] := 559
  1185. inc($g5k3r)
  1186. end while
  1187. declare %iqp44[2] := (get_ui_id($siaxq), get_ui_id($yazuk))
  1188. $g5k3r := 0
  1189. while ($g5k3r<num_elements(%iqp44))
  1190. %xwg5s[550+$g5k3r] := %iqp44[$g5k3r]
  1191. %cqg2m[55] := 521
  1192. inc($g5k3r)
  1193. end while
  1194. declare %egbnj[4] := (get_ui_id($4ainj), get_ui_id($gcjlt), get_ui_id($iyqua), get_ui_id($otffr))
  1195. $g5k3r := 0
  1196. while ($g5k3r<num_elements(%egbnj))
  1197. %xwg5s[210+$g5k3r] := %egbnj[$g5k3r]
  1198. %cqg2m[21] := 8
  1199. inc($g5k3r)
  1200. end while
  1201. declare %upzwe[2] := (get_ui_id($ajvki), get_ui_id($a4om3))
  1202. $g5k3r := 0
  1203. while ($g5k3r<num_elements(%upzwe))
  1204. %xwg5s[1400+$g5k3r] := %upzwe[$g5k3r]
  1205. %cqg2m[140] := 0
  1206. inc($g5k3r)
  1207. end while
  1208. add_menu_item($siaxq,"X Axis Label",0)
  1209. add_menu_item($siaxq,"----------------",0)
  1210. add_menu_item($yazuk,"Y Axis Label",0)
  1211. add_menu_item($yazuk,"----------------",0)
  1212. $fg4rw := 0
  1213. while ($fg4rw<%nki_prefs[0])
  1214. add_menu_item($siaxq,!xy__axis_lbls[$fg4rw] & " " & !xy__axis_lbls_long[$fg4rw],$fg4rw)
  1215. add_menu_item($yazuk,!xy__axis_lbls[$fg4rw] & " " & !xy__axis_lbls_long[$fg4rw],$fg4rw)
  1216. inc($fg4rw)
  1217. end while
  1218. declare ui_slider $543zt(0, 1000)
  1219. make_persistent($543zt)
  1220. set_control_par(get_ui_id($543zt),$CONTROL_PAR_DEFAULT_VALUE,0)
  1221. set_control_par_str(get_ui_id($543zt),$CONTROL_PAR_PICTURE,"MacroKnob_1")
  1222. set_control_par(get_ui_id($543zt),$CONTROL_PAR_MOUSE_BEHAVIOUR,-500)
  1223. set_control_par_str(get_ui_id($543zt),$CONTROL_PAR_AUTOMATION_NAME,"A")
  1224. declare ui_menu $uyjwl
  1225. make_persistent($uyjwl)
  1226. set_control_par_str(get_ui_id($uyjwl),$CONTROL_PAR_PICTURE,"blank")
  1227. add_menu_item($uyjwl,"Select Macro Label",-1)
  1228. add_menu_item($uyjwl,"-------------------------",-1)
  1229. $fg4rw := 0
  1230. while ($fg4rw<%nki_prefs[0])
  1231. add_menu_item($uyjwl,!xy__axis_lbls_long[$fg4rw],$fg4rw)
  1232. inc($fg4rw)
  1233. end while
  1234. declare $b2o1i := 10
  1235. declare @edixu
  1236. @edixu := "%"
  1237. declare %lhzn1[2] := (get_ui_id($543zt), get_ui_id($uyjwl))
  1238. $g5k3r := 0
  1239. while ($g5k3r<num_elements(%lhzn1))
  1240. %xwg5s[460+$g5k3r] := %lhzn1[$g5k3r]
  1241. %cqg2m[46] := 1024
  1242. inc($g5k3r)
  1243. end while
  1244. declare ui_slider $lynqa(0, 1000)
  1245. make_persistent($lynqa)
  1246. set_control_par(get_ui_id($lynqa),$CONTROL_PAR_DEFAULT_VALUE,0)
  1247. set_control_par_str(get_ui_id($lynqa),$CONTROL_PAR_PICTURE,"MacroKnob_1")
  1248. set_control_par(get_ui_id($lynqa),$CONTROL_PAR_MOUSE_BEHAVIOUR,-500)
  1249. set_control_par_str(get_ui_id($lynqa),$CONTROL_PAR_AUTOMATION_NAME,"B")
  1250. declare ui_menu $4so5t
  1251. make_persistent($4so5t)
  1252. set_control_par_str(get_ui_id($4so5t),$CONTROL_PAR_PICTURE,"blank")
  1253. add_menu_item($4so5t,"Select Macro Label",-1)
  1254. add_menu_item($4so5t,"-------------------------",-1)
  1255. $fg4rw := 0
  1256. while ($fg4rw<%nki_prefs[0])
  1257. add_menu_item($4so5t,!xy__axis_lbls_long[$fg4rw],$fg4rw)
  1258. inc($fg4rw)
  1259. end while
  1260. declare $pfnw5 := 10
  1261. declare @cxern
  1262. @cxern := "%"
  1263. declare %24ra2[2] := (get_ui_id($lynqa), get_ui_id($4so5t))
  1264. $g5k3r := 0
  1265. while ($g5k3r<num_elements(%24ra2))
  1266. %xwg5s[470+$g5k3r] := %24ra2[$g5k3r]
  1267. %cqg2m[47] := 1024
  1268. inc($g5k3r)
  1269. end while
  1270. declare ui_slider $cbkgv(0, 1000)
  1271. make_persistent($cbkgv)
  1272. set_control_par(get_ui_id($cbkgv),$CONTROL_PAR_DEFAULT_VALUE,0)
  1273. set_control_par_str(get_ui_id($cbkgv),$CONTROL_PAR_PICTURE,"MacroKnob_1")
  1274. set_control_par(get_ui_id($cbkgv),$CONTROL_PAR_MOUSE_BEHAVIOUR,-500)
  1275. set_control_par_str(get_ui_id($cbkgv),$CONTROL_PAR_AUTOMATION_NAME,"C")
  1276. declare ui_menu $q1nql
  1277. make_persistent($q1nql)
  1278. set_control_par_str(get_ui_id($q1nql),$CONTROL_PAR_PICTURE,"blank")
  1279. add_menu_item($q1nql,"Select Macro Label",-1)
  1280. add_menu_item($q1nql,"-------------------------",-1)
  1281. $fg4rw := 0
  1282. while ($fg4rw<%nki_prefs[0])
  1283. add_menu_item($q1nql,!xy__axis_lbls_long[$fg4rw],$fg4rw)
  1284. inc($fg4rw)
  1285. end while
  1286. declare $yg3sr := 10
  1287. declare @aqf3u
  1288. @aqf3u := "%"
  1289. declare %zkcx5[2] := (get_ui_id($cbkgv), get_ui_id($q1nql))
  1290. $g5k3r := 0
  1291. while ($g5k3r<num_elements(%zkcx5))
  1292. %xwg5s[480+$g5k3r] := %zkcx5[$g5k3r]
  1293. %cqg2m[48] := 1024
  1294. inc($g5k3r)
  1295. end while
  1296. declare ui_slider $cxfv2(0, 1000)
  1297. make_persistent($cxfv2)
  1298. set_control_par(get_ui_id($cxfv2),$CONTROL_PAR_DEFAULT_VALUE,0)
  1299. set_control_par_str(get_ui_id($cxfv2),$CONTROL_PAR_PICTURE,"MacroKnob_1")
  1300. set_control_par(get_ui_id($cxfv2),$CONTROL_PAR_MOUSE_BEHAVIOUR,-500)
  1301. set_control_par_str(get_ui_id($cxfv2),$CONTROL_PAR_AUTOMATION_NAME,"D")
  1302. declare ui_menu $5q4fp
  1303. make_persistent($5q4fp)
  1304. set_control_par_str(get_ui_id($5q4fp),$CONTROL_PAR_PICTURE,"blank")
  1305. add_menu_item($5q4fp,"Select Macro Label",-1)
  1306. add_menu_item($5q4fp,"-------------------------",-1)
  1307. $fg4rw := 0
  1308. while ($fg4rw<%nki_prefs[0])
  1309. add_menu_item($5q4fp,!xy__axis_lbls_long[$fg4rw],$fg4rw)
  1310. inc($fg4rw)
  1311. end while
  1312. declare $t3gfg := 10
  1313. declare @3frwb
  1314. @3frwb := "%"
  1315. declare %zsogq[2] := (get_ui_id($cxfv2), get_ui_id($5q4fp))
  1316. $g5k3r := 0
  1317. while ($g5k3r<num_elements(%zsogq))
  1318. %xwg5s[490+$g5k3r] := %zsogq[$g5k3r]
  1319. %cqg2m[49] := 1024
  1320. inc($g5k3r)
  1321. end while
  1322. declare $0tbzw
  1323. declare $5pffj
  1324. declare $mluem
  1325. declare $gcbnc
  1326. declare ~qa2mp
  1327. ~qa2mp := int_to_real($DURATION_SIXTEENTH)
  1328. declare ~oukv1
  1329. declare $wgaas
  1330. declare $4vgzm
  1331. declare $upvcm
  1332. declare %2rhz1[128]
  1333. declare $5sroo
  1334. declare $ethxj
  1335. declare $ut1tc
  1336. declare $cej2p
  1337. declare %wwz2v[10] := (128, -1, 128, -1, -1, 128, 128, -1, -1, 1)
  1338. declare $0c1m3
  1339. declare %br0tn[25]
  1340. declare $gbgom
  1341. declare %arp__preset_vals[200]
  1342. declare !arp__preset_names[15]
  1343. load_array_str(!arp__preset_names,@ichwi & "CONFIG/ARP_preset_names.nka")
  1344. declare ui_switch $ruhe4
  1345. make_persistent($ruhe4)
  1346. set_control_par_str(get_ui_id($ruhe4),$CONTROL_PAR_TEXT,"")
  1347. set_control_par_str(get_ui_id($ruhe4),$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_0")
  1348. declare ui_button $hvmxr
  1349. set_control_par_str(get_ui_id($hvmxr),$CONTROL_PAR_TEXT,"")
  1350. set_control_par_str(get_ui_id($hvmxr),$CONTROL_PAR_PICTURE,"GE_Prev_btn_00")
  1351. declare ui_button $kbuvs
  1352. set_control_par_str(get_ui_id($kbuvs),$CONTROL_PAR_TEXT,"")
  1353. set_control_par_str(get_ui_id($kbuvs),$CONTROL_PAR_PICTURE,"GE_Next_btn_00")
  1354. declare ui_menu $ojboo
  1355. make_persistent($ojboo)
  1356. set_control_par_str(get_ui_id($ojboo),$CONTROL_PAR_PICTURE,"blank")
  1357. $5sroo := 0
  1358. while ($5sroo<15)
  1359. add_menu_item($ojboo,!arp__preset_names[$5sroo],$5sroo)
  1360. inc($5sroo)
  1361. end while
  1362. declare ui_slider $q0o5r(1, 4)
  1363. make_persistent($q0o5r)
  1364. set_control_par(get_ui_id($q0o5r),$CONTROL_PAR_DEFAULT_VALUE,1)
  1365. set_control_par_str(get_ui_id($q0o5r),$CONTROL_PAR_PICTURE,"GE_ARP_OCT_slider")
  1366. declare ui_button $1p3ww
  1367. set_control_par_str(get_ui_id($1p3ww),$CONTROL_PAR_TEXT,"")
  1368. set_control_par_str(get_ui_id($1p3ww),$CONTROL_PAR_PICTURE,"g_voices_up_btn")
  1369. declare ui_button $5dkam
  1370. set_control_par_str(get_ui_id($5dkam),$CONTROL_PAR_TEXT,"")
  1371. set_control_par_str(get_ui_id($5dkam),$CONTROL_PAR_PICTURE,"g_voices_dn_btn")
  1372. declare ui_menu $0erls
  1373. make_persistent($0erls)
  1374. read_persistent_var($0erls)
  1375. set_control_par_str(get_ui_id($0erls),$CONTROL_PAR_PICTURE,"blank")
  1376. add_menu_item($0erls,"Up",0)
  1377. add_menu_item($0erls,"Down",1)
  1378. add_menu_item($0erls,"Up Down",2)
  1379. add_menu_item($0erls,"As played",3)
  1380. add_menu_item($0erls,"Chord",4)
  1381. add_menu_item($0erls,"Lowest",5)
  1382. add_menu_item($0erls,"Lowest 2",6)
  1383. add_menu_item($0erls,"Highest",7)
  1384. add_menu_item($0erls,"Highest 2",8)
  1385. add_menu_item($0erls,"Highest 3",9)
  1386. declare ui_slider $h2jke(0, 9)
  1387. declare ui_switch $2v40q
  1388. make_persistent($2v40q)
  1389. set_control_par_str(get_ui_id($2v40q),$CONTROL_PAR_TEXT,"")
  1390. set_control_par_str(get_ui_id($2v40q),$CONTROL_PAR_PICTURE,"GE_SKIP_MUTES_btn")
  1391. declare ui_label $z3out(1, 1)
  1392. set_control_par_str(get_ui_id($z3out),$CONTROL_PAR_TEXT,"")
  1393. set_control_par_str(get_ui_id($z3out),$CONTROL_PAR_PICTURE,"GE_ARP_BACKING")
  1394. declare %a5clx[9] := (get_ui_id($ruhe4), get_ui_id($hvmxr), get_ui_id($kbuvs), get_ui_id($ojboo), get_ui_id($0erls), get_ui_id($2v40q), get_ui_id($q0o5r), get_ui_id($h2jke), get_ui_id($z3out))
  1395. $g5k3r := 0
  1396. while ($g5k3r<num_elements(%a5clx))
  1397. %xwg5s[1430+$g5k3r] := %a5clx[$g5k3r]
  1398. %cqg2m[143] := 2048
  1399. inc($g5k3r)
  1400. end while
  1401. declare %nr1qo[32]
  1402. declare $tp4oa
  1403. declare ui_slider $k5z4u(1, 32)
  1404. make_persistent($k5z4u)
  1405. read_persistent_var($k5z4u)
  1406. set_control_par_str(get_ui_id($k5z4u),$CONTROL_PAR_PICTURE,"GE_ARP_SIZE_slider")
  1407. declare ui_button $ivqya
  1408. make_instr_persistent($ivqya)
  1409. set_control_par_str(get_ui_id($ivqya),$CONTROL_PAR_TEXT,"")
  1410. set_control_par_str(get_ui_id($ivqya),$CONTROL_PAR_PICTURE,"GE_SEQ_MOD_btn")
  1411. declare ui_table %0lu1d[32](4, 4, 2400)
  1412. make_persistent(%0lu1d)
  1413. set_control_par(get_ui_id(%0lu1d),$CONTROL_PAR_BAR_COLOR,2044730)
  1414. set_control_par(get_ui_id(%0lu1d),$CONTROL_PAR_ZERO_LINE_COLOR,2044730)
  1415. declare ui_table %pyeoz[32](4, 4, 127)
  1416. make_persistent(%pyeoz)
  1417. set_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_BAR_COLOR,2044730)
  1418. set_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_ZERO_LINE_COLOR,2044730)
  1419. declare ui_label $vjofa(1, 1)
  1420. set_control_par_str(get_ui_id($vjofa),$CONTROL_PAR_TEXT,"")
  1421. set_control_par_str(get_ui_id($vjofa),$CONTROL_PAR_PICTURE,"GE_GATER_POS")
  1422. set_control_par(get_ui_id($vjofa),$CONTROL_PAR_Z_LAYER,1)
  1423. declare ui_menu $lh5xo
  1424. set_control_par_str(get_ui_id($lh5xo),$CONTROL_PAR_PICTURE,"GE_MENU_DOTS")
  1425. add_menu_item($lh5xo,"Randomize",4)
  1426. add_menu_item($lh5xo,"Humanize",6)
  1427. add_menu_item($lh5xo,"Copy Seq > Mod",0)
  1428. add_menu_item($lh5xo,"Copy Mod > Seq",1)
  1429. add_menu_item($lh5xo,"Double Resolution",2)
  1430. add_menu_item($lh5xo,"Halven Resolution",3)
  1431. add_menu_item($lh5xo,"Duplicate Length",5)
  1432. declare ui_button $zkud4
  1433. set_control_par_str(get_ui_id($zkud4),$CONTROL_PAR_TEXT,"")
  1434. set_control_par_str(get_ui_id($zkud4),$CONTROL_PAR_PICTURE,"GE_Next_btn_00")
  1435. declare ui_button $t2fpk
  1436. set_control_par_str(get_ui_id($t2fpk),$CONTROL_PAR_TEXT,"")
  1437. set_control_par_str(get_ui_id($t2fpk),$CONTROL_PAR_PICTURE,"GE_Prev_btn_00")
  1438. declare %o54el[8] := (get_ui_id($vjofa), get_ui_id($k5z4u), get_ui_id($ivqya), get_ui_id(%0lu1d), get_ui_id(%pyeoz), get_ui_id($lh5xo), get_ui_id($t2fpk), get_ui_id($zkud4))
  1439. $g5k3r := 0
  1440. while ($g5k3r<num_elements(%o54el))
  1441. %xwg5s[1440+$g5k3r] := %o54el[$g5k3r]
  1442. %cqg2m[144] := 2048
  1443. inc($g5k3r)
  1444. end while
  1445. declare ?2wk03[13] := (0.03125, 0.0625, 0.125, 0.16666666666666666, 0.25, 0.3333333333333333, 0.5, 0.6666666666666666, 1.0, 1.5, 2.0, 3.0, -1.0)
  1446. declare !qniir[13]
  1447. !qniir[0] := "1/128"
  1448. !qniir[1] := "1/64"
  1449. !qniir[2] := "1/32"
  1450. !qniir[3] := "1/16t"
  1451. !qniir[4] := "1/16"
  1452. !qniir[5] := "1/8t"
  1453. !qniir[6] := "1/8"
  1454. !qniir[7] := "1/4t"
  1455. !qniir[8] := "1/4"
  1456. !qniir[9] := "1/4."
  1457. !qniir[10] := "1/2"
  1458. !qniir[11] := "3/4"
  1459. !qniir[12] := "1 Bar"
  1460. declare ui_slider $ius2b(0, 1000000)
  1461. make_persistent($ius2b)
  1462. declare ui_slider $1ybzi(-1000000, 1000000)
  1463. make_persistent($1ybzi)
  1464. set_control_par_str(get_ui_id($1ybzi),$CONTROL_PAR_PICTURE,"MK_Slider" & "_13")
  1465. declare ui_menu $rpaco
  1466. make_persistent($rpaco)
  1467. set_control_par_str(get_ui_id($rpaco),$CONTROL_PAR_PICTURE,"blank")
  1468. $fg4rw := 0
  1469. while ($fg4rw<num_elements(!flm4j))
  1470. add_menu_item($rpaco,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1471. inc($fg4rw)
  1472. end while
  1473. set_menu_item_str(get_ui_id($rpaco),search(%bnygy,10),"VEL Mono Velocity")
  1474. $upapg := 9
  1475. %n34di[$upapg] := get_ui_id($rpaco)
  1476. %nwlgb[$upapg] := get_ui_id($1ybzi)
  1477. !4gjzd[9] := "_13"
  1478. %c1qym[9] := get_ui_id($1ybzi)
  1479. %41o3s[9] := get_ui_id($ius2b)
  1480. declare ui_label $drwof(1, 1)
  1481. set_control_par_str(get_ui_id($drwof),$CONTROL_PAR_TEXT,"")
  1482. set_control_par_str(get_ui_id($drwof),$CONTROL_PAR_PICTURE,"MK_Mask" & "_13")
  1483. %vvlef[9] := get_ui_id($drwof)
  1484. declare ui_label $nodwh(1, 1)
  1485. set_control_par_str(get_ui_id($nodwh),$CONTROL_PAR_TEXT,"")
  1486. set_control_par_str(get_ui_id($nodwh),$CONTROL_PAR_PICTURE,"MK_RngP" & "_13")
  1487. %2hswt[9] := get_ui_id($nodwh)
  1488. declare ui_label $we4iu(1, 1)
  1489. set_control_par_str(get_ui_id($we4iu),$CONTROL_PAR_TEXT,"")
  1490. set_control_par_str(get_ui_id($we4iu),$CONTROL_PAR_PICTURE,"MK_ind" & "_13")
  1491. set_control_par(get_ui_id($we4iu),$CONTROL_PAR_Z_LAYER,1)
  1492. %lm23w[9] := get_ui_id($we4iu)
  1493. %qxmpr[9] := 1000000
  1494. %oazdd[9] := 1
  1495. !gh3f0[9] := "ms"
  1496. ?rylw5[9] := 1.0
  1497. %q4mzh[9] := -1
  1498. %vc4gu[9] := 100000
  1499. %hpc0e[9] := -1
  1500. %eujmz[9] := -1
  1501. %fogcg[9] := 0
  1502. %5zak5[9] := 0
  1503. %dwdw3[9] := 0
  1504. %sbnwu[9] := 1000000
  1505. %jeswc[9] := 4010
  1506. %mnk53[9] := 145
  1507. declare %0tgkt[10] := (get_ui_id($ius2b), get_ui_id($1ybzi), get_ui_id($drwof), get_ui_id($nodwh), get_ui_id($we4iu), get_ui_id($rpaco), -1)
  1508. $g5k3r := 0
  1509. while ($g5k3r<num_elements(%0tgkt))
  1510. %xwg5s[1450+$g5k3r] := %0tgkt[$g5k3r]
  1511. %cqg2m[145] := 2048
  1512. inc($g5k3r)
  1513. end while
  1514. declare ui_label $gpcbc(1, 1)
  1515. set_control_par_str(get_ui_id($gpcbc),$CONTROL_PAR_PICTURE,"blank")
  1516. $g5k3r := 0
  1517. while (%xwg5s[1450+$g5k3r]>0 and ($g5k3r<10))
  1518. inc($g5k3r)
  1519. end while
  1520. %xwg5s[1450+$g5k3r] := get_ui_id($gpcbc)
  1521. declare ui_button $en0xw
  1522. set_control_par_str(get_ui_id($en0xw),$CONTROL_PAR_TEXT,"")
  1523. set_control_par_str(get_ui_id($en0xw),$CONTROL_PAR_PICTURE,"g_voices_up_btn")
  1524. declare ui_button $4tx2f
  1525. set_control_par_str(get_ui_id($4tx2f),$CONTROL_PAR_TEXT,"")
  1526. set_control_par_str(get_ui_id($4tx2f),$CONTROL_PAR_PICTURE,"g_voices_dn_btn")
  1527. declare ui_slider $3rksw(50, 950)
  1528. make_persistent($3rksw)
  1529. declare ui_slider $qbhb5(-901, 901)
  1530. make_persistent($qbhb5)
  1531. set_control_par_str(get_ui_id($qbhb5),$CONTROL_PAR_PICTURE,"MK_Slider" & "_12")
  1532. declare ui_menu $m5sxk
  1533. make_persistent($m5sxk)
  1534. set_control_par_str(get_ui_id($m5sxk),$CONTROL_PAR_PICTURE,"blank")
  1535. $fg4rw := 0
  1536. while ($fg4rw<num_elements(!flm4j))
  1537. add_menu_item($m5sxk,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1538. inc($fg4rw)
  1539. end while
  1540. set_menu_item_str(get_ui_id($m5sxk),search(%bnygy,10),"VEL Mono Velocity")
  1541. $upapg := 10
  1542. %n34di[$upapg] := get_ui_id($m5sxk)
  1543. %nwlgb[$upapg] := get_ui_id($qbhb5)
  1544. !4gjzd[10] := "_12"
  1545. %c1qym[10] := get_ui_id($qbhb5)
  1546. %41o3s[10] := get_ui_id($3rksw)
  1547. declare ui_label $m1j44(1, 1)
  1548. set_control_par_str(get_ui_id($m1j44),$CONTROL_PAR_TEXT,"")
  1549. set_control_par_str(get_ui_id($m1j44),$CONTROL_PAR_PICTURE,"MK_Mask" & "_12")
  1550. %vvlef[10] := get_ui_id($m1j44)
  1551. declare ui_label $pnkze(1, 1)
  1552. set_control_par_str(get_ui_id($pnkze),$CONTROL_PAR_TEXT,"")
  1553. set_control_par_str(get_ui_id($pnkze),$CONTROL_PAR_PICTURE,"MK_RngP" & "_12")
  1554. %2hswt[10] := get_ui_id($pnkze)
  1555. declare ui_label $qncqi(1, 1)
  1556. set_control_par_str(get_ui_id($qncqi),$CONTROL_PAR_TEXT,"")
  1557. set_control_par_str(get_ui_id($qncqi),$CONTROL_PAR_PICTURE,"MK_ind" & "_12")
  1558. set_control_par(get_ui_id($qncqi),$CONTROL_PAR_Z_LAYER,1)
  1559. %lm23w[10] := get_ui_id($qncqi)
  1560. %qxmpr[10] := 901
  1561. %oazdd[10] := 10
  1562. !gh3f0[10] := "%"
  1563. ?rylw5[10] := 1.0
  1564. %q4mzh[10] := -1
  1565. %vc4gu[10] := 100000
  1566. %hpc0e[10] := -1
  1567. %eujmz[10] := -1
  1568. %fogcg[10] := 0
  1569. %5zak5[10] := 0
  1570. %dwdw3[10] := 50
  1571. %sbnwu[10] := 950
  1572. %jeswc[10] := 4013
  1573. %mnk53[10] := 146
  1574. declare %p5zpo[10] := (get_ui_id($3rksw), get_ui_id($qbhb5), get_ui_id($m1j44), get_ui_id($pnkze), get_ui_id($qncqi), get_ui_id($m5sxk), -1)
  1575. $g5k3r := 0
  1576. while ($g5k3r<num_elements(%p5zpo))
  1577. %xwg5s[1460+$g5k3r] := %p5zpo[$g5k3r]
  1578. %cqg2m[146] := 2048
  1579. inc($g5k3r)
  1580. end while
  1581. declare ui_slider $q0rb2(1, 1500)
  1582. make_persistent($q0rb2)
  1583. declare ui_slider $qb5xv(-1500, 1500)
  1584. make_persistent($qb5xv)
  1585. set_control_par_str(get_ui_id($qb5xv),$CONTROL_PAR_PICTURE,"MK_Slider" & "_12")
  1586. declare ui_menu $0vs3i
  1587. make_persistent($0vs3i)
  1588. set_control_par_str(get_ui_id($0vs3i),$CONTROL_PAR_PICTURE,"blank")
  1589. $fg4rw := 0
  1590. while ($fg4rw<num_elements(!flm4j))
  1591. add_menu_item($0vs3i,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1592. inc($fg4rw)
  1593. end while
  1594. set_menu_item_str(get_ui_id($0vs3i),search(%bnygy,10),"VEL Mono Velocity")
  1595. $upapg := 11
  1596. %n34di[$upapg] := get_ui_id($0vs3i)
  1597. %nwlgb[$upapg] := get_ui_id($qb5xv)
  1598. !4gjzd[11] := "_12"
  1599. %c1qym[11] := get_ui_id($qb5xv)
  1600. %41o3s[11] := get_ui_id($q0rb2)
  1601. declare ui_label $tsl5c(1, 1)
  1602. set_control_par_str(get_ui_id($tsl5c),$CONTROL_PAR_TEXT,"")
  1603. set_control_par_str(get_ui_id($tsl5c),$CONTROL_PAR_PICTURE,"MK_Mask" & "_12")
  1604. %vvlef[11] := get_ui_id($tsl5c)
  1605. declare ui_label $qgyyk(1, 1)
  1606. set_control_par_str(get_ui_id($qgyyk),$CONTROL_PAR_TEXT,"")
  1607. set_control_par_str(get_ui_id($qgyyk),$CONTROL_PAR_PICTURE,"MK_RngP" & "_12")
  1608. %2hswt[11] := get_ui_id($qgyyk)
  1609. declare ui_label $b3xhc(1, 1)
  1610. set_control_par_str(get_ui_id($b3xhc),$CONTROL_PAR_TEXT,"")
  1611. set_control_par_str(get_ui_id($b3xhc),$CONTROL_PAR_PICTURE,"MK_ind" & "_12")
  1612. set_control_par(get_ui_id($b3xhc),$CONTROL_PAR_Z_LAYER,1)
  1613. %lm23w[11] := get_ui_id($b3xhc)
  1614. %qxmpr[11] := 1500
  1615. %oazdd[11] := 10
  1616. !gh3f0[11] := "%"
  1617. ?rylw5[11] := 1.0
  1618. %q4mzh[11] := -1
  1619. %vc4gu[11] := 100000
  1620. %hpc0e[11] := -1
  1621. %eujmz[11] := -1
  1622. %fogcg[11] := 0
  1623. %5zak5[11] := 0
  1624. %dwdw3[11] := 1
  1625. %sbnwu[11] := 1500
  1626. %jeswc[11] := 4016
  1627. %mnk53[11] := 147
  1628. declare %1qb4n[10] := (get_ui_id($q0rb2), get_ui_id($qb5xv), get_ui_id($tsl5c), get_ui_id($qgyyk), get_ui_id($b3xhc), get_ui_id($0vs3i), -1)
  1629. $g5k3r := 0
  1630. while ($g5k3r<num_elements(%1qb4n))
  1631. %xwg5s[1470+$g5k3r] := %1qb4n[$g5k3r]
  1632. %cqg2m[147] := 2048
  1633. inc($g5k3r)
  1634. end while
  1635. declare %lec2j[4] := (get_ui_id($1p3ww), get_ui_id($5dkam), get_ui_id($en0xw), get_ui_id($4tx2f))
  1636. $g5k3r := 0
  1637. while ($g5k3r<num_elements(%lec2j))
  1638. %xwg5s[1530+$g5k3r] := %lec2j[$g5k3r]
  1639. %cqg2m[153] := 2048
  1640. inc($g5k3r)
  1641. end while
  1642. $5sroo := 0
  1643. while ($5sroo<num_elements(%br0tn))
  1644. %br0tn[$5sroo] := %wwz2v[$0erls]
  1645. inc($5sroo)
  1646. end while
  1647. set_table_steps_shown(%pyeoz,$k5z4u)
  1648. set_table_steps_shown(%0lu1d,$k5z4u)
  1649. $dyt1q := (get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_WIDTH)-6)/$k5z4u
  1650. $tp4oa := $tp4oa-(-sh_right($k5z4u-1-$tp4oa,31)*($tp4oa-($k5z4u-1)))
  1651. set_control_par(get_ui_id($vjofa),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_POS_X)+3+($tp4oa*$dyt1q))
  1652. set_control_par(get_ui_id($vjofa),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%0lu1d),$CONTROL_PAR_POS_Y)+3)
  1653. set_control_par(get_ui_id($vjofa),$CONTROL_PAR_WIDTH,$dyt1q-1)
  1654. set_control_par(get_ui_id($vjofa),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_HEIGHT)-6)
  1655. declare $y1xwz
  1656. declare ui_slider $bpkqt(0, 3473)
  1657. make_persistent($bpkqt)
  1658. declare ui_slider $g345d(-3000, 3000)
  1659. make_persistent($g345d)
  1660. set_control_par_str(get_ui_id($g345d),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
  1661. declare ui_menu $3pyb3
  1662. make_persistent($3pyb3)
  1663. set_control_par_str(get_ui_id($3pyb3),$CONTROL_PAR_PICTURE,"blank")
  1664. $fg4rw := 0
  1665. while ($fg4rw<num_elements(!flm4j))
  1666. add_menu_item($3pyb3,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1667. inc($fg4rw)
  1668. end while
  1669. set_menu_item_visibility(get_ui_id($3pyb3),search(%bnygy,11),0)
  1670. $upapg := 12
  1671. %n34di[$upapg] := get_ui_id($3pyb3)
  1672. %nwlgb[$upapg] := get_ui_id($g345d)
  1673. !4gjzd[12] := "_8"
  1674. %c1qym[12] := get_ui_id($g345d)
  1675. %41o3s[12] := get_ui_id($bpkqt)
  1676. declare ui_label $wuxr3(1, 1)
  1677. set_control_par_str(get_ui_id($wuxr3),$CONTROL_PAR_TEXT,"")
  1678. set_control_par_str(get_ui_id($wuxr3),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  1679. %vvlef[12] := get_ui_id($wuxr3)
  1680. declare ui_label $wkt5g(1, 1)
  1681. set_control_par_str(get_ui_id($wkt5g),$CONTROL_PAR_TEXT,"")
  1682. set_control_par_str(get_ui_id($wkt5g),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
  1683. %2hswt[12] := get_ui_id($wkt5g)
  1684. declare ui_label $qjkh4(1, 1)
  1685. set_control_par_str(get_ui_id($qjkh4),$CONTROL_PAR_TEXT,"")
  1686. set_control_par_str(get_ui_id($qjkh4),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
  1687. set_control_par(get_ui_id($qjkh4),$CONTROL_PAR_Z_LAYER,1)
  1688. %lm23w[12] := get_ui_id($qjkh4)
  1689. %qxmpr[12] := 2951
  1690. %oazdd[12] := 10
  1691. !gh3f0[12] := "ms"
  1692. ?rylw5[12] := 1.0
  1693. %q4mzh[12] := -1
  1694. %vc4gu[12] := 100000
  1695. %hpc0e[12] := -1
  1696. %eujmz[12] := -1
  1697. %fogcg[12] := 0
  1698. %5zak5[12] := 0
  1699. %dwdw3[12] := 0
  1700. %sbnwu[12] := 3473
  1701. %jeswc[12] := 19
  1702. %mnk53[12] := 0
  1703. declare %ammgx[10] := (get_ui_id($bpkqt), get_ui_id($g345d), get_ui_id($wuxr3), get_ui_id($wkt5g), get_ui_id($qjkh4), get_ui_id($3pyb3), -1)
  1704. $g5k3r := 0
  1705. while ($g5k3r<num_elements(%ammgx))
  1706. %xwg5s[$g5k3r] := %ammgx[$g5k3r]
  1707. %cqg2m[0] := 2
  1708. inc($g5k3r)
  1709. end while
  1710. declare ui_slider $m2mpa(0, 3126)
  1711. make_persistent($m2mpa)
  1712. declare ui_slider $n0kha(-999, 999)
  1713. make_persistent($n0kha)
  1714. set_control_par_str(get_ui_id($n0kha),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
  1715. declare ui_menu $u2pwx
  1716. make_persistent($u2pwx)
  1717. set_control_par_str(get_ui_id($u2pwx),$CONTROL_PAR_PICTURE,"blank")
  1718. $fg4rw := 0
  1719. while ($fg4rw<num_elements(!flm4j))
  1720. add_menu_item($u2pwx,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1721. inc($fg4rw)
  1722. end while
  1723. set_menu_item_visibility(get_ui_id($u2pwx),search(%bnygy,11),0)
  1724. $upapg := 13
  1725. %n34di[$upapg] := get_ui_id($u2pwx)
  1726. %nwlgb[$upapg] := get_ui_id($n0kha)
  1727. !4gjzd[13] := "_8"
  1728. %c1qym[13] := get_ui_id($n0kha)
  1729. %41o3s[13] := get_ui_id($m2mpa)
  1730. declare ui_label $pwrfd(1, 1)
  1731. set_control_par_str(get_ui_id($pwrfd),$CONTROL_PAR_TEXT,"")
  1732. set_control_par_str(get_ui_id($pwrfd),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  1733. %vvlef[13] := get_ui_id($pwrfd)
  1734. declare ui_label $kzwh4(1, 1)
  1735. set_control_par_str(get_ui_id($kzwh4),$CONTROL_PAR_TEXT,"")
  1736. set_control_par_str(get_ui_id($kzwh4),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
  1737. %2hswt[13] := get_ui_id($kzwh4)
  1738. declare ui_label $quyti(1, 1)
  1739. set_control_par_str(get_ui_id($quyti),$CONTROL_PAR_TEXT,"")
  1740. set_control_par_str(get_ui_id($quyti),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
  1741. set_control_par(get_ui_id($quyti),$CONTROL_PAR_Z_LAYER,1)
  1742. %lm23w[13] := get_ui_id($quyti)
  1743. %qxmpr[13] := 991
  1744. %oazdd[13] := 1
  1745. !gh3f0[13] := "ms"
  1746. ?rylw5[13] := 1.0
  1747. %q4mzh[13] := -1
  1748. %vc4gu[13] := 100000
  1749. %hpc0e[13] := -1
  1750. %eujmz[13] := -1
  1751. %fogcg[13] := 0
  1752. %5zak5[13] := 0
  1753. %dwdw3[13] := 0
  1754. %sbnwu[13] := 3126
  1755. %jeswc[13] := 22
  1756. %mnk53[13] := 1
  1757. declare %iuemu[10] := (get_ui_id($m2mpa), get_ui_id($n0kha), get_ui_id($pwrfd), get_ui_id($kzwh4), get_ui_id($quyti), get_ui_id($u2pwx), -1)
  1758. $g5k3r := 0
  1759. while ($g5k3r<num_elements(%iuemu))
  1760. %xwg5s[10+$g5k3r] := %iuemu[$g5k3r]
  1761. %cqg2m[1] := 2
  1762. inc($g5k3r)
  1763. end while
  1764. declare ui_slider $1g0ky(0, 500000)
  1765. make_persistent($1g0ky)
  1766. declare ui_slider $2xzsd(-500001, 500001)
  1767. make_persistent($2xzsd)
  1768. set_control_par_str(get_ui_id($2xzsd),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
  1769. declare ui_menu $ldi1z
  1770. make_persistent($ldi1z)
  1771. set_control_par_str(get_ui_id($ldi1z),$CONTROL_PAR_PICTURE,"blank")
  1772. $fg4rw := 0
  1773. while ($fg4rw<num_elements(!flm4j))
  1774. add_menu_item($ldi1z,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1775. inc($fg4rw)
  1776. end while
  1777. set_menu_item_visibility(get_ui_id($ldi1z),search(%bnygy,11),0)
  1778. $upapg := 14
  1779. %n34di[$upapg] := get_ui_id($ldi1z)
  1780. %nwlgb[$upapg] := get_ui_id($2xzsd)
  1781. !4gjzd[14] := ""
  1782. %c1qym[14] := get_ui_id($2xzsd)
  1783. %41o3s[14] := get_ui_id($1g0ky)
  1784. declare ui_label $5n4sk(1, 1)
  1785. set_control_par_str(get_ui_id($5n4sk),$CONTROL_PAR_TEXT,"")
  1786. set_control_par_str(get_ui_id($5n4sk),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  1787. %vvlef[14] := get_ui_id($5n4sk)
  1788. declare ui_label $v3e3o(1, 1)
  1789. set_control_par_str(get_ui_id($v3e3o),$CONTROL_PAR_TEXT,"")
  1790. set_control_par_str(get_ui_id($v3e3o),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
  1791. %2hswt[14] := get_ui_id($v3e3o)
  1792. declare ui_label $hkwgh(1, 1)
  1793. set_control_par_str(get_ui_id($hkwgh),$CONTROL_PAR_TEXT,"")
  1794. set_control_par_str(get_ui_id($hkwgh),$CONTROL_PAR_PICTURE,"MK_ind" & "")
  1795. set_control_par(get_ui_id($hkwgh),$CONTROL_PAR_Z_LAYER,1)
  1796. %lm23w[14] := get_ui_id($hkwgh)
  1797. %qxmpr[14] := 500001
  1798. %oazdd[14] := 10000
  1799. !gh3f0[14] := "cnt"
  1800. ?rylw5[14] := 3.0
  1801. %q4mzh[14] := -1
  1802. %vc4gu[14] := 100000
  1803. %hpc0e[14] := -1
  1804. %eujmz[14] := -1
  1805. %fogcg[14] := 0
  1806. %5zak5[14] := 0
  1807. %dwdw3[14] := 0
  1808. %sbnwu[14] := 500000
  1809. %jeswc[14] := 25
  1810. %mnk53[14] := 2
  1811. declare %tmahl[10] := (get_ui_id($1g0ky), get_ui_id($2xzsd), get_ui_id($5n4sk), get_ui_id($v3e3o), get_ui_id($hkwgh), get_ui_id($ldi1z), -1)
  1812. $g5k3r := 0
  1813. while ($g5k3r<num_elements(%tmahl))
  1814. %xwg5s[20+$g5k3r] := %tmahl[$g5k3r]
  1815. %cqg2m[2] := 2
  1816. inc($g5k3r)
  1817. end while
  1818. declare ui_slider $liaof(0, 1000)
  1819. make_persistent($liaof)
  1820. declare ui_slider $5wlib(-1000, 1000)
  1821. make_persistent($5wlib)
  1822. set_control_par_str(get_ui_id($5wlib),$CONTROL_PAR_PICTURE,"MK_Slider" & "_6")
  1823. declare ui_menu $eu2xe
  1824. make_persistent($eu2xe)
  1825. set_control_par_str(get_ui_id($eu2xe),$CONTROL_PAR_PICTURE,"blank")
  1826. $fg4rw := 0
  1827. while ($fg4rw<num_elements(!flm4j))
  1828. add_menu_item($eu2xe,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1829. inc($fg4rw)
  1830. end while
  1831. set_menu_item_visibility(get_ui_id($eu2xe),search(%bnygy,11),0)
  1832. $upapg := 15
  1833. %n34di[$upapg] := get_ui_id($eu2xe)
  1834. %nwlgb[$upapg] := get_ui_id($5wlib)
  1835. !4gjzd[15] := "_6"
  1836. %c1qym[15] := get_ui_id($5wlib)
  1837. %41o3s[15] := get_ui_id($liaof)
  1838. declare ui_label $dxpqd(1, 1)
  1839. set_control_par_str(get_ui_id($dxpqd),$CONTROL_PAR_TEXT,"")
  1840. set_control_par_str(get_ui_id($dxpqd),$CONTROL_PAR_PICTURE,"MK_Mask" & "_6")
  1841. %vvlef[15] := get_ui_id($dxpqd)
  1842. declare ui_label $t04sw(1, 1)
  1843. set_control_par_str(get_ui_id($t04sw),$CONTROL_PAR_TEXT,"")
  1844. set_control_par_str(get_ui_id($t04sw),$CONTROL_PAR_PICTURE,"MK_RngP" & "_6")
  1845. %2hswt[15] := get_ui_id($t04sw)
  1846. declare ui_label $no2tr(1, 1)
  1847. set_control_par_str(get_ui_id($no2tr),$CONTROL_PAR_TEXT,"")
  1848. set_control_par_str(get_ui_id($no2tr),$CONTROL_PAR_PICTURE,"MK_ind" & "_6")
  1849. set_control_par(get_ui_id($no2tr),$CONTROL_PAR_Z_LAYER,1)
  1850. %lm23w[15] := get_ui_id($no2tr)
  1851. %qxmpr[15] := 1000
  1852. %oazdd[15] := 10
  1853. !gh3f0[15] := "%"
  1854. ?rylw5[15] := 1.0
  1855. %q4mzh[15] := -1
  1856. %vc4gu[15] := 100000
  1857. %hpc0e[15] := -1
  1858. %eujmz[15] := -1
  1859. %fogcg[15] := 0
  1860. %5zak5[15] := 0
  1861. %dwdw3[15] := 0
  1862. %sbnwu[15] := 1000
  1863. %jeswc[15] := 28
  1864. %mnk53[15] := 3
  1865. declare %ow3a1[10] := (get_ui_id($liaof), get_ui_id($5wlib), get_ui_id($dxpqd), get_ui_id($t04sw), get_ui_id($no2tr), get_ui_id($eu2xe), -1)
  1866. $g5k3r := 0
  1867. while ($g5k3r<num_elements(%ow3a1))
  1868. %xwg5s[30+$g5k3r] := %ow3a1[$g5k3r]
  1869. %cqg2m[3] := 2
  1870. inc($g5k3r)
  1871. end while
  1872. declare ui_slider $sgbvz(-8000, 8000)
  1873. make_persistent($sgbvz)
  1874. declare ui_slider $cx1ja(-16000, 16000)
  1875. make_persistent($cx1ja)
  1876. set_control_par_str(get_ui_id($cx1ja),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
  1877. declare ui_menu $qxhis
  1878. make_persistent($qxhis)
  1879. set_control_par_str(get_ui_id($qxhis),$CONTROL_PAR_PICTURE,"blank")
  1880. $fg4rw := 0
  1881. while ($fg4rw<num_elements(!flm4j))
  1882. add_menu_item($qxhis,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1883. inc($fg4rw)
  1884. end while
  1885. set_menu_item_visibility(get_ui_id($qxhis),search(%bnygy,11),0)
  1886. $upapg := 16
  1887. %n34di[$upapg] := get_ui_id($qxhis)
  1888. %nwlgb[$upapg] := get_ui_id($cx1ja)
  1889. !4gjzd[16] := "_8"
  1890. %c1qym[16] := get_ui_id($cx1ja)
  1891. %41o3s[16] := get_ui_id($sgbvz)
  1892. declare ui_label $md35u(1, 1)
  1893. set_control_par_str(get_ui_id($md35u),$CONTROL_PAR_TEXT,"")
  1894. set_control_par_str(get_ui_id($md35u),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  1895. %vvlef[16] := get_ui_id($md35u)
  1896. declare ui_label $lkio1(1, 1)
  1897. set_control_par_str(get_ui_id($lkio1),$CONTROL_PAR_TEXT,"")
  1898. set_control_par_str(get_ui_id($lkio1),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
  1899. %2hswt[16] := get_ui_id($lkio1)
  1900. declare ui_label $b3krc(1, 1)
  1901. set_control_par_str(get_ui_id($b3krc),$CONTROL_PAR_TEXT,"")
  1902. set_control_par_str(get_ui_id($b3krc),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
  1903. set_control_par(get_ui_id($b3krc),$CONTROL_PAR_Z_LAYER,1)
  1904. %lm23w[16] := get_ui_id($b3krc)
  1905. %qxmpr[16] := 16001
  1906. %oazdd[16] := 10
  1907. !gh3f0[16] := "%"
  1908. ?rylw5[16] := 1.0
  1909. %q4mzh[16] := -1
  1910. %vc4gu[16] := 100000
  1911. %hpc0e[16] := -1
  1912. %eujmz[16] := -1
  1913. %fogcg[16] := 0
  1914. %5zak5[16] := 0
  1915. %dwdw3[16] := -8000
  1916. %sbnwu[16] := 8000
  1917. %jeswc[16] := 31
  1918. %mnk53[16] := 4
  1919. declare %qa1qn[10] := (get_ui_id($sgbvz), get_ui_id($cx1ja), get_ui_id($md35u), get_ui_id($lkio1), get_ui_id($b3krc), get_ui_id($qxhis), -1)
  1920. $g5k3r := 0
  1921. while ($g5k3r<num_elements(%qa1qn))
  1922. %xwg5s[40+$g5k3r] := %qa1qn[$g5k3r]
  1923. %cqg2m[4] := 2
  1924. inc($g5k3r)
  1925. end while
  1926. declare ui_slider $4zkqn(0, 200)
  1927. make_persistent($4zkqn)
  1928. declare ui_slider $boshu(-1001, 1001)
  1929. make_persistent($boshu)
  1930. set_control_par_str(get_ui_id($boshu),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
  1931. declare ui_menu $oicux
  1932. make_persistent($oicux)
  1933. set_control_par_str(get_ui_id($oicux),$CONTROL_PAR_PICTURE,"blank")
  1934. $fg4rw := 0
  1935. while ($fg4rw<num_elements(!flm4j))
  1936. add_menu_item($oicux,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1937. inc($fg4rw)
  1938. end while
  1939. set_menu_item_visibility(get_ui_id($oicux),search(%bnygy,11),0)
  1940. $upapg := 17
  1941. %n34di[$upapg] := get_ui_id($oicux)
  1942. %nwlgb[$upapg] := get_ui_id($boshu)
  1943. !4gjzd[17] := ""
  1944. %c1qym[17] := get_ui_id($boshu)
  1945. %41o3s[17] := get_ui_id($4zkqn)
  1946. declare ui_label $3y4q4(1, 1)
  1947. set_control_par_str(get_ui_id($3y4q4),$CONTROL_PAR_TEXT,"")
  1948. set_control_par_str(get_ui_id($3y4q4),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  1949. %vvlef[17] := get_ui_id($3y4q4)
  1950. declare ui_label $mdetq(1, 1)
  1951. set_control_par_str(get_ui_id($mdetq),$CONTROL_PAR_TEXT,"")
  1952. set_control_par_str(get_ui_id($mdetq),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
  1953. %2hswt[17] := get_ui_id($mdetq)
  1954. declare ui_label $yakx1(1, 1)
  1955. set_control_par_str(get_ui_id($yakx1),$CONTROL_PAR_TEXT,"")
  1956. set_control_par_str(get_ui_id($yakx1),$CONTROL_PAR_PICTURE,"MK_ind" & "")
  1957. set_control_par(get_ui_id($yakx1),$CONTROL_PAR_Z_LAYER,1)
  1958. %lm23w[17] := get_ui_id($yakx1)
  1959. %qxmpr[17] := 200
  1960. %oazdd[17] := 1
  1961. !gh3f0[17] := "%"
  1962. ?rylw5[17] := 10.0
  1963. %q4mzh[17] := -1
  1964. %vc4gu[17] := 100000
  1965. %hpc0e[17] := -1
  1966. %eujmz[17] := -1
  1967. %fogcg[17] := 0
  1968. %5zak5[17] := 0
  1969. %dwdw3[17] := 0
  1970. %sbnwu[17] := 200
  1971. %jeswc[17] := 34
  1972. %mnk53[17] := 5
  1973. declare %w2wpy[10] := (get_ui_id($4zkqn), get_ui_id($boshu), get_ui_id($3y4q4), get_ui_id($mdetq), get_ui_id($yakx1), get_ui_id($oicux), -1)
  1974. $g5k3r := 0
  1975. while ($g5k3r<num_elements(%w2wpy))
  1976. %xwg5s[50+$g5k3r] := %w2wpy[$g5k3r]
  1977. %cqg2m[5] := 2
  1978. inc($g5k3r)
  1979. end while
  1980. declare ui_slider $kuk42(0, 100)
  1981. make_persistent($kuk42)
  1982. declare ui_slider $o5n5m(-100, 100)
  1983. make_persistent($o5n5m)
  1984. set_control_par_str(get_ui_id($o5n5m),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
  1985. declare ui_menu $fzwxf
  1986. make_persistent($fzwxf)
  1987. set_control_par_str(get_ui_id($fzwxf),$CONTROL_PAR_PICTURE,"blank")
  1988. $fg4rw := 0
  1989. while ($fg4rw<num_elements(!flm4j))
  1990. add_menu_item($fzwxf,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  1991. inc($fg4rw)
  1992. end while
  1993. set_menu_item_visibility(get_ui_id($fzwxf),search(%bnygy,11),0)
  1994. $upapg := 18
  1995. %n34di[$upapg] := get_ui_id($fzwxf)
  1996. %nwlgb[$upapg] := get_ui_id($o5n5m)
  1997. !4gjzd[18] := ""
  1998. %c1qym[18] := get_ui_id($o5n5m)
  1999. %41o3s[18] := get_ui_id($kuk42)
  2000. declare ui_label $pfqyz(1, 1)
  2001. set_control_par_str(get_ui_id($pfqyz),$CONTROL_PAR_TEXT,"")
  2002. set_control_par_str(get_ui_id($pfqyz),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2003. %vvlef[18] := get_ui_id($pfqyz)
  2004. declare ui_label $5d25c(1, 1)
  2005. set_control_par_str(get_ui_id($5d25c),$CONTROL_PAR_TEXT,"")
  2006. set_control_par_str(get_ui_id($5d25c),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
  2007. %2hswt[18] := get_ui_id($5d25c)
  2008. declare ui_label $o5omm(1, 1)
  2009. set_control_par_str(get_ui_id($o5omm),$CONTROL_PAR_TEXT,"")
  2010. set_control_par_str(get_ui_id($o5omm),$CONTROL_PAR_PICTURE,"MK_ind" & "")
  2011. set_control_par(get_ui_id($o5omm),$CONTROL_PAR_Z_LAYER,1)
  2012. %lm23w[18] := get_ui_id($o5omm)
  2013. %qxmpr[18] := 100
  2014. %oazdd[18] := 1
  2015. !gh3f0[18] := "%"
  2016. ?rylw5[18] := 1.0
  2017. %q4mzh[18] := -1
  2018. %vc4gu[18] := 100000
  2019. %hpc0e[18] := -1
  2020. %eujmz[18] := -1
  2021. %fogcg[18] := 0
  2022. %5zak5[18] := 0
  2023. %dwdw3[18] := 0
  2024. %sbnwu[18] := 100
  2025. %jeswc[18] := 37
  2026. %mnk53[18] := 6
  2027. declare %2f4uk[10] := (get_ui_id($kuk42), get_ui_id($o5n5m), get_ui_id($pfqyz), get_ui_id($5d25c), get_ui_id($o5omm), get_ui_id($fzwxf), -1)
  2028. $g5k3r := 0
  2029. while ($g5k3r<num_elements(%2f4uk))
  2030. %xwg5s[60+$g5k3r] := %2f4uk[$g5k3r]
  2031. %cqg2m[6] := 2
  2032. inc($g5k3r)
  2033. end while
  2034. declare ui_slider $qsfxg(-2400, 2400)
  2035. make_persistent($qsfxg)
  2036. declare ui_slider $xeafk(-2400, 2400)
  2037. make_persistent($xeafk)
  2038. set_control_par_str(get_ui_id($xeafk),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
  2039. declare ui_menu $52sa5
  2040. make_persistent($52sa5)
  2041. set_control_par_str(get_ui_id($52sa5),$CONTROL_PAR_PICTURE,"blank")
  2042. $fg4rw := 0
  2043. while ($fg4rw<num_elements(!flm4j))
  2044. add_menu_item($52sa5,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2045. inc($fg4rw)
  2046. end while
  2047. set_menu_item_visibility(get_ui_id($52sa5),search(%bnygy,11),0)
  2048. $upapg := 19
  2049. %n34di[$upapg] := get_ui_id($52sa5)
  2050. %nwlgb[$upapg] := get_ui_id($xeafk)
  2051. !4gjzd[19] := "_8"
  2052. %c1qym[19] := get_ui_id($xeafk)
  2053. %41o3s[19] := get_ui_id($qsfxg)
  2054. declare ui_label $wi2xc(1, 1)
  2055. set_control_par_str(get_ui_id($wi2xc),$CONTROL_PAR_TEXT,"")
  2056. set_control_par_str(get_ui_id($wi2xc),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  2057. %vvlef[19] := get_ui_id($wi2xc)
  2058. declare ui_label $lzojj(1, 1)
  2059. set_control_par_str(get_ui_id($lzojj),$CONTROL_PAR_TEXT,"")
  2060. set_control_par_str(get_ui_id($lzojj),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
  2061. %2hswt[19] := get_ui_id($lzojj)
  2062. declare ui_label $n2zja(1, 1)
  2063. set_control_par_str(get_ui_id($n2zja),$CONTROL_PAR_TEXT,"")
  2064. set_control_par_str(get_ui_id($n2zja),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
  2065. set_control_par(get_ui_id($n2zja),$CONTROL_PAR_Z_LAYER,1)
  2066. %lm23w[19] := get_ui_id($n2zja)
  2067. %qxmpr[19] := 4801
  2068. %oazdd[19] := 100
  2069. !gh3f0[19] := "st"
  2070. ?rylw5[19] := 1.0
  2071. %q4mzh[19] := -1
  2072. %vc4gu[19] := 100000
  2073. %hpc0e[19] := -1
  2074. %eujmz[19] := -1
  2075. %fogcg[19] := 0
  2076. %5zak5[19] := 0
  2077. %dwdw3[19] := -2400
  2078. %sbnwu[19] := 2400
  2079. %jeswc[19] := 40
  2080. %mnk53[19] := 7
  2081. declare %insua[10] := (get_ui_id($qsfxg), get_ui_id($xeafk), get_ui_id($wi2xc), get_ui_id($lzojj), get_ui_id($n2zja), get_ui_id($52sa5), -1)
  2082. $g5k3r := 0
  2083. while ($g5k3r<num_elements(%insua))
  2084. %xwg5s[70+$g5k3r] := %insua[$g5k3r]
  2085. %cqg2m[7] := 2
  2086. inc($g5k3r)
  2087. end while
  2088. declare ui_slider $aaf4s(0, 1000)
  2089. make_persistent($aaf4s)
  2090. declare ui_slider $sddk3(-1001, 1001)
  2091. make_persistent($sddk3)
  2092. set_control_par_str(get_ui_id($sddk3),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
  2093. declare ui_menu $nplew
  2094. make_persistent($nplew)
  2095. set_control_par_str(get_ui_id($nplew),$CONTROL_PAR_PICTURE,"blank")
  2096. $fg4rw := 0
  2097. while ($fg4rw<num_elements(!flm4j))
  2098. add_menu_item($nplew,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2099. inc($fg4rw)
  2100. end while
  2101. set_menu_item_visibility(get_ui_id($nplew),search(%bnygy,11),0)
  2102. $upapg := 20
  2103. %n34di[$upapg] := get_ui_id($nplew)
  2104. %nwlgb[$upapg] := get_ui_id($sddk3)
  2105. !4gjzd[20] := "_8"
  2106. %c1qym[20] := get_ui_id($sddk3)
  2107. %41o3s[20] := get_ui_id($aaf4s)
  2108. declare ui_label $mwnlo(1, 1)
  2109. set_control_par_str(get_ui_id($mwnlo),$CONTROL_PAR_TEXT,"")
  2110. set_control_par_str(get_ui_id($mwnlo),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  2111. %vvlef[20] := get_ui_id($mwnlo)
  2112. declare ui_label $av2jw(1, 1)
  2113. set_control_par_str(get_ui_id($av2jw),$CONTROL_PAR_TEXT,"")
  2114. set_control_par_str(get_ui_id($av2jw),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
  2115. %2hswt[20] := get_ui_id($av2jw)
  2116. declare ui_label $mddxh(1, 1)
  2117. set_control_par_str(get_ui_id($mddxh),$CONTROL_PAR_TEXT,"")
  2118. set_control_par_str(get_ui_id($mddxh),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
  2119. set_control_par(get_ui_id($mddxh),$CONTROL_PAR_Z_LAYER,1)
  2120. %lm23w[20] := get_ui_id($mddxh)
  2121. %qxmpr[20] := 1001
  2122. %oazdd[20] := 10
  2123. !gh3f0[20] := "%"
  2124. ?rylw5[20] := 1.0
  2125. %q4mzh[20] := -1
  2126. %vc4gu[20] := 100000
  2127. %hpc0e[20] := -1
  2128. %eujmz[20] := -1
  2129. %fogcg[20] := 0
  2130. %5zak5[20] := 0
  2131. %dwdw3[20] := 0
  2132. %sbnwu[20] := 1000
  2133. %jeswc[20] := 43
  2134. %mnk53[20] := 8
  2135. declare %z2ovs[10] := (get_ui_id($aaf4s), get_ui_id($sddk3), get_ui_id($mwnlo), get_ui_id($av2jw), get_ui_id($mddxh), get_ui_id($nplew), -1)
  2136. $g5k3r := 0
  2137. while ($g5k3r<num_elements(%z2ovs))
  2138. %xwg5s[80+$g5k3r] := %z2ovs[$g5k3r]
  2139. %cqg2m[8] := 2
  2140. inc($g5k3r)
  2141. end while
  2142. declare ui_slider $nwl2v(1, 750000)
  2143. make_persistent($nwl2v)
  2144. declare ui_slider $pk0h4(-750000, 750000)
  2145. make_persistent($pk0h4)
  2146. set_control_par_str(get_ui_id($pk0h4),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
  2147. declare ui_menu $u2ki4
  2148. make_persistent($u2ki4)
  2149. set_control_par_str(get_ui_id($u2ki4),$CONTROL_PAR_PICTURE,"blank")
  2150. $fg4rw := 0
  2151. while ($fg4rw<num_elements(!flm4j))
  2152. add_menu_item($u2ki4,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2153. inc($fg4rw)
  2154. end while
  2155. set_menu_item_visibility(get_ui_id($u2ki4),search(%bnygy,11),0)
  2156. $upapg := 21
  2157. %n34di[$upapg] := get_ui_id($u2ki4)
  2158. %nwlgb[$upapg] := get_ui_id($pk0h4)
  2159. !4gjzd[21] := ""
  2160. %c1qym[21] := get_ui_id($pk0h4)
  2161. %41o3s[21] := get_ui_id($nwl2v)
  2162. declare ui_label $20as3(1, 1)
  2163. set_control_par_str(get_ui_id($20as3),$CONTROL_PAR_TEXT,"")
  2164. set_control_par_str(get_ui_id($20as3),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2165. %vvlef[21] := get_ui_id($20as3)
  2166. declare ui_label $ihvaa(1, 1)
  2167. set_control_par_str(get_ui_id($ihvaa),$CONTROL_PAR_TEXT,"")
  2168. set_control_par_str(get_ui_id($ihvaa),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
  2169. %2hswt[21] := get_ui_id($ihvaa)
  2170. declare ui_label $1hkyz(1, 1)
  2171. set_control_par_str(get_ui_id($1hkyz),$CONTROL_PAR_TEXT,"")
  2172. set_control_par_str(get_ui_id($1hkyz),$CONTROL_PAR_PICTURE,"MK_ind" & "")
  2173. set_control_par(get_ui_id($1hkyz),$CONTROL_PAR_Z_LAYER,1)
  2174. %lm23w[21] := get_ui_id($1hkyz)
  2175. %qxmpr[21] := 750000
  2176. %oazdd[21] := 1
  2177. !gh3f0[21] := "ms"
  2178. ?rylw5[21] := 1.0
  2179. %q4mzh[21] := $ENGINE_PAR_ATTACK
  2180. %vc4gu[21] := 100000
  2181. %hpc0e[21] := 0
  2182. %eujmz[21] := -1
  2183. %fogcg[21] := 0
  2184. %5zak5[21] := 0
  2185. %dwdw3[21] := 1
  2186. %sbnwu[21] := 750000
  2187. %jeswc[21] := 46
  2188. %mnk53[21] := 9
  2189. declare %fvmpz[10] := (get_ui_id($nwl2v), get_ui_id($pk0h4), get_ui_id($20as3), get_ui_id($ihvaa), get_ui_id($1hkyz), get_ui_id($u2ki4), -1)
  2190. $g5k3r := 0
  2191. while ($g5k3r<num_elements(%fvmpz))
  2192. %xwg5s[90+$g5k3r] := %fvmpz[$g5k3r]
  2193. %cqg2m[9] := 2
  2194. inc($g5k3r)
  2195. end while
  2196. declare ui_slider $wfiom(1, 750000)
  2197. make_persistent($wfiom)
  2198. declare ui_slider $0hnr5(-750000, 750000)
  2199. make_persistent($0hnr5)
  2200. set_control_par_str(get_ui_id($0hnr5),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
  2201. declare ui_menu $tmtfv
  2202. make_persistent($tmtfv)
  2203. set_control_par_str(get_ui_id($tmtfv),$CONTROL_PAR_PICTURE,"blank")
  2204. $fg4rw := 0
  2205. while ($fg4rw<num_elements(!flm4j))
  2206. add_menu_item($tmtfv,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2207. inc($fg4rw)
  2208. end while
  2209. set_menu_item_visibility(get_ui_id($tmtfv),search(%bnygy,11),0)
  2210. $upapg := 22
  2211. %n34di[$upapg] := get_ui_id($tmtfv)
  2212. %nwlgb[$upapg] := get_ui_id($0hnr5)
  2213. !4gjzd[22] := ""
  2214. %c1qym[22] := get_ui_id($0hnr5)
  2215. %41o3s[22] := get_ui_id($wfiom)
  2216. declare ui_label $4adkw(1, 1)
  2217. set_control_par_str(get_ui_id($4adkw),$CONTROL_PAR_TEXT,"")
  2218. set_control_par_str(get_ui_id($4adkw),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2219. %vvlef[22] := get_ui_id($4adkw)
  2220. declare ui_label $33a34(1, 1)
  2221. set_control_par_str(get_ui_id($33a34),$CONTROL_PAR_TEXT,"")
  2222. set_control_par_str(get_ui_id($33a34),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
  2223. %2hswt[22] := get_ui_id($33a34)
  2224. declare ui_label $gg3zg(1, 1)
  2225. set_control_par_str(get_ui_id($gg3zg),$CONTROL_PAR_TEXT,"")
  2226. set_control_par_str(get_ui_id($gg3zg),$CONTROL_PAR_PICTURE,"MK_ind" & "")
  2227. set_control_par(get_ui_id($gg3zg),$CONTROL_PAR_Z_LAYER,1)
  2228. %lm23w[22] := get_ui_id($gg3zg)
  2229. %qxmpr[22] := 750000
  2230. %oazdd[22] := 1
  2231. !gh3f0[22] := "ms"
  2232. ?rylw5[22] := 1.0
  2233. %q4mzh[22] := $ENGINE_PAR_RELEASE
  2234. %vc4gu[22] := 100000
  2235. %hpc0e[22] := 0
  2236. %eujmz[22] := -1
  2237. %fogcg[22] := 0
  2238. %5zak5[22] := 0
  2239. %dwdw3[22] := 1
  2240. %sbnwu[22] := 750000
  2241. %jeswc[22] := 49
  2242. %mnk53[22] := 10
  2243. declare %hdrpg[10] := (get_ui_id($wfiom), get_ui_id($0hnr5), get_ui_id($4adkw), get_ui_id($33a34), get_ui_id($gg3zg), get_ui_id($tmtfv), -1)
  2244. $g5k3r := 0
  2245. while ($g5k3r<num_elements(%hdrpg))
  2246. %xwg5s[100+$g5k3r] := %hdrpg[$g5k3r]
  2247. %cqg2m[10] := 2
  2248. inc($g5k3r)
  2249. end while
  2250. declare ui_slider $qwf1w(-100, 100)
  2251. make_persistent($qwf1w)
  2252. set_control_par(get_ui_id($qwf1w),$CONTROL_PAR_DEFAULT_VALUE,0)
  2253. set_control_par_str(get_ui_id($qwf1w),$CONTROL_PAR_PICTURE,"GE_ATT_CURV")
  2254. %aazjf[0] := get_ui_id($qwf1w)
  2255. declare ui_label $tqxjo(1, 1)
  2256. %5comw[0] := get_ui_id($tqxjo)
  2257. set_control_par_str(get_ui_id($tqxjo),$CONTROL_PAR_TEXT,"")
  2258. set_control_par_str(get_ui_id($tqxjo),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  2259. %qdiwi[0] := 0
  2260. %ha0dc[0] := 101
  2261. %cy2pa[0] := 1
  2262. !5hawr[0] := "%"
  2263. !znpd1[0] := ""
  2264. %i5z0e[0] := -1
  2265. %qpgwq[0] := 100000
  2266. %bjbtn[0] := -1
  2267. %c40o1[0] := -1
  2268. %aebtw[0] := -100
  2269. %hgu5c[0] := 100
  2270. %gndxq[0] := 63
  2271. %ipim0[0] := 137
  2272. declare %44o4l[2] := (get_ui_id($qwf1w), get_ui_id($tqxjo))
  2273. $g5k3r := 0
  2274. while ($g5k3r<num_elements(%44o4l))
  2275. %xwg5s[1370+$g5k3r] := %44o4l[$g5k3r]
  2276. %cqg2m[137] := 2
  2277. inc($g5k3r)
  2278. end while
  2279. declare ui_slider $ppaoe(0, 84406)
  2280. make_persistent($ppaoe)
  2281. set_control_par(get_ui_id($ppaoe),$CONTROL_PAR_DEFAULT_VALUE,1)
  2282. set_control_par_str(get_ui_id($ppaoe),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  2283. %aazjf[1] := get_ui_id($ppaoe)
  2284. declare ui_label $g2ztw(1, 1)
  2285. %5comw[1] := get_ui_id($g2ztw)
  2286. set_control_par_str(get_ui_id($g2ztw),$CONTROL_PAR_TEXT,"")
  2287. set_control_par_str(get_ui_id($g2ztw),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2288. %qdiwi[1] := 0
  2289. %ha0dc[1] := 84406
  2290. %cy2pa[1] := 1
  2291. !5hawr[1] := "ms"
  2292. !znpd1[1] := ""
  2293. %i5z0e[1] := -1
  2294. %qpgwq[1] := 100000
  2295. %bjbtn[1] := -1
  2296. %c40o1[1] := -1
  2297. %aebtw[1] := 1
  2298. %hgu5c[1] := 84406
  2299. %gndxq[1] := 58
  2300. %ipim0[1] := 11
  2301. declare %jshdi[2] := (get_ui_id($ppaoe), get_ui_id($g2ztw))
  2302. $g5k3r := 0
  2303. while ($g5k3r<num_elements(%jshdi))
  2304. %xwg5s[110+$g5k3r] := %jshdi[$g5k3r]
  2305. %cqg2m[11] := 2
  2306. inc($g5k3r)
  2307. end while
  2308. declare ui_slider $ork5f(0, 84406)
  2309. make_persistent($ork5f)
  2310. set_control_par(get_ui_id($ork5f),$CONTROL_PAR_DEFAULT_VALUE,2000)
  2311. set_control_par_str(get_ui_id($ork5f),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  2312. %aazjf[2] := get_ui_id($ork5f)
  2313. declare ui_label $uzij3(1, 1)
  2314. %5comw[2] := get_ui_id($uzij3)
  2315. set_control_par_str(get_ui_id($uzij3),$CONTROL_PAR_TEXT,"")
  2316. set_control_par_str(get_ui_id($uzij3),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2317. %qdiwi[2] := 0
  2318. %ha0dc[2] := 84406
  2319. %cy2pa[2] := 1
  2320. !5hawr[2] := "ms"
  2321. !znpd1[2] := ""
  2322. %i5z0e[2] := -1
  2323. %qpgwq[2] := 100000
  2324. %bjbtn[2] := -1
  2325. %c40o1[2] := -1
  2326. %aebtw[2] := 0
  2327. %hgu5c[2] := 84406
  2328. %gndxq[2] := 59
  2329. %ipim0[2] := 12
  2330. declare %oqg14[2] := (get_ui_id($ork5f), get_ui_id($uzij3))
  2331. $g5k3r := 0
  2332. while ($g5k3r<num_elements(%oqg14))
  2333. %xwg5s[120+$g5k3r] := %oqg14[$g5k3r]
  2334. %cqg2m[12] := 2
  2335. inc($g5k3r)
  2336. end while
  2337. declare ui_slider $dg3qf(0, 127)
  2338. make_persistent($dg3qf)
  2339. set_control_par(get_ui_id($dg3qf),$CONTROL_PAR_DEFAULT_VALUE,127)
  2340. set_control_par_str(get_ui_id($dg3qf),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  2341. %aazjf[3] := get_ui_id($dg3qf)
  2342. declare ui_label $dx2uv(1, 1)
  2343. %5comw[3] := get_ui_id($dx2uv)
  2344. set_control_par_str(get_ui_id($dx2uv),$CONTROL_PAR_TEXT,"")
  2345. set_control_par_str(get_ui_id($dx2uv),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2346. %qdiwi[3] := 0
  2347. %ha0dc[3] := 128
  2348. %cy2pa[3] := 1
  2349. !5hawr[3] := "Lev"
  2350. !znpd1[3] := ""
  2351. %i5z0e[3] := -1
  2352. %qpgwq[3] := 100000
  2353. %bjbtn[3] := -1
  2354. %c40o1[3] := -1
  2355. %aebtw[3] := 0
  2356. %hgu5c[3] := 127
  2357. %gndxq[3] := 60
  2358. %ipim0[3] := 13
  2359. declare %gyo2o[2] := (get_ui_id($dg3qf), get_ui_id($dx2uv))
  2360. $g5k3r := 0
  2361. while ($g5k3r<num_elements(%gyo2o))
  2362. %xwg5s[130+$g5k3r] := %gyo2o[$g5k3r]
  2363. %cqg2m[13] := 2
  2364. inc($g5k3r)
  2365. end while
  2366. declare ui_slider $p3vhn(0, 84406)
  2367. make_persistent($p3vhn)
  2368. set_control_par(get_ui_id($p3vhn),$CONTROL_PAR_DEFAULT_VALUE,3000)
  2369. set_control_par_str(get_ui_id($p3vhn),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  2370. %aazjf[4] := get_ui_id($p3vhn)
  2371. declare ui_label $l2rkq(1, 1)
  2372. %5comw[4] := get_ui_id($l2rkq)
  2373. set_control_par_str(get_ui_id($l2rkq),$CONTROL_PAR_TEXT,"")
  2374. set_control_par_str(get_ui_id($l2rkq),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2375. %qdiwi[4] := 0
  2376. %ha0dc[4] := 28135
  2377. %cy2pa[4] := 1
  2378. !5hawr[4] := "ms"
  2379. !znpd1[4] := ""
  2380. %i5z0e[4] := -1
  2381. %qpgwq[4] := 100000
  2382. %bjbtn[4] := -1
  2383. %c40o1[4] := -1
  2384. %aebtw[4] := 0
  2385. %hgu5c[4] := 84406
  2386. %gndxq[4] := 61
  2387. %ipim0[4] := 14
  2388. declare %jxdrd[2] := (get_ui_id($p3vhn), get_ui_id($l2rkq))
  2389. $g5k3r := 0
  2390. while ($g5k3r<num_elements(%jxdrd))
  2391. %xwg5s[140+$g5k3r] := %jxdrd[$g5k3r]
  2392. %cqg2m[14] := 2
  2393. inc($g5k3r)
  2394. end while
  2395. declare ui_slider $l2tv1(0, 1000)
  2396. make_persistent($l2tv1)
  2397. declare ui_slider $zv33b(-1000, 1000)
  2398. make_persistent($zv33b)
  2399. set_control_par_str(get_ui_id($zv33b),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
  2400. declare ui_menu $dbgkf
  2401. make_persistent($dbgkf)
  2402. set_control_par_str(get_ui_id($dbgkf),$CONTROL_PAR_PICTURE,"blank")
  2403. $fg4rw := 0
  2404. while ($fg4rw<num_elements(!flm4j))
  2405. add_menu_item($dbgkf,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2406. inc($fg4rw)
  2407. end while
  2408. set_menu_item_visibility(get_ui_id($dbgkf),search(%bnygy,11),0)
  2409. $upapg := 23
  2410. %n34di[$upapg] := get_ui_id($dbgkf)
  2411. %nwlgb[$upapg] := get_ui_id($zv33b)
  2412. !4gjzd[23] := "_9"
  2413. %c1qym[23] := get_ui_id($zv33b)
  2414. %41o3s[23] := get_ui_id($l2tv1)
  2415. declare ui_label $4tzoa(1, 1)
  2416. set_control_par_str(get_ui_id($4tzoa),$CONTROL_PAR_TEXT,"")
  2417. set_control_par_str(get_ui_id($4tzoa),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
  2418. %vvlef[23] := get_ui_id($4tzoa)
  2419. declare ui_label $ehlhr(1, 1)
  2420. set_control_par_str(get_ui_id($ehlhr),$CONTROL_PAR_TEXT,"")
  2421. set_control_par_str(get_ui_id($ehlhr),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
  2422. %2hswt[23] := get_ui_id($ehlhr)
  2423. declare ui_label $s5fbq(1, 1)
  2424. set_control_par_str(get_ui_id($s5fbq),$CONTROL_PAR_TEXT,"")
  2425. set_control_par_str(get_ui_id($s5fbq),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
  2426. set_control_par(get_ui_id($s5fbq),$CONTROL_PAR_Z_LAYER,1)
  2427. %lm23w[23] := get_ui_id($s5fbq)
  2428. %qxmpr[23] := 1001
  2429. %oazdd[23] := 10
  2430. !gh3f0[23] := "%"
  2431. ?rylw5[23] := 1.0
  2432. %q4mzh[23] := -1
  2433. %vc4gu[23] := 100000
  2434. %hpc0e[23] := -1
  2435. %eujmz[23] := -1
  2436. %fogcg[23] := 0
  2437. %5zak5[23] := 0
  2438. %dwdw3[23] := 0
  2439. %sbnwu[23] := 1000
  2440. %jeswc[23] := 202
  2441. %mnk53[23] := 15
  2442. declare %40hjc[10] := (get_ui_id($l2tv1), get_ui_id($zv33b), get_ui_id($4tzoa), get_ui_id($ehlhr), get_ui_id($s5fbq), get_ui_id($dbgkf), -1)
  2443. $g5k3r := 0
  2444. while ($g5k3r<num_elements(%40hjc))
  2445. %xwg5s[150+$g5k3r] := %40hjc[$g5k3r]
  2446. %cqg2m[15] := 4
  2447. inc($g5k3r)
  2448. end while
  2449. declare ui_slider $eai4d(0, 1000)
  2450. make_persistent($eai4d)
  2451. declare ui_slider $3zolj(-1001, 1001)
  2452. make_persistent($3zolj)
  2453. set_control_par_str(get_ui_id($3zolj),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
  2454. declare ui_menu $r3d0o
  2455. make_persistent($r3d0o)
  2456. set_control_par_str(get_ui_id($r3d0o),$CONTROL_PAR_PICTURE,"blank")
  2457. $fg4rw := 0
  2458. while ($fg4rw<num_elements(!flm4j))
  2459. add_menu_item($r3d0o,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2460. inc($fg4rw)
  2461. end while
  2462. set_menu_item_visibility(get_ui_id($r3d0o),search(%bnygy,11),0)
  2463. $upapg := 24
  2464. %n34di[$upapg] := get_ui_id($r3d0o)
  2465. %nwlgb[$upapg] := get_ui_id($3zolj)
  2466. !4gjzd[24] := "_8"
  2467. %c1qym[24] := get_ui_id($3zolj)
  2468. %41o3s[24] := get_ui_id($eai4d)
  2469. declare ui_label $b2eko(1, 1)
  2470. set_control_par_str(get_ui_id($b2eko),$CONTROL_PAR_TEXT,"")
  2471. set_control_par_str(get_ui_id($b2eko),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  2472. %vvlef[24] := get_ui_id($b2eko)
  2473. declare ui_label $qfgko(1, 1)
  2474. set_control_par_str(get_ui_id($qfgko),$CONTROL_PAR_TEXT,"")
  2475. set_control_par_str(get_ui_id($qfgko),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
  2476. %2hswt[24] := get_ui_id($qfgko)
  2477. declare ui_label $wcrox(1, 1)
  2478. set_control_par_str(get_ui_id($wcrox),$CONTROL_PAR_TEXT,"")
  2479. set_control_par_str(get_ui_id($wcrox),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
  2480. set_control_par(get_ui_id($wcrox),$CONTROL_PAR_Z_LAYER,1)
  2481. %lm23w[24] := get_ui_id($wcrox)
  2482. %qxmpr[24] := 1001
  2483. %oazdd[24] := 10
  2484. !gh3f0[24] := "%"
  2485. ?rylw5[24] := 1.0
  2486. %q4mzh[24] := -1
  2487. %vc4gu[24] := 100000
  2488. %hpc0e[24] := -1
  2489. %eujmz[24] := -1
  2490. %fogcg[24] := 0
  2491. %5zak5[24] := 0
  2492. %dwdw3[24] := 0
  2493. %sbnwu[24] := 1000
  2494. %jeswc[24] := 52
  2495. %mnk53[24] := 16
  2496. declare %45u3e[10] := (get_ui_id($eai4d), get_ui_id($3zolj), get_ui_id($b2eko), get_ui_id($qfgko), get_ui_id($wcrox), get_ui_id($r3d0o), -1)
  2497. $g5k3r := 0
  2498. while ($g5k3r<num_elements(%45u3e))
  2499. %xwg5s[160+$g5k3r] := %45u3e[$g5k3r]
  2500. %cqg2m[16] := 2
  2501. inc($g5k3r)
  2502. end while
  2503. declare ui_slider $r0khx(0, 1000)
  2504. make_persistent($r0khx)
  2505. declare ui_slider $yl1h5(-1001, 1001)
  2506. make_persistent($yl1h5)
  2507. set_control_par_str(get_ui_id($yl1h5),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
  2508. declare ui_menu $yqtdo
  2509. make_persistent($yqtdo)
  2510. set_control_par_str(get_ui_id($yqtdo),$CONTROL_PAR_PICTURE,"blank")
  2511. $fg4rw := 0
  2512. while ($fg4rw<num_elements(!flm4j))
  2513. add_menu_item($yqtdo,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2514. inc($fg4rw)
  2515. end while
  2516. set_menu_item_visibility(get_ui_id($yqtdo),search(%bnygy,11),0)
  2517. $upapg := 25
  2518. %n34di[$upapg] := get_ui_id($yqtdo)
  2519. %nwlgb[$upapg] := get_ui_id($yl1h5)
  2520. !4gjzd[25] := "_8"
  2521. %c1qym[25] := get_ui_id($yl1h5)
  2522. %41o3s[25] := get_ui_id($r0khx)
  2523. declare ui_label $jmb0x(1, 1)
  2524. set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_TEXT,"")
  2525. set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  2526. %vvlef[25] := get_ui_id($jmb0x)
  2527. declare ui_label $zhhlu(1, 1)
  2528. set_control_par_str(get_ui_id($zhhlu),$CONTROL_PAR_TEXT,"")
  2529. set_control_par_str(get_ui_id($zhhlu),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
  2530. %2hswt[25] := get_ui_id($zhhlu)
  2531. declare ui_label $yryo2(1, 1)
  2532. set_control_par_str(get_ui_id($yryo2),$CONTROL_PAR_TEXT,"")
  2533. set_control_par_str(get_ui_id($yryo2),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
  2534. set_control_par(get_ui_id($yryo2),$CONTROL_PAR_Z_LAYER,1)
  2535. %lm23w[25] := get_ui_id($yryo2)
  2536. %qxmpr[25] := 1001
  2537. %oazdd[25] := 10
  2538. !gh3f0[25] := "%"
  2539. ?rylw5[25] := 1.0
  2540. %q4mzh[25] := -1
  2541. %vc4gu[25] := 100000
  2542. %hpc0e[25] := -1
  2543. %eujmz[25] := -1
  2544. %fogcg[25] := 0
  2545. %5zak5[25] := 0
  2546. %dwdw3[25] := 0
  2547. %sbnwu[25] := 1000
  2548. %jeswc[25] := 55
  2549. %mnk53[25] := 17
  2550. declare %2lcxo[10] := (get_ui_id($r0khx), get_ui_id($yl1h5), get_ui_id($jmb0x), get_ui_id($zhhlu), get_ui_id($yryo2), get_ui_id($yqtdo), -1)
  2551. $g5k3r := 0
  2552. while ($g5k3r<num_elements(%2lcxo))
  2553. %xwg5s[170+$g5k3r] := %2lcxo[$g5k3r]
  2554. %cqg2m[17] := 2
  2555. inc($g5k3r)
  2556. end while
  2557. declare ui_slider $3fqin(0, 500000)
  2558. make_persistent($3fqin)
  2559. declare ui_slider $q5pfd(-500001, 500001)
  2560. make_persistent($q5pfd)
  2561. set_control_par_str(get_ui_id($q5pfd),$CONTROL_PAR_PICTURE,"MK_Slider" & "_10")
  2562. declare ui_menu $m0zqt
  2563. make_persistent($m0zqt)
  2564. set_control_par_str(get_ui_id($m0zqt),$CONTROL_PAR_PICTURE,"blank")
  2565. $fg4rw := 0
  2566. while ($fg4rw<num_elements(!flm4j))
  2567. add_menu_item($m0zqt,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2568. inc($fg4rw)
  2569. end while
  2570. set_menu_item_str(get_ui_id($m0zqt),search(%bnygy,10),"VEL Mono Velocity")
  2571. $upapg := 26
  2572. %n34di[$upapg] := get_ui_id($m0zqt)
  2573. %nwlgb[$upapg] := get_ui_id($q5pfd)
  2574. !4gjzd[26] := "_10"
  2575. %c1qym[26] := get_ui_id($q5pfd)
  2576. %41o3s[26] := get_ui_id($3fqin)
  2577. declare ui_label $sclhm(1, 1)
  2578. set_control_par_str(get_ui_id($sclhm),$CONTROL_PAR_TEXT,"")
  2579. set_control_par_str(get_ui_id($sclhm),$CONTROL_PAR_PICTURE,"MK_Mask" & "_10")
  2580. %vvlef[26] := get_ui_id($sclhm)
  2581. declare ui_label $s2qwm(1, 1)
  2582. set_control_par_str(get_ui_id($s2qwm),$CONTROL_PAR_TEXT,"")
  2583. set_control_par_str(get_ui_id($s2qwm),$CONTROL_PAR_PICTURE,"MK_RngP" & "_10")
  2584. %2hswt[26] := get_ui_id($s2qwm)
  2585. declare ui_label $rnwew(1, 1)
  2586. set_control_par_str(get_ui_id($rnwew),$CONTROL_PAR_TEXT,"")
  2587. set_control_par_str(get_ui_id($rnwew),$CONTROL_PAR_PICTURE,"MK_ind" & "_10")
  2588. set_control_par(get_ui_id($rnwew),$CONTROL_PAR_Z_LAYER,1)
  2589. %lm23w[26] := get_ui_id($rnwew)
  2590. %qxmpr[26] := 500001
  2591. %oazdd[26] := 1
  2592. !gh3f0[26] := "dB"
  2593. ?rylw5[26] := 1.0
  2594. %q4mzh[26] := $ENGINE_PAR_GN_GAIN
  2595. %vc4gu[26] := -1
  2596. %hpc0e[26] := 6
  2597. %eujmz[26] := 1024
  2598. %fogcg[26] := 0
  2599. %5zak5[26] := 0
  2600. %dwdw3[26] := 0
  2601. %sbnwu[26] := 500000
  2602. %jeswc[26] := 13
  2603. %mnk53[26] := 18
  2604. declare %4tzkz[10] := (get_ui_id($3fqin), get_ui_id($q5pfd), get_ui_id($sclhm), get_ui_id($s2qwm), get_ui_id($rnwew), get_ui_id($m0zqt), -1)
  2605. $g5k3r := 0
  2606. while ($g5k3r<num_elements(%4tzkz))
  2607. %xwg5s[180+$g5k3r] := %4tzkz[$g5k3r]
  2608. %cqg2m[18] := 519
  2609. inc($g5k3r)
  2610. end while
  2611. declare ui_slider $h11uu(0, 500000)
  2612. make_persistent($h11uu)
  2613. declare ui_slider $rgoik(-500001, 500001)
  2614. make_persistent($rgoik)
  2615. set_control_par_str(get_ui_id($rgoik),$CONTROL_PAR_PICTURE,"MK_Slider" & "_11")
  2616. declare ui_menu $1xnyu
  2617. make_persistent($1xnyu)
  2618. set_control_par_str(get_ui_id($1xnyu),$CONTROL_PAR_PICTURE,"blank")
  2619. $fg4rw := 0
  2620. while ($fg4rw<num_elements(!flm4j))
  2621. add_menu_item($1xnyu,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2622. inc($fg4rw)
  2623. end while
  2624. set_menu_item_str(get_ui_id($1xnyu),search(%bnygy,10),"VEL Mono Velocity")
  2625. $upapg := 27
  2626. %n34di[$upapg] := get_ui_id($1xnyu)
  2627. %nwlgb[$upapg] := get_ui_id($rgoik)
  2628. !4gjzd[27] := "_11"
  2629. %c1qym[27] := get_ui_id($rgoik)
  2630. %41o3s[27] := get_ui_id($h11uu)
  2631. declare ui_label $rzycf(1, 1)
  2632. set_control_par_str(get_ui_id($rzycf),$CONTROL_PAR_TEXT,"")
  2633. set_control_par_str(get_ui_id($rzycf),$CONTROL_PAR_PICTURE,"MK_Mask" & "_11")
  2634. %vvlef[27] := get_ui_id($rzycf)
  2635. declare ui_label $3n4e3(1, 1)
  2636. set_control_par_str(get_ui_id($3n4e3),$CONTROL_PAR_TEXT,"")
  2637. set_control_par_str(get_ui_id($3n4e3),$CONTROL_PAR_PICTURE,"MK_RngP" & "_11")
  2638. %2hswt[27] := get_ui_id($3n4e3)
  2639. declare ui_label $grjvf(1, 1)
  2640. set_control_par_str(get_ui_id($grjvf),$CONTROL_PAR_TEXT,"")
  2641. set_control_par_str(get_ui_id($grjvf),$CONTROL_PAR_PICTURE,"MK_ind" & "_11")
  2642. set_control_par(get_ui_id($grjvf),$CONTROL_PAR_Z_LAYER,1)
  2643. %lm23w[27] := get_ui_id($grjvf)
  2644. %qxmpr[27] := 500001
  2645. %oazdd[27] := 1
  2646. !gh3f0[27] := "dB"
  2647. ?rylw5[27] := 1.0
  2648. %q4mzh[27] := $ENGINE_PAR_GN_GAIN
  2649. %vc4gu[27] := -1
  2650. %hpc0e[27] := 6
  2651. %eujmz[27] := 1025
  2652. %fogcg[27] := 0
  2653. %5zak5[27] := 0
  2654. %dwdw3[27] := 0
  2655. %sbnwu[27] := 500000
  2656. %jeswc[27] := 208
  2657. %mnk53[27] := 19
  2658. declare %l5gaf[10] := (get_ui_id($h11uu), get_ui_id($rgoik), get_ui_id($rzycf), get_ui_id($3n4e3), get_ui_id($grjvf), get_ui_id($1xnyu), -1)
  2659. $g5k3r := 0
  2660. while ($g5k3r<num_elements(%l5gaf))
  2661. %xwg5s[190+$g5k3r] := %l5gaf[$g5k3r]
  2662. %cqg2m[19] := 519
  2663. inc($g5k3r)
  2664. end while
  2665. %nwlgb[27] := -1
  2666. declare ui_slider $c21kk(-2400, 2400)
  2667. make_persistent($c21kk)
  2668. declare ui_slider $eg3kt(-2400, 2400)
  2669. make_persistent($eg3kt)
  2670. set_control_par_str(get_ui_id($eg3kt),$CONTROL_PAR_PICTURE,"MK_Slider" & "")
  2671. declare ui_menu $2vyff
  2672. make_persistent($2vyff)
  2673. set_control_par_str(get_ui_id($2vyff),$CONTROL_PAR_PICTURE,"blank")
  2674. $fg4rw := 0
  2675. while ($fg4rw<num_elements(!flm4j))
  2676. add_menu_item($2vyff,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2677. inc($fg4rw)
  2678. end while
  2679. set_menu_item_visibility(get_ui_id($2vyff),search(%bnygy,11),0)
  2680. $upapg := 28
  2681. %n34di[$upapg] := get_ui_id($2vyff)
  2682. %nwlgb[$upapg] := get_ui_id($eg3kt)
  2683. !4gjzd[28] := ""
  2684. %c1qym[28] := get_ui_id($eg3kt)
  2685. %41o3s[28] := get_ui_id($c21kk)
  2686. declare ui_label $3kanf(1, 1)
  2687. set_control_par_str(get_ui_id($3kanf),$CONTROL_PAR_TEXT,"")
  2688. set_control_par_str(get_ui_id($3kanf),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2689. %vvlef[28] := get_ui_id($3kanf)
  2690. declare ui_label $o452l(1, 1)
  2691. set_control_par_str(get_ui_id($o452l),$CONTROL_PAR_TEXT,"")
  2692. set_control_par_str(get_ui_id($o452l),$CONTROL_PAR_PICTURE,"MK_RngP" & "")
  2693. %2hswt[28] := get_ui_id($o452l)
  2694. declare ui_label $gjshz(1, 1)
  2695. set_control_par_str(get_ui_id($gjshz),$CONTROL_PAR_TEXT,"")
  2696. set_control_par_str(get_ui_id($gjshz),$CONTROL_PAR_PICTURE,"MK_ind" & "")
  2697. set_control_par(get_ui_id($gjshz),$CONTROL_PAR_Z_LAYER,1)
  2698. %lm23w[28] := get_ui_id($gjshz)
  2699. %qxmpr[28] := 4801
  2700. %oazdd[28] := 100
  2701. !gh3f0[28] := "st"
  2702. ?rylw5[28] := 1.0
  2703. %q4mzh[28] := -1
  2704. %vc4gu[28] := 100000
  2705. %hpc0e[28] := -1
  2706. %eujmz[28] := -1
  2707. %fogcg[28] := 0
  2708. %5zak5[28] := 0
  2709. %dwdw3[28] := -2400
  2710. %sbnwu[28] := 2400
  2711. %jeswc[28] := 205
  2712. %mnk53[28] := 58
  2713. declare %4dvqi[10] := (get_ui_id($c21kk), get_ui_id($eg3kt), get_ui_id($3kanf), get_ui_id($o452l), get_ui_id($gjshz), get_ui_id($2vyff), -1)
  2714. $g5k3r := 0
  2715. while ($g5k3r<num_elements(%4dvqi))
  2716. %xwg5s[580+$g5k3r] := %4dvqi[$g5k3r]
  2717. %cqg2m[58] := 4
  2718. inc($g5k3r)
  2719. end while
  2720. declare ui_slider $uvcxk(-24, 24)
  2721. make_persistent($uvcxk)
  2722. declare ui_slider $ia54c(-24, 24)
  2723. make_persistent($ia54c)
  2724. set_control_par_str(get_ui_id($ia54c),$CONTROL_PAR_PICTURE,"MK_Slider" & "_8")
  2725. declare ui_menu $wh1ke
  2726. make_persistent($wh1ke)
  2727. set_control_par_str(get_ui_id($wh1ke),$CONTROL_PAR_PICTURE,"blank")
  2728. $fg4rw := 0
  2729. while ($fg4rw<num_elements(!flm4j))
  2730. add_menu_item($wh1ke,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2731. inc($fg4rw)
  2732. end while
  2733. set_menu_item_visibility(get_ui_id($wh1ke),search(%bnygy,11),0)
  2734. $upapg := 29
  2735. %n34di[$upapg] := get_ui_id($wh1ke)
  2736. %nwlgb[$upapg] := get_ui_id($ia54c)
  2737. !4gjzd[29] := "_8"
  2738. %c1qym[29] := get_ui_id($ia54c)
  2739. %41o3s[29] := get_ui_id($uvcxk)
  2740. declare ui_label $jf3np(1, 1)
  2741. set_control_par_str(get_ui_id($jf3np),$CONTROL_PAR_TEXT,"")
  2742. set_control_par_str(get_ui_id($jf3np),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  2743. %vvlef[29] := get_ui_id($jf3np)
  2744. declare ui_label $nqle0(1, 1)
  2745. set_control_par_str(get_ui_id($nqle0),$CONTROL_PAR_TEXT,"")
  2746. set_control_par_str(get_ui_id($nqle0),$CONTROL_PAR_PICTURE,"MK_RngP" & "_8")
  2747. %2hswt[29] := get_ui_id($nqle0)
  2748. declare ui_label $5cguo(1, 1)
  2749. set_control_par_str(get_ui_id($5cguo),$CONTROL_PAR_TEXT,"")
  2750. set_control_par_str(get_ui_id($5cguo),$CONTROL_PAR_PICTURE,"MK_ind" & "_8")
  2751. set_control_par(get_ui_id($5cguo),$CONTROL_PAR_Z_LAYER,1)
  2752. %lm23w[29] := get_ui_id($5cguo)
  2753. %qxmpr[29] := 49
  2754. %oazdd[29] := 1
  2755. !gh3f0[29] := "st"
  2756. ?rylw5[29] := 1.0
  2757. %q4mzh[29] := -1
  2758. %vc4gu[29] := 100000
  2759. %hpc0e[29] := -1
  2760. %eujmz[29] := -1
  2761. %fogcg[29] := 0
  2762. %5zak5[29] := 0
  2763. %dwdw3[29] := -24
  2764. %sbnwu[29] := 24
  2765. %jeswc[29] := 215
  2766. %mnk53[29] := 25
  2767. declare %eibhx[10] := (get_ui_id($uvcxk), get_ui_id($ia54c), get_ui_id($jf3np), get_ui_id($nqle0), get_ui_id($5cguo), get_ui_id($wh1ke), -1)
  2768. $g5k3r := 0
  2769. while ($g5k3r<num_elements(%eibhx))
  2770. %xwg5s[250+$g5k3r] := %eibhx[$g5k3r]
  2771. %cqg2m[25] := 4
  2772. inc($g5k3r)
  2773. end while
  2774. declare ui_slider $dgu14(0, 10000)
  2775. make_persistent($dgu14)
  2776. declare ui_slider $5l3um(-10000, 10000)
  2777. make_persistent($5l3um)
  2778. set_control_par_str(get_ui_id($5l3um),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
  2779. declare ui_menu $f4o1c
  2780. make_persistent($f4o1c)
  2781. set_control_par_str(get_ui_id($f4o1c),$CONTROL_PAR_PICTURE,"blank")
  2782. $fg4rw := 0
  2783. while ($fg4rw<num_elements(!flm4j))
  2784. add_menu_item($f4o1c,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2785. inc($fg4rw)
  2786. end while
  2787. set_menu_item_visibility(get_ui_id($f4o1c),search(%bnygy,11),0)
  2788. $upapg := 30
  2789. %n34di[$upapg] := get_ui_id($f4o1c)
  2790. %nwlgb[$upapg] := get_ui_id($5l3um)
  2791. !4gjzd[30] := "_9"
  2792. %c1qym[30] := get_ui_id($5l3um)
  2793. %41o3s[30] := get_ui_id($dgu14)
  2794. declare ui_label $pxdpf(1, 1)
  2795. set_control_par_str(get_ui_id($pxdpf),$CONTROL_PAR_TEXT,"")
  2796. set_control_par_str(get_ui_id($pxdpf),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
  2797. %vvlef[30] := get_ui_id($pxdpf)
  2798. declare ui_label $tiqgq(1, 1)
  2799. set_control_par_str(get_ui_id($tiqgq),$CONTROL_PAR_TEXT,"")
  2800. set_control_par_str(get_ui_id($tiqgq),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
  2801. %2hswt[30] := get_ui_id($tiqgq)
  2802. declare ui_label $ra3pk(1, 1)
  2803. set_control_par_str(get_ui_id($ra3pk),$CONTROL_PAR_TEXT,"")
  2804. set_control_par_str(get_ui_id($ra3pk),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
  2805. set_control_par(get_ui_id($ra3pk),$CONTROL_PAR_Z_LAYER,1)
  2806. %lm23w[30] := get_ui_id($ra3pk)
  2807. %qxmpr[30] := 10001
  2808. %oazdd[30] := 100
  2809. !gh3f0[30] := "%"
  2810. ?rylw5[30] := 1.0
  2811. %q4mzh[30] := -1
  2812. %vc4gu[30] := 100000
  2813. %hpc0e[30] := -1
  2814. %eujmz[30] := -1
  2815. %fogcg[30] := 0
  2816. %5zak5[30] := 0
  2817. %dwdw3[30] := 0
  2818. %sbnwu[30] := 10000
  2819. %jeswc[30] := 234
  2820. %mnk53[30] := 135
  2821. declare %rkg4w[10] := (get_ui_id($dgu14), get_ui_id($5l3um), get_ui_id($pxdpf), get_ui_id($tiqgq), get_ui_id($ra3pk), get_ui_id($f4o1c), -1)
  2822. $g5k3r := 0
  2823. while ($g5k3r<num_elements(%rkg4w))
  2824. %xwg5s[1350+$g5k3r] := %rkg4w[$g5k3r]
  2825. %cqg2m[135] := 4
  2826. inc($g5k3r)
  2827. end while
  2828. declare ui_slider $u51dh(0, 1000000)
  2829. make_persistent($u51dh)
  2830. set_control_par(get_ui_id($u51dh),$CONTROL_PAR_DEFAULT_VALUE,10)
  2831. set_control_par_str(get_ui_id($u51dh),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  2832. %aazjf[5] := get_ui_id($u51dh)
  2833. declare ui_label $zmfxo(1, 1)
  2834. %5comw[5] := get_ui_id($zmfxo)
  2835. set_control_par_str(get_ui_id($zmfxo),$CONTROL_PAR_TEXT,"")
  2836. set_control_par_str(get_ui_id($zmfxo),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2837. %qdiwi[5] := 0
  2838. %ha0dc[5] := 1000001
  2839. %cy2pa[5] := 1
  2840. !5hawr[5] := "ms"
  2841. !znpd1[5] := ""
  2842. %i5z0e[5] := $ENGINE_PAR_ATTACK
  2843. %qpgwq[5] := 100001
  2844. %bjbtn[5] := 0
  2845. %c40o1[5] := -1
  2846. %aebtw[5] := 0
  2847. %hgu5c[5] := 1000000
  2848. %gndxq[5] := 211
  2849. %ipim0[5] := 34
  2850. declare %0twpb[2] := (get_ui_id($u51dh), get_ui_id($zmfxo))
  2851. $g5k3r := 0
  2852. while ($g5k3r<num_elements(%0twpb))
  2853. %xwg5s[340+$g5k3r] := %0twpb[$g5k3r]
  2854. %cqg2m[34] := 4
  2855. inc($g5k3r)
  2856. end while
  2857. declare ui_slider $2qveo(0, 1000000)
  2858. make_persistent($2qveo)
  2859. set_control_par(get_ui_id($2qveo),$CONTROL_PAR_DEFAULT_VALUE,10)
  2860. set_control_par_str(get_ui_id($2qveo),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  2861. %aazjf[6] := get_ui_id($2qveo)
  2862. declare ui_label $aofrc(1, 1)
  2863. %5comw[6] := get_ui_id($aofrc)
  2864. set_control_par_str(get_ui_id($aofrc),$CONTROL_PAR_TEXT,"")
  2865. set_control_par_str(get_ui_id($aofrc),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2866. %qdiwi[6] := 0
  2867. %ha0dc[6] := 1000001
  2868. %cy2pa[6] := 1
  2869. !5hawr[6] := "ms"
  2870. !znpd1[6] := ""
  2871. %i5z0e[6] := $ENGINE_PAR_DECAY
  2872. %qpgwq[6] := 100001
  2873. %bjbtn[6] := 0
  2874. %c40o1[6] := -1
  2875. %aebtw[6] := 0
  2876. %hgu5c[6] := 1000000
  2877. %gndxq[6] := 212
  2878. %ipim0[6] := 35
  2879. declare %zruwj[2] := (get_ui_id($2qveo), get_ui_id($aofrc))
  2880. $g5k3r := 0
  2881. while ($g5k3r<num_elements(%zruwj))
  2882. %xwg5s[350+$g5k3r] := %zruwj[$g5k3r]
  2883. %cqg2m[35] := 4
  2884. inc($g5k3r)
  2885. end while
  2886. declare ui_slider $fjnu3(0, 1000000)
  2887. make_persistent($fjnu3)
  2888. set_control_par(get_ui_id($fjnu3),$CONTROL_PAR_DEFAULT_VALUE,1000000)
  2889. set_control_par_str(get_ui_id($fjnu3),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  2890. %aazjf[7] := get_ui_id($fjnu3)
  2891. declare ui_label $mlzzs(1, 1)
  2892. %5comw[7] := get_ui_id($mlzzs)
  2893. set_control_par_str(get_ui_id($mlzzs),$CONTROL_PAR_TEXT,"")
  2894. set_control_par_str(get_ui_id($mlzzs),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2895. %qdiwi[7] := 0
  2896. %ha0dc[7] := 1000001
  2897. %cy2pa[7] := 1
  2898. !5hawr[7] := "dB"
  2899. !znpd1[7] := ""
  2900. %i5z0e[7] := $ENGINE_PAR_SUSTAIN
  2901. %qpgwq[7] := 100001
  2902. %bjbtn[7] := 0
  2903. %c40o1[7] := -1
  2904. %aebtw[7] := 0
  2905. %hgu5c[7] := 1000000
  2906. %gndxq[7] := 213
  2907. %ipim0[7] := 36
  2908. declare %vhz1n[2] := (get_ui_id($fjnu3), get_ui_id($mlzzs))
  2909. $g5k3r := 0
  2910. while ($g5k3r<num_elements(%vhz1n))
  2911. %xwg5s[360+$g5k3r] := %vhz1n[$g5k3r]
  2912. %cqg2m[36] := 4
  2913. inc($g5k3r)
  2914. end while
  2915. declare ui_slider $tz115(0, 1000000)
  2916. make_persistent($tz115)
  2917. set_control_par(get_ui_id($tz115),$CONTROL_PAR_DEFAULT_VALUE,750000)
  2918. set_control_par_str(get_ui_id($tz115),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  2919. %aazjf[8] := get_ui_id($tz115)
  2920. declare ui_label $4xd05(1, 1)
  2921. %5comw[8] := get_ui_id($4xd05)
  2922. set_control_par_str(get_ui_id($4xd05),$CONTROL_PAR_TEXT,"")
  2923. set_control_par_str(get_ui_id($4xd05),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  2924. %qdiwi[8] := 0
  2925. %ha0dc[8] := 1000001
  2926. %cy2pa[8] := 1
  2927. !5hawr[8] := "ms"
  2928. !znpd1[8] := ""
  2929. %i5z0e[8] := $ENGINE_PAR_RELEASE
  2930. %qpgwq[8] := 100001
  2931. %bjbtn[8] := 0
  2932. %c40o1[8] := -1
  2933. %aebtw[8] := 0
  2934. %hgu5c[8] := 1000000
  2935. %gndxq[8] := 214
  2936. %ipim0[8] := 37
  2937. declare %zfpd4[2] := (get_ui_id($tz115), get_ui_id($4xd05))
  2938. $g5k3r := 0
  2939. while ($g5k3r<num_elements(%zfpd4))
  2940. %xwg5s[370+$g5k3r] := %zfpd4[$g5k3r]
  2941. %cqg2m[37] := 4
  2942. inc($g5k3r)
  2943. end while
  2944. declare ui_slider $2d1qh(0, 1000000)
  2945. make_persistent($2d1qh)
  2946. set_control_par(get_ui_id($2d1qh),$CONTROL_PAR_DEFAULT_VALUE,500000)
  2947. set_control_par_str(get_ui_id($2d1qh),$CONTROL_PAR_PICTURE,"GE_ATT_CURV")
  2948. %aazjf[9] := get_ui_id($2d1qh)
  2949. declare ui_label $5lpyg(1, 1)
  2950. %5comw[9] := get_ui_id($5lpyg)
  2951. set_control_par_str(get_ui_id($5lpyg),$CONTROL_PAR_TEXT,"")
  2952. set_control_par_str(get_ui_id($5lpyg),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  2953. %qdiwi[9] := 0
  2954. %ha0dc[9] := 1000001
  2955. %cy2pa[9] := 1
  2956. !5hawr[9] := "%"
  2957. !znpd1[9] := ""
  2958. %i5z0e[9] := $ENGINE_PAR_ATK_CURVE
  2959. %qpgwq[9] := 100001
  2960. %bjbtn[9] := 0
  2961. %c40o1[9] := -1
  2962. %aebtw[9] := 0
  2963. %hgu5c[9] := 1000000
  2964. %gndxq[9] := 218
  2965. %ipim0[9] := 136
  2966. declare %ly0h1[2] := (get_ui_id($2d1qh), get_ui_id($5lpyg))
  2967. $g5k3r := 0
  2968. while ($g5k3r<num_elements(%ly0h1))
  2969. %xwg5s[1360+$g5k3r] := %ly0h1[$g5k3r]
  2970. %cqg2m[136] := 4
  2971. inc($g5k3r)
  2972. end while
  2973. declare %p41k2[29] := ($FILTER_TYPE_LP1POLE, $FILTER_TYPE_LP2POLE, $FILTER_TYPE_LP4POLE, $FILTER_TYPE_HP2POLE, $FILTER_TYPE_HP4POLE, $FILTER_TYPE_BP2POLE, $FILTER_TYPE_BP4POLE, $FILTER_TYPE_BR4POLE, $FILTER_TYPE_LP6POLE, $FILTER_TYPE_PHASER, $FILTER_TYPE_VOWELA, $FILTER_TYPE_VOWELB, $FILTER_TYPE_DAFT_LP, $FILTER_TYPE_SV_LP2, $FILTER_TYPE_SV_LP4, $FILTER_TYPE_LDR_LP2, $FILTER_TYPE_LDR_LP3, $FILTER_TYPE_LDR_LP4, $FILTER_TYPE_SV_HP2, $FILTER_TYPE_SV_HP4, $FILTER_TYPE_LDR_HP2, $FILTER_TYPE_LDR_HP3, $FILTER_TYPE_LDR_HP4, $FILTER_TYPE_DAFT_HP, $FILTER_TYPE_SV_BP2, $FILTER_TYPE_SV_BP4, $FILTER_TYPE_LDR_BP2, $FILTER_TYPE_LDR_BP4, $FILTER_TYPE_SV_NOTCH4)
  2974. declare ui_slider $ufbsw(0, 1000000)
  2975. make_persistent($ufbsw)
  2976. declare ui_slider $3s02f(-1000001, 1000001)
  2977. make_persistent($3s02f)
  2978. set_control_par_str(get_ui_id($3s02f),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
  2979. declare ui_menu $3rcax
  2980. make_persistent($3rcax)
  2981. set_control_par_str(get_ui_id($3rcax),$CONTROL_PAR_PICTURE,"blank")
  2982. $fg4rw := 0
  2983. while ($fg4rw<num_elements(!flm4j))
  2984. add_menu_item($3rcax,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  2985. inc($fg4rw)
  2986. end while
  2987. set_menu_item_str(get_ui_id($3rcax),search(%bnygy,10),"VEL Mono Velocity")
  2988. $upapg := 31
  2989. %n34di[$upapg] := get_ui_id($3rcax)
  2990. %nwlgb[$upapg] := get_ui_id($3s02f)
  2991. !4gjzd[31] := "_9"
  2992. %c1qym[31] := get_ui_id($3s02f)
  2993. %41o3s[31] := get_ui_id($ufbsw)
  2994. declare ui_label $spuzv(1, 1)
  2995. set_control_par_str(get_ui_id($spuzv),$CONTROL_PAR_TEXT,"")
  2996. set_control_par_str(get_ui_id($spuzv),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
  2997. %vvlef[31] := get_ui_id($spuzv)
  2998. declare ui_label $l4c5p(1, 1)
  2999. set_control_par_str(get_ui_id($l4c5p),$CONTROL_PAR_TEXT,"")
  3000. set_control_par_str(get_ui_id($l4c5p),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
  3001. %2hswt[31] := get_ui_id($l4c5p)
  3002. declare ui_label $fatqb(1, 1)
  3003. set_control_par_str(get_ui_id($fatqb),$CONTROL_PAR_TEXT,"")
  3004. set_control_par_str(get_ui_id($fatqb),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
  3005. set_control_par(get_ui_id($fatqb),$CONTROL_PAR_Z_LAYER,1)
  3006. %lm23w[31] := get_ui_id($fatqb)
  3007. %qxmpr[31] := 1000001
  3008. %oazdd[31] := 1
  3009. !gh3f0[31] := "Hz"
  3010. ?rylw5[31] := 1.0
  3011. %q4mzh[31] := $ENGINE_PAR_CUTOFF
  3012. %vc4gu[31] := 100001
  3013. %hpc0e[31] := 0
  3014. %eujmz[31] := -1
  3015. %fogcg[31] := 0
  3016. %5zak5[31] := 0
  3017. %dwdw3[31] := 0
  3018. %sbnwu[31] := 1000000
  3019. %jeswc[31] := 222
  3020. %mnk53[31] := 31
  3021. declare %r4x1y[10] := (get_ui_id($ufbsw), get_ui_id($3s02f), get_ui_id($spuzv), get_ui_id($l4c5p), get_ui_id($fatqb), get_ui_id($3rcax), -1)
  3022. $g5k3r := 0
  3023. while ($g5k3r<num_elements(%r4x1y))
  3024. %xwg5s[310+$g5k3r] := %r4x1y[$g5k3r]
  3025. %cqg2m[31] := 4
  3026. inc($g5k3r)
  3027. end while
  3028. declare ui_slider $maq5o(0, 1000000)
  3029. make_persistent($maq5o)
  3030. declare ui_slider $410y5(-1000001, 1000001)
  3031. make_persistent($410y5)
  3032. set_control_par_str(get_ui_id($410y5),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
  3033. declare ui_menu $5qrmj
  3034. make_persistent($5qrmj)
  3035. set_control_par_str(get_ui_id($5qrmj),$CONTROL_PAR_PICTURE,"blank")
  3036. $fg4rw := 0
  3037. while ($fg4rw<num_elements(!flm4j))
  3038. add_menu_item($5qrmj,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  3039. inc($fg4rw)
  3040. end while
  3041. set_menu_item_str(get_ui_id($5qrmj),search(%bnygy,10),"VEL Mono Velocity")
  3042. $upapg := 32
  3043. %n34di[$upapg] := get_ui_id($5qrmj)
  3044. %nwlgb[$upapg] := get_ui_id($410y5)
  3045. !4gjzd[32] := "_9"
  3046. %c1qym[32] := get_ui_id($410y5)
  3047. %41o3s[32] := get_ui_id($maq5o)
  3048. declare ui_label $g5hlh(1, 1)
  3049. set_control_par_str(get_ui_id($g5hlh),$CONTROL_PAR_TEXT,"")
  3050. set_control_par_str(get_ui_id($g5hlh),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
  3051. %vvlef[32] := get_ui_id($g5hlh)
  3052. declare ui_label $vyk31(1, 1)
  3053. set_control_par_str(get_ui_id($vyk31),$CONTROL_PAR_TEXT,"")
  3054. set_control_par_str(get_ui_id($vyk31),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
  3055. %2hswt[32] := get_ui_id($vyk31)
  3056. declare ui_label $1gwq3(1, 1)
  3057. set_control_par_str(get_ui_id($1gwq3),$CONTROL_PAR_TEXT,"")
  3058. set_control_par_str(get_ui_id($1gwq3),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
  3059. set_control_par(get_ui_id($1gwq3),$CONTROL_PAR_Z_LAYER,1)
  3060. %lm23w[32] := get_ui_id($1gwq3)
  3061. %qxmpr[32] := 1000001
  3062. %oazdd[32] := 1
  3063. !gh3f0[32] := "%"
  3064. ?rylw5[32] := 1.0
  3065. %q4mzh[32] := $ENGINE_PAR_RESONANCE
  3066. %vc4gu[32] := 100001
  3067. %hpc0e[32] := 0
  3068. %eujmz[32] := -1
  3069. %fogcg[32] := 0
  3070. %5zak5[32] := 0
  3071. %dwdw3[32] := 0
  3072. %sbnwu[32] := 1000000
  3073. %jeswc[32] := 225
  3074. %mnk53[32] := 32
  3075. declare %p40ng[10] := (get_ui_id($maq5o), get_ui_id($410y5), get_ui_id($g5hlh), get_ui_id($vyk31), get_ui_id($1gwq3), get_ui_id($5qrmj), -1)
  3076. $g5k3r := 0
  3077. while ($g5k3r<num_elements(%p40ng))
  3078. %xwg5s[320+$g5k3r] := %p40ng[$g5k3r]
  3079. %cqg2m[32] := 4
  3080. inc($g5k3r)
  3081. end while
  3082. declare ui_slider $lqoqt(0, 1000000)
  3083. make_persistent($lqoqt)
  3084. declare ui_slider $begpw(-1000001, 1000001)
  3085. make_persistent($begpw)
  3086. set_control_par_str(get_ui_id($begpw),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
  3087. declare ui_menu $f0ljx
  3088. make_persistent($f0ljx)
  3089. set_control_par_str(get_ui_id($f0ljx),$CONTROL_PAR_PICTURE,"blank")
  3090. $fg4rw := 0
  3091. while ($fg4rw<num_elements(!flm4j))
  3092. add_menu_item($f0ljx,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  3093. inc($fg4rw)
  3094. end while
  3095. set_menu_item_str(get_ui_id($f0ljx),search(%bnygy,10),"VEL Mono Velocity")
  3096. $upapg := 33
  3097. %n34di[$upapg] := get_ui_id($f0ljx)
  3098. %nwlgb[$upapg] := get_ui_id($begpw)
  3099. !4gjzd[33] := "_9"
  3100. %c1qym[33] := get_ui_id($begpw)
  3101. %41o3s[33] := get_ui_id($lqoqt)
  3102. declare ui_label $w0i5l(1, 1)
  3103. set_control_par_str(get_ui_id($w0i5l),$CONTROL_PAR_TEXT,"")
  3104. set_control_par_str(get_ui_id($w0i5l),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
  3105. %vvlef[33] := get_ui_id($w0i5l)
  3106. declare ui_label $v353e(1, 1)
  3107. set_control_par_str(get_ui_id($v353e),$CONTROL_PAR_TEXT,"")
  3108. set_control_par_str(get_ui_id($v353e),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
  3109. %2hswt[33] := get_ui_id($v353e)
  3110. declare ui_label $z11n5(1, 1)
  3111. set_control_par_str(get_ui_id($z11n5),$CONTROL_PAR_TEXT,"")
  3112. set_control_par_str(get_ui_id($z11n5),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
  3113. set_control_par(get_ui_id($z11n5),$CONTROL_PAR_Z_LAYER,1)
  3114. %lm23w[33] := get_ui_id($z11n5)
  3115. %qxmpr[33] := 1000001
  3116. %oazdd[33] := 1
  3117. !gh3f0[33] := "db"
  3118. ?rylw5[33] := 1.0
  3119. %q4mzh[33] := $ENGINE_PAR_GAIN
  3120. %vc4gu[33] := 100001
  3121. %hpc0e[33] := 0
  3122. %eujmz[33] := -1
  3123. %fogcg[33] := 0
  3124. %5zak5[33] := 0
  3125. %dwdw3[33] := 0
  3126. %sbnwu[33] := 1000000
  3127. %jeswc[33] := 228
  3128. %mnk53[33] := 33
  3129. declare %nkdoq[10] := (get_ui_id($lqoqt), get_ui_id($begpw), get_ui_id($w0i5l), get_ui_id($v353e), get_ui_id($z11n5), get_ui_id($f0ljx), -1)
  3130. $g5k3r := 0
  3131. while ($g5k3r<num_elements(%nkdoq))
  3132. %xwg5s[330+$g5k3r] := %nkdoq[$g5k3r]
  3133. %cqg2m[33] := 4
  3134. inc($g5k3r)
  3135. end while
  3136. declare ui_slider $zqnbc(-1000000, 1000000)
  3137. make_persistent($zqnbc)
  3138. declare ui_slider $llm0i(-2000001, 2000001)
  3139. make_persistent($llm0i)
  3140. set_control_par_str(get_ui_id($llm0i),$CONTROL_PAR_PICTURE,"MK_Slider" & "_9")
  3141. declare ui_menu $5m5qp
  3142. make_persistent($5m5qp)
  3143. set_control_par_str(get_ui_id($5m5qp),$CONTROL_PAR_PICTURE,"blank")
  3144. $fg4rw := 0
  3145. while ($fg4rw<num_elements(!flm4j))
  3146. add_menu_item($5m5qp,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  3147. inc($fg4rw)
  3148. end while
  3149. set_menu_item_str(get_ui_id($5m5qp),search(%bnygy,10),"VEL Mono Velocity")
  3150. $upapg := 34
  3151. %n34di[$upapg] := get_ui_id($5m5qp)
  3152. %nwlgb[$upapg] := get_ui_id($llm0i)
  3153. !4gjzd[34] := "_9"
  3154. %c1qym[34] := get_ui_id($llm0i)
  3155. %41o3s[34] := get_ui_id($zqnbc)
  3156. declare ui_label $a45pv(1, 1)
  3157. set_control_par_str(get_ui_id($a45pv),$CONTROL_PAR_TEXT,"")
  3158. set_control_par_str(get_ui_id($a45pv),$CONTROL_PAR_PICTURE,"MK_Mask" & "_9")
  3159. %vvlef[34] := get_ui_id($a45pv)
  3160. declare ui_label $axt0a(1, 1)
  3161. set_control_par_str(get_ui_id($axt0a),$CONTROL_PAR_TEXT,"")
  3162. set_control_par_str(get_ui_id($axt0a),$CONTROL_PAR_PICTURE,"MK_RngP" & "_9")
  3163. %2hswt[34] := get_ui_id($axt0a)
  3164. declare ui_label $vgnmk(1, 1)
  3165. set_control_par_str(get_ui_id($vgnmk),$CONTROL_PAR_TEXT,"")
  3166. set_control_par_str(get_ui_id($vgnmk),$CONTROL_PAR_PICTURE,"MK_ind" & "_9")
  3167. set_control_par(get_ui_id($vgnmk),$CONTROL_PAR_Z_LAYER,1)
  3168. %lm23w[34] := get_ui_id($vgnmk)
  3169. %qxmpr[34] := 2000001
  3170. %oazdd[34] := 1
  3171. !gh3f0[34] := "%"
  3172. ?rylw5[34] := 1.0
  3173. %q4mzh[34] := $ENGINE_PAR_MOD_TARGET_INTENSITY
  3174. %vc4gu[34] := 100001
  3175. %hpc0e[34] := 1
  3176. %eujmz[34] := 0
  3177. %fogcg[34] := 0
  3178. %5zak5[34] := 0
  3179. %dwdw3[34] := -1000000
  3180. %sbnwu[34] := 1000000
  3181. %jeswc[34] := 231
  3182. %mnk53[34] := 61
  3183. declare %sf5kb[10] := (get_ui_id($zqnbc), get_ui_id($llm0i), get_ui_id($a45pv), get_ui_id($axt0a), get_ui_id($vgnmk), get_ui_id($5m5qp), -1)
  3184. $g5k3r := 0
  3185. while ($g5k3r<num_elements(%sf5kb))
  3186. %xwg5s[610+$g5k3r] := %sf5kb[$g5k3r]
  3187. %cqg2m[61] := 4
  3188. inc($g5k3r)
  3189. end while
  3190. declare ui_slider $az3wx(0, 1000000)
  3191. make_persistent($az3wx)
  3192. set_control_par(get_ui_id($az3wx),$CONTROL_PAR_DEFAULT_VALUE,10)
  3193. set_control_par_str(get_ui_id($az3wx),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  3194. %aazjf[10] := get_ui_id($az3wx)
  3195. declare ui_label $4y32f(1, 1)
  3196. %5comw[10] := get_ui_id($4y32f)
  3197. set_control_par_str(get_ui_id($4y32f),$CONTROL_PAR_TEXT,"")
  3198. set_control_par_str(get_ui_id($4y32f),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  3199. %qdiwi[10] := 0
  3200. %ha0dc[10] := 1000001
  3201. %cy2pa[10] := 1
  3202. !5hawr[10] := "ms"
  3203. !znpd1[10] := ""
  3204. %i5z0e[10] := $ENGINE_PAR_ATTACK
  3205. %qpgwq[10] := 100001
  3206. %bjbtn[10] := 1
  3207. %c40o1[10] := -1
  3208. %aebtw[10] := 0
  3209. %hgu5c[10] := 1000000
  3210. %gndxq[10] := 250
  3211. %ipim0[10] := 50
  3212. declare %xhb1b[2] := (get_ui_id($az3wx), get_ui_id($4y32f))
  3213. $g5k3r := 0
  3214. while ($g5k3r<num_elements(%xhb1b))
  3215. %xwg5s[500+$g5k3r] := %xhb1b[$g5k3r]
  3216. %cqg2m[50] := 4
  3217. inc($g5k3r)
  3218. end while
  3219. declare ui_slider $ki4hc(0, 1000000)
  3220. make_persistent($ki4hc)
  3221. set_control_par(get_ui_id($ki4hc),$CONTROL_PAR_DEFAULT_VALUE,10)
  3222. set_control_par_str(get_ui_id($ki4hc),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  3223. %aazjf[11] := get_ui_id($ki4hc)
  3224. declare ui_label $h4yqj(1, 1)
  3225. %5comw[11] := get_ui_id($h4yqj)
  3226. set_control_par_str(get_ui_id($h4yqj),$CONTROL_PAR_TEXT,"")
  3227. set_control_par_str(get_ui_id($h4yqj),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  3228. %qdiwi[11] := 0
  3229. %ha0dc[11] := 1000001
  3230. %cy2pa[11] := 1
  3231. !5hawr[11] := "ms"
  3232. !znpd1[11] := ""
  3233. %i5z0e[11] := $ENGINE_PAR_DECAY
  3234. %qpgwq[11] := 100001
  3235. %bjbtn[11] := 1
  3236. %c40o1[11] := -1
  3237. %aebtw[11] := 0
  3238. %hgu5c[11] := 1000000
  3239. %gndxq[11] := 251
  3240. %ipim0[11] := 51
  3241. declare %sstxg[2] := (get_ui_id($ki4hc), get_ui_id($h4yqj))
  3242. $g5k3r := 0
  3243. while ($g5k3r<num_elements(%sstxg))
  3244. %xwg5s[510+$g5k3r] := %sstxg[$g5k3r]
  3245. %cqg2m[51] := 4
  3246. inc($g5k3r)
  3247. end while
  3248. declare ui_slider $y4fhf(0, 1000000)
  3249. make_persistent($y4fhf)
  3250. set_control_par(get_ui_id($y4fhf),$CONTROL_PAR_DEFAULT_VALUE,1000000)
  3251. set_control_par_str(get_ui_id($y4fhf),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  3252. %aazjf[12] := get_ui_id($y4fhf)
  3253. declare ui_label $ywygd(1, 1)
  3254. %5comw[12] := get_ui_id($ywygd)
  3255. set_control_par_str(get_ui_id($ywygd),$CONTROL_PAR_TEXT,"")
  3256. set_control_par_str(get_ui_id($ywygd),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  3257. %qdiwi[12] := 0
  3258. %ha0dc[12] := 1000001
  3259. %cy2pa[12] := 1
  3260. !5hawr[12] := "dB"
  3261. !znpd1[12] := ""
  3262. %i5z0e[12] := $ENGINE_PAR_SUSTAIN
  3263. %qpgwq[12] := 100001
  3264. %bjbtn[12] := 1
  3265. %c40o1[12] := -1
  3266. %aebtw[12] := 0
  3267. %hgu5c[12] := 1000000
  3268. %gndxq[12] := 252
  3269. %ipim0[12] := 52
  3270. declare %talpk[2] := (get_ui_id($y4fhf), get_ui_id($ywygd))
  3271. $g5k3r := 0
  3272. while ($g5k3r<num_elements(%talpk))
  3273. %xwg5s[520+$g5k3r] := %talpk[$g5k3r]
  3274. %cqg2m[52] := 4
  3275. inc($g5k3r)
  3276. end while
  3277. declare ui_slider $cfneg(0, 1000000)
  3278. make_persistent($cfneg)
  3279. set_control_par(get_ui_id($cfneg),$CONTROL_PAR_DEFAULT_VALUE,750000)
  3280. set_control_par_str(get_ui_id($cfneg),$CONTROL_PAR_PICTURE,"GE_ADSR_SLIDER")
  3281. %aazjf[13] := get_ui_id($cfneg)
  3282. declare ui_label $rorqz(1, 1)
  3283. %5comw[13] := get_ui_id($rorqz)
  3284. set_control_par_str(get_ui_id($rorqz),$CONTROL_PAR_TEXT,"")
  3285. set_control_par_str(get_ui_id($rorqz),$CONTROL_PAR_PICTURE,"MK_Mask" & "")
  3286. %qdiwi[13] := 0
  3287. %ha0dc[13] := 1000001
  3288. %cy2pa[13] := 1
  3289. !5hawr[13] := "ms"
  3290. !znpd1[13] := ""
  3291. %i5z0e[13] := $ENGINE_PAR_RELEASE
  3292. %qpgwq[13] := 100001
  3293. %bjbtn[13] := 1
  3294. %c40o1[13] := -1
  3295. %aebtw[13] := 0
  3296. %hgu5c[13] := 1000000
  3297. %gndxq[13] := 253
  3298. %ipim0[13] := 53
  3299. declare %mmgl1[2] := (get_ui_id($cfneg), get_ui_id($rorqz))
  3300. $g5k3r := 0
  3301. while ($g5k3r<num_elements(%mmgl1))
  3302. %xwg5s[530+$g5k3r] := %mmgl1[$g5k3r]
  3303. %cqg2m[53] := 4
  3304. inc($g5k3r)
  3305. end while
  3306. declare ui_switch $dyo2q
  3307. make_persistent($dyo2q)
  3308. set_control_par_str(get_ui_id($dyo2q),$CONTROL_PAR_TEXT,"")
  3309. set_control_par_str(get_ui_id($dyo2q),$CONTROL_PAR_PICTURE,"GE_SMPL_KT_BTN")
  3310. $g5k3r := 0
  3311. while (%xwg5s[250+$g5k3r]>0 and ($g5k3r<10))
  3312. inc($g5k3r)
  3313. end while
  3314. %xwg5s[250+$g5k3r] := get_ui_id($dyo2q)
  3315. declare %1iv2s[2]
  3316. make_instr_persistent(%1iv2s)
  3317. declare ui_switch $linka
  3318. make_persistent($linka)
  3319. set_control_par_str(get_ui_id($linka),$CONTROL_PAR_TEXT,"")
  3320. set_control_par_str(get_ui_id($linka),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_0")
  3321. $g5k3r := 0
  3322. while (%xwg5s[40+$g5k3r]>0 and ($g5k3r<10))
  3323. inc($g5k3r)
  3324. end while
  3325. %xwg5s[40+$g5k3r] := get_ui_id($linka)
  3326. declare ui_switch $lk05f
  3327. make_persistent($lk05f)
  3328. set_control_par_str(get_ui_id($lk05f),$CONTROL_PAR_TEXT,"")
  3329. set_control_par_str(get_ui_id($lk05f),$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_0")
  3330. declare ui_menu $2qtv2
  3331. make_persistent($2qtv2)
  3332. set_control_par_str(get_ui_id($2qtv2),$CONTROL_PAR_PICTURE,"blank")
  3333. declare ui_button $hmrz5
  3334. set_control_par_str(get_ui_id($hmrz5),$CONTROL_PAR_TEXT,"")
  3335. set_control_par_str(get_ui_id($hmrz5),$CONTROL_PAR_PICTURE,"GE_Prev_btn_00")
  3336. declare ui_button $4cstx
  3337. set_control_par_str(get_ui_id($4cstx),$CONTROL_PAR_TEXT,"")
  3338. set_control_par_str(get_ui_id($4cstx),$CONTROL_PAR_PICTURE,"GE_Next_btn_00")
  3339. declare %kxrj2[4] := (get_ui_id($lk05f), get_ui_id($2qtv2), get_ui_id($hmrz5), get_ui_id($4cstx))
  3340. $g5k3r := 0
  3341. while ($g5k3r<num_elements(%kxrj2))
  3342. %xwg5s[260+$g5k3r] := %kxrj2[$g5k3r]
  3343. %cqg2m[26] := 4
  3344. inc($g5k3r)
  3345. end while
  3346. declare ui_level_meter $wawce
  3347. set_control_par(get_ui_id($wawce),$CONTROL_PAR_VERTICAL,1)
  3348. attach_level_meter(get_ui_id($wawce),-1,-1,0,0)
  3349. declare ui_level_meter $a0f5t
  3350. set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_VERTICAL,1)
  3351. attach_level_meter(get_ui_id($a0f5t),-1,-1,1,0)
  3352. declare ui_level_meter $l45sn
  3353. set_control_par(get_ui_id($l45sn),$CONTROL_PAR_VERTICAL,1)
  3354. attach_level_meter(get_ui_id($l45sn),-1,-1,0,1)
  3355. declare ui_level_meter $ewm0k
  3356. set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_VERTICAL,1)
  3357. attach_level_meter(get_ui_id($ewm0k),-1,-1,1,1)
  3358. $g5k3r := 0
  3359. while (%xwg5s[180+$g5k3r]>0 and ($g5k3r<10))
  3360. inc($g5k3r)
  3361. end while
  3362. %xwg5s[180+$g5k3r] := get_ui_id($wawce)
  3363. $g5k3r := 0
  3364. while (%xwg5s[180+$g5k3r]>0 and ($g5k3r<10))
  3365. inc($g5k3r)
  3366. end while
  3367. %xwg5s[180+$g5k3r] := get_ui_id($a0f5t)
  3368. $g5k3r := 0
  3369. while (%xwg5s[190+$g5k3r]>0 and ($g5k3r<10))
  3370. inc($g5k3r)
  3371. end while
  3372. %xwg5s[190+$g5k3r] := get_ui_id($l45sn)
  3373. $g5k3r := 0
  3374. while (%xwg5s[190+$g5k3r]>0 and ($g5k3r<10))
  3375. inc($g5k3r)
  3376. end while
  3377. %xwg5s[190+$g5k3r] := get_ui_id($ewm0k)
  3378. declare $tmkul := 0
  3379. declare $tpui1 := 1
  3380. declare $iva44
  3381. declare $tsm3s
  3382. declare %sef3k[128] := (-1)
  3383. declare %medyt[128] := (-1)
  3384. declare %lx5kr[128] := (-1)
  3385. declare $h3axx
  3386. declare %srzwv[128] := (-1)
  3387. declare $rf3ya
  3388. declare $sgrou
  3389. declare ui_switch $2zs5k
  3390. make_persistent($2zs5k)
  3391. $g5k3r := 0
  3392. while (%xwg5s[10+$g5k3r]>0 and ($g5k3r<10))
  3393. inc($g5k3r)
  3394. end while
  3395. %xwg5s[10+$g5k3r] := get_ui_id($2zs5k)
  3396. set_control_par_str(get_ui_id($2zs5k),$CONTROL_PAR_TEXT,"")
  3397. set_control_par_str(get_ui_id($2zs5k),$CONTROL_PAR_PICTURE,"GE_KT_BTN")
  3398. declare ui_menu $swg5e
  3399. make_persistent($swg5e)
  3400. $g5k3r := 0
  3401. while (%xwg5s[70+$g5k3r]>0 and ($g5k3r<10))
  3402. inc($g5k3r)
  3403. end while
  3404. %xwg5s[70+$g5k3r] := get_ui_id($swg5e)
  3405. $fg4rw := -4
  3406. while ($fg4rw<=4)
  3407. add_menu_item($swg5e,"Form. " & (-$fg4rw*3),-$fg4rw*3)
  3408. inc($fg4rw)
  3409. end while
  3410. set_control_par_str(get_ui_id($swg5e),$CONTROL_PAR_PICTURE,"blank")
  3411. declare %g_frm_shft[264]
  3412. load_array(%g_frm_shft,2)
  3413. declare $oxfyj
  3414. declare $qfspw
  3415. declare $ygbzd
  3416. declare $pfgf4
  3417. declare %mc3xd[16]
  3418. declare $pdzso
  3419. declare $hqjjl
  3420. declare $gcqjr
  3421. declare %hrm2k[96]
  3422. declare %k0ra5[96]
  3423. declare $fijbx
  3424. declare $auli3
  3425. declare %std_smp_l_grp[365] := (-1)
  3426. load_array_str(%std_smp_l_grp,@ugwfc & "std_smp_l_grp.nka")
  3427. %std_smp_l_grp[1] := 1500
  3428. %std_smp_l_grp[5] := 4000
  3429. %std_smp_l_grp[12] := 7000
  3430. %std_smp_l_grp[17] := 7000
  3431. %std_smp_l_grp[18] := 7000
  3432. %std_smp_l_grp[19] := 3500
  3433. %std_smp_l_grp[21] := 7000
  3434. %std_smp_l_grp[24] := 4100
  3435. %std_smp_l_grp[26] := 4000
  3436. %std_smp_l_grp[29] := 6000
  3437. %std_smp_l_grp[31] := 10000
  3438. %std_smp_l_grp[32] := 3000
  3439. %std_smp_l_grp[36] := 7000
  3440. %std_smp_l_grp[40] := 25000
  3441. %std_smp_l_grp[49] := 800
  3442. %std_smp_l_grp[53] := 10000
  3443. %std_smp_l_grp[56] := 1000
  3444. %std_smp_l_grp[58] := 1000
  3445. declare %0wsff[128]
  3446. declare polyphonic $gj552
  3447. declare polyphonic $q2v0i
  3448. declare polyphonic $lgveb
  3449. declare polyphonic $cgeby
  3450. declare $tjpb1
  3451. declare $kexsv
  3452. declare $wfzez
  3453. declare $i11wt
  3454. declare $wo1eq
  3455. declare $uiy0n
  3456. declare $whs1s
  3457. declare $y4ap3
  3458. declare polyphonic $mkoi4
  3459. declare polyphonic $jwx5k
  3460. declare $wmznm
  3461. declare $ma1nd
  3462. declare ~tptmd
  3463. declare $gnlj2
  3464. make_persistent($gnlj2)
  3465. declare $pqpgc
  3466. declare $y1zim
  3467. declare polyphonic $t4gop
  3468. declare polyphonic $h4bci
  3469. declare polyphonic $1wd3b
  3470. declare polyphonic $f2ujt
  3471. declare $ottdr
  3472. declare $hqznn
  3473. declare polyphonic $gm014
  3474. declare $0e0hy
  3475. declare ui_switch $ord01
  3476. make_persistent($ord01)
  3477. set_control_par_str(get_ui_id($ord01),$CONTROL_PAR_TEXT,"")
  3478. set_control_par_str(get_ui_id($ord01),$CONTROL_PAR_PICTURE,"MonoPolyBtn")
  3479. declare $n0uzs := -1
  3480. declare ui_switch $xc3po
  3481. make_persistent($xc3po)
  3482. set_control_par_str(get_ui_id($xc3po),$CONTROL_PAR_TEXT,"")
  3483. set_control_par_str(get_ui_id($xc3po),$CONTROL_PAR_PICTURE,"GE_FREE_btn")
  3484. declare ui_menu $va2lk
  3485. make_persistent($va2lk)
  3486. add_menu_item($va2lk,"Continue",0)
  3487. add_menu_item($va2lk,"Force Cursor Left",-1)
  3488. add_menu_item($va2lk,"Force Cursor Right",1)
  3489. set_control_par_str(get_ui_id($va2lk),$CONTROL_PAR_PICTURE,"blank")
  3490. $g5k3r := 0
  3491. while (%xwg5s[140+$g5k3r]>0 and ($g5k3r<10))
  3492. inc($g5k3r)
  3493. end while
  3494. %xwg5s[140+$g5k3r] := get_ui_id($va2lk)
  3495. declare ui_switch $k21jk
  3496. make_persistent($k21jk)
  3497. set_control_par_str(get_ui_id($k21jk),$CONTROL_PAR_TEXT,"")
  3498. set_control_par_str(get_ui_id($k21jk),$CONTROL_PAR_PICTURE,"GE_Link_btn")
  3499. declare $wuu5g
  3500. declare %smp_l_grp[601]
  3501. load_array(%smp_l_grp,2)
  3502. declare %is_mono_src[601] := (1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0, 0, 1, 1, ...
  3503. 1, 1, 1, 1, 1, 0, 1, 1, 0, 0)
  3504. load_array(%is_mono_src,2)
  3505. if (pgs_key_exists(PGS_FUNC))
  3506. pgs_create_key(PGS_FUNC,3)
  3507. end if
  3508. set_num_user_zones(2)
  3509. set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_GROUP,363)
  3510. set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_LOW_KEY,0)
  3511. set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_HIGH_KEY,127)
  3512. set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_HIGH_VELO,127)
  3513. set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_LOW_KEY,0)
  3514. set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_GROUP,364)
  3515. set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_LOW_KEY,0)
  3516. set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_HIGH_KEY,127)
  3517. set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_HIGH_VELO,127)
  3518. set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_LOW_KEY,0)
  3519. declare %tuuuf[365]
  3520. declare %zone_id_C3[365]
  3521. load_array(%zone_id_C3,2)
  3522. %zone_id_C3[363] := %NI_USER_ZONE_IDS[0]
  3523. %zone_id_C3[364] := %NI_USER_ZONE_IDS[1]
  3524. declare $51oxm
  3525. make_persistent($51oxm)
  3526. declare ui_button $1c3gj
  3527. set_control_par_str(get_ui_id($1c3gj),$CONTROL_PAR_TEXT,"")
  3528. set_control_par_str(get_ui_id($1c3gj),$CONTROL_PAR_PICTURE,"blank")
  3529. declare ui_label $uekic(1, 1)
  3530. set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"")
  3531. set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_PICTURE,"blank")
  3532. declare ui_button $udker
  3533. set_control_par_str(get_ui_id($udker),$CONTROL_PAR_TEXT,"")
  3534. declare ui_button $2ch0u
  3535. set_control_par_str(get_ui_id($2ch0u),$CONTROL_PAR_TEXT,"")
  3536. declare ui_switch $spdyk
  3537. make_persistent($spdyk)
  3538. set_control_par_str(get_ui_id($spdyk),$CONTROL_PAR_HELP,"ALT CLick to toogle between previously selected grain source")
  3539. set_control_par_str(get_ui_id($spdyk),$CONTROL_PAR_TEXT,"")
  3540. declare %jjhsv[5] := (get_ui_id($spdyk), get_ui_id($1c3gj), get_ui_id($udker), get_ui_id($2ch0u), get_ui_id($uekic))
  3541. $g5k3r := 0
  3542. while ($g5k3r<num_elements(%jjhsv))
  3543. %xwg5s[440+$g5k3r] := %jjhsv[$g5k3r]
  3544. %cqg2m[44] := 519
  3545. inc($g5k3r)
  3546. end while
  3547. declare ui_button $a2kga
  3548. set_control_par_str(get_ui_id($a2kga),$CONTROL_PAR_TEXT,"")
  3549. set_control_par_str(get_ui_id($a2kga),$CONTROL_PAR_PICTURE,"blank")
  3550. %xwg5s[1410] := get_ui_id($a2kga)
  3551. %cqg2m[141] := 4
  3552. declare ui_button $rppxv
  3553. set_control_par_str(get_ui_id($rppxv),$CONTROL_PAR_TEXT,"")
  3554. set_control_par_str(get_ui_id($rppxv),$CONTROL_PAR_PICTURE,"blank")
  3555. %xwg5s[1420] := get_ui_id($rppxv)
  3556. %cqg2m[142] := 2
  3557. declare $hdmk1
  3558. make_persistent($hdmk1)
  3559. declare ui_button $mm1ti
  3560. set_control_par_str(get_ui_id($mm1ti),$CONTROL_PAR_TEXT,"")
  3561. set_control_par_str(get_ui_id($mm1ti),$CONTROL_PAR_PICTURE,"GE_BLANK_HOVER_BTN_S_0")
  3562. declare ui_label $anchr(1, 1)
  3563. set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"")
  3564. set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_PICTURE,"GE_SMPL_SRC_NAMES_0")
  3565. declare ui_switch $t4vew
  3566. make_persistent($t4vew)
  3567. set_control_par_str(get_ui_id($t4vew),$CONTROL_PAR_TEXT,"")
  3568. declare ui_button $3r1av
  3569. set_control_par_str(get_ui_id($3r1av),$CONTROL_PAR_TEXT,"")
  3570. declare ui_button $0l4xe
  3571. set_control_par_str(get_ui_id($0l4xe),$CONTROL_PAR_TEXT,"")
  3572. declare %fbbyi[5] := (get_ui_id($t4vew), get_ui_id($mm1ti), get_ui_id($3r1av), get_ui_id($0l4xe), get_ui_id($anchr))
  3573. $g5k3r := 0
  3574. while ($g5k3r<num_elements(%fbbyi))
  3575. %xwg5s[450+$g5k3r] := %fbbyi[$g5k3r]
  3576. %cqg2m[45] := 519
  3577. inc($g5k3r)
  3578. end while
  3579. declare ui_switch $mcp2m
  3580. make_persistent($mcp2m)
  3581. set_control_par_str(get_ui_id($mcp2m),$CONTROL_PAR_TEXT,"")
  3582. set_control_par_str(get_ui_id($mcp2m),$CONTROL_PAR_PICTURE,"GE_SMPLE_PB_MODE")
  3583. %xwg5s[1500] := get_ui_id($mcp2m)
  3584. %cqg2m[150] := 4
  3585. declare ?xpxzm[256]
  3586. declare %preset[10000]
  3587. make_persistent(%preset)
  3588. declare $d1d43 := -1
  3589. declare $oppog := 0
  3590. declare $cz3ou := 0
  3591. declare $verq0 := 0
  3592. declare ~bsfi3
  3593. declare ui_waveform $4lo3h(6, 6)
  3594. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_BG_ALPHA,0)
  3595. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_BG_COLOR,16777215)
  3596. declare %kte0r[10]
  3597. declare ui_label $lo5d2(1, 1)
  3598. declare ui_label $sc1px(1, 1)
  3599. declare ui_label $hdd2j(1, 1)
  3600. declare ui_label $eqzdl(1, 1)
  3601. declare ui_label $mzaik(1, 1)
  3602. declare ui_label $dbwu0(1, 1)
  3603. declare ui_label $lhztu(1, 1)
  3604. declare ui_label $b54hw(1, 1)
  3605. declare ui_label $hgla5(1, 1)
  3606. declare ui_label $nmdly(1, 1)
  3607. $pvuhq := 0
  3608. while ($pvuhq<=9)
  3609. %kte0r[$pvuhq] := get_ui_id($lo5d2)+$pvuhq
  3610. inc($pvuhq)
  3611. end while
  3612. $fg4rw := 0
  3613. while ($fg4rw<10)
  3614. set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_POS_X,20)
  3615. set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_POS_Y,57)
  3616. set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_WIDTH,1)
  3617. set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_HEIGHT,107)
  3618. set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  3619. set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_Z_LAYER,0)
  3620. set_control_par_str(%kte0r[$fg4rw],$CONTROL_PAR_TEXT,"")
  3621. set_control_par_str(%kte0r[$fg4rw],$CONTROL_PAR_PICTURE,"GE_GRAIN_CURSOR")
  3622. inc($fg4rw)
  3623. end while
  3624. declare $er442
  3625. declare %dz3eb[10]
  3626. declare ui_xy ?51qxr[2]
  3627. set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_MOUSE_MODE,2)
  3628. set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_MOUSE_BEHAVIOUR_X,1000)
  3629. set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_MOUSE_BEHAVIOUR_Y,1000)
  3630. set_control_par_str(get_ui_id(?51qxr),$CONTROL_PAR_CURSOR_PICTURE,"GE_g_wf_xy_blank")
  3631. set_control_par_arr(get_ui_id(?xy),$CONTROL_PAR_ALLOW_AUTOMATION,0,0)
  3632. set_control_par_arr(get_ui_id(?xy),$CONTROL_PAR_ALLOW_AUTOMATION,1,0)
  3633. declare ~chanf
  3634. declare $xpd30
  3635. declare $eyamh
  3636. declare $bygzx
  3637. declare $v5b0i
  3638. declare $r5war
  3639. declare $3rm1t := -2
  3640. declare $ukkxs
  3641. declare $pilpf
  3642. declare ui_button $hnp3t
  3643. set_control_par_str(get_ui_id($hnp3t),$CONTROL_PAR_TEXT,"")
  3644. declare ui_button $q3vtp
  3645. set_control_par_str(get_ui_id($q3vtp),$CONTROL_PAR_TEXT,"")
  3646. declare ui_label $q5i1b(1, 1)
  3647. set_control_par_str(get_ui_id($q5i1b),$CONTROL_PAR_TEXT,"")
  3648. set_control_par_str(get_ui_id($q5i1b),$CONTROL_PAR_PICTURE,"GE_POS_SYNC_ANKER")
  3649. declare ui_label $rbfcs(1, 1)
  3650. set_control_par_str(get_ui_id($rbfcs),$CONTROL_PAR_TEXT,"")
  3651. set_control_par_str(get_ui_id($rbfcs),$CONTROL_PAR_PICTURE,"GE_SYNC_RANGE")
  3652. declare ui_mouse_area $v3pyu
  3653. set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_DND_ACCEPT_AUDIO,$NI_DND_ACCEPT_ONE)
  3654. set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_RECEIVE_DRAG_EVENTS,1)
  3655. declare $zylsx
  3656. declare @4xudw
  3657. make_persistent(@4xudw)
  3658. declare @vzouq
  3659. make_persistent(@vzouq)
  3660. declare ~spjzv := 0.0
  3661. make_persistent(~spjzv)
  3662. declare ~fbacu := 0.0
  3663. make_persistent(~fbacu)
  3664. declare $lxku3
  3665. declare $4l4u3
  3666. declare ui_slider $aewcf(0, 127)
  3667. make_persistent($aewcf)
  3668. set_control_par(get_ui_id($aewcf),$CONTROL_PAR_DEFAULT_VALUE,60)
  3669. set_control_par_str(get_ui_id($aewcf),$CONTROL_PAR_PICTURE,"GE_Note_Names")
  3670. declare ui_button $wzxlg
  3671. set_control_par_str(get_ui_id($wzxlg),$CONTROL_PAR_TEXT,"")
  3672. set_control_par_str(get_ui_id($wzxlg),$CONTROL_PAR_PICTURE,"g_voices_up_btn")
  3673. declare ui_button $r5bjx
  3674. set_control_par_str(get_ui_id($r5bjx),$CONTROL_PAR_TEXT,"")
  3675. set_control_par_str(get_ui_id($r5bjx),$CONTROL_PAR_PICTURE,"g_voices_dn_btn")
  3676. declare %uvj1f[10] := (get_ui_id($4lo3h), get_ui_id($hnp3t), get_ui_id($q3vtp), get_ui_id(?51qxr), get_ui_id($q5i1b), get_ui_id($rbfcs), get_ui_id($aewcf), get_ui_id($wzxlg), get_ui_id($r5bjx), get_ui_id($v3pyu))
  3677. $g5k3r := 0
  3678. while ($g5k3r<num_elements(%uvj1f))
  3679. %xwg5s[570+$g5k3r] := %uvj1f[$g5k3r]
  3680. %cqg2m[57] := 514
  3681. inc($g5k3r)
  3682. end while
  3683. declare ui_value_edit $y1mc2(1, 16, 1)
  3684. make_persistent($y1mc2)
  3685. set_control_par_str(get_ui_id($y1mc2),$CONTROL_PAR_TEXT,"")
  3686. set_control_par_str(get_ui_id($y1mc2),$CONTROL_PAR_PICTURE,"blank")
  3687. set_control_par(get_ui_id($y1mc2),$CONTROL_PAR_SHOW_ARROWS,0)
  3688. declare ui_button $fdz1c
  3689. set_control_par_str(get_ui_id($fdz1c),$CONTROL_PAR_TEXT,"")
  3690. set_control_par_str(get_ui_id($fdz1c),$CONTROL_PAR_PICTURE,"g_voices_up_btn")
  3691. declare ui_button $b2d3h
  3692. set_control_par_str(get_ui_id($b2d3h),$CONTROL_PAR_TEXT,"")
  3693. set_control_par_str(get_ui_id($b2d3h),$CONTROL_PAR_PICTURE,"g_voices_dn_btn")
  3694. declare ?qedta[29] := (0.005208333333333333, 0.005859375, 0.0078125, 0.010416666666666666, 0.01171875, 0.015625, 0.020833333333333332, 0.0234375, 0.03125, 0.041666666666666664, 0.046875, 0.0625, 0.08333333333333333, 0.09375, 0.125, 0.16666666666666666, 0.1875, 0.2, 0.25, 0.3333333333333333, 0.375, 0.5, 0.6666666666666666, 0.75, 1.0, 1.5, 2.0, 3.0, -1.0)
  3695. declare !qeoj3[29]
  3696. !qeoj3[0] := "1/512 trip"
  3697. !qeoj3[1] := "1/1024 dot"
  3698. !qeoj3[2] := "1/512"
  3699. !qeoj3[3] := "1/256 trip"
  3700. !qeoj3[4] := "1/512 dot"
  3701. !qeoj3[5] := "1/256"
  3702. !qeoj3[6] := "1/128 trip"
  3703. !qeoj3[7] := "1/256 dot"
  3704. !qeoj3[8] := "1/128"
  3705. !qeoj3[9] := "1/64 trip"
  3706. !qeoj3[10] := "1/128 dot"
  3707. !qeoj3[11] := "1/64"
  3708. !qeoj3[12] := "1/32 trip"
  3709. !qeoj3[13] := "1/64 dot"
  3710. !qeoj3[14] := "1/32"
  3711. !qeoj3[15] := "1/16 trip"
  3712. !qeoj3[16] := "1/32 dot"
  3713. !qeoj3[17] := "4/5"
  3714. !qeoj3[18] := "1/16"
  3715. !qeoj3[19] := "1/8 trip"
  3716. !qeoj3[20] := "1/16 dot"
  3717. !qeoj3[21] := "1/8"
  3718. !qeoj3[22] := "1/4 trip"
  3719. !qeoj3[23] := "1/8 dot"
  3720. !qeoj3[24] := "1/4"
  3721. !qeoj3[25] := "1/4 dot"
  3722. !qeoj3[26] := "1/2"
  3723. !qeoj3[27] := "3/4"
  3724. !qeoj3[28] := "1 Bar"
  3725. declare $gv5ha
  3726. declare %pzp2y[2]
  3727. make_instr_persistent(%pzp2y)
  3728. declare ui_switch $p5wl1
  3729. make_persistent($p5wl1)
  3730. set_control_par_str(get_ui_id($p5wl1),$CONTROL_PAR_TEXT,"")
  3731. set_control_par_str(get_ui_id($p5wl1),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_0")
  3732. $g5k3r := 0
  3733. while (%xwg5s[$g5k3r]>0 and ($g5k3r<10))
  3734. inc($g5k3r)
  3735. end while
  3736. %xwg5s[$g5k3r] := get_ui_id($p5wl1)
  3737. declare $b1esx
  3738. declare $xrt5z
  3739. make_persistent($xrt5z)
  3740. declare ui_switch $neagb
  3741. make_persistent($neagb)
  3742. set_control_par_str(get_ui_id($neagb),$CONTROL_PAR_TEXT,"")
  3743. set_control_par_str(get_ui_id($neagb),$CONTROL_PAR_PICTURE,"GE_bounce_btn")
  3744. declare %zwhw5[7] := (get_ui_id($k21jk), get_ui_id($neagb), get_ui_id($ord01), get_ui_id($xc3po), get_ui_id($y1mc2), get_ui_id($fdz1c), get_ui_id($b2d3h))
  3745. $g5k3r := 0
  3746. while ($g5k3r<num_elements(%zwhw5))
  3747. %xwg5s[560+$g5k3r] := %zwhw5[$g5k3r]
  3748. %cqg2m[56] := 2
  3749. inc($g5k3r)
  3750. end while
  3751. declare ui_waveform $tmcuy(6, 6)
  3752. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_BG_ALPHA,0)
  3753. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_BG_COLOR,16777215)
  3754. declare ui_xy ?3lzme[2]
  3755. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_MOUSE_MODE,2)
  3756. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_MOUSE_BEHAVIOUR_X,1000)
  3757. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_MOUSE_BEHAVIOUR_Y,1000)
  3758. set_control_par_str(get_ui_id(?3lzme),$CONTROL_PAR_CURSOR_PICTURE,"GE_g_wf_xy_blank")
  3759. declare $rlhoi
  3760. declare ui_label $brjbw(1, 1)
  3761. set_control_par_str(get_ui_id($brjbw),$CONTROL_PAR_TEXT,"Mono")
  3762. set_control_par_str(get_ui_id($brjbw),$CONTROL_PAR_PICTURE,"blank")
  3763. declare ui_label $rgqvn(1, 1)
  3764. set_control_par_str(get_ui_id($rgqvn),$CONTROL_PAR_TEXT,"")
  3765. set_control_par_str(get_ui_id($rgqvn),$CONTROL_PAR_PICTURE,"GE_START_POINT_IND_SMPL_0")
  3766. declare ui_label $k5o2p(1, 1)
  3767. set_control_par_str(get_ui_id($k5o2p),$CONTROL_PAR_TEXT,"")
  3768. set_control_par_str(get_ui_id($k5o2p),$CONTROL_PAR_PICTURE,"GE_START_RANGE_IND_SMPL")
  3769. declare ui_mouse_area $fi22y
  3770. set_control_par(get_ui_id($fi22y),$CONTROL_PAR_DND_ACCEPT_AUDIO,$NI_DND_ACCEPT_ONE)
  3771. set_control_par(get_ui_id($fi22y),$CONTROL_PAR_RECEIVE_DRAG_EVENTS,1)
  3772. declare $nfr15
  3773. declare @g233i
  3774. make_persistent(@g233i)
  3775. declare @bnt5b
  3776. make_persistent(@bnt5b)
  3777. declare ~qzdh0 := 0.0
  3778. make_persistent(~qzdh0)
  3779. declare ~rhrbs := 0.0
  3780. make_persistent(~rhrbs)
  3781. declare $x1spm
  3782. declare ui_slider $v3y5j(0, 127)
  3783. make_persistent($v3y5j)
  3784. set_control_par(get_ui_id($v3y5j),$CONTROL_PAR_DEFAULT_VALUE,60)
  3785. set_control_par_str(get_ui_id($v3y5j),$CONTROL_PAR_PICTURE,"GE_Note_Names")
  3786. declare ui_button $ozbon
  3787. set_control_par_str(get_ui_id($ozbon),$CONTROL_PAR_TEXT,"")
  3788. set_control_par_str(get_ui_id($ozbon),$CONTROL_PAR_PICTURE,"g_voices_up_btn")
  3789. declare ui_button $uceyz
  3790. set_control_par_str(get_ui_id($uceyz),$CONTROL_PAR_TEXT,"")
  3791. set_control_par_str(get_ui_id($uceyz),$CONTROL_PAR_PICTURE,"g_voices_dn_btn")
  3792. declare $a5fyp
  3793. declare $kzyw4 := -2
  3794. declare $lrye0
  3795. declare %oe0tb[9] := (get_ui_id($tmcuy), get_ui_id($brjbw), get_ui_id($rgqvn), get_ui_id($k5o2p), get_ui_id($fi22y), get_ui_id($v3y5j), get_ui_id($ozbon), get_ui_id($uceyz), get_ui_id(?3lzme))
  3796. $g5k3r := 0
  3797. while ($g5k3r<num_elements(%oe0tb))
  3798. %xwg5s[240+$g5k3r] := %oe0tb[$g5k3r]
  3799. %cqg2m[24] := 516
  3800. inc($g5k3r)
  3801. end while
  3802. declare $tkfsc
  3803. declare $xoacb
  3804. declare ?uya1g[128] := (32.0, 30.203978005814196, 28.50875898049085, 26.908685288118868, 25.398416831491197, 23.9729132300269, 22.62741699796952, 21.357437666720553, 20.158736798317967, 19.027313840043536, 17.959392772949972, 16.95140950974872, 16.0, 15.101989002907095, 14.254379490245432, 13.454342644059434, 12.699208415745595, 11.986456615013454, 11.31370849898476, 10.678718833360273, 10.079368399158986, 9.513656920021768, 8.979696386474982, 8.475704754874362, 8.0, 7.550994501453547, 7.127189745122716, 6.727171322029717, 6.3496042078727974, 5.993228307506727, 5.65685424949238, 5.339359416680137, 5.039684199579493, 4.756828460010884, 4.489848193237491, 4.237852377437181, 4.0, 3.7754972507267737, 3.563594872561357, 3.3635856610148585, 3.1748021039363987, ...
  3805. 2.996614153753363, 2.82842712474619, 2.6696797083400687, 2.519842099789746, 2.378414230005442, 2.244924096618746, 2.1189261887185906, 2.0, 1.8877486253633868, 1.7817974362806785, 1.6817928305074292, 1.5874010519681994, 1.4983070768766815, 1.414213562373095, 1.3348398541700344, 1.259921049894873, 1.189207115002721, 1.122462048309373, 1.0594630943592953, 1.0, 0.9438743126816934, 0.8908987181403393, 0.8408964152537146, 0.7937005259840997, 0.7491535384383408, 0.7071067811865475, 0.6674199270850172, 0.6299605249474366, 0.5946035575013605, 0.5612310241546865, 0.5297315471796477, 0.5, 0.4719371563408467, 0.44544935907016964, 0.4204482076268573, 0.39685026299204984, 0.3745767692191704, 0.35355339059327373, 0.3337099635425086, 0.31498026247371824, ...
  3806. 0.29730177875068026, 0.28061551207734325, 0.2648657735898238, 0.25, 0.23596857817042335, 0.22272467953508487, 0.21022410381342865, 0.19842513149602492, 0.18728838460958522, 0.17677669529663687, 0.16685498177125427, 0.15749013123685915, 0.14865088937534013, 0.1403077560386716, 0.1324328867949119, 0.125, 0.11798428908521168, 0.11136233976754244, 0.10511205190671433, 0.09921256574801246, 0.09364419230479261, 0.08838834764831843, 0.08342749088562713, 0.07874506561842957, 0.07432544468767006, 0.0701538780193358, 0.06621644339745596, 0.0625, 0.05899214454260585, 0.05568116988377119, 0.05255602595335716, 0.049606282874006244, 0.04682209615239629, 0.044194173824159216, 0.04171374544281358, 0.03937253280921478, 0.03716272234383503, 0.035076939009667914, 0.03310822169872797, 0.03125, ...
  3807. 0.029496072271302926, 0.027840584941885595, 0.02627801297667858, 0.024803141437003122, 0.023411048076198145, 0.022097086912079608, 0.02085687272140679)
  3808. declare %_rootkey_offset_for_note[33792]
  3809. load_array(%_rootkey_offset_for_note,2)
  3810. declare $afnek := 0
  3811. declare $1sqif := -8000
  3812. declare %dhweu[2000]
  3813. if (1=1)
  3814. declare @pua5f
  3815. @pua5f := get_folder($GET_FOLDER_LIBRARY_DIR) & "Samples/" & "Data/SNAPSHOTS/"
  3816. declare $421rl
  3817. make_persistent($421rl)
  3818. declare @3cyqr
  3819. make_persistent(@3cyqr)
  3820. read_persistent_var(@3cyqr)
  3821. declare @cs0dz
  3822. make_persistent(@cs0dz)
  3823. read_persistent_var(@cs0dz)
  3824. declare $luyp1
  3825. declare ui_button $ojlo0
  3826. set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,@cs0dz)
  3827. set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_PICTURE,"blank")
  3828. declare ui_switch $0efsn
  3829. set_control_par_str(get_ui_id($0efsn),$CONTROL_PAR_TEXT,"")
  3830. set_control_par_str(get_ui_id($0efsn),$CONTROL_PAR_PICTURE,"GE_Next_btn_00")
  3831. declare ui_switch $mb40x
  3832. set_control_par_str(get_ui_id($mb40x),$CONTROL_PAR_TEXT,"")
  3833. set_control_par_str(get_ui_id($mb40x),$CONTROL_PAR_PICTURE,"GE_Prev_btn_00")
  3834. declare %wo0a3[3] := (get_ui_id($ojlo0), get_ui_id($0efsn), get_ui_id($mb40x))
  3835. $g5k3r := 0
  3836. while ($g5k3r<num_elements(%wo0a3))
  3837. %xwg5s[1380+$g5k3r] := %wo0a3[$g5k3r]
  3838. %cqg2m[138] := 527
  3839. inc($g5k3r)
  3840. end while
  3841. declare @4ll3e
  3842. @4ll3e := get_folder($GET_FOLDER_LIBRARY_DIR) & "Samples/" & "Data/"
  3843. declare %blrx5[6] := (6, 6, 4, 13, 13, 14)
  3844. declare %pjbav[3] := (6, 6, 4)
  3845. declare $lz0yu
  3846. declare $rc1ud
  3847. declare $lpg20
  3848. declare $zor2m
  3849. declare $4ut4g
  3850. declare $5nvbg
  3851. declare $ax53k
  3852. declare $hb51u
  3853. declare $uciwo := 1
  3854. declare $ygbjm
  3855. declare %djxm0[72]
  3856. declare ui_button $4yej1
  3857. declare ui_button $rdzvq
  3858. declare ui_button $ecjm3
  3859. declare ui_button $032h0
  3860. declare ui_button $djvko
  3861. declare ui_button $bmyvz
  3862. declare ui_button $3hydy
  3863. declare ui_button $bcw1j
  3864. declare ui_button $y4p3i
  3865. declare ui_button $f1hl5
  3866. declare ui_button $h23p3
  3867. declare ui_button $0blpx
  3868. declare ui_button $24ihv
  3869. declare ui_button $wzy03
  3870. declare ui_button $hz0mw
  3871. declare ui_button $4tphh
  3872. declare ui_button $0dern
  3873. declare ui_button $v0bpc
  3874. declare ui_button $rtumo
  3875. declare ui_button $4yeq1
  3876. declare ui_button $32nru
  3877. declare ui_button $mzanj
  3878. declare ui_button $oevzy
  3879. declare ui_button $gk2v5
  3880. declare ui_button $ojx3k
  3881. declare ui_button $dyw32
  3882. declare ui_button $brxm1
  3883. declare ui_button $al5ta
  3884. declare ui_button $xsyba
  3885. declare ui_button $5cb23
  3886. declare ui_button $khuwm
  3887. declare ui_button $gucms
  3888. declare ui_button $ivqsn
  3889. declare ui_button $gcccz
  3890. declare ui_button $cs03b
  3891. declare ui_button $5imez
  3892. declare ui_button $gnnlh
  3893. declare ui_button $ttgfi
  3894. declare ui_button $0r5xb
  3895. declare ui_button $f5qo5
  3896. declare ui_button $t1rbt
  3897. declare ui_button $pxzz3
  3898. declare ui_button $eezgv
  3899. declare ui_button $xfckc
  3900. declare ui_button $xbrfy
  3901. declare ui_button $ucgwt
  3902. declare ui_button $y1sxa
  3903. declare ui_button $wuqce
  3904. declare ui_button $nb0wk
  3905. declare ui_button $dwlt2
  3906. declare ui_button $rkmzj
  3907. declare ui_button $4kviy
  3908. declare ui_button $0sgpg
  3909. declare ui_button $u2hf0
  3910. declare ui_button $pvrz1
  3911. declare ui_button $na0ji
  3912. declare ui_button $qysdx
  3913. declare ui_button $etjre
  3914. declare ui_button $wovls
  3915. declare ui_button $baopj
  3916. declare ui_button $ncdss
  3917. declare ui_button $jde44
  3918. declare ui_button $ypsjd
  3919. declare ui_button $uz02i
  3920. declare ui_button $3kkcw
  3921. declare ui_button $n01mf
  3922. declare ui_button $2lp4m
  3923. declare ui_button $nohrb
  3924. declare ui_button $3mr2k
  3925. declare ui_button $1c3mu
  3926. declare ui_button $rmz1j
  3927. declare ui_button $tipqk
  3928. $pvuhq := 0
  3929. while ($pvuhq<=71)
  3930. %djxm0[$pvuhq] := get_ui_id($4yej1)+$pvuhq
  3931. inc($pvuhq)
  3932. end while
  3933. declare %wqnrl[19]
  3934. declare ui_button $0ux1w
  3935. declare ui_button $nlbcz
  3936. declare ui_button $md33w
  3937. declare ui_button $pzuhn
  3938. declare ui_button $ec44j
  3939. declare ui_button $g5ega
  3940. declare ui_button $ospiy
  3941. declare ui_button $cryss
  3942. declare ui_button $odkxk
  3943. declare ui_button $1d1qv
  3944. declare ui_button $j41z3
  3945. declare ui_button $0hw3x
  3946. declare ui_button $rttry
  3947. declare ui_button $ume1e
  3948. declare ui_button $acigq
  3949. declare ui_button $fal5w
  3950. declare ui_button $u4kkx
  3951. declare ui_button $fw5ha
  3952. declare ui_button $zosaw
  3953. $pvuhq := 0
  3954. while ($pvuhq<=18)
  3955. %wqnrl[$pvuhq] := get_ui_id($0ux1w)+$pvuhq
  3956. inc($pvuhq)
  3957. end while
  3958. declare %4gyqw[19]
  3959. declare ui_button $0rdar
  3960. declare ui_button $mzhrk
  3961. declare ui_button $y1ktm
  3962. declare ui_button $h41x5
  3963. declare ui_button $ogc4a
  3964. declare ui_button $5x50g
  3965. declare ui_button $i1chm
  3966. declare ui_button $gxhbs
  3967. declare ui_button $rm010
  3968. declare ui_button $iafgo
  3969. declare ui_button $obm4g
  3970. declare ui_button $appd1
  3971. declare ui_button $adbg5
  3972. declare ui_button $r5rmc
  3973. declare ui_button $4rran
  3974. declare ui_button $g5s50
  3975. declare ui_button $i02c4
  3976. declare ui_button $0cjtm
  3977. declare ui_button $xaewn
  3978. $pvuhq := 0
  3979. while ($pvuhq<=18)
  3980. %4gyqw[$pvuhq] := get_ui_id($0rdar)+$pvuhq
  3981. inc($pvuhq)
  3982. end while
  3983. declare ui_button $d5tn2
  3984. set_control_par_str(get_ui_id($d5tn2),$CONTROL_PAR_TEXT,"")
  3985. set_control_par_str(get_ui_id($d5tn2),$CONTROL_PAR_PICTURE,"GE_BRW_STAR")
  3986. set_control_par_str(get_ui_id($d5tn2),$CONTROL_PAR_HELP,"User Favourites Active: Click to only show the presets marked by you as favourites in the search result list. ALT+SHIFT click to reset the favourites for the current preset type.")
  3987. declare ui_button $bbjq4
  3988. set_control_par_str(get_ui_id($bbjq4),$CONTROL_PAR_TEXT,"")
  3989. set_control_par_str(get_ui_id($bbjq4),$CONTROL_PAR_PICTURE,"GE_BRW_RESET_BTN")
  3990. declare ui_slider $z2tnd(0, 1000)
  3991. set_control_par(get_ui_id($z2tnd),$CONTROL_PAR_DEFAULT_VALUE,0)
  3992. set_control_par_str(get_ui_id($z2tnd),$CONTROL_PAR_PICTURE,"GE_BRW_ScrollbarSlider")
  3993. set_control_par(get_ui_id($z2tnd),$CONTROL_PAR_MOUSE_BEHAVIOUR,-2350)
  3994. declare ui_label $y0dw3(1, 1)
  3995. set_control_par_str(get_ui_id($y0dw3),$CONTROL_PAR_TEXT,"")
  3996. set_control_par_str(get_ui_id($y0dw3),$CONTROL_PAR_PICTURE,"GE_BRW_ScrollbarHandle")
  3997. declare $fykja := 0
  3998. declare ui_label $z3l5q(1, 1)
  3999. declare ui_button $les2u
  4000. set_control_par_str(get_ui_id($les2u),$CONTROL_PAR_TEXT,"")
  4001. set_control_par_str(get_ui_id($les2u),$CONTROL_PAR_PICTURE,"GE_Next_btn_10")
  4002. declare ui_button $wwkuw
  4003. set_control_par_str(get_ui_id($wwkuw),$CONTROL_PAR_TEXT,"")
  4004. set_control_par_str(get_ui_id($wwkuw),$CONTROL_PAR_PICTURE,"GE_Prev_btn_10")
  4005. declare ui_button $w5s50
  4006. set_control_par_str(get_ui_id($w5s50),$CONTROL_PAR_TEXT,"")
  4007. set_control_par_str(get_ui_id($w5s50),$CONTROL_PAR_PICTURE,"GE_BRW_CLOSE")
  4008. declare %qciup[8] := (get_ui_id($z3l5q), get_ui_id($les2u), get_ui_id($wwkuw), get_ui_id($w5s50), get_ui_id($z2tnd), get_ui_id($y0dw3), get_ui_id($d5tn2), get_ui_id($bbjq4))
  4009. $g5k3r := 0
  4010. while ($g5k3r<num_elements(%qciup))
  4011. %xwg5s[1390+$g5k3r] := %qciup[$g5k3r]
  4012. %cqg2m[139] := 32
  4013. inc($g5k3r)
  4014. end while
  4015. declare !udzrt[125]
  4016. declare %fgbiy[12] := (10, 5, 8, 18, 10, 5, 8, 15, 13, 5, 14, 14)
  4017. declare %0sc2s[12] := (0, 10, 15, 23, 41, 51, 56, 64, 79, 92, 97, 111)
  4018. declare !pv3hd[10]
  4019. !pv3hd[0] := "Metal"
  4020. !pv3hd[1] := "Wood"
  4021. !pv3hd[2] := "Glass"
  4022. !pv3hd[3] := "Stone"
  4023. !pv3hd[4] := "Carbon"
  4024. !pv3hd[5] := "Vocal"
  4025. !pv3hd[6] := "String"
  4026. !pv3hd[7] := "Electronic"
  4027. !pv3hd[8] := "Noise"
  4028. !pv3hd[9] := "Multiple"
  4029. $vlhs0 := 0
  4030. while ($vlhs0<10)
  4031. !udzrt[$vlhs0] := !pv3hd[$vlhs0]
  4032. inc($vlhs0)
  4033. end while
  4034. declare !hwst0[5]
  4035. !hwst0[0] := "Steady"
  4036. !hwst0[1] := "Drifting"
  4037. !hwst0[2] := "Bend"
  4038. !hwst0[3] := "Multi Note"
  4039. !hwst0[4] := "Chaotic"
  4040. $vlhs0 := 0
  4041. while ($vlhs0<5)
  4042. !udzrt[$vlhs0+10] := !hwst0[$vlhs0]
  4043. inc($vlhs0)
  4044. end while
  4045. declare !uxxba[8]
  4046. !uxxba[0] := "Bowed"
  4047. !uxxba[1] := "Plucked"
  4048. !uxxba[2] := "Rubbed"
  4049. !uxxba[3] := "Swell"
  4050. !uxxba[4] := "Decaying"
  4051. !uxxba[5] := "Layer"
  4052. !uxxba[6] := "Crossfade"
  4053. !uxxba[7] := "Braam"
  4054. $vlhs0 := 0
  4055. while ($vlhs0<8)
  4056. !udzrt[$vlhs0+15] := !uxxba[$vlhs0]
  4057. inc($vlhs0)
  4058. end while
  4059. declare !prqnw[18]
  4060. !prqnw[0] := "Transition"
  4061. !prqnw[1] := "Expression"
  4062. !prqnw[2] := "Impact"
  4063. !prqnw[3] := "Energetic"
  4064. !prqnw[4] := "Noisy"
  4065. !prqnw[5] := "Clean"
  4066. !prqnw[6] := "Sub"
  4067. !prqnw[7] := "Suspenseful"
  4068. !prqnw[8] := "Distorted"
  4069. !prqnw[9] := "Airy"
  4070. !prqnw[10] := "Soft"
  4071. !prqnw[11] := "Hard"
  4072. !prqnw[12] := "Natural"
  4073. !prqnw[13] := "Processed"
  4074. !prqnw[14] := "Bright"
  4075. !prqnw[15] := "Dark"
  4076. !prqnw[16] := "Ethereal"
  4077. !prqnw[17] := "Jittery"
  4078. $vlhs0 := 0
  4079. while ($vlhs0<18)
  4080. !udzrt[$vlhs0+23] := !prqnw[$vlhs0]
  4081. inc($vlhs0)
  4082. end while
  4083. declare !a2bhu[10]
  4084. !a2bhu[0] := "Instruments"
  4085. !a2bhu[1] := "Percussive"
  4086. !a2bhu[2] := "Hits"
  4087. !a2bhu[3] := "Plucked"
  4088. !a2bhu[4] := "Synth"
  4089. !a2bhu[5] := "Reversed"
  4090. !a2bhu[6] := "Noise"
  4091. !a2bhu[7] := "Cinematic"
  4092. !a2bhu[8] := "Sub"
  4093. !a2bhu[9] := "Arpeggiator"
  4094. $vlhs0 := 0
  4095. while ($vlhs0<10)
  4096. !udzrt[$vlhs0+41] := !a2bhu[$vlhs0]
  4097. inc($vlhs0)
  4098. end while
  4099. declare !xbcb1[5]
  4100. !xbcb1[0] := "Steady"
  4101. !xbcb1[1] := "Drifting"
  4102. !xbcb1[2] := "Chord"
  4103. !xbcb1[3] := "Keytracking"
  4104. !xbcb1[4] := "Chaotic"
  4105. $vlhs0 := 0
  4106. while ($vlhs0<5)
  4107. !udzrt[$vlhs0+51] := !xbcb1[$vlhs0]
  4108. inc($vlhs0)
  4109. end while
  4110. declare !xpiir[8]
  4111. !xpiir[0] := "Metal"
  4112. !xpiir[1] := "String"
  4113. !xpiir[2] := "Wood"
  4114. !xpiir[3] := "Hybrid"
  4115. !xpiir[4] := "Plastic"
  4116. !xpiir[5] := "Membran"
  4117. !xpiir[6] := "Synthesis"
  4118. !xpiir[7] := "Other"
  4119. $vlhs0 := 0
  4120. while ($vlhs0<8)
  4121. !udzrt[$vlhs0+56] := !xpiir[$vlhs0]
  4122. inc($vlhs0)
  4123. end while
  4124. declare !kidlm[15]
  4125. !kidlm[0] := "Simple"
  4126. !kidlm[1] := "Complex"
  4127. !kidlm[2] := "Modulating"
  4128. !kidlm[3] := "Impact"
  4129. !kidlm[4] := "Sustained"
  4130. !kidlm[5] := "Noisy"
  4131. !kidlm[6] := "Wide"
  4132. !kidlm[7] := "Airy"
  4133. !kidlm[8] := "Subsonic"
  4134. !kidlm[9] := "Soft"
  4135. !kidlm[10] := "Hard"
  4136. !kidlm[11] := "Natural"
  4137. !kidlm[12] := "Processed"
  4138. !kidlm[13] := "Bright"
  4139. !kidlm[14] := "Dark"
  4140. $vlhs0 := 0
  4141. while ($vlhs0<15)
  4142. !udzrt[$vlhs0+64] := !kidlm[$vlhs0]
  4143. inc($vlhs0)
  4144. end while
  4145. declare !pbenq[13]
  4146. !pbenq[0] := "Atmosphere"
  4147. !pbenq[1] := "Pad"
  4148. !pbenq[2] := "Sequence"
  4149. !pbenq[3] := "Pulses"
  4150. !pbenq[4] := "Swell"
  4151. !pbenq[5] := "Bass"
  4152. !pbenq[6] := "Transition"
  4153. !pbenq[7] := "Keys"
  4154. !pbenq[8] := "Decaying"
  4155. !pbenq[9] := "Effect"
  4156. !pbenq[10] := "Sub"
  4157. !pbenq[11] := "Showcase"
  4158. !pbenq[12] := "MPE"
  4159. $vlhs0 := 0
  4160. while ($vlhs0<13)
  4161. !udzrt[$vlhs0+79] := !pbenq[$vlhs0]
  4162. inc($vlhs0)
  4163. end while
  4164. declare !dxjxd[5]
  4165. !dxjxd[0] := "Steady"
  4166. !dxjxd[1] := "Varying"
  4167. !dxjxd[2] := "Multiple"
  4168. !dxjxd[3] := "Chord"
  4169. !dxjxd[4] := "Chaotic"
  4170. $vlhs0 := 0
  4171. while ($vlhs0<5)
  4172. !udzrt[$vlhs0+92] := !dxjxd[$vlhs0]
  4173. inc($vlhs0)
  4174. end while
  4175. declare !q5hdb[14]
  4176. !q5hdb[0] := "Intensity control"
  4177. !q5hdb[1] := "Complex"
  4178. !q5hdb[2] := "Simple"
  4179. !q5hdb[3] := "Keyboard Voicing"
  4180. !q5hdb[4] := "Wide"
  4181. !q5hdb[5] := "Noisy"
  4182. !q5hdb[6] := "Impact"
  4183. !q5hdb[7] := "Soft"
  4184. !q5hdb[8] := "Hard"
  4185. !q5hdb[9] := "Distant"
  4186. !q5hdb[10] := "Distorted"
  4187. !q5hdb[11] := "Bold"
  4188. !q5hdb[12] := "Rhythmic"
  4189. !q5hdb[13] := "Tempo Sync"
  4190. $vlhs0 := 0
  4191. while ($vlhs0<14)
  4192. !udzrt[$vlhs0+97] := !q5hdb[$vlhs0]
  4193. inc($vlhs0)
  4194. end while
  4195. declare !rigim[14]
  4196. !rigim[0] := "Dark"
  4197. !rigim[1] := "Delicate"
  4198. !rigim[2] := "Dreamlike"
  4199. !rigim[3] := "Thrilling"
  4200. !rigim[4] := "Suspenseful"
  4201. !rigim[5] := "Eerie"
  4202. !rigim[6] := "Disturbing"
  4203. !rigim[7] := "Dramatic"
  4204. !rigim[8] := "Meditativ"
  4205. !rigim[9] := "Positive"
  4206. !rigim[10] := "Energetic"
  4207. !rigim[11] := "Peaceful"
  4208. !rigim[12] := "Ethereal"
  4209. !rigim[13] := "Ambivalent"
  4210. $vlhs0 := 0
  4211. while ($vlhs0<14)
  4212. !udzrt[$vlhs0+111] := !rigim[$vlhs0]
  4213. inc($vlhs0)
  4214. end while
  4215. declare %0mw41[125]
  4216. declare %ey2zb[12] := (10, 5, 8, 18, 10, 5, 8, 15, 13, 5, 14, 14)
  4217. declare %t1pnk[12] := (0, 10, 15, 23, 41, 51, 56, 64, 79, 92, 97, 111)
  4218. declare %vgdie[10] := (0, 1, 2, 3, 4, 5, 6, 8, 9, 7)
  4219. $vlhs0 := 0
  4220. while ($vlhs0<10)
  4221. %0mw41[$vlhs0] := %vgdie[$vlhs0]
  4222. inc($vlhs0)
  4223. end while
  4224. declare %zdz0v[5] := (10, 11, 12, 13, 14)
  4225. $vlhs0 := 0
  4226. while ($vlhs0<5)
  4227. %0mw41[$vlhs0+10] := %zdz0v[$vlhs0]
  4228. inc($vlhs0)
  4229. end while
  4230. declare %lw3xc[8] := (15, 16, 17, 18, 19, 20, 21, 22)
  4231. $vlhs0 := 0
  4232. while ($vlhs0<8)
  4233. %0mw41[$vlhs0+15] := %lw3xc[$vlhs0]
  4234. inc($vlhs0)
  4235. end while
  4236. declare %uflgx[18] := (23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40)
  4237. $vlhs0 := 0
  4238. while ($vlhs0<18)
  4239. %0mw41[$vlhs0+23] := %uflgx[$vlhs0]
  4240. inc($vlhs0)
  4241. end while
  4242. declare %nm0as[10] := (1, 2, 3, 4, 5, 6, 7, 8, 11, 13)
  4243. $vlhs0 := 0
  4244. while ($vlhs0<10)
  4245. %0mw41[$vlhs0+41] := %nm0as[$vlhs0]
  4246. inc($vlhs0)
  4247. end while
  4248. declare %a3sdg[5] := (14, 15, 16, 17, 18)
  4249. $vlhs0 := 0
  4250. while ($vlhs0<5)
  4251. %0mw41[$vlhs0+51] := %a3sdg[$vlhs0]
  4252. inc($vlhs0)
  4253. end while
  4254. declare %men4u[8] := (19, 20, 21, 22, 23, 24, 25, 26)
  4255. $vlhs0 := 0
  4256. while ($vlhs0<8)
  4257. %0mw41[$vlhs0+56] := %men4u[$vlhs0]
  4258. inc($vlhs0)
  4259. end while
  4260. declare %imn2j[15] := (27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41)
  4261. $vlhs0 := 0
  4262. while ($vlhs0<15)
  4263. %0mw41[$vlhs0+64] := %imn2j[$vlhs0]
  4264. inc($vlhs0)
  4265. end while
  4266. declare %ecepz[13] := (0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12)
  4267. $vlhs0 := 0
  4268. while ($vlhs0<13)
  4269. %0mw41[$vlhs0+79] := %ecepz[$vlhs0]
  4270. inc($vlhs0)
  4271. end while
  4272. declare %wumub[5] := (13, 14, 15, 16, 17)
  4273. $vlhs0 := 0
  4274. while ($vlhs0<5)
  4275. %0mw41[$vlhs0+92] := %wumub[$vlhs0]
  4276. inc($vlhs0)
  4277. end while
  4278. declare %23wee[14] := (18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31)
  4279. $vlhs0 := 0
  4280. while ($vlhs0<14)
  4281. %0mw41[$vlhs0+97] := %23wee[$vlhs0]
  4282. inc($vlhs0)
  4283. end while
  4284. declare %5symj[14] := (32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45)
  4285. $vlhs0 := 0
  4286. while ($vlhs0<14)
  4287. %0mw41[$vlhs0+111] := %5symj[$vlhs0]
  4288. inc($vlhs0)
  4289. end while
  4290. declare %iz114[12]
  4291. make_instr_persistent(%iz114)
  4292. declare %e0xxd[216]
  4293. make_instr_persistent(%e0xxd)
  4294. declare %jj5qi[3] := (-1)
  4295. make_persistent(%jj5qi)
  4296. declare %kt24s[3]
  4297. declare %k4yha[3]
  4298. declare %31af0[3]
  4299. make_instr_persistent(%31af0)
  4300. declare %xeyhi[3]
  4301. declare %_BRW__search_pool_array[3000]
  4302. declare %_BRW__user_fav_array[1500] := (0)
  4303. declare %BRW__num_preset_in_search_pool_array[3]
  4304. declare %3owef[1500] := (-1)
  4305. declare %BRW__grp_remap[450]
  4306. declare %BRW__snapshot_remap_v43[500]
  4307. declare %BRW__snapshot_remap_v44[500]
  4308. declare !_BRW__preset_names[1500]
  4309. declare $y1xhf
  4310. declare $bgdzw
  4311. load_array(!_BRW__preset_names,2)
  4312. load_array(%BRW__num_preset_in_search_pool_array,2)
  4313. load_array(%BRW__grp_remap,2)
  4314. load_array(%_BRW__search_pool_array,2)
  4315. load_array(%BRW__snapshot_remap_v43,2)
  4316. load_array(%BRW__snapshot_remap_v44,2)
  4317. load_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  4318. $lz0yu := 0
  4319. while ($lz0yu<4)
  4320. $rc1ud := 0
  4321. while ($rc1ud<18)
  4322. set_control_par_str(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_PICTURE,"GE_BRW_BTN")
  4323. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  4324. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_POS_X,32+(156*$lz0yu))
  4325. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_POS_Y,113+(23*$rc1ud))
  4326. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_WIDTH,143)
  4327. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HEIGHT,20)
  4328. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_DISABLE_TEXT_SHIFTING,1)
  4329. set_control_par_str(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HELP,"Browser tag: Click to filter the search result list for items featuring this tag. Hold down CMD/CTRL to exclude a tag from the search result. Tags which do not provide matches are shown in a disabled style.")
  4330. inc($rc1ud)
  4331. end while
  4332. inc($lz0yu)
  4333. end while
  4334. $lz0yu := 0
  4335. while ($lz0yu<19)
  4336. set_control_par_str(%wqnrl[$lz0yu],$CONTROL_PAR_PICTURE,"GE_BRW_BTN")
  4337. set_control_par_str(%4gyqw[$lz0yu],$CONTROL_PAR_PICTURE,"GE_BRW_STAR")
  4338. set_control_par_str(%4gyqw[$lz0yu],$CONTROL_PAR_HELP,"User Favourite: Click to mark the corresponding preset as favourite.")
  4339. set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  4340. set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  4341. set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_DISABLE_TEXT_SHIFTING,1)
  4342. set_control_par_str(%wqnrl[$lz0yu],$CONTROL_PAR_HELP,"Search Result list: Click the button to load the corresponding preset.")
  4343. set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_POS_X,694)
  4344. set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_POS_Y,113+(23*$lz0yu))
  4345. set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_WIDTH,220)
  4346. set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_HEIGHT,20)
  4347. set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_POS_X,662)
  4348. set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_POS_Y,113+(23*$lz0yu))
  4349. set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_WIDTH,16)
  4350. set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_HEIGHT,20)
  4351. inc($lz0yu)
  4352. end while
  4353. declare !5sry1[36]
  4354. !5sry1[0] := "GE Cinematic huge"
  4355. !5sry1[1] := "Concert Hall A"
  4356. !5sry1[2] := "L224 Orchestral 5.7s"
  4357. !5sry1[3] := "13.1s Koelner Dom - Synthetic"
  4358. !5sry1[4] := "4.5s Distant Hall - Synthetic"
  4359. !5sry1[5] := "5.5s Crystal Caves Orven"
  4360. !5sry1[6] := "FF Pro R Chapel 1"
  4361. !5sry1[7] := "FF Pro R Choir Hall"
  4362. !5sry1[8] := "FF Pro R Big Blue Hall"
  4363. !5sry1[9] := "Quadstick Big - Spagetti Western"
  4364. !5sry1[10] := "3.3s Far Away Orven"
  4365. !5sry1[11] := "FF Pro R Comb Filtered Space 3"
  4366. !5sry1[12] := "2.9s Distant Concert Hall - Synthetic"
  4367. !5sry1[13] := "BRT 7 Location Vehicle Park"
  4368. !5sry1[14] := "8.9s Tunnel - Synthetic"
  4369. !5sry1[15] := "2.9s Reeeflections Orven"
  4370. !5sry1[16] := "E245 2.8s B"
  4371. !5sry1[17] := "E245 3.8s B"
  4372. !5sry1[18] := "Gold Plate long"
  4373. !5sry1[19] := "Studio Spring"
  4374. !5sry1[20] := "Dub Spring"
  4375. !5sry1[21] := "Dual Spring"
  4376. !5sry1[22] := "1.1s Ring Room Orven"
  4377. !5sry1[23] := "GE_synAV_sine_IR_long_1"
  4378. !5sry1[24] := "1.5s Crystal Gyroscope Orven"
  4379. !5sry1[25] := "1.5s rvsd Chamber EQ"
  4380. !5sry1[26] := "5.58s rvsd Concert Hall A"
  4381. !5sry1[27] := "5.5s rvsd Cathedral DeCLick"
  4382. !5sry1[28] := "3.3s rvsd Staircase"
  4383. !5sry1[29] := "5.34s rvsd BRT 7 Location Vehicle Park"
  4384. !5sry1[30] := "GE IR REV Metal Resonator Narrow"
  4385. !5sry1[31] := "GE IR Bow Noise"
  4386. !5sry1[32] := "GE IR Bow Noise Long"
  4387. !5sry1[33] := "GE3 IR Wood Scrape"
  4388. !5sry1[34] := "GE IR Metal Resonator Full"
  4389. !5sry1[35] := "GE3 IR Breath"
  4390. declare !p4zwk[36]
  4391. !p4zwk[0] := "Cine Huge"
  4392. !p4zwk[1] := "Concert Hall"
  4393. !p4zwk[2] := "Orch Hall"
  4394. !p4zwk[3] := "Dome"
  4395. !p4zwk[4] := "Distant Hall"
  4396. !p4zwk[5] := "Crystal Caves"
  4397. !p4zwk[6] := "Chapel"
  4398. !p4zwk[7] := "Choir Hall"
  4399. !p4zwk[8] := "Blue Hall"
  4400. !p4zwk[9] := "Dusty Hall"
  4401. !p4zwk[10] := "Far Away"
  4402. !p4zwk[11] := "Comb Space"
  4403. !p4zwk[12] := "Damped Hall"
  4404. !p4zwk[13] := "Vehicle Park"
  4405. !p4zwk[14] := "Tunnel"
  4406. !p4zwk[15] := "Reeeflections"
  4407. !p4zwk[16] := "Plate Mid"
  4408. !p4zwk[17] := "Plate Long"
  4409. !p4zwk[18] := "Gold Plate long"
  4410. !p4zwk[19] := "Studio Spring"
  4411. !p4zwk[20] := "Dub Spring"
  4412. !p4zwk[21] := "Dual Spring"
  4413. !p4zwk[22] := "Ring Room"
  4414. !p4zwk[23] := "Additive"
  4415. !p4zwk[24] := "Gyroscope"
  4416. !p4zwk[25] := "REV Chamber"
  4417. !p4zwk[26] := "REV Hall"
  4418. !p4zwk[27] := "REV Cathedral"
  4419. !p4zwk[28] := "REV Staircase"
  4420. !p4zwk[29] := "REV Vehicle Park"
  4421. !p4zwk[30] := "REV Resonator"
  4422. !p4zwk[31] := "Bow Shimmer"
  4423. !p4zwk[32] := "Bow Noise"
  4424. !p4zwk[33] := "Scraping"
  4425. !p4zwk[34] := "Metal Resonator"
  4426. !p4zwk[35] := "Prana"
  4427. if (1=1)
  4428. declare %glqqy[25] := (10, 11, 12, 13, 14, 15, 16, 17, 18, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24)
  4429. declare %z5iau[25] := (0, 1, 2, 3, 4, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24)
  4430. declare %2q55x[32] := (1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0)
  4431. declare !um04d[16]
  4432. !um04d[0] := "8/4"
  4433. !um04d[1] := "3/2"
  4434. !um04d[2] := "4/4"
  4435. !um04d[3] := "1/2 dot"
  4436. !um04d[4] := "1/2"
  4437. !um04d[5] := "1/4 dot"
  4438. !um04d[6] := "1/4"
  4439. !um04d[7] := "1/8 dot"
  4440. !um04d[8] := "1/4 trip"
  4441. !um04d[9] := "1/8"
  4442. !um04d[10] := "1/16 dot"
  4443. !um04d[11] := "1/8 trip"
  4444. !um04d[12] := "1/16"
  4445. !um04d[13] := "1/32 dot"
  4446. !um04d[14] := "1/16 trip"
  4447. !um04d[15] := "1/32"
  4448. declare %ry4pp[16] := ($NI_SYNC_UNIT_WHOLE, $NI_SYNC_UNIT_HALF, $NI_SYNC_UNIT_WHOLE, $NI_SYNC_UNIT_QUARTER, $NI_SYNC_UNIT_HALF, $NI_SYNC_UNIT_8TH, $NI_SYNC_UNIT_QUARTER, $NI_SYNC_UNIT_16TH, $NI_SYNC_UNIT_QUARTER_TRIPLET, $NI_SYNC_UNIT_8TH, $NI_SYNC_UNIT_32ND, $NI_SYNC_UNIT_8TH_TRIPLET, $NI_SYNC_UNIT_16TH, $NI_SYNC_UNIT_64TH, $NI_SYNC_UNIT_16TH_TRIPLET, $NI_SYNC_UNIT_32ND)
  4449. declare %tkyhf[16] := (2, 3, 1, 3, 1, 3, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1)
  4450. declare %3n0yu[340]
  4451. declare %2nyh4[38] := (1, 7, 12, 7, 10, 8, 8, 6, 5, 10, 7, 7, 5, 6, 4, 6, 15, 10, 10, 9, 12, 8, 7, 8, 6, 4, 7, 22, 9, 3, 4, 21, 14, 12, 17, 15, 13, 5)
  4452. declare %w5uro[38] := (0, 1, 8, 20, 27, 37, 45, 53, 59, 64, 74, 81, 88, 93, 99, 103, 109, 124, 134, 144, 153, 165, 173, 180, 188, 194, 198, 205, 227, 236, 239, 243, 264, 278, 290, 307, 322, 335)
  4453. %3n0yu[0] := $ENGINE_PAR_EFFECT_TYPE
  4454. declare %nhqrl[7] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_RV_PREDELAY, $ENGINE_PAR_RV_SIZE, $ENGINE_PAR_RV_COLOUR, $ENGINE_PAR_RV_STEREO, $ENGINE_PAR_RV_DAMPING)
  4455. $vlhs0 := 0
  4456. while ($vlhs0<7)
  4457. %3n0yu[$vlhs0+1] := %nhqrl[$vlhs0]
  4458. inc($vlhs0)
  4459. end while
  4460. declare %l3z1g[12] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_RV2_TIME, $ENGINE_PAR_RV2_SIZE, $ENGINE_PAR_RV2_DAMPING, $ENGINE_PAR_RV2_MOD, $ENGINE_PAR_RV2_DIFF, $ENGINE_PAR_RV2_PREDELAY, $ENGINE_PAR_RV2_HIGHCUT, $ENGINE_PAR_RV2_LOWSHELF, $ENGINE_PAR_RV2_STEREO, $ENGINE_PAR_RV2_TYPE)
  4461. $vlhs0 := 0
  4462. while ($vlhs0<12)
  4463. %3n0yu[$vlhs0+8] := %l3z1g[$vlhs0]
  4464. inc($vlhs0)
  4465. end while
  4466. declare %pca54[7] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_PR_PREDELAY, $ENGINE_PAR_PR_DECAY, $ENGINE_PAR_PR_LOWSHELF, $ENGINE_PAR_PR_HIDAMP, $ENGINE_PAR_PR_STEREO)
  4467. $vlhs0 := 0
  4468. while ($vlhs0<7)
  4469. %3n0yu[$vlhs0+20] := %pca54[$vlhs0]
  4470. inc($vlhs0)
  4471. end while
  4472. declare %mvg2b[10] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_IRC_PREDELAY, $ENGINE_PAR_IRC_LENGTH_RATIO_ER, $ENGINE_PAR_IRC_FREQ_LOWPASS_ER, $ENGINE_PAR_IRC_FREQ_HIGHPASS_ER, $ENGINE_PAR_IRC_LENGTH_RATIO_LR, $ENGINE_PAR_IRC_FREQ_LOWPASS_LR, $ENGINE_PAR_IRC_FREQ_HIGHPASS_LR, 080000000h)
  4473. $vlhs0 := 0
  4474. while ($vlhs0<10)
  4475. %3n0yu[$vlhs0+27] := %mvg2b[$vlhs0]
  4476. inc($vlhs0)
  4477. end while
  4478. declare %wy0qt[8] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_SCOMP_THRESHOLD, $ENGINE_PAR_SCOMP_RATIO, $ENGINE_PAR_SCOMP_ATTACK, $ENGINE_PAR_SCOMP_RELEASE, $ENGINE_PAR_SCOMP_MAKEUP, $ENGINE_PAR_SCOMP_MIX)
  4479. $vlhs0 := 0
  4480. while ($vlhs0<8)
  4481. %3n0yu[$vlhs0+37] := %wy0qt[$vlhs0]
  4482. inc($vlhs0)
  4483. end while
  4484. declare %3sj3d[8] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_FCOMP_INPUT, $ENGINE_PAR_FCOMP_RATIO, $ENGINE_PAR_FCOMP_ATTACK, $ENGINE_PAR_FCOMP_RELEASE, $ENGINE_PAR_FCOMP_MAKEUP, $ENGINE_PAR_FCOMP_MIX)
  4485. $vlhs0 := 0
  4486. while ($vlhs0<8)
  4487. %3n0yu[$vlhs0+45] := %3sj3d[$vlhs0]
  4488. inc($vlhs0)
  4489. end while
  4490. declare %ygzg0[6] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_TR_INPUT, $ENGINE_PAR_TR_ATTACK, $ENGINE_PAR_TR_SUSTAIN, $ENGINE_PAR_TR_SMOOTH)
  4491. $vlhs0 := 0
  4492. while ($vlhs0<6)
  4493. %3n0yu[$vlhs0+53] := %ygzg0[$vlhs0]
  4494. inc($vlhs0)
  4495. end while
  4496. declare %jpopa[5] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_TP_GAIN, $ENGINE_PAR_TP_WARMTH, $ENGINE_PAR_TP_HF_ROLLOFF)
  4497. $vlhs0 := 0
  4498. while ($vlhs0<5)
  4499. %3n0yu[$vlhs0+59] := %jpopa[$vlhs0]
  4500. inc($vlhs0)
  4501. end while
  4502. declare %4yqct[10] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_JMP_PREAMP, $ENGINE_PAR_JMP_BASS, $ENGINE_PAR_JMP_MID, $ENGINE_PAR_JMP_TREBLE, $ENGINE_PAR_JMP_MASTER, $ENGINE_PAR_JMP_PRESENCE, $ENGINE_PAR_JMP_HIGAIN, $ENGINE_PAR_JMP_MONO)
  4503. $vlhs0 := 0
  4504. while ($vlhs0<10)
  4505. %3n0yu[$vlhs0+64] := %4yqct[$vlhs0]
  4506. inc($vlhs0)
  4507. end while
  4508. declare %cyyk5[7] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_TW_VOLUME, $ENGINE_PAR_TW_TREBLE, $ENGINE_PAR_TW_MID, $ENGINE_PAR_TW_BASS, $ENGINE_PAR_TW_MONO)
  4509. $vlhs0 := 0
  4510. while ($vlhs0<7)
  4511. %3n0yu[$vlhs0+74] := %cyyk5[$vlhs0]
  4512. inc($vlhs0)
  4513. end while
  4514. declare %u0wy4[7] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_SK_TONE, $ENGINE_PAR_SK_DRIVE, $ENGINE_PAR_SK_BASS, $ENGINE_PAR_SK_BRIGHT, $ENGINE_PAR_SK_MIX)
  4515. $vlhs0 := 0
  4516. while ($vlhs0<7)
  4517. %3n0yu[$vlhs0+81] := %u0wy4[$vlhs0]
  4518. inc($vlhs0)
  4519. end while
  4520. declare %clqr1[5] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_DRIVE, $ENGINE_PAR_DAMPING, $ENGINE_PAR_DISTORTION_TYPE)
  4521. $vlhs0 := 0
  4522. while ($vlhs0<5)
  4523. %3n0yu[$vlhs0+88] := %clqr1[$vlhs0]
  4524. inc($vlhs0)
  4525. end while
  4526. declare %2lijw[6] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_BITS, $ENGINE_PAR_FREQUENCY, $ENGINE_PAR_NOISELEVEL, $ENGINE_PAR_NOISECOLOR)
  4527. $vlhs0 := 0
  4528. while ($vlhs0<6)
  4529. %3n0yu[$vlhs0+93] := %2lijw[$vlhs0]
  4530. inc($vlhs0)
  4531. end while
  4532. declare %ttsxx[4] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_SHAPE, $ENGINE_PAR_SHAPE_TYPE)
  4533. $vlhs0 := 0
  4534. while ($vlhs0<4)
  4535. %3n0yu[$vlhs0+99] := %ttsxx[$vlhs0]
  4536. inc($vlhs0)
  4537. end while
  4538. declare %chynj[6] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_CB_AIR, $ENGINE_PAR_CB_TREBLE, $ENGINE_PAR_CB_BASS, $ENGINE_PAR_CABINET_TYPE)
  4539. $vlhs0 := 0
  4540. while ($vlhs0<6)
  4541. %3n0yu[$vlhs0+103] := %chynj[$vlhs0]
  4542. inc($vlhs0)
  4543. end while
  4544. declare %urk25[15] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_V5_PREGAINRHYTHM, $ENGINE_PAR_V5_PREGAINLEAD, $ENGINE_PAR_V5_BASS, $ENGINE_PAR_V5_MID, $ENGINE_PAR_V5_TREBLE, $ENGINE_PAR_V5_POSTGAIN, $ENGINE_PAR_V5_RESONANCE, $ENGINE_PAR_V5_PRESENCE, $ENGINE_PAR_V5_LEADCHANNEL, $ENGINE_PAR_V5_HIGAIN, $ENGINE_PAR_V5_BRIGHT, $ENGINE_PAR_V5_CRUNCH, $ENGINE_PAR_V5_MONO)
  4545. $vlhs0 := 0
  4546. while ($vlhs0<15)
  4547. %3n0yu[$vlhs0+109] := %urk25[$vlhs0]
  4548. inc($vlhs0)
  4549. end while
  4550. declare %hvb1h[10] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_AC_NORMALVOLUME, $ENGINE_PAR_AC_BRILLIANTVOLUME, $ENGINE_PAR_AC_BASS, $ENGINE_PAR_AC_TREBLE, $ENGINE_PAR_AC_TONECUT, $ENGINE_PAR_AC_TREMOLOSPEED, $ENGINE_PAR_AC_TREMOLODEPTH, $ENGINE_PAR_AC_MONO)
  4551. $vlhs0 := 0
  4552. while ($vlhs0<10)
  4553. %3n0yu[$vlhs0+124] := %hvb1h[$vlhs0]
  4554. inc($vlhs0)
  4555. end while
  4556. declare %oxcto[10] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_CT_VOLUME, $ENGINE_PAR_CT_DISTORTION, $ENGINE_PAR_CT_FILTER, $ENGINE_PAR_CT_BASS, $ENGINE_PAR_CT_BALLS, $ENGINE_PAR_CT_TREBLE, $ENGINE_PAR_CT_TONE, $ENGINE_PAR_CT_MONO)
  4557. $vlhs0 := 0
  4558. while ($vlhs0<10)
  4559. %3n0yu[$vlhs0+134] := %oxcto[$vlhs0]
  4560. inc($vlhs0)
  4561. end while
  4562. declare %riofq[9] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_DS_VOLUME, $ENGINE_PAR_DS_TONE, $ENGINE_PAR_DS_DRIVE, $ENGINE_PAR_DS_BASS, $ENGINE_PAR_DS_MID, $ENGINE_PAR_DS_TREBLE, $ENGINE_PAR_DS_MONO)
  4563. $vlhs0 := 0
  4564. while ($vlhs0<9)
  4565. %3n0yu[$vlhs0+144] := %riofq[$vlhs0]
  4566. inc($vlhs0)
  4567. end while
  4568. declare %ofcob[12] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_HS_PRENORMAL, $ENGINE_PAR_HS_PREOVERDRIVE, $ENGINE_PAR_HS_BASS, $ENGINE_PAR_HS_MID, $ENGINE_PAR_HS_TREBLE, $ENGINE_PAR_HS_MASTER, $ENGINE_PAR_HS_PRESENCE, $ENGINE_PAR_HS_DEPTH, $ENGINE_PAR_HS_OVERDRIVE, $ENGINE_PAR_HS_MONO)
  4569. $vlhs0 := 0
  4570. while ($vlhs0<12)
  4571. %3n0yu[$vlhs0+153] := %ofcob[$vlhs0]
  4572. inc($vlhs0)
  4573. end while
  4574. declare %zddea[8] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_RT_SPEED, $ENGINE_PAR_RT_BALANCE, $ENGINE_PAR_RT_ACCEL_HI, $ENGINE_PAR_RT_ACCEL_LO, $ENGINE_PAR_RT_DISTANCE, $ENGINE_PAR_RT_MIX)
  4575. $vlhs0 := 0
  4576. while ($vlhs0<8)
  4577. %3n0yu[$vlhs0+165] := %zddea[$vlhs0]
  4578. inc($vlhs0)
  4579. end while
  4580. declare %t4efk[7] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_PH_DEPTH, $ENGINE_PAR_PH_SPEED, $ENGINE_PAR_PH_SPEED_UNIT, $ENGINE_PAR_PH_PHASE, $ENGINE_PAR_PH_FEEDBACK)
  4581. $vlhs0 := 0
  4582. while ($vlhs0<7)
  4583. %3n0yu[$vlhs0+173] := %t4efk[$vlhs0]
  4584. inc($vlhs0)
  4585. end while
  4586. declare %0rfne[8] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_FL_DEPTH, $ENGINE_PAR_FL_SPEED, $ENGINE_PAR_FL_SPEED_UNIT, $ENGINE_PAR_FL_PHASE, $ENGINE_PAR_FL_FEEDBACK, $ENGINE_PAR_FL_COLOR)
  4587. $vlhs0 := 0
  4588. while ($vlhs0<8)
  4589. %3n0yu[$vlhs0+180] := %0rfne[$vlhs0]
  4590. inc($vlhs0)
  4591. end while
  4592. declare %f3tmo[6] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_CH_DEPTH, $ENGINE_PAR_CH_SPEED, $ENGINE_PAR_CH_SPEED_UNIT, $ENGINE_PAR_CH_PHASE)
  4593. $vlhs0 := 0
  4594. while ($vlhs0<6)
  4595. %3n0yu[$vlhs0+188] := %f3tmo[$vlhs0]
  4596. inc($vlhs0)
  4597. end while
  4598. declare %r0fyl[4] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_LIM_IN_GAIN, $ENGINE_PAR_LIM_RELEASE)
  4599. $vlhs0 := 0
  4600. while ($vlhs0<4)
  4601. %3n0yu[$vlhs0+194] := %r0fyl[$vlhs0]
  4602. inc($vlhs0)
  4603. end while
  4604. declare %ceuzi[7] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_DL_TIME, $ENGINE_PAR_DL_TIME_UNIT, $ENGINE_PAR_DL_DAMPING, $ENGINE_PAR_DL_PAN, $ENGINE_PAR_DL_FEEDBACK)
  4605. $vlhs0 := 0
  4606. while ($vlhs0<7)
  4607. %3n0yu[$vlhs0+198] := %ceuzi[$vlhs0]
  4608. inc($vlhs0)
  4609. end while
  4610. declare %t2lpf[22] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_RDL_TIME, $ENGINE_PAR_RDL_FEEDBACK, $ENGINE_PAR_RDL_LOWCUT, $ENGINE_PAR_RDL_HIGHCUT, $ENGINE_PAR_RDL_SATURATION, $ENGINE_PAR_RDL_TAPEAGE, $ENGINE_PAR_RDL_FLUTTER, $ENGINE_PAR_RDL_QUALITY, $ENGINE_PAR_RDL_DEPTH, $ENGINE_PAR_RDL_RATE, $ENGINE_PAR_RDL_TYPE, $ENGINE_PAR_RDL_STEREO, $ENGINE_PAR_RDL_NOISE, $ENGINE_PAR_RDL_PINGPONG, $ENGINE_PAR_RDL_AMOUNT, $ENGINE_PAR_RDL_SIZE, $ENGINE_PAR_RDL_DENSE, $ENGINE_PAR_RDL_MODULATION, $ENGINE_PAR_RDL_BBDTYPE, $ENGINE_PAR_RDL_TIME_UNIT)
  4611. $vlhs0 := 0
  4612. while ($vlhs0<22)
  4613. %3n0yu[$vlhs0+205] := %t2lpf[$vlhs0]
  4614. inc($vlhs0)
  4615. end while
  4616. declare %rtexk[9] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_SENDLEVEL_0, $ENGINE_PAR_SENDLEVEL_1, $ENGINE_PAR_SENDLEVEL_2, $ENGINE_PAR_SENDLEVEL_3, $ENGINE_PAR_SENDLEVEL_4, $ENGINE_PAR_SENDLEVEL_5, $ENGINE_PAR_SENDLEVEL_6, $ENGINE_PAR_SENDLEVEL_7)
  4617. $vlhs0 := 0
  4618. while ($vlhs0<9)
  4619. %3n0yu[$vlhs0+227] := %rtexk[$vlhs0]
  4620. inc($vlhs0)
  4621. end while
  4622. declare %leotb[3] := ($ENGINE_PAR_SEND_EFFECT_TYPE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_GN_GAIN)
  4623. $vlhs0 := 0
  4624. while ($vlhs0<3)
  4625. %3n0yu[$vlhs0+236] := %leotb[$vlhs0]
  4626. inc($vlhs0)
  4627. end while
  4628. declare %s1inm[4] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_STEREO, $ENGINE_PAR_STEREO_PAN)
  4629. $vlhs0 := 0
  4630. while ($vlhs0<4)
  4631. %3n0yu[$vlhs0+239] := %s1inm[$vlhs0]
  4632. inc($vlhs0)
  4633. end while
  4634. declare %1ojgd[21] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_EFFECT_SUBTYPE, $ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN, $ENGINE_PAR_GAIN1, $ENGINE_PAR_GAIN2, $ENGINE_PAR_GAIN3, $ENGINE_PAR_FREQ1, $ENGINE_PAR_FREQ2, $ENGINE_PAR_FREQ3, $ENGINE_PAR_BW1, $ENGINE_PAR_BW2, $ENGINE_PAR_BW3, $ENGINE_PAR_FORMANT_TALK, $ENGINE_PAR_FORMANT_SHARP, $ENGINE_PAR_FORMANT_SIZE, $ENGINE_PAR_BANDWIDTH, $ENGINE_PAR_FILTER_LADDER_HQ, $ENGINE_PAR_LP_CUTOFF, $ENGINE_PAR_HP_CUTOFF)
  4635. $vlhs0 := 0
  4636. while ($vlhs0<21)
  4637. %3n0yu[$vlhs0+243] := %1ojgd[$vlhs0]
  4638. inc($vlhs0)
  4639. end while
  4640. declare %fuqb1[14] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_SEQ_LF_GAIN, $ENGINE_PAR_SEQ_LF_FREQ, $ENGINE_PAR_SEQ_LF_BELL, $ENGINE_PAR_SEQ_LMF_GAIN, $ENGINE_PAR_SEQ_LMF_FREQ, $ENGINE_PAR_SEQ_LMF_Q, $ENGINE_PAR_SEQ_HMF_GAIN, $ENGINE_PAR_SEQ_HMF_FREQ, $ENGINE_PAR_SEQ_HMF_Q, $ENGINE_PAR_SEQ_HF_GAIN, $ENGINE_PAR_SEQ_HF_FREQ, $ENGINE_PAR_SEQ_HF_BELL)
  4641. $vlhs0 := 0
  4642. while ($vlhs0<14)
  4643. %3n0yu[$vlhs0+264] := %fuqb1[$vlhs0]
  4644. inc($vlhs0)
  4645. end while
  4646. declare %m2exc[12] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_CHORAL_RATE, $ENGINE_PAR_CHORAL_AMOUNT, $ENGINE_PAR_CHORAL_FEEDBACK, $ENGINE_PAR_CHORAL_DELAY, $ENGINE_PAR_CHORAL_VOICES, $ENGINE_PAR_CHORAL_WIDTH, $ENGINE_PAR_CHORAL_MIX, $ENGINE_PAR_CHORAL_INVERT_PHASE, $ENGINE_PAR_CHORAL_SCATTER, $ENGINE_PAR_CHORAL_MODE)
  4647. $vlhs0 := 0
  4648. while ($vlhs0<12)
  4649. %3n0yu[$vlhs0+278] := %m2exc[$vlhs0]
  4650. inc($vlhs0)
  4651. end while
  4652. declare %1dv0q[17] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_FLAIR_RATE, $ENGINE_PAR_FLAIR_AMOUNT, $ENGINE_PAR_FLAIR_PITCH, $ENGINE_PAR_FLAIR_WIDTH, $ENGINE_PAR_FLAIR_MIX, $ENGINE_PAR_FLAIR_VOICES, $ENGINE_PAR_FLAIR_FEEDBACK, $ENGINE_PAR_FLAIR_DAMPING, $ENGINE_PAR_FLAIR_DETUNE, $ENGINE_PAR_FLAIR_OFFSET, $ENGINE_PAR_FLAIR_INVERT_PHASE, $ENGINE_PAR_FLAIR_MODE, $ENGINE_PAR_FLAIR_SCANMODE, $ENGINE_PAR_FLAIR_CHORD, $ENGINE_PAR_FLAIR_RATE_UNIT)
  4653. $vlhs0 := 0
  4654. while ($vlhs0<17)
  4655. %3n0yu[$vlhs0+290] := %1dv0q[$vlhs0]
  4656. inc($vlhs0)
  4657. end while
  4658. declare %nnpwn[15] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_PHASIS_RATE, $ENGINE_PAR_PHASIS_AMOUNT, $ENGINE_PAR_PHASIS_CENTER, $ENGINE_PAR_PHASIS_SPREAD, $ENGINE_PAR_PHASIS_FEEDBACK, $ENGINE_PAR_PHASIS_MIX, $ENGINE_PAR_PHASIS_NOTCHES, $ENGINE_PAR_PHASIS_STEREO, $ENGINE_PAR_PHASIS_MOD_MIX, $ENGINE_PAR_PHASIS_ULTRA, $ENGINE_PAR_PHASIS_INVERT_PHASE, $ENGINE_PAR_PHASIS_INVERT_MOD_MIX, $ENGINE_PAR_PHASIS_RATE_UNIT)
  4659. $vlhs0 := 0
  4660. while ($vlhs0<15)
  4661. %3n0yu[$vlhs0+307] := %nnpwn[$vlhs0]
  4662. inc($vlhs0)
  4663. end while
  4664. declare %texzx[13] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_SUPERGT_TRIM, $ENGINE_PAR_SUPERGT_HPF_MODE, $ENGINE_PAR_SUPERGT_SATURATION, $ENGINE_PAR_SUPERGT_SAT_MODE, $ENGINE_PAR_SUPERGT_COMPRESS, $ENGINE_PAR_SUPERGT_ATTACK, $ENGINE_PAR_SUPERGT_RELEASE, $ENGINE_PAR_SUPERGT_CHARACTER, $ENGINE_PAR_SUPERGT_CHAR_MODE, $ENGINE_PAR_SUPERGT_MIX, $ENGINE_PAR_SUPERGT_CHANNEL_LINK_MODE)
  4665. $vlhs0 := 0
  4666. while ($vlhs0<13)
  4667. %3n0yu[$vlhs0+322] := %texzx[$vlhs0]
  4668. inc($vlhs0)
  4669. end while
  4670. declare %hdf5n[5] := ($ENGINE_PAR_EFFECT_TYPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN, $ENGINE_PAR_TRANSLIM_THRESHOLD, $ENGINE_PAR_TRANSLIM_RELEASE, $ENGINE_PAR_TRANSLIM_CEILING)
  4671. $vlhs0 := 0
  4672. while ($vlhs0<5)
  4673. %3n0yu[$vlhs0+335] := %hdf5n[$vlhs0]
  4674. inc($vlhs0)
  4675. end while
  4676. declare %augte[10] := ($EFFECT_TYPE_NONE, $EFFECT_TYPE_DELAY, $EFFECT_TYPE_CHORUS, $EFFECT_TYPE_FLANGER, $EFFECT_TYPE_PHASER, $EFFECT_TYPE_REVERB, $EFFECT_TYPE_REVERB2, $EFFECT_TYPE_IRC, $EFFECT_TYPE_PLATEREVERB, $EFFECT_TYPE_GAINER)
  4677. declare %edmyi[131]
  4678. declare %oie55[57] := (1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 1, 2, 2, 3, 3, 3, 3, 2, 2, 2, 1, 2, 2, 3, 3, 3, 3, 2, 2, 2, 3, ...
  4679. 2, 2, 3, 3, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 2)
  4680. declare %wl2qc[57] := (0, 1, 2, 3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 23, 25, 27, 29, 32, 35, 38, 41, 42, 44, 46, 49, 52, 55, 58, 60, 62, 64, 65, 67, 69, 72, 75, 78, 81, 83, 85, 87, ...
  4681. 90, 92, 94, 97, 100, 102, 104, 106, 108, 111, 114, 117, 120, 123, 126, 129)
  4682. %edmyi[0] := $ENGINE_PAR_CUTOFF
  4683. %edmyi[1] := $ENGINE_PAR_CUTOFF
  4684. %edmyi[2] := $ENGINE_PAR_CUTOFF
  4685. declare %kcknp[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4686. $vlhs0 := 0
  4687. while ($vlhs0<2)
  4688. %edmyi[$vlhs0+3] := %kcknp[$vlhs0]
  4689. inc($vlhs0)
  4690. end while
  4691. declare %1b3at[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4692. $vlhs0 := 0
  4693. while ($vlhs0<2)
  4694. %edmyi[$vlhs0+5] := %1b3at[$vlhs0]
  4695. inc($vlhs0)
  4696. end while
  4697. declare %tutcy[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4698. $vlhs0 := 0
  4699. while ($vlhs0<2)
  4700. %edmyi[$vlhs0+7] := %tutcy[$vlhs0]
  4701. inc($vlhs0)
  4702. end while
  4703. declare %vcyyq[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4704. $vlhs0 := 0
  4705. while ($vlhs0<2)
  4706. %edmyi[$vlhs0+9] := %vcyyq[$vlhs0]
  4707. inc($vlhs0)
  4708. end while
  4709. declare %klatu[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4710. $vlhs0 := 0
  4711. while ($vlhs0<2)
  4712. %edmyi[$vlhs0+11] := %klatu[$vlhs0]
  4713. inc($vlhs0)
  4714. end while
  4715. declare %eg2vl[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4716. $vlhs0 := 0
  4717. while ($vlhs0<2)
  4718. %edmyi[$vlhs0+13] := %eg2vl[$vlhs0]
  4719. inc($vlhs0)
  4720. end while
  4721. declare %qracz[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4722. $vlhs0 := 0
  4723. while ($vlhs0<2)
  4724. %edmyi[$vlhs0+15] := %qracz[$vlhs0]
  4725. inc($vlhs0)
  4726. end while
  4727. declare %zh1cv[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4728. $vlhs0 := 0
  4729. while ($vlhs0<2)
  4730. %edmyi[$vlhs0+17] := %zh1cv[$vlhs0]
  4731. inc($vlhs0)
  4732. end while
  4733. declare %jlqd0[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4734. $vlhs0 := 0
  4735. while ($vlhs0<2)
  4736. %edmyi[$vlhs0+19] := %jlqd0[$vlhs0]
  4737. inc($vlhs0)
  4738. end while
  4739. declare %ew00i[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4740. $vlhs0 := 0
  4741. while ($vlhs0<2)
  4742. %edmyi[$vlhs0+21] := %ew00i[$vlhs0]
  4743. inc($vlhs0)
  4744. end while
  4745. declare %hjbsz[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4746. $vlhs0 := 0
  4747. while ($vlhs0<2)
  4748. %edmyi[$vlhs0+23] := %hjbsz[$vlhs0]
  4749. inc($vlhs0)
  4750. end while
  4751. declare %nhvld[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4752. $vlhs0 := 0
  4753. while ($vlhs0<2)
  4754. %edmyi[$vlhs0+25] := %nhvld[$vlhs0]
  4755. inc($vlhs0)
  4756. end while
  4757. declare %cc3td[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4758. $vlhs0 := 0
  4759. while ($vlhs0<2)
  4760. %edmyi[$vlhs0+27] := %cc3td[$vlhs0]
  4761. inc($vlhs0)
  4762. end while
  4763. declare %3ic20[3] := ($ENGINE_PAR_FREQ1, $ENGINE_PAR_BW1, $ENGINE_PAR_GAIN1)
  4764. $vlhs0 := 0
  4765. while ($vlhs0<3)
  4766. %edmyi[$vlhs0+29] := %3ic20[$vlhs0]
  4767. inc($vlhs0)
  4768. end while
  4769. declare %dpmhm[3] := ($ENGINE_PAR_GAIN1, $ENGINE_PAR_FREQ1, $ENGINE_PAR_BW1)
  4770. $vlhs0 := 0
  4771. while ($vlhs0<3)
  4772. %edmyi[$vlhs0+32] := %dpmhm[$vlhs0]
  4773. inc($vlhs0)
  4774. end while
  4775. declare %illyv[3] := ($ENGINE_PAR_GAIN1, $ENGINE_PAR_GAIN2, $ENGINE_PAR_GAIN3)
  4776. $vlhs0 := 0
  4777. while ($vlhs0<3)
  4778. %edmyi[$vlhs0+35] := %illyv[$vlhs0]
  4779. inc($vlhs0)
  4780. end while
  4781. declare %mas5a[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4782. $vlhs0 := 0
  4783. while ($vlhs0<3)
  4784. %edmyi[$vlhs0+38] := %mas5a[$vlhs0]
  4785. inc($vlhs0)
  4786. end while
  4787. %edmyi[41] := $ENGINE_PAR_CUTOFF
  4788. declare %pbshp[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4789. $vlhs0 := 0
  4790. while ($vlhs0<2)
  4791. %edmyi[$vlhs0+42] := %pbshp[$vlhs0]
  4792. inc($vlhs0)
  4793. end while
  4794. declare %xqovk[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4795. $vlhs0 := 0
  4796. while ($vlhs0<2)
  4797. %edmyi[$vlhs0+44] := %xqovk[$vlhs0]
  4798. inc($vlhs0)
  4799. end while
  4800. declare %ai5i1[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4801. $vlhs0 := 0
  4802. while ($vlhs0<3)
  4803. %edmyi[$vlhs0+46] := %ai5i1[$vlhs0]
  4804. inc($vlhs0)
  4805. end while
  4806. declare %on4bq[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4807. $vlhs0 := 0
  4808. while ($vlhs0<3)
  4809. %edmyi[$vlhs0+49] := %on4bq[$vlhs0]
  4810. inc($vlhs0)
  4811. end while
  4812. declare %sa3st[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4813. $vlhs0 := 0
  4814. while ($vlhs0<3)
  4815. %edmyi[$vlhs0+52] := %sa3st[$vlhs0]
  4816. inc($vlhs0)
  4817. end while
  4818. declare %2cich[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4819. $vlhs0 := 0
  4820. while ($vlhs0<3)
  4821. %edmyi[$vlhs0+55] := %2cich[$vlhs0]
  4822. inc($vlhs0)
  4823. end while
  4824. declare %rd5pj[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4825. $vlhs0 := 0
  4826. while ($vlhs0<2)
  4827. %edmyi[$vlhs0+58] := %rd5pj[$vlhs0]
  4828. inc($vlhs0)
  4829. end while
  4830. declare %zexmu[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4831. $vlhs0 := 0
  4832. while ($vlhs0<2)
  4833. %edmyi[$vlhs0+60] := %zexmu[$vlhs0]
  4834. inc($vlhs0)
  4835. end while
  4836. declare %phywd[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4837. $vlhs0 := 0
  4838. while ($vlhs0<2)
  4839. %edmyi[$vlhs0+62] := %phywd[$vlhs0]
  4840. inc($vlhs0)
  4841. end while
  4842. %edmyi[64] := $ENGINE_PAR_CUTOFF
  4843. declare %awih0[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4844. $vlhs0 := 0
  4845. while ($vlhs0<2)
  4846. %edmyi[$vlhs0+65] := %awih0[$vlhs0]
  4847. inc($vlhs0)
  4848. end while
  4849. declare %gmgrm[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4850. $vlhs0 := 0
  4851. while ($vlhs0<2)
  4852. %edmyi[$vlhs0+67] := %gmgrm[$vlhs0]
  4853. inc($vlhs0)
  4854. end while
  4855. declare %y1o3v[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4856. $vlhs0 := 0
  4857. while ($vlhs0<3)
  4858. %edmyi[$vlhs0+69] := %y1o3v[$vlhs0]
  4859. inc($vlhs0)
  4860. end while
  4861. declare %q4uub[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4862. $vlhs0 := 0
  4863. while ($vlhs0<3)
  4864. %edmyi[$vlhs0+72] := %q4uub[$vlhs0]
  4865. inc($vlhs0)
  4866. end while
  4867. declare %myhwk[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4868. $vlhs0 := 0
  4869. while ($vlhs0<3)
  4870. %edmyi[$vlhs0+75] := %myhwk[$vlhs0]
  4871. inc($vlhs0)
  4872. end while
  4873. declare %1brdt[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4874. $vlhs0 := 0
  4875. while ($vlhs0<3)
  4876. %edmyi[$vlhs0+78] := %1brdt[$vlhs0]
  4877. inc($vlhs0)
  4878. end while
  4879. declare %wn2uu[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4880. $vlhs0 := 0
  4881. while ($vlhs0<2)
  4882. %edmyi[$vlhs0+81] := %wn2uu[$vlhs0]
  4883. inc($vlhs0)
  4884. end while
  4885. declare %mj20c[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4886. $vlhs0 := 0
  4887. while ($vlhs0<2)
  4888. %edmyi[$vlhs0+83] := %mj20c[$vlhs0]
  4889. inc($vlhs0)
  4890. end while
  4891. declare %tlwaw[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4892. $vlhs0 := 0
  4893. while ($vlhs0<2)
  4894. %edmyi[$vlhs0+85] := %tlwaw[$vlhs0]
  4895. inc($vlhs0)
  4896. end while
  4897. declare %2eyy0[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4898. $vlhs0 := 0
  4899. while ($vlhs0<3)
  4900. %edmyi[$vlhs0+87] := %2eyy0[$vlhs0]
  4901. inc($vlhs0)
  4902. end while
  4903. declare %n1kea[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4904. $vlhs0 := 0
  4905. while ($vlhs0<2)
  4906. %edmyi[$vlhs0+90] := %n1kea[$vlhs0]
  4907. inc($vlhs0)
  4908. end while
  4909. declare %xagdn[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4910. $vlhs0 := 0
  4911. while ($vlhs0<2)
  4912. %edmyi[$vlhs0+92] := %xagdn[$vlhs0]
  4913. inc($vlhs0)
  4914. end while
  4915. declare %jwpjy[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4916. $vlhs0 := 0
  4917. while ($vlhs0<3)
  4918. %edmyi[$vlhs0+94] := %jwpjy[$vlhs0]
  4919. inc($vlhs0)
  4920. end while
  4921. declare %nsmio[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4922. $vlhs0 := 0
  4923. while ($vlhs0<3)
  4924. %edmyi[$vlhs0+97] := %nsmio[$vlhs0]
  4925. inc($vlhs0)
  4926. end while
  4927. declare %ykdle[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4928. $vlhs0 := 0
  4929. while ($vlhs0<2)
  4930. %edmyi[$vlhs0+100] := %ykdle[$vlhs0]
  4931. inc($vlhs0)
  4932. end while
  4933. declare %n0fmk[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4934. $vlhs0 := 0
  4935. while ($vlhs0<2)
  4936. %edmyi[$vlhs0+102] := %n0fmk[$vlhs0]
  4937. inc($vlhs0)
  4938. end while
  4939. declare %vb5ih[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4940. $vlhs0 := 0
  4941. while ($vlhs0<2)
  4942. %edmyi[$vlhs0+104] := %vb5ih[$vlhs0]
  4943. inc($vlhs0)
  4944. end while
  4945. declare %ilpba[2] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE)
  4946. $vlhs0 := 0
  4947. while ($vlhs0<2)
  4948. %edmyi[$vlhs0+106] := %ilpba[$vlhs0]
  4949. inc($vlhs0)
  4950. end while
  4951. declare %gdxz4[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4952. $vlhs0 := 0
  4953. while ($vlhs0<3)
  4954. %edmyi[$vlhs0+108] := %gdxz4[$vlhs0]
  4955. inc($vlhs0)
  4956. end while
  4957. declare %lglcl[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  4958. $vlhs0 := 0
  4959. while ($vlhs0<3)
  4960. %edmyi[$vlhs0+111] := %lglcl[$vlhs0]
  4961. inc($vlhs0)
  4962. end while
  4963. declare %qeod1[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_BANDWIDTH)
  4964. $vlhs0 := 0
  4965. while ($vlhs0<3)
  4966. %edmyi[$vlhs0+114] := %qeod1[$vlhs0]
  4967. inc($vlhs0)
  4968. end while
  4969. declare %v3oap[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_BANDWIDTH)
  4970. $vlhs0 := 0
  4971. while ($vlhs0<3)
  4972. %edmyi[$vlhs0+117] := %v3oap[$vlhs0]
  4973. inc($vlhs0)
  4974. end while
  4975. declare %c1fte[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_BANDWIDTH)
  4976. $vlhs0 := 0
  4977. while ($vlhs0<3)
  4978. %edmyi[$vlhs0+120] := %c1fte[$vlhs0]
  4979. inc($vlhs0)
  4980. end while
  4981. declare %naaji[3] := ($ENGINE_PAR_FORMANT_TALK, $ENGINE_PAR_FORMANT_SHARP, $ENGINE_PAR_FORMANT_SIZE)
  4982. $vlhs0 := 0
  4983. while ($vlhs0<3)
  4984. %edmyi[$vlhs0+123] := %naaji[$vlhs0]
  4985. inc($vlhs0)
  4986. end while
  4987. declare %k2elx[3] := ($ENGINE_PAR_FORMANT_TALK, $ENGINE_PAR_FORMANT_SHARP, $ENGINE_PAR_FORMANT_SIZE)
  4988. $vlhs0 := 0
  4989. while ($vlhs0<3)
  4990. %edmyi[$vlhs0+126] := %k2elx[$vlhs0]
  4991. inc($vlhs0)
  4992. end while
  4993. declare %e2mqa[2] := ($ENGINE_PAR_HP_CUTOFF, $ENGINE_PAR_LP_CUTOFF)
  4994. $vlhs0 := 0
  4995. while ($vlhs0<2)
  4996. %edmyi[$vlhs0+129] := %e2mqa[$vlhs0]
  4997. inc($vlhs0)
  4998. end while
  4999. declare %mdgl1[57] := ($FILTER_TYPE_LP1POLE, $FILTER_TYPE_HP1POLE, $FILTER_TYPE_BP2POLE, $FILTER_TYPE_LP2POLE, $FILTER_TYPE_HP2POLE, $FILTER_TYPE_LP4POLE, $FILTER_TYPE_HP4POLE, $FILTER_TYPE_BP4POLE, $FILTER_TYPE_BR4POLE, $FILTER_TYPE_LP6POLE, $FILTER_TYPE_PHASER, $FILTER_TYPE_VOWELA, $FILTER_TYPE_VOWELB, $FILTER_TYPE_PRO52, $FILTER_TYPE_LADDER, $FILTER_TYPE_VERSATILE, $FILTER_TYPE_EQ1BAND, $FILTER_TYPE_EQ2BAND, $FILTER_TYPE_EQ3BAND, $FILTER_TYPE_DAFT_LP, $FILTER_TYPE_SV_LP1, $FILTER_TYPE_SV_LP2, $FILTER_TYPE_SV_LP4, $FILTER_TYPE_LDR_LP1, $FILTER_TYPE_LDR_LP2, $FILTER_TYPE_LDR_LP3, $FILTER_TYPE_LDR_LP4, $FILTER_TYPE_AR_LP2, $FILTER_TYPE_AR_LP4, $FILTER_TYPE_AR_LP24, $FILTER_TYPE_SV_HP1, $FILTER_TYPE_SV_HP2, $FILTER_TYPE_SV_HP4, $FILTER_TYPE_LDR_HP1, $FILTER_TYPE_LDR_HP2, $FILTER_TYPE_LDR_HP3, $FILTER_TYPE_LDR_HP4, $FILTER_TYPE_AR_HP2, $FILTER_TYPE_AR_HP4, $FILTER_TYPE_AR_HP24, $FILTER_TYPE_DAFT_HP, ...
  5000. $FILTER_TYPE_SV_BP2, $FILTER_TYPE_SV_BP4, $FILTER_TYPE_LDR_BP2, $FILTER_TYPE_LDR_BP4, $FILTER_TYPE_AR_BP2, $FILTER_TYPE_AR_BP4, $FILTER_TYPE_AR_BP24, $FILTER_TYPE_SV_NOTCH4, $FILTER_TYPE_LDR_PEAK, $FILTER_TYPE_LDR_NOTCH, $FILTER_TYPE_SV_PAR_LPHP, $FILTER_TYPE_SV_PAR_BPBP, $FILTER_TYPE_SV_SER_LPHP, $FILTER_TYPE_FORMANT_1, $FILTER_TYPE_FORMANT_2, $FILTER_TYPE_SIMPLE_LPHP)
  5001. declare !gdlxl[57]
  5002. !gdlxl[0] := "LP 1 pole"
  5003. !gdlxl[1] := "HP 1 pole"
  5004. !gdlxl[2] := "BP 2 pole"
  5005. !gdlxl[3] := "LP 2 pole"
  5006. !gdlxl[4] := "HP 2 pole"
  5007. !gdlxl[5] := "LP 4 pole"
  5008. !gdlxl[6] := "HP 4 pole"
  5009. !gdlxl[7] := "BP 4 pole"
  5010. !gdlxl[8] := "BR 4 pole"
  5011. !gdlxl[9] := "LP 6 pole"
  5012. !gdlxl[10] := "Phaser"
  5013. !gdlxl[11] := "Vowel A"
  5014. !gdlxl[12] := "Vowel B"
  5015. !gdlxl[13] := "Pro 52"
  5016. !gdlxl[14] := "Ladder"
  5017. !gdlxl[15] := "Versatile"
  5018. !gdlxl[16] := "EQ 1 Band"
  5019. !gdlxl[17] := "EQ 2 Band"
  5020. !gdlxl[18] := "EQ 3 Band"
  5021. !gdlxl[19] := "LP Daft"
  5022. !gdlxl[20] := "LP 1 pole SV"
  5023. !gdlxl[21] := "LP 2 pole SV"
  5024. !gdlxl[22] := "LP 4 pole SV"
  5025. !gdlxl[23] := "LP 1 pole LDR"
  5026. !gdlxl[24] := "LP 2 pole LDR"
  5027. !gdlxl[25] := "LP 3 pole LDR"
  5028. !gdlxl[26] := "LP 4 pole LDR"
  5029. !gdlxl[27] := "LP 2 pole AR"
  5030. !gdlxl[28] := "LP 4 pole AR"
  5031. !gdlxl[29] := "LP 2/4 pole AR"
  5032. !gdlxl[30] := "HP 1 pole SV"
  5033. !gdlxl[31] := "HP 2 pole SV"
  5034. !gdlxl[32] := "HP 4 pole SV"
  5035. !gdlxl[33] := "HP 1 pole LDR"
  5036. !gdlxl[34] := "HP 2 pole LDR"
  5037. !gdlxl[35] := "HP 3 pole LDR"
  5038. !gdlxl[36] := "HP 4 pole LDR"
  5039. !gdlxl[37] := "HP 2 pole AR"
  5040. !gdlxl[38] := "HP 4 pole AR"
  5041. !gdlxl[39] := "HP 2 pole AR"
  5042. !gdlxl[40] := "HP Daft"
  5043. !gdlxl[41] := "BP 2 pole SV"
  5044. !gdlxl[42] := "BP 4 pole SV"
  5045. !gdlxl[43] := "BP 2 pole LDR"
  5046. !gdlxl[44] := "BP 4 pole LDR"
  5047. !gdlxl[45] := "BP 2 pole AR"
  5048. !gdlxl[46] := "BP 4 pole AR"
  5049. !gdlxl[47] := "BP 2/4 pole AR"
  5050. !gdlxl[48] := "Notch 4 pole SV"
  5051. !gdlxl[49] := "Peak LDR"
  5052. !gdlxl[50] := "Notch LDR"
  5053. !gdlxl[51] := "Parallel LPHP SV"
  5054. !gdlxl[52] := "Parallel BPBP SV"
  5055. !gdlxl[53] := "Serial LPHP SV"
  5056. !gdlxl[54] := "Formant 1"
  5057. !gdlxl[55] := "Formant 2"
  5058. !gdlxl[56] := "LP & HP"
  5059. declare !rnens[17]
  5060. !rnens[0] := ""
  5061. !rnens[1] := "Cutoff"
  5062. !rnens[2] := "Reso"
  5063. !rnens[3] := "Drive"
  5064. !rnens[4] := "Gain"
  5065. !rnens[5] := "Gain"
  5066. !rnens[6] := "Gain"
  5067. !rnens[7] := "Talk"
  5068. !rnens[8] := "Sharp"
  5069. !rnens[9] := "Size"
  5070. !rnens[10] := "Width"
  5071. !rnens[11] := "Freq"
  5072. !rnens[12] := "Width"
  5073. !rnens[13] := "LP Cutoff"
  5074. !rnens[14] := "HP Cutoff"
  5075. !rnens[15] := "Freq"
  5076. !rnens[16] := "Freq"
  5077. declare !njfof[15]
  5078. !njfof[0] := ""
  5079. !njfof[1] := "Hz"
  5080. !njfof[2] := "%"
  5081. !njfof[3] := "dB"
  5082. !njfof[4] := "dB"
  5083. !njfof[5] := "dB"
  5084. !njfof[6] := "dB"
  5085. !njfof[7] := "%"
  5086. !njfof[8] := "%"
  5087. !njfof[9] := "%"
  5088. !njfof[10] := "Oct"
  5089. !njfof[11] := "Hz"
  5090. !njfof[12] := "Oct"
  5091. !njfof[13] := "Hz"
  5092. !njfof[14] := "Hz"
  5093. declare %cz2mn[17] := (0, $ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN, $ENGINE_PAR_GAIN1, $ENGINE_PAR_GAIN2, $ENGINE_PAR_GAIN3, $ENGINE_PAR_FORMANT_TALK, $ENGINE_PAR_FORMANT_SHARP, $ENGINE_PAR_FORMANT_SIZE, $ENGINE_PAR_BANDWIDTH, $ENGINE_PAR_FREQ1, $ENGINE_PAR_BW1, $ENGINE_PAR_LP_CUTOFF, $ENGINE_PAR_HP_CUTOFF, $ENGINE_PAR_FREQ2, $ENGINE_PAR_FREQ3)
  5094. declare %5gftk[171]
  5095. $fg4rw := 0
  5096. while ($fg4rw<57)
  5097. $g5k3r := 0
  5098. while ($g5k3r<%oie55[$fg4rw])
  5099. %5gftk[3*$fg4rw+$g5k3r] := search(%cz2mn,%edmyi[%wl2qc[$fg4rw]+$g5k3r])
  5100. inc($g5k3r)
  5101. end while
  5102. inc($fg4rw)
  5103. end while
  5104. end if
  5105. if (1=1)
  5106. declare %uxwoh[106]
  5107. declare %xdshj[38] := (1, 3, 3, 3, 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 2, 1, 3, 3, 3, 3, 3, 3, 3, 3)
  5108. declare %osxle[38] := (0, 1, 4, 7, 10, 11, 14, 17, 20, 23, 26, 29, 32, 35, 38, 40, 43, 46, 49, 52, 55, 58, 61, 64, 67, 70, 73, 76, 79, 81, 82, 85, 88, 91, 94, 97, 100, 103)
  5109. %uxwoh[0] := -1
  5110. declare %lbsxs[3] := ($ENGINE_PAR_RV_SIZE, $ENGINE_PAR_RV_STEREO, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
  5111. $vlhs0 := 0
  5112. while ($vlhs0<3)
  5113. %uxwoh[$vlhs0+1] := %lbsxs[$vlhs0]
  5114. inc($vlhs0)
  5115. end while
  5116. declare %1rif3[3] := ($ENGINE_PAR_RV2_TIME, $ENGINE_PAR_RV2_SIZE, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
  5117. $vlhs0 := 0
  5118. while ($vlhs0<3)
  5119. %uxwoh[$vlhs0+4] := %1rif3[$vlhs0]
  5120. inc($vlhs0)
  5121. end while
  5122. declare %l2um1[3] := ($ENGINE_PAR_PR_DECAY, $ENGINE_PAR_PR_LOWSHELF, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
  5123. $vlhs0 := 0
  5124. while ($vlhs0<3)
  5125. %uxwoh[$vlhs0+7] := %l2um1[$vlhs0]
  5126. inc($vlhs0)
  5127. end while
  5128. %uxwoh[10] := $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN
  5129. declare %zfsml[3] := ($ENGINE_PAR_SCOMP_THRESHOLD, $ENGINE_PAR_SCOMP_RATIO, $ENGINE_PAR_SCOMP_MAKEUP)
  5130. $vlhs0 := 0
  5131. while ($vlhs0<3)
  5132. %uxwoh[$vlhs0+11] := %zfsml[$vlhs0]
  5133. inc($vlhs0)
  5134. end while
  5135. declare %jov11[3] := ($ENGINE_PAR_FCOMP_INPUT, $ENGINE_PAR_FCOMP_RATIO, $ENGINE_PAR_FCOMP_MAKEUP)
  5136. $vlhs0 := 0
  5137. while ($vlhs0<3)
  5138. %uxwoh[$vlhs0+14] := %jov11[$vlhs0]
  5139. inc($vlhs0)
  5140. end while
  5141. declare %wh5i0[3] := ($ENGINE_PAR_TR_INPUT, $ENGINE_PAR_TR_ATTACK, $ENGINE_PAR_TR_SUSTAIN)
  5142. $vlhs0 := 0
  5143. while ($vlhs0<3)
  5144. %uxwoh[$vlhs0+17] := %wh5i0[$vlhs0]
  5145. inc($vlhs0)
  5146. end while
  5147. declare %cqdeq[3] := ($ENGINE_PAR_TP_GAIN, $ENGINE_PAR_TP_WARMTH, $ENGINE_PAR_TP_HF_ROLLOFF)
  5148. $vlhs0 := 0
  5149. while ($vlhs0<3)
  5150. %uxwoh[$vlhs0+20] := %cqdeq[$vlhs0]
  5151. inc($vlhs0)
  5152. end while
  5153. declare %t3u5z[3] := ($ENGINE_PAR_JMP_PREAMP, $ENGINE_PAR_JMP_TREBLE, $ENGINE_PAR_JMP_MASTER)
  5154. $vlhs0 := 0
  5155. while ($vlhs0<3)
  5156. %uxwoh[$vlhs0+23] := %t3u5z[$vlhs0]
  5157. inc($vlhs0)
  5158. end while
  5159. declare %fzdla[3] := ($ENGINE_PAR_TW_VOLUME, $ENGINE_PAR_TW_BASS, $ENGINE_PAR_TW_TREBLE)
  5160. $vlhs0 := 0
  5161. while ($vlhs0<3)
  5162. %uxwoh[$vlhs0+26] := %fzdla[$vlhs0]
  5163. inc($vlhs0)
  5164. end while
  5165. declare %wiihf[3] := ($ENGINE_PAR_SK_DRIVE, $ENGINE_PAR_SK_TONE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
  5166. $vlhs0 := 0
  5167. while ($vlhs0<3)
  5168. %uxwoh[$vlhs0+29] := %wiihf[$vlhs0]
  5169. inc($vlhs0)
  5170. end while
  5171. declare %x21im[3] := ($ENGINE_PAR_DRIVE, $ENGINE_PAR_DAMPING, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
  5172. $vlhs0 := 0
  5173. while ($vlhs0<3)
  5174. %uxwoh[$vlhs0+32] := %x21im[$vlhs0]
  5175. inc($vlhs0)
  5176. end while
  5177. declare %vjf05[3] := ($ENGINE_PAR_BITS, $ENGINE_PAR_FREQUENCY, $ENGINE_PAR_NOISELEVEL)
  5178. $vlhs0 := 0
  5179. while ($vlhs0<3)
  5180. %uxwoh[$vlhs0+35] := %vjf05[$vlhs0]
  5181. inc($vlhs0)
  5182. end while
  5183. declare %ru3th[2] := ($ENGINE_PAR_SHAPE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
  5184. $vlhs0 := 0
  5185. while ($vlhs0<2)
  5186. %uxwoh[$vlhs0+38] := %ru3th[$vlhs0]
  5187. inc($vlhs0)
  5188. end while
  5189. declare %bkbgp[3] := ($ENGINE_PAR_CB_TREBLE, $ENGINE_PAR_CB_BASS, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
  5190. $vlhs0 := 0
  5191. while ($vlhs0<3)
  5192. %uxwoh[$vlhs0+40] := %bkbgp[$vlhs0]
  5193. inc($vlhs0)
  5194. end while
  5195. declare %q2h35[3] := ($ENGINE_PAR_V5_PREGAINRHYTHM, $ENGINE_PAR_V5_PRESENCE, $ENGINE_PAR_V5_POSTGAIN)
  5196. $vlhs0 := 0
  5197. while ($vlhs0<3)
  5198. %uxwoh[$vlhs0+43] := %q2h35[$vlhs0]
  5199. inc($vlhs0)
  5200. end while
  5201. declare %alwfk[3] := ($ENGINE_PAR_AC_BRILLIANTVOLUME, $ENGINE_PAR_AC_TONECUT, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
  5202. $vlhs0 := 0
  5203. while ($vlhs0<3)
  5204. %uxwoh[$vlhs0+46] := %alwfk[$vlhs0]
  5205. inc($vlhs0)
  5206. end while
  5207. declare %peqqs[3] := ($ENGINE_PAR_CT_DISTORTION, $ENGINE_PAR_CT_FILTER, $ENGINE_PAR_CT_TONE)
  5208. $vlhs0 := 0
  5209. while ($vlhs0<3)
  5210. %uxwoh[$vlhs0+49] := %peqqs[$vlhs0]
  5211. inc($vlhs0)
  5212. end while
  5213. declare %dw0i3[3] := ($ENGINE_PAR_DS_DRIVE, $ENGINE_PAR_DS_TONE, $ENGINE_PAR_DS_TREBLE)
  5214. $vlhs0 := 0
  5215. while ($vlhs0<3)
  5216. %uxwoh[$vlhs0+52] := %dw0i3[$vlhs0]
  5217. inc($vlhs0)
  5218. end while
  5219. declare %cr3an[3] := ($ENGINE_PAR_HS_PRENORMAL, $ENGINE_PAR_HS_TREBLE, $ENGINE_PAR_HS_MASTER)
  5220. $vlhs0 := 0
  5221. while ($vlhs0<3)
  5222. %uxwoh[$vlhs0+55] := %cr3an[$vlhs0]
  5223. inc($vlhs0)
  5224. end while
  5225. declare %l1ipf[3] := ($ENGINE_PAR_RT_SPEED, $ENGINE_PAR_RT_BALANCE, $ENGINE_PAR_RT_MIX)
  5226. $vlhs0 := 0
  5227. while ($vlhs0<3)
  5228. %uxwoh[$vlhs0+58] := %l1ipf[$vlhs0]
  5229. inc($vlhs0)
  5230. end while
  5231. declare %tlsfi[3] := ($ENGINE_PAR_PH_SPEED, $ENGINE_PAR_PH_DEPTH, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
  5232. $vlhs0 := 0
  5233. while ($vlhs0<3)
  5234. %uxwoh[$vlhs0+61] := %tlsfi[$vlhs0]
  5235. inc($vlhs0)
  5236. end while
  5237. declare %fc4tz[3] := ($ENGINE_PAR_FL_SPEED, $ENGINE_PAR_FL_DEPTH, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
  5238. $vlhs0 := 0
  5239. while ($vlhs0<3)
  5240. %uxwoh[$vlhs0+64] := %fc4tz[$vlhs0]
  5241. inc($vlhs0)
  5242. end while
  5243. declare %yljpj[3] := ($ENGINE_PAR_CH_SPEED, $ENGINE_PAR_CH_DEPTH, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
  5244. $vlhs0 := 0
  5245. while ($vlhs0<3)
  5246. %uxwoh[$vlhs0+67] := %yljpj[$vlhs0]
  5247. inc($vlhs0)
  5248. end while
  5249. declare %0hmse[3] := ($ENGINE_PAR_LIM_IN_GAIN, $ENGINE_PAR_LIM_RELEASE, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
  5250. $vlhs0 := 0
  5251. while ($vlhs0<3)
  5252. %uxwoh[$vlhs0+70] := %0hmse[$vlhs0]
  5253. inc($vlhs0)
  5254. end while
  5255. declare %esfpr[3] := ($ENGINE_PAR_DL_TIME, $ENGINE_PAR_DL_FEEDBACK, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
  5256. $vlhs0 := 0
  5257. while ($vlhs0<3)
  5258. %uxwoh[$vlhs0+73] := %esfpr[$vlhs0]
  5259. inc($vlhs0)
  5260. end while
  5261. declare %uup2u[3] := ($ENGINE_PAR_RDL_TIME, $ENGINE_PAR_RDL_FEEDBACK, $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
  5262. $vlhs0 := 0
  5263. while ($vlhs0<3)
  5264. %uxwoh[$vlhs0+76] := %uup2u[$vlhs0]
  5265. inc($vlhs0)
  5266. end while
  5267. declare %e2zel[2] := ($ENGINE_PAR_SENDLEVEL_0, $ENGINE_PAR_SENDLEVEL_1)
  5268. $vlhs0 := 0
  5269. while ($vlhs0<2)
  5270. %uxwoh[$vlhs0+79] := %e2zel[$vlhs0]
  5271. inc($vlhs0)
  5272. end while
  5273. %uxwoh[81] := -1
  5274. declare %iiapa[3] := ($ENGINE_PAR_STEREO, $ENGINE_PAR_STEREO_PAN, $ENGINE_PAR_INSERT_EFFECT_OUTPUT_GAIN)
  5275. $vlhs0 := 0
  5276. while ($vlhs0<3)
  5277. %uxwoh[$vlhs0+82] := %iiapa[$vlhs0]
  5278. inc($vlhs0)
  5279. end while
  5280. declare %dcs5v[3] := ($ENGINE_PAR_CUTOFF, $ENGINE_PAR_RESONANCE, $ENGINE_PAR_GAIN)
  5281. $vlhs0 := 0
  5282. while ($vlhs0<3)
  5283. %uxwoh[$vlhs0+85] := %dcs5v[$vlhs0]
  5284. inc($vlhs0)
  5285. end while
  5286. declare %lhiuq[3] := ($ENGINE_PAR_SEQ_LF_GAIN, $ENGINE_PAR_SEQ_LMF_GAIN, $ENGINE_PAR_SEQ_HMF_GAIN)
  5287. $vlhs0 := 0
  5288. while ($vlhs0<3)
  5289. %uxwoh[$vlhs0+88] := %lhiuq[$vlhs0]
  5290. inc($vlhs0)
  5291. end while
  5292. declare %0bonf[3] := ($ENGINE_PAR_CHORAL_RATE, $ENGINE_PAR_CHORAL_AMOUNT, $ENGINE_PAR_CHORAL_MIX)
  5293. $vlhs0 := 0
  5294. while ($vlhs0<3)
  5295. %uxwoh[$vlhs0+91] := %0bonf[$vlhs0]
  5296. inc($vlhs0)
  5297. end while
  5298. declare %51xl0[3] := ($ENGINE_PAR_FLAIR_RATE, $ENGINE_PAR_FLAIR_AMOUNT, $ENGINE_PAR_FLAIR_MIX)
  5299. $vlhs0 := 0
  5300. while ($vlhs0<3)
  5301. %uxwoh[$vlhs0+94] := %51xl0[$vlhs0]
  5302. inc($vlhs0)
  5303. end while
  5304. declare %uidjt[3] := ($ENGINE_PAR_PHASIS_RATE, $ENGINE_PAR_PHASIS_AMOUNT, $ENGINE_PAR_PHASIS_MIX)
  5305. $vlhs0 := 0
  5306. while ($vlhs0<3)
  5307. %uxwoh[$vlhs0+97] := %uidjt[$vlhs0]
  5308. inc($vlhs0)
  5309. end while
  5310. declare %nsddt[3] := ($ENGINE_PAR_SUPERGT_TRIM, $ENGINE_PAR_SUPERGT_SATURATION, $ENGINE_PAR_SUPERGT_COMPRESS)
  5311. $vlhs0 := 0
  5312. while ($vlhs0<3)
  5313. %uxwoh[$vlhs0+100] := %nsddt[$vlhs0]
  5314. inc($vlhs0)
  5315. end while
  5316. declare %xathy[3] := ($ENGINE_PAR_TRANSLIM_THRESHOLD, $ENGINE_PAR_TRANSLIM_RELEASE, $ENGINE_PAR_TRANSLIM_CEILING)
  5317. $vlhs0 := 0
  5318. while ($vlhs0<3)
  5319. %uxwoh[$vlhs0+103] := %xathy[$vlhs0]
  5320. inc($vlhs0)
  5321. end while
  5322. declare !yyfkk[106]
  5323. !yyfkk[0] := ""
  5324. !yyfkk[1] := "Size"
  5325. !yyfkk[2] := "Stereo"
  5326. !yyfkk[3] := "Level"
  5327. !yyfkk[4] := "Time"
  5328. !yyfkk[5] := "Size"
  5329. !yyfkk[6] := "Level"
  5330. !yyfkk[7] := "Decay"
  5331. !yyfkk[8] := "Low Shelf"
  5332. !yyfkk[9] := "Level"
  5333. !yyfkk[10] := "Level"
  5334. !yyfkk[11] := "Threshold"
  5335. !yyfkk[12] := "Ratio"
  5336. !yyfkk[13] := "Makeup"
  5337. !yyfkk[14] := "Input"
  5338. !yyfkk[15] := "Ratio"
  5339. !yyfkk[16] := "Makeup"
  5340. !yyfkk[17] := "Input"
  5341. !yyfkk[18] := "Attack"
  5342. !yyfkk[19] := "Sustain"
  5343. !yyfkk[20] := "Gain"
  5344. !yyfkk[21] := "Warmth"
  5345. !yyfkk[22] := "Damp"
  5346. !yyfkk[23] := "Preamp"
  5347. !yyfkk[24] := "Treble"
  5348. !yyfkk[25] := "Master"
  5349. !yyfkk[26] := "Gain"
  5350. !yyfkk[27] := "Bass"
  5351. !yyfkk[28] := "Treble"
  5352. !yyfkk[29] := "Drive"
  5353. !yyfkk[30] := "Tone"
  5354. !yyfkk[31] := "Output"
  5355. !yyfkk[32] := "Drive"
  5356. !yyfkk[33] := "Damp"
  5357. !yyfkk[34] := "Output"
  5358. !yyfkk[35] := "Bits"
  5359. !yyfkk[36] := "Frequency"
  5360. !yyfkk[37] := "Noiselevel"
  5361. !yyfkk[38] := "Drive"
  5362. !yyfkk[39] := "Output"
  5363. !yyfkk[40] := "Treble"
  5364. !yyfkk[41] := "Bass"
  5365. !yyfkk[42] := "Output"
  5366. !yyfkk[43] := "Gain"
  5367. !yyfkk[44] := "Presence"
  5368. !yyfkk[45] := "Post Gain"
  5369. !yyfkk[46] := "Gain"
  5370. !yyfkk[47] := "Hi Cut"
  5371. !yyfkk[48] := "Output"
  5372. !yyfkk[49] := "Dist"
  5373. !yyfkk[50] := "Filter"
  5374. !yyfkk[51] := "Tone"
  5375. !yyfkk[52] := "Drive"
  5376. !yyfkk[53] := "Tone"
  5377. !yyfkk[54] := "Treble"
  5378. !yyfkk[55] := "Drive"
  5379. !yyfkk[56] := "Treble"
  5380. !yyfkk[57] := "Master"
  5381. !yyfkk[58] := "Speed"
  5382. !yyfkk[59] := "Balance"
  5383. !yyfkk[60] := "Wet"
  5384. !yyfkk[61] := "Speed"
  5385. !yyfkk[62] := "Depth"
  5386. !yyfkk[63] := "Mix"
  5387. !yyfkk[64] := "Speed"
  5388. !yyfkk[65] := "Depth"
  5389. !yyfkk[66] := "Mix"
  5390. !yyfkk[67] := "Speed"
  5391. !yyfkk[68] := "Depth"
  5392. !yyfkk[69] := "Mix"
  5393. !yyfkk[70] := "Input"
  5394. !yyfkk[71] := "Release"
  5395. !yyfkk[72] := "Output"
  5396. !yyfkk[73] := "Time"
  5397. !yyfkk[74] := "Feedback"
  5398. !yyfkk[75] := "Amt"
  5399. !yyfkk[76] := "Time"
  5400. !yyfkk[77] := "Feedback"
  5401. !yyfkk[78] := "Level"
  5402. !yyfkk[79] := "Send 1"
  5403. !yyfkk[80] := "Send 2"
  5404. !yyfkk[81] := " "
  5405. !yyfkk[82] := "Width"
  5406. !yyfkk[83] := "Pan"
  5407. !yyfkk[84] := "Level"
  5408. !yyfkk[85] := "Cutoff"
  5409. !yyfkk[86] := "Resonance"
  5410. !yyfkk[87] := "Drive"
  5411. !yyfkk[88] := "LF Gain"
  5412. !yyfkk[89] := "LMF Gain"
  5413. !yyfkk[90] := "HMF Gain"
  5414. !yyfkk[91] := "Speed"
  5415. !yyfkk[92] := "Depth"
  5416. !yyfkk[93] := "Mix"
  5417. !yyfkk[94] := "Speed"
  5418. !yyfkk[95] := "Depth"
  5419. !yyfkk[96] := "Mix"
  5420. !yyfkk[97] := "Speed"
  5421. !yyfkk[98] := "Depth"
  5422. !yyfkk[99] := "Mix"
  5423. !yyfkk[100] := "Input"
  5424. !yyfkk[101] := "Saturate"
  5425. !yyfkk[102] := "Compress"
  5426. !yyfkk[103] := "Threshold"
  5427. !yyfkk[104] := "Release"
  5428. !yyfkk[105] := "Ceiling"
  5429. declare !1s04y[8]
  5430. !1s04y[0] := ""
  5431. !1s04y[1] := "dB"
  5432. !1s04y[2] := "Hz"
  5433. !1s04y[3] := "%"
  5434. !1s04y[4] := "ms"
  5435. !1s04y[5] := "Oct"
  5436. !1s04y[6] := "st"
  5437. !1s04y[7] := ": 1"
  5438. declare %wmjdo[107]
  5439. declare %0hhbc[38] := (0, 1, 4, 7, 10, 11, 14, 17, 20, 23, 26, 29, 32, 35, 38, 40, 43, 46, 49, 52, 55, 58, 61, 64, 67, 70, 73, 76, 79, 81, 82, 85, 88, 92, 95, 98, 101, 104)
  5440. %wmjdo[0] := 0
  5441. declare %ig2z0[3] := (4, 3, 1)
  5442. $vlhs0 := 0
  5443. while ($vlhs0<3)
  5444. %wmjdo[$vlhs0+1] := %ig2z0[$vlhs0]
  5445. inc($vlhs0)
  5446. end while
  5447. declare %2fzxs[3] := (4, 3, 1)
  5448. $vlhs0 := 0
  5449. while ($vlhs0<3)
  5450. %wmjdo[$vlhs0+4] := %2fzxs[$vlhs0]
  5451. inc($vlhs0)
  5452. end while
  5453. declare %5eqgb[3] := (4, 3, 1)
  5454. $vlhs0 := 0
  5455. while ($vlhs0<3)
  5456. %wmjdo[$vlhs0+7] := %5eqgb[$vlhs0]
  5457. inc($vlhs0)
  5458. end while
  5459. %wmjdo[10] := 1
  5460. declare %b0g2c[3] := (1, 7, 1)
  5461. $vlhs0 := 0
  5462. while ($vlhs0<3)
  5463. %wmjdo[$vlhs0+11] := %b0g2c[$vlhs0]
  5464. inc($vlhs0)
  5465. end while
  5466. declare %rreiy[3] := (1, 7, 1)
  5467. $vlhs0 := 0
  5468. while ($vlhs0<3)
  5469. %wmjdo[$vlhs0+14] := %rreiy[$vlhs0]
  5470. inc($vlhs0)
  5471. end while
  5472. declare %5khr1[3] := (1, 3, 3)
  5473. $vlhs0 := 0
  5474. while ($vlhs0<3)
  5475. %wmjdo[$vlhs0+17] := %5khr1[$vlhs0]
  5476. inc($vlhs0)
  5477. end while
  5478. declare %uqmv5[3] := (1, 1, 2)
  5479. $vlhs0 := 0
  5480. while ($vlhs0<3)
  5481. %wmjdo[$vlhs0+20] := %uqmv5[$vlhs0]
  5482. inc($vlhs0)
  5483. end while
  5484. declare %eqkt5[3] := (3, 3, 3)
  5485. $vlhs0 := 0
  5486. while ($vlhs0<3)
  5487. %wmjdo[$vlhs0+23] := %eqkt5[$vlhs0]
  5488. inc($vlhs0)
  5489. end while
  5490. declare %rtjig[3] := (3, 3, 3)
  5491. $vlhs0 := 0
  5492. while ($vlhs0<3)
  5493. %wmjdo[$vlhs0+26] := %rtjig[$vlhs0]
  5494. inc($vlhs0)
  5495. end while
  5496. declare %h0vt3[3] := (3, 3, 1)
  5497. $vlhs0 := 0
  5498. while ($vlhs0<3)
  5499. %wmjdo[$vlhs0+29] := %h0vt3[$vlhs0]
  5500. inc($vlhs0)
  5501. end while
  5502. declare %b22vs[3] := (3, 3, 1)
  5503. $vlhs0 := 0
  5504. while ($vlhs0<3)
  5505. %wmjdo[$vlhs0+32] := %b22vs[$vlhs0]
  5506. inc($vlhs0)
  5507. end while
  5508. declare %alfvl[3] := (0, 2, 1)
  5509. $vlhs0 := 0
  5510. while ($vlhs0<3)
  5511. %wmjdo[$vlhs0+35] := %alfvl[$vlhs0]
  5512. inc($vlhs0)
  5513. end while
  5514. declare %ubexa[2] := (3, 1)
  5515. $vlhs0 := 0
  5516. while ($vlhs0<2)
  5517. %wmjdo[$vlhs0+38] := %ubexa[$vlhs0]
  5518. inc($vlhs0)
  5519. end while
  5520. declare %gshce[3] := (1, 4, 2)
  5521. $vlhs0 := 0
  5522. while ($vlhs0<3)
  5523. %wmjdo[$vlhs0+40] := %gshce[$vlhs0]
  5524. inc($vlhs0)
  5525. end while
  5526. declare %zb1r4[3] := (3, 3, 3)
  5527. $vlhs0 := 0
  5528. while ($vlhs0<3)
  5529. %wmjdo[$vlhs0+43] := %zb1r4[$vlhs0]
  5530. inc($vlhs0)
  5531. end while
  5532. declare %y0wgg[3] := (3, 3, 3)
  5533. $vlhs0 := 0
  5534. while ($vlhs0<3)
  5535. %wmjdo[$vlhs0+46] := %y0wgg[$vlhs0]
  5536. inc($vlhs0)
  5537. end while
  5538. declare %5vo15[3] := (3, 3, 3)
  5539. $vlhs0 := 0
  5540. while ($vlhs0<3)
  5541. %wmjdo[$vlhs0+49] := %5vo15[$vlhs0]
  5542. inc($vlhs0)
  5543. end while
  5544. declare %avegx[3] := (1, 4, 2)
  5545. $vlhs0 := 0
  5546. while ($vlhs0<3)
  5547. %wmjdo[$vlhs0+52] := %avegx[$vlhs0]
  5548. inc($vlhs0)
  5549. end while
  5550. declare %xjpg1[3] := (3, 3, 3)
  5551. $vlhs0 := 0
  5552. while ($vlhs0<3)
  5553. %wmjdo[$vlhs0+55] := %xjpg1[$vlhs0]
  5554. inc($vlhs0)
  5555. end while
  5556. declare %zm3qk[3] := (0, 3, 1)
  5557. $vlhs0 := 0
  5558. while ($vlhs0<3)
  5559. %wmjdo[$vlhs0+58] := %zm3qk[$vlhs0]
  5560. inc($vlhs0)
  5561. end while
  5562. declare %c5hju[3] := (2, 3, 1)
  5563. $vlhs0 := 0
  5564. while ($vlhs0<3)
  5565. %wmjdo[$vlhs0+61] := %c5hju[$vlhs0]
  5566. inc($vlhs0)
  5567. end while
  5568. declare %qgaba[3] := (2, 3, 1)
  5569. $vlhs0 := 0
  5570. while ($vlhs0<3)
  5571. %wmjdo[$vlhs0+64] := %qgaba[$vlhs0]
  5572. inc($vlhs0)
  5573. end while
  5574. declare %ysb1u[3] := (2, 3, 1)
  5575. $vlhs0 := 0
  5576. while ($vlhs0<3)
  5577. %wmjdo[$vlhs0+67] := %ysb1u[$vlhs0]
  5578. inc($vlhs0)
  5579. end while
  5580. declare %0wtuw[3] := (1, 4, 1)
  5581. $vlhs0 := 0
  5582. while ($vlhs0<3)
  5583. %wmjdo[$vlhs0+70] := %0wtuw[$vlhs0]
  5584. inc($vlhs0)
  5585. end while
  5586. declare %htymw[3] := (4, 3, 1)
  5587. $vlhs0 := 0
  5588. while ($vlhs0<3)
  5589. %wmjdo[$vlhs0+73] := %htymw[$vlhs0]
  5590. inc($vlhs0)
  5591. end while
  5592. declare %cwqza[3] := (4, 3, 1)
  5593. $vlhs0 := 0
  5594. while ($vlhs0<3)
  5595. %wmjdo[$vlhs0+76] := %cwqza[$vlhs0]
  5596. inc($vlhs0)
  5597. end while
  5598. declare %iymdy[2] := (1, 1)
  5599. $vlhs0 := 0
  5600. while ($vlhs0<2)
  5601. %wmjdo[$vlhs0+79] := %iymdy[$vlhs0]
  5602. inc($vlhs0)
  5603. end while
  5604. %wmjdo[81] := 0
  5605. declare %htpxk[3] := (0, 0, 1)
  5606. $vlhs0 := 0
  5607. while ($vlhs0<3)
  5608. %wmjdo[$vlhs0+82] := %htpxk[$vlhs0]
  5609. inc($vlhs0)
  5610. end while
  5611. declare %wo0sk[3] := (2, 3, 1)
  5612. $vlhs0 := 0
  5613. while ($vlhs0<3)
  5614. %wmjdo[$vlhs0+85] := %wo0sk[$vlhs0]
  5615. inc($vlhs0)
  5616. end while
  5617. declare %cahyd[4] := (1, 1, 1, 1)
  5618. $vlhs0 := 0
  5619. while ($vlhs0<4)
  5620. %wmjdo[$vlhs0+88] := %cahyd[$vlhs0]
  5621. inc($vlhs0)
  5622. end while
  5623. declare %pimyc[3] := (2, 3, 3)
  5624. $vlhs0 := 0
  5625. while ($vlhs0<3)
  5626. %wmjdo[$vlhs0+92] := %pimyc[$vlhs0]
  5627. inc($vlhs0)
  5628. end while
  5629. declare %x5tnb[3] := (2, 3, 3)
  5630. $vlhs0 := 0
  5631. while ($vlhs0<3)
  5632. %wmjdo[$vlhs0+95] := %x5tnb[$vlhs0]
  5633. inc($vlhs0)
  5634. end while
  5635. declare %qdt10[3] := (2, 3, 3)
  5636. $vlhs0 := 0
  5637. while ($vlhs0<3)
  5638. %wmjdo[$vlhs0+98] := %qdt10[$vlhs0]
  5639. inc($vlhs0)
  5640. end while
  5641. declare %kx45y[3] := (1, 0, 0)
  5642. $vlhs0 := 0
  5643. while ($vlhs0<3)
  5644. %wmjdo[$vlhs0+101] := %kx45y[$vlhs0]
  5645. inc($vlhs0)
  5646. end while
  5647. declare %d0ys2[3] := (1, 4, 1)
  5648. $vlhs0 := 0
  5649. while ($vlhs0<3)
  5650. %wmjdo[$vlhs0+104] := %d0ys2[$vlhs0]
  5651. inc($vlhs0)
  5652. end while
  5653. declare !4jeon[10]
  5654. !4jeon[0] := "FLT"
  5655. !4jeon[1] := "REV"
  5656. !4jeon[2] := "DYN"
  5657. !4jeon[3] := "MOD"
  5658. !4jeon[4] := "DRV"
  5659. !4jeon[5] := "DLY"
  5660. !4jeon[6] := "GATER"
  5661. !4jeon[7] := "UTIL"
  5662. !4jeon[8] := "NONE"
  5663. !4jeon[9] := "EQ"
  5664. declare %xkip1[40]
  5665. declare %vma13[10] := (1, 4, 7, 7, 13, 2, 1, 2, 1, 2)
  5666. declare %lbfsg[10] := (0, 1, 5, 12, 19, 32, 34, 35, 37, 38)
  5667. %xkip1[0] := $EFFECT_TYPE_FILTER
  5668. declare %h0sir[4] := ($EFFECT_TYPE_REVERB, $EFFECT_TYPE_REVERB2, $EFFECT_TYPE_PLATEREVERB, $EFFECT_TYPE_IRC)
  5669. $vlhs0 := 0
  5670. while ($vlhs0<4)
  5671. %xkip1[$vlhs0+1] := %h0sir[$vlhs0]
  5672. inc($vlhs0)
  5673. end while
  5674. declare %ksd3o[7] := ($EFFECT_TYPE_COMPRESSOR, $EFFECT_TYPE_BUS_COMP, $EFFECT_TYPE_FB_COMP, $EFFECT_TYPE_LIMITER, $EFFECT_TYPE_TRANS_MASTER, $EFFECT_TYPE_SUPERGT, $EFFECT_TYPE_TRANSLIM)
  5675. $vlhs0 := 0
  5676. while ($vlhs0<7)
  5677. %xkip1[$vlhs0+5] := %ksd3o[$vlhs0]
  5678. inc($vlhs0)
  5679. end while
  5680. declare %hkc1c[7] := ($EFFECT_TYPE_CHORUS, $EFFECT_TYPE_FLANGER, $EFFECT_TYPE_PHASER, $EFFECT_TYPE_ROTATOR, $EFFECT_TYPE_CHORAL, $EFFECT_TYPE_FLAIR, $EFFECT_TYPE_PHASIS)
  5681. $vlhs0 := 0
  5682. while ($vlhs0<7)
  5683. %xkip1[$vlhs0+12] := %hkc1c[$vlhs0]
  5684. inc($vlhs0)
  5685. end while
  5686. declare %nru5h[13] := ($EFFECT_TYPE_TAPE_SAT, $EFFECT_TYPE_JUMP, $EFFECT_TYPE_TWANG, $EFFECT_TYPE_SKREAMER, $EFFECT_TYPE_DISTORTION, $EFFECT_TYPE_DSTORTION, $EFFECT_TYPE_LOFI, $EFFECT_TYPE_SHAPER, $EFFECT_TYPE_VAN51, $EFFECT_TYPE_ACBOX, $EFFECT_TYPE_CAT, $EFFECT_TYPE_HOTSOLO, $EFFECT_TYPE_CABINET)
  5687. $vlhs0 := 0
  5688. while ($vlhs0<13)
  5689. %xkip1[$vlhs0+19] := %nru5h[$vlhs0]
  5690. inc($vlhs0)
  5691. end while
  5692. declare %lyyys[2] := ($EFFECT_TYPE_DELAY, $EFFECT_TYPE_REPLIKA)
  5693. $vlhs0 := 0
  5694. while ($vlhs0<2)
  5695. %xkip1[$vlhs0+32] := %lyyys[$vlhs0]
  5696. inc($vlhs0)
  5697. end while
  5698. %xkip1[34] := $EFFECT_TYPE_GAINER
  5699. declare %xyrd5[2] := ($EFFECT_TYPE_SEND_LEVELS, $EFFECT_TYPE_STEREO)
  5700. $vlhs0 := 0
  5701. while ($vlhs0<2)
  5702. %xkip1[$vlhs0+35] := %xyrd5[$vlhs0]
  5703. inc($vlhs0)
  5704. end while
  5705. %xkip1[37] := $EFFECT_TYPE_NONE
  5706. declare %jzvio[2] := ($EFFECT_TYPE_FILTER, $EFFECT_TYPE_SOLID_GEQ)
  5707. $vlhs0 := 0
  5708. while ($vlhs0<2)
  5709. %xkip1[$vlhs0+38] := %jzvio[$vlhs0]
  5710. inc($vlhs0)
  5711. end while
  5712. declare %iaqug[38]
  5713. %iaqug[0] := -1
  5714. %iaqug[1] := -1
  5715. %iaqug[2] := -1
  5716. %iaqug[3] := -1
  5717. %iaqug[4] := -1
  5718. %iaqug[5] := -1
  5719. %iaqug[6] := -1
  5720. %iaqug[7] := -1
  5721. %iaqug[8] := -1
  5722. %iaqug[9] := -1
  5723. %iaqug[10] := -1
  5724. %iaqug[11] := -1
  5725. %iaqug[12] := -1
  5726. %iaqug[13] := -1
  5727. %iaqug[14] := -1
  5728. %iaqug[15] := -1
  5729. %iaqug[16] := -1
  5730. %iaqug[17] := -1
  5731. %iaqug[18] := -1
  5732. %iaqug[19] := -1
  5733. %iaqug[20] := -1
  5734. %iaqug[21] := -1
  5735. %iaqug[22] := $ENGINE_PAR_PH_SPEED_UNIT
  5736. %iaqug[23] := $ENGINE_PAR_FL_SPEED_UNIT
  5737. %iaqug[24] := $ENGINE_PAR_CH_SPEED_UNIT
  5738. %iaqug[25] := -1
  5739. %iaqug[26] := $ENGINE_PAR_DL_TIME_UNIT
  5740. %iaqug[27] := $ENGINE_PAR_RDL_TIME_UNIT
  5741. %iaqug[28] := -1
  5742. %iaqug[29] := -1
  5743. %iaqug[30] := -1
  5744. %iaqug[31] := -1
  5745. %iaqug[32] := -1
  5746. %iaqug[33] := -1
  5747. %iaqug[34] := $ENGINE_PAR_FLAIR_RATE_UNIT
  5748. %iaqug[35] := $ENGINE_PAR_PHASIS_RATE_UNIT
  5749. %iaqug[36] := -1
  5750. %iaqug[37] := -1
  5751. declare %b1si1[38]
  5752. %b1si1[0] := -1
  5753. %b1si1[1] := -1
  5754. %b1si1[2] := -1
  5755. %b1si1[3] := -1
  5756. %b1si1[4] := -1
  5757. %b1si1[5] := -1
  5758. %b1si1[6] := -1
  5759. %b1si1[7] := -1
  5760. %b1si1[8] := -1
  5761. %b1si1[9] := -1
  5762. %b1si1[10] := -1
  5763. %b1si1[11] := -1
  5764. %b1si1[12] := -1
  5765. %b1si1[13] := -1
  5766. %b1si1[14] := -1
  5767. %b1si1[15] := -1
  5768. %b1si1[16] := -1
  5769. %b1si1[17] := -1
  5770. %b1si1[18] := -1
  5771. %b1si1[19] := -1
  5772. %b1si1[20] := -1
  5773. %b1si1[21] := -1
  5774. %b1si1[22] := 12
  5775. %b1si1[23] := 12
  5776. %b1si1[24] := 12
  5777. %b1si1[25] := -1
  5778. %b1si1[26] := 0
  5779. %b1si1[27] := 0
  5780. %b1si1[28] := -1
  5781. %b1si1[29] := -1
  5782. %b1si1[30] := -1
  5783. %b1si1[31] := -1
  5784. %b1si1[32] := -1
  5785. %b1si1[33] := -1
  5786. %b1si1[34] := 12
  5787. %b1si1[35] := 12
  5788. %b1si1[36] := -1
  5789. %b1si1[37] := -1
  5790. declare %cl2a0[38]
  5791. %cl2a0[0] := -1
  5792. %cl2a0[1] := -1
  5793. %cl2a0[2] := -1
  5794. %cl2a0[3] := -1
  5795. %cl2a0[4] := -1
  5796. %cl2a0[5] := -1
  5797. %cl2a0[6] := -1
  5798. %cl2a0[7] := -1
  5799. %cl2a0[8] := -1
  5800. %cl2a0[9] := -1
  5801. %cl2a0[10] := -1
  5802. %cl2a0[11] := -1
  5803. %cl2a0[12] := -1
  5804. %cl2a0[13] := -1
  5805. %cl2a0[14] := -1
  5806. %cl2a0[15] := -1
  5807. %cl2a0[16] := -1
  5808. %cl2a0[17] := -1
  5809. %cl2a0[18] := -1
  5810. %cl2a0[19] := -1
  5811. %cl2a0[20] := -1
  5812. %cl2a0[21] := -1
  5813. %cl2a0[22] := 0
  5814. %cl2a0[23] := 0
  5815. %cl2a0[24] := 0
  5816. %cl2a0[25] := -1
  5817. %cl2a0[26] := 1000000
  5818. %cl2a0[27] := 1000000
  5819. %cl2a0[28] := -1
  5820. %cl2a0[29] := -1
  5821. %cl2a0[30] := -1
  5822. %cl2a0[31] := -1
  5823. %cl2a0[32] := -1
  5824. %cl2a0[33] := -1
  5825. %cl2a0[34] := 0
  5826. %cl2a0[35] := 0
  5827. %cl2a0[36] := -1
  5828. %cl2a0[37] := -1
  5829. declare $3tnu3
  5830. declare $y0oba
  5831. declare $4qnnk
  5832. declare $m2etg
  5833. declare $hojz4 := -1
  5834. declare $bu04v := -1
  5835. declare %44fry[128] := (-1)
  5836. declare %r5pl5[38] := ($EFFECT_TYPE_NONE, $EFFECT_TYPE_REVERB, $EFFECT_TYPE_REVERB2, $EFFECT_TYPE_PLATEREVERB, $EFFECT_TYPE_IRC, $EFFECT_TYPE_BUS_COMP, $EFFECT_TYPE_FB_COMP, $EFFECT_TYPE_TRANS_MASTER, $EFFECT_TYPE_TAPE_SAT, $EFFECT_TYPE_JUMP, $EFFECT_TYPE_TWANG, $EFFECT_TYPE_SKREAMER, $EFFECT_TYPE_DISTORTION, $EFFECT_TYPE_LOFI, $EFFECT_TYPE_SHAPER, $EFFECT_TYPE_CABINET, $EFFECT_TYPE_VAN51, $EFFECT_TYPE_ACBOX, $EFFECT_TYPE_CAT, $EFFECT_TYPE_DSTORTION, $EFFECT_TYPE_HOTSOLO, $EFFECT_TYPE_ROTATOR, $EFFECT_TYPE_PHASER, $EFFECT_TYPE_FLANGER, $EFFECT_TYPE_CHORUS, $EFFECT_TYPE_LIMITER, $EFFECT_TYPE_DELAY, $EFFECT_TYPE_REPLIKA, $EFFECT_TYPE_SEND_LEVELS, $EFFECT_TYPE_GAINER, $EFFECT_TYPE_STEREO, $EFFECT_TYPE_FILTER, $EFFECT_TYPE_SOLID_GEQ, $EFFECT_TYPE_CHORAL, $EFFECT_TYPE_FLAIR, $EFFECT_TYPE_PHASIS, $EFFECT_TYPE_SUPERGT, $EFFECT_TYPE_TRANSLIM)
  5837. declare !zufcx[38]
  5838. !zufcx[0] := "None"
  5839. !zufcx[1] := "Leg Rev"
  5840. !zufcx[2] := "Alg Rev"
  5841. !zufcx[3] := "Plate"
  5842. !zufcx[4] := "IRC"
  5843. !zufcx[5] := "B Comp"
  5844. !zufcx[6] := "F Comp"
  5845. !zufcx[7] := "Transm"
  5846. !zufcx[8] := "Tape"
  5847. !zufcx[9] := "Jump"
  5848. !zufcx[10] := "Twang"
  5849. !zufcx[11] := "Skreamer"
  5850. !zufcx[12] := "Dist"
  5851. !zufcx[13] := "Lofi"
  5852. !zufcx[14] := "Shaper"
  5853. !zufcx[15] := "Cabinet"
  5854. !zufcx[16] := "Van51"
  5855. !zufcx[17] := "AC Box"
  5856. !zufcx[18] := "Cat"
  5857. !zufcx[19] := "Dstortion"
  5858. !zufcx[20] := "Hotsolo"
  5859. !zufcx[21] := "Rotator"
  5860. !zufcx[22] := "Phaser"
  5861. !zufcx[23] := "Flanger"
  5862. !zufcx[24] := "Chorus"
  5863. !zufcx[25] := "Limiter"
  5864. !zufcx[26] := "Delay"
  5865. !zufcx[27] := "Replika"
  5866. !zufcx[28] := "Send"
  5867. !zufcx[29] := "Gater"
  5868. !zufcx[30] := "Stereo"
  5869. !zufcx[31] := "Filter"
  5870. !zufcx[32] := "Solid EQ"
  5871. !zufcx[33] := "Choral"
  5872. !zufcx[34] := "Flair"
  5873. !zufcx[35] := "Phasis"
  5874. !zufcx[36] := "Super GT"
  5875. !zufcx[37] := "Transparent Limiter"
  5876. declare %_FXC__fx_par_defs[114]
  5877. declare %pxmow[4] := ($EFFECT_TYPE_BUS_COMP, $EFFECT_TYPE_LIMITER, $EFFECT_TYPE_SUPERGT, $EFFECT_TYPE_TRANSLIM)
  5878. load_array_str(%_FXC__fx_par_defs,@ichwi & "CONFIG/fx_default_values.nka")
  5879. declare %qaxnh[38]
  5880. $3tnu3 := 0
  5881. while ($3tnu3<38)
  5882. $kyxij := search(%xkip1,%r5pl5[$3tnu3])
  5883. if ($kyxij # -1)
  5884. $y0oba := 0
  5885. while (not in_range($kyxij,%lbfsg[$y0oba],%lbfsg[$y0oba]+%vma13[$y0oba]-1) and ($y0oba<9))
  5886. inc($y0oba)
  5887. end while
  5888. %qaxnh[$3tnu3] := $y0oba
  5889. end if
  5890. inc($3tnu3)
  5891. end while
  5892. end if
  5893. if (1=1)
  5894. declare %3zszw[32]
  5895. make_persistent(%3zszw)
  5896. declare %45vq1[32]
  5897. make_persistent(%45vq1)
  5898. declare %l2lis[32]
  5899. make_persistent(%l2lis)
  5900. declare %pqcgh[32]
  5901. make_persistent(%pqcgh)
  5902. declare %sxlyt[32]
  5903. make_persistent(%sxlyt)
  5904. declare %xav2l[192]
  5905. make_persistent(%xav2l)
  5906. declare %vhqqa[240]
  5907. declare $00fmj := 1500
  5908. declare $k240z
  5909. declare !mnszq[4]
  5910. declare %3wawk[4] := (-2)
  5911. declare %zjgrf[4] := (-2)
  5912. declare %w3zhr[4]
  5913. declare %lwrqe[4] := (0)
  5914. declare %rx3ip[1024] := (080000000h)
  5915. declare $vhkpx := 2000
  5916. declare %preset_buf[32] := (0)
  5917. declare !_preset_names[250]
  5918. load_array_str(!_preset_names,@ichwi & "CONFIG/fx_preset_names.nka")
  5919. declare %FXC__num_presets4cat[10]
  5920. load_array_str(%FXC__num_presets4cat,@ichwi & "CONFIG/num_presets.nka")
  5921. $3tnu3 := 0
  5922. while ($3tnu3<38)
  5923. if (in_range(%r5pl5[$3tnu3],0,num_elements(%44fry)-1))
  5924. %44fry[%r5pl5[$3tnu3]] := $3tnu3
  5925. end if
  5926. inc($3tnu3)
  5927. end while
  5928. declare $jtvhn
  5929. declare $g2apy
  5930. declare $pgdcw
  5931. declare $euybr
  5932. end if
  5933. if (1=1)
  5934. declare %mpjcc[5]
  5935. declare %5l45p[5]
  5936. declare !1ckyy[5]
  5937. declare %h152r[5]
  5938. make_instr_persistent(%h152r)
  5939. declare %wvg1x[5]
  5940. declare %dah4f[5]
  5941. declare %z3r0h[32]
  5942. declare $ibaqw
  5943. declare %pfy4f[100]
  5944. declare %u2u11[20]
  5945. declare ui_button $qpt4p
  5946. declare ui_button $crmx3
  5947. declare ui_button $ej0s0
  5948. declare ui_button $0opdg
  5949. declare ui_button $2n2ws
  5950. declare ui_button $lvtvx
  5951. declare ui_button $vljka
  5952. declare ui_button $2s05o
  5953. declare ui_button $umlht
  5954. declare ui_button $zj0wn
  5955. declare ui_button $50dyn
  5956. declare ui_button $hpwcd
  5957. declare ui_button $cboaa
  5958. declare ui_button $l1jpb
  5959. declare ui_button $1vvs5
  5960. declare ui_button $2hnjg
  5961. declare ui_button $grc51
  5962. declare ui_button $2pvsn
  5963. declare ui_button $jhigl
  5964. declare ui_button $5ptjd
  5965. $pvuhq := 0
  5966. while ($pvuhq<=19)
  5967. %u2u11[$pvuhq] := get_ui_id($qpt4p)+$pvuhq
  5968. inc($pvuhq)
  5969. end while
  5970. declare %tsr50[10]
  5971. declare %354ul[10]
  5972. $g5k3r := 0
  5973. while ($g5k3r<=1)
  5974. $fg4rw := 0
  5975. while ($fg4rw<10)
  5976. set_control_par_str(%u2u11[10*$g5k3r+$fg4rw],$CONTROL_PAR_TEXT,"")
  5977. set_control_par_str(%u2u11[10*$g5k3r+$fg4rw],$CONTROL_PAR_PICTURE,"GE_CAT_GRID_BTN_" & $fg4rw)
  5978. %tsr50[$fg4rw] := %u2u11[$fg4rw]
  5979. %354ul[$fg4rw] := %u2u11[10+$fg4rw]
  5980. inc($fg4rw)
  5981. end while
  5982. inc($g5k3r)
  5983. end while
  5984. $g5k3r := 0
  5985. while ($g5k3r<num_elements(%tsr50))
  5986. %xwg5s[220+$g5k3r] := %tsr50[$g5k3r]
  5987. %cqg2m[22] := 0
  5988. inc($g5k3r)
  5989. end while
  5990. $g5k3r := 0
  5991. while ($g5k3r<num_elements(%354ul))
  5992. %xwg5s[230+$g5k3r] := %354ul[$g5k3r]
  5993. %cqg2m[23] := 0
  5994. inc($g5k3r)
  5995. end while
  5996. end if
  5997. !mnszq[0] := "FXC_bus1"
  5998. %3wawk[0] := -1
  5999. %zjgrf[0] := 1024
  6000. %lwrqe[0] := 0
  6001. %w3zhr[0] := 0
  6002. !mnszq[1] := "FXC_bus2"
  6003. %3wawk[1] := -1
  6004. %zjgrf[1] := 1025
  6005. %lwrqe[1] := 0
  6006. %w3zhr[1] := 1
  6007. !mnszq[2] := "FXC_master"
  6008. %3wawk[2] := -1
  6009. %zjgrf[2] := 2
  6010. %lwrqe[2] := 0
  6011. %w3zhr[2] := 0
  6012. !mnszq[3] := "FXC_send"
  6013. %3wawk[3] := -1
  6014. %zjgrf[3] := 0
  6015. %lwrqe[3] := 1
  6016. %w3zhr[3] := 0
  6017. if (1=1)
  6018. %wvg1x[0] := 4
  6019. %h152r[0] := 0
  6020. %mpjcc[0] := 0
  6021. !1ckyy[0] := "Grain FX"
  6022. %5l45p[0] := 3
  6023. %dah4f[0] := 0
  6024. declare ui_menu $h5hzc
  6025. make_persistent($h5hzc)
  6026. set_control_par_str(get_ui_id($h5hzc),$CONTROL_PAR_PICTURE,"blank")
  6027. $fg4rw := 0
  6028. while ($fg4rw<36)
  6029. add_menu_item($h5hzc,!p4zwk[$fg4rw],$fg4rw)
  6030. inc($fg4rw)
  6031. end while
  6032. declare ui_menu $zdp1g
  6033. make_persistent($zdp1g)
  6034. set_control_par_str(get_ui_id($zdp1g),$CONTROL_PAR_PICTURE,"blank")
  6035. set_control_par(get_ui_id($zdp1g),$CONTROL_PAR_FONT_TYPE,3)
  6036. $fg4rw := 0
  6037. while ($fg4rw<38)
  6038. add_menu_item($zdp1g,!zufcx[$fg4rw],%r5pl5[$fg4rw])
  6039. inc($fg4rw)
  6040. end while
  6041. declare ui_menu $rbym5
  6042. make_persistent($rbym5)
  6043. set_control_par_str(get_ui_id($rbym5),$CONTROL_PAR_PICTURE,"blank")
  6044. $fg4rw := 0
  6045. while ($fg4rw<25)
  6046. add_menu_item($rbym5,$fg4rw,$fg4rw)
  6047. inc($fg4rw)
  6048. end while
  6049. declare ui_menu $qtz0p
  6050. make_persistent($qtz0p)
  6051. set_control_par_str(get_ui_id($qtz0p),$CONTROL_PAR_PICTURE,"blank")
  6052. set_control_par(get_ui_id($qtz0p),$CONTROL_PAR_FONT_TYPE,3)
  6053. $fg4rw := 0
  6054. while ($fg4rw<57)
  6055. add_menu_item($qtz0p,!gdlxl[$fg4rw],%mdgl1[$fg4rw])
  6056. inc($fg4rw)
  6057. end while
  6058. declare ui_button $5euxa
  6059. set_control_par_str(get_ui_id($5euxa),$CONTROL_PAR_TEXT,"")
  6060. set_control_par_str(get_ui_id($5euxa),$CONTROL_PAR_PICTURE,"GE_fx_show_cat_grid_btn")
  6061. declare %3qlrx[4]
  6062. declare ui_switch $b2aaa
  6063. declare ui_switch $j14ck
  6064. declare ui_switch $jbe0y
  6065. declare ui_switch $dqn5p
  6066. $pvuhq := 0
  6067. while ($pvuhq<=3)
  6068. %3qlrx[$pvuhq] := get_ui_id($b2aaa)+$pvuhq
  6069. inc($pvuhq)
  6070. end while
  6071. $fg4rw := 0
  6072. while ($fg4rw<4)
  6073. set_control_par_str(%3qlrx[$fg4rw],$CONTROL_PAR_TEXT,"")
  6074. set_control_par_str(%3qlrx[$fg4rw],$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & 0)
  6075. inc($fg4rw)
  6076. end while
  6077. declare ui_button $hsq4o
  6078. set_control_par_str(get_ui_id($hsq4o),$CONTROL_PAR_TEXT,"")
  6079. set_control_par_str(get_ui_id($hsq4o),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
  6080. declare ui_button $iqkyu
  6081. set_control_par_str(get_ui_id($iqkyu),$CONTROL_PAR_TEXT,"")
  6082. set_control_par_str(get_ui_id($iqkyu),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
  6083. declare ui_button $upamz
  6084. set_control_par_str(get_ui_id($upamz),$CONTROL_PAR_TEXT,"")
  6085. set_control_par_str(get_ui_id($upamz),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
  6086. declare ui_button $dtkx1
  6087. set_control_par_str(get_ui_id($dtkx1),$CONTROL_PAR_TEXT,"")
  6088. set_control_par_str(get_ui_id($dtkx1),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
  6089. declare ui_switch $usl30
  6090. make_persistent($usl30)
  6091. set_control_par_str(get_ui_id($usl30),$CONTROL_PAR_TEXT,"")
  6092. set_control_par_str(get_ui_id($usl30),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_" & 0)
  6093. declare %kz5ve[10] := (get_ui_id($h5hzc), get_ui_id($zdp1g), get_ui_id($rbym5), get_ui_id($qtz0p), get_ui_id($5euxa), get_ui_id($hsq4o), get_ui_id($iqkyu), get_ui_id($usl30), get_ui_id($dtkx1), get_ui_id($upamz))
  6094. $g5k3r := 0
  6095. while ($g5k3r<num_elements(%kz5ve))
  6096. %xwg5s[690+$g5k3r] := %kz5ve[$g5k3r]
  6097. %cqg2m[69] := 1
  6098. inc($g5k3r)
  6099. end while
  6100. $g5k3r := 0
  6101. while ($g5k3r<num_elements(%3qlrx))
  6102. %xwg5s[1260+$g5k3r] := %3qlrx[$g5k3r]
  6103. %cqg2m[126] := 1
  6104. inc($g5k3r)
  6105. end while
  6106. $fg4rw := 0
  6107. while ($fg4rw<10)
  6108. %pfy4f[$fg4rw] := %kz5ve[$fg4rw]
  6109. inc($fg4rw)
  6110. end while
  6111. $g5k3r := 0
  6112. while ($g5k3r<4)
  6113. %pfy4f[$fg4rw+$g5k3r] := %3qlrx[$g5k3r]
  6114. inc($g5k3r)
  6115. end while
  6116. declare $4ii0j
  6117. declare $4kfp4
  6118. $4ii0j := 0
  6119. while ($4ii0j<38)
  6120. $4kfp4 := get_menu_item_value(%pfy4f[1],$4ii0j)
  6121. if (%lwrqe[0]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31))) # %45vq1[%h152r[0]]))
  6122. set_menu_item_visibility(%pfy4f[1],$4ii0j,0)
  6123. else
  6124. set_menu_item_visibility(%pfy4f[1],$4ii0j,1)
  6125. end if
  6126. inc($4ii0j)
  6127. end while
  6128. %wvg1x[1] := 4
  6129. %h152r[1] := 0
  6130. %mpjcc[1] := 1
  6131. !1ckyy[1] := "Sample FX"
  6132. %5l45p[1] := 3
  6133. %dah4f[1] := 1
  6134. declare ui_menu $fzikm
  6135. make_persistent($fzikm)
  6136. set_control_par_str(get_ui_id($fzikm),$CONTROL_PAR_PICTURE,"blank")
  6137. $fg4rw := 0
  6138. while ($fg4rw<36)
  6139. add_menu_item($fzikm,!p4zwk[$fg4rw],$fg4rw)
  6140. inc($fg4rw)
  6141. end while
  6142. declare ui_menu $5vq54
  6143. make_persistent($5vq54)
  6144. set_control_par_str(get_ui_id($5vq54),$CONTROL_PAR_PICTURE,"blank")
  6145. set_control_par(get_ui_id($5vq54),$CONTROL_PAR_FONT_TYPE,3)
  6146. $fg4rw := 0
  6147. while ($fg4rw<38)
  6148. add_menu_item($5vq54,!zufcx[$fg4rw],%r5pl5[$fg4rw])
  6149. inc($fg4rw)
  6150. end while
  6151. declare ui_menu $z0ozi
  6152. make_persistent($z0ozi)
  6153. set_control_par_str(get_ui_id($z0ozi),$CONTROL_PAR_PICTURE,"blank")
  6154. $fg4rw := 0
  6155. while ($fg4rw<25)
  6156. add_menu_item($z0ozi,$fg4rw,$fg4rw)
  6157. inc($fg4rw)
  6158. end while
  6159. declare ui_menu $1faxj
  6160. make_persistent($1faxj)
  6161. set_control_par_str(get_ui_id($1faxj),$CONTROL_PAR_PICTURE,"blank")
  6162. set_control_par(get_ui_id($1faxj),$CONTROL_PAR_FONT_TYPE,3)
  6163. $fg4rw := 0
  6164. while ($fg4rw<57)
  6165. add_menu_item($1faxj,!gdlxl[$fg4rw],%mdgl1[$fg4rw])
  6166. inc($fg4rw)
  6167. end while
  6168. declare ui_button $m5fet
  6169. set_control_par_str(get_ui_id($m5fet),$CONTROL_PAR_TEXT,"")
  6170. set_control_par_str(get_ui_id($m5fet),$CONTROL_PAR_PICTURE,"GE_fx_show_cat_grid_btn")
  6171. declare %0bnhl[4]
  6172. declare ui_switch $lahkd
  6173. declare ui_switch $p5uon
  6174. declare ui_switch $muk05
  6175. declare ui_switch $mmaez
  6176. $pvuhq := 0
  6177. while ($pvuhq<=3)
  6178. %0bnhl[$pvuhq] := get_ui_id($lahkd)+$pvuhq
  6179. inc($pvuhq)
  6180. end while
  6181. $fg4rw := 0
  6182. while ($fg4rw<4)
  6183. set_control_par_str(%0bnhl[$fg4rw],$CONTROL_PAR_TEXT,"")
  6184. set_control_par_str(%0bnhl[$fg4rw],$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & 0)
  6185. inc($fg4rw)
  6186. end while
  6187. declare ui_button $j3xgb
  6188. set_control_par_str(get_ui_id($j3xgb),$CONTROL_PAR_TEXT,"")
  6189. set_control_par_str(get_ui_id($j3xgb),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
  6190. declare ui_button $vszfv
  6191. set_control_par_str(get_ui_id($vszfv),$CONTROL_PAR_TEXT,"")
  6192. set_control_par_str(get_ui_id($vszfv),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
  6193. declare ui_button $vsxdx
  6194. set_control_par_str(get_ui_id($vsxdx),$CONTROL_PAR_TEXT,"")
  6195. set_control_par_str(get_ui_id($vsxdx),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
  6196. declare ui_button $htkht
  6197. set_control_par_str(get_ui_id($htkht),$CONTROL_PAR_TEXT,"")
  6198. set_control_par_str(get_ui_id($htkht),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
  6199. declare ui_switch $zhirl
  6200. make_persistent($zhirl)
  6201. set_control_par_str(get_ui_id($zhirl),$CONTROL_PAR_TEXT,"")
  6202. set_control_par_str(get_ui_id($zhirl),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_" & 0)
  6203. declare %xjzqx[10] := (get_ui_id($fzikm), get_ui_id($5vq54), get_ui_id($z0ozi), get_ui_id($1faxj), get_ui_id($m5fet), get_ui_id($j3xgb), get_ui_id($vszfv), get_ui_id($zhirl), get_ui_id($htkht), get_ui_id($vsxdx))
  6204. $g5k3r := 0
  6205. while ($g5k3r<num_elements(%xjzqx))
  6206. %xwg5s[700+$g5k3r] := %xjzqx[$g5k3r]
  6207. %cqg2m[70] := 1
  6208. inc($g5k3r)
  6209. end while
  6210. $g5k3r := 0
  6211. while ($g5k3r<num_elements(%0bnhl))
  6212. %xwg5s[1270+$g5k3r] := %0bnhl[$g5k3r]
  6213. %cqg2m[127] := 1
  6214. inc($g5k3r)
  6215. end while
  6216. $fg4rw := 0
  6217. while ($fg4rw<10)
  6218. %pfy4f[20+$fg4rw] := %xjzqx[$fg4rw]
  6219. inc($fg4rw)
  6220. end while
  6221. $g5k3r := 0
  6222. while ($g5k3r<4)
  6223. %pfy4f[20+$fg4rw+$g5k3r] := %0bnhl[$g5k3r]
  6224. inc($g5k3r)
  6225. end while
  6226. $4ii0j := 0
  6227. while ($4ii0j<38)
  6228. $4kfp4 := get_menu_item_value(%pfy4f[21],$4ii0j)
  6229. if (%lwrqe[1]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31))) # %45vq1[8+%h152r[1]]))
  6230. set_menu_item_visibility(%pfy4f[21],$4ii0j,0)
  6231. else
  6232. set_menu_item_visibility(%pfy4f[21],$4ii0j,1)
  6233. end if
  6234. inc($4ii0j)
  6235. end while
  6236. %wvg1x[2] := 4
  6237. %h152r[2] := 0
  6238. %mpjcc[2] := 2
  6239. !1ckyy[2] := "Master FX"
  6240. %5l45p[2] := 4
  6241. %dah4f[2] := 1
  6242. declare ui_menu $vpahb
  6243. make_persistent($vpahb)
  6244. set_control_par_str(get_ui_id($vpahb),$CONTROL_PAR_PICTURE,"blank")
  6245. $fg4rw := 0
  6246. while ($fg4rw<36)
  6247. add_menu_item($vpahb,!p4zwk[$fg4rw],$fg4rw)
  6248. inc($fg4rw)
  6249. end while
  6250. declare ui_menu $ydygy
  6251. make_persistent($ydygy)
  6252. set_control_par_str(get_ui_id($ydygy),$CONTROL_PAR_PICTURE,"blank")
  6253. set_control_par(get_ui_id($ydygy),$CONTROL_PAR_FONT_TYPE,3)
  6254. $fg4rw := 0
  6255. while ($fg4rw<38)
  6256. add_menu_item($ydygy,!zufcx[$fg4rw],%r5pl5[$fg4rw])
  6257. inc($fg4rw)
  6258. end while
  6259. declare ui_menu $5v21m
  6260. make_persistent($5v21m)
  6261. set_control_par_str(get_ui_id($5v21m),$CONTROL_PAR_PICTURE,"blank")
  6262. $fg4rw := 0
  6263. while ($fg4rw<25)
  6264. add_menu_item($5v21m,$fg4rw,$fg4rw)
  6265. inc($fg4rw)
  6266. end while
  6267. declare ui_menu $oox5y
  6268. make_persistent($oox5y)
  6269. set_control_par_str(get_ui_id($oox5y),$CONTROL_PAR_PICTURE,"blank")
  6270. set_control_par(get_ui_id($oox5y),$CONTROL_PAR_FONT_TYPE,3)
  6271. $fg4rw := 0
  6272. while ($fg4rw<57)
  6273. add_menu_item($oox5y,!gdlxl[$fg4rw],%mdgl1[$fg4rw])
  6274. inc($fg4rw)
  6275. end while
  6276. declare ui_button $00fkv
  6277. set_control_par_str(get_ui_id($00fkv),$CONTROL_PAR_TEXT,"")
  6278. set_control_par_str(get_ui_id($00fkv),$CONTROL_PAR_PICTURE,"GE_fx_show_cat_grid_btn")
  6279. declare %bvh4q[4]
  6280. declare ui_switch $5dq1e
  6281. declare ui_switch $2ueu0
  6282. declare ui_switch $z2hm2
  6283. declare ui_switch $12ugr
  6284. $pvuhq := 0
  6285. while ($pvuhq<=3)
  6286. %bvh4q[$pvuhq] := get_ui_id($5dq1e)+$pvuhq
  6287. inc($pvuhq)
  6288. end while
  6289. $fg4rw := 0
  6290. while ($fg4rw<4)
  6291. set_control_par_str(%bvh4q[$fg4rw],$CONTROL_PAR_TEXT,"")
  6292. set_control_par_str(%bvh4q[$fg4rw],$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & 0)
  6293. inc($fg4rw)
  6294. end while
  6295. declare ui_button $vlwdd
  6296. set_control_par_str(get_ui_id($vlwdd),$CONTROL_PAR_TEXT,"")
  6297. set_control_par_str(get_ui_id($vlwdd),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
  6298. declare ui_button $as2k5
  6299. set_control_par_str(get_ui_id($as2k5),$CONTROL_PAR_TEXT,"")
  6300. set_control_par_str(get_ui_id($as2k5),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
  6301. declare ui_button $psujc
  6302. set_control_par_str(get_ui_id($psujc),$CONTROL_PAR_TEXT,"")
  6303. set_control_par_str(get_ui_id($psujc),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 0 & "0")
  6304. declare ui_button $q3mq5
  6305. set_control_par_str(get_ui_id($q3mq5),$CONTROL_PAR_TEXT,"")
  6306. set_control_par_str(get_ui_id($q3mq5),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 0 & "0")
  6307. declare ui_switch $zsz2j
  6308. make_persistent($zsz2j)
  6309. set_control_par_str(get_ui_id($zsz2j),$CONTROL_PAR_TEXT,"")
  6310. set_control_par_str(get_ui_id($zsz2j),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_" & 0)
  6311. declare %1k1hc[10] := (get_ui_id($vpahb), get_ui_id($ydygy), get_ui_id($5v21m), get_ui_id($oox5y), get_ui_id($00fkv), get_ui_id($vlwdd), get_ui_id($as2k5), get_ui_id($zsz2j), get_ui_id($q3mq5), get_ui_id($psujc))
  6312. $g5k3r := 0
  6313. while ($g5k3r<num_elements(%1k1hc))
  6314. %xwg5s[710+$g5k3r] := %1k1hc[$g5k3r]
  6315. %cqg2m[71] := 8
  6316. inc($g5k3r)
  6317. end while
  6318. $g5k3r := 0
  6319. while ($g5k3r<num_elements(%bvh4q))
  6320. %xwg5s[1280+$g5k3r] := %bvh4q[$g5k3r]
  6321. %cqg2m[128] := 8
  6322. inc($g5k3r)
  6323. end while
  6324. $fg4rw := 0
  6325. while ($fg4rw<10)
  6326. %pfy4f[40+$fg4rw] := %1k1hc[$fg4rw]
  6327. inc($fg4rw)
  6328. end while
  6329. $g5k3r := 0
  6330. while ($g5k3r<4)
  6331. %pfy4f[40+$fg4rw+$g5k3r] := %bvh4q[$g5k3r]
  6332. inc($g5k3r)
  6333. end while
  6334. $4ii0j := 0
  6335. while ($4ii0j<38)
  6336. $4kfp4 := get_menu_item_value(%pfy4f[41],$4ii0j)
  6337. if (%lwrqe[2]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31))) # %45vq1[16+%h152r[2]]))
  6338. set_menu_item_visibility(%pfy4f[41],$4ii0j,0)
  6339. else
  6340. set_menu_item_visibility(%pfy4f[41],$4ii0j,1)
  6341. end if
  6342. inc($4ii0j)
  6343. end while
  6344. %wvg1x[3] := 1
  6345. %h152r[3] := 0
  6346. %mpjcc[3] := 3
  6347. !1ckyy[3] := "SND_RV"
  6348. %5l45p[3] := 3
  6349. %dah4f[3] := 1
  6350. declare ui_menu $avs41
  6351. make_persistent($avs41)
  6352. set_control_par_str(get_ui_id($avs41),$CONTROL_PAR_PICTURE,"blank")
  6353. $fg4rw := 0
  6354. while ($fg4rw<36)
  6355. add_menu_item($avs41,!p4zwk[$fg4rw],$fg4rw)
  6356. inc($fg4rw)
  6357. end while
  6358. declare ui_menu $ubr4k
  6359. make_persistent($ubr4k)
  6360. set_control_par_str(get_ui_id($ubr4k),$CONTROL_PAR_PICTURE,"blank")
  6361. set_control_par(get_ui_id($ubr4k),$CONTROL_PAR_FONT_TYPE,3)
  6362. $fg4rw := 0
  6363. while ($fg4rw<38)
  6364. add_menu_item($ubr4k,!zufcx[$fg4rw],%r5pl5[$fg4rw])
  6365. inc($fg4rw)
  6366. end while
  6367. declare ui_menu $zig2t
  6368. make_persistent($zig2t)
  6369. set_control_par_str(get_ui_id($zig2t),$CONTROL_PAR_PICTURE,"blank")
  6370. $fg4rw := 0
  6371. while ($fg4rw<25)
  6372. add_menu_item($zig2t,$fg4rw,$fg4rw)
  6373. inc($fg4rw)
  6374. end while
  6375. declare ui_menu $krqtg
  6376. make_persistent($krqtg)
  6377. set_control_par_str(get_ui_id($krqtg),$CONTROL_PAR_PICTURE,"blank")
  6378. set_control_par(get_ui_id($krqtg),$CONTROL_PAR_FONT_TYPE,3)
  6379. $fg4rw := 0
  6380. while ($fg4rw<57)
  6381. add_menu_item($krqtg,!gdlxl[$fg4rw],%mdgl1[$fg4rw])
  6382. inc($fg4rw)
  6383. end while
  6384. declare ui_button $uvkex
  6385. set_control_par_str(get_ui_id($uvkex),$CONTROL_PAR_TEXT,"")
  6386. set_control_par_str(get_ui_id($uvkex),$CONTROL_PAR_PICTURE,"GE_fx_show_cat_grid_btn")
  6387. declare %lvzyj[4]
  6388. declare ui_switch $hdpxn
  6389. declare ui_switch $xdahy
  6390. declare ui_switch $dkvhn
  6391. declare ui_switch $aqf0b
  6392. $pvuhq := 0
  6393. while ($pvuhq<=3)
  6394. %lvzyj[$pvuhq] := get_ui_id($hdpxn)+$pvuhq
  6395. inc($pvuhq)
  6396. end while
  6397. $fg4rw := 0
  6398. while ($fg4rw<4)
  6399. set_control_par_str(%lvzyj[$fg4rw],$CONTROL_PAR_TEXT,"")
  6400. set_control_par_str(%lvzyj[$fg4rw],$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & 1)
  6401. inc($fg4rw)
  6402. end while
  6403. declare ui_button $y1u34
  6404. set_control_par_str(get_ui_id($y1u34),$CONTROL_PAR_TEXT,"")
  6405. set_control_par_str(get_ui_id($y1u34),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 1 & "0")
  6406. declare ui_button $kpijv
  6407. set_control_par_str(get_ui_id($kpijv),$CONTROL_PAR_TEXT,"")
  6408. set_control_par_str(get_ui_id($kpijv),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 1 & "0")
  6409. declare ui_button $mmvzm
  6410. set_control_par_str(get_ui_id($mmvzm),$CONTROL_PAR_TEXT,"")
  6411. set_control_par_str(get_ui_id($mmvzm),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 1 & "0")
  6412. declare ui_button $elcsk
  6413. set_control_par_str(get_ui_id($elcsk),$CONTROL_PAR_TEXT,"")
  6414. set_control_par_str(get_ui_id($elcsk),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 1 & "0")
  6415. declare ui_switch $iyugw
  6416. make_persistent($iyugw)
  6417. set_control_par_str(get_ui_id($iyugw),$CONTROL_PAR_TEXT,"")
  6418. set_control_par_str(get_ui_id($iyugw),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_" & 1)
  6419. declare %kmnty[10] := (get_ui_id($avs41), get_ui_id($ubr4k), get_ui_id($zig2t), get_ui_id($krqtg), get_ui_id($uvkex), get_ui_id($y1u34), get_ui_id($kpijv), get_ui_id($iyugw), get_ui_id($elcsk), get_ui_id($mmvzm))
  6420. $g5k3r := 0
  6421. while ($g5k3r<num_elements(%kmnty))
  6422. %xwg5s[730+$g5k3r] := %kmnty[$g5k3r]
  6423. %cqg2m[73] := 64
  6424. inc($g5k3r)
  6425. end while
  6426. $g5k3r := 0
  6427. while ($g5k3r<num_elements(%lvzyj))
  6428. %xwg5s[1290+$g5k3r] := %lvzyj[$g5k3r]
  6429. %cqg2m[129] := 64
  6430. inc($g5k3r)
  6431. end while
  6432. $fg4rw := 0
  6433. while ($fg4rw<10)
  6434. %pfy4f[60+$fg4rw] := %kmnty[$fg4rw]
  6435. inc($fg4rw)
  6436. end while
  6437. $g5k3r := 0
  6438. while ($g5k3r<4)
  6439. %pfy4f[60+$fg4rw+$g5k3r] := %lvzyj[$g5k3r]
  6440. inc($g5k3r)
  6441. end while
  6442. $4ii0j := 0
  6443. while ($4ii0j<38)
  6444. $4kfp4 := get_menu_item_value(%pfy4f[61],$4ii0j)
  6445. if (%lwrqe[3]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[3])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[3])-1,31))) # %45vq1[24+%h152r[3]]))
  6446. set_menu_item_visibility(%pfy4f[61],$4ii0j,0)
  6447. else
  6448. set_menu_item_visibility(%pfy4f[61],$4ii0j,1)
  6449. end if
  6450. inc($4ii0j)
  6451. end while
  6452. %wvg1x[4] := 0
  6453. %h152r[4] := 1
  6454. %mpjcc[4] := 3
  6455. !1ckyy[4] := "SND_DL"
  6456. %5l45p[4] := 3
  6457. %dah4f[4] := 0
  6458. declare ui_menu $hnem0
  6459. make_persistent($hnem0)
  6460. set_control_par_str(get_ui_id($hnem0),$CONTROL_PAR_PICTURE,"blank")
  6461. $fg4rw := 0
  6462. while ($fg4rw<36)
  6463. add_menu_item($hnem0,!p4zwk[$fg4rw],$fg4rw)
  6464. inc($fg4rw)
  6465. end while
  6466. declare ui_menu $xg50a
  6467. make_persistent($xg50a)
  6468. set_control_par_str(get_ui_id($xg50a),$CONTROL_PAR_PICTURE,"blank")
  6469. set_control_par(get_ui_id($xg50a),$CONTROL_PAR_FONT_TYPE,3)
  6470. $fg4rw := 0
  6471. while ($fg4rw<38)
  6472. add_menu_item($xg50a,!zufcx[$fg4rw],%r5pl5[$fg4rw])
  6473. inc($fg4rw)
  6474. end while
  6475. declare ui_menu $25tac
  6476. make_persistent($25tac)
  6477. set_control_par_str(get_ui_id($25tac),$CONTROL_PAR_PICTURE,"blank")
  6478. $fg4rw := 0
  6479. while ($fg4rw<25)
  6480. add_menu_item($25tac,$fg4rw,$fg4rw)
  6481. inc($fg4rw)
  6482. end while
  6483. declare ui_menu $yhnjz
  6484. make_persistent($yhnjz)
  6485. set_control_par_str(get_ui_id($yhnjz),$CONTROL_PAR_PICTURE,"blank")
  6486. set_control_par(get_ui_id($yhnjz),$CONTROL_PAR_FONT_TYPE,3)
  6487. $fg4rw := 0
  6488. while ($fg4rw<57)
  6489. add_menu_item($yhnjz,!gdlxl[$fg4rw],%mdgl1[$fg4rw])
  6490. inc($fg4rw)
  6491. end while
  6492. declare ui_button $vppxu
  6493. set_control_par_str(get_ui_id($vppxu),$CONTROL_PAR_TEXT,"")
  6494. set_control_par_str(get_ui_id($vppxu),$CONTROL_PAR_PICTURE,"GE_fx_show_cat_grid_btn")
  6495. declare %cxmbd[4]
  6496. declare ui_switch $q1h31
  6497. declare ui_switch $dsxga
  6498. declare ui_switch $fkuzg
  6499. declare ui_switch $av4dw
  6500. $pvuhq := 0
  6501. while ($pvuhq<=3)
  6502. %cxmbd[$pvuhq] := get_ui_id($q1h31)+$pvuhq
  6503. inc($pvuhq)
  6504. end while
  6505. $fg4rw := 0
  6506. while ($fg4rw<4)
  6507. set_control_par_str(%cxmbd[$fg4rw],$CONTROL_PAR_TEXT,"")
  6508. set_control_par_str(%cxmbd[$fg4rw],$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & 1)
  6509. inc($fg4rw)
  6510. end while
  6511. declare ui_button $nar4l
  6512. set_control_par_str(get_ui_id($nar4l),$CONTROL_PAR_TEXT,"")
  6513. set_control_par_str(get_ui_id($nar4l),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 1 & "0")
  6514. declare ui_button $g2sn3
  6515. set_control_par_str(get_ui_id($g2sn3),$CONTROL_PAR_TEXT,"")
  6516. set_control_par_str(get_ui_id($g2sn3),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 1 & "0")
  6517. declare ui_button $24ggh
  6518. set_control_par_str(get_ui_id($24ggh),$CONTROL_PAR_TEXT,"")
  6519. set_control_par_str(get_ui_id($24ggh),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & 1 & "0")
  6520. declare ui_button $ijtiz
  6521. set_control_par_str(get_ui_id($ijtiz),$CONTROL_PAR_TEXT,"")
  6522. set_control_par_str(get_ui_id($ijtiz),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & 1 & "0")
  6523. declare ui_switch $o0h5y
  6524. make_persistent($o0h5y)
  6525. set_control_par_str(get_ui_id($o0h5y),$CONTROL_PAR_TEXT,"")
  6526. set_control_par_str(get_ui_id($o0h5y),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_" & 1)
  6527. declare %cg4ky[10] := (get_ui_id($hnem0), get_ui_id($xg50a), get_ui_id($25tac), get_ui_id($yhnjz), get_ui_id($vppxu), get_ui_id($nar4l), get_ui_id($g2sn3), get_ui_id($o0h5y), get_ui_id($ijtiz), get_ui_id($24ggh))
  6528. $g5k3r := 0
  6529. while ($g5k3r<num_elements(%cg4ky))
  6530. %xwg5s[720+$g5k3r] := %cg4ky[$g5k3r]
  6531. %cqg2m[72] := 64
  6532. inc($g5k3r)
  6533. end while
  6534. $g5k3r := 0
  6535. while ($g5k3r<num_elements(%cxmbd))
  6536. %xwg5s[1300+$g5k3r] := %cxmbd[$g5k3r]
  6537. %cqg2m[130] := 64
  6538. inc($g5k3r)
  6539. end while
  6540. $fg4rw := 0
  6541. while ($fg4rw<10)
  6542. %pfy4f[80+$fg4rw] := %cg4ky[$fg4rw]
  6543. inc($fg4rw)
  6544. end while
  6545. $g5k3r := 0
  6546. while ($g5k3r<4)
  6547. %pfy4f[80+$fg4rw+$g5k3r] := %cxmbd[$g5k3r]
  6548. inc($g5k3r)
  6549. end while
  6550. $4ii0j := 0
  6551. while ($4ii0j<38)
  6552. $4kfp4 := get_menu_item_value(%pfy4f[81],$4ii0j)
  6553. if (%lwrqe[3]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[3])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[3])-1,31))) # %45vq1[24+%h152r[4]]))
  6554. set_menu_item_visibility(%pfy4f[81],$4ii0j,0)
  6555. else
  6556. set_menu_item_visibility(%pfy4f[81],$4ii0j,1)
  6557. end if
  6558. inc($4ii0j)
  6559. end while
  6560. end if
  6561. if (1=1)
  6562. declare $r3fzy
  6563. declare $2rota
  6564. declare %pxakq[4] := (40, 679, 679, 0)
  6565. declare %wswe0[4] := (362, 362, 362, 0)
  6566. declare %gxveo[4] := (4, 4, 4, 1)
  6567. declare %ejazl[16]
  6568. declare ui_button $1pewz
  6569. declare ui_button $nvtf2
  6570. declare ui_button $dau0c
  6571. declare ui_button $fq2ca
  6572. declare ui_button $imy0h
  6573. declare ui_button $rmb0e
  6574. declare ui_button $ndbm1
  6575. declare ui_button $mmx4s
  6576. declare ui_button $eedi4
  6577. declare ui_button $sipdv
  6578. declare ui_button $l3a0o
  6579. declare ui_button $frelg
  6580. declare ui_button $zuh3e
  6581. declare ui_button $svrkg
  6582. declare ui_button $a2ykl
  6583. declare ui_button $vosjt
  6584. $pvuhq := 0
  6585. while ($pvuhq<=15)
  6586. %ejazl[$pvuhq] := get_ui_id($1pewz)+$pvuhq
  6587. inc($pvuhq)
  6588. end while
  6589. declare %d0oml[16]
  6590. $r3fzy := 0
  6591. while ($r3fzy<4)
  6592. $2rota := 0
  6593. while ($2rota<4)
  6594. if ($2rota<%gxveo[$r3fzy] and (%gxveo[$r3fzy]>1))
  6595. set_control_par_str(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_10")
  6596. set_control_par_str(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_TEXT,"")
  6597. else
  6598. if (%gxveo[$r3fzy]>0)
  6599. set_control_par(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  6600. end if
  6601. end if
  6602. inc($2rota)
  6603. end while
  6604. inc($r3fzy)
  6605. end while
  6606. declare %d2t1g[4]
  6607. declare $sfqck
  6608. declare ~tllyo
  6609. declare ui_xy ?2jnfl[1]
  6610. set_control_par(get_ui_id(?2jnfl),$CONTROL_PAR_MOUSE_MODE,2)
  6611. set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"blank")
  6612. set_control_par_str_arr(get_ui_id(?2jnfl),$CONTROL_PAR_CURSOR_PICTURE,"GE_TABS_Blank_XY_Cursor",0)
  6613. %d2t1g[0] := get_ui_id(?2jnfl)
  6614. declare ui_xy ?afz4n[1]
  6615. set_control_par(get_ui_id(?afz4n),$CONTROL_PAR_MOUSE_MODE,2)
  6616. set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"blank")
  6617. set_control_par_str_arr(get_ui_id(?afz4n),$CONTROL_PAR_CURSOR_PICTURE,"GE_TABS_Blank_XY_Cursor",0)
  6618. %d2t1g[1] := get_ui_id(?afz4n)
  6619. declare ui_xy ?a14rv[1]
  6620. set_control_par(get_ui_id(?a14rv),$CONTROL_PAR_MOUSE_MODE,2)
  6621. set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"blank")
  6622. set_control_par_str_arr(get_ui_id(?a14rv),$CONTROL_PAR_CURSOR_PICTURE,"GE_TABS_Blank_XY_Cursor",0)
  6623. %d2t1g[2] := get_ui_id(?a14rv)
  6624. declare %x3fz4[10] := (get_ui_id($1pewz), get_ui_id($nvtf2), get_ui_id($dau0c), get_ui_id($fq2ca), get_ui_id($imy0h), get_ui_id($rmb0e), get_ui_id($ndbm1), get_ui_id($mmx4s), get_ui_id(?2jnfl), get_ui_id(?afz4n))
  6625. $g5k3r := 0
  6626. while ($g5k3r<num_elements(%x3fz4))
  6627. %xwg5s[740+$g5k3r] := %x3fz4[$g5k3r]
  6628. %cqg2m[74] := 1
  6629. inc($g5k3r)
  6630. end while
  6631. declare %xzu1q[5] := (get_ui_id($eedi4), get_ui_id($sipdv), get_ui_id($l3a0o), get_ui_id($frelg), get_ui_id(?a14rv))
  6632. $g5k3r := 0
  6633. while ($g5k3r<num_elements(%xzu1q))
  6634. %xwg5s[200+$g5k3r] := %xzu1q[$g5k3r]
  6635. %cqg2m[20] := 8
  6636. inc($g5k3r)
  6637. end while
  6638. declare %geafe[4] := (0, 1, 2, 3)
  6639. declare %rdbw1[4] := (0, 1, 2, 3)
  6640. declare $vp2vr
  6641. declare $1fg0q := 0
  6642. declare $odmi5
  6643. declare $zpa1n
  6644. declare $ptarc
  6645. declare %v5xab[4]
  6646. declare $iwpwh
  6647. declare $0eeyn
  6648. declare $yyqo2
  6649. declare $nsffy
  6650. declare $ikf00
  6651. declare $ufovt
  6652. end if
  6653. if (1=1)
  6654. declare ui_slider $qbesm(0, 1000000)
  6655. make_persistent($qbesm)
  6656. declare ui_slider $24riz(-1000000, 1000000)
  6657. make_persistent($24riz)
  6658. set_control_par_str(get_ui_id($24riz),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  6659. declare ui_menu $e2h4j
  6660. make_persistent($e2h4j)
  6661. set_control_par_str(get_ui_id($e2h4j),$CONTROL_PAR_PICTURE,"blank")
  6662. $fg4rw := 0
  6663. while ($fg4rw<num_elements(!flm4j))
  6664. add_menu_item($e2h4j,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  6665. inc($fg4rw)
  6666. end while
  6667. set_menu_item_str(get_ui_id($e2h4j),search(%bnygy,10),"VEL Mono Velocity")
  6668. $upapg := 35
  6669. %n34di[$upapg] := get_ui_id($e2h4j)
  6670. %nwlgb[$upapg] := get_ui_id($24riz)
  6671. !4gjzd[35] := "_1"
  6672. %c1qym[35] := get_ui_id($24riz)
  6673. %41o3s[35] := get_ui_id($qbesm)
  6674. declare ui_label $jns1s(1, 1)
  6675. set_control_par_str(get_ui_id($jns1s),$CONTROL_PAR_TEXT,"")
  6676. set_control_par_str(get_ui_id($jns1s),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  6677. %vvlef[35] := get_ui_id($jns1s)
  6678. declare ui_label $zjvdl(1, 1)
  6679. set_control_par_str(get_ui_id($zjvdl),$CONTROL_PAR_TEXT,"")
  6680. set_control_par_str(get_ui_id($zjvdl),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  6681. %2hswt[35] := get_ui_id($zjvdl)
  6682. declare ui_label $exyhd(1, 1)
  6683. set_control_par_str(get_ui_id($exyhd),$CONTROL_PAR_TEXT,"")
  6684. set_control_par_str(get_ui_id($exyhd),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  6685. set_control_par(get_ui_id($exyhd),$CONTROL_PAR_Z_LAYER,1)
  6686. %lm23w[35] := get_ui_id($exyhd)
  6687. %qxmpr[35] := 1000000
  6688. %oazdd[35] := 1
  6689. !gh3f0[35] := " ?"
  6690. ?rylw5[35] := 1.0
  6691. %q4mzh[35] := $ENGINE_PAR_CUTOFF
  6692. %vc4gu[35] := -1
  6693. %hpc0e[35] := 0
  6694. %eujmz[35] := 1024
  6695. %fogcg[35] := 1
  6696. %5zak5[35] := 0
  6697. %dwdw3[35] := 0
  6698. %sbnwu[35] := 1000000
  6699. %jeswc[35] := 1012
  6700. %mnk53[35] := 75
  6701. declare %iud5t[10] := (get_ui_id($qbesm), get_ui_id($24riz), get_ui_id($jns1s), get_ui_id($zjvdl), get_ui_id($exyhd), get_ui_id($e2h4j), -1)
  6702. $g5k3r := 0
  6703. while ($g5k3r<num_elements(%iud5t))
  6704. %xwg5s[750+$g5k3r] := %iud5t[$g5k3r]
  6705. %cqg2m[75] := 0
  6706. inc($g5k3r)
  6707. end while
  6708. declare ui_slider $tqsps(0, 1000000)
  6709. make_persistent($tqsps)
  6710. declare ui_slider $51jvx(-1000000, 1000000)
  6711. make_persistent($51jvx)
  6712. set_control_par_str(get_ui_id($51jvx),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  6713. declare ui_menu $lqfpr
  6714. make_persistent($lqfpr)
  6715. set_control_par_str(get_ui_id($lqfpr),$CONTROL_PAR_PICTURE,"blank")
  6716. $fg4rw := 0
  6717. while ($fg4rw<num_elements(!flm4j))
  6718. add_menu_item($lqfpr,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  6719. inc($fg4rw)
  6720. end while
  6721. set_menu_item_str(get_ui_id($lqfpr),search(%bnygy,10),"VEL Mono Velocity")
  6722. $upapg := 36
  6723. %n34di[$upapg] := get_ui_id($lqfpr)
  6724. %nwlgb[$upapg] := get_ui_id($51jvx)
  6725. !4gjzd[36] := "_1"
  6726. %c1qym[36] := get_ui_id($51jvx)
  6727. %41o3s[36] := get_ui_id($tqsps)
  6728. declare ui_label $lnbi2(1, 1)
  6729. set_control_par_str(get_ui_id($lnbi2),$CONTROL_PAR_TEXT,"")
  6730. set_control_par_str(get_ui_id($lnbi2),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  6731. %vvlef[36] := get_ui_id($lnbi2)
  6732. declare ui_label $10amc(1, 1)
  6733. set_control_par_str(get_ui_id($10amc),$CONTROL_PAR_TEXT,"")
  6734. set_control_par_str(get_ui_id($10amc),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  6735. %2hswt[36] := get_ui_id($10amc)
  6736. declare ui_label $sxuer(1, 1)
  6737. set_control_par_str(get_ui_id($sxuer),$CONTROL_PAR_TEXT,"")
  6738. set_control_par_str(get_ui_id($sxuer),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  6739. set_control_par(get_ui_id($sxuer),$CONTROL_PAR_Z_LAYER,1)
  6740. %lm23w[36] := get_ui_id($sxuer)
  6741. %qxmpr[36] := 1000000
  6742. %oazdd[36] := 1
  6743. !gh3f0[36] := " ?"
  6744. ?rylw5[36] := 1.0
  6745. %q4mzh[36] := $ENGINE_PAR_CUTOFF
  6746. %vc4gu[36] := -1
  6747. %hpc0e[36] := 0
  6748. %eujmz[36] := 1024
  6749. %fogcg[36] := 0
  6750. %5zak5[36] := 0
  6751. %dwdw3[36] := 0
  6752. %sbnwu[36] := 1000000
  6753. %jeswc[36] := 1015
  6754. %mnk53[36] := 76
  6755. declare %0jpdz[10] := (get_ui_id($tqsps), get_ui_id($51jvx), get_ui_id($lnbi2), get_ui_id($10amc), get_ui_id($sxuer), get_ui_id($lqfpr), -1)
  6756. $g5k3r := 0
  6757. while ($g5k3r<num_elements(%0jpdz))
  6758. %xwg5s[760+$g5k3r] := %0jpdz[$g5k3r]
  6759. %cqg2m[76] := 0
  6760. inc($g5k3r)
  6761. end while
  6762. declare ui_slider $4knyg(0, 1000000)
  6763. make_persistent($4knyg)
  6764. declare ui_slider $rsero(-1000000, 1000000)
  6765. make_persistent($rsero)
  6766. set_control_par_str(get_ui_id($rsero),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  6767. declare ui_menu $sejrr
  6768. make_persistent($sejrr)
  6769. set_control_par_str(get_ui_id($sejrr),$CONTROL_PAR_PICTURE,"blank")
  6770. $fg4rw := 0
  6771. while ($fg4rw<num_elements(!flm4j))
  6772. add_menu_item($sejrr,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  6773. inc($fg4rw)
  6774. end while
  6775. set_menu_item_str(get_ui_id($sejrr),search(%bnygy,10),"VEL Mono Velocity")
  6776. $upapg := 37
  6777. %n34di[$upapg] := get_ui_id($sejrr)
  6778. %nwlgb[$upapg] := get_ui_id($rsero)
  6779. !4gjzd[37] := "_1"
  6780. %c1qym[37] := get_ui_id($rsero)
  6781. %41o3s[37] := get_ui_id($4knyg)
  6782. declare ui_label $h2jhq(1, 1)
  6783. set_control_par_str(get_ui_id($h2jhq),$CONTROL_PAR_TEXT,"")
  6784. set_control_par_str(get_ui_id($h2jhq),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  6785. %vvlef[37] := get_ui_id($h2jhq)
  6786. declare ui_label $2yvrg(1, 1)
  6787. set_control_par_str(get_ui_id($2yvrg),$CONTROL_PAR_TEXT,"")
  6788. set_control_par_str(get_ui_id($2yvrg),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  6789. %2hswt[37] := get_ui_id($2yvrg)
  6790. declare ui_label $3gdmd(1, 1)
  6791. set_control_par_str(get_ui_id($3gdmd),$CONTROL_PAR_TEXT,"")
  6792. set_control_par_str(get_ui_id($3gdmd),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  6793. set_control_par(get_ui_id($3gdmd),$CONTROL_PAR_Z_LAYER,1)
  6794. %lm23w[37] := get_ui_id($3gdmd)
  6795. %qxmpr[37] := 1000000
  6796. %oazdd[37] := 1
  6797. !gh3f0[37] := " ?"
  6798. ?rylw5[37] := 1.0
  6799. %q4mzh[37] := $ENGINE_PAR_CUTOFF
  6800. %vc4gu[37] := -1
  6801. %hpc0e[37] := 0
  6802. %eujmz[37] := 1024
  6803. %fogcg[37] := 0
  6804. %5zak5[37] := 1
  6805. %dwdw3[37] := 0
  6806. %sbnwu[37] := 1000000
  6807. %jeswc[37] := 1018
  6808. %mnk53[37] := 77
  6809. declare %rmqqg[10] := (get_ui_id($4knyg), get_ui_id($rsero), get_ui_id($h2jhq), get_ui_id($2yvrg), get_ui_id($3gdmd), get_ui_id($sejrr), -1)
  6810. $g5k3r := 0
  6811. while ($g5k3r<num_elements(%rmqqg))
  6812. %xwg5s[770+$g5k3r] := %rmqqg[$g5k3r]
  6813. %cqg2m[77] := 0
  6814. inc($g5k3r)
  6815. end while
  6816. declare ui_slider $x5zyo(0, 1000000)
  6817. make_persistent($x5zyo)
  6818. declare ui_slider $os0gc(-1000000, 1000000)
  6819. make_persistent($os0gc)
  6820. set_control_par_str(get_ui_id($os0gc),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  6821. declare ui_menu $2iqnc
  6822. make_persistent($2iqnc)
  6823. set_control_par_str(get_ui_id($2iqnc),$CONTROL_PAR_PICTURE,"blank")
  6824. $fg4rw := 0
  6825. while ($fg4rw<num_elements(!flm4j))
  6826. add_menu_item($2iqnc,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  6827. inc($fg4rw)
  6828. end while
  6829. set_menu_item_str(get_ui_id($2iqnc),search(%bnygy,10),"VEL Mono Velocity")
  6830. $upapg := 38
  6831. %n34di[$upapg] := get_ui_id($2iqnc)
  6832. %nwlgb[$upapg] := get_ui_id($os0gc)
  6833. !4gjzd[38] := "_1"
  6834. %c1qym[38] := get_ui_id($os0gc)
  6835. %41o3s[38] := get_ui_id($x5zyo)
  6836. declare ui_label $14keh(1, 1)
  6837. set_control_par_str(get_ui_id($14keh),$CONTROL_PAR_TEXT,"")
  6838. set_control_par_str(get_ui_id($14keh),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  6839. %vvlef[38] := get_ui_id($14keh)
  6840. declare ui_label $pwgrq(1, 1)
  6841. set_control_par_str(get_ui_id($pwgrq),$CONTROL_PAR_TEXT,"")
  6842. set_control_par_str(get_ui_id($pwgrq),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  6843. %2hswt[38] := get_ui_id($pwgrq)
  6844. declare ui_label $be2sk(1, 1)
  6845. set_control_par_str(get_ui_id($be2sk),$CONTROL_PAR_TEXT,"")
  6846. set_control_par_str(get_ui_id($be2sk),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  6847. set_control_par(get_ui_id($be2sk),$CONTROL_PAR_Z_LAYER,1)
  6848. %lm23w[38] := get_ui_id($be2sk)
  6849. %qxmpr[38] := 1000000
  6850. %oazdd[38] := 1
  6851. !gh3f0[38] := " ?"
  6852. ?rylw5[38] := 1.0
  6853. %q4mzh[38] := $ENGINE_PAR_CUTOFF
  6854. %vc4gu[38] := -1
  6855. %hpc0e[38] := 1
  6856. %eujmz[38] := 1024
  6857. %fogcg[38] := 1
  6858. %5zak5[38] := 0
  6859. %dwdw3[38] := 0
  6860. %sbnwu[38] := 1000000
  6861. %jeswc[38] := 1021
  6862. %mnk53[38] := 78
  6863. declare %kvzs0[10] := (get_ui_id($x5zyo), get_ui_id($os0gc), get_ui_id($14keh), get_ui_id($pwgrq), get_ui_id($be2sk), get_ui_id($2iqnc), -1)
  6864. $g5k3r := 0
  6865. while ($g5k3r<num_elements(%kvzs0))
  6866. %xwg5s[780+$g5k3r] := %kvzs0[$g5k3r]
  6867. %cqg2m[78] := 0
  6868. inc($g5k3r)
  6869. end while
  6870. declare ui_slider $3xmqt(0, 1000000)
  6871. make_persistent($3xmqt)
  6872. declare ui_slider $0nwvw(-1000000, 1000000)
  6873. make_persistent($0nwvw)
  6874. set_control_par_str(get_ui_id($0nwvw),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  6875. declare ui_menu $o0yx0
  6876. make_persistent($o0yx0)
  6877. set_control_par_str(get_ui_id($o0yx0),$CONTROL_PAR_PICTURE,"blank")
  6878. $fg4rw := 0
  6879. while ($fg4rw<num_elements(!flm4j))
  6880. add_menu_item($o0yx0,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  6881. inc($fg4rw)
  6882. end while
  6883. set_menu_item_str(get_ui_id($o0yx0),search(%bnygy,10),"VEL Mono Velocity")
  6884. $upapg := 39
  6885. %n34di[$upapg] := get_ui_id($o0yx0)
  6886. %nwlgb[$upapg] := get_ui_id($0nwvw)
  6887. !4gjzd[39] := "_1"
  6888. %c1qym[39] := get_ui_id($0nwvw)
  6889. %41o3s[39] := get_ui_id($3xmqt)
  6890. declare ui_label $f0q5x(1, 1)
  6891. set_control_par_str(get_ui_id($f0q5x),$CONTROL_PAR_TEXT,"")
  6892. set_control_par_str(get_ui_id($f0q5x),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  6893. %vvlef[39] := get_ui_id($f0q5x)
  6894. declare ui_label $mcaak(1, 1)
  6895. set_control_par_str(get_ui_id($mcaak),$CONTROL_PAR_TEXT,"")
  6896. set_control_par_str(get_ui_id($mcaak),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  6897. %2hswt[39] := get_ui_id($mcaak)
  6898. declare ui_label $faxjz(1, 1)
  6899. set_control_par_str(get_ui_id($faxjz),$CONTROL_PAR_TEXT,"")
  6900. set_control_par_str(get_ui_id($faxjz),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  6901. set_control_par(get_ui_id($faxjz),$CONTROL_PAR_Z_LAYER,1)
  6902. %lm23w[39] := get_ui_id($faxjz)
  6903. %qxmpr[39] := 1000000
  6904. %oazdd[39] := 1
  6905. !gh3f0[39] := " ?"
  6906. ?rylw5[39] := 1.0
  6907. %q4mzh[39] := $ENGINE_PAR_CUTOFF
  6908. %vc4gu[39] := -1
  6909. %hpc0e[39] := 1
  6910. %eujmz[39] := 1024
  6911. %fogcg[39] := 0
  6912. %5zak5[39] := 0
  6913. %dwdw3[39] := 0
  6914. %sbnwu[39] := 1000000
  6915. %jeswc[39] := 1024
  6916. %mnk53[39] := 79
  6917. declare %vtsfh[10] := (get_ui_id($3xmqt), get_ui_id($0nwvw), get_ui_id($f0q5x), get_ui_id($mcaak), get_ui_id($faxjz), get_ui_id($o0yx0), -1)
  6918. $g5k3r := 0
  6919. while ($g5k3r<num_elements(%vtsfh))
  6920. %xwg5s[790+$g5k3r] := %vtsfh[$g5k3r]
  6921. %cqg2m[79] := 0
  6922. inc($g5k3r)
  6923. end while
  6924. declare ui_slider $c30oe(0, 1000000)
  6925. make_persistent($c30oe)
  6926. declare ui_slider $iwhhy(-1000000, 1000000)
  6927. make_persistent($iwhhy)
  6928. set_control_par_str(get_ui_id($iwhhy),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  6929. declare ui_menu $lafc5
  6930. make_persistent($lafc5)
  6931. set_control_par_str(get_ui_id($lafc5),$CONTROL_PAR_PICTURE,"blank")
  6932. $fg4rw := 0
  6933. while ($fg4rw<num_elements(!flm4j))
  6934. add_menu_item($lafc5,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  6935. inc($fg4rw)
  6936. end while
  6937. set_menu_item_str(get_ui_id($lafc5),search(%bnygy,10),"VEL Mono Velocity")
  6938. $upapg := 40
  6939. %n34di[$upapg] := get_ui_id($lafc5)
  6940. %nwlgb[$upapg] := get_ui_id($iwhhy)
  6941. !4gjzd[40] := "_1"
  6942. %c1qym[40] := get_ui_id($iwhhy)
  6943. %41o3s[40] := get_ui_id($c30oe)
  6944. declare ui_label $earem(1, 1)
  6945. set_control_par_str(get_ui_id($earem),$CONTROL_PAR_TEXT,"")
  6946. set_control_par_str(get_ui_id($earem),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  6947. %vvlef[40] := get_ui_id($earem)
  6948. declare ui_label $3zvj1(1, 1)
  6949. set_control_par_str(get_ui_id($3zvj1),$CONTROL_PAR_TEXT,"")
  6950. set_control_par_str(get_ui_id($3zvj1),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  6951. %2hswt[40] := get_ui_id($3zvj1)
  6952. declare ui_label $saqb5(1, 1)
  6953. set_control_par_str(get_ui_id($saqb5),$CONTROL_PAR_TEXT,"")
  6954. set_control_par_str(get_ui_id($saqb5),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  6955. set_control_par(get_ui_id($saqb5),$CONTROL_PAR_Z_LAYER,1)
  6956. %lm23w[40] := get_ui_id($saqb5)
  6957. %qxmpr[40] := 1000000
  6958. %oazdd[40] := 1
  6959. !gh3f0[40] := " ?"
  6960. ?rylw5[40] := 1.0
  6961. %q4mzh[40] := $ENGINE_PAR_CUTOFF
  6962. %vc4gu[40] := -1
  6963. %hpc0e[40] := 1
  6964. %eujmz[40] := 1024
  6965. %fogcg[40] := 0
  6966. %5zak5[40] := 1
  6967. %dwdw3[40] := 0
  6968. %sbnwu[40] := 1000000
  6969. %jeswc[40] := 1027
  6970. %mnk53[40] := 80
  6971. declare %nkuav[10] := (get_ui_id($c30oe), get_ui_id($iwhhy), get_ui_id($earem), get_ui_id($3zvj1), get_ui_id($saqb5), get_ui_id($lafc5), -1)
  6972. $g5k3r := 0
  6973. while ($g5k3r<num_elements(%nkuav))
  6974. %xwg5s[800+$g5k3r] := %nkuav[$g5k3r]
  6975. %cqg2m[80] := 0
  6976. inc($g5k3r)
  6977. end while
  6978. declare ui_slider $41deb(0, 1000000)
  6979. make_persistent($41deb)
  6980. declare ui_slider $5yyj1(-1000000, 1000000)
  6981. make_persistent($5yyj1)
  6982. set_control_par_str(get_ui_id($5yyj1),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  6983. declare ui_menu $nj3pk
  6984. make_persistent($nj3pk)
  6985. set_control_par_str(get_ui_id($nj3pk),$CONTROL_PAR_PICTURE,"blank")
  6986. $fg4rw := 0
  6987. while ($fg4rw<num_elements(!flm4j))
  6988. add_menu_item($nj3pk,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  6989. inc($fg4rw)
  6990. end while
  6991. set_menu_item_str(get_ui_id($nj3pk),search(%bnygy,10),"VEL Mono Velocity")
  6992. $upapg := 41
  6993. %n34di[$upapg] := get_ui_id($nj3pk)
  6994. %nwlgb[$upapg] := get_ui_id($5yyj1)
  6995. !4gjzd[41] := "_1"
  6996. %c1qym[41] := get_ui_id($5yyj1)
  6997. %41o3s[41] := get_ui_id($41deb)
  6998. declare ui_label $fjqbt(1, 1)
  6999. set_control_par_str(get_ui_id($fjqbt),$CONTROL_PAR_TEXT,"")
  7000. set_control_par_str(get_ui_id($fjqbt),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7001. %vvlef[41] := get_ui_id($fjqbt)
  7002. declare ui_label $fr15r(1, 1)
  7003. set_control_par_str(get_ui_id($fr15r),$CONTROL_PAR_TEXT,"")
  7004. set_control_par_str(get_ui_id($fr15r),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7005. %2hswt[41] := get_ui_id($fr15r)
  7006. declare ui_label $wzxu2(1, 1)
  7007. set_control_par_str(get_ui_id($wzxu2),$CONTROL_PAR_TEXT,"")
  7008. set_control_par_str(get_ui_id($wzxu2),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7009. set_control_par(get_ui_id($wzxu2),$CONTROL_PAR_Z_LAYER,1)
  7010. %lm23w[41] := get_ui_id($wzxu2)
  7011. %qxmpr[41] := 1000000
  7012. %oazdd[41] := 1
  7013. !gh3f0[41] := " ?"
  7014. ?rylw5[41] := 1.0
  7015. %q4mzh[41] := $ENGINE_PAR_CUTOFF
  7016. %vc4gu[41] := -1
  7017. %hpc0e[41] := 2
  7018. %eujmz[41] := 1024
  7019. %fogcg[41] := 1
  7020. %5zak5[41] := 0
  7021. %dwdw3[41] := 0
  7022. %sbnwu[41] := 1000000
  7023. %jeswc[41] := 1030
  7024. %mnk53[41] := 81
  7025. declare %guouy[10] := (get_ui_id($41deb), get_ui_id($5yyj1), get_ui_id($fjqbt), get_ui_id($fr15r), get_ui_id($wzxu2), get_ui_id($nj3pk), -1)
  7026. $g5k3r := 0
  7027. while ($g5k3r<num_elements(%guouy))
  7028. %xwg5s[810+$g5k3r] := %guouy[$g5k3r]
  7029. %cqg2m[81] := 0
  7030. inc($g5k3r)
  7031. end while
  7032. declare ui_slider $ynoq5(0, 1000000)
  7033. make_persistent($ynoq5)
  7034. declare ui_slider $brpj3(-1000000, 1000000)
  7035. make_persistent($brpj3)
  7036. set_control_par_str(get_ui_id($brpj3),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7037. declare ui_menu $b1s4y
  7038. make_persistent($b1s4y)
  7039. set_control_par_str(get_ui_id($b1s4y),$CONTROL_PAR_PICTURE,"blank")
  7040. $fg4rw := 0
  7041. while ($fg4rw<num_elements(!flm4j))
  7042. add_menu_item($b1s4y,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7043. inc($fg4rw)
  7044. end while
  7045. set_menu_item_str(get_ui_id($b1s4y),search(%bnygy,10),"VEL Mono Velocity")
  7046. $upapg := 42
  7047. %n34di[$upapg] := get_ui_id($b1s4y)
  7048. %nwlgb[$upapg] := get_ui_id($brpj3)
  7049. !4gjzd[42] := "_1"
  7050. %c1qym[42] := get_ui_id($brpj3)
  7051. %41o3s[42] := get_ui_id($ynoq5)
  7052. declare ui_label $ucekc(1, 1)
  7053. set_control_par_str(get_ui_id($ucekc),$CONTROL_PAR_TEXT,"")
  7054. set_control_par_str(get_ui_id($ucekc),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7055. %vvlef[42] := get_ui_id($ucekc)
  7056. declare ui_label $rdik0(1, 1)
  7057. set_control_par_str(get_ui_id($rdik0),$CONTROL_PAR_TEXT,"")
  7058. set_control_par_str(get_ui_id($rdik0),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7059. %2hswt[42] := get_ui_id($rdik0)
  7060. declare ui_label $ygior(1, 1)
  7061. set_control_par_str(get_ui_id($ygior),$CONTROL_PAR_TEXT,"")
  7062. set_control_par_str(get_ui_id($ygior),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7063. set_control_par(get_ui_id($ygior),$CONTROL_PAR_Z_LAYER,1)
  7064. %lm23w[42] := get_ui_id($ygior)
  7065. %qxmpr[42] := 1000000
  7066. %oazdd[42] := 1
  7067. !gh3f0[42] := " ?"
  7068. ?rylw5[42] := 1.0
  7069. %q4mzh[42] := $ENGINE_PAR_CUTOFF
  7070. %vc4gu[42] := -1
  7071. %hpc0e[42] := 2
  7072. %eujmz[42] := 1024
  7073. %fogcg[42] := 0
  7074. %5zak5[42] := 0
  7075. %dwdw3[42] := 0
  7076. %sbnwu[42] := 1000000
  7077. %jeswc[42] := 1033
  7078. %mnk53[42] := 82
  7079. declare %qqhmy[10] := (get_ui_id($ynoq5), get_ui_id($brpj3), get_ui_id($ucekc), get_ui_id($rdik0), get_ui_id($ygior), get_ui_id($b1s4y), -1)
  7080. $g5k3r := 0
  7081. while ($g5k3r<num_elements(%qqhmy))
  7082. %xwg5s[820+$g5k3r] := %qqhmy[$g5k3r]
  7083. %cqg2m[82] := 0
  7084. inc($g5k3r)
  7085. end while
  7086. declare ui_slider $33zwn(0, 1000000)
  7087. make_persistent($33zwn)
  7088. declare ui_slider $hwhlk(-1000000, 1000000)
  7089. make_persistent($hwhlk)
  7090. set_control_par_str(get_ui_id($hwhlk),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7091. declare ui_menu $1kgif
  7092. make_persistent($1kgif)
  7093. set_control_par_str(get_ui_id($1kgif),$CONTROL_PAR_PICTURE,"blank")
  7094. $fg4rw := 0
  7095. while ($fg4rw<num_elements(!flm4j))
  7096. add_menu_item($1kgif,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7097. inc($fg4rw)
  7098. end while
  7099. set_menu_item_str(get_ui_id($1kgif),search(%bnygy,10),"VEL Mono Velocity")
  7100. $upapg := 43
  7101. %n34di[$upapg] := get_ui_id($1kgif)
  7102. %nwlgb[$upapg] := get_ui_id($hwhlk)
  7103. !4gjzd[43] := "_1"
  7104. %c1qym[43] := get_ui_id($hwhlk)
  7105. %41o3s[43] := get_ui_id($33zwn)
  7106. declare ui_label $slteq(1, 1)
  7107. set_control_par_str(get_ui_id($slteq),$CONTROL_PAR_TEXT,"")
  7108. set_control_par_str(get_ui_id($slteq),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7109. %vvlef[43] := get_ui_id($slteq)
  7110. declare ui_label $nc2fg(1, 1)
  7111. set_control_par_str(get_ui_id($nc2fg),$CONTROL_PAR_TEXT,"")
  7112. set_control_par_str(get_ui_id($nc2fg),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7113. %2hswt[43] := get_ui_id($nc2fg)
  7114. declare ui_label $oskg3(1, 1)
  7115. set_control_par_str(get_ui_id($oskg3),$CONTROL_PAR_TEXT,"")
  7116. set_control_par_str(get_ui_id($oskg3),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7117. set_control_par(get_ui_id($oskg3),$CONTROL_PAR_Z_LAYER,1)
  7118. %lm23w[43] := get_ui_id($oskg3)
  7119. %qxmpr[43] := 1000000
  7120. %oazdd[43] := 1
  7121. !gh3f0[43] := " ?"
  7122. ?rylw5[43] := 1.0
  7123. %q4mzh[43] := $ENGINE_PAR_CUTOFF
  7124. %vc4gu[43] := -1
  7125. %hpc0e[43] := 2
  7126. %eujmz[43] := 1024
  7127. %fogcg[43] := 0
  7128. %5zak5[43] := 1
  7129. %dwdw3[43] := 0
  7130. %sbnwu[43] := 1000000
  7131. %jeswc[43] := 1036
  7132. %mnk53[43] := 83
  7133. declare %jofnx[10] := (get_ui_id($33zwn), get_ui_id($hwhlk), get_ui_id($slteq), get_ui_id($nc2fg), get_ui_id($oskg3), get_ui_id($1kgif), -1)
  7134. $g5k3r := 0
  7135. while ($g5k3r<num_elements(%jofnx))
  7136. %xwg5s[830+$g5k3r] := %jofnx[$g5k3r]
  7137. %cqg2m[83] := 0
  7138. inc($g5k3r)
  7139. end while
  7140. declare ui_slider $p0hox(0, 1000000)
  7141. make_persistent($p0hox)
  7142. declare ui_slider $2ytkr(-1000000, 1000000)
  7143. make_persistent($2ytkr)
  7144. set_control_par_str(get_ui_id($2ytkr),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7145. declare ui_menu $s2dqk
  7146. make_persistent($s2dqk)
  7147. set_control_par_str(get_ui_id($s2dqk),$CONTROL_PAR_PICTURE,"blank")
  7148. $fg4rw := 0
  7149. while ($fg4rw<num_elements(!flm4j))
  7150. add_menu_item($s2dqk,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7151. inc($fg4rw)
  7152. end while
  7153. set_menu_item_str(get_ui_id($s2dqk),search(%bnygy,10),"VEL Mono Velocity")
  7154. $upapg := 44
  7155. %n34di[$upapg] := get_ui_id($s2dqk)
  7156. %nwlgb[$upapg] := get_ui_id($2ytkr)
  7157. !4gjzd[44] := "_1"
  7158. %c1qym[44] := get_ui_id($2ytkr)
  7159. %41o3s[44] := get_ui_id($p0hox)
  7160. declare ui_label $hlfbz(1, 1)
  7161. set_control_par_str(get_ui_id($hlfbz),$CONTROL_PAR_TEXT,"")
  7162. set_control_par_str(get_ui_id($hlfbz),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7163. %vvlef[44] := get_ui_id($hlfbz)
  7164. declare ui_label $uxn53(1, 1)
  7165. set_control_par_str(get_ui_id($uxn53),$CONTROL_PAR_TEXT,"")
  7166. set_control_par_str(get_ui_id($uxn53),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7167. %2hswt[44] := get_ui_id($uxn53)
  7168. declare ui_label $cq1ee(1, 1)
  7169. set_control_par_str(get_ui_id($cq1ee),$CONTROL_PAR_TEXT,"")
  7170. set_control_par_str(get_ui_id($cq1ee),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7171. set_control_par(get_ui_id($cq1ee),$CONTROL_PAR_Z_LAYER,1)
  7172. %lm23w[44] := get_ui_id($cq1ee)
  7173. %qxmpr[44] := 1000000
  7174. %oazdd[44] := 1
  7175. !gh3f0[44] := " ?"
  7176. ?rylw5[44] := 1.0
  7177. %q4mzh[44] := $ENGINE_PAR_CUTOFF
  7178. %vc4gu[44] := -1
  7179. %hpc0e[44] := 3
  7180. %eujmz[44] := 1024
  7181. %fogcg[44] := 1
  7182. %5zak5[44] := 0
  7183. %dwdw3[44] := 0
  7184. %sbnwu[44] := 1000000
  7185. %jeswc[44] := 1039
  7186. %mnk53[44] := 84
  7187. declare %uvjok[10] := (get_ui_id($p0hox), get_ui_id($2ytkr), get_ui_id($hlfbz), get_ui_id($uxn53), get_ui_id($cq1ee), get_ui_id($s2dqk), -1)
  7188. $g5k3r := 0
  7189. while ($g5k3r<num_elements(%uvjok))
  7190. %xwg5s[840+$g5k3r] := %uvjok[$g5k3r]
  7191. %cqg2m[84] := 0
  7192. inc($g5k3r)
  7193. end while
  7194. declare ui_slider $bokn2(0, 1000000)
  7195. make_persistent($bokn2)
  7196. declare ui_slider $ak4fz(-1000000, 1000000)
  7197. make_persistent($ak4fz)
  7198. set_control_par_str(get_ui_id($ak4fz),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7199. declare ui_menu $0zrh0
  7200. make_persistent($0zrh0)
  7201. set_control_par_str(get_ui_id($0zrh0),$CONTROL_PAR_PICTURE,"blank")
  7202. $fg4rw := 0
  7203. while ($fg4rw<num_elements(!flm4j))
  7204. add_menu_item($0zrh0,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7205. inc($fg4rw)
  7206. end while
  7207. set_menu_item_str(get_ui_id($0zrh0),search(%bnygy,10),"VEL Mono Velocity")
  7208. $upapg := 45
  7209. %n34di[$upapg] := get_ui_id($0zrh0)
  7210. %nwlgb[$upapg] := get_ui_id($ak4fz)
  7211. !4gjzd[45] := "_1"
  7212. %c1qym[45] := get_ui_id($ak4fz)
  7213. %41o3s[45] := get_ui_id($bokn2)
  7214. declare ui_label $t0qzg(1, 1)
  7215. set_control_par_str(get_ui_id($t0qzg),$CONTROL_PAR_TEXT,"")
  7216. set_control_par_str(get_ui_id($t0qzg),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7217. %vvlef[45] := get_ui_id($t0qzg)
  7218. declare ui_label $hin0l(1, 1)
  7219. set_control_par_str(get_ui_id($hin0l),$CONTROL_PAR_TEXT,"")
  7220. set_control_par_str(get_ui_id($hin0l),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7221. %2hswt[45] := get_ui_id($hin0l)
  7222. declare ui_label $gz1bb(1, 1)
  7223. set_control_par_str(get_ui_id($gz1bb),$CONTROL_PAR_TEXT,"")
  7224. set_control_par_str(get_ui_id($gz1bb),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7225. set_control_par(get_ui_id($gz1bb),$CONTROL_PAR_Z_LAYER,1)
  7226. %lm23w[45] := get_ui_id($gz1bb)
  7227. %qxmpr[45] := 1000000
  7228. %oazdd[45] := 1
  7229. !gh3f0[45] := " ?"
  7230. ?rylw5[45] := 1.0
  7231. %q4mzh[45] := $ENGINE_PAR_CUTOFF
  7232. %vc4gu[45] := -1
  7233. %hpc0e[45] := 3
  7234. %eujmz[45] := 1024
  7235. %fogcg[45] := 0
  7236. %5zak5[45] := 0
  7237. %dwdw3[45] := 0
  7238. %sbnwu[45] := 1000000
  7239. %jeswc[45] := 1042
  7240. %mnk53[45] := 85
  7241. declare %2hwjf[10] := (get_ui_id($bokn2), get_ui_id($ak4fz), get_ui_id($t0qzg), get_ui_id($hin0l), get_ui_id($gz1bb), get_ui_id($0zrh0), -1)
  7242. $g5k3r := 0
  7243. while ($g5k3r<num_elements(%2hwjf))
  7244. %xwg5s[850+$g5k3r] := %2hwjf[$g5k3r]
  7245. %cqg2m[85] := 0
  7246. inc($g5k3r)
  7247. end while
  7248. declare ui_slider $xxdkc(0, 1000000)
  7249. make_persistent($xxdkc)
  7250. declare ui_slider $pqxkq(-1000000, 1000000)
  7251. make_persistent($pqxkq)
  7252. set_control_par_str(get_ui_id($pqxkq),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7253. declare ui_menu $mgevd
  7254. make_persistent($mgevd)
  7255. set_control_par_str(get_ui_id($mgevd),$CONTROL_PAR_PICTURE,"blank")
  7256. $fg4rw := 0
  7257. while ($fg4rw<num_elements(!flm4j))
  7258. add_menu_item($mgevd,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7259. inc($fg4rw)
  7260. end while
  7261. set_menu_item_str(get_ui_id($mgevd),search(%bnygy,10),"VEL Mono Velocity")
  7262. $upapg := 46
  7263. %n34di[$upapg] := get_ui_id($mgevd)
  7264. %nwlgb[$upapg] := get_ui_id($pqxkq)
  7265. !4gjzd[46] := "_1"
  7266. %c1qym[46] := get_ui_id($pqxkq)
  7267. %41o3s[46] := get_ui_id($xxdkc)
  7268. declare ui_label $vbtga(1, 1)
  7269. set_control_par_str(get_ui_id($vbtga),$CONTROL_PAR_TEXT,"")
  7270. set_control_par_str(get_ui_id($vbtga),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7271. %vvlef[46] := get_ui_id($vbtga)
  7272. declare ui_label $fwnv1(1, 1)
  7273. set_control_par_str(get_ui_id($fwnv1),$CONTROL_PAR_TEXT,"")
  7274. set_control_par_str(get_ui_id($fwnv1),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7275. %2hswt[46] := get_ui_id($fwnv1)
  7276. declare ui_label $upzyn(1, 1)
  7277. set_control_par_str(get_ui_id($upzyn),$CONTROL_PAR_TEXT,"")
  7278. set_control_par_str(get_ui_id($upzyn),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7279. set_control_par(get_ui_id($upzyn),$CONTROL_PAR_Z_LAYER,1)
  7280. %lm23w[46] := get_ui_id($upzyn)
  7281. %qxmpr[46] := 1000000
  7282. %oazdd[46] := 1
  7283. !gh3f0[46] := " ?"
  7284. ?rylw5[46] := 1.0
  7285. %q4mzh[46] := $ENGINE_PAR_CUTOFF
  7286. %vc4gu[46] := -1
  7287. %hpc0e[46] := 3
  7288. %eujmz[46] := 1024
  7289. %fogcg[46] := 0
  7290. %5zak5[46] := 1
  7291. %dwdw3[46] := 0
  7292. %sbnwu[46] := 1000000
  7293. %jeswc[46] := 1045
  7294. %mnk53[46] := 86
  7295. declare %chhb1[10] := (get_ui_id($xxdkc), get_ui_id($pqxkq), get_ui_id($vbtga), get_ui_id($fwnv1), get_ui_id($upzyn), get_ui_id($mgevd), -1)
  7296. $g5k3r := 0
  7297. while ($g5k3r<num_elements(%chhb1))
  7298. %xwg5s[860+$g5k3r] := %chhb1[$g5k3r]
  7299. %cqg2m[86] := 0
  7300. inc($g5k3r)
  7301. end while
  7302. end if
  7303. if (1=1)
  7304. declare ui_slider $dyqeg(0, 1000000)
  7305. make_persistent($dyqeg)
  7306. declare ui_slider $cz5nc(-1000000, 1000000)
  7307. make_persistent($cz5nc)
  7308. set_control_par_str(get_ui_id($cz5nc),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7309. declare ui_menu $n32ls
  7310. make_persistent($n32ls)
  7311. set_control_par_str(get_ui_id($n32ls),$CONTROL_PAR_PICTURE,"blank")
  7312. $fg4rw := 0
  7313. while ($fg4rw<num_elements(!flm4j))
  7314. add_menu_item($n32ls,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7315. inc($fg4rw)
  7316. end while
  7317. set_menu_item_str(get_ui_id($n32ls),search(%bnygy,10),"VEL Mono Velocity")
  7318. $upapg := 47
  7319. %n34di[$upapg] := get_ui_id($n32ls)
  7320. %nwlgb[$upapg] := get_ui_id($cz5nc)
  7321. !4gjzd[47] := "_1"
  7322. %c1qym[47] := get_ui_id($cz5nc)
  7323. %41o3s[47] := get_ui_id($dyqeg)
  7324. declare ui_label $gf42a(1, 1)
  7325. set_control_par_str(get_ui_id($gf42a),$CONTROL_PAR_TEXT,"")
  7326. set_control_par_str(get_ui_id($gf42a),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7327. %vvlef[47] := get_ui_id($gf42a)
  7328. declare ui_label $wnvgj(1, 1)
  7329. set_control_par_str(get_ui_id($wnvgj),$CONTROL_PAR_TEXT,"")
  7330. set_control_par_str(get_ui_id($wnvgj),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7331. %2hswt[47] := get_ui_id($wnvgj)
  7332. declare ui_label $ybjnd(1, 1)
  7333. set_control_par_str(get_ui_id($ybjnd),$CONTROL_PAR_TEXT,"")
  7334. set_control_par_str(get_ui_id($ybjnd),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7335. set_control_par(get_ui_id($ybjnd),$CONTROL_PAR_Z_LAYER,1)
  7336. %lm23w[47] := get_ui_id($ybjnd)
  7337. %qxmpr[47] := 1000000
  7338. %oazdd[47] := 1
  7339. !gh3f0[47] := " ?"
  7340. ?rylw5[47] := 1.0
  7341. %q4mzh[47] := $ENGINE_PAR_CUTOFF
  7342. %vc4gu[47] := -1
  7343. %hpc0e[47] := 0
  7344. %eujmz[47] := 1025
  7345. %fogcg[47] := 1
  7346. %5zak5[47] := 0
  7347. %dwdw3[47] := 0
  7348. %sbnwu[47] := 1000000
  7349. %jeswc[47] := 1048
  7350. %mnk53[47] := 87
  7351. declare %f1w05[10] := (get_ui_id($dyqeg), get_ui_id($cz5nc), get_ui_id($gf42a), get_ui_id($wnvgj), get_ui_id($ybjnd), get_ui_id($n32ls), -1)
  7352. $g5k3r := 0
  7353. while ($g5k3r<num_elements(%f1w05))
  7354. %xwg5s[870+$g5k3r] := %f1w05[$g5k3r]
  7355. %cqg2m[87] := 0
  7356. inc($g5k3r)
  7357. end while
  7358. declare ui_slider $nznqd(0, 1000000)
  7359. make_persistent($nznqd)
  7360. declare ui_slider $pa1jg(-1000000, 1000000)
  7361. make_persistent($pa1jg)
  7362. set_control_par_str(get_ui_id($pa1jg),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7363. declare ui_menu $51guv
  7364. make_persistent($51guv)
  7365. set_control_par_str(get_ui_id($51guv),$CONTROL_PAR_PICTURE,"blank")
  7366. $fg4rw := 0
  7367. while ($fg4rw<num_elements(!flm4j))
  7368. add_menu_item($51guv,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7369. inc($fg4rw)
  7370. end while
  7371. set_menu_item_str(get_ui_id($51guv),search(%bnygy,10),"VEL Mono Velocity")
  7372. $upapg := 48
  7373. %n34di[$upapg] := get_ui_id($51guv)
  7374. %nwlgb[$upapg] := get_ui_id($pa1jg)
  7375. !4gjzd[48] := "_1"
  7376. %c1qym[48] := get_ui_id($pa1jg)
  7377. %41o3s[48] := get_ui_id($nznqd)
  7378. declare ui_label $rns24(1, 1)
  7379. set_control_par_str(get_ui_id($rns24),$CONTROL_PAR_TEXT,"")
  7380. set_control_par_str(get_ui_id($rns24),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7381. %vvlef[48] := get_ui_id($rns24)
  7382. declare ui_label $fwilx(1, 1)
  7383. set_control_par_str(get_ui_id($fwilx),$CONTROL_PAR_TEXT,"")
  7384. set_control_par_str(get_ui_id($fwilx),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7385. %2hswt[48] := get_ui_id($fwilx)
  7386. declare ui_label $ux3gn(1, 1)
  7387. set_control_par_str(get_ui_id($ux3gn),$CONTROL_PAR_TEXT,"")
  7388. set_control_par_str(get_ui_id($ux3gn),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7389. set_control_par(get_ui_id($ux3gn),$CONTROL_PAR_Z_LAYER,1)
  7390. %lm23w[48] := get_ui_id($ux3gn)
  7391. %qxmpr[48] := 1000000
  7392. %oazdd[48] := 1
  7393. !gh3f0[48] := " ?"
  7394. ?rylw5[48] := 1.0
  7395. %q4mzh[48] := $ENGINE_PAR_CUTOFF
  7396. %vc4gu[48] := -1
  7397. %hpc0e[48] := 0
  7398. %eujmz[48] := 1025
  7399. %fogcg[48] := 0
  7400. %5zak5[48] := 0
  7401. %dwdw3[48] := 0
  7402. %sbnwu[48] := 1000000
  7403. %jeswc[48] := 1051
  7404. %mnk53[48] := 88
  7405. declare %f5c1e[10] := (get_ui_id($nznqd), get_ui_id($pa1jg), get_ui_id($rns24), get_ui_id($fwilx), get_ui_id($ux3gn), get_ui_id($51guv), -1)
  7406. $g5k3r := 0
  7407. while ($g5k3r<num_elements(%f5c1e))
  7408. %xwg5s[880+$g5k3r] := %f5c1e[$g5k3r]
  7409. %cqg2m[88] := 0
  7410. inc($g5k3r)
  7411. end while
  7412. declare ui_slider $zprpl(0, 1000000)
  7413. make_persistent($zprpl)
  7414. declare ui_slider $hfm3k(-1000000, 1000000)
  7415. make_persistent($hfm3k)
  7416. set_control_par_str(get_ui_id($hfm3k),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7417. declare ui_menu $k3qfg
  7418. make_persistent($k3qfg)
  7419. set_control_par_str(get_ui_id($k3qfg),$CONTROL_PAR_PICTURE,"blank")
  7420. $fg4rw := 0
  7421. while ($fg4rw<num_elements(!flm4j))
  7422. add_menu_item($k3qfg,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7423. inc($fg4rw)
  7424. end while
  7425. set_menu_item_str(get_ui_id($k3qfg),search(%bnygy,10),"VEL Mono Velocity")
  7426. $upapg := 49
  7427. %n34di[$upapg] := get_ui_id($k3qfg)
  7428. %nwlgb[$upapg] := get_ui_id($hfm3k)
  7429. !4gjzd[49] := "_1"
  7430. %c1qym[49] := get_ui_id($hfm3k)
  7431. %41o3s[49] := get_ui_id($zprpl)
  7432. declare ui_label $1niri(1, 1)
  7433. set_control_par_str(get_ui_id($1niri),$CONTROL_PAR_TEXT,"")
  7434. set_control_par_str(get_ui_id($1niri),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7435. %vvlef[49] := get_ui_id($1niri)
  7436. declare ui_label $suvja(1, 1)
  7437. set_control_par_str(get_ui_id($suvja),$CONTROL_PAR_TEXT,"")
  7438. set_control_par_str(get_ui_id($suvja),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7439. %2hswt[49] := get_ui_id($suvja)
  7440. declare ui_label $tw402(1, 1)
  7441. set_control_par_str(get_ui_id($tw402),$CONTROL_PAR_TEXT,"")
  7442. set_control_par_str(get_ui_id($tw402),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7443. set_control_par(get_ui_id($tw402),$CONTROL_PAR_Z_LAYER,1)
  7444. %lm23w[49] := get_ui_id($tw402)
  7445. %qxmpr[49] := 1000000
  7446. %oazdd[49] := 1
  7447. !gh3f0[49] := " ?"
  7448. ?rylw5[49] := 1.0
  7449. %q4mzh[49] := $ENGINE_PAR_CUTOFF
  7450. %vc4gu[49] := -1
  7451. %hpc0e[49] := 0
  7452. %eujmz[49] := 1025
  7453. %fogcg[49] := 0
  7454. %5zak5[49] := 1
  7455. %dwdw3[49] := 0
  7456. %sbnwu[49] := 1000000
  7457. %jeswc[49] := 1054
  7458. %mnk53[49] := 89
  7459. declare %3c34c[10] := (get_ui_id($zprpl), get_ui_id($hfm3k), get_ui_id($1niri), get_ui_id($suvja), get_ui_id($tw402), get_ui_id($k3qfg), -1)
  7460. $g5k3r := 0
  7461. while ($g5k3r<num_elements(%3c34c))
  7462. %xwg5s[890+$g5k3r] := %3c34c[$g5k3r]
  7463. %cqg2m[89] := 0
  7464. inc($g5k3r)
  7465. end while
  7466. declare ui_slider $bpu3e(0, 1000000)
  7467. make_persistent($bpu3e)
  7468. declare ui_slider $fnxkg(-1000000, 1000000)
  7469. make_persistent($fnxkg)
  7470. set_control_par_str(get_ui_id($fnxkg),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7471. declare ui_menu $d4ity
  7472. make_persistent($d4ity)
  7473. set_control_par_str(get_ui_id($d4ity),$CONTROL_PAR_PICTURE,"blank")
  7474. $fg4rw := 0
  7475. while ($fg4rw<num_elements(!flm4j))
  7476. add_menu_item($d4ity,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7477. inc($fg4rw)
  7478. end while
  7479. set_menu_item_str(get_ui_id($d4ity),search(%bnygy,10),"VEL Mono Velocity")
  7480. $upapg := 50
  7481. %n34di[$upapg] := get_ui_id($d4ity)
  7482. %nwlgb[$upapg] := get_ui_id($fnxkg)
  7483. !4gjzd[50] := "_1"
  7484. %c1qym[50] := get_ui_id($fnxkg)
  7485. %41o3s[50] := get_ui_id($bpu3e)
  7486. declare ui_label $sexos(1, 1)
  7487. set_control_par_str(get_ui_id($sexos),$CONTROL_PAR_TEXT,"")
  7488. set_control_par_str(get_ui_id($sexos),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7489. %vvlef[50] := get_ui_id($sexos)
  7490. declare ui_label $h5kqw(1, 1)
  7491. set_control_par_str(get_ui_id($h5kqw),$CONTROL_PAR_TEXT,"")
  7492. set_control_par_str(get_ui_id($h5kqw),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7493. %2hswt[50] := get_ui_id($h5kqw)
  7494. declare ui_label $esouz(1, 1)
  7495. set_control_par_str(get_ui_id($esouz),$CONTROL_PAR_TEXT,"")
  7496. set_control_par_str(get_ui_id($esouz),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7497. set_control_par(get_ui_id($esouz),$CONTROL_PAR_Z_LAYER,1)
  7498. %lm23w[50] := get_ui_id($esouz)
  7499. %qxmpr[50] := 1000000
  7500. %oazdd[50] := 1
  7501. !gh3f0[50] := " ?"
  7502. ?rylw5[50] := 1.0
  7503. %q4mzh[50] := $ENGINE_PAR_CUTOFF
  7504. %vc4gu[50] := -1
  7505. %hpc0e[50] := 1
  7506. %eujmz[50] := 1025
  7507. %fogcg[50] := 1
  7508. %5zak5[50] := 0
  7509. %dwdw3[50] := 0
  7510. %sbnwu[50] := 1000000
  7511. %jeswc[50] := 1057
  7512. %mnk53[50] := 90
  7513. declare %vemjz[10] := (get_ui_id($bpu3e), get_ui_id($fnxkg), get_ui_id($sexos), get_ui_id($h5kqw), get_ui_id($esouz), get_ui_id($d4ity), -1)
  7514. $g5k3r := 0
  7515. while ($g5k3r<num_elements(%vemjz))
  7516. %xwg5s[900+$g5k3r] := %vemjz[$g5k3r]
  7517. %cqg2m[90] := 0
  7518. inc($g5k3r)
  7519. end while
  7520. declare ui_slider $s20mm(0, 1000000)
  7521. make_persistent($s20mm)
  7522. declare ui_slider $i5nrk(-1000000, 1000000)
  7523. make_persistent($i5nrk)
  7524. set_control_par_str(get_ui_id($i5nrk),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7525. declare ui_menu $cm0ux
  7526. make_persistent($cm0ux)
  7527. set_control_par_str(get_ui_id($cm0ux),$CONTROL_PAR_PICTURE,"blank")
  7528. $fg4rw := 0
  7529. while ($fg4rw<num_elements(!flm4j))
  7530. add_menu_item($cm0ux,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7531. inc($fg4rw)
  7532. end while
  7533. set_menu_item_str(get_ui_id($cm0ux),search(%bnygy,10),"VEL Mono Velocity")
  7534. $upapg := 51
  7535. %n34di[$upapg] := get_ui_id($cm0ux)
  7536. %nwlgb[$upapg] := get_ui_id($i5nrk)
  7537. !4gjzd[51] := "_1"
  7538. %c1qym[51] := get_ui_id($i5nrk)
  7539. %41o3s[51] := get_ui_id($s20mm)
  7540. declare ui_label $ipwq5(1, 1)
  7541. set_control_par_str(get_ui_id($ipwq5),$CONTROL_PAR_TEXT,"")
  7542. set_control_par_str(get_ui_id($ipwq5),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7543. %vvlef[51] := get_ui_id($ipwq5)
  7544. declare ui_label $oiki1(1, 1)
  7545. set_control_par_str(get_ui_id($oiki1),$CONTROL_PAR_TEXT,"")
  7546. set_control_par_str(get_ui_id($oiki1),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7547. %2hswt[51] := get_ui_id($oiki1)
  7548. declare ui_label $co2u4(1, 1)
  7549. set_control_par_str(get_ui_id($co2u4),$CONTROL_PAR_TEXT,"")
  7550. set_control_par_str(get_ui_id($co2u4),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7551. set_control_par(get_ui_id($co2u4),$CONTROL_PAR_Z_LAYER,1)
  7552. %lm23w[51] := get_ui_id($co2u4)
  7553. %qxmpr[51] := 1000000
  7554. %oazdd[51] := 1
  7555. !gh3f0[51] := " ?"
  7556. ?rylw5[51] := 1.0
  7557. %q4mzh[51] := $ENGINE_PAR_CUTOFF
  7558. %vc4gu[51] := -1
  7559. %hpc0e[51] := 1
  7560. %eujmz[51] := 1025
  7561. %fogcg[51] := 0
  7562. %5zak5[51] := 0
  7563. %dwdw3[51] := 0
  7564. %sbnwu[51] := 1000000
  7565. %jeswc[51] := 1060
  7566. %mnk53[51] := 91
  7567. declare %qgov3[10] := (get_ui_id($s20mm), get_ui_id($i5nrk), get_ui_id($ipwq5), get_ui_id($oiki1), get_ui_id($co2u4), get_ui_id($cm0ux), -1)
  7568. $g5k3r := 0
  7569. while ($g5k3r<num_elements(%qgov3))
  7570. %xwg5s[910+$g5k3r] := %qgov3[$g5k3r]
  7571. %cqg2m[91] := 0
  7572. inc($g5k3r)
  7573. end while
  7574. declare ui_slider $5q021(0, 1000000)
  7575. make_persistent($5q021)
  7576. declare ui_slider $fm2z3(-1000000, 1000000)
  7577. make_persistent($fm2z3)
  7578. set_control_par_str(get_ui_id($fm2z3),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7579. declare ui_menu $q1g2q
  7580. make_persistent($q1g2q)
  7581. set_control_par_str(get_ui_id($q1g2q),$CONTROL_PAR_PICTURE,"blank")
  7582. $fg4rw := 0
  7583. while ($fg4rw<num_elements(!flm4j))
  7584. add_menu_item($q1g2q,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7585. inc($fg4rw)
  7586. end while
  7587. set_menu_item_str(get_ui_id($q1g2q),search(%bnygy,10),"VEL Mono Velocity")
  7588. $upapg := 52
  7589. %n34di[$upapg] := get_ui_id($q1g2q)
  7590. %nwlgb[$upapg] := get_ui_id($fm2z3)
  7591. !4gjzd[52] := "_1"
  7592. %c1qym[52] := get_ui_id($fm2z3)
  7593. %41o3s[52] := get_ui_id($5q021)
  7594. declare ui_label $hn0ig(1, 1)
  7595. set_control_par_str(get_ui_id($hn0ig),$CONTROL_PAR_TEXT,"")
  7596. set_control_par_str(get_ui_id($hn0ig),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7597. %vvlef[52] := get_ui_id($hn0ig)
  7598. declare ui_label $32psj(1, 1)
  7599. set_control_par_str(get_ui_id($32psj),$CONTROL_PAR_TEXT,"")
  7600. set_control_par_str(get_ui_id($32psj),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7601. %2hswt[52] := get_ui_id($32psj)
  7602. declare ui_label $3ithk(1, 1)
  7603. set_control_par_str(get_ui_id($3ithk),$CONTROL_PAR_TEXT,"")
  7604. set_control_par_str(get_ui_id($3ithk),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7605. set_control_par(get_ui_id($3ithk),$CONTROL_PAR_Z_LAYER,1)
  7606. %lm23w[52] := get_ui_id($3ithk)
  7607. %qxmpr[52] := 1000000
  7608. %oazdd[52] := 1
  7609. !gh3f0[52] := " ?"
  7610. ?rylw5[52] := 1.0
  7611. %q4mzh[52] := $ENGINE_PAR_CUTOFF
  7612. %vc4gu[52] := -1
  7613. %hpc0e[52] := 1
  7614. %eujmz[52] := 1025
  7615. %fogcg[52] := 0
  7616. %5zak5[52] := 1
  7617. %dwdw3[52] := 0
  7618. %sbnwu[52] := 1000000
  7619. %jeswc[52] := 1063
  7620. %mnk53[52] := 92
  7621. declare %4zxca[10] := (get_ui_id($5q021), get_ui_id($fm2z3), get_ui_id($hn0ig), get_ui_id($32psj), get_ui_id($3ithk), get_ui_id($q1g2q), -1)
  7622. $g5k3r := 0
  7623. while ($g5k3r<num_elements(%4zxca))
  7624. %xwg5s[920+$g5k3r] := %4zxca[$g5k3r]
  7625. %cqg2m[92] := 0
  7626. inc($g5k3r)
  7627. end while
  7628. declare ui_slider $fnpd2(0, 1000000)
  7629. make_persistent($fnpd2)
  7630. declare ui_slider $cakzn(-1000000, 1000000)
  7631. make_persistent($cakzn)
  7632. set_control_par_str(get_ui_id($cakzn),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7633. declare ui_menu $rjvzf
  7634. make_persistent($rjvzf)
  7635. set_control_par_str(get_ui_id($rjvzf),$CONTROL_PAR_PICTURE,"blank")
  7636. $fg4rw := 0
  7637. while ($fg4rw<num_elements(!flm4j))
  7638. add_menu_item($rjvzf,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7639. inc($fg4rw)
  7640. end while
  7641. set_menu_item_str(get_ui_id($rjvzf),search(%bnygy,10),"VEL Mono Velocity")
  7642. $upapg := 53
  7643. %n34di[$upapg] := get_ui_id($rjvzf)
  7644. %nwlgb[$upapg] := get_ui_id($cakzn)
  7645. !4gjzd[53] := "_1"
  7646. %c1qym[53] := get_ui_id($cakzn)
  7647. %41o3s[53] := get_ui_id($fnpd2)
  7648. declare ui_label $vrkxf(1, 1)
  7649. set_control_par_str(get_ui_id($vrkxf),$CONTROL_PAR_TEXT,"")
  7650. set_control_par_str(get_ui_id($vrkxf),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7651. %vvlef[53] := get_ui_id($vrkxf)
  7652. declare ui_label $wc0va(1, 1)
  7653. set_control_par_str(get_ui_id($wc0va),$CONTROL_PAR_TEXT,"")
  7654. set_control_par_str(get_ui_id($wc0va),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7655. %2hswt[53] := get_ui_id($wc0va)
  7656. declare ui_label $rhc3d(1, 1)
  7657. set_control_par_str(get_ui_id($rhc3d),$CONTROL_PAR_TEXT,"")
  7658. set_control_par_str(get_ui_id($rhc3d),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7659. set_control_par(get_ui_id($rhc3d),$CONTROL_PAR_Z_LAYER,1)
  7660. %lm23w[53] := get_ui_id($rhc3d)
  7661. %qxmpr[53] := 1000000
  7662. %oazdd[53] := 1
  7663. !gh3f0[53] := " ?"
  7664. ?rylw5[53] := 1.0
  7665. %q4mzh[53] := $ENGINE_PAR_CUTOFF
  7666. %vc4gu[53] := -1
  7667. %hpc0e[53] := 2
  7668. %eujmz[53] := 1025
  7669. %fogcg[53] := 1
  7670. %5zak5[53] := 0
  7671. %dwdw3[53] := 0
  7672. %sbnwu[53] := 1000000
  7673. %jeswc[53] := 1066
  7674. %mnk53[53] := 93
  7675. declare %am04u[10] := (get_ui_id($fnpd2), get_ui_id($cakzn), get_ui_id($vrkxf), get_ui_id($wc0va), get_ui_id($rhc3d), get_ui_id($rjvzf), -1)
  7676. $g5k3r := 0
  7677. while ($g5k3r<num_elements(%am04u))
  7678. %xwg5s[930+$g5k3r] := %am04u[$g5k3r]
  7679. %cqg2m[93] := 0
  7680. inc($g5k3r)
  7681. end while
  7682. declare ui_slider $wmqep(0, 1000000)
  7683. make_persistent($wmqep)
  7684. declare ui_slider $oybgu(-1000000, 1000000)
  7685. make_persistent($oybgu)
  7686. set_control_par_str(get_ui_id($oybgu),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7687. declare ui_menu $nrlyv
  7688. make_persistent($nrlyv)
  7689. set_control_par_str(get_ui_id($nrlyv),$CONTROL_PAR_PICTURE,"blank")
  7690. $fg4rw := 0
  7691. while ($fg4rw<num_elements(!flm4j))
  7692. add_menu_item($nrlyv,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7693. inc($fg4rw)
  7694. end while
  7695. set_menu_item_str(get_ui_id($nrlyv),search(%bnygy,10),"VEL Mono Velocity")
  7696. $upapg := 54
  7697. %n34di[$upapg] := get_ui_id($nrlyv)
  7698. %nwlgb[$upapg] := get_ui_id($oybgu)
  7699. !4gjzd[54] := "_1"
  7700. %c1qym[54] := get_ui_id($oybgu)
  7701. %41o3s[54] := get_ui_id($wmqep)
  7702. declare ui_label $2ukoq(1, 1)
  7703. set_control_par_str(get_ui_id($2ukoq),$CONTROL_PAR_TEXT,"")
  7704. set_control_par_str(get_ui_id($2ukoq),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7705. %vvlef[54] := get_ui_id($2ukoq)
  7706. declare ui_label $codqi(1, 1)
  7707. set_control_par_str(get_ui_id($codqi),$CONTROL_PAR_TEXT,"")
  7708. set_control_par_str(get_ui_id($codqi),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7709. %2hswt[54] := get_ui_id($codqi)
  7710. declare ui_label $1jzi3(1, 1)
  7711. set_control_par_str(get_ui_id($1jzi3),$CONTROL_PAR_TEXT,"")
  7712. set_control_par_str(get_ui_id($1jzi3),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7713. set_control_par(get_ui_id($1jzi3),$CONTROL_PAR_Z_LAYER,1)
  7714. %lm23w[54] := get_ui_id($1jzi3)
  7715. %qxmpr[54] := 1000000
  7716. %oazdd[54] := 1
  7717. !gh3f0[54] := " ?"
  7718. ?rylw5[54] := 1.0
  7719. %q4mzh[54] := $ENGINE_PAR_CUTOFF
  7720. %vc4gu[54] := -1
  7721. %hpc0e[54] := 2
  7722. %eujmz[54] := 1025
  7723. %fogcg[54] := 0
  7724. %5zak5[54] := 0
  7725. %dwdw3[54] := 0
  7726. %sbnwu[54] := 1000000
  7727. %jeswc[54] := 1069
  7728. %mnk53[54] := 94
  7729. declare %tx5wu[10] := (get_ui_id($wmqep), get_ui_id($oybgu), get_ui_id($2ukoq), get_ui_id($codqi), get_ui_id($1jzi3), get_ui_id($nrlyv), -1)
  7730. $g5k3r := 0
  7731. while ($g5k3r<num_elements(%tx5wu))
  7732. %xwg5s[940+$g5k3r] := %tx5wu[$g5k3r]
  7733. %cqg2m[94] := 0
  7734. inc($g5k3r)
  7735. end while
  7736. declare ui_slider $gsxh3(0, 1000000)
  7737. make_persistent($gsxh3)
  7738. declare ui_slider $jkr4m(-1000000, 1000000)
  7739. make_persistent($jkr4m)
  7740. set_control_par_str(get_ui_id($jkr4m),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7741. declare ui_menu $qvjwi
  7742. make_persistent($qvjwi)
  7743. set_control_par_str(get_ui_id($qvjwi),$CONTROL_PAR_PICTURE,"blank")
  7744. $fg4rw := 0
  7745. while ($fg4rw<num_elements(!flm4j))
  7746. add_menu_item($qvjwi,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7747. inc($fg4rw)
  7748. end while
  7749. set_menu_item_str(get_ui_id($qvjwi),search(%bnygy,10),"VEL Mono Velocity")
  7750. $upapg := 55
  7751. %n34di[$upapg] := get_ui_id($qvjwi)
  7752. %nwlgb[$upapg] := get_ui_id($jkr4m)
  7753. !4gjzd[55] := "_1"
  7754. %c1qym[55] := get_ui_id($jkr4m)
  7755. %41o3s[55] := get_ui_id($gsxh3)
  7756. declare ui_label $2rkvi(1, 1)
  7757. set_control_par_str(get_ui_id($2rkvi),$CONTROL_PAR_TEXT,"")
  7758. set_control_par_str(get_ui_id($2rkvi),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7759. %vvlef[55] := get_ui_id($2rkvi)
  7760. declare ui_label $h5ncl(1, 1)
  7761. set_control_par_str(get_ui_id($h5ncl),$CONTROL_PAR_TEXT,"")
  7762. set_control_par_str(get_ui_id($h5ncl),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7763. %2hswt[55] := get_ui_id($h5ncl)
  7764. declare ui_label $5kihk(1, 1)
  7765. set_control_par_str(get_ui_id($5kihk),$CONTROL_PAR_TEXT,"")
  7766. set_control_par_str(get_ui_id($5kihk),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7767. set_control_par(get_ui_id($5kihk),$CONTROL_PAR_Z_LAYER,1)
  7768. %lm23w[55] := get_ui_id($5kihk)
  7769. %qxmpr[55] := 1000000
  7770. %oazdd[55] := 1
  7771. !gh3f0[55] := " ?"
  7772. ?rylw5[55] := 1.0
  7773. %q4mzh[55] := $ENGINE_PAR_CUTOFF
  7774. %vc4gu[55] := -1
  7775. %hpc0e[55] := 2
  7776. %eujmz[55] := 1025
  7777. %fogcg[55] := 0
  7778. %5zak5[55] := 1
  7779. %dwdw3[55] := 0
  7780. %sbnwu[55] := 1000000
  7781. %jeswc[55] := 1072
  7782. %mnk53[55] := 95
  7783. declare %jsh0a[10] := (get_ui_id($gsxh3), get_ui_id($jkr4m), get_ui_id($2rkvi), get_ui_id($h5ncl), get_ui_id($5kihk), get_ui_id($qvjwi), -1)
  7784. $g5k3r := 0
  7785. while ($g5k3r<num_elements(%jsh0a))
  7786. %xwg5s[950+$g5k3r] := %jsh0a[$g5k3r]
  7787. %cqg2m[95] := 0
  7788. inc($g5k3r)
  7789. end while
  7790. declare ui_slider $edhpo(0, 1000000)
  7791. make_persistent($edhpo)
  7792. declare ui_slider $dero1(-1000000, 1000000)
  7793. make_persistent($dero1)
  7794. set_control_par_str(get_ui_id($dero1),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7795. declare ui_menu $no43m
  7796. make_persistent($no43m)
  7797. set_control_par_str(get_ui_id($no43m),$CONTROL_PAR_PICTURE,"blank")
  7798. $fg4rw := 0
  7799. while ($fg4rw<num_elements(!flm4j))
  7800. add_menu_item($no43m,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7801. inc($fg4rw)
  7802. end while
  7803. set_menu_item_str(get_ui_id($no43m),search(%bnygy,10),"VEL Mono Velocity")
  7804. $upapg := 56
  7805. %n34di[$upapg] := get_ui_id($no43m)
  7806. %nwlgb[$upapg] := get_ui_id($dero1)
  7807. !4gjzd[56] := "_1"
  7808. %c1qym[56] := get_ui_id($dero1)
  7809. %41o3s[56] := get_ui_id($edhpo)
  7810. declare ui_label $ppytu(1, 1)
  7811. set_control_par_str(get_ui_id($ppytu),$CONTROL_PAR_TEXT,"")
  7812. set_control_par_str(get_ui_id($ppytu),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7813. %vvlef[56] := get_ui_id($ppytu)
  7814. declare ui_label $pb3uw(1, 1)
  7815. set_control_par_str(get_ui_id($pb3uw),$CONTROL_PAR_TEXT,"")
  7816. set_control_par_str(get_ui_id($pb3uw),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7817. %2hswt[56] := get_ui_id($pb3uw)
  7818. declare ui_label $yqs0x(1, 1)
  7819. set_control_par_str(get_ui_id($yqs0x),$CONTROL_PAR_TEXT,"")
  7820. set_control_par_str(get_ui_id($yqs0x),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7821. set_control_par(get_ui_id($yqs0x),$CONTROL_PAR_Z_LAYER,1)
  7822. %lm23w[56] := get_ui_id($yqs0x)
  7823. %qxmpr[56] := 1000000
  7824. %oazdd[56] := 1
  7825. !gh3f0[56] := " ?"
  7826. ?rylw5[56] := 1.0
  7827. %q4mzh[56] := $ENGINE_PAR_CUTOFF
  7828. %vc4gu[56] := -1
  7829. %hpc0e[56] := 3
  7830. %eujmz[56] := 1025
  7831. %fogcg[56] := 1
  7832. %5zak5[56] := 0
  7833. %dwdw3[56] := 0
  7834. %sbnwu[56] := 1000000
  7835. %jeswc[56] := 1075
  7836. %mnk53[56] := 96
  7837. declare %4iye1[10] := (get_ui_id($edhpo), get_ui_id($dero1), get_ui_id($ppytu), get_ui_id($pb3uw), get_ui_id($yqs0x), get_ui_id($no43m), -1)
  7838. $g5k3r := 0
  7839. while ($g5k3r<num_elements(%4iye1))
  7840. %xwg5s[960+$g5k3r] := %4iye1[$g5k3r]
  7841. %cqg2m[96] := 0
  7842. inc($g5k3r)
  7843. end while
  7844. declare ui_slider $ei4rr(0, 1000000)
  7845. make_persistent($ei4rr)
  7846. declare ui_slider $2ptey(-1000000, 1000000)
  7847. make_persistent($2ptey)
  7848. set_control_par_str(get_ui_id($2ptey),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7849. declare ui_menu $k20qf
  7850. make_persistent($k20qf)
  7851. set_control_par_str(get_ui_id($k20qf),$CONTROL_PAR_PICTURE,"blank")
  7852. $fg4rw := 0
  7853. while ($fg4rw<num_elements(!flm4j))
  7854. add_menu_item($k20qf,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7855. inc($fg4rw)
  7856. end while
  7857. set_menu_item_str(get_ui_id($k20qf),search(%bnygy,10),"VEL Mono Velocity")
  7858. $upapg := 57
  7859. %n34di[$upapg] := get_ui_id($k20qf)
  7860. %nwlgb[$upapg] := get_ui_id($2ptey)
  7861. !4gjzd[57] := "_1"
  7862. %c1qym[57] := get_ui_id($2ptey)
  7863. %41o3s[57] := get_ui_id($ei4rr)
  7864. declare ui_label $oqxfz(1, 1)
  7865. set_control_par_str(get_ui_id($oqxfz),$CONTROL_PAR_TEXT,"")
  7866. set_control_par_str(get_ui_id($oqxfz),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7867. %vvlef[57] := get_ui_id($oqxfz)
  7868. declare ui_label $mrbg2(1, 1)
  7869. set_control_par_str(get_ui_id($mrbg2),$CONTROL_PAR_TEXT,"")
  7870. set_control_par_str(get_ui_id($mrbg2),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7871. %2hswt[57] := get_ui_id($mrbg2)
  7872. declare ui_label $4pjgu(1, 1)
  7873. set_control_par_str(get_ui_id($4pjgu),$CONTROL_PAR_TEXT,"")
  7874. set_control_par_str(get_ui_id($4pjgu),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7875. set_control_par(get_ui_id($4pjgu),$CONTROL_PAR_Z_LAYER,1)
  7876. %lm23w[57] := get_ui_id($4pjgu)
  7877. %qxmpr[57] := 1000000
  7878. %oazdd[57] := 1
  7879. !gh3f0[57] := " ?"
  7880. ?rylw5[57] := 1.0
  7881. %q4mzh[57] := $ENGINE_PAR_CUTOFF
  7882. %vc4gu[57] := -1
  7883. %hpc0e[57] := 3
  7884. %eujmz[57] := 1025
  7885. %fogcg[57] := 0
  7886. %5zak5[57] := 0
  7887. %dwdw3[57] := 0
  7888. %sbnwu[57] := 1000000
  7889. %jeswc[57] := 1078
  7890. %mnk53[57] := 97
  7891. declare %cft0y[10] := (get_ui_id($ei4rr), get_ui_id($2ptey), get_ui_id($oqxfz), get_ui_id($mrbg2), get_ui_id($4pjgu), get_ui_id($k20qf), -1)
  7892. $g5k3r := 0
  7893. while ($g5k3r<num_elements(%cft0y))
  7894. %xwg5s[970+$g5k3r] := %cft0y[$g5k3r]
  7895. %cqg2m[97] := 0
  7896. inc($g5k3r)
  7897. end while
  7898. declare ui_slider $nfnkh(0, 1000000)
  7899. make_persistent($nfnkh)
  7900. declare ui_slider $lxste(-1000000, 1000000)
  7901. make_persistent($lxste)
  7902. set_control_par_str(get_ui_id($lxste),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7903. declare ui_menu $3drha
  7904. make_persistent($3drha)
  7905. set_control_par_str(get_ui_id($3drha),$CONTROL_PAR_PICTURE,"blank")
  7906. $fg4rw := 0
  7907. while ($fg4rw<num_elements(!flm4j))
  7908. add_menu_item($3drha,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7909. inc($fg4rw)
  7910. end while
  7911. set_menu_item_str(get_ui_id($3drha),search(%bnygy,10),"VEL Mono Velocity")
  7912. $upapg := 58
  7913. %n34di[$upapg] := get_ui_id($3drha)
  7914. %nwlgb[$upapg] := get_ui_id($lxste)
  7915. !4gjzd[58] := "_1"
  7916. %c1qym[58] := get_ui_id($lxste)
  7917. %41o3s[58] := get_ui_id($nfnkh)
  7918. declare ui_label $cvwdk(1, 1)
  7919. set_control_par_str(get_ui_id($cvwdk),$CONTROL_PAR_TEXT,"")
  7920. set_control_par_str(get_ui_id($cvwdk),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7921. %vvlef[58] := get_ui_id($cvwdk)
  7922. declare ui_label $0iy1v(1, 1)
  7923. set_control_par_str(get_ui_id($0iy1v),$CONTROL_PAR_TEXT,"")
  7924. set_control_par_str(get_ui_id($0iy1v),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7925. %2hswt[58] := get_ui_id($0iy1v)
  7926. declare ui_label $cxart(1, 1)
  7927. set_control_par_str(get_ui_id($cxart),$CONTROL_PAR_TEXT,"")
  7928. set_control_par_str(get_ui_id($cxart),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7929. set_control_par(get_ui_id($cxart),$CONTROL_PAR_Z_LAYER,1)
  7930. %lm23w[58] := get_ui_id($cxart)
  7931. %qxmpr[58] := 1000000
  7932. %oazdd[58] := 1
  7933. !gh3f0[58] := " ?"
  7934. ?rylw5[58] := 1.0
  7935. %q4mzh[58] := $ENGINE_PAR_CUTOFF
  7936. %vc4gu[58] := -1
  7937. %hpc0e[58] := 3
  7938. %eujmz[58] := 1025
  7939. %fogcg[58] := 0
  7940. %5zak5[58] := 1
  7941. %dwdw3[58] := 0
  7942. %sbnwu[58] := 1000000
  7943. %jeswc[58] := 1081
  7944. %mnk53[58] := 98
  7945. declare %4jo3o[10] := (get_ui_id($nfnkh), get_ui_id($lxste), get_ui_id($cvwdk), get_ui_id($0iy1v), get_ui_id($cxart), get_ui_id($3drha), -1)
  7946. $g5k3r := 0
  7947. while ($g5k3r<num_elements(%4jo3o))
  7948. %xwg5s[980+$g5k3r] := %4jo3o[$g5k3r]
  7949. %cqg2m[98] := 0
  7950. inc($g5k3r)
  7951. end while
  7952. end if
  7953. if (1=1)
  7954. declare ui_slider $xug04(0, 1000000)
  7955. make_persistent($xug04)
  7956. declare ui_slider $hqxeu(-1000000, 1000000)
  7957. make_persistent($hqxeu)
  7958. set_control_par_str(get_ui_id($hqxeu),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  7959. declare ui_menu $iw2oc
  7960. make_persistent($iw2oc)
  7961. set_control_par_str(get_ui_id($iw2oc),$CONTROL_PAR_PICTURE,"blank")
  7962. $fg4rw := 0
  7963. while ($fg4rw<num_elements(!flm4j))
  7964. add_menu_item($iw2oc,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  7965. inc($fg4rw)
  7966. end while
  7967. set_menu_item_str(get_ui_id($iw2oc),search(%bnygy,10),"VEL Mono Velocity")
  7968. $upapg := 59
  7969. %n34di[$upapg] := get_ui_id($iw2oc)
  7970. %nwlgb[$upapg] := get_ui_id($hqxeu)
  7971. !4gjzd[59] := "_1"
  7972. %c1qym[59] := get_ui_id($hqxeu)
  7973. %41o3s[59] := get_ui_id($xug04)
  7974. declare ui_label $fbsmu(1, 1)
  7975. set_control_par_str(get_ui_id($fbsmu),$CONTROL_PAR_TEXT,"")
  7976. set_control_par_str(get_ui_id($fbsmu),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  7977. %vvlef[59] := get_ui_id($fbsmu)
  7978. declare ui_label $0xdwi(1, 1)
  7979. set_control_par_str(get_ui_id($0xdwi),$CONTROL_PAR_TEXT,"")
  7980. set_control_par_str(get_ui_id($0xdwi),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  7981. %2hswt[59] := get_ui_id($0xdwi)
  7982. declare ui_label $zagi3(1, 1)
  7983. set_control_par_str(get_ui_id($zagi3),$CONTROL_PAR_TEXT,"")
  7984. set_control_par_str(get_ui_id($zagi3),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  7985. set_control_par(get_ui_id($zagi3),$CONTROL_PAR_Z_LAYER,1)
  7986. %lm23w[59] := get_ui_id($zagi3)
  7987. %qxmpr[59] := 1000000
  7988. %oazdd[59] := 1
  7989. !gh3f0[59] := " ?"
  7990. ?rylw5[59] := 1.0
  7991. %q4mzh[59] := $ENGINE_PAR_CUTOFF
  7992. %vc4gu[59] := -1
  7993. %hpc0e[59] := 0
  7994. %eujmz[59] := 2
  7995. %fogcg[59] := 1
  7996. %5zak5[59] := 0
  7997. %dwdw3[59] := 0
  7998. %sbnwu[59] := 1000000
  7999. %jeswc[59] := 1084
  8000. %mnk53[59] := 99
  8001. declare %euwmk[10] := (get_ui_id($xug04), get_ui_id($hqxeu), get_ui_id($fbsmu), get_ui_id($0xdwi), get_ui_id($zagi3), get_ui_id($iw2oc), -1)
  8002. $g5k3r := 0
  8003. while ($g5k3r<num_elements(%euwmk))
  8004. %xwg5s[990+$g5k3r] := %euwmk[$g5k3r]
  8005. %cqg2m[99] := 0
  8006. inc($g5k3r)
  8007. end while
  8008. declare ui_slider $bvaw5(0, 1000000)
  8009. make_persistent($bvaw5)
  8010. declare ui_slider $0zlbe(-1000000, 1000000)
  8011. make_persistent($0zlbe)
  8012. set_control_par_str(get_ui_id($0zlbe),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8013. declare ui_menu $exjvd
  8014. make_persistent($exjvd)
  8015. set_control_par_str(get_ui_id($exjvd),$CONTROL_PAR_PICTURE,"blank")
  8016. $fg4rw := 0
  8017. while ($fg4rw<num_elements(!flm4j))
  8018. add_menu_item($exjvd,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8019. inc($fg4rw)
  8020. end while
  8021. set_menu_item_str(get_ui_id($exjvd),search(%bnygy,10),"VEL Mono Velocity")
  8022. $upapg := 60
  8023. %n34di[$upapg] := get_ui_id($exjvd)
  8024. %nwlgb[$upapg] := get_ui_id($0zlbe)
  8025. !4gjzd[60] := "_1"
  8026. %c1qym[60] := get_ui_id($0zlbe)
  8027. %41o3s[60] := get_ui_id($bvaw5)
  8028. declare ui_label $hfv4y(1, 1)
  8029. set_control_par_str(get_ui_id($hfv4y),$CONTROL_PAR_TEXT,"")
  8030. set_control_par_str(get_ui_id($hfv4y),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8031. %vvlef[60] := get_ui_id($hfv4y)
  8032. declare ui_label $vwkqv(1, 1)
  8033. set_control_par_str(get_ui_id($vwkqv),$CONTROL_PAR_TEXT,"")
  8034. set_control_par_str(get_ui_id($vwkqv),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8035. %2hswt[60] := get_ui_id($vwkqv)
  8036. declare ui_label $cqybi(1, 1)
  8037. set_control_par_str(get_ui_id($cqybi),$CONTROL_PAR_TEXT,"")
  8038. set_control_par_str(get_ui_id($cqybi),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8039. set_control_par(get_ui_id($cqybi),$CONTROL_PAR_Z_LAYER,1)
  8040. %lm23w[60] := get_ui_id($cqybi)
  8041. %qxmpr[60] := 1000000
  8042. %oazdd[60] := 1
  8043. !gh3f0[60] := " ?"
  8044. ?rylw5[60] := 1.0
  8045. %q4mzh[60] := $ENGINE_PAR_CUTOFF
  8046. %vc4gu[60] := -1
  8047. %hpc0e[60] := 0
  8048. %eujmz[60] := 2
  8049. %fogcg[60] := 0
  8050. %5zak5[60] := 0
  8051. %dwdw3[60] := 0
  8052. %sbnwu[60] := 1000000
  8053. %jeswc[60] := 1087
  8054. %mnk53[60] := 100
  8055. declare %hq5jy[10] := (get_ui_id($bvaw5), get_ui_id($0zlbe), get_ui_id($hfv4y), get_ui_id($vwkqv), get_ui_id($cqybi), get_ui_id($exjvd), -1)
  8056. $g5k3r := 0
  8057. while ($g5k3r<num_elements(%hq5jy))
  8058. %xwg5s[1000+$g5k3r] := %hq5jy[$g5k3r]
  8059. %cqg2m[100] := 0
  8060. inc($g5k3r)
  8061. end while
  8062. declare ui_slider $54gsh(0, 1000000)
  8063. make_persistent($54gsh)
  8064. declare ui_slider $h4nrw(-1000000, 1000000)
  8065. make_persistent($h4nrw)
  8066. set_control_par_str(get_ui_id($h4nrw),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8067. declare ui_menu $hr3vo
  8068. make_persistent($hr3vo)
  8069. set_control_par_str(get_ui_id($hr3vo),$CONTROL_PAR_PICTURE,"blank")
  8070. $fg4rw := 0
  8071. while ($fg4rw<num_elements(!flm4j))
  8072. add_menu_item($hr3vo,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8073. inc($fg4rw)
  8074. end while
  8075. set_menu_item_str(get_ui_id($hr3vo),search(%bnygy,10),"VEL Mono Velocity")
  8076. $upapg := 61
  8077. %n34di[$upapg] := get_ui_id($hr3vo)
  8078. %nwlgb[$upapg] := get_ui_id($h4nrw)
  8079. !4gjzd[61] := "_1"
  8080. %c1qym[61] := get_ui_id($h4nrw)
  8081. %41o3s[61] := get_ui_id($54gsh)
  8082. declare ui_label $egypa(1, 1)
  8083. set_control_par_str(get_ui_id($egypa),$CONTROL_PAR_TEXT,"")
  8084. set_control_par_str(get_ui_id($egypa),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8085. %vvlef[61] := get_ui_id($egypa)
  8086. declare ui_label $uxi1u(1, 1)
  8087. set_control_par_str(get_ui_id($uxi1u),$CONTROL_PAR_TEXT,"")
  8088. set_control_par_str(get_ui_id($uxi1u),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8089. %2hswt[61] := get_ui_id($uxi1u)
  8090. declare ui_label $0ovgh(1, 1)
  8091. set_control_par_str(get_ui_id($0ovgh),$CONTROL_PAR_TEXT,"")
  8092. set_control_par_str(get_ui_id($0ovgh),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8093. set_control_par(get_ui_id($0ovgh),$CONTROL_PAR_Z_LAYER,1)
  8094. %lm23w[61] := get_ui_id($0ovgh)
  8095. %qxmpr[61] := 1000000
  8096. %oazdd[61] := 1
  8097. !gh3f0[61] := " ?"
  8098. ?rylw5[61] := 1.0
  8099. %q4mzh[61] := $ENGINE_PAR_CUTOFF
  8100. %vc4gu[61] := -1
  8101. %hpc0e[61] := 0
  8102. %eujmz[61] := 2
  8103. %fogcg[61] := 0
  8104. %5zak5[61] := 1
  8105. %dwdw3[61] := 0
  8106. %sbnwu[61] := 1000000
  8107. %jeswc[61] := 1090
  8108. %mnk53[61] := 101
  8109. declare %jus4d[10] := (get_ui_id($54gsh), get_ui_id($h4nrw), get_ui_id($egypa), get_ui_id($uxi1u), get_ui_id($0ovgh), get_ui_id($hr3vo), -1)
  8110. $g5k3r := 0
  8111. while ($g5k3r<num_elements(%jus4d))
  8112. %xwg5s[1010+$g5k3r] := %jus4d[$g5k3r]
  8113. %cqg2m[101] := 0
  8114. inc($g5k3r)
  8115. end while
  8116. declare ui_slider $xgma4(0, 1000000)
  8117. make_persistent($xgma4)
  8118. declare ui_slider $pg4ei(-1000000, 1000000)
  8119. make_persistent($pg4ei)
  8120. set_control_par_str(get_ui_id($pg4ei),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8121. declare ui_menu $d0pbl
  8122. make_persistent($d0pbl)
  8123. set_control_par_str(get_ui_id($d0pbl),$CONTROL_PAR_PICTURE,"blank")
  8124. $fg4rw := 0
  8125. while ($fg4rw<num_elements(!flm4j))
  8126. add_menu_item($d0pbl,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8127. inc($fg4rw)
  8128. end while
  8129. set_menu_item_str(get_ui_id($d0pbl),search(%bnygy,10),"VEL Mono Velocity")
  8130. $upapg := 62
  8131. %n34di[$upapg] := get_ui_id($d0pbl)
  8132. %nwlgb[$upapg] := get_ui_id($pg4ei)
  8133. !4gjzd[62] := "_1"
  8134. %c1qym[62] := get_ui_id($pg4ei)
  8135. %41o3s[62] := get_ui_id($xgma4)
  8136. declare ui_label $d1zol(1, 1)
  8137. set_control_par_str(get_ui_id($d1zol),$CONTROL_PAR_TEXT,"")
  8138. set_control_par_str(get_ui_id($d1zol),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8139. %vvlef[62] := get_ui_id($d1zol)
  8140. declare ui_label $0etvt(1, 1)
  8141. set_control_par_str(get_ui_id($0etvt),$CONTROL_PAR_TEXT,"")
  8142. set_control_par_str(get_ui_id($0etvt),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8143. %2hswt[62] := get_ui_id($0etvt)
  8144. declare ui_label $t0ue3(1, 1)
  8145. set_control_par_str(get_ui_id($t0ue3),$CONTROL_PAR_TEXT,"")
  8146. set_control_par_str(get_ui_id($t0ue3),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8147. set_control_par(get_ui_id($t0ue3),$CONTROL_PAR_Z_LAYER,1)
  8148. %lm23w[62] := get_ui_id($t0ue3)
  8149. %qxmpr[62] := 1000000
  8150. %oazdd[62] := 1
  8151. !gh3f0[62] := " ?"
  8152. ?rylw5[62] := 1.0
  8153. %q4mzh[62] := $ENGINE_PAR_CUTOFF
  8154. %vc4gu[62] := -1
  8155. %hpc0e[62] := 1
  8156. %eujmz[62] := 2
  8157. %fogcg[62] := 1
  8158. %5zak5[62] := 0
  8159. %dwdw3[62] := 0
  8160. %sbnwu[62] := 1000000
  8161. %jeswc[62] := 1093
  8162. %mnk53[62] := 102
  8163. declare %qbtrm[10] := (get_ui_id($xgma4), get_ui_id($pg4ei), get_ui_id($d1zol), get_ui_id($0etvt), get_ui_id($t0ue3), get_ui_id($d0pbl), -1)
  8164. $g5k3r := 0
  8165. while ($g5k3r<num_elements(%qbtrm))
  8166. %xwg5s[1020+$g5k3r] := %qbtrm[$g5k3r]
  8167. %cqg2m[102] := 0
  8168. inc($g5k3r)
  8169. end while
  8170. declare ui_slider $4ppiu(0, 1000000)
  8171. make_persistent($4ppiu)
  8172. declare ui_slider $2bixl(-1000000, 1000000)
  8173. make_persistent($2bixl)
  8174. set_control_par_str(get_ui_id($2bixl),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8175. declare ui_menu $oxbzh
  8176. make_persistent($oxbzh)
  8177. set_control_par_str(get_ui_id($oxbzh),$CONTROL_PAR_PICTURE,"blank")
  8178. $fg4rw := 0
  8179. while ($fg4rw<num_elements(!flm4j))
  8180. add_menu_item($oxbzh,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8181. inc($fg4rw)
  8182. end while
  8183. set_menu_item_str(get_ui_id($oxbzh),search(%bnygy,10),"VEL Mono Velocity")
  8184. $upapg := 63
  8185. %n34di[$upapg] := get_ui_id($oxbzh)
  8186. %nwlgb[$upapg] := get_ui_id($2bixl)
  8187. !4gjzd[63] := "_1"
  8188. %c1qym[63] := get_ui_id($2bixl)
  8189. %41o3s[63] := get_ui_id($4ppiu)
  8190. declare ui_label $cqp2j(1, 1)
  8191. set_control_par_str(get_ui_id($cqp2j),$CONTROL_PAR_TEXT,"")
  8192. set_control_par_str(get_ui_id($cqp2j),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8193. %vvlef[63] := get_ui_id($cqp2j)
  8194. declare ui_label $pfoim(1, 1)
  8195. set_control_par_str(get_ui_id($pfoim),$CONTROL_PAR_TEXT,"")
  8196. set_control_par_str(get_ui_id($pfoim),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8197. %2hswt[63] := get_ui_id($pfoim)
  8198. declare ui_label $1qxyy(1, 1)
  8199. set_control_par_str(get_ui_id($1qxyy),$CONTROL_PAR_TEXT,"")
  8200. set_control_par_str(get_ui_id($1qxyy),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8201. set_control_par(get_ui_id($1qxyy),$CONTROL_PAR_Z_LAYER,1)
  8202. %lm23w[63] := get_ui_id($1qxyy)
  8203. %qxmpr[63] := 1000000
  8204. %oazdd[63] := 1
  8205. !gh3f0[63] := " ?"
  8206. ?rylw5[63] := 1.0
  8207. %q4mzh[63] := $ENGINE_PAR_CUTOFF
  8208. %vc4gu[63] := -1
  8209. %hpc0e[63] := 1
  8210. %eujmz[63] := 2
  8211. %fogcg[63] := 0
  8212. %5zak5[63] := 0
  8213. %dwdw3[63] := 0
  8214. %sbnwu[63] := 1000000
  8215. %jeswc[63] := 1096
  8216. %mnk53[63] := 103
  8217. declare %jtw3o[10] := (get_ui_id($4ppiu), get_ui_id($2bixl), get_ui_id($cqp2j), get_ui_id($pfoim), get_ui_id($1qxyy), get_ui_id($oxbzh), -1)
  8218. $g5k3r := 0
  8219. while ($g5k3r<num_elements(%jtw3o))
  8220. %xwg5s[1030+$g5k3r] := %jtw3o[$g5k3r]
  8221. %cqg2m[103] := 0
  8222. inc($g5k3r)
  8223. end while
  8224. declare ui_slider $2lmoo(0, 1000000)
  8225. make_persistent($2lmoo)
  8226. declare ui_slider $5jo04(-1000000, 1000000)
  8227. make_persistent($5jo04)
  8228. set_control_par_str(get_ui_id($5jo04),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8229. declare ui_menu $2moaw
  8230. make_persistent($2moaw)
  8231. set_control_par_str(get_ui_id($2moaw),$CONTROL_PAR_PICTURE,"blank")
  8232. $fg4rw := 0
  8233. while ($fg4rw<num_elements(!flm4j))
  8234. add_menu_item($2moaw,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8235. inc($fg4rw)
  8236. end while
  8237. set_menu_item_str(get_ui_id($2moaw),search(%bnygy,10),"VEL Mono Velocity")
  8238. $upapg := 64
  8239. %n34di[$upapg] := get_ui_id($2moaw)
  8240. %nwlgb[$upapg] := get_ui_id($5jo04)
  8241. !4gjzd[64] := "_1"
  8242. %c1qym[64] := get_ui_id($5jo04)
  8243. %41o3s[64] := get_ui_id($2lmoo)
  8244. declare ui_label $zw3qk(1, 1)
  8245. set_control_par_str(get_ui_id($zw3qk),$CONTROL_PAR_TEXT,"")
  8246. set_control_par_str(get_ui_id($zw3qk),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8247. %vvlef[64] := get_ui_id($zw3qk)
  8248. declare ui_label $fa1ve(1, 1)
  8249. set_control_par_str(get_ui_id($fa1ve),$CONTROL_PAR_TEXT,"")
  8250. set_control_par_str(get_ui_id($fa1ve),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8251. %2hswt[64] := get_ui_id($fa1ve)
  8252. declare ui_label $c51yy(1, 1)
  8253. set_control_par_str(get_ui_id($c51yy),$CONTROL_PAR_TEXT,"")
  8254. set_control_par_str(get_ui_id($c51yy),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8255. set_control_par(get_ui_id($c51yy),$CONTROL_PAR_Z_LAYER,1)
  8256. %lm23w[64] := get_ui_id($c51yy)
  8257. %qxmpr[64] := 1000000
  8258. %oazdd[64] := 1
  8259. !gh3f0[64] := " ?"
  8260. ?rylw5[64] := 1.0
  8261. %q4mzh[64] := $ENGINE_PAR_CUTOFF
  8262. %vc4gu[64] := -1
  8263. %hpc0e[64] := 1
  8264. %eujmz[64] := 2
  8265. %fogcg[64] := 0
  8266. %5zak5[64] := 1
  8267. %dwdw3[64] := 0
  8268. %sbnwu[64] := 1000000
  8269. %jeswc[64] := 1099
  8270. %mnk53[64] := 104
  8271. declare %lpvit[10] := (get_ui_id($2lmoo), get_ui_id($5jo04), get_ui_id($zw3qk), get_ui_id($fa1ve), get_ui_id($c51yy), get_ui_id($2moaw), -1)
  8272. $g5k3r := 0
  8273. while ($g5k3r<num_elements(%lpvit))
  8274. %xwg5s[1040+$g5k3r] := %lpvit[$g5k3r]
  8275. %cqg2m[104] := 0
  8276. inc($g5k3r)
  8277. end while
  8278. declare ui_slider $ajka4(0, 1000000)
  8279. make_persistent($ajka4)
  8280. declare ui_slider $dhmoe(-1000000, 1000000)
  8281. make_persistent($dhmoe)
  8282. set_control_par_str(get_ui_id($dhmoe),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8283. declare ui_menu $sw0os
  8284. make_persistent($sw0os)
  8285. set_control_par_str(get_ui_id($sw0os),$CONTROL_PAR_PICTURE,"blank")
  8286. $fg4rw := 0
  8287. while ($fg4rw<num_elements(!flm4j))
  8288. add_menu_item($sw0os,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8289. inc($fg4rw)
  8290. end while
  8291. set_menu_item_str(get_ui_id($sw0os),search(%bnygy,10),"VEL Mono Velocity")
  8292. $upapg := 65
  8293. %n34di[$upapg] := get_ui_id($sw0os)
  8294. %nwlgb[$upapg] := get_ui_id($dhmoe)
  8295. !4gjzd[65] := "_1"
  8296. %c1qym[65] := get_ui_id($dhmoe)
  8297. %41o3s[65] := get_ui_id($ajka4)
  8298. declare ui_label $nzmxs(1, 1)
  8299. set_control_par_str(get_ui_id($nzmxs),$CONTROL_PAR_TEXT,"")
  8300. set_control_par_str(get_ui_id($nzmxs),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8301. %vvlef[65] := get_ui_id($nzmxs)
  8302. declare ui_label $n10dp(1, 1)
  8303. set_control_par_str(get_ui_id($n10dp),$CONTROL_PAR_TEXT,"")
  8304. set_control_par_str(get_ui_id($n10dp),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8305. %2hswt[65] := get_ui_id($n10dp)
  8306. declare ui_label $hosi4(1, 1)
  8307. set_control_par_str(get_ui_id($hosi4),$CONTROL_PAR_TEXT,"")
  8308. set_control_par_str(get_ui_id($hosi4),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8309. set_control_par(get_ui_id($hosi4),$CONTROL_PAR_Z_LAYER,1)
  8310. %lm23w[65] := get_ui_id($hosi4)
  8311. %qxmpr[65] := 1000000
  8312. %oazdd[65] := 1
  8313. !gh3f0[65] := " ?"
  8314. ?rylw5[65] := 1.0
  8315. %q4mzh[65] := $ENGINE_PAR_CUTOFF
  8316. %vc4gu[65] := -1
  8317. %hpc0e[65] := 2
  8318. %eujmz[65] := 2
  8319. %fogcg[65] := 1
  8320. %5zak5[65] := 0
  8321. %dwdw3[65] := 0
  8322. %sbnwu[65] := 1000000
  8323. %jeswc[65] := 1102
  8324. %mnk53[65] := 105
  8325. declare %gsj5q[10] := (get_ui_id($ajka4), get_ui_id($dhmoe), get_ui_id($nzmxs), get_ui_id($n10dp), get_ui_id($hosi4), get_ui_id($sw0os), -1)
  8326. $g5k3r := 0
  8327. while ($g5k3r<num_elements(%gsj5q))
  8328. %xwg5s[1050+$g5k3r] := %gsj5q[$g5k3r]
  8329. %cqg2m[105] := 0
  8330. inc($g5k3r)
  8331. end while
  8332. declare ui_slider $kw31l(0, 1000000)
  8333. make_persistent($kw31l)
  8334. declare ui_slider $0shp5(-1000000, 1000000)
  8335. make_persistent($0shp5)
  8336. set_control_par_str(get_ui_id($0shp5),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8337. declare ui_menu $pjmqm
  8338. make_persistent($pjmqm)
  8339. set_control_par_str(get_ui_id($pjmqm),$CONTROL_PAR_PICTURE,"blank")
  8340. $fg4rw := 0
  8341. while ($fg4rw<num_elements(!flm4j))
  8342. add_menu_item($pjmqm,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8343. inc($fg4rw)
  8344. end while
  8345. set_menu_item_str(get_ui_id($pjmqm),search(%bnygy,10),"VEL Mono Velocity")
  8346. $upapg := 66
  8347. %n34di[$upapg] := get_ui_id($pjmqm)
  8348. %nwlgb[$upapg] := get_ui_id($0shp5)
  8349. !4gjzd[66] := "_1"
  8350. %c1qym[66] := get_ui_id($0shp5)
  8351. %41o3s[66] := get_ui_id($kw31l)
  8352. declare ui_label $jpoxn(1, 1)
  8353. set_control_par_str(get_ui_id($jpoxn),$CONTROL_PAR_TEXT,"")
  8354. set_control_par_str(get_ui_id($jpoxn),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8355. %vvlef[66] := get_ui_id($jpoxn)
  8356. declare ui_label $4nuqa(1, 1)
  8357. set_control_par_str(get_ui_id($4nuqa),$CONTROL_PAR_TEXT,"")
  8358. set_control_par_str(get_ui_id($4nuqa),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8359. %2hswt[66] := get_ui_id($4nuqa)
  8360. declare ui_label $5yf3d(1, 1)
  8361. set_control_par_str(get_ui_id($5yf3d),$CONTROL_PAR_TEXT,"")
  8362. set_control_par_str(get_ui_id($5yf3d),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8363. set_control_par(get_ui_id($5yf3d),$CONTROL_PAR_Z_LAYER,1)
  8364. %lm23w[66] := get_ui_id($5yf3d)
  8365. %qxmpr[66] := 1000000
  8366. %oazdd[66] := 1
  8367. !gh3f0[66] := " ?"
  8368. ?rylw5[66] := 1.0
  8369. %q4mzh[66] := $ENGINE_PAR_CUTOFF
  8370. %vc4gu[66] := -1
  8371. %hpc0e[66] := 2
  8372. %eujmz[66] := 2
  8373. %fogcg[66] := 0
  8374. %5zak5[66] := 0
  8375. %dwdw3[66] := 0
  8376. %sbnwu[66] := 1000000
  8377. %jeswc[66] := 1105
  8378. %mnk53[66] := 106
  8379. declare %xswan[10] := (get_ui_id($kw31l), get_ui_id($0shp5), get_ui_id($jpoxn), get_ui_id($4nuqa), get_ui_id($5yf3d), get_ui_id($pjmqm), -1)
  8380. $g5k3r := 0
  8381. while ($g5k3r<num_elements(%xswan))
  8382. %xwg5s[1060+$g5k3r] := %xswan[$g5k3r]
  8383. %cqg2m[106] := 0
  8384. inc($g5k3r)
  8385. end while
  8386. declare ui_slider $za4fi(0, 1000000)
  8387. make_persistent($za4fi)
  8388. declare ui_slider $21luc(-1000000, 1000000)
  8389. make_persistent($21luc)
  8390. set_control_par_str(get_ui_id($21luc),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8391. declare ui_menu $ujr4n
  8392. make_persistent($ujr4n)
  8393. set_control_par_str(get_ui_id($ujr4n),$CONTROL_PAR_PICTURE,"blank")
  8394. $fg4rw := 0
  8395. while ($fg4rw<num_elements(!flm4j))
  8396. add_menu_item($ujr4n,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8397. inc($fg4rw)
  8398. end while
  8399. set_menu_item_str(get_ui_id($ujr4n),search(%bnygy,10),"VEL Mono Velocity")
  8400. $upapg := 67
  8401. %n34di[$upapg] := get_ui_id($ujr4n)
  8402. %nwlgb[$upapg] := get_ui_id($21luc)
  8403. !4gjzd[67] := "_1"
  8404. %c1qym[67] := get_ui_id($21luc)
  8405. %41o3s[67] := get_ui_id($za4fi)
  8406. declare ui_label $fmboz(1, 1)
  8407. set_control_par_str(get_ui_id($fmboz),$CONTROL_PAR_TEXT,"")
  8408. set_control_par_str(get_ui_id($fmboz),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8409. %vvlef[67] := get_ui_id($fmboz)
  8410. declare ui_label $2lxqf(1, 1)
  8411. set_control_par_str(get_ui_id($2lxqf),$CONTROL_PAR_TEXT,"")
  8412. set_control_par_str(get_ui_id($2lxqf),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8413. %2hswt[67] := get_ui_id($2lxqf)
  8414. declare ui_label $iag1d(1, 1)
  8415. set_control_par_str(get_ui_id($iag1d),$CONTROL_PAR_TEXT,"")
  8416. set_control_par_str(get_ui_id($iag1d),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8417. set_control_par(get_ui_id($iag1d),$CONTROL_PAR_Z_LAYER,1)
  8418. %lm23w[67] := get_ui_id($iag1d)
  8419. %qxmpr[67] := 1000000
  8420. %oazdd[67] := 1
  8421. !gh3f0[67] := " ?"
  8422. ?rylw5[67] := 1.0
  8423. %q4mzh[67] := $ENGINE_PAR_CUTOFF
  8424. %vc4gu[67] := -1
  8425. %hpc0e[67] := 2
  8426. %eujmz[67] := 2
  8427. %fogcg[67] := 0
  8428. %5zak5[67] := 1
  8429. %dwdw3[67] := 0
  8430. %sbnwu[67] := 1000000
  8431. %jeswc[67] := 1108
  8432. %mnk53[67] := 107
  8433. declare %ig2ja[10] := (get_ui_id($za4fi), get_ui_id($21luc), get_ui_id($fmboz), get_ui_id($2lxqf), get_ui_id($iag1d), get_ui_id($ujr4n), -1)
  8434. $g5k3r := 0
  8435. while ($g5k3r<num_elements(%ig2ja))
  8436. %xwg5s[1070+$g5k3r] := %ig2ja[$g5k3r]
  8437. %cqg2m[107] := 0
  8438. inc($g5k3r)
  8439. end while
  8440. declare ui_slider $zctyt(0, 1000000)
  8441. make_persistent($zctyt)
  8442. declare ui_slider $p4vlm(-1000000, 1000000)
  8443. make_persistent($p4vlm)
  8444. set_control_par_str(get_ui_id($p4vlm),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8445. declare ui_menu $2cyex
  8446. make_persistent($2cyex)
  8447. set_control_par_str(get_ui_id($2cyex),$CONTROL_PAR_PICTURE,"blank")
  8448. $fg4rw := 0
  8449. while ($fg4rw<num_elements(!flm4j))
  8450. add_menu_item($2cyex,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8451. inc($fg4rw)
  8452. end while
  8453. set_menu_item_str(get_ui_id($2cyex),search(%bnygy,10),"VEL Mono Velocity")
  8454. $upapg := 68
  8455. %n34di[$upapg] := get_ui_id($2cyex)
  8456. %nwlgb[$upapg] := get_ui_id($p4vlm)
  8457. !4gjzd[68] := "_1"
  8458. %c1qym[68] := get_ui_id($p4vlm)
  8459. %41o3s[68] := get_ui_id($zctyt)
  8460. declare ui_label $1rbpm(1, 1)
  8461. set_control_par_str(get_ui_id($1rbpm),$CONTROL_PAR_TEXT,"")
  8462. set_control_par_str(get_ui_id($1rbpm),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8463. %vvlef[68] := get_ui_id($1rbpm)
  8464. declare ui_label $h3414(1, 1)
  8465. set_control_par_str(get_ui_id($h3414),$CONTROL_PAR_TEXT,"")
  8466. set_control_par_str(get_ui_id($h3414),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8467. %2hswt[68] := get_ui_id($h3414)
  8468. declare ui_label $540zf(1, 1)
  8469. set_control_par_str(get_ui_id($540zf),$CONTROL_PAR_TEXT,"")
  8470. set_control_par_str(get_ui_id($540zf),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8471. set_control_par(get_ui_id($540zf),$CONTROL_PAR_Z_LAYER,1)
  8472. %lm23w[68] := get_ui_id($540zf)
  8473. %qxmpr[68] := 1000000
  8474. %oazdd[68] := 1
  8475. !gh3f0[68] := " ?"
  8476. ?rylw5[68] := 1.0
  8477. %q4mzh[68] := $ENGINE_PAR_CUTOFF
  8478. %vc4gu[68] := -1
  8479. %hpc0e[68] := 3
  8480. %eujmz[68] := 2
  8481. %fogcg[68] := 1
  8482. %5zak5[68] := 0
  8483. %dwdw3[68] := 0
  8484. %sbnwu[68] := 1000000
  8485. %jeswc[68] := 1111
  8486. %mnk53[68] := 108
  8487. declare %xk3hb[10] := (get_ui_id($zctyt), get_ui_id($p4vlm), get_ui_id($1rbpm), get_ui_id($h3414), get_ui_id($540zf), get_ui_id($2cyex), -1)
  8488. $g5k3r := 0
  8489. while ($g5k3r<num_elements(%xk3hb))
  8490. %xwg5s[1080+$g5k3r] := %xk3hb[$g5k3r]
  8491. %cqg2m[108] := 0
  8492. inc($g5k3r)
  8493. end while
  8494. declare ui_slider $nqqg3(0, 1000000)
  8495. make_persistent($nqqg3)
  8496. declare ui_slider $u45os(-1000000, 1000000)
  8497. make_persistent($u45os)
  8498. set_control_par_str(get_ui_id($u45os),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8499. declare ui_menu $4ng2b
  8500. make_persistent($4ng2b)
  8501. set_control_par_str(get_ui_id($4ng2b),$CONTROL_PAR_PICTURE,"blank")
  8502. $fg4rw := 0
  8503. while ($fg4rw<num_elements(!flm4j))
  8504. add_menu_item($4ng2b,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8505. inc($fg4rw)
  8506. end while
  8507. set_menu_item_str(get_ui_id($4ng2b),search(%bnygy,10),"VEL Mono Velocity")
  8508. $upapg := 69
  8509. %n34di[$upapg] := get_ui_id($4ng2b)
  8510. %nwlgb[$upapg] := get_ui_id($u45os)
  8511. !4gjzd[69] := "_1"
  8512. %c1qym[69] := get_ui_id($u45os)
  8513. %41o3s[69] := get_ui_id($nqqg3)
  8514. declare ui_label $0gh1r(1, 1)
  8515. set_control_par_str(get_ui_id($0gh1r),$CONTROL_PAR_TEXT,"")
  8516. set_control_par_str(get_ui_id($0gh1r),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8517. %vvlef[69] := get_ui_id($0gh1r)
  8518. declare ui_label $llzi0(1, 1)
  8519. set_control_par_str(get_ui_id($llzi0),$CONTROL_PAR_TEXT,"")
  8520. set_control_par_str(get_ui_id($llzi0),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8521. %2hswt[69] := get_ui_id($llzi0)
  8522. declare ui_label $arioq(1, 1)
  8523. set_control_par_str(get_ui_id($arioq),$CONTROL_PAR_TEXT,"")
  8524. set_control_par_str(get_ui_id($arioq),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8525. set_control_par(get_ui_id($arioq),$CONTROL_PAR_Z_LAYER,1)
  8526. %lm23w[69] := get_ui_id($arioq)
  8527. %qxmpr[69] := 1000000
  8528. %oazdd[69] := 1
  8529. !gh3f0[69] := " ?"
  8530. ?rylw5[69] := 1.0
  8531. %q4mzh[69] := $ENGINE_PAR_CUTOFF
  8532. %vc4gu[69] := -1
  8533. %hpc0e[69] := 3
  8534. %eujmz[69] := 2
  8535. %fogcg[69] := 0
  8536. %5zak5[69] := 0
  8537. %dwdw3[69] := 0
  8538. %sbnwu[69] := 1000000
  8539. %jeswc[69] := 1114
  8540. %mnk53[69] := 109
  8541. declare %cpeig[10] := (get_ui_id($nqqg3), get_ui_id($u45os), get_ui_id($0gh1r), get_ui_id($llzi0), get_ui_id($arioq), get_ui_id($4ng2b), -1)
  8542. $g5k3r := 0
  8543. while ($g5k3r<num_elements(%cpeig))
  8544. %xwg5s[1090+$g5k3r] := %cpeig[$g5k3r]
  8545. %cqg2m[109] := 0
  8546. inc($g5k3r)
  8547. end while
  8548. declare ui_slider $et1j2(0, 1000000)
  8549. make_persistent($et1j2)
  8550. declare ui_slider $opstl(-1000000, 1000000)
  8551. make_persistent($opstl)
  8552. set_control_par_str(get_ui_id($opstl),$CONTROL_PAR_PICTURE,"MK_Slider" & "_1")
  8553. declare ui_menu $w3nfb
  8554. make_persistent($w3nfb)
  8555. set_control_par_str(get_ui_id($w3nfb),$CONTROL_PAR_PICTURE,"blank")
  8556. $fg4rw := 0
  8557. while ($fg4rw<num_elements(!flm4j))
  8558. add_menu_item($w3nfb,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8559. inc($fg4rw)
  8560. end while
  8561. set_menu_item_str(get_ui_id($w3nfb),search(%bnygy,10),"VEL Mono Velocity")
  8562. $upapg := 70
  8563. %n34di[$upapg] := get_ui_id($w3nfb)
  8564. %nwlgb[$upapg] := get_ui_id($opstl)
  8565. !4gjzd[70] := "_1"
  8566. %c1qym[70] := get_ui_id($opstl)
  8567. %41o3s[70] := get_ui_id($et1j2)
  8568. declare ui_label $pe15r(1, 1)
  8569. set_control_par_str(get_ui_id($pe15r),$CONTROL_PAR_TEXT,"")
  8570. set_control_par_str(get_ui_id($pe15r),$CONTROL_PAR_PICTURE,"MK_Mask" & "_1")
  8571. %vvlef[70] := get_ui_id($pe15r)
  8572. declare ui_label $eh4f4(1, 1)
  8573. set_control_par_str(get_ui_id($eh4f4),$CONTROL_PAR_TEXT,"")
  8574. set_control_par_str(get_ui_id($eh4f4),$CONTROL_PAR_PICTURE,"MK_RngP" & "_1")
  8575. %2hswt[70] := get_ui_id($eh4f4)
  8576. declare ui_label $i4bru(1, 1)
  8577. set_control_par_str(get_ui_id($i4bru),$CONTROL_PAR_TEXT,"")
  8578. set_control_par_str(get_ui_id($i4bru),$CONTROL_PAR_PICTURE,"MK_ind" & "_1")
  8579. set_control_par(get_ui_id($i4bru),$CONTROL_PAR_Z_LAYER,1)
  8580. %lm23w[70] := get_ui_id($i4bru)
  8581. %qxmpr[70] := 1000000
  8582. %oazdd[70] := 1
  8583. !gh3f0[70] := " ?"
  8584. ?rylw5[70] := 1.0
  8585. %q4mzh[70] := $ENGINE_PAR_CUTOFF
  8586. %vc4gu[70] := -1
  8587. %hpc0e[70] := 3
  8588. %eujmz[70] := 2
  8589. %fogcg[70] := 0
  8590. %5zak5[70] := 1
  8591. %dwdw3[70] := 0
  8592. %sbnwu[70] := 1000000
  8593. %jeswc[70] := 1117
  8594. %mnk53[70] := 110
  8595. declare %kg4rx[10] := (get_ui_id($et1j2), get_ui_id($opstl), get_ui_id($pe15r), get_ui_id($eh4f4), get_ui_id($i4bru), get_ui_id($w3nfb), -1)
  8596. $g5k3r := 0
  8597. while ($g5k3r<num_elements(%kg4rx))
  8598. %xwg5s[1100+$g5k3r] := %kg4rx[$g5k3r]
  8599. %cqg2m[110] := 0
  8600. inc($g5k3r)
  8601. end while
  8602. end if
  8603. declare %qw0yx[3] := (0, 1, -2)
  8604. declare ui_label $zm0dr(1, 1)
  8605. declare ui_label $pbqrd(1, 1)
  8606. set_control_par_str(get_ui_id($zm0dr),$CONTROL_PAR_TEXT,"")
  8607. set_control_par_str(get_ui_id($zm0dr),$CONTROL_PAR_PICTURE,"GE_GR_METER_SCALE")
  8608. set_control_par_str(get_ui_id($pbqrd),$CONTROL_PAR_TEXT,"")
  8609. set_control_par_str(get_ui_id($pbqrd),$CONTROL_PAR_PICTURE,"GE_GR_METER_SCALE")
  8610. declare %25l4m[10]
  8611. declare %2u0gi[5]
  8612. declare %b4wh2[12]
  8613. declare ui_level_meter $tpyec
  8614. declare ui_level_meter $lnvce
  8615. declare ui_level_meter $gwmob
  8616. declare ui_level_meter $os1qf
  8617. declare ui_level_meter $zuvdk
  8618. declare ui_level_meter $5ip04
  8619. declare ui_level_meter $znixq
  8620. declare ui_level_meter $uuptt
  8621. declare ui_level_meter $oswwe
  8622. declare ui_level_meter $vjsdg
  8623. declare ui_level_meter $nxxiz
  8624. declare ui_level_meter $gaekc
  8625. $pvuhq := 0
  8626. while ($pvuhq<=11)
  8627. %b4wh2[$pvuhq] := get_ui_id($tpyec)+$pvuhq
  8628. inc($pvuhq)
  8629. end while
  8630. $fg4rw := 0
  8631. while ($fg4rw<=2)
  8632. $g5k3r := 0
  8633. while ($g5k3r<4)
  8634. set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_BG_COLOR,6982293)
  8635. set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_OFF_COLOR,6982293)
  8636. set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_ON_COLOR,3491147)
  8637. set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_OVERLOAD_COLOR,3491147)
  8638. set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_PEAK_COLOR,3491147)
  8639. attach_level_meter(%b4wh2[4*$fg4rw+$g5k3r],-1,$g5k3r,0,%qw0yx[$fg4rw])
  8640. set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  8641. set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_RANGE_MIN,0)
  8642. set_control_par(%b4wh2[4*$fg4rw+$g5k3r],$CONTROL_PAR_RANGE_MAX,10000000)
  8643. if ($fg4rw<2)
  8644. %25l4m[$fg4rw*4+$g5k3r] := %b4wh2[4*$fg4rw+$g5k3r]
  8645. else
  8646. %2u0gi[$g5k3r] := %b4wh2[4*$fg4rw+$g5k3r]
  8647. end if
  8648. inc($g5k3r)
  8649. end while
  8650. inc($fg4rw)
  8651. end while
  8652. %25l4m[8] := get_ui_id($zm0dr)
  8653. %25l4m[9] := get_ui_id($pbqrd)
  8654. $g5k3r := 0
  8655. while ($g5k3r<num_elements(%25l4m))
  8656. %xwg5s[1510+$g5k3r] := %25l4m[$g5k3r]
  8657. %cqg2m[151] := 0
  8658. inc($g5k3r)
  8659. end while
  8660. $g5k3r := 0
  8661. while ($g5k3r<num_elements(%2u0gi))
  8662. %xwg5s[1520+$g5k3r] := %2u0gi[$g5k3r]
  8663. %cqg2m[152] := 0
  8664. inc($g5k3r)
  8665. end while
  8666. if (1=1)
  8667. declare ui_slider $ouvzc(0, 1000000)
  8668. make_persistent($ouvzc)
  8669. declare ui_slider $f3pav(-1000000, 1000000)
  8670. make_persistent($f3pav)
  8671. set_control_par_str(get_ui_id($f3pav),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  8672. declare ui_menu $i1321
  8673. make_persistent($i1321)
  8674. set_control_par_str(get_ui_id($i1321),$CONTROL_PAR_PICTURE,"blank")
  8675. $fg4rw := 0
  8676. while ($fg4rw<num_elements(!flm4j))
  8677. add_menu_item($i1321,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8678. inc($fg4rw)
  8679. end while
  8680. set_menu_item_str(get_ui_id($i1321),search(%bnygy,10),"VEL Mono Velocity")
  8681. $upapg := 71
  8682. %n34di[$upapg] := get_ui_id($i1321)
  8683. %nwlgb[$upapg] := get_ui_id($f3pav)
  8684. !4gjzd[71] := "_5"
  8685. %c1qym[71] := get_ui_id($f3pav)
  8686. %41o3s[71] := get_ui_id($ouvzc)
  8687. declare ui_label $nyhit(1, 1)
  8688. set_control_par_str(get_ui_id($nyhit),$CONTROL_PAR_TEXT,"")
  8689. set_control_par_str(get_ui_id($nyhit),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  8690. %vvlef[71] := get_ui_id($nyhit)
  8691. declare ui_label $qkk24(1, 1)
  8692. set_control_par_str(get_ui_id($qkk24),$CONTROL_PAR_TEXT,"")
  8693. set_control_par_str(get_ui_id($qkk24),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  8694. %2hswt[71] := get_ui_id($qkk24)
  8695. declare ui_label $pa3vb(1, 1)
  8696. set_control_par_str(get_ui_id($pa3vb),$CONTROL_PAR_TEXT,"")
  8697. set_control_par_str(get_ui_id($pa3vb),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  8698. set_control_par(get_ui_id($pa3vb),$CONTROL_PAR_Z_LAYER,1)
  8699. %lm23w[71] := get_ui_id($pa3vb)
  8700. %qxmpr[71] := 1000000
  8701. %oazdd[71] := 1
  8702. !gh3f0[71] := " ?"
  8703. ?rylw5[71] := 1.0
  8704. %q4mzh[71] := $ENGINE_PAR_CUTOFF
  8705. %vc4gu[71] := -1
  8706. %hpc0e[71] := 0
  8707. %eujmz[71] := 0
  8708. %fogcg[71] := 0
  8709. %5zak5[71] := 0
  8710. %dwdw3[71] := 0
  8711. %sbnwu[71] := 1000000
  8712. %jeswc[71] := 1120
  8713. %mnk53[71] := 111
  8714. declare %4ktzh[10] := (get_ui_id($ouvzc), get_ui_id($f3pav), get_ui_id($nyhit), get_ui_id($qkk24), get_ui_id($pa3vb), get_ui_id($i1321), -1)
  8715. $g5k3r := 0
  8716. while ($g5k3r<num_elements(%4ktzh))
  8717. %xwg5s[1110+$g5k3r] := %4ktzh[$g5k3r]
  8718. %cqg2m[111] := 64
  8719. inc($g5k3r)
  8720. end while
  8721. declare ui_slider $yi2x2(0, 1000000)
  8722. make_persistent($yi2x2)
  8723. declare ui_slider $nrkm4(-1000000, 1000000)
  8724. make_persistent($nrkm4)
  8725. set_control_par_str(get_ui_id($nrkm4),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  8726. declare ui_menu $lczp2
  8727. make_persistent($lczp2)
  8728. set_control_par_str(get_ui_id($lczp2),$CONTROL_PAR_PICTURE,"blank")
  8729. $fg4rw := 0
  8730. while ($fg4rw<num_elements(!flm4j))
  8731. add_menu_item($lczp2,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8732. inc($fg4rw)
  8733. end while
  8734. set_menu_item_str(get_ui_id($lczp2),search(%bnygy,10),"VEL Mono Velocity")
  8735. $upapg := 72
  8736. %n34di[$upapg] := get_ui_id($lczp2)
  8737. %nwlgb[$upapg] := get_ui_id($nrkm4)
  8738. !4gjzd[72] := "_5"
  8739. %c1qym[72] := get_ui_id($nrkm4)
  8740. %41o3s[72] := get_ui_id($yi2x2)
  8741. declare ui_label $q4kcb(1, 1)
  8742. set_control_par_str(get_ui_id($q4kcb),$CONTROL_PAR_TEXT,"")
  8743. set_control_par_str(get_ui_id($q4kcb),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  8744. %vvlef[72] := get_ui_id($q4kcb)
  8745. declare ui_label $hjwgu(1, 1)
  8746. set_control_par_str(get_ui_id($hjwgu),$CONTROL_PAR_TEXT,"")
  8747. set_control_par_str(get_ui_id($hjwgu),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  8748. %2hswt[72] := get_ui_id($hjwgu)
  8749. declare ui_label $qiz1h(1, 1)
  8750. set_control_par_str(get_ui_id($qiz1h),$CONTROL_PAR_TEXT,"")
  8751. set_control_par_str(get_ui_id($qiz1h),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  8752. set_control_par(get_ui_id($qiz1h),$CONTROL_PAR_Z_LAYER,1)
  8753. %lm23w[72] := get_ui_id($qiz1h)
  8754. %qxmpr[72] := 1000000
  8755. %oazdd[72] := 1
  8756. !gh3f0[72] := " ?"
  8757. ?rylw5[72] := 1.0
  8758. %q4mzh[72] := $ENGINE_PAR_CUTOFF
  8759. %vc4gu[72] := -1
  8760. %hpc0e[72] := 0
  8761. %eujmz[72] := 0
  8762. %fogcg[72] := 0
  8763. %5zak5[72] := 0
  8764. %dwdw3[72] := 0
  8765. %sbnwu[72] := 1000000
  8766. %jeswc[72] := 1123
  8767. %mnk53[72] := 112
  8768. declare %0mpr2[10] := (get_ui_id($yi2x2), get_ui_id($nrkm4), get_ui_id($q4kcb), get_ui_id($hjwgu), get_ui_id($qiz1h), get_ui_id($lczp2), -1)
  8769. $g5k3r := 0
  8770. while ($g5k3r<num_elements(%0mpr2))
  8771. %xwg5s[1120+$g5k3r] := %0mpr2[$g5k3r]
  8772. %cqg2m[112] := 64
  8773. inc($g5k3r)
  8774. end while
  8775. declare ui_slider $yr3xi(0, 1000000)
  8776. make_persistent($yr3xi)
  8777. declare ui_slider $yixdb(-1000000, 1000000)
  8778. make_persistent($yixdb)
  8779. set_control_par_str(get_ui_id($yixdb),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  8780. declare ui_menu $fr5xq
  8781. make_persistent($fr5xq)
  8782. set_control_par_str(get_ui_id($fr5xq),$CONTROL_PAR_PICTURE,"blank")
  8783. $fg4rw := 0
  8784. while ($fg4rw<num_elements(!flm4j))
  8785. add_menu_item($fr5xq,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  8786. inc($fg4rw)
  8787. end while
  8788. set_menu_item_str(get_ui_id($fr5xq),search(%bnygy,10),"VEL Mono Velocity")
  8789. $upapg := 73
  8790. %n34di[$upapg] := get_ui_id($fr5xq)
  8791. %nwlgb[$upapg] := get_ui_id($yixdb)
  8792. !4gjzd[73] := "_5"
  8793. %c1qym[73] := get_ui_id($yixdb)
  8794. %41o3s[73] := get_ui_id($yr3xi)
  8795. declare ui_label $ij1n0(1, 1)
  8796. set_control_par_str(get_ui_id($ij1n0),$CONTROL_PAR_TEXT,"")
  8797. set_control_par_str(get_ui_id($ij1n0),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  8798. %vvlef[73] := get_ui_id($ij1n0)
  8799. declare ui_label $3cvnb(1, 1)
  8800. set_control_par_str(get_ui_id($3cvnb),$CONTROL_PAR_TEXT,"")
  8801. set_control_par_str(get_ui_id($3cvnb),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  8802. %2hswt[73] := get_ui_id($3cvnb)
  8803. declare ui_label $xdasy(1, 1)
  8804. set_control_par_str(get_ui_id($xdasy),$CONTROL_PAR_TEXT,"")
  8805. set_control_par_str(get_ui_id($xdasy),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  8806. set_control_par(get_ui_id($xdasy),$CONTROL_PAR_Z_LAYER,1)
  8807. %lm23w[73] := get_ui_id($xdasy)
  8808. %qxmpr[73] := 1000000
  8809. %oazdd[73] := 1
  8810. !gh3f0[73] := " ?"
  8811. ?rylw5[73] := 1.0
  8812. %q4mzh[73] := $ENGINE_PAR_CUTOFF
  8813. %vc4gu[73] := -1
  8814. %hpc0e[73] := 0
  8815. %eujmz[73] := 0
  8816. %fogcg[73] := 0
  8817. %5zak5[73] := 0
  8818. %dwdw3[73] := 0
  8819. %sbnwu[73] := 1000000
  8820. %jeswc[73] := 1126
  8821. %mnk53[73] := 113
  8822. declare %jrsng[10] := (get_ui_id($yr3xi), get_ui_id($yixdb), get_ui_id($ij1n0), get_ui_id($3cvnb), get_ui_id($xdasy), get_ui_id($fr5xq), -1)
  8823. $g5k3r := 0
  8824. while ($g5k3r<num_elements(%jrsng))
  8825. %xwg5s[1130+$g5k3r] := %jrsng[$g5k3r]
  8826. %cqg2m[113] := 64
  8827. inc($g5k3r)
  8828. end while
  8829. declare ui_slider $kpiih(0, 1000000)
  8830. make_persistent($kpiih)
  8831. set_control_par(get_ui_id($kpiih),$CONTROL_PAR_DEFAULT_VALUE,500000)
  8832. set_control_par_str(get_ui_id($kpiih),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
  8833. %aazjf[14] := get_ui_id($kpiih)
  8834. declare ui_label $aukqp(1, 1)
  8835. %5comw[14] := get_ui_id($aukqp)
  8836. set_control_par_str(get_ui_id($aukqp),$CONTROL_PAR_TEXT,"")
  8837. set_control_par_str(get_ui_id($aukqp),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  8838. %qdiwi[14] := 0
  8839. %ha0dc[14] := 1000000
  8840. %cy2pa[14] := 1
  8841. !5hawr[14] := "Hz"
  8842. !znpd1[14] := ""
  8843. %i5z0e[14] := $ENGINE_PAR_FREQ1
  8844. %qpgwq[14] := -1
  8845. %bjbtn[14] := 0
  8846. %c40o1[14] := 2
  8847. %aebtw[14] := 0
  8848. %hgu5c[14] := 1000000
  8849. %gndxq[14] := 1129
  8850. %ipim0[14] := 114
  8851. declare %gkldg[2] := (get_ui_id($kpiih), get_ui_id($aukqp))
  8852. $g5k3r := 0
  8853. while ($g5k3r<num_elements(%gkldg))
  8854. %xwg5s[1140+$g5k3r] := %gkldg[$g5k3r]
  8855. %cqg2m[114] := 0
  8856. inc($g5k3r)
  8857. end while
  8858. declare ui_slider $ddusk(0, 1000000)
  8859. make_persistent($ddusk)
  8860. set_control_par(get_ui_id($ddusk),$CONTROL_PAR_DEFAULT_VALUE,500000)
  8861. set_control_par_str(get_ui_id($ddusk),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
  8862. %aazjf[15] := get_ui_id($ddusk)
  8863. declare ui_label $wwrm0(1, 1)
  8864. %5comw[15] := get_ui_id($wwrm0)
  8865. set_control_par_str(get_ui_id($wwrm0),$CONTROL_PAR_TEXT,"")
  8866. set_control_par_str(get_ui_id($wwrm0),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  8867. %qdiwi[15] := 0
  8868. %ha0dc[15] := 1000000
  8869. %cy2pa[15] := 1
  8870. !5hawr[15] := "Hz"
  8871. !znpd1[15] := ""
  8872. %i5z0e[15] := $ENGINE_PAR_FREQ2
  8873. %qpgwq[15] := -1
  8874. %bjbtn[15] := 0
  8875. %c40o1[15] := 2
  8876. %aebtw[15] := 0
  8877. %hgu5c[15] := 1000000
  8878. %gndxq[15] := 1130
  8879. %ipim0[15] := 115
  8880. declare %zkvyk[2] := (get_ui_id($ddusk), get_ui_id($wwrm0))
  8881. $g5k3r := 0
  8882. while ($g5k3r<num_elements(%zkvyk))
  8883. %xwg5s[1150+$g5k3r] := %zkvyk[$g5k3r]
  8884. %cqg2m[115] := 0
  8885. inc($g5k3r)
  8886. end while
  8887. declare ui_slider $ysdm4(0, 1000000)
  8888. make_persistent($ysdm4)
  8889. set_control_par(get_ui_id($ysdm4),$CONTROL_PAR_DEFAULT_VALUE,500000)
  8890. set_control_par_str(get_ui_id($ysdm4),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
  8891. %aazjf[16] := get_ui_id($ysdm4)
  8892. declare ui_label $mjbdx(1, 1)
  8893. %5comw[16] := get_ui_id($mjbdx)
  8894. set_control_par_str(get_ui_id($mjbdx),$CONTROL_PAR_TEXT,"")
  8895. set_control_par_str(get_ui_id($mjbdx),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  8896. %qdiwi[16] := 0
  8897. %ha0dc[16] := 1000000
  8898. %cy2pa[16] := 1
  8899. !5hawr[16] := "Hz"
  8900. !znpd1[16] := ""
  8901. %i5z0e[16] := $ENGINE_PAR_FREQ3
  8902. %qpgwq[16] := -1
  8903. %bjbtn[16] := 0
  8904. %c40o1[16] := 2
  8905. %aebtw[16] := 0
  8906. %hgu5c[16] := 1000000
  8907. %gndxq[16] := 1131
  8908. %ipim0[16] := 116
  8909. declare %nb3en[2] := (get_ui_id($ysdm4), get_ui_id($mjbdx))
  8910. $g5k3r := 0
  8911. while ($g5k3r<num_elements(%nb3en))
  8912. %xwg5s[1160+$g5k3r] := %nb3en[$g5k3r]
  8913. %cqg2m[116] := 0
  8914. inc($g5k3r)
  8915. end while
  8916. declare ui_slider $dtugu(0, 1000000)
  8917. make_persistent($dtugu)
  8918. set_control_par(get_ui_id($dtugu),$CONTROL_PAR_DEFAULT_VALUE,500000)
  8919. set_control_par_str(get_ui_id($dtugu),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
  8920. %aazjf[17] := get_ui_id($dtugu)
  8921. declare ui_label $21v2s(1, 1)
  8922. %5comw[17] := get_ui_id($21v2s)
  8923. set_control_par_str(get_ui_id($21v2s),$CONTROL_PAR_TEXT,"")
  8924. set_control_par_str(get_ui_id($21v2s),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
  8925. %qdiwi[17] := 0
  8926. %ha0dc[17] := 1000000
  8927. %cy2pa[17] := 1
  8928. !5hawr[17] := "Oct"
  8929. !znpd1[17] := ""
  8930. %i5z0e[17] := $ENGINE_PAR_BW1
  8931. %qpgwq[17] := -1
  8932. %bjbtn[17] := 0
  8933. %c40o1[17] := 2
  8934. %aebtw[17] := 0
  8935. %hgu5c[17] := 1000000
  8936. %gndxq[17] := 1132
  8937. %ipim0[17] := 117
  8938. declare %xk15c[2] := (get_ui_id($dtugu), get_ui_id($21v2s))
  8939. $g5k3r := 0
  8940. while ($g5k3r<num_elements(%xk15c))
  8941. %xwg5s[1170+$g5k3r] := %xk15c[$g5k3r]
  8942. %cqg2m[117] := 0
  8943. inc($g5k3r)
  8944. end while
  8945. declare ui_slider $pvege(0, 1000000)
  8946. make_persistent($pvege)
  8947. set_control_par(get_ui_id($pvege),$CONTROL_PAR_DEFAULT_VALUE,500000)
  8948. set_control_par_str(get_ui_id($pvege),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
  8949. %aazjf[18] := get_ui_id($pvege)
  8950. declare ui_label $ahv45(1, 1)
  8951. %5comw[18] := get_ui_id($ahv45)
  8952. set_control_par_str(get_ui_id($ahv45),$CONTROL_PAR_TEXT,"")
  8953. set_control_par_str(get_ui_id($ahv45),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
  8954. %qdiwi[18] := 0
  8955. %ha0dc[18] := 1000000
  8956. %cy2pa[18] := 1
  8957. !5hawr[18] := "Oct"
  8958. !znpd1[18] := ""
  8959. %i5z0e[18] := $ENGINE_PAR_BW2
  8960. %qpgwq[18] := -1
  8961. %bjbtn[18] := 0
  8962. %c40o1[18] := 2
  8963. %aebtw[18] := 0
  8964. %hgu5c[18] := 1000000
  8965. %gndxq[18] := 1133
  8966. %ipim0[18] := 118
  8967. declare %uxvmc[2] := (get_ui_id($pvege), get_ui_id($ahv45))
  8968. $g5k3r := 0
  8969. while ($g5k3r<num_elements(%uxvmc))
  8970. %xwg5s[1180+$g5k3r] := %uxvmc[$g5k3r]
  8971. %cqg2m[118] := 0
  8972. inc($g5k3r)
  8973. end while
  8974. declare ui_slider $iggz4(0, 1000000)
  8975. make_persistent($iggz4)
  8976. set_control_par(get_ui_id($iggz4),$CONTROL_PAR_DEFAULT_VALUE,500000)
  8977. set_control_par_str(get_ui_id($iggz4),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
  8978. %aazjf[19] := get_ui_id($iggz4)
  8979. declare ui_label $jeohl(1, 1)
  8980. %5comw[19] := get_ui_id($jeohl)
  8981. set_control_par_str(get_ui_id($jeohl),$CONTROL_PAR_TEXT,"")
  8982. set_control_par_str(get_ui_id($jeohl),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
  8983. %qdiwi[19] := 0
  8984. %ha0dc[19] := 1000000
  8985. %cy2pa[19] := 1
  8986. !5hawr[19] := "Oct"
  8987. !znpd1[19] := ""
  8988. %i5z0e[19] := $ENGINE_PAR_BW3
  8989. %qpgwq[19] := -1
  8990. %bjbtn[19] := 0
  8991. %c40o1[19] := 2
  8992. %aebtw[19] := 0
  8993. %hgu5c[19] := 1000000
  8994. %gndxq[19] := 1134
  8995. %ipim0[19] := 119
  8996. declare %ijhix[2] := (get_ui_id($iggz4), get_ui_id($jeohl))
  8997. $g5k3r := 0
  8998. while ($g5k3r<num_elements(%ijhix))
  8999. %xwg5s[1190+$g5k3r] := %ijhix[$g5k3r]
  9000. %cqg2m[119] := 0
  9001. inc($g5k3r)
  9002. end while
  9003. declare %ubhst[6] := (114, 115, 116, 117, 118, 119)
  9004. declare ui_slider $5ernz(0, 1000000)
  9005. make_persistent($5ernz)
  9006. set_control_par(get_ui_id($5ernz),$CONTROL_PAR_DEFAULT_VALUE,500000)
  9007. set_control_par_str(get_ui_id($5ernz),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
  9008. %aazjf[20] := get_ui_id($5ernz)
  9009. declare ui_label $cixjr(1, 1)
  9010. %5comw[20] := get_ui_id($cixjr)
  9011. set_control_par_str(get_ui_id($cixjr),$CONTROL_PAR_TEXT,"")
  9012. set_control_par_str(get_ui_id($cixjr),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  9013. %qdiwi[20] := 0
  9014. %ha0dc[20] := 1000000
  9015. %cy2pa[20] := 1
  9016. !5hawr[20] := "Hz"
  9017. !znpd1[20] := ""
  9018. %i5z0e[20] := $ENGINE_PAR_FREQ1
  9019. %qpgwq[20] := -1
  9020. %bjbtn[20] := 0
  9021. %c40o1[20] := 2
  9022. %aebtw[20] := 0
  9023. %hgu5c[20] := 1000000
  9024. %gndxq[20] := 1135
  9025. %ipim0[20] := 120
  9026. declare %mmxef[2] := (get_ui_id($5ernz), get_ui_id($cixjr))
  9027. $g5k3r := 0
  9028. while ($g5k3r<num_elements(%mmxef))
  9029. %xwg5s[1200+$g5k3r] := %mmxef[$g5k3r]
  9030. %cqg2m[120] := 0
  9031. inc($g5k3r)
  9032. end while
  9033. declare ui_slider $gepsm(0, 1000000)
  9034. make_persistent($gepsm)
  9035. set_control_par(get_ui_id($gepsm),$CONTROL_PAR_DEFAULT_VALUE,500000)
  9036. set_control_par_str(get_ui_id($gepsm),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
  9037. %aazjf[21] := get_ui_id($gepsm)
  9038. declare ui_label $3xktf(1, 1)
  9039. %5comw[21] := get_ui_id($3xktf)
  9040. set_control_par_str(get_ui_id($3xktf),$CONTROL_PAR_TEXT,"")
  9041. set_control_par_str(get_ui_id($3xktf),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  9042. %qdiwi[21] := 0
  9043. %ha0dc[21] := 1000000
  9044. %cy2pa[21] := 1
  9045. !5hawr[21] := "Hz"
  9046. !znpd1[21] := ""
  9047. %i5z0e[21] := $ENGINE_PAR_FREQ2
  9048. %qpgwq[21] := -1
  9049. %bjbtn[21] := 0
  9050. %c40o1[21] := 2
  9051. %aebtw[21] := 0
  9052. %hgu5c[21] := 1000000
  9053. %gndxq[21] := 1136
  9054. %ipim0[21] := 121
  9055. declare %x2zv2[2] := (get_ui_id($gepsm), get_ui_id($3xktf))
  9056. $g5k3r := 0
  9057. while ($g5k3r<num_elements(%x2zv2))
  9058. %xwg5s[1210+$g5k3r] := %x2zv2[$g5k3r]
  9059. %cqg2m[121] := 0
  9060. inc($g5k3r)
  9061. end while
  9062. declare ui_slider $qtif2(0, 1000000)
  9063. make_persistent($qtif2)
  9064. set_control_par(get_ui_id($qtif2),$CONTROL_PAR_DEFAULT_VALUE,500000)
  9065. set_control_par_str(get_ui_id($qtif2),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_FREQ")
  9066. %aazjf[22] := get_ui_id($qtif2)
  9067. declare ui_label $vxkmw(1, 1)
  9068. %5comw[22] := get_ui_id($vxkmw)
  9069. set_control_par_str(get_ui_id($vxkmw),$CONTROL_PAR_TEXT,"")
  9070. set_control_par_str(get_ui_id($vxkmw),$CONTROL_PAR_PICTURE,"MK_Mask" & "_8")
  9071. %qdiwi[22] := 0
  9072. %ha0dc[22] := 1000000
  9073. %cy2pa[22] := 1
  9074. !5hawr[22] := "Hz"
  9075. !znpd1[22] := ""
  9076. %i5z0e[22] := $ENGINE_PAR_FREQ3
  9077. %qpgwq[22] := -1
  9078. %bjbtn[22] := 0
  9079. %c40o1[22] := 2
  9080. %aebtw[22] := 0
  9081. %hgu5c[22] := 1000000
  9082. %gndxq[22] := 1137
  9083. %ipim0[22] := 122
  9084. declare %u5shn[2] := (get_ui_id($qtif2), get_ui_id($vxkmw))
  9085. $g5k3r := 0
  9086. while ($g5k3r<num_elements(%u5shn))
  9087. %xwg5s[1220+$g5k3r] := %u5shn[$g5k3r]
  9088. %cqg2m[122] := 0
  9089. inc($g5k3r)
  9090. end while
  9091. declare ui_slider $dtx0r(0, 1000000)
  9092. make_persistent($dtx0r)
  9093. set_control_par(get_ui_id($dtx0r),$CONTROL_PAR_DEFAULT_VALUE,500000)
  9094. set_control_par_str(get_ui_id($dtx0r),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
  9095. %aazjf[23] := get_ui_id($dtx0r)
  9096. declare ui_label $mtn1n(1, 1)
  9097. %5comw[23] := get_ui_id($mtn1n)
  9098. set_control_par_str(get_ui_id($mtn1n),$CONTROL_PAR_TEXT,"")
  9099. set_control_par_str(get_ui_id($mtn1n),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
  9100. %qdiwi[23] := 0
  9101. %ha0dc[23] := 1000000
  9102. %cy2pa[23] := 1
  9103. !5hawr[23] := "Oct"
  9104. !znpd1[23] := ""
  9105. %i5z0e[23] := $ENGINE_PAR_BW1
  9106. %qpgwq[23] := -1
  9107. %bjbtn[23] := 0
  9108. %c40o1[23] := 2
  9109. %aebtw[23] := 0
  9110. %hgu5c[23] := 1000000
  9111. %gndxq[23] := 1138
  9112. %ipim0[23] := 123
  9113. declare %ondoi[2] := (get_ui_id($dtx0r), get_ui_id($mtn1n))
  9114. $g5k3r := 0
  9115. while ($g5k3r<num_elements(%ondoi))
  9116. %xwg5s[1230+$g5k3r] := %ondoi[$g5k3r]
  9117. %cqg2m[123] := 0
  9118. inc($g5k3r)
  9119. end while
  9120. declare ui_slider $ophyd(0, 1000000)
  9121. make_persistent($ophyd)
  9122. set_control_par(get_ui_id($ophyd),$CONTROL_PAR_DEFAULT_VALUE,500000)
  9123. set_control_par_str(get_ui_id($ophyd),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
  9124. %aazjf[24] := get_ui_id($ophyd)
  9125. declare ui_label $eb3ia(1, 1)
  9126. %5comw[24] := get_ui_id($eb3ia)
  9127. set_control_par_str(get_ui_id($eb3ia),$CONTROL_PAR_TEXT,"")
  9128. set_control_par_str(get_ui_id($eb3ia),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
  9129. %qdiwi[24] := 0
  9130. %ha0dc[24] := 1000000
  9131. %cy2pa[24] := 1
  9132. !5hawr[24] := "Oct"
  9133. !znpd1[24] := ""
  9134. %i5z0e[24] := $ENGINE_PAR_BW2
  9135. %qpgwq[24] := -1
  9136. %bjbtn[24] := 0
  9137. %c40o1[24] := 2
  9138. %aebtw[24] := 0
  9139. %hgu5c[24] := 1000000
  9140. %gndxq[24] := 1139
  9141. %ipim0[24] := 124
  9142. declare %mxxcr[2] := (get_ui_id($ophyd), get_ui_id($eb3ia))
  9143. $g5k3r := 0
  9144. while ($g5k3r<num_elements(%mxxcr))
  9145. %xwg5s[1240+$g5k3r] := %mxxcr[$g5k3r]
  9146. %cqg2m[124] := 0
  9147. inc($g5k3r)
  9148. end while
  9149. declare ui_slider $ydeyc(0, 1000000)
  9150. make_persistent($ydeyc)
  9151. set_control_par(get_ui_id($ydeyc),$CONTROL_PAR_DEFAULT_VALUE,500000)
  9152. set_control_par_str(get_ui_id($ydeyc),$CONTROL_PAR_PICTURE,"GE_NORM_KNOB_Q")
  9153. %aazjf[25] := get_ui_id($ydeyc)
  9154. declare ui_label $ms0kq(1, 1)
  9155. %5comw[25] := get_ui_id($ms0kq)
  9156. set_control_par_str(get_ui_id($ms0kq),$CONTROL_PAR_TEXT,"")
  9157. set_control_par_str(get_ui_id($ms0kq),$CONTROL_PAR_PICTURE,"MK_Mask" & "_3")
  9158. %qdiwi[25] := 0
  9159. %ha0dc[25] := 1000000
  9160. %cy2pa[25] := 1
  9161. !5hawr[25] := "Oct"
  9162. !znpd1[25] := ""
  9163. %i5z0e[25] := $ENGINE_PAR_BW3
  9164. %qpgwq[25] := -1
  9165. %bjbtn[25] := 0
  9166. %c40o1[25] := 2
  9167. %aebtw[25] := 0
  9168. %hgu5c[25] := 1000000
  9169. %gndxq[25] := 1140
  9170. %ipim0[25] := 125
  9171. declare %i2xjn[2] := (get_ui_id($ydeyc), get_ui_id($ms0kq))
  9172. $g5k3r := 0
  9173. while ($g5k3r<num_elements(%i2xjn))
  9174. %xwg5s[1250+$g5k3r] := %i2xjn[$g5k3r]
  9175. %cqg2m[125] := 0
  9176. inc($g5k3r)
  9177. end while
  9178. declare %koku3[6] := (120, 121, 122, 123, 124, 125)
  9179. declare %r5fsk[6] := ($ENGINE_PAR_FREQ1, $ENGINE_PAR_FREQ2, $ENGINE_PAR_FREQ3, $ENGINE_PAR_BW1, $ENGINE_PAR_BW2, $ENGINE_PAR_BW3)
  9180. declare %ce3ql[48]
  9181. declare %u4nqi[48]
  9182. $dyt1q := 75
  9183. $fg4rw := 0
  9184. while ($fg4rw<4)
  9185. $g5k3r := 0
  9186. while ($g5k3r<%gxveo[$fg4rw])
  9187. $25gvz := 0
  9188. while ($25gvz<3)
  9189. %u4nqi[12*$fg4rw+(3*$g5k3r)+$25gvz] := $dyt1q
  9190. %ce3ql[12*$fg4rw+(3*$g5k3r)+$25gvz] := %xwg5s[10*$dyt1q]
  9191. inc($dyt1q)
  9192. inc($25gvz)
  9193. end while
  9194. inc($g5k3r)
  9195. end while
  9196. inc($fg4rw)
  9197. end while
  9198. declare %d03k4[48]
  9199. declare %2e42a[48]
  9200. declare %kdfz1[48]
  9201. $dyt1q := 0
  9202. declare %n5ge0[32]
  9203. $fg4rw := 0
  9204. while ($fg4rw<4)
  9205. $g5k3r := 0
  9206. while ($g5k3r<%wvg1x[$fg4rw])
  9207. if (%wvg1x[$fg4rw]>1)
  9208. %n5ge0[8*$fg4rw+$g5k3r] := %ejazl[$dyt1q]
  9209. end if
  9210. inc($dyt1q)
  9211. inc($g5k3r)
  9212. end while
  9213. inc($fg4rw)
  9214. end while
  9215. end if
  9216. declare ui_slider $ud2dz(0, 1000000)
  9217. make_persistent($ud2dz)
  9218. declare ui_slider $3imfl(-999999, 999999)
  9219. make_persistent($3imfl)
  9220. set_control_par_str(get_ui_id($3imfl),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  9221. declare ui_menu $v2kdj
  9222. make_persistent($v2kdj)
  9223. set_control_par_str(get_ui_id($v2kdj),$CONTROL_PAR_PICTURE,"blank")
  9224. $fg4rw := 0
  9225. while ($fg4rw<num_elements(!flm4j))
  9226. add_menu_item($v2kdj,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  9227. inc($fg4rw)
  9228. end while
  9229. set_menu_item_str(get_ui_id($v2kdj),search(%bnygy,10),"VEL Mono Velocity")
  9230. $upapg := 74
  9231. %n34di[$upapg] := get_ui_id($v2kdj)
  9232. %nwlgb[$upapg] := get_ui_id($3imfl)
  9233. !4gjzd[74] := "_5"
  9234. %c1qym[74] := get_ui_id($3imfl)
  9235. %41o3s[74] := get_ui_id($ud2dz)
  9236. declare ui_label $tmcx1(1, 1)
  9237. set_control_par_str(get_ui_id($tmcx1),$CONTROL_PAR_TEXT,"")
  9238. set_control_par_str(get_ui_id($tmcx1),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  9239. %vvlef[74] := get_ui_id($tmcx1)
  9240. declare ui_label $bxcq4(1, 1)
  9241. set_control_par_str(get_ui_id($bxcq4),$CONTROL_PAR_TEXT,"")
  9242. set_control_par_str(get_ui_id($bxcq4),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  9243. %2hswt[74] := get_ui_id($bxcq4)
  9244. declare ui_label $t3oeg(1, 1)
  9245. set_control_par_str(get_ui_id($t3oeg),$CONTROL_PAR_TEXT,"")
  9246. set_control_par_str(get_ui_id($t3oeg),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  9247. set_control_par(get_ui_id($t3oeg),$CONTROL_PAR_Z_LAYER,1)
  9248. %lm23w[74] := get_ui_id($t3oeg)
  9249. %qxmpr[74] := 999999
  9250. %oazdd[74] := 1
  9251. !gh3f0[74] := "dB"
  9252. ?rylw5[74] := 1.0
  9253. %q4mzh[74] := $ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN
  9254. %vc4gu[74] := -1
  9255. %hpc0e[74] := 1
  9256. %eujmz[74] := 0
  9257. %fogcg[74] := 0
  9258. %5zak5[74] := 0
  9259. %dwdw3[74] := 0
  9260. %sbnwu[74] := 1000000
  9261. %jeswc[74] := 1200
  9262. %mnk53[74] := 29
  9263. declare %oip1l[10] := (get_ui_id($ud2dz), get_ui_id($3imfl), get_ui_id($tmcx1), get_ui_id($bxcq4), get_ui_id($t3oeg), get_ui_id($v2kdj), -1)
  9264. $g5k3r := 0
  9265. while ($g5k3r<num_elements(%oip1l))
  9266. %xwg5s[290+$g5k3r] := %oip1l[$g5k3r]
  9267. %cqg2m[29] := 64
  9268. inc($g5k3r)
  9269. end while
  9270. declare ui_slider $b4qif(0, 1000000)
  9271. make_persistent($b4qif)
  9272. declare ui_slider $uqaye(-999999, 999999)
  9273. make_persistent($uqaye)
  9274. set_control_par_str(get_ui_id($uqaye),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  9275. declare ui_menu $tpmdd
  9276. make_persistent($tpmdd)
  9277. set_control_par_str(get_ui_id($tpmdd),$CONTROL_PAR_PICTURE,"blank")
  9278. $fg4rw := 0
  9279. while ($fg4rw<num_elements(!flm4j))
  9280. add_menu_item($tpmdd,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  9281. inc($fg4rw)
  9282. end while
  9283. set_menu_item_str(get_ui_id($tpmdd),search(%bnygy,10),"VEL Mono Velocity")
  9284. $upapg := 75
  9285. %n34di[$upapg] := get_ui_id($tpmdd)
  9286. %nwlgb[$upapg] := get_ui_id($uqaye)
  9287. !4gjzd[75] := "_5"
  9288. %c1qym[75] := get_ui_id($uqaye)
  9289. %41o3s[75] := get_ui_id($b4qif)
  9290. declare ui_label $ghoa2(1, 1)
  9291. set_control_par_str(get_ui_id($ghoa2),$CONTROL_PAR_TEXT,"")
  9292. set_control_par_str(get_ui_id($ghoa2),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  9293. %vvlef[75] := get_ui_id($ghoa2)
  9294. declare ui_label $jd2jk(1, 1)
  9295. set_control_par_str(get_ui_id($jd2jk),$CONTROL_PAR_TEXT,"")
  9296. set_control_par_str(get_ui_id($jd2jk),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  9297. %2hswt[75] := get_ui_id($jd2jk)
  9298. declare ui_label $hmyvb(1, 1)
  9299. set_control_par_str(get_ui_id($hmyvb),$CONTROL_PAR_TEXT,"")
  9300. set_control_par_str(get_ui_id($hmyvb),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  9301. set_control_par(get_ui_id($hmyvb),$CONTROL_PAR_Z_LAYER,1)
  9302. %lm23w[75] := get_ui_id($hmyvb)
  9303. %qxmpr[75] := 999999
  9304. %oazdd[75] := 1
  9305. !gh3f0[75] := "%"
  9306. ?rylw5[75] := 1.0
  9307. %q4mzh[75] := $ENGINE_PAR_RDL_FEEDBACK
  9308. %vc4gu[75] := -1
  9309. %hpc0e[75] := 1
  9310. %eujmz[75] := 0
  9311. %fogcg[75] := 0
  9312. %5zak5[75] := 0
  9313. %dwdw3[75] := 0
  9314. %sbnwu[75] := 1000000
  9315. %jeswc[75] := 1203
  9316. %mnk53[75] := 30
  9317. declare %kgvmc[10] := (get_ui_id($b4qif), get_ui_id($uqaye), get_ui_id($ghoa2), get_ui_id($jd2jk), get_ui_id($hmyvb), get_ui_id($tpmdd), -1)
  9318. $g5k3r := 0
  9319. while ($g5k3r<num_elements(%kgvmc))
  9320. %xwg5s[300+$g5k3r] := %kgvmc[$g5k3r]
  9321. %cqg2m[30] := 64
  9322. inc($g5k3r)
  9323. end while
  9324. declare ui_slider $tcdg3(0, 1000000)
  9325. make_persistent($tcdg3)
  9326. declare ui_slider $fflhr(-1000000, 1000000)
  9327. make_persistent($fflhr)
  9328. set_control_par_str(get_ui_id($fflhr),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  9329. declare ui_menu $rpdbb
  9330. make_persistent($rpdbb)
  9331. set_control_par_str(get_ui_id($rpdbb),$CONTROL_PAR_PICTURE,"blank")
  9332. $fg4rw := 0
  9333. while ($fg4rw<num_elements(!flm4j))
  9334. add_menu_item($rpdbb,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  9335. inc($fg4rw)
  9336. end while
  9337. set_menu_item_str(get_ui_id($rpdbb),search(%bnygy,10),"VEL Mono Velocity")
  9338. $upapg := 76
  9339. %n34di[$upapg] := get_ui_id($rpdbb)
  9340. %nwlgb[$upapg] := get_ui_id($fflhr)
  9341. !4gjzd[76] := "_5"
  9342. %c1qym[76] := get_ui_id($fflhr)
  9343. %41o3s[76] := get_ui_id($tcdg3)
  9344. declare ui_label $dn0r3(1, 1)
  9345. set_control_par_str(get_ui_id($dn0r3),$CONTROL_PAR_TEXT,"")
  9346. set_control_par_str(get_ui_id($dn0r3),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  9347. %vvlef[76] := get_ui_id($dn0r3)
  9348. declare ui_label $1i0u3(1, 1)
  9349. set_control_par_str(get_ui_id($1i0u3),$CONTROL_PAR_TEXT,"")
  9350. set_control_par_str(get_ui_id($1i0u3),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  9351. %2hswt[76] := get_ui_id($1i0u3)
  9352. declare ui_label $xhajv(1, 1)
  9353. set_control_par_str(get_ui_id($xhajv),$CONTROL_PAR_TEXT,"")
  9354. set_control_par_str(get_ui_id($xhajv),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  9355. set_control_par(get_ui_id($xhajv),$CONTROL_PAR_Z_LAYER,1)
  9356. %lm23w[76] := get_ui_id($xhajv)
  9357. %qxmpr[76] := 1000000
  9358. %oazdd[76] := 1
  9359. !gh3f0[76] := "ms"
  9360. ?rylw5[76] := 1.0
  9361. %q4mzh[76] := $ENGINE_PAR_RDL_TIME
  9362. %vc4gu[76] := -1
  9363. %hpc0e[76] := 1
  9364. %eujmz[76] := 0
  9365. %fogcg[76] := 1
  9366. %5zak5[76] := 0
  9367. %dwdw3[76] := 0
  9368. %sbnwu[76] := 1000000
  9369. %jeswc[76] := 1206
  9370. %mnk53[76] := 28
  9371. declare %ao1af[10] := (get_ui_id($tcdg3), get_ui_id($fflhr), get_ui_id($dn0r3), get_ui_id($1i0u3), get_ui_id($xhajv), get_ui_id($rpdbb), -1)
  9372. $g5k3r := 0
  9373. while ($g5k3r<num_elements(%ao1af))
  9374. %xwg5s[280+$g5k3r] := %ao1af[$g5k3r]
  9375. %cqg2m[28] := 64
  9376. inc($g5k3r)
  9377. end while
  9378. declare ui_slider $ppztm(0, 1000000)
  9379. make_persistent($ppztm)
  9380. declare ui_slider $gwhxp(-1000001, 1000001)
  9381. make_persistent($gwhxp)
  9382. set_control_par_str(get_ui_id($gwhxp),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  9383. declare ui_menu $r0mpl
  9384. make_persistent($r0mpl)
  9385. set_control_par_str(get_ui_id($r0mpl),$CONTROL_PAR_PICTURE,"blank")
  9386. $fg4rw := 0
  9387. while ($fg4rw<num_elements(!flm4j))
  9388. add_menu_item($r0mpl,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  9389. inc($fg4rw)
  9390. end while
  9391. set_menu_item_str(get_ui_id($r0mpl),search(%bnygy,10),"VEL Mono Velocity")
  9392. $upapg := 77
  9393. %n34di[$upapg] := get_ui_id($r0mpl)
  9394. %nwlgb[$upapg] := get_ui_id($gwhxp)
  9395. !4gjzd[77] := "_5"
  9396. %c1qym[77] := get_ui_id($gwhxp)
  9397. %41o3s[77] := get_ui_id($ppztm)
  9398. declare ui_label $en0x1(1, 1)
  9399. set_control_par_str(get_ui_id($en0x1),$CONTROL_PAR_TEXT,"")
  9400. set_control_par_str(get_ui_id($en0x1),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  9401. %vvlef[77] := get_ui_id($en0x1)
  9402. declare ui_label $mawal(1, 1)
  9403. set_control_par_str(get_ui_id($mawal),$CONTROL_PAR_TEXT,"")
  9404. set_control_par_str(get_ui_id($mawal),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  9405. %2hswt[77] := get_ui_id($mawal)
  9406. declare ui_label $0vw2l(1, 1)
  9407. set_control_par_str(get_ui_id($0vw2l),$CONTROL_PAR_TEXT,"")
  9408. set_control_par_str(get_ui_id($0vw2l),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  9409. set_control_par(get_ui_id($0vw2l),$CONTROL_PAR_Z_LAYER,1)
  9410. %lm23w[77] := get_ui_id($0vw2l)
  9411. %qxmpr[77] := 1000001
  9412. %oazdd[77] := 1
  9413. !gh3f0[77] := "dB"
  9414. ?rylw5[77] := 1.0
  9415. %q4mzh[77] := $ENGINE_PAR_SENDLEVEL_SMOOTHED_0
  9416. %vc4gu[77] := -1
  9417. %hpc0e[77] := 7
  9418. %eujmz[77] := 1024
  9419. %fogcg[77] := 0
  9420. %5zak5[77] := 0
  9421. %dwdw3[77] := 0
  9422. %sbnwu[77] := 1000000
  9423. %jeswc[77] := 1000
  9424. %mnk53[77] := 62
  9425. declare %kie0i[10] := (get_ui_id($ppztm), get_ui_id($gwhxp), get_ui_id($en0x1), get_ui_id($mawal), get_ui_id($0vw2l), get_ui_id($r0mpl), -1)
  9426. $g5k3r := 0
  9427. while ($g5k3r<num_elements(%kie0i))
  9428. %xwg5s[620+$g5k3r] := %kie0i[$g5k3r]
  9429. %cqg2m[62] := 64
  9430. inc($g5k3r)
  9431. end while
  9432. declare ui_slider $mjxc2(0, 1000000)
  9433. make_persistent($mjxc2)
  9434. declare ui_slider $bxtyp(-1000001, 1000001)
  9435. make_persistent($bxtyp)
  9436. set_control_par_str(get_ui_id($bxtyp),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  9437. declare ui_menu $a1mcv
  9438. make_persistent($a1mcv)
  9439. set_control_par_str(get_ui_id($a1mcv),$CONTROL_PAR_PICTURE,"blank")
  9440. $fg4rw := 0
  9441. while ($fg4rw<num_elements(!flm4j))
  9442. add_menu_item($a1mcv,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  9443. inc($fg4rw)
  9444. end while
  9445. set_menu_item_str(get_ui_id($a1mcv),search(%bnygy,10),"VEL Mono Velocity")
  9446. $upapg := 78
  9447. %n34di[$upapg] := get_ui_id($a1mcv)
  9448. %nwlgb[$upapg] := get_ui_id($bxtyp)
  9449. !4gjzd[78] := "_5"
  9450. %c1qym[78] := get_ui_id($bxtyp)
  9451. %41o3s[78] := get_ui_id($mjxc2)
  9452. declare ui_label $mqyie(1, 1)
  9453. set_control_par_str(get_ui_id($mqyie),$CONTROL_PAR_TEXT,"")
  9454. set_control_par_str(get_ui_id($mqyie),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  9455. %vvlef[78] := get_ui_id($mqyie)
  9456. declare ui_label $ahrd2(1, 1)
  9457. set_control_par_str(get_ui_id($ahrd2),$CONTROL_PAR_TEXT,"")
  9458. set_control_par_str(get_ui_id($ahrd2),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  9459. %2hswt[78] := get_ui_id($ahrd2)
  9460. declare ui_label $sso0w(1, 1)
  9461. set_control_par_str(get_ui_id($sso0w),$CONTROL_PAR_TEXT,"")
  9462. set_control_par_str(get_ui_id($sso0w),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  9463. set_control_par(get_ui_id($sso0w),$CONTROL_PAR_Z_LAYER,1)
  9464. %lm23w[78] := get_ui_id($sso0w)
  9465. %qxmpr[78] := 1000001
  9466. %oazdd[78] := 1
  9467. !gh3f0[78] := "dB"
  9468. ?rylw5[78] := 1.0
  9469. %q4mzh[78] := $ENGINE_PAR_SENDLEVEL_SMOOTHED_1
  9470. %vc4gu[78] := -1
  9471. %hpc0e[78] := 7
  9472. %eujmz[78] := 1024
  9473. %fogcg[78] := 0
  9474. %5zak5[78] := 0
  9475. %dwdw3[78] := 0
  9476. %sbnwu[78] := 1000000
  9477. %jeswc[78] := 1003
  9478. %mnk53[78] := 63
  9479. declare %zf0bt[10] := (get_ui_id($mjxc2), get_ui_id($bxtyp), get_ui_id($mqyie), get_ui_id($ahrd2), get_ui_id($sso0w), get_ui_id($a1mcv), -1)
  9480. $g5k3r := 0
  9481. while ($g5k3r<num_elements(%zf0bt))
  9482. %xwg5s[630+$g5k3r] := %zf0bt[$g5k3r]
  9483. %cqg2m[63] := 64
  9484. inc($g5k3r)
  9485. end while
  9486. declare ui_slider $uvwcc(0, 1000000)
  9487. make_persistent($uvwcc)
  9488. declare ui_slider $xcb2e(-1000001, 1000001)
  9489. make_persistent($xcb2e)
  9490. set_control_par_str(get_ui_id($xcb2e),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  9491. declare ui_menu $h5tys
  9492. make_persistent($h5tys)
  9493. set_control_par_str(get_ui_id($h5tys),$CONTROL_PAR_PICTURE,"blank")
  9494. $fg4rw := 0
  9495. while ($fg4rw<num_elements(!flm4j))
  9496. add_menu_item($h5tys,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  9497. inc($fg4rw)
  9498. end while
  9499. set_menu_item_str(get_ui_id($h5tys),search(%bnygy,10),"VEL Mono Velocity")
  9500. $upapg := 79
  9501. %n34di[$upapg] := get_ui_id($h5tys)
  9502. %nwlgb[$upapg] := get_ui_id($xcb2e)
  9503. !4gjzd[79] := "_5"
  9504. %c1qym[79] := get_ui_id($xcb2e)
  9505. %41o3s[79] := get_ui_id($uvwcc)
  9506. declare ui_label $qa0j3(1, 1)
  9507. set_control_par_str(get_ui_id($qa0j3),$CONTROL_PAR_TEXT,"")
  9508. set_control_par_str(get_ui_id($qa0j3),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  9509. %vvlef[79] := get_ui_id($qa0j3)
  9510. declare ui_label $o0245(1, 1)
  9511. set_control_par_str(get_ui_id($o0245),$CONTROL_PAR_TEXT,"")
  9512. set_control_par_str(get_ui_id($o0245),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  9513. %2hswt[79] := get_ui_id($o0245)
  9514. declare ui_label $d1js2(1, 1)
  9515. set_control_par_str(get_ui_id($d1js2),$CONTROL_PAR_TEXT,"")
  9516. set_control_par_str(get_ui_id($d1js2),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  9517. set_control_par(get_ui_id($d1js2),$CONTROL_PAR_Z_LAYER,1)
  9518. %lm23w[79] := get_ui_id($d1js2)
  9519. %qxmpr[79] := 1000001
  9520. %oazdd[79] := 1
  9521. !gh3f0[79] := "dB"
  9522. ?rylw5[79] := 1.0
  9523. %q4mzh[79] := $ENGINE_PAR_SENDLEVEL_SMOOTHED_0
  9524. %vc4gu[79] := -1
  9525. %hpc0e[79] := 7
  9526. %eujmz[79] := 1025
  9527. %fogcg[79] := 0
  9528. %5zak5[79] := 0
  9529. %dwdw3[79] := 0
  9530. %sbnwu[79] := 1000000
  9531. %jeswc[79] := 1006
  9532. %mnk53[79] := 64
  9533. declare %zni20[10] := (get_ui_id($uvwcc), get_ui_id($xcb2e), get_ui_id($qa0j3), get_ui_id($o0245), get_ui_id($d1js2), get_ui_id($h5tys), -1)
  9534. $g5k3r := 0
  9535. while ($g5k3r<num_elements(%zni20))
  9536. %xwg5s[640+$g5k3r] := %zni20[$g5k3r]
  9537. %cqg2m[64] := 64
  9538. inc($g5k3r)
  9539. end while
  9540. declare ui_slider $ev1e5(0, 1000000)
  9541. make_persistent($ev1e5)
  9542. declare ui_slider $vtpyr(-1000001, 1000001)
  9543. make_persistent($vtpyr)
  9544. set_control_par_str(get_ui_id($vtpyr),$CONTROL_PAR_PICTURE,"MK_Slider" & "_5")
  9545. declare ui_menu $mophf
  9546. make_persistent($mophf)
  9547. set_control_par_str(get_ui_id($mophf),$CONTROL_PAR_PICTURE,"blank")
  9548. $fg4rw := 0
  9549. while ($fg4rw<num_elements(!flm4j))
  9550. add_menu_item($mophf,!bw1t3[%bnygy[$fg4rw]],%bnygy[$fg4rw])
  9551. inc($fg4rw)
  9552. end while
  9553. set_menu_item_str(get_ui_id($mophf),search(%bnygy,10),"VEL Mono Velocity")
  9554. $upapg := 80
  9555. %n34di[$upapg] := get_ui_id($mophf)
  9556. %nwlgb[$upapg] := get_ui_id($vtpyr)
  9557. !4gjzd[80] := "_5"
  9558. %c1qym[80] := get_ui_id($vtpyr)
  9559. %41o3s[80] := get_ui_id($ev1e5)
  9560. declare ui_label $pssbi(1, 1)
  9561. set_control_par_str(get_ui_id($pssbi),$CONTROL_PAR_TEXT,"")
  9562. set_control_par_str(get_ui_id($pssbi),$CONTROL_PAR_PICTURE,"MK_Mask" & "_5")
  9563. %vvlef[80] := get_ui_id($pssbi)
  9564. declare ui_label $uvlj3(1, 1)
  9565. set_control_par_str(get_ui_id($uvlj3),$CONTROL_PAR_TEXT,"")
  9566. set_control_par_str(get_ui_id($uvlj3),$CONTROL_PAR_PICTURE,"MK_RngP" & "_5")
  9567. %2hswt[80] := get_ui_id($uvlj3)
  9568. declare ui_label $eoncv(1, 1)
  9569. set_control_par_str(get_ui_id($eoncv),$CONTROL_PAR_TEXT,"")
  9570. set_control_par_str(get_ui_id($eoncv),$CONTROL_PAR_PICTURE,"MK_ind" & "_5")
  9571. set_control_par(get_ui_id($eoncv),$CONTROL_PAR_Z_LAYER,1)
  9572. %lm23w[80] := get_ui_id($eoncv)
  9573. %qxmpr[80] := 1000001
  9574. %oazdd[80] := 1
  9575. !gh3f0[80] := "dB"
  9576. ?rylw5[80] := 1.0
  9577. %q4mzh[80] := $ENGINE_PAR_SENDLEVEL_SMOOTHED_1
  9578. %vc4gu[80] := -1
  9579. %hpc0e[80] := 7
  9580. %eujmz[80] := 1025
  9581. %fogcg[80] := 0
  9582. %5zak5[80] := 0
  9583. %dwdw3[80] := 0
  9584. %sbnwu[80] := 1000000
  9585. %jeswc[80] := 1009
  9586. %mnk53[80] := 65
  9587. declare %31tuk[10] := (get_ui_id($ev1e5), get_ui_id($vtpyr), get_ui_id($pssbi), get_ui_id($uvlj3), get_ui_id($eoncv), get_ui_id($mophf), -1)
  9588. $g5k3r := 0
  9589. while ($g5k3r<num_elements(%31tuk))
  9590. %xwg5s[650+$g5k3r] := %31tuk[$g5k3r]
  9591. %cqg2m[65] := 64
  9592. inc($g5k3r)
  9593. end while
  9594. $fg4rw := 0
  9595. while ($fg4rw<29)
  9596. $dyt1q := search(%mdgl1,%p41k2[$fg4rw])
  9597. add_menu_item($2qtv2,!gdlxl[$dyt1q],%p41k2[$fg4rw])
  9598. inc($fg4rw)
  9599. end while
  9600. declare ui_button $v3w2j
  9601. set_control_par_str(get_ui_id($v3w2j),$CONTROL_PAR_TEXT,"")
  9602. set_control_par_str(get_ui_id($v3w2j),$CONTROL_PAR_PICTURE,"GE_RND_BTN_0")
  9603. declare ui_menu $41roa
  9604. make_persistent($41roa)
  9605. read_persistent_var($41roa)
  9606. add_menu_item($41roa,"P Parameters only",0)
  9607. add_menu_item($41roa,"S Include Source",1)
  9608. set_control_par_str(get_ui_id($41roa),$CONTROL_PAR_PICTURE,"GE_RND_MENU_" & $41roa)
  9609. declare ui_button $nd04g
  9610. set_control_par_str(get_ui_id($nd04g),$CONTROL_PAR_TEXT,"")
  9611. set_control_par_str(get_ui_id($nd04g),$CONTROL_PAR_PICTURE,"blank")
  9612. declare %ioaja[3] := (get_ui_id($v3w2j), get_ui_id($41roa), get_ui_id($nd04g))
  9613. $g5k3r := 0
  9614. while ($g5k3r<num_elements(%ioaja))
  9615. %xwg5s[1320+$g5k3r] := %ioaja[$g5k3r]
  9616. %cqg2m[132] := 2
  9617. inc($g5k3r)
  9618. end while
  9619. declare ui_button $r2b4a
  9620. set_control_par_str(get_ui_id($r2b4a),$CONTROL_PAR_TEXT,"")
  9621. set_control_par_str(get_ui_id($r2b4a),$CONTROL_PAR_PICTURE,"GE_RND_BTN_0")
  9622. declare ui_menu $y2kih
  9623. make_persistent($y2kih)
  9624. read_persistent_var($y2kih)
  9625. add_menu_item($y2kih,"P Parameters only",0)
  9626. add_menu_item($y2kih,"S Include Source",1)
  9627. set_control_par_str(get_ui_id($y2kih),$CONTROL_PAR_PICTURE,"GE_RND_MENU_" & $y2kih)
  9628. declare ui_button $ecodz
  9629. set_control_par_str(get_ui_id($ecodz),$CONTROL_PAR_TEXT,"")
  9630. set_control_par_str(get_ui_id($ecodz),$CONTROL_PAR_PICTURE,"blank")
  9631. declare %dmutb[3] := (get_ui_id($r2b4a), get_ui_id($y2kih), get_ui_id($ecodz))
  9632. $g5k3r := 0
  9633. while ($g5k3r<num_elements(%dmutb))
  9634. %xwg5s[1330+$g5k3r] := %dmutb[$g5k3r]
  9635. %cqg2m[133] := 4
  9636. inc($g5k3r)
  9637. end while
  9638. declare ui_button $dafnz
  9639. set_control_par_str(get_ui_id($dafnz),$CONTROL_PAR_TEXT,"")
  9640. set_control_par_str(get_ui_id($dafnz),$CONTROL_PAR_PICTURE,"GE_RND_BTN_1")
  9641. declare %vhhvc[1] := (get_ui_id($dafnz))
  9642. $g5k3r := 0
  9643. while ($g5k3r<num_elements(%vhhvc))
  9644. %xwg5s[1340+$g5k3r] := %vhhvc[$g5k3r]
  9645. %cqg2m[134] := 16
  9646. inc($g5k3r)
  9647. end while
  9648. declare %zdvxw[10] := (3, 4, 6, 8, 12, 16, 24, 32, 64, 128)
  9649. declare $n4ppl
  9650. declare %fs3hy[39]
  9651. %fs3hy[0] := 35
  9652. %fs3hy[1] := 36
  9653. %fs3hy[2] := 37
  9654. %fs3hy[3] := 38
  9655. %fs3hy[4] := 39
  9656. %fs3hy[5] := 40
  9657. %fs3hy[6] := 41
  9658. %fs3hy[7] := 42
  9659. %fs3hy[8] := 43
  9660. %fs3hy[9] := 44
  9661. %fs3hy[10] := 45
  9662. %fs3hy[11] := 46
  9663. %fs3hy[12] := 47
  9664. %fs3hy[13] := 48
  9665. %fs3hy[14] := 49
  9666. %fs3hy[15] := 50
  9667. %fs3hy[16] := 51
  9668. %fs3hy[17] := 52
  9669. %fs3hy[18] := 53
  9670. %fs3hy[19] := 54
  9671. %fs3hy[20] := 55
  9672. %fs3hy[21] := 56
  9673. %fs3hy[22] := 57
  9674. %fs3hy[23] := 58
  9675. %fs3hy[24] := 59
  9676. %fs3hy[25] := 60
  9677. %fs3hy[26] := 61
  9678. %fs3hy[27] := 62
  9679. %fs3hy[28] := 63
  9680. %fs3hy[29] := 64
  9681. %fs3hy[30] := 65
  9682. %fs3hy[31] := 66
  9683. %fs3hy[32] := 67
  9684. %fs3hy[33] := 68
  9685. %fs3hy[34] := 69
  9686. %fs3hy[35] := 70
  9687. %fs3hy[36] := 71
  9688. %fs3hy[37] := 72
  9689. %fs3hy[38] := 73
  9690. declare %bsd31[19]
  9691. %bsd31[0] := 12
  9692. %bsd31[1] := 13
  9693. %bsd31[2] := 14
  9694. %bsd31[3] := 15
  9695. %bsd31[4] := 16
  9696. %bsd31[5] := 17
  9697. %bsd31[6] := 18
  9698. %bsd31[7] := 19
  9699. %bsd31[8] := 20
  9700. %bsd31[9] := 24
  9701. %bsd31[10] := 25
  9702. %bsd31[11] := 7
  9703. %bsd31[12] := 8
  9704. %bsd31[13] := 0
  9705. %bsd31[14] := 2
  9706. %bsd31[15] := 23
  9707. %bsd31[16] := 28
  9708. %bsd31[17] := 29
  9709. %bsd31[18] := 30
  9710. declare %u335j[4]
  9711. %u335j[0] := 7
  9712. %u335j[1] := 8
  9713. %u335j[2] := 0
  9714. %u335j[3] := 2
  9715. declare %h2jv2[11]
  9716. %h2jv2[0] := 12
  9717. %h2jv2[1] := 13
  9718. %h2jv2[2] := 14
  9719. %h2jv2[3] := 15
  9720. %h2jv2[4] := 16
  9721. %h2jv2[5] := 17
  9722. %h2jv2[6] := 18
  9723. %h2jv2[7] := 19
  9724. %h2jv2[8] := 20
  9725. %h2jv2[9] := 24
  9726. %h2jv2[10] := 25
  9727. declare %xdonk[48]
  9728. %xdonk[0] := 35
  9729. %xdonk[1] := 36
  9730. %xdonk[2] := 37
  9731. %xdonk[3] := 38
  9732. %xdonk[4] := 39
  9733. %xdonk[5] := 40
  9734. %xdonk[6] := 41
  9735. %xdonk[7] := 42
  9736. %xdonk[8] := 43
  9737. %xdonk[9] := 44
  9738. %xdonk[10] := 45
  9739. %xdonk[11] := 46
  9740. %xdonk[12] := 47
  9741. %xdonk[13] := 48
  9742. %xdonk[14] := 49
  9743. %xdonk[15] := 50
  9744. %xdonk[16] := 51
  9745. %xdonk[17] := 52
  9746. %xdonk[18] := 53
  9747. %xdonk[19] := 54
  9748. %xdonk[20] := 55
  9749. %xdonk[21] := 56
  9750. %xdonk[22] := 57
  9751. %xdonk[23] := 58
  9752. %xdonk[24] := 59
  9753. %xdonk[25] := 60
  9754. %xdonk[26] := 61
  9755. %xdonk[27] := 62
  9756. %xdonk[28] := 63
  9757. %xdonk[29] := 64
  9758. %xdonk[30] := 65
  9759. %xdonk[31] := 66
  9760. %xdonk[32] := 67
  9761. %xdonk[33] := 68
  9762. %xdonk[34] := 69
  9763. %xdonk[35] := 70
  9764. %xdonk[36] := 71
  9765. %xdonk[37] := 72
  9766. %xdonk[38] := 73
  9767. %xdonk[39] := 76
  9768. %xdonk[40] := 74
  9769. %xdonk[41] := 75
  9770. %xdonk[42] := 77
  9771. %xdonk[43] := 78
  9772. %xdonk[44] := 79
  9773. %xdonk[45] := 80
  9774. %xdonk[46] := 26
  9775. %xdonk[47] := 27
  9776. declare %arjqa[3]
  9777. %arjqa[0] := 9
  9778. %arjqa[1] := 10
  9779. %arjqa[2] := 11
  9780. declare %ulgib[2]
  9781. %ulgib[0] := 21
  9782. %ulgib[1] := 22
  9783. declare %xkzmj[4]
  9784. %xkzmj[0] := 31
  9785. %xkzmj[1] := 32
  9786. %xkzmj[2] := 33
  9787. %xkzmj[3] := 34
  9788. declare %zchu0[4]
  9789. %zchu0[0] := 23
  9790. %zchu0[1] := 28
  9791. %zchu0[2] := 29
  9792. %zchu0[3] := 30
  9793. declare %3xxkk[22]
  9794. $q3qgi := 0
  9795. $yjjle := 0
  9796. while ($yjjle<num_elements(%bsd31))
  9797. %3xxkk[$yjjle+$q3qgi] := %bsd31[$yjjle]
  9798. inc($yjjle)
  9799. end while
  9800. $q3qgi := $q3qgi+num_elements(%bsd31)
  9801. $yjjle := 0
  9802. while ($yjjle<num_elements(%arjqa))
  9803. %3xxkk[$yjjle+$q3qgi] := %arjqa[$yjjle]
  9804. inc($yjjle)
  9805. end while
  9806. declare %pv2ax[54]
  9807. $q3qgi := 0
  9808. $yjjle := 0
  9809. while ($yjjle<num_elements(%xdonk))
  9810. %pv2ax[$yjjle+$q3qgi] := %xdonk[$yjjle]
  9811. inc($yjjle)
  9812. end while
  9813. $q3qgi := $q3qgi+num_elements(%xdonk)
  9814. $yjjle := 0
  9815. while ($yjjle<num_elements(%ulgib))
  9816. %pv2ax[$yjjle+$q3qgi] := %ulgib[$yjjle]
  9817. inc($yjjle)
  9818. end while
  9819. $q3qgi := $q3qgi+num_elements(%ulgib)
  9820. $yjjle := 0
  9821. while ($yjjle<num_elements(%xkzmj))
  9822. %pv2ax[$yjjle+$q3qgi] := %xkzmj[$yjjle]
  9823. inc($yjjle)
  9824. end while
  9825. end if
  9826. declare ui_label $5rsow(1, 1)
  9827. set_control_par_str(get_ui_id($5rsow),$CONTROL_PAR_TEXT,"")
  9828. set_control_par_str(get_ui_id($5rsow),$CONTROL_PAR_PICTURE,"GE_PERFORM_ANIMATION")
  9829. %xwg5s[1950] := get_ui_id($5rsow)
  9830. %cqg2m[195] := 512
  9831. declare ui_label $xhutf(1, 2)
  9832. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"")
  9833. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_PICTURE,"GE_MODAL_DLG_BG")
  9834. declare ui_button $3pvid
  9835. set_control_par_str(get_ui_id($3pvid),$CONTROL_PAR_TEXT,"")
  9836. set_control_par_str(get_ui_id($3pvid),$CONTROL_PAR_PICTURE,"GE_MODAL_DLG_CLOSE")
  9837. if ($3pvid=1)
  9838. set_control_par(get_ui_id($xhutf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  9839. set_control_par(get_ui_id($3pvid),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  9840. else
  9841. set_control_par(get_ui_id($xhutf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  9842. set_control_par(get_ui_id($3pvid),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  9843. end if
  9844. declare %udfc2[2] := (get_ui_id($xhutf), get_ui_id($3pvid))
  9845. $g5k3r := 0
  9846. while ($g5k3r<num_elements(%udfc2))
  9847. %xwg5s[1310+$g5k3r] := %udfc2[$g5k3r]
  9848. %cqg2m[131] := 0
  9849. inc($g5k3r)
  9850. end while
  9851. declare $wvrnj
  9852. declare $nzpv1
  9853. load_array(!automation_strings,2)
  9854. load_array(!help_strings,2)
  9855. load_array(%_GUI_state,2)
  9856. $fg4rw := 0
  9857. while ($fg4rw<200)
  9858. $g5k3r := 0
  9859. while ($g5k3r<10)
  9860. $wvrnj := %xwg5s[10*$fg4rw+$g5k3r]
  9861. if ($wvrnj>0)
  9862. $nzpv1 := 0
  9863. while ($nzpv1<19)
  9864. if (not (%x4loa[$nzpv1]=$CONTROL_PAR_AUTOMATION_ID and (%_GUI_state[190*$fg4rw+(19*$g5k3r)+$nzpv1]=0 or (%_GUI_state[190*$fg4rw+(19*$g5k3r)+$nzpv1]>=206))))
  9865. set_control_par($wvrnj,%x4loa[$nzpv1],%_GUI_state[190*$fg4rw+(19*$g5k3r)+$nzpv1])
  9866. end if
  9867. inc($nzpv1)
  9868. end while
  9869. if (%_GUI_state[190*$fg4rw+(19*$g5k3r)+6]>0)
  9870. if (%_GUI_state[190*$fg4rw+(19*$g5k3r)+6]<206)
  9871. set_control_par_str($wvrnj,$CONTROL_PAR_AUTOMATION_NAME,!automation_strings[%_GUI_state[190*$fg4rw+(19*$g5k3r)+6]])
  9872. end if
  9873. set_control_par_str($wvrnj,$CONTROL_PAR_HELP,!help_strings[%_GUI_state[190*$fg4rw+(19*$g5k3r)+6]])
  9874. if (search(%41o3s,$wvrnj) # -1)
  9875. set_control_par_str(%xwg5s[10*$fg4rw+$g5k3r+4],$CONTROL_PAR_HELP,!help_strings[%_GUI_state[190*$fg4rw+(19*$g5k3r)+6]])
  9876. end if
  9877. end if
  9878. set_control_par($wvrnj,$CONTROL_PAR_DISABLE_TEXT_SHIFTING,1)
  9879. end if
  9880. inc($g5k3r)
  9881. end while
  9882. inc($fg4rw)
  9883. end while
  9884. $fg4rw := 0
  9885. while ($fg4rw<$upapg)
  9886. set_control_par_str(%n34di[$fg4rw],$CONTROL_PAR_HELP,!help_strings[211])
  9887. inc($fg4rw)
  9888. end while
  9889. $fg4rw := 0
  9890. while ($fg4rw<200)
  9891. $g5k3r := 0
  9892. while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
  9893. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  9894. inc($g5k3r)
  9895. end while
  9896. inc($fg4rw)
  9897. end while
  9898. $fg4rw := 0
  9899. while ($fg4rw<=80)
  9900. if ($fg4rw # 4 and ($fg4rw # 5))
  9901. set_menu_item_visibility(%n34di[$fg4rw],search(%bnygy,23),0)
  9902. end if
  9903. inc($fg4rw)
  9904. end while
  9905. $fg4rw := 0
  9906. while ($fg4rw<128)
  9907. ~bsfi3 := 0.0078125*int_to_real($fg4rw)
  9908. ?xpxzm[$fg4rw] := ~bsfi3
  9909. inc($fg4rw)
  9910. end while
  9911. $fg4rw := 0
  9912. while ($fg4rw<128)
  9913. ?xpxzm[$fg4rw+128] := 1.0+(int_to_real($fg4rw)*0.7/128.0)
  9914. inc($fg4rw)
  9915. end while
  9916. declare %c3hli[6]
  9917. declare %jkbor[24] := (-1)
  9918. %c3hli[0] := get_ui_id($1fo5x)
  9919. %c3hli[1] := get_ui_id($z1x5e)
  9920. %c3hli[2] := get_ui_id($cvjhr)
  9921. %c3hli[3] := get_ui_id($fpvgj)
  9922. %c3hli[4] := get_ui_id($zi2jx)
  9923. %c3hli[5] := get_ui_id($gxopj)
  9924. %jkbor[4] := get_ui_id($2zugt)
  9925. %jkbor[5] := get_ui_id($2zugt)
  9926. %jkbor[6] := get_ui_id($yexen)
  9927. %jkbor[7] := get_ui_id($v1jgb)
  9928. set_skin_offset(670*($0ib2k-(-sh_right(5-$0ib2k,31)*($0ib2k-5))))
  9929. declare $a4np1
  9930. declare $xg4xz
  9931. declare $rs53j
  9932. declare $kzcmg
  9933. declare $eoj1p
  9934. declare $22rrq
  9935. declare $volav
  9936. declare $rlfxd
  9937. declare $0x4nk
  9938. declare $swdze
  9939. declare $35mmm
  9940. declare $z5xav
  9941. declare $gysvc
  9942. declare $knxce
  9943. declare $taxye
  9944. declare $n025a
  9945. declare $uuj1q
  9946. declare $xjzii
  9947. declare $y0aji
  9948. declare $qohq4
  9949. declare $duehg
  9950. declare $q5vtt
  9951. declare $wuhc2
  9952. declare $33eug
  9953. declare $kil43
  9954. declare $ebpbv
  9955. declare $a1lqd
  9956. declare ~ndqvl
  9957. declare $z1wbi
  9958. declare ~4pkcz
  9959. declare $vxhwf
  9960. declare ~wn00q
  9961. declare $kkmz2
  9962. declare ~frgrz
  9963. declare $hl2ji
  9964. declare $y1ewg
  9965. declare $fh05a
  9966. declare $2exws
  9967. declare $mboix
  9968. declare $ey2qd
  9969. declare $1psz5
  9970. declare $1il5i
  9971. declare $dwl3e
  9972. declare $zw1a3
  9973. declare $xqxc4
  9974. declare $xtwkb
  9975. declare $mtob1
  9976. declare $z5fg2
  9977. declare $ppjmu
  9978. declare $ysvfj
  9979. declare $t3xjk
  9980. declare $wxrdy
  9981. declare $3ivdg
  9982. declare $bpxw3
  9983. declare $mlfej
  9984. declare $tcueq
  9985. declare $0us0d
  9986. declare $wibgr
  9987. declare $vzboi
  9988. declare %fwuoz[7]
  9989. declare $3uagi
  9990. declare %tjh23[20]
  9991. declare $nz3a0
  9992. declare $ecwiv
  9993. declare $drez3
  9994. declare $hu1za
  9995. declare $412pd
  9996. declare $pi54y
  9997. declare $irlfd
  9998. declare $owq4s
  9999. declare $n0kpw
  10000. declare $da5tg
  10001. declare $lwvso
  10002. declare $3wsjr
  10003. declare $v02mu
  10004. declare $ohjfi
  10005. declare $byqm5
  10006. declare $lzf3q
  10007. declare $xwusl
  10008. declare $05pba
  10009. declare $wry2j
  10010. declare $cbdm5
  10011. declare $utjil
  10012. declare $d3vlq
  10013. declare $ear3d
  10014. declare $nkklz
  10015. declare $od12p
  10016. declare $rqqww
  10017. declare $x202u
  10018. end on
  10019. function STEPPER__reposition_x_value_indicators
  10020. ~z3izd := int_to_real(get_control_par(get_ui_id(%qysah),$CONTROL_PAR_WIDTH)-6)/int_to_real($ilpk2)
  10021. $y3mgr := 0
  10022. while ($y3mgr<32)
  10023. if ($y3mgr<$ilpk2)
  10024. set_control_par(%krazg[$y3mgr],$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_X)+3+real_to_int(int_to_real($y3mgr)*~z3izd)+1)
  10025. set_control_par(%krazg[$y3mgr],$CONTROL_PAR_WIDTH,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_X)+3+real_to_int(int_to_real($y3mgr+1)*~z3izd)-get_control_par(%krazg[$y3mgr],$CONTROL_PAR_POS_X)-1-1)
  10026. set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HEIGHT,1)
  10027. else
  10028. set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  10029. end if
  10030. inc($y3mgr)
  10031. end while
  10032. end function
  10033. function STEPPER__update_value_indicators
  10034. $y3mgr := 0
  10035. while ($y3mgr<32)
  10036. if ($y3mgr<$ilpk2)
  10037. $dyt1q := get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_Y)+3+((%t40az[$y3mgr]-1000)*(get_control_par(get_ui_id(%qysah),$CONTROL_PAR_HEIGHT)-6-1-0)/-1000)
  10038. if (get_control_par(%krazg[$y3mgr],$CONTROL_PAR_POS_Y) # $dyt1q)
  10039. set_control_par(%krazg[$y3mgr],$CONTROL_PAR_POS_Y,$dyt1q)
  10040. end if
  10041. set_control_par(%krazg[$y3mgr],$CONTROL_PAR_PICTURE_STATE,-sh_right(%qysah[$y3mgr]-%t40az[$y3mgr],31))
  10042. set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  10043. end if
  10044. inc($y3mgr)
  10045. end while
  10046. end function
  10047. function update_morph_stepper
  10048. $y3mgr := 0
  10049. while ($y3mgr<32)
  10050. %t40az[$y3mgr] := (%ppvim[$jiutx]-0)*(%bswku[$y3mgr]-%lfbyb[$y3mgr])/1000+%lfbyb[$y3mgr]
  10051. inc($y3mgr)
  10052. end while
  10053. if (get_control_par(get_ui_id(%qysah),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
  10054. call STEPPER__update_value_indicators
  10055. end if
  10056. end function
  10057. function stepper__update_pos_ind
  10058. ~z3izd := int_to_real(get_control_par(get_ui_id(%qysah),$CONTROL_PAR_WIDTH)-6)/int_to_real($ilpk2)
  10059. set_control_par(get_ui_id($t4lmn),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_X)+3+real_to_int(int_to_real($zgcke mod $ilpk2)*~z3izd))
  10060. set_control_par(get_ui_id($t4lmn),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_Y)+3)
  10061. set_control_par(get_ui_id($t4lmn),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_POS_X)+2+real_to_int(int_to_real($zgcke mod $ilpk2+1)*~z3izd)-get_control_par(get_ui_id($t4lmn),$CONTROL_PAR_POS_X))
  10062. set_control_par(get_ui_id($t4lmn),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(%qysah),$CONTROL_PAR_HEIGHT)-6)
  10063. end function
  10064. function STEPPER__update_ui
  10065. select ($i3fbq)
  10066. case 0
  10067. $y3mgr := 0
  10068. while ($y3mgr<32)
  10069. %qysah[$y3mgr] := %lfbyb[$y3mgr]
  10070. inc($y3mgr)
  10071. end while
  10072. case 1
  10073. $y3mgr := 0
  10074. while ($y3mgr<32)
  10075. %qysah[$y3mgr] := %bswku[$y3mgr]
  10076. inc($y3mgr)
  10077. end while
  10078. end select
  10079. set_table_steps_shown(%qysah,$ilpk2)
  10080. call STEPPER__reposition_x_value_indicators
  10081. call update_morph_stepper
  10082. call stepper__update_pos_ind
  10083. end function
  10084. function STEPPER__shift_tables
  10085. $fg4rw := 1
  10086. while ($fg4rw<=($ilpk2+$hokt3))
  10087. $dyt1q := %lfbyb[$ilpk2-1]
  10088. $r0pwv := %bswku[$ilpk2-1]
  10089. $y3mgr := 0
  10090. while ($y3mgr<=($ilpk2-2))
  10091. %lfbyb[$ilpk2-1-$y3mgr] := %lfbyb[$ilpk2-2-$y3mgr]
  10092. %bswku[$ilpk2-1-$y3mgr] := %bswku[$ilpk2-2-$y3mgr]
  10093. inc($y3mgr)
  10094. end while
  10095. %lfbyb[0] := $dyt1q
  10096. %bswku[0] := $r0pwv
  10097. inc($fg4rw)
  10098. end while
  10099. call STEPPER__update_ui
  10100. end function
  10101. function BRW__apply_mask_to_search_pool_for_sel_file_type
  10102. $lz0yu := 0
  10103. while ($lz0yu<%BRW__num_preset_in_search_pool_array[$zor2m])
  10104. %3owef[500*$zor2m+$lz0yu] := -1
  10105. inc($lz0yu)
  10106. end while
  10107. %k4yha[$zor2m] := 0
  10108. %kt24s[$zor2m] := -1
  10109. $lz0yu := 0
  10110. while ($lz0yu<%BRW__num_preset_in_search_pool_array[$zor2m])
  10111. $dyt1q := 1
  10112. $lpg20 := 0
  10113. while ($lpg20<2)
  10114. if (not (%iz114[4*$zor2m+(2*$lpg20)] .and. %_BRW__search_pool_array[1000*$zor2m+(2*$lz0yu)+$lpg20]=%iz114[4*$zor2m+(2*$lpg20)]) or not (%iz114[4*$zor2m+(2*$lpg20)+1] .and. .not. %_BRW__search_pool_array[1000*$zor2m+(2*$lz0yu)+$lpg20]=%iz114[4*$zor2m+(2*$lpg20)+1]))
  10115. $dyt1q := 0
  10116. $lpg20 := 2
  10117. end if
  10118. inc($lpg20)
  10119. end while
  10120. if ($dyt1q=1 and (%_BRW__user_fav_array[500*$zor2m+$lz0yu]=%31af0[$zor2m] or (%31af0[$zor2m]=0)))
  10121. %3owef[500*$zor2m+%k4yha[$zor2m]] := $lz0yu
  10122. if ($lz0yu=%jj5qi[$zor2m])
  10123. %kt24s[$zor2m] := %k4yha[$zor2m]
  10124. end if
  10125. %k4yha[$zor2m] := %k4yha[$zor2m]+1
  10126. end if
  10127. inc($lz0yu)
  10128. end while
  10129. %xeyhi[$zor2m] := 1
  10130. end function
  10131. function _ARP__update_delimiter
  10132. $5sroo := 0
  10133. while ($5sroo<num_elements(%br0tn))
  10134. if (search(%wwz2v,%br0tn[$5sroo]) # -1)
  10135. %br0tn[$5sroo] := %wwz2v[$0erls]
  10136. end if
  10137. inc($5sroo)
  10138. end while
  10139. end function
  10140. function ARP__update_notes
  10141. select ($0erls)
  10142. case 0
  10143. sort(%br0tn,0)
  10144. case 1
  10145. sort(%br0tn,1)
  10146. case 2
  10147. sort(%br0tn,0)
  10148. case 3 to 4
  10149. $5sroo := 0
  10150. while ($5sroo<=24)
  10151. if (%br0tn[$5sroo]=%wwz2v[$0erls])
  10152. $ethxj := $5sroo
  10153. while ($ethxj<24)
  10154. %br0tn[$ethxj] := %br0tn[$ethxj+1]
  10155. inc($ethxj)
  10156. end while
  10157. end if
  10158. inc($5sroo)
  10159. end while
  10160. case 5
  10161. sort(%br0tn,0)
  10162. case 6
  10163. sort(%br0tn,0)
  10164. case 7 to 9
  10165. sort(%br0tn,1)
  10166. end select
  10167. $gcbnc := search(%br0tn,%wwz2v[$0erls])
  10168. select ($0erls)
  10169. case 5
  10170. $gcbnc := $gcbnc-(-sh_right(1-$gcbnc,31)*($gcbnc-1))
  10171. case 6
  10172. $gcbnc := $gcbnc-(-sh_right(2-$gcbnc,31)*($gcbnc-2))
  10173. case 7
  10174. $gcbnc := $gcbnc-(-sh_right(1-$gcbnc,31)*($gcbnc-1))
  10175. case 8
  10176. $gcbnc := $gcbnc-(-sh_right(2-$gcbnc,31)*($gcbnc-2))
  10177. case 9
  10178. $gcbnc := $gcbnc-(-sh_right(3-$gcbnc,31)*($gcbnc-3))
  10179. end select
  10180. end function
  10181. function ARP__on_mode_changed
  10182. call _ARP__update_delimiter
  10183. $gbgom := 1
  10184. call ARP__update_notes
  10185. $h2jke := $0erls
  10186. set_control_par_str(get_ui_id($h2jke),$CONTROL_PAR_LABEL,get_menu_item_str(get_ui_id($0erls),$0erls))
  10187. end function
  10188. function update_main_snapshot_name_display
  10189. if ($cm312=1)
  10190. set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,"User Snapshot")
  10191. else
  10192. set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,!_BRW__preset_names[1000+%jj5qi[2]])
  10193. end if
  10194. end function
  10195. function update_s_source_name_display
  10196. if ($hdmk1=364)
  10197. if (get_sample_length(%NI_USER_ZONE_IDS[1]) # 0)
  10198. if ($x1spm=0)
  10199. set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"User: " & get_sample(%NI_USER_ZONE_IDS[1],$NI_FILE_NAME))
  10200. else
  10201. set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"Missing: " & get_sample(%NI_USER_ZONE_IDS[1],$NI_FILE_NAME))
  10202. end if
  10203. else
  10204. if (-sh_right(1-$4l4u3,31)=1)
  10205. set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"Missing: " & @bnt5b)
  10206. else
  10207. set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"No user sample present")
  10208. end if
  10209. end if
  10210. set_control_par(get_ui_id($anchr),$CONTROL_PAR_PICTURE_STATE,100)
  10211. else
  10212. set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_TEXT,"")
  10213. set_control_par(get_ui_id($anchr),$CONTROL_PAR_PICTURE_STATE,%BRW__grp_remap[%jj5qi[1]])
  10214. end if
  10215. end function
  10216. function set_mod_knob_group_engine_par_for_gl_m_id
  10217. if (%q4mzh[$gpzoi] # -1)
  10218. $y1xwz := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)
  10219. $y1xwz := $y1xwz*(1+(sh_right(%sbnwu[$gpzoi]-$y1xwz,31) .or. sh_right($y1xwz-%dwdw3[$gpzoi],31)))-(%dwdw3[$gpzoi]*sh_right($y1xwz-%dwdw3[$gpzoi],31))-(%sbnwu[$gpzoi]*sh_right(%sbnwu[$gpzoi]-$y1xwz,31))
  10220. if (%fogcg[$gpzoi]=1)
  10221. $r0pwv := search(%zjgrf,%eujmz[$gpzoi])
  10222. if (-sh_right(-1-%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],31)=1)
  10223. if (%sxlyt[8*$r0pwv+%hpc0e[$gpzoi]]=1)
  10224. $dyt1q := abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]]-$y1xwz)*15/1000000
  10225. if (get_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # %ry4pp[$dyt1q])
  10226. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],%ry4pp[$dyt1q],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10227. end if
  10228. if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # (abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]]-(%tkyhf[$dyt1q]-1))*1000000/12))
  10229. set_engine_par(%q4mzh[$gpzoi],abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]]-(%tkyhf[$dyt1q]-1))*1000000/12,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10230. end if
  10231. else
  10232. if (get_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $NI_SYNC_UNIT_ABS)
  10233. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],$NI_SYNC_UNIT_ABS,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10234. end if
  10235. if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
  10236. set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10237. end if
  10238. end if
  10239. else
  10240. if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
  10241. set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10242. end if
  10243. end if
  10244. else
  10245. if (%vc4gu[$gpzoi]=100000)
  10246. if (get_engine_par(%q4mzh[$gpzoi],$51oxm+100,%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
  10247. set_engine_par(%q4mzh[$gpzoi],$y1xwz,$51oxm+100,%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10248. end if
  10249. else
  10250. if (%vc4gu[$gpzoi]=100001)
  10251. if (%jeswc[$gpzoi]=231)
  10252. set_engine_par($MOD_TARGET_INVERT_SOURCE,1+sh_right(0-(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)),31),$hdmk1,%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10253. set_engine_par(%q4mzh[$gpzoi],abs(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)),$hdmk1,%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10254. else
  10255. if (get_engine_par(%q4mzh[$gpzoi],$hdmk1,%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
  10256. set_engine_par(%q4mzh[$gpzoi],$y1xwz,$hdmk1,%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10257. end if
  10258. end if
  10259. else
  10260. if (%5zak5[$gpzoi]=1)
  10261. if (%q4mzh[$gpzoi]=$ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
  10262. $y1xwz := $y1xwz/1000
  10263. $r0pwv := real_to_int(450000.0*((pow(0.997,int_to_real(1000-$y1xwz))-1.0)/(pow(0.997,int_to_real(1000))-1.0)))
  10264. if (get_engine_par($ENGINE_PAR_SEND_EFFECT_DRY_LEVEL,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $r0pwv)
  10265. set_engine_par($ENGINE_PAR_SEND_EFFECT_DRY_LEVEL,$r0pwv,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10266. end if
  10267. $r0pwv := real_to_int(450000.0*((pow(0.997,int_to_real($y1xwz))-1.0)/(pow(0.997,int_to_real(1000))-1.0)))
  10268. if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $r0pwv)
  10269. set_engine_par(%q4mzh[$gpzoi],$r0pwv,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10270. end if
  10271. else
  10272. if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
  10273. set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10274. end if
  10275. end if
  10276. else
  10277. if (%jeswc[$gpzoi]=1003 or (%jeswc[$gpzoi]=1009) or (%jeswc[$gpzoi]=1000) or (%jeswc[$gpzoi]=1006))
  10278. if (%jeswc[$gpzoi]=1000 or (%jeswc[$gpzoi]=1006))
  10279. if (get_engine_par($ENGINE_PAR_SEND_EFFECT_BYPASS,-1,0,0)=1)
  10280. set_engine_par(%q4mzh[$gpzoi],0,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10281. else
  10282. set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10283. end if
  10284. end if
  10285. if (%jeswc[$gpzoi]=1003 or (%jeswc[$gpzoi]=1009))
  10286. if (get_engine_par($ENGINE_PAR_SEND_EFFECT_BYPASS,-1,1,0)=1)
  10287. set_engine_par(%q4mzh[$gpzoi],0,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10288. else
  10289. set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10290. end if
  10291. end if
  10292. else
  10293. if (get_engine_par(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) # $y1xwz)
  10294. set_engine_par(%q4mzh[$gpzoi],$y1xwz,%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi])
  10295. end if
  10296. end if
  10297. end if
  10298. end if
  10299. end if
  10300. end if
  10301. end if
  10302. end function
  10303. function FX__set_SMPL_filter_parameters
  10304. $dyt1q := search(%mdgl1,$2qtv2)
  10305. %q4mzh[31] := %edmyi[%wl2qc[$dyt1q]]
  10306. $y1xwz := $ufbsw+($3s02f*%ppvim[$3rcax]/1000)
  10307. $y1xwz := $y1xwz*(1+(sh_right(1000000-$y1xwz,31) .or. sh_right($y1xwz-0,31)))-0-(1000000*sh_right(1000000-$y1xwz,31))
  10308. set_engine_par(%q4mzh[31],$y1xwz,$hdmk1,0,-1)
  10309. $gpzoi := 34
  10310. call set_mod_knob_group_engine_par_for_gl_m_id
  10311. set_control_par_str(get_ui_id($spuzv),$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_0")
  10312. set_control_par(get_ui_id($spuzv),$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%q4mzh[31])+106)
  10313. set_control_par_str(get_ui_id($spuzv),$CONTROL_PAR_TEXT,"")
  10314. if (%oie55[$dyt1q]>1)
  10315. %q4mzh[32] := %edmyi[%wl2qc[$dyt1q]+1]
  10316. set_control_par_str(get_ui_id($g5hlh),$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_0")
  10317. set_control_par(get_ui_id($g5hlh),$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%q4mzh[32])+106)
  10318. set_control_par_str(get_ui_id($g5hlh),$CONTROL_PAR_TEXT,"")
  10319. $y1xwz := $maq5o+($410y5*%ppvim[$5qrmj]/1000)
  10320. $y1xwz := $y1xwz*(1+(sh_right(1000000-$y1xwz,31) .or. sh_right($y1xwz-0,31)))-0-(1000000*sh_right(1000000-$y1xwz,31))
  10321. set_engine_par(%q4mzh[32],$y1xwz,$hdmk1,0,-1)
  10322. else
  10323. %q4mzh[32] := -1
  10324. end if
  10325. if (%oie55[$dyt1q]>2)
  10326. %q4mzh[33] := %edmyi[%wl2qc[$dyt1q]+2]
  10327. set_control_par_str(get_ui_id($w0i5l),$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_0")
  10328. set_control_par(get_ui_id($w0i5l),$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%q4mzh[33])+106)
  10329. set_control_par_str(get_ui_id($w0i5l),$CONTROL_PAR_TEXT,"")
  10330. $y1xwz := $lqoqt+($begpw*%ppvim[$f0ljx]/1000)
  10331. $y1xwz := $y1xwz*(1+(sh_right(1000000-$y1xwz,31) .or. sh_right($y1xwz-0,31)))-0-(1000000*sh_right(1000000-$y1xwz,31))
  10332. set_engine_par(%q4mzh[33],$y1xwz,$hdmk1,0,-1)
  10333. else
  10334. %q4mzh[33] := -1
  10335. end if
  10336. set_engine_par($ENGINE_PAR_EFFECT_BYPASS,($lk05f+1) mod 2,$hdmk1,0,-1)
  10337. end function
  10338. function FX__set_SMPL_filter_type
  10339. if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$hdmk1,0,-1) # $2qtv2)
  10340. $m2etg := 1
  10341. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$2qtv2,$hdmk1,0,-1)
  10342. while ($m2etg=1)
  10343. wait(3000)
  10344. end while
  10345. end if
  10346. call FX__set_SMPL_filter_parameters
  10347. end function
  10348. function FX__update_smpl_filter_ui
  10349. if ($0ib2k=2)
  10350. $dyt1q := search(%mdgl1,$2qtv2)
  10351. $g5k3r := 0
  10352. while (%xwg5s[320+$g5k3r]>0 and ($g5k3r<10))
  10353. if (-sh_right(1-%oie55[$dyt1q],31)=0)
  10354. set_control_par(%xwg5s[320+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  10355. else
  10356. set_control_par(%xwg5s[320+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[6080+(19*$g5k3r)+5])
  10357. end if
  10358. inc($g5k3r)
  10359. end while
  10360. $g5k3r := 0
  10361. while (%xwg5s[330+$g5k3r]>0 and ($g5k3r<10))
  10362. if (-sh_right(2-%oie55[$dyt1q],31)=0)
  10363. set_control_par(%xwg5s[330+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  10364. else
  10365. set_control_par(%xwg5s[330+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[6270+(19*$g5k3r)+5])
  10366. end if
  10367. inc($g5k3r)
  10368. end while
  10369. end if
  10370. end function
  10371. function set_norm_knob_group_engine_par_for_gl_nk_ep_id
  10372. if (%qpgwq[$4djds]=100000)
  10373. set_engine_par(%i5z0e[$4djds],get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE),$51oxm+100,%bjbtn[$4djds],%c40o1[$4djds])
  10374. else
  10375. if (%qpgwq[$4djds]=100001)
  10376. set_engine_par(%i5z0e[$4djds],get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE),$hdmk1,%bjbtn[$4djds],%c40o1[$4djds])
  10377. else
  10378. set_engine_par(%i5z0e[$4djds],get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE),%qpgwq[$4djds],%bjbtn[$4djds],%c40o1[$4djds])
  10379. end if
  10380. end if
  10381. end function
  10382. function set_all_engine_par_norm_knobs
  10383. $4djds := 0
  10384. while ($4djds<26)
  10385. call set_norm_knob_group_engine_par_for_gl_nk_ep_id
  10386. inc($4djds)
  10387. end while
  10388. end function
  10389. function ARP__update_seq_tables
  10390. set_table_steps_shown(%pyeoz,$k5z4u)
  10391. set_table_steps_shown(%0lu1d,$k5z4u)
  10392. $dyt1q := (get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_WIDTH)-6)/$k5z4u
  10393. $tp4oa := $tp4oa-(-sh_right($k5z4u-1-$tp4oa,31)*($tp4oa-($k5z4u-1)))
  10394. set_control_par(get_ui_id($vjofa),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_POS_X)+3+($tp4oa*$dyt1q))
  10395. set_control_par(get_ui_id($vjofa),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%0lu1d),$CONTROL_PAR_POS_Y)+3)
  10396. set_control_par(get_ui_id($vjofa),$CONTROL_PAR_WIDTH,$dyt1q-1)
  10397. set_control_par(get_ui_id($vjofa),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_HEIGHT)-6)
  10398. end function
  10399. function ARP__update_table_display
  10400. set_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_HIDE,-sh_right(abs($ivqya-1)-1,31)*$HIDE_WHOLE_CONTROL+((.not. -sh_right(abs($ivqya-1)-1,31) .and. 1)*$HIDE_PART_BG))
  10401. set_control_par(get_ui_id(%0lu1d),$CONTROL_PAR_HIDE,-sh_right(abs($ivqya-0)-1,31)*$HIDE_WHOLE_CONTROL+((.not. -sh_right(abs($ivqya-0)-1,31) .and. 1)*$HIDE_PART_BG))
  10402. call ARP__update_seq_tables
  10403. end function
  10404. function ARP__update_filter_src_menus
  10405. $jdgl1 := 0
  10406. while ($jdgl1<4)
  10407. $dyt1q := %n34di[%xkzmj[$jdgl1]]
  10408. if ($ruhe4=1 and ($mcp2m=1))
  10409. set_menu_item_str($dyt1q,search(%bnygy,10),"VEL Arp Velocity")
  10410. else
  10411. set_menu_item_str($dyt1q,search(%bnygy,10),"VEL Mono Velocity")
  10412. end if
  10413. inc($jdgl1)
  10414. end while
  10415. end function
  10416. function ARP__update_ui
  10417. call ARP__update_table_display
  10418. call ARP__update_filter_src_menus
  10419. end function
  10420. function ARP__update_step_dur_display
  10421. set_control_par_str(get_ui_id($gpcbc),$CONTROL_PAR_TEXT,!qniir[(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))])
  10422. end function
  10423. function update_s_wf_start_indic_label_position
  10424. if (get_control_par(get_ui_id($rgqvn),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
  10425. $dyt1q := %std_smp_l_grp[$hdmk1]*(get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WIDTH)-4)/(get_sample_length($a5fyp)/1000)
  10426. if ($0ib2k=2)
  10427. set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X)+2)
  10428. set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y)+get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HEIGHT)-3)
  10429. set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_WIDTH,$dyt1q)
  10430. set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  10431. else
  10432. if (get_control_par(get_ui_id($k5o2p),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
  10433. set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  10434. end if
  10435. end if
  10436. $r0pwv := $dgu14+($5l3um*%ppvim[$f4o1c]/1000)
  10437. set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X)+2+(($r0pwv*(1+(sh_right(10000-$r0pwv,31) .or. sh_right($r0pwv-0,31)))-0-(10000*sh_right(10000-$r0pwv,31)))*$dyt1q/10000))
  10438. set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y)+2)
  10439. set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_WIDTH,5)
  10440. set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HEIGHT)-5)
  10441. end if
  10442. end function
  10443. function update_s_root_key_user_visibility
  10444. if ($0ib2k=2 and ($hdmk1=364) and (get_sample_length(%NI_USER_ZONE_IDS[1]) # 0) and ($x1spm=0))
  10445. set_control_par(get_ui_id($v3y5j),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  10446. else
  10447. set_control_par(get_ui_id($v3y5j),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  10448. end if
  10449. set_control_par(get_ui_id($ozbon),$CONTROL_PAR_HIDE,get_control_par(get_ui_id($v3y5j),$CONTROL_PAR_HIDE))
  10450. set_control_par(get_ui_id($uceyz),$CONTROL_PAR_HIDE,get_control_par(get_ui_id($v3y5j),$CONTROL_PAR_HIDE))
  10451. end function
  10452. function update_s_xy_for_user_sample
  10453. if ($0ib2k=2 or ($0ib2k=0))
  10454. if ((get_sample_length(%NI_USER_ZONE_IDS[1])=0 or ($x1spm=1)) and ($hdmk1=364))
  10455. set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  10456. set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  10457. set_control_par_str(get_ui_id(?3lzme),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & ($0ib2k/2+($0ib2k/2*$mcp2m)) & ($x1spm*3))
  10458. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  10459. $yhwrb := 1
  10460. else
  10461. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
  10462. set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  10463. end if
  10464. end if
  10465. call update_s_root_key_user_visibility
  10466. end function
  10467. function update_ARP_and_S_WF_area
  10468. if ($0ib2k=2)
  10469. $fg4rw := 0
  10470. while ($fg4rw<200)
  10471. $y0aji := 0
  10472. while ($y0aji<=31)
  10473. if (sh_right(2048,$y0aji) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$y0aji) .and. 1=1))
  10474. $g5k3r := 0
  10475. while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
  10476. if ($mcp2m=0)
  10477. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  10478. else
  10479. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
  10480. end if
  10481. inc($g5k3r)
  10482. end while
  10483. end if
  10484. inc($y0aji)
  10485. end while
  10486. inc($fg4rw)
  10487. end while
  10488. $q5vtt := 116+(611*$mcp2m)
  10489. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X,$q5vtt-2)
  10490. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y,130)
  10491. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WIDTH,970-($q5vtt-2))
  10492. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HEIGHT,132)
  10493. set_control_par(get_ui_id($fi22y),$CONTROL_PAR_POS_X,$q5vtt)
  10494. set_control_par(get_ui_id($fi22y),$CONTROL_PAR_POS_Y,130)
  10495. set_control_par(get_ui_id($fi22y),$CONTROL_PAR_WIDTH,970-$q5vtt)
  10496. set_control_par(get_ui_id($fi22y),$CONTROL_PAR_HEIGHT,132)
  10497. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_POS_X,$q5vtt)
  10498. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_POS_Y,130)
  10499. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_WIDTH,968-$q5vtt)
  10500. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_HEIGHT,132)
  10501. set_control_par_str(get_ui_id($rgqvn),$CONTROL_PAR_PICTURE,"GE_START_POINT_IND_SMPL_0")
  10502. if ($mcp2m=1)
  10503. call ARP__update_ui
  10504. call ARP__update_step_dur_display
  10505. end if
  10506. call update_s_wf_start_indic_label_position
  10507. call update_s_xy_for_user_sample
  10508. end if
  10509. end function
  10510. function on_selected_std_group_changed
  10511. $cm312 := 1
  10512. call update_main_snapshot_name_display
  10513. call update_s_xy_for_user_sample
  10514. call update_s_source_name_display
  10515. call FX__set_SMPL_filter_type
  10516. call FX__update_smpl_filter_ui
  10517. call set_all_engine_par_norm_knobs
  10518. set_control_par(get_ui_id($brjbw),$CONTROL_PAR_HIDE,(%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31))*$HIDE_PART_NOTHING+((.not. (%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31)) .and. 1)*$HIDE_WHOLE_CONTROL))
  10519. if ($ruhe4=0 or ($mcp2m=0))
  10520. $mcp2m := (%is_mono_src[$hdmk1]+1) mod 2
  10521. call update_ARP_and_S_WF_area
  10522. end if
  10523. $dyo2q := (%is_mono_src[$hdmk1]+1) mod 2
  10524. end function
  10525. function update_g_source_name_display
  10526. if ($51oxm=263)
  10527. if (get_sample_length(%NI_USER_ZONE_IDS[0]) # 0)
  10528. if ($lxku3=0)
  10529. set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"User: " & get_sample(%NI_USER_ZONE_IDS[0],$NI_FILE_NAME))
  10530. else
  10531. set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"Missing: " & get_sample(%NI_USER_ZONE_IDS[0],$NI_FILE_NAME))
  10532. end if
  10533. else
  10534. if (-sh_right(1-$4l4u3,31)=1)
  10535. set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"Missing: " & @vzouq)
  10536. else
  10537. set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"No user sample present")
  10538. end if
  10539. end if
  10540. set_control_par(get_ui_id($uekic),$CONTROL_PAR_PICTURE_STATE,%BRW__grp_remap[%jj5qi[0]+100]-100)
  10541. else
  10542. set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_TEXT,"")
  10543. set_control_par(get_ui_id($uekic),$CONTROL_PAR_PICTURE_STATE,%BRW__grp_remap[%jj5qi[0]+100]-100)
  10544. end if
  10545. end function
  10546. function update_preset_name_displays
  10547. %jj5qi[0] := search(%BRW__grp_remap,$51oxm+100)-100
  10548. %jj5qi[1] := search(%BRW__grp_remap,$hdmk1)
  10549. $fg4rw := 0
  10550. while ($fg4rw<=1)
  10551. if (%xeyhi[$fg4rw]=0)
  10552. %kt24s[$fg4rw] := %jj5qi[$fg4rw]
  10553. else
  10554. %kt24s[$fg4rw] := -1
  10555. $lz0yu := 0
  10556. while ($lz0yu<%k4yha[$fg4rw])
  10557. if (%3owef[500*$fg4rw+$lz0yu]=%jj5qi[$fg4rw])
  10558. %kt24s[$fg4rw] := $lz0yu
  10559. $lz0yu := %k4yha[$fg4rw]
  10560. end if
  10561. inc($lz0yu)
  10562. end while
  10563. end if
  10564. inc($fg4rw)
  10565. end while
  10566. call update_main_snapshot_name_display
  10567. call update_g_source_name_display
  10568. call update_s_source_name_display
  10569. end function
  10570. function create_consolidated_poly_mod_path
  10571. $ysvfj := 0
  10572. $t3xjk := -1
  10573. $wxrdy := 0
  10574. $3ivdg := -1
  10575. $bpxw3 := 0
  10576. $mlfej := -1
  10577. $tcueq := 0
  10578. $0us0d := -1
  10579. $wibgr := 0
  10580. $vzboi := -1
  10581. $mtob1 := 0
  10582. while ($mtob1<$upapg)
  10583. if (%hxpuh[$mtob1]=1 and (sh_right(search(%c3hli,%n34di[$mtob1]),31)+1=0))
  10584. $dyt1q := %3hbq2[$mtob1]-1
  10585. while (%vzkyc[%q4rwz[20*$mtob1+$dyt1q]] # 1 and ($dyt1q>0))
  10586. dec($dyt1q)
  10587. end while
  10588. select (%q4rwz[20*$mtob1+$dyt1q])
  10589. case 10
  10590. if (%3hbq2[$mtob1]>$ysvfj)
  10591. $ysvfj := %3hbq2[$mtob1]
  10592. $t3xjk := $mtob1
  10593. end if
  10594. case 12
  10595. if (%3hbq2[$mtob1]>$wxrdy)
  10596. $wxrdy := %3hbq2[$mtob1]
  10597. $3ivdg := $mtob1
  10598. end if
  10599. case 13
  10600. if (%3hbq2[$mtob1]>$bpxw3)
  10601. $bpxw3 := %3hbq2[$mtob1]
  10602. $mlfej := $mtob1
  10603. end if
  10604. case 9
  10605. if (%3hbq2[$mtob1]>$tcueq)
  10606. $tcueq := %3hbq2[$mtob1]
  10607. $0us0d := $mtob1
  10608. end if
  10609. case 21
  10610. if (%3hbq2[$mtob1]>$wibgr)
  10611. $wibgr := %3hbq2[$mtob1]
  10612. $vzboi := $mtob1
  10613. end if
  10614. end select
  10615. end if
  10616. inc($mtob1)
  10617. end while
  10618. $kyxij := 0
  10619. while ($kyxij<num_elements(%zeecp))
  10620. %zeecp[$kyxij] := -1
  10621. inc($kyxij)
  10622. end while
  10623. $ppjmu := 0
  10624. if ($3ivdg # -1)
  10625. $z5fg2 := %3hbq2[$3ivdg]-1
  10626. while ($z5fg2>=0)
  10627. $dyt1q := search(%zeecp,%q4rwz[20*$3ivdg+$z5fg2])
  10628. if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$3ivdg+$z5fg2])=-1))
  10629. %zeecp[$ppjmu] := %q4rwz[20*$3ivdg+$z5fg2]
  10630. inc($ppjmu)
  10631. end if
  10632. dec($z5fg2)
  10633. end while
  10634. end if
  10635. if ($t3xjk # -1)
  10636. $z5fg2 := %3hbq2[$t3xjk]-1
  10637. while ($z5fg2>=0)
  10638. $dyt1q := search(%zeecp,%q4rwz[20*$t3xjk+$z5fg2])
  10639. if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$t3xjk+$z5fg2])=-1))
  10640. %zeecp[$ppjmu] := %q4rwz[20*$t3xjk+$z5fg2]
  10641. inc($ppjmu)
  10642. end if
  10643. dec($z5fg2)
  10644. end while
  10645. end if
  10646. if ($mlfej # -1)
  10647. $z5fg2 := %3hbq2[$mlfej]-1
  10648. while ($z5fg2>=0)
  10649. $dyt1q := search(%zeecp,%q4rwz[20*$mlfej+$z5fg2])
  10650. if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$mlfej+$z5fg2])=-1))
  10651. %zeecp[$ppjmu] := %q4rwz[20*$mlfej+$z5fg2]
  10652. inc($ppjmu)
  10653. end if
  10654. dec($z5fg2)
  10655. end while
  10656. end if
  10657. if ($0us0d # -1)
  10658. $z5fg2 := %3hbq2[$0us0d]-1
  10659. while ($z5fg2>=0)
  10660. $dyt1q := search(%zeecp,%q4rwz[20*$0us0d+$z5fg2])
  10661. if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$0us0d+$z5fg2])=-1))
  10662. %zeecp[$ppjmu] := %q4rwz[20*$0us0d+$z5fg2]
  10663. inc($ppjmu)
  10664. end if
  10665. dec($z5fg2)
  10666. end while
  10667. end if
  10668. if ($vzboi # -1)
  10669. $z5fg2 := %3hbq2[$vzboi]-1
  10670. while ($z5fg2>=0)
  10671. $dyt1q := search(%zeecp,%q4rwz[20*$vzboi+$z5fg2])
  10672. if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$vzboi+$z5fg2])=-1))
  10673. %zeecp[$ppjmu] := %q4rwz[20*$vzboi+$z5fg2]
  10674. inc($ppjmu)
  10675. end if
  10676. dec($z5fg2)
  10677. end while
  10678. end if
  10679. $mtob1 := 0
  10680. while ($mtob1<$upapg)
  10681. if (%hxpuh[$mtob1]=1)
  10682. $z5fg2 := %3hbq2[$mtob1]-1
  10683. while ($z5fg2>=0)
  10684. $dyt1q := search(%zeecp,%q4rwz[20*$mtob1+$z5fg2])
  10685. if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$mtob1+$z5fg2])=-1))
  10686. %zeecp[$ppjmu] := %q4rwz[20*$mtob1+$z5fg2]
  10687. inc($ppjmu)
  10688. end if
  10689. dec($z5fg2)
  10690. end while
  10691. end if
  10692. inc($mtob1)
  10693. end while
  10694. end function
  10695. function create_full_mod_path
  10696. $zw1a3 := 0
  10697. while ($zw1a3<20)
  10698. %tyrok[$zw1a3] := %zeecp[$zw1a3]
  10699. inc($zw1a3)
  10700. end while
  10701. $xtwkb := search(%tyrok,-1)
  10702. $zw1a3 := 0
  10703. while ($zw1a3<$upapg)
  10704. $xqxc4 := %3hbq2[$zw1a3]-1
  10705. while ($xqxc4>=0)
  10706. $dyt1q := search(%tyrok,%q4rwz[20*$zw1a3+$xqxc4])
  10707. if ($dyt1q=-1 and (search(%tjjl2,%q4rwz[20*$zw1a3+$xqxc4])=-1))
  10708. %tyrok[$xtwkb] := %q4rwz[20*$zw1a3+$xqxc4]
  10709. inc($xtwkb)
  10710. end if
  10711. dec($xqxc4)
  10712. end while
  10713. inc($zw1a3)
  10714. end while
  10715. $zw1a3 := 0
  10716. while ($zw1a3<20)
  10717. %dpoyh[$zw1a3] := %tyrok[$zw1a3]
  10718. inc($zw1a3)
  10719. end while
  10720. $zw1a3 := 0
  10721. while ($zw1a3<7)
  10722. if (search(%tyrok,%45suw[$zw1a3])=-1)
  10723. %dpoyh[$xtwkb] := %45suw[$zw1a3]
  10724. inc($xtwkb)
  10725. end if
  10726. inc($zw1a3)
  10727. end while
  10728. end function
  10729. function evaluate_mod_connections
  10730. $kyxij := 0
  10731. while ($kyxij<num_elements(%hivzv))
  10732. %hivzv[$kyxij] := -1
  10733. inc($kyxij)
  10734. end while
  10735. $kyxij := 0
  10736. while ($kyxij<num_elements(%hxpuh))
  10737. %hxpuh[$kyxij] := -1
  10738. inc($kyxij)
  10739. end while
  10740. $kyxij := 0
  10741. while ($kyxij<num_elements(%q4rwz))
  10742. %q4rwz[$kyxij] := -1
  10743. inc($kyxij)
  10744. end while
  10745. $fg4rw := 0
  10746. while (%n34di[$fg4rw] # -1 and ($fg4rw<num_elements(%n34di)))
  10747. $nz3a0 := 0
  10748. $drez3 := 0
  10749. $kyxij := 0
  10750. while ($kyxij<num_elements(%tjh23))
  10751. %tjh23[$kyxij] := -1
  10752. inc($kyxij)
  10753. end while
  10754. %fwuoz[0] := $1fo5x
  10755. %fwuoz[1] := $z1x5e
  10756. %fwuoz[2] := $cvjhr
  10757. %fwuoz[3] := $fpvgj
  10758. %fwuoz[4] := $1fo5x
  10759. %fwuoz[5] := $vas4o
  10760. %fwuoz[6] := $y3s33
  10761. $3uagi := search(%n34di,%n34di[$fg4rw])
  10762. %tjh23[$nz3a0] := get_menu_item_value(%n34di[$fg4rw],get_control_par(%n34di[$fg4rw],$CONTROL_PAR_VALUE))
  10763. inc($nz3a0)
  10764. $dyt1q := search(%45suw,get_menu_item_value(%n34di[$fg4rw],get_control_par(%n34di[$fg4rw],$CONTROL_PAR_VALUE)))
  10765. while ($dyt1q>-1 and ($drez3=0))
  10766. if (search(%tjh23,%fwuoz[$dyt1q])=-1)
  10767. %tjh23[$nz3a0] := %fwuoz[$dyt1q]
  10768. inc($nz3a0)
  10769. select ($dyt1q)
  10770. case 0
  10771. if (%q4rwz[0]=-1)
  10772. $drez3 := 1
  10773. else
  10774. $ecwiv := 0
  10775. while (%q4rwz[$ecwiv] # -1 and ($nz3a0<19))
  10776. %tjh23[$nz3a0] := %q4rwz[$ecwiv]
  10777. inc($nz3a0)
  10778. inc($ecwiv)
  10779. end while
  10780. end if
  10781. case 1
  10782. if (%q4rwz[40]=-1)
  10783. $drez3 := 1
  10784. else
  10785. $ecwiv := 0
  10786. while (%q4rwz[40+$ecwiv] # -1 and ($nz3a0<19))
  10787. %tjh23[$nz3a0] := %q4rwz[40+$ecwiv]
  10788. inc($nz3a0)
  10789. inc($ecwiv)
  10790. end while
  10791. end if
  10792. case 4
  10793. if (%q4rwz[0]=-1)
  10794. $drez3 := 1
  10795. else
  10796. $ecwiv := 0
  10797. while (%q4rwz[$ecwiv] # -1 and ($nz3a0<19))
  10798. %tjh23[$nz3a0] := %q4rwz[$ecwiv]
  10799. inc($nz3a0)
  10800. inc($ecwiv)
  10801. end while
  10802. end if
  10803. if (%q4rwz[60]=-1)
  10804. $drez3 := 1
  10805. else
  10806. $ecwiv := 0
  10807. while (%q4rwz[60+$ecwiv] # -1 and ($nz3a0<19))
  10808. %tjh23[$nz3a0] := %q4rwz[60+$ecwiv]
  10809. inc($nz3a0)
  10810. inc($ecwiv)
  10811. end while
  10812. end if
  10813. if (%q4rwz[40]=-1)
  10814. $drez3 := 1
  10815. else
  10816. $ecwiv := 0
  10817. while (%q4rwz[40+$ecwiv] # -1 and ($nz3a0<19))
  10818. %tjh23[$nz3a0] := %q4rwz[40+$ecwiv]
  10819. inc($nz3a0)
  10820. inc($ecwiv)
  10821. end while
  10822. end if
  10823. end select
  10824. $dyt1q := search(%45suw,%fwuoz[$dyt1q])
  10825. else
  10826. $dyt1q := -1
  10827. end if
  10828. end while
  10829. %tjh23[$nz3a0] := -1
  10830. if ($drez3=0)
  10831. %hivzv[$3uagi] := 0
  10832. %hxpuh[$3uagi] := 0
  10833. $ecwiv := 0
  10834. while ($ecwiv<$nz3a0)
  10835. if (search(%oktyv,%tjh23[$ecwiv]) # -1)
  10836. %hivzv[$3uagi] := 1
  10837. $ecwiv := $nz3a0
  10838. end if
  10839. inc($ecwiv)
  10840. end while
  10841. $ecwiv := 0
  10842. while ($ecwiv<$nz3a0)
  10843. if (search(%s0rie,%tjh23[$ecwiv]) # -1)
  10844. %hxpuh[$3uagi] := 1
  10845. $ecwiv := $nz3a0
  10846. end if
  10847. inc($ecwiv)
  10848. end while
  10849. else
  10850. %hivzv[$3uagi] := -2
  10851. end if
  10852. $ecwiv := 0
  10853. while ($ecwiv<=$nz3a0)
  10854. %q4rwz[20*$3uagi+$ecwiv] := %tjh23[$ecwiv]
  10855. inc($ecwiv)
  10856. end while
  10857. %3hbq2[$3uagi] := $nz3a0
  10858. if (%c1qym[$fg4rw] # -1)
  10859. %z15qu[$fg4rw] := get_control_par(%c1qym[$fg4rw],$CONTROL_PAR_VALUE)
  10860. end if
  10861. inc($fg4rw)
  10862. end while
  10863. $y3mgr := search(%hivzv,-2)
  10864. while ($y3mgr # -1)
  10865. $nz3a0 := 0
  10866. $drez3 := 0
  10867. $kyxij := 0
  10868. while ($kyxij<num_elements(%tjh23))
  10869. %tjh23[$kyxij] := -1
  10870. inc($kyxij)
  10871. end while
  10872. %fwuoz[0] := $1fo5x
  10873. %fwuoz[1] := $z1x5e
  10874. %fwuoz[2] := $cvjhr
  10875. %fwuoz[3] := $fpvgj
  10876. %fwuoz[4] := $1fo5x
  10877. %fwuoz[5] := $vas4o
  10878. %fwuoz[6] := $y3s33
  10879. $3uagi := search(%n34di,%n34di[$y3mgr])
  10880. %tjh23[$nz3a0] := get_menu_item_value(%n34di[$y3mgr],get_control_par(%n34di[$y3mgr],$CONTROL_PAR_VALUE))
  10881. inc($nz3a0)
  10882. $dyt1q := search(%45suw,get_menu_item_value(%n34di[$y3mgr],get_control_par(%n34di[$y3mgr],$CONTROL_PAR_VALUE)))
  10883. while ($dyt1q>-1 and ($drez3=0))
  10884. if (search(%tjh23,%fwuoz[$dyt1q])=-1)
  10885. %tjh23[$nz3a0] := %fwuoz[$dyt1q]
  10886. inc($nz3a0)
  10887. select ($dyt1q)
  10888. case 0
  10889. if (%q4rwz[0]=-1)
  10890. $drez3 := 1
  10891. else
  10892. $ecwiv := 0
  10893. while (%q4rwz[$ecwiv] # -1 and ($nz3a0<19))
  10894. %tjh23[$nz3a0] := %q4rwz[$ecwiv]
  10895. inc($nz3a0)
  10896. inc($ecwiv)
  10897. end while
  10898. end if
  10899. case 1
  10900. if (%q4rwz[40]=-1)
  10901. $drez3 := 1
  10902. else
  10903. $ecwiv := 0
  10904. while (%q4rwz[40+$ecwiv] # -1 and ($nz3a0<19))
  10905. %tjh23[$nz3a0] := %q4rwz[40+$ecwiv]
  10906. inc($nz3a0)
  10907. inc($ecwiv)
  10908. end while
  10909. end if
  10910. case 4
  10911. if (%q4rwz[0]=-1)
  10912. $drez3 := 1
  10913. else
  10914. $ecwiv := 0
  10915. while (%q4rwz[$ecwiv] # -1 and ($nz3a0<19))
  10916. %tjh23[$nz3a0] := %q4rwz[$ecwiv]
  10917. inc($nz3a0)
  10918. inc($ecwiv)
  10919. end while
  10920. end if
  10921. if (%q4rwz[60]=-1)
  10922. $drez3 := 1
  10923. else
  10924. $ecwiv := 0
  10925. while (%q4rwz[60+$ecwiv] # -1 and ($nz3a0<19))
  10926. %tjh23[$nz3a0] := %q4rwz[60+$ecwiv]
  10927. inc($nz3a0)
  10928. inc($ecwiv)
  10929. end while
  10930. end if
  10931. if (%q4rwz[40]=-1)
  10932. $drez3 := 1
  10933. else
  10934. $ecwiv := 0
  10935. while (%q4rwz[40+$ecwiv] # -1 and ($nz3a0<19))
  10936. %tjh23[$nz3a0] := %q4rwz[40+$ecwiv]
  10937. inc($nz3a0)
  10938. inc($ecwiv)
  10939. end while
  10940. end if
  10941. end select
  10942. $dyt1q := search(%45suw,%fwuoz[$dyt1q])
  10943. else
  10944. $dyt1q := -1
  10945. end if
  10946. end while
  10947. %tjh23[$nz3a0] := -1
  10948. if ($drez3=0)
  10949. %hivzv[$3uagi] := 0
  10950. %hxpuh[$3uagi] := 0
  10951. $ecwiv := 0
  10952. while ($ecwiv<$nz3a0)
  10953. if (search(%oktyv,%tjh23[$ecwiv]) # -1)
  10954. %hivzv[$3uagi] := 1
  10955. $ecwiv := $nz3a0
  10956. end if
  10957. inc($ecwiv)
  10958. end while
  10959. $ecwiv := 0
  10960. while ($ecwiv<$nz3a0)
  10961. if (search(%s0rie,%tjh23[$ecwiv]) # -1)
  10962. %hxpuh[$3uagi] := 1
  10963. $ecwiv := $nz3a0
  10964. end if
  10965. inc($ecwiv)
  10966. end while
  10967. else
  10968. %hivzv[$3uagi] := -2
  10969. end if
  10970. $ecwiv := 0
  10971. while ($ecwiv<=$nz3a0)
  10972. %q4rwz[20*$3uagi+$ecwiv] := %tjh23[$ecwiv]
  10973. inc($ecwiv)
  10974. end while
  10975. %3hbq2[$3uagi] := $nz3a0
  10976. $y3mgr := search(%hivzv,-2)
  10977. end while
  10978. call create_consolidated_poly_mod_path
  10979. call create_full_mod_path
  10980. end function
  10981. function calc_g_area_vars
  10982. $kexsv := %smp_l_grp[$51oxm]
  10983. $rs53j := $kexsv-5
  10984. $wo1eq := ($eai4d+($3zolj*%ppvim[$r3d0o]/1000))*$kexsv*(1+(sh_right($rs53j*1000-(($eai4d+($3zolj*%ppvim[$r3d0o]/1000))*$kexsv),31) .or. sh_right(($eai4d+($3zolj*%ppvim[$r3d0o]/1000))*$kexsv-0,31)))-0-($rs53j*1000*sh_right($rs53j*1000-(($eai4d+($3zolj*%ppvim[$r3d0o]/1000))*$kexsv),31))
  10985. if ($k21jk=1)
  10986. $uiy0n := $wo1eq+(($r0khx+($yl1h5*%ppvim[$yqtdo]/1000))*$kexsv)
  10987. else
  10988. $uiy0n := ($r0khx+($yl1h5*%ppvim[$yqtdo]/1000))*$kexsv
  10989. end if
  10990. $uiy0n := $uiy0n*(1+(sh_right($kexsv*1000-$uiy0n,31) .or. sh_right($uiy0n-($wo1eq+5000),31)))-(($wo1eq+5000)*sh_right($uiy0n-($wo1eq+5000),31))-($kexsv*1000*sh_right($kexsv*1000-$uiy0n,31))
  10991. $i11wt := ($uiy0n-$wo1eq)/1000
  10992. end function
  10993. function update_g_pos_hit_anker_lenth_text
  10994. if (get_control_par(get_ui_id($rbfcs),$CONTROL_PAR_WIDTH)>53)
  10995. set_control_par_str(get_ui_id($rbfcs),$CONTROL_PAR_TEXT,!je2na[$pqpgc*(1+(sh_right(16-$pqpgc,31) .or. sh_right($pqpgc-0,31)))-0-(16*sh_right(16-$pqpgc,31))])
  10996. else
  10997. set_control_par_str(get_ui_id($rbfcs),$CONTROL_PAR_TEXT,"")
  10998. end if
  10999. end function
  11000. function update_g_pos_hit_anker_ui
  11001. if ($0ib2k=1)
  11002. if ($linka=1 and not ($51oxm=263 and (get_sample_length(%NI_USER_ZONE_IDS[0])=0)) and ($zylsx # 1) and ($lxku3 # 1))
  11003. set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_X)+real_to_int(round(int_to_real(get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_WIDTH)-1)*~tptmd))-(get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_WIDTH)/2))
  11004. set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11005. $dyt1q := get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH)+get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_POS_X)+((get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X)-(get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH)+get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_POS_X)))*(($liaof+($5wlib*%ppvim[$eu2xe]/1000))*(1+(sh_right(1000-($liaof+($5wlib*%ppvim[$eu2xe]/1000)),31) .or. sh_right($liaof+($5wlib*%ppvim[$eu2xe]/1000)-1,31)))-sh_right($liaof+($5wlib*%ppvim[$eu2xe]/1000)-1,31)-(1000*sh_right(1000-($liaof+($5wlib*%ppvim[$eu2xe]/1000)),31)))/1000)
  11006. if ($dyt1q<get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X))
  11007. set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_POS_X,$dyt1q)
  11008. set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X)-get_control_par(get_ui_id($rbfcs),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_WIDTH)/2))
  11009. else
  11010. set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_WIDTH)/2))
  11011. set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_WIDTH,$dyt1q-(get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_WIDTH)/2)))
  11012. end if
  11013. call update_g_pos_hit_anker_lenth_text
  11014. set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11015. else
  11016. if (get_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
  11017. set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11018. set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11019. end if
  11020. end if
  11021. end if
  11022. end function
  11023. function update_g_rng_max_area
  11024. if (get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
  11025. $dyt1q := get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+2+((get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-4)*($uiy0n/1000)/$pilpf)
  11026. if (get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X) # $dyt1q)
  11027. set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X,$dyt1q)
  11028. end if
  11029. $dyt1q := get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-(get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X)-get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+2)
  11030. if (get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_WIDTH) # $dyt1q)
  11031. set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_WIDTH,$dyt1q)
  11032. end if
  11033. call update_g_pos_hit_anker_ui
  11034. end if
  11035. end function
  11036. function update_g_rng_min_area
  11037. $dyt1q := (get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-4)*($wo1eq/1000)/$pilpf
  11038. if (get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH) # $dyt1q and (get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
  11039. set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH,$dyt1q)
  11040. end if
  11041. call update_g_rng_max_area
  11042. end function
  11043. function update_all_WF_for_default_key
  11044. $r5war := %zone_id_C3[100+$51oxm]
  11045. if ($r5war>-1)
  11046. attach_zone($4lo3h,$r5war,0)
  11047. $pilpf := get_sample_length($r5war)/1000
  11048. end if
  11049. $ukkxs := -1
  11050. $r5war := -1
  11051. call calc_g_area_vars
  11052. call update_g_rng_min_area
  11053. $lrye0 := -1
  11054. $a5fyp := %zone_id_C3[$hdmk1]
  11055. if ($a5fyp>0)
  11056. attach_zone($tmcuy,$a5fyp,0)
  11057. end if
  11058. call update_s_wf_start_indic_label_position
  11059. end function
  11060. function update_wf_range_label_position
  11061. set_control_par_str(get_ui_id($hnp3t),$CONTROL_PAR_PICTURE,"GE_WF_COV_LEFT_" & $xc3po & -sh_right(abs($0ib2k-0)-1,31))
  11062. set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+2)
  11063. set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y)+2)
  11064. set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-4)
  11065. set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT)-4)
  11066. set_control_par_str(get_ui_id($q3vtp),$CONTROL_PAR_PICTURE,"GE_WF_COV_RIGHT_" & $xc3po & -sh_right(abs($0ib2k-0)-1,31))
  11067. set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+2)
  11068. set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y)+2)
  11069. set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-4)
  11070. set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT)-4)
  11071. end function
  11072. function position_g_wf_range_indicators
  11073. call update_wf_range_label_position
  11074. set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+2)
  11075. set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y))
  11076. set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-4)
  11077. set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT))
  11078. if ($0ib2k=1 and ($lxku3 # 1))
  11079. set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_Y)+2)
  11080. set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HEIGHT)-4)
  11081. set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_Y)+get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HEIGHT)-get_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HEIGHT)-2)
  11082. call update_g_pos_hit_anker_ui
  11083. else
  11084. set_control_par(get_ui_id($q5i1b),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11085. set_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11086. end if
  11087. end function
  11088. function position_XY_center_big
  11089. set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_X,361)
  11090. set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_Y,161)
  11091. set_control_par(get_ui_id(?xy),$CONTROL_PAR_WIDTH,249)
  11092. set_control_par(get_ui_id(?xy),$CONTROL_PAR_HEIGHT,249)
  11093. set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"blank")
  11094. set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_CURSOR_PICTURE,"GE_XY_Cursor_1" & -sh_right(abs($0ib2k-0)-1,31))
  11095. end function
  11096. function update_macro_knob_style
  11097. $fg4rw := 0
  11098. while ($fg4rw<=3)
  11099. set_control_par_str(%xwg5s[10*(46+$fg4rw)],$CONTROL_PAR_PICTURE,"MacroKnob_" & (1+sh_right(abs($0ib2k-0)-1,31)))
  11100. set_control_par(%xwg5s[10*(46+$fg4rw)+1],$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-0)-1,31)*6800+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*6789))
  11101. set_control_par(%xwg5s[10*(46+$fg4rw)+1],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,-sh_right(abs($0ib2k-0)-1,31)*%aydym[15]+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*6800))
  11102. inc($fg4rw)
  11103. end while
  11104. end function
  11105. function update_g_root_key_user_visibility
  11106. if ($0ib2k=1 and ($51oxm=263) and (get_sample_length(%NI_USER_ZONE_IDS[0]) # 0) and ($lxku3=0))
  11107. set_control_par(get_ui_id($aewcf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11108. else
  11109. set_control_par(get_ui_id($aewcf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11110. end if
  11111. set_control_par(get_ui_id($wzxlg),$CONTROL_PAR_HIDE,get_control_par(get_ui_id($aewcf),$CONTROL_PAR_HIDE))
  11112. set_control_par(get_ui_id($r5bjx),$CONTROL_PAR_HIDE,get_control_par(get_ui_id($aewcf),$CONTROL_PAR_HIDE))
  11113. end function
  11114. function update_g_xy_for_user_sample
  11115. if ($0ib2k=1 or ($0ib2k=0))
  11116. if ((get_sample_length(%NI_USER_ZONE_IDS[0])=0 or ($lxku3=1)) and ($51oxm=263))
  11117. set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11118. set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11119. set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11120. call update_g_pos_hit_anker_ui
  11121. set_control_par_str(get_ui_id(?51qxr),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & $0ib2k & ($lxku3*3))
  11122. $yhwrb := 1
  11123. else
  11124. set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11125. set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11126. call calc_g_area_vars
  11127. call update_g_rng_min_area
  11128. set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
  11129. end if
  11130. end if
  11131. call update_g_root_key_user_visibility
  11132. end function
  11133. function show_perform_view
  11134. $fg4rw := 0
  11135. while ($fg4rw<200)
  11136. $duehg := 0
  11137. $qohq4 := 0
  11138. while ($qohq4<=31)
  11139. if (sh_right(1536,$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
  11140. $duehg := 1
  11141. $qohq4 := 32
  11142. end if
  11143. inc($qohq4)
  11144. end while
  11145. $g5k3r := 0
  11146. while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
  11147. if ($duehg=0)
  11148. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11149. else
  11150. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
  11151. end if
  11152. inc($g5k3r)
  11153. end while
  11154. inc($fg4rw)
  11155. end while
  11156. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WAVE_COLOR,11186870)
  11157. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WAVE_COLOR,11186870)
  11158. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WAVE_CURSOR_COLOR,11186870)
  11159. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X,18)
  11160. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y,258)
  11161. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH,296)
  11162. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT,84)
  11163. set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_POS_X,18)
  11164. set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_POS_Y,258)
  11165. set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_WIDTH,296)
  11166. set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_HEIGHT,84)
  11167. call position_g_wf_range_indicators
  11168. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X,655)
  11169. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y,258)
  11170. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WIDTH,296)
  11171. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HEIGHT,84)
  11172. set_control_par(get_ui_id($fi22y),$CONTROL_PAR_POS_X,655)
  11173. set_control_par(get_ui_id($fi22y),$CONTROL_PAR_POS_Y,258)
  11174. set_control_par(get_ui_id($fi22y),$CONTROL_PAR_WIDTH,296)
  11175. set_control_par(get_ui_id($fi22y),$CONTROL_PAR_HEIGHT,84)
  11176. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_POS_X,655)
  11177. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_POS_Y,258)
  11178. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_WIDTH,296)
  11179. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_HEIGHT,84)
  11180. set_control_par_str(get_ui_id($rgqvn),$CONTROL_PAR_PICTURE,"GE_START_POINT_IND_SMPL_1")
  11181. set_control_par(get_ui_id($brjbw),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WIDTH)-get_control_par(get_ui_id($brjbw),$CONTROL_PAR_WIDTH)-10)
  11182. set_control_par(get_ui_id($brjbw),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y)+10)
  11183. set_control_par(get_ui_id($brjbw),$CONTROL_PAR_HIDE,(%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31))*$HIDE_PART_NOTHING+((.not. (%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31)) .and. 1)*$HIDE_WHOLE_CONTROL))
  11184. call update_s_wf_start_indic_label_position
  11185. call position_XY_center_big
  11186. call update_macro_knob_style
  11187. call update_s_xy_for_user_sample
  11188. call update_g_xy_for_user_sample
  11189. end function
  11190. function position_XY_mod_sec_small
  11191. set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_X,441)
  11192. set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_Y,470)
  11193. set_control_par(get_ui_id(?xy),$CONTROL_PAR_WIDTH,89)
  11194. set_control_par(get_ui_id(?xy),$CONTROL_PAR_HEIGHT,89)
  11195. set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"GE_XY_Backing")
  11196. set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_CURSOR_PICTURE,"GE_XY_Cursor_0")
  11197. end function
  11198. function update_g_rng_max_label
  11199. if ($k21jk=1)
  11200. !isqic[25] := "Length"
  11201. set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_PICTURE,"MK_Mask_8")
  11202. set_control_par(get_ui_id($jmb0x),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11203. set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_TEXT,!isqic[25])
  11204. else
  11205. !isqic[25] := "End"
  11206. set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_TEXT,"")
  11207. set_control_par_str(get_ui_id($jmb0x),$CONTROL_PAR_PICTURE,"MK_Mask_Max")
  11208. set_control_par(get_ui_id($jmb0x),$CONTROL_PAR_HIDE,(1+sh_right(abs(get_control_par(get_ui_id($r0khx),$CONTROL_PAR_HIDE)-$HIDE_WHOLE_CONTROL)-1,31))*$HIDE_PART_NOTHING+((.not. (1+sh_right(abs(get_control_par(get_ui_id($r0khx),$CONTROL_PAR_HIDE)-$HIDE_WHOLE_CONTROL)-1,31)) .and. 1)*$HIDE_WHOLE_CONTROL))
  11209. end if
  11210. set_control_par_str(get_ui_id($r0khx),$CONTROL_PAR_AUTOMATION_NAME,!isqic[25])
  11211. end function
  11212. function update_g_formant_shift_control
  11213. if ($0ib2k=1 and (%g_frm_shft[$51oxm]=1))
  11214. set_control_par(get_ui_id($swg5e),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11215. else
  11216. set_control_par(get_ui_id($swg5e),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11217. end if
  11218. end function
  11219. function show_grain_view
  11220. $fg4rw := 0
  11221. while ($fg4rw<200)
  11222. $duehg := 0
  11223. $qohq4 := 0
  11224. while ($qohq4<=31)
  11225. if (sh_right(2 .or. %konvz[$mdykc],$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
  11226. $duehg := 1
  11227. $qohq4 := 32
  11228. end if
  11229. inc($qohq4)
  11230. end while
  11231. $g5k3r := 0
  11232. while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
  11233. if ($duehg=0)
  11234. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11235. else
  11236. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
  11237. end if
  11238. inc($g5k3r)
  11239. end while
  11240. inc($fg4rw)
  11241. end while
  11242. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WAVE_COLOR,2044730)
  11243. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X,0)
  11244. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y,130)
  11245. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH,970)
  11246. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT,132)
  11247. set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_POS_X,0)
  11248. set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_POS_Y,130)
  11249. set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_WIDTH,970)
  11250. set_control_par(get_ui_id($v3pyu),$CONTROL_PAR_HEIGHT,132)
  11251. call position_g_wf_range_indicators
  11252. call update_g_xy_for_user_sample
  11253. call position_XY_mod_sec_small
  11254. call update_g_rng_max_label
  11255. call update_g_formant_shift_control
  11256. end function
  11257. function show_samples_view
  11258. $fg4rw := 0
  11259. while ($fg4rw<200)
  11260. $duehg := 0
  11261. $qohq4 := 0
  11262. while ($qohq4<=31)
  11263. if (sh_right(4 .or. %konvz[$mdykc],$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
  11264. $duehg := 1
  11265. $qohq4 := 32
  11266. end if
  11267. inc($qohq4)
  11268. end while
  11269. $g5k3r := 0
  11270. while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
  11271. if ($duehg=0)
  11272. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11273. else
  11274. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
  11275. end if
  11276. inc($g5k3r)
  11277. end while
  11278. inc($fg4rw)
  11279. end while
  11280. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WAVE_COLOR,2044730)
  11281. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WAVE_CURSOR_COLOR,2108218)
  11282. call update_ARP_and_S_WF_area
  11283. set_control_par(get_ui_id($brjbw),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_WIDTH)-get_control_par(get_ui_id($brjbw),$CONTROL_PAR_WIDTH)-10)
  11284. set_control_par(get_ui_id($brjbw),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_POS_Y)+10)
  11285. set_control_par(get_ui_id($brjbw),$CONTROL_PAR_HIDE,(%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31))*$HIDE_PART_NOTHING+((.not. (%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31)) .and. 1)*$HIDE_WHOLE_CONTROL))
  11286. call FX__update_smpl_filter_ui
  11287. call position_XY_mod_sec_small
  11288. end function
  11289. function FX_UI__select_active_fx_cat_btn
  11290. $fg4rw := 0
  11291. while ($fg4rw<10)
  11292. set_control_par(%u2u11[10*%dah4f[$qlteh]+$fg4rw],$CONTROL_PAR_VALUE,0)
  11293. inc($fg4rw)
  11294. end while
  11295. set_control_par(%u2u11[10*%dah4f[$qlteh]+%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))],$CONTROL_PAR_VALUE,1)
  11296. end function
  11297. function _FX_UI__update_ui_controls_for_global_set_id
  11298. $v02mu := $qlteh
  11299. $ohjfi := 0
  11300. while ($ohjfi<%wvg1x[$v02mu])
  11301. if (%wvg1x[$v02mu]>1)
  11302. set_control_par(%ejazl[4*$v02mu+$ohjfi],$CONTROL_PAR_VALUE,-sh_right(abs($ohjfi-%h152r[$v02mu])-1,31))
  11303. set_control_par_str(%ejazl[4*$v02mu+$ohjfi],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & %pqcgh[8*%mpjcc[$v02mu]+$ohjfi] & %45vq1[8*%mpjcc[$v02mu]+$ohjfi])
  11304. end if
  11305. $byqm5 := 0
  11306. while ($byqm5<3)
  11307. if (%h152r[$v02mu]=$ohjfi and (get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)=0) and ($byqm5<((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_FILTER)-1,31))*%xdshj[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_FILTER)-1,31)*%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))]))) and (%45vq1[8*%mpjcc[$v02mu]+%h152r[$v02mu]] # 6) and ((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]+$byqm5]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-56))]+($byqm5-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-57-1))]-1-$byqm5,31)*($byqm5-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]))))-57-1))]-1))))]) # -1))
  11308. $dyt1q := 1
  11309. else
  11310. $dyt1q := 0
  11311. end if
  11312. $g5k3r := 0
  11313. while (%xwg5s[10*%u4nqi[12*$v02mu+(3*$ohjfi)+$byqm5]+$g5k3r]>0 and ($g5k3r<10))
  11314. if ($dyt1q=0)
  11315. set_control_par(%xwg5s[10*%u4nqi[12*$v02mu+(3*$ohjfi)+$byqm5]+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11316. else
  11317. set_control_par(%xwg5s[10*%u4nqi[12*$v02mu+(3*$ohjfi)+$byqm5]+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*%u4nqi[12*$v02mu+(3*$ohjfi)+$byqm5]+(19*$g5k3r)+5])
  11318. end if
  11319. inc($g5k3r)
  11320. end while
  11321. inc($byqm5)
  11322. end while
  11323. inc($ohjfi)
  11324. end while
  11325. if ($v02mu # 3 and ($v02mu # 4))
  11326. if (%mpjcc[$v02mu]=$3qz3a)
  11327. if (%45vq1[8*%mpjcc[$v02mu]+%h152r[$v02mu]]=6 and (get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)=0))
  11328. $dyt1q := 1
  11329. $mboix := %fxqnu[$v02mu]-get_control_par(%xwg5s[270],$CONTROL_PAR_POS_X)
  11330. $2exws := 0
  11331. while ($2exws<10)
  11332. if (%xwg5s[270+$2exws]>0)
  11333. set_control_par(%xwg5s[270+$2exws],$CONTROL_PAR_POS_X,get_control_par(%xwg5s[270+$2exws],$CONTROL_PAR_POS_X)+$mboix)
  11334. end if
  11335. inc($2exws)
  11336. end while
  11337. call STEPPER__reposition_x_value_indicators
  11338. else
  11339. $dyt1q := 0
  11340. end if
  11341. $g5k3r := 0
  11342. while (%xwg5s[270+$g5k3r]>0 and ($g5k3r<10))
  11343. if ($dyt1q=0)
  11344. set_control_par(%xwg5s[270+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11345. else
  11346. set_control_par(%xwg5s[270+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[5130+(19*$g5k3r)+5])
  11347. end if
  11348. inc($g5k3r)
  11349. end while
  11350. $y3mgr := 0
  11351. while ($y3mgr<32)
  11352. if ($y3mgr<$ilpk2 and ($dyt1q=1))
  11353. set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11354. else
  11355. set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11356. end if
  11357. inc($y3mgr)
  11358. end while
  11359. if ($dyt1q=1)
  11360. call STEPPER__update_value_indicators
  11361. end if
  11362. end if
  11363. if (get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)=0 and (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])=$EFFECT_TYPE_FILTER) and (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])=$FILTER_TYPE_EQ3BAND))
  11364. if ($v02mu=0)
  11365. %bjbtn[14] := %h152r[$v02mu]
  11366. %c40o1[14] := %zjgrf[%mpjcc[$v02mu]]
  11367. %bjbtn[15] := %h152r[$v02mu]
  11368. %c40o1[15] := %zjgrf[%mpjcc[$v02mu]]
  11369. %bjbtn[16] := %h152r[$v02mu]
  11370. %c40o1[16] := %zjgrf[%mpjcc[$v02mu]]
  11371. %bjbtn[17] := %h152r[$v02mu]
  11372. %c40o1[17] := %zjgrf[%mpjcc[$v02mu]]
  11373. %bjbtn[18] := %h152r[$v02mu]
  11374. %c40o1[18] := %zjgrf[%mpjcc[$v02mu]]
  11375. %bjbtn[19] := %h152r[$v02mu]
  11376. %c40o1[19] := %zjgrf[%mpjcc[$v02mu]]
  11377. end if
  11378. if ($v02mu=1 or ($v02mu=2))
  11379. %bjbtn[20] := %h152r[$v02mu]
  11380. %c40o1[20] := %zjgrf[%mpjcc[$v02mu]]
  11381. %bjbtn[21] := %h152r[$v02mu]
  11382. %c40o1[21] := %zjgrf[%mpjcc[$v02mu]]
  11383. %bjbtn[22] := %h152r[$v02mu]
  11384. %c40o1[22] := %zjgrf[%mpjcc[$v02mu]]
  11385. %bjbtn[23] := %h152r[$v02mu]
  11386. %c40o1[23] := %zjgrf[%mpjcc[$v02mu]]
  11387. %bjbtn[24] := %h152r[$v02mu]
  11388. %c40o1[24] := %zjgrf[%mpjcc[$v02mu]]
  11389. %bjbtn[25] := %h152r[$v02mu]
  11390. %c40o1[25] := %zjgrf[%mpjcc[$v02mu]]
  11391. end if
  11392. $dyt1q := 1
  11393. else
  11394. $dyt1q := 0
  11395. end if
  11396. $ohjfi := 0
  11397. while ($ohjfi<6)
  11398. if ($dyt1q=1)
  11399. if ($v02mu=0)
  11400. set_control_par(%xwg5s[10*%ubhst[$ohjfi]],$CONTROL_PAR_VALUE,get_engine_par(%r5fsk[$ohjfi],-1,%bjbtn[14],%c40o1[14]))
  11401. if ($ohjfi<3)
  11402. set_control_par_str(%xwg5s[10*%ubhst[$ohjfi]+1],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_0")
  11403. set_control_par(%xwg5s[10*%ubhst[$ohjfi]+1],$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%r5fsk[$ohjfi])+106)
  11404. end if
  11405. end if
  11406. if ($v02mu=1 or ($v02mu=2))
  11407. set_control_par(%xwg5s[10*%koku3[$ohjfi]],$CONTROL_PAR_VALUE,get_engine_par(%r5fsk[$ohjfi],-1,%bjbtn[20],%c40o1[20]))
  11408. if ($ohjfi<3)
  11409. set_control_par_str(%xwg5s[10*%koku3[$ohjfi]+1],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_0")
  11410. set_control_par(%xwg5s[10*%koku3[$ohjfi]+1],$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%r5fsk[$ohjfi])+106)
  11411. end if
  11412. end if
  11413. end if
  11414. if (%zjgrf[%mpjcc[$v02mu]]=%c40o1[14] and ($v02mu=0))
  11415. $g5k3r := 0
  11416. while (%xwg5s[10*%ubhst[$ohjfi]+$g5k3r]>0 and ($g5k3r<10))
  11417. if ($dyt1q=0)
  11418. set_control_par(%xwg5s[10*%ubhst[$ohjfi]+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11419. else
  11420. set_control_par(%xwg5s[10*%ubhst[$ohjfi]+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*%ubhst[$ohjfi]+(19*$g5k3r)+5])
  11421. end if
  11422. inc($g5k3r)
  11423. end while
  11424. end if
  11425. if (%zjgrf[%mpjcc[$v02mu]]=%c40o1[20] and ($v02mu=1 or ($v02mu=2)))
  11426. $g5k3r := 0
  11427. while (%xwg5s[10*%koku3[$ohjfi]+$g5k3r]>0 and ($g5k3r<10))
  11428. if ($dyt1q=0)
  11429. set_control_par(%xwg5s[10*%koku3[$ohjfi]+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11430. else
  11431. set_control_par(%xwg5s[10*%koku3[$ohjfi]+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*%koku3[$ohjfi]+(19*$g5k3r)+5])
  11432. end if
  11433. inc($g5k3r)
  11434. end while
  11435. end if
  11436. inc($ohjfi)
  11437. end while
  11438. if ($v02mu=0)
  11439. $g5k3r := 0
  11440. while (%xwg5s[220+$g5k3r]>0 and ($g5k3r<10))
  11441. if (-sh_right(0-(-sh_right(abs(%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)))-8)-1,31)+get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)),31)=0)
  11442. set_control_par(%xwg5s[220+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11443. else
  11444. set_control_par(%xwg5s[220+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[4180+(19*$g5k3r)+5])
  11445. end if
  11446. inc($g5k3r)
  11447. end while
  11448. call FX_UI__select_active_fx_cat_btn
  11449. else
  11450. $g5k3r := 0
  11451. while (%xwg5s[230+$g5k3r]>0 and ($g5k3r<10))
  11452. if (-sh_right(0-(-sh_right(abs(%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)))-8)-1,31)+get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)),31)=0)
  11453. set_control_par(%xwg5s[230+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11454. else
  11455. set_control_par(%xwg5s[230+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[4370+(19*$g5k3r)+5])
  11456. end if
  11457. inc($g5k3r)
  11458. end while
  11459. call FX_UI__select_active_fx_cat_btn
  11460. end if
  11461. end if
  11462. if (%5l45p[$v02mu]=$0ib2k or ($v02mu=3 or ($v02mu=4 and ($mdykc=0))))
  11463. $dyt1q := $HIDE_PART_NOTHING
  11464. else
  11465. $dyt1q := $HIDE_WHOLE_CONTROL
  11466. end if
  11467. $ohjfi := 0
  11468. while ($ohjfi<10)
  11469. set_control_par(%pfy4f[20*$v02mu+$ohjfi],$CONTROL_PAR_HIDE,$dyt1q)
  11470. inc($ohjfi)
  11471. end while
  11472. $ohjfi := 0
  11473. while ($ohjfi<4)
  11474. set_control_par(%pfy4f[20*$v02mu+10+$ohjfi],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11475. inc($ohjfi)
  11476. end while
  11477. set_control_par(%pfy4f[20*$v02mu+10+%h152r[$v02mu]],$CONTROL_PAR_HIDE,$dyt1q)
  11478. set_control_par(%pfy4f[20*$v02mu+1],$CONTROL_PAR_VALUE,%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])])
  11479. if (get_menu_item_value(%pfy4f[20*$v02mu+1],get_control_par(%pfy4f[20*$v02mu+1],$CONTROL_PAR_VALUE))=$EFFECT_TYPE_IRC)
  11480. set_control_par(%pfy4f[20*$v02mu],$CONTROL_PAR_VALUE,%3zszw[8*%mpjcc[$v02mu]+%h152r[$v02mu]])
  11481. else
  11482. set_control_par(%pfy4f[20*$v02mu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11483. set_control_par(%pfy4f[20*$v02mu+9],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11484. set_control_par(%pfy4f[20*$v02mu+8],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11485. end if
  11486. if (get_menu_item_value(%pfy4f[20*$v02mu+1],get_control_par(%pfy4f[20*$v02mu+1],$CONTROL_PAR_VALUE))=$EFFECT_TYPE_FILTER)
  11487. set_control_par(%pfy4f[20*$v02mu+3],$CONTROL_PAR_VALUE,search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$v02mu],%h152r[$v02mu],%zjgrf[$v02mu]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$v02mu],%h152r[$v02mu],%zjgrf[$v02mu]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$v02mu],%h152r[$v02mu],%zjgrf[$v02mu])))))
  11488. end if
  11489. set_control_par(%pfy4f[20*$v02mu+1],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11490. set_control_par(%pfy4f[20*$v02mu+3],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11491. if ($v02mu<3)
  11492. $ohjfi := 0
  11493. while ($ohjfi<4)
  11494. set_control_par(%b4wh2[4*$v02mu+$ohjfi],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11495. inc($ohjfi)
  11496. end while
  11497. if (search(%pxmow,get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])) # -1 and (get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)=0))
  11498. set_control_par(%b4wh2[4*$v02mu+%h152r[$v02mu]],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11499. set_control_par(%25l4m[8+1+sh_right(abs($v02mu-0)-1,31)],$CONTROL_PAR_PICTURE_STATE,-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_LIMITER)-1,31)+-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$EFFECT_TYPE_TRANSLIM)-1,31))
  11500. end if
  11501. set_control_par(%25l4m[8+1+sh_right(abs($v02mu-0)-1,31)],$CONTROL_PAR_HIDE,get_control_par(%b4wh2[4*$v02mu+%h152r[$v02mu]],$CONTROL_PAR_HIDE))
  11502. end if
  11503. if (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)))=8 or (get_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_VALUE)=1))
  11504. set_control_par(%pfy4f[20*$v02mu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11505. set_control_par(%pfy4f[20*$v02mu+9],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11506. set_control_par(%pfy4f[20*$v02mu+8],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11507. set_control_par(%pfy4f[20*$v02mu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11508. set_control_par(%pfy4f[20*$v02mu+7],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11509. if (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)))=8)
  11510. set_control_par(%pfy4f[20*$v02mu+2],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11511. set_control_par(%pfy4f[20*$v02mu+5],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11512. set_control_par(%pfy4f[20*$v02mu+6],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11513. set_control_par(%pfy4f[20*$v02mu+10+%h152r[$v02mu]],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11514. set_control_par(%pfy4f[20*$v02mu+4],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11515. end if
  11516. else
  11517. set_control_par(%pfy4f[20*$v02mu+2],$CONTROL_PAR_VALUE,%l2lis[8*%mpjcc[$v02mu]+%h152r[$v02mu]])
  11518. $3wsjr := 0
  11519. while ($3wsjr<25)
  11520. if ($3wsjr<%FXC__num_presets4cat[%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)))])
  11521. set_menu_item_str(%pfy4f[20*$v02mu+2],$3wsjr,!_preset_names[25*(%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31))))+$3wsjr])
  11522. set_menu_item_visibility(%pfy4f[20*$v02mu+2],$3wsjr,1)
  11523. else
  11524. set_menu_item_visibility(%pfy4f[20*$v02mu+2],$3wsjr,0)
  11525. end if
  11526. inc($3wsjr)
  11527. end while
  11528. end if
  11529. $4ii0j := 0
  11530. while ($4ii0j<38)
  11531. $4kfp4 := get_menu_item_value(%pfy4f[20*$v02mu+1],$4ii0j)
  11532. if (%lwrqe[%mpjcc[$v02mu]]=1 and (-sh_right(-1-search(%augte,$4kfp4),31)=0) or (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$v02mu]])-1,31))) # %45vq1[8*%mpjcc[$v02mu]+%h152r[$v02mu]]))
  11533. set_menu_item_visibility(%pfy4f[20*$v02mu+1],$4ii0j,0)
  11534. else
  11535. set_menu_item_visibility(%pfy4f[20*$v02mu+1],$4ii0j,1)
  11536. end if
  11537. inc($4ii0j)
  11538. end while
  11539. if (-sh_right(-1-%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$v02mu]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$v02mu]],%h152r[$v02mu],%zjgrf[%mpjcc[$v02mu]])]],31)=1)
  11540. set_control_par(%pfy4f[20*$v02mu+7],$CONTROL_PAR_VALUE,%sxlyt[8*%mpjcc[$v02mu]+%h152r[$v02mu]])
  11541. else
  11542. set_control_par(%pfy4f[20*$v02mu+7],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11543. end if
  11544. set_control_par(%pfy4f[20*$v02mu+10+%h152r[$v02mu]],$CONTROL_PAR_VALUE,%pqcgh[8*%mpjcc[$v02mu]+%h152r[$v02mu]])
  11545. set_control_par(%pfy4f[64],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11546. set_control_par(%pfy4f[84],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11547. end function
  11548. function _update_mod_knob_range_indicator_for_gl_m_id
  11549. if (%c1qym[$gpzoi] # -1)
  11550. if (get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)>=0)
  11551. set_control_par_str(%2hswt[$gpzoi],$CONTROL_PAR_PICTURE,"MK_RngP" & !4gjzd[$gpzoi])
  11552. set_control_par_str(%41o3s[$gpzoi],$CONTROL_PAR_PICTURE,"MK_KnbP" & !4gjzd[$gpzoi])
  11553. $tkfsc := (get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)-%dwdw3[$gpzoi]+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))*101/%qxmpr[$gpzoi]
  11554. if ($tkfsc>100)
  11555. $tkfsc := 100
  11556. end if
  11557. if ($tmkul=0)
  11558. set_control_par(%2hswt[$gpzoi],$CONTROL_PAR_PICTURE_STATE,$tkfsc)
  11559. end if
  11560. else
  11561. set_control_par_str(%2hswt[$gpzoi],$CONTROL_PAR_PICTURE,"MK_RngN" & !4gjzd[$gpzoi])
  11562. set_control_par_str(%41o3s[$gpzoi],$CONTROL_PAR_PICTURE,"MK_KnbN" & !4gjzd[$gpzoi])
  11563. if ($tmkul=0)
  11564. set_control_par(%2hswt[$gpzoi],$CONTROL_PAR_PICTURE_STATE,(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)-%dwdw3[$gpzoi]+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))*101/%qxmpr[$gpzoi])
  11565. end if
  11566. end if
  11567. end if
  11568. end function
  11569. function update_all_mod_knob_range_indicator
  11570. $gpzoi := 0
  11571. while (%n34di[$gpzoi] # -1)
  11572. call _update_mod_knob_range_indicator_for_gl_m_id
  11573. inc($gpzoi)
  11574. end while
  11575. end function
  11576. function _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  11577. $tkfsc := (get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)-%dwdw3[$gpzoi]+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000))*101/%qxmpr[$gpzoi]
  11578. if (get_control_par(%lm23w[$gpzoi],$CONTROL_PAR_PICTURE_STATE) # $tkfsc)
  11579. set_control_par(%lm23w[$gpzoi],$CONTROL_PAR_PICTURE_STATE,$tkfsc-(-sh_right(100-$tkfsc,31)*($tkfsc-100)))
  11580. end if
  11581. end function
  11582. function _update_mod_knob_rt_indicator_for_gl_m_id
  11583. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  11584. select ($gpzoi)
  11585. case 15
  11586. call update_g_pos_hit_anker_ui
  11587. case 24
  11588. call calc_g_area_vars
  11589. call update_g_rng_min_area
  11590. case 25
  11591. call calc_g_area_vars
  11592. call update_g_rng_max_area
  11593. case 13
  11594. call calc_g_area_vars
  11595. call update_g_rng_max_area
  11596. case 30
  11597. call update_s_wf_start_indic_label_position
  11598. case 9
  11599. call ARP__update_step_dur_display
  11600. end select
  11601. end function
  11602. function update_all_mod_knob_rt_indicator_mono
  11603. $jdgl1 := 0
  11604. while ($jdgl1<48)
  11605. $gpzoi := %xdonk[$jdgl1]
  11606. call _update_mod_knob_rt_indicator_for_gl_m_id
  11607. inc($jdgl1)
  11608. end while
  11609. end function
  11610. function show_layer_fx_view
  11611. $fg4rw := 0
  11612. while ($fg4rw<200)
  11613. $duehg := 0
  11614. $qohq4 := 0
  11615. while ($qohq4<=31)
  11616. if (sh_right(1 .or. %konvz[$mdykc],$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
  11617. $duehg := 1
  11618. $qohq4 := 32
  11619. end if
  11620. inc($qohq4)
  11621. end while
  11622. $g5k3r := 0
  11623. while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
  11624. if ($duehg=0)
  11625. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11626. else
  11627. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
  11628. end if
  11629. inc($g5k3r)
  11630. end while
  11631. inc($fg4rw)
  11632. end while
  11633. $qlteh := 0
  11634. call _FX_UI__update_ui_controls_for_global_set_id
  11635. call update_all_mod_knob_range_indicator
  11636. call update_all_mod_knob_rt_indicator_mono
  11637. $qlteh := 1
  11638. call _FX_UI__update_ui_controls_for_global_set_id
  11639. call update_all_mod_knob_range_indicator
  11640. call update_all_mod_knob_rt_indicator_mono
  11641. call position_XY_center_big
  11642. end function
  11643. function show_master_fx_view
  11644. $fg4rw := 0
  11645. while ($fg4rw<200)
  11646. $duehg := 0
  11647. $qohq4 := 0
  11648. while ($qohq4<=31)
  11649. if (sh_right(8 .or. %konvz[$mdykc],$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
  11650. $duehg := 1
  11651. $qohq4 := 32
  11652. end if
  11653. inc($qohq4)
  11654. end while
  11655. $g5k3r := 0
  11656. while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
  11657. if ($duehg=0)
  11658. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11659. else
  11660. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
  11661. end if
  11662. inc($g5k3r)
  11663. end while
  11664. inc($fg4rw)
  11665. end while
  11666. $qlteh := 2
  11667. call _FX_UI__update_ui_controls_for_global_set_id
  11668. call update_all_mod_knob_range_indicator
  11669. call update_all_mod_knob_rt_indicator_mono
  11670. call position_XY_center_big
  11671. end function
  11672. function BRW__update_search_result_selection
  11673. $lz0yu := 0
  11674. while ($lz0yu<19)
  11675. set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_VALUE,-sh_right(abs(%3owef[500*$zor2m+$fykja+$lz0yu]-%jj5qi[$zor2m])-1,31))
  11676. inc($lz0yu)
  11677. end while
  11678. end function
  11679. function BRW__update_scrollbar_handle
  11680. set_control_par(get_ui_id($y0dw3),$CONTROL_PAR_HEIGHT,(%k4yha[$zor2m]*(1+sh_right(%k4yha[$zor2m]-19,31))-(19*sh_right(%k4yha[$zor2m]-19,31))-19)*(30-(get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HEIGHT)-4))/(%BRW__num_preset_in_search_pool_array[$zor2m]-19)+(get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HEIGHT)-4))
  11681. set_control_par(get_ui_id($y0dw3),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_POS_Y)+($z2tnd-1000)*(get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HEIGHT)-4-get_control_par(get_ui_id($y0dw3),$CONTROL_PAR_HEIGHT)-2)/-1000+2)
  11682. $dyt1q := (get_control_par(get_ui_id($y0dw3),$CONTROL_PAR_HEIGHT)-30)*-4650/(get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HEIGHT)-4-30)+-2350
  11683. set_control_par(get_ui_id($z2tnd),$CONTROL_PAR_MOUSE_BEHAVIOUR,$dyt1q+(-sh_right($dyt1q--5000,31)*(-5000-$dyt1q)))
  11684. end function
  11685. function BRW__deselect_obsolet_cat_btn
  11686. $lz0yu := 0
  11687. while ($lz0yu<4)
  11688. $n025a := $zor2m*4+$lz0yu
  11689. $rc1ud := 0
  11690. while ($rc1ud<%ey2zb[$n025a])
  11691. $taxye := %0mw41[%t1pnk[$n025a]+$rc1ud]
  11692. $xjzii := 0
  11693. $uuj1q := 0
  11694. while ($uuj1q<%k4yha[$zor2m])
  11695. if (sh_right(%_BRW__search_pool_array[1000*$zor2m+(2*%3owef[500*$zor2m+$uuj1q])+($taxye/32)],$taxye) .and. 1=1)
  11696. $xjzii := 1
  11697. $uuj1q := %k4yha[$zor2m]
  11698. end if
  11699. inc($uuj1q)
  11700. end while
  11701. if ($xjzii=1)
  11702. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE,%aydym[3])
  11703. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[12])
  11704. else
  11705. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE,%aydym[5])
  11706. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[5])
  11707. end if
  11708. inc($rc1ud)
  11709. end while
  11710. inc($lz0yu)
  11711. end while
  11712. end function
  11713. function BRW__update_search_result_list_ui
  11714. if (%k4yha[$zor2m]>19)
  11715. $fykja := ($z2tnd-1000)*(%k4yha[$zor2m]-19-0)/-1000
  11716. set_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11717. else
  11718. $fykja := 0
  11719. $z2tnd := 1000
  11720. set_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11721. end if
  11722. $rc1ud := 0
  11723. while ($rc1ud<19)
  11724. if (%3owef[500*$zor2m+$rc1ud]>=0)
  11725. set_control_par_str(%wqnrl[$rc1ud],$CONTROL_PAR_TEXT,!_BRW__preset_names[500*$zor2m+%3owef[500*$zor2m+$fykja+$rc1ud]])
  11726. set_control_par(%4gyqw[$rc1ud],$CONTROL_PAR_VALUE,%_BRW__user_fav_array[500*$zor2m+%3owef[500*$zor2m+$fykja+$rc1ud]])
  11727. set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11728. set_control_par(%4gyqw[$rc1ud],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11729. else
  11730. set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11731. set_control_par(%4gyqw[$rc1ud],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11732. end if
  11733. set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_FONT_TYPE,%aydym[3])
  11734. set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[12])
  11735. inc($rc1ud)
  11736. end while
  11737. set_control_par_str(get_ui_id($les2u),$CONTROL_PAR_PICTURE,"GE_Next_btn_1" & (1+sh_right(abs(%k4yha[$zor2m]-%BRW__num_preset_in_search_pool_array[$zor2m])-1,31)))
  11738. set_control_par_str(get_ui_id($wwkuw),$CONTROL_PAR_PICTURE,"GE_Prev_btn_1" & (1+sh_right(abs(%k4yha[$zor2m]-%BRW__num_preset_in_search_pool_array[$zor2m])-1,31)))
  11739. $dyt1q := 0
  11740. $lpg20 := 0
  11741. while ($lpg20<2)
  11742. $dyt1q := $dyt1q+%iz114[4*$zor2m+(2*$lpg20)]+%iz114[4*$zor2m+(2*$lpg20)+1]
  11743. inc($lpg20)
  11744. end while
  11745. $bbjq4 := 1+sh_right(abs($dyt1q-0)-1,31)
  11746. call BRW__update_search_result_selection
  11747. call BRW__update_scrollbar_handle
  11748. call BRW__deselect_obsolet_cat_btn
  11749. end function
  11750. function BRW__update_preset_name_display
  11751. set_control_par_str(get_ui_id($z3l5q),$CONTROL_PAR_TEXT,!_BRW__preset_names[500*$zor2m+%jj5qi[$zor2m]])
  11752. end function
  11753. function _BRW__update_ui_for_sel_file_type
  11754. $lz0yu := 0
  11755. while ($lz0yu<4)
  11756. $rc1ud := 0
  11757. while ($rc1ud<18)
  11758. if ($rc1ud<%fgbiy[$zor2m*4+$lz0yu])
  11759. $dyt1q := %0mw41[%t1pnk[$zor2m*4+$lz0yu]+$rc1ud]
  11760. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_VALUE,sh_right(%iz114[4*$zor2m+(2*($dyt1q/32))],$dyt1q mod 32) .and. 1 .or. (sh_right(%iz114[4*$zor2m+(2*($dyt1q/32))+1],$dyt1q mod 32) .and. 1))
  11761. $r0pwv := %aydym[%blrx5[$zor2m+(%e0xxd[72*$zor2m+(18*$lz0yu)+$rc1ud]*3)]]
  11762. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_ON,$r0pwv)
  11763. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_ON_HOVER,$r0pwv)
  11764. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_ON_PRESSED,$r0pwv)
  11765. set_control_par_str(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_TEXT,!udzrt[%0sc2s[$zor2m*4+$lz0yu]+$rc1ud])
  11766. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11767. else
  11768. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11769. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_VALUE,0)
  11770. end if
  11771. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE,%aydym[3])
  11772. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[12])
  11773. inc($rc1ud)
  11774. end while
  11775. inc($lz0yu)
  11776. end while
  11777. $rc1ud := 0
  11778. while ($rc1ud<19)
  11779. set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_FONT_TYPE_ON,%aydym[%blrx5[$zor2m]])
  11780. set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_FONT_TYPE_ON_HOVER,%aydym[%blrx5[$zor2m]])
  11781. set_control_par(%wqnrl[$rc1ud],$CONTROL_PAR_FONT_TYPE_ON_PRESSED,%aydym[%blrx5[$zor2m]])
  11782. set_control_par_str(%4gyqw[$rc1ud],$CONTROL_PAR_TEXT,"")
  11783. inc($rc1ud)
  11784. end while
  11785. set_control_par(get_ui_id($z3l5q),$CONTROL_PAR_FONT_TYPE,%aydym[%pjbav[$zor2m]])
  11786. $d5tn2 := %31af0[$zor2m]
  11787. call BRW__apply_mask_to_search_pool_for_sel_file_type
  11788. if (%kt24s[$zor2m] # -1)
  11789. if ($uciwo=1)
  11790. $z2tnd := ((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000)*(1+(sh_right(1000-((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000),31) .or. sh_right((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000-0,31)))-0-(1000*sh_right(1000-((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000),31))
  11791. end if
  11792. $uciwo := 1
  11793. else
  11794. $z2tnd := 1000
  11795. end if
  11796. call BRW__update_search_result_list_ui
  11797. call BRW__update_preset_name_display
  11798. end function
  11799. function position_XY_browser_small
  11800. set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_X,40)
  11801. set_control_par(get_ui_id(?xy),$CONTROL_PAR_POS_Y,450)
  11802. set_control_par(get_ui_id(?xy),$CONTROL_PAR_WIDTH,89)
  11803. set_control_par(get_ui_id(?xy),$CONTROL_PAR_HEIGHT,89)
  11804. set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_PICTURE,"GE_XY_Backing")
  11805. set_control_par_str(get_ui_id(?xy),$CONTROL_PAR_CURSOR_PICTURE,"GE_XY_Cursor_0")
  11806. end function
  11807. function SHAPER__update_ui
  11808. $fg4rw := 0
  11809. while ($fg4rw<5)
  11810. set_control_par(%tw2nn[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL*$oov5z)
  11811. set_control_par(%4osbd[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL*(($oov5z+1) mod 2))
  11812. inc($fg4rw)
  11813. end while
  11814. if ($oov5z=0)
  11815. set_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
  11816. else
  11817. set_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
  11818. end if
  11819. end function
  11820. function MOD__position_mod_menu_for_gl_m_id
  11821. if (%nwlgb[$gpzoi] # -1 and ($gpzoi # 27))
  11822. $dyt1q := %n34di[$gpzoi]
  11823. if ($gpzoi=26)
  11824. set_control_par($dyt1q,$CONTROL_PAR_POS_X,get_control_par(%nwlgb[26],$CONTROL_PAR_POS_X)+(%plcoy[get_menu_item_value($dyt1q,get_control_par($dyt1q,$CONTROL_PAR_VALUE))]*2)+1)
  11825. set_control_par($dyt1q,$CONTROL_PAR_WIDTH,get_control_par(%nwlgb[26],$CONTROL_PAR_POS_X)-get_control_par($dyt1q,$CONTROL_PAR_POS_X)-2)
  11826. else
  11827. set_control_par($dyt1q,$CONTROL_PAR_POS_X,get_control_par(%nwlgb[$gpzoi],$CONTROL_PAR_POS_X)+(get_control_par(%nwlgb[$gpzoi],$CONTROL_PAR_WIDTH)/2)+%plcoy[get_menu_item_value($dyt1q,get_control_par($dyt1q,$CONTROL_PAR_VALUE))])
  11828. set_control_par($dyt1q,$CONTROL_PAR_WIDTH,-%plcoy[get_menu_item_value($dyt1q,get_control_par($dyt1q,$CONTROL_PAR_VALUE))]*2-3)
  11829. if (%nwlgb[$gpzoi]=get_ui_id($3tqoo) or (%nwlgb[$gpzoi]=get_ui_id($1tszb)))
  11830. set_control_par($dyt1q,$CONTROL_PAR_POS_X,get_control_par($dyt1q,$CONTROL_PAR_POS_X)+1)
  11831. end if
  11832. end if
  11833. end if
  11834. end function
  11835. function MTX__update_ui
  11836. %nwlgb[1] := $3k3u2*get_ui_id($gehcz)+((.not. $3k3u2 .and. 1)*get_ui_id($3tqoo))
  11837. $gpzoi := 1
  11838. call MOD__position_mod_menu_for_gl_m_id
  11839. set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_TEXT,"")
  11840. set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_1")
  11841. set_control_par(get_ui_id($him5m),$CONTROL_PAR_PICTURE_STATE,3)
  11842. if ($3k3u2=0)
  11843. if (get_control_par(get_ui_id($3k3u2),$CONTROL_PAR_HIDE)=$HIDE_PART_NOTHING)
  11844. $g5k3r := 0
  11845. while (%xwg5s[400+$g5k3r]>0 and ($g5k3r<10))
  11846. set_control_par(%xwg5s[400+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[7600+(19*$g5k3r)+5])
  11847. inc($g5k3r)
  11848. end while
  11849. set_control_par(get_ui_id($gehcz),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11850. set_control_par(get_ui_id($0qzrr),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11851. end if
  11852. set_control_par(get_ui_id($zi2jx),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($1fo5x),$CONTROL_PAR_POS_Y)+12)
  11853. set_control_par(get_ui_id($him5m),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($3tqoo),$CONTROL_PAR_POS_Y)+31)
  11854. set_control_par(get_ui_id($him5m),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($3tqoo),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($3tqoo),$CONTROL_PAR_WIDTH)/2)-(get_control_par(get_ui_id($him5m),$CONTROL_PAR_WIDTH)/2))
  11855. else
  11856. set_control_par(get_ui_id($zi2jx),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($1fo5x),$CONTROL_PAR_POS_Y))
  11857. if (get_control_par(get_ui_id($3k3u2),$CONTROL_PAR_HIDE)=$HIDE_PART_NOTHING)
  11858. $g5k3r := 0
  11859. while (%xwg5s[400+$g5k3r]>0 and ($g5k3r<10))
  11860. set_control_par(%xwg5s[400+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11861. inc($g5k3r)
  11862. end while
  11863. set_control_par(get_ui_id($him5m),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11864. set_control_par(get_ui_id($zi2jx),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11865. set_control_par(get_ui_id($gehcz),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11866. set_control_par(get_ui_id($0qzrr),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11867. end if
  11868. set_control_par(get_ui_id($him5m),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($gehcz),$CONTROL_PAR_POS_Y)+get_control_par(get_ui_id($gehcz),$CONTROL_PAR_HEIGHT)+5)
  11869. $dyt1q := get_control_par(get_ui_id($gehcz),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($gehcz),$CONTROL_PAR_WIDTH)/2)+((get_control_par(get_ui_id($0qzrr),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($0qzrr),$CONTROL_PAR_WIDTH)/2)-(get_control_par(get_ui_id($gehcz),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($gehcz),$CONTROL_PAR_WIDTH)/2)))/2)
  11870. set_control_par(get_ui_id($him5m),$CONTROL_PAR_POS_X,$dyt1q-(get_control_par(get_ui_id($him5m),$CONTROL_PAR_WIDTH)/2))
  11871. end if
  11872. %nwlgb[3] := $13ap0*get_ui_id($ihtwl)+((.not. $13ap0 .and. 1)*get_ui_id($1tszb))
  11873. $gpzoi := 3
  11874. call MOD__position_mod_menu_for_gl_m_id
  11875. set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_TEXT,"")
  11876. set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_1")
  11877. set_control_par(get_ui_id($twgeq),$CONTROL_PAR_PICTURE_STATE,3)
  11878. if ($13ap0=0)
  11879. if (get_control_par(get_ui_id($13ap0),$CONTROL_PAR_HIDE)=$HIDE_PART_NOTHING)
  11880. $g5k3r := 0
  11881. while (%xwg5s[410+$g5k3r]>0 and ($g5k3r<10))
  11882. set_control_par(%xwg5s[410+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[7790+(19*$g5k3r)+5])
  11883. inc($g5k3r)
  11884. end while
  11885. set_control_par(get_ui_id($ihtwl),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11886. set_control_par(get_ui_id($pzeed),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11887. end if
  11888. set_control_par(get_ui_id($gxopj),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($z1x5e),$CONTROL_PAR_POS_Y)+12)
  11889. set_control_par(get_ui_id($twgeq),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($1tszb),$CONTROL_PAR_POS_Y)+31)
  11890. set_control_par(get_ui_id($twgeq),$CONTROL_PAR_POS_X,get_control_par(get_ui_id($1tszb),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($1tszb),$CONTROL_PAR_WIDTH)/2)-(get_control_par(get_ui_id($twgeq),$CONTROL_PAR_WIDTH)/2))
  11891. else
  11892. set_control_par(get_ui_id($gxopj),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($z1x5e),$CONTROL_PAR_POS_Y))
  11893. if (get_control_par(get_ui_id($13ap0),$CONTROL_PAR_HIDE)=$HIDE_PART_NOTHING)
  11894. $g5k3r := 0
  11895. while (%xwg5s[410+$g5k3r]>0 and ($g5k3r<10))
  11896. set_control_par(%xwg5s[410+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11897. inc($g5k3r)
  11898. end while
  11899. set_control_par(get_ui_id($twgeq),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11900. set_control_par(get_ui_id($gxopj),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11901. set_control_par(get_ui_id($ihtwl),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11902. set_control_par(get_ui_id($pzeed),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11903. end if
  11904. set_control_par(get_ui_id($twgeq),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_POS_Y)+get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_HEIGHT)+5)
  11905. $dyt1q := get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_WIDTH)/2)+((get_control_par(get_ui_id($pzeed),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($pzeed),$CONTROL_PAR_WIDTH)/2)-(get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_POS_X)+(get_control_par(get_ui_id($ihtwl),$CONTROL_PAR_WIDTH)/2)))/2)
  11906. set_control_par(get_ui_id($twgeq),$CONTROL_PAR_POS_X,$dyt1q-(get_control_par(get_ui_id($twgeq),$CONTROL_PAR_WIDTH)/2))
  11907. end if
  11908. end function
  11909. function LFO__update_ui
  11910. set_control_par(get_ui_id($zcuf4),$CONTROL_PAR_PICTURE_STATE,$doz2m)
  11911. set_control_par(get_ui_id($i5fky),$CONTROL_PAR_PICTURE_STATE,$1wrdd)
  11912. end function
  11913. function BOTTOM_TABS__update_ui
  11914. select ($mdykc)
  11915. case 0
  11916. $qlteh := 3
  11917. call _FX_UI__update_ui_controls_for_global_set_id
  11918. call update_all_mod_knob_range_indicator
  11919. call update_all_mod_knob_rt_indicator_mono
  11920. $qlteh := 4
  11921. call _FX_UI__update_ui_controls_for_global_set_id
  11922. call update_all_mod_knob_range_indicator
  11923. call update_all_mod_knob_rt_indicator_mono
  11924. case 1
  11925. call update_macro_knob_style
  11926. case 2
  11927. if ($0ib2k=1 or ($0ib2k=2))
  11928. $dyt1q := 0
  11929. else
  11930. $dyt1q := 1
  11931. end if
  11932. $g5k3r := 0
  11933. while (%xwg5s[600+$g5k3r]>0 and ($g5k3r<10))
  11934. if ($dyt1q=0)
  11935. set_control_par(%xwg5s[600+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11936. else
  11937. set_control_par(%xwg5s[600+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[11400+(19*$g5k3r)+5])
  11938. end if
  11939. inc($g5k3r)
  11940. end while
  11941. call SHAPER__update_ui
  11942. call MTX__update_ui
  11943. call LFO__update_ui
  11944. end select
  11945. $dyt1q := 0
  11946. if (($0ib2k=3 or ($0ib2k=4)) and ($mdykc # 2))
  11947. $dyt1q := 1
  11948. end if
  11949. $g5k3r := 0
  11950. while (%xwg5s[1400+$g5k3r]>0 and ($g5k3r<10))
  11951. if ($dyt1q=0)
  11952. set_control_par(%xwg5s[1400+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11953. else
  11954. set_control_par(%xwg5s[1400+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[26600+(19*$g5k3r)+5])
  11955. end if
  11956. inc($g5k3r)
  11957. end while
  11958. if ($mdykc=2)
  11959. set_control_par(get_ui_id($fpo2t),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  11960. set_control_par(get_ui_id($fpo2t),$CONTROL_PAR_PICTURE_STATE,-sh_right(2-$0ib2k,31))
  11961. else
  11962. set_control_par(get_ui_id($fpo2t),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11963. end if
  11964. if ($0ib2k=1 or ($0ib2k=2))
  11965. $g5k3r := 0
  11966. while (%xwg5s[540+$g5k3r]>0 and ($g5k3r<10))
  11967. set_control_par(%xwg5s[540+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[10260+(19*$g5k3r)+5])
  11968. inc($g5k3r)
  11969. end while
  11970. set_control_par(get_ui_id($fgho2),$CONTROL_PAR_PICTURE_STATE,$mdykc)
  11971. else
  11972. set_control_par(get_ui_id($fgho2),$CONTROL_PAR_PICTURE_STATE,$mdykc+3+-sh_right(abs($mdykc-2)-1,31))
  11973. end if
  11974. end function
  11975. function update_all_mod_knob_rt_indicator_poly
  11976. $jdgl1 := 0
  11977. while ($jdgl1<2)
  11978. $gpzoi := %ulgib[$jdgl1]
  11979. call _update_mod_knob_rt_indicator_for_gl_m_id
  11980. inc($jdgl1)
  11981. end while
  11982. $jdgl1 := 0
  11983. while ($jdgl1<19)
  11984. $gpzoi := %bsd31[$jdgl1]
  11985. call _update_mod_knob_rt_indicator_for_gl_m_id
  11986. inc($jdgl1)
  11987. end while
  11988. end function
  11989. function NAV_PAGE__update_main_nav
  11990. $fg4rw := 0
  11991. while ($fg4rw<5)
  11992. set_control_par(%0eutz[$fg4rw],$CONTROL_PAR_VALUE,-sh_right(abs($fg4rw-$0ib2k)-1,31))
  11993. inc($fg4rw)
  11994. end while
  11995. set_skin_offset(670*$0ib2k)
  11996. $y3mgr := 0
  11997. while ($y3mgr<32)
  11998. set_control_par(%krazg[$y3mgr],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  11999. inc($y3mgr)
  12000. end while
  12001. select ($0ib2k)
  12002. case 0
  12003. call show_perform_view
  12004. case 1
  12005. call show_grain_view
  12006. case 2
  12007. call show_samples_view
  12008. case 3
  12009. call show_layer_fx_view
  12010. case 4
  12011. call show_master_fx_view
  12012. case 5 to 7
  12013. $zor2m := $0ib2k-5
  12014. call _BRW__update_ui_for_sel_file_type
  12015. $fg4rw := 0
  12016. while ($fg4rw<200)
  12017. $duehg := 0
  12018. $qohq4 := 0
  12019. while ($qohq4<=31)
  12020. if (sh_right(32,$qohq4) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$qohq4) .and. 1=1))
  12021. $duehg := 1
  12022. $qohq4 := 32
  12023. end if
  12024. inc($qohq4)
  12025. end while
  12026. $g5k3r := 0
  12027. while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
  12028. if ($duehg=0)
  12029. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  12030. else
  12031. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
  12032. end if
  12033. inc($g5k3r)
  12034. end while
  12035. inc($fg4rw)
  12036. end while
  12037. call position_XY_browser_small
  12038. end select
  12039. if (in_range($0ib2k,1,4))
  12040. call BOTTOM_TABS__update_ui
  12041. end if
  12042. call update_all_mod_knob_range_indicator
  12043. call update_all_mod_knob_rt_indicator_mono
  12044. call update_all_mod_knob_rt_indicator_poly
  12045. if (in_range($0ib2k,0,3))
  12046. set_control_par(get_ui_id($wawce),$CONTROL_PAR_BG_COLOR,%mjtqu[$0ib2k*4])
  12047. set_control_par(get_ui_id($wawce),$CONTROL_PAR_OFF_COLOR,%mjtqu[$0ib2k*4])
  12048. set_control_par(get_ui_id($wawce),$CONTROL_PAR_ON_COLOR,%mjtqu[$0ib2k*4+1])
  12049. set_control_par(get_ui_id($wawce),$CONTROL_PAR_OVERLOAD_COLOR,%mjtqu[$0ib2k*4+1])
  12050. set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_BG_COLOR,%mjtqu[$0ib2k*4])
  12051. set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_OFF_COLOR,%mjtqu[$0ib2k*4])
  12052. set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_ON_COLOR,%mjtqu[$0ib2k*4+1])
  12053. set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_OVERLOAD_COLOR,%mjtqu[$0ib2k*4+1])
  12054. set_control_par(get_ui_id($l45sn),$CONTROL_PAR_BG_COLOR,%mjtqu[$0ib2k*4+2])
  12055. set_control_par(get_ui_id($l45sn),$CONTROL_PAR_OFF_COLOR,%mjtqu[$0ib2k*4+2])
  12056. set_control_par(get_ui_id($l45sn),$CONTROL_PAR_ON_COLOR,%mjtqu[$0ib2k*4+3])
  12057. set_control_par(get_ui_id($l45sn),$CONTROL_PAR_OVERLOAD_COLOR,%mjtqu[$0ib2k*4+3])
  12058. set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_BG_COLOR,%mjtqu[$0ib2k*4+2])
  12059. set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_OFF_COLOR,%mjtqu[$0ib2k*4+2])
  12060. set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_ON_COLOR,%mjtqu[$0ib2k*4+3])
  12061. set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_OVERLOAD_COLOR,%mjtqu[$0ib2k*4+3])
  12062. set_control_par(get_ui_id($wawce),$CONTROL_PAR_PEAK_COLOR,%mjtqu[$0ib2k*4+1])
  12063. set_control_par(get_ui_id($a0f5t),$CONTROL_PAR_PEAK_COLOR,%mjtqu[$0ib2k*4+1])
  12064. set_control_par(get_ui_id($l45sn),$CONTROL_PAR_PEAK_COLOR,%mjtqu[$0ib2k*4+3])
  12065. set_control_par(get_ui_id($ewm0k),$CONTROL_PAR_PEAK_COLOR,%mjtqu[$0ib2k*4+3])
  12066. !4gjzd[26] := !g0j20[%e4ffk[$0ib2k*2]]
  12067. !4gjzd[27] := !g0j20[%e4ffk[$0ib2k*2+1]]
  12068. set_control_par_str(%c1qym[26],$CONTROL_PAR_PICTURE,"MK_Slider" & !4gjzd[26])
  12069. set_control_par_str(%c1qym[27],$CONTROL_PAR_PICTURE,"MK_Slider" & !4gjzd[27])
  12070. set_control_par_str(get_ui_id($rnwew),$CONTROL_PAR_PICTURE,"MK_ind" & !4gjzd[26])
  12071. set_control_par_str(get_ui_id($grjvf),$CONTROL_PAR_PICTURE,"MK_ind" & !4gjzd[27])
  12072. $gpzoi := 26
  12073. call _update_mod_knob_range_indicator_for_gl_m_id
  12074. call _update_mod_knob_rt_indicator_for_gl_m_id
  12075. $gpzoi := 27
  12076. call _update_mod_knob_range_indicator_for_gl_m_id
  12077. call _update_mod_knob_rt_indicator_for_gl_m_id
  12078. $dyt1q := -sh_right(abs($0ib2k-2)-1,31) .or. -sh_right(abs($0ib2k-0)-1,31)
  12079. set_control_par_str(get_ui_id($uekic),$CONTROL_PAR_PICTURE,"GE_GRAIN_SRC_NAMES_" & ($dyt1q+-sh_right(abs($0ib2k-0)-1,31)))
  12080. if ($0ib2k=0)
  12081. set_control_par(get_ui_id($uekic),$CONTROL_PAR_FONT_TYPE,%aydym[11])
  12082. else
  12083. set_control_par(get_ui_id($uekic),$CONTROL_PAR_FONT_TYPE,%aydym[1-$dyt1q])
  12084. end if
  12085. set_control_par_str(get_ui_id($1c3gj),$CONTROL_PAR_PICTURE,"GE_BLANK_HOVER_BTN_G_" & (-sh_right(abs($0ib2k-0)-1,31)*2+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*$dyt1q)))
  12086. set_control_par_str(get_ui_id($spdyk),$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & $dyt1q)
  12087. set_control_par_str(get_ui_id($udker),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & $dyt1q & (1+sh_right(abs(%k4yha[0]-%BRW__num_preset_in_search_pool_array[0])-1,31)))
  12088. set_control_par_str(get_ui_id($2ch0u),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & $dyt1q & (1+sh_right(abs(%k4yha[0]-%BRW__num_preset_in_search_pool_array[0])-1,31)))
  12089. $dyt1q := -sh_right(abs($0ib2k-1)-1,31) .or. -sh_right(abs($0ib2k-0)-1,31)
  12090. set_control_par_str(get_ui_id($mm1ti),$CONTROL_PAR_PICTURE,"GE_BLANK_HOVER_BTN_S_" & (-sh_right(abs($0ib2k-0)-1,31)*2+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*$dyt1q)))
  12091. if ($0ib2k=0)
  12092. set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_PICTURE,"GE_SMPL_SRC_NAMES_2")
  12093. set_control_par(get_ui_id($anchr),$CONTROL_PAR_FONT_TYPE,%aydym[11])
  12094. else
  12095. set_control_par_str(get_ui_id($anchr),$CONTROL_PAR_PICTURE,"GE_SMPL_SRC_NAMES_" & $dyt1q)
  12096. set_control_par(get_ui_id($anchr),$CONTROL_PAR_FONT_TYPE,%aydym[1-$dyt1q])
  12097. end if
  12098. set_control_par_str(get_ui_id($t4vew),$CONTROL_PAR_PICTURE,"GE_ON_OFF_btn_" & $dyt1q)
  12099. set_control_par_str(get_ui_id($3r1av),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & $dyt1q & (1+sh_right(abs(%k4yha[1]-%BRW__num_preset_in_search_pool_array[1])-1,31)))
  12100. set_control_par_str(get_ui_id($0l4xe),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & $dyt1q & (1+sh_right(abs(%k4yha[1]-%BRW__num_preset_in_search_pool_array[1])-1,31)))
  12101. if ($0ib2k=0)
  12102. set_control_par(%n34di[26],$CONTROL_PAR_FONT_TYPE,6800)
  12103. set_control_par(%n34di[27],$CONTROL_PAR_FONT_TYPE,6800)
  12104. set_control_par(%n34di[26],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[15])
  12105. set_control_par(%n34di[27],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,%aydym[15])
  12106. set_control_par(get_ui_id($sclhm),$CONTROL_PAR_FONT_TYPE,6800)
  12107. set_control_par(get_ui_id($rzycf),$CONTROL_PAR_FONT_TYPE,6800)
  12108. else
  12109. set_control_par(%n34di[26],$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-2)-1,31)*%aydym[0]+((.not. -sh_right(abs($0ib2k-2)-1,31) .and. 1)*%aydym[1]))
  12110. set_control_par(%n34di[26],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,-sh_right(abs($0ib2k-2)-1,31)*%aydym[11]+((.not. -sh_right(abs($0ib2k-2)-1,31) .and. 1)*%aydym[2]))
  12111. set_control_par(get_ui_id($sclhm),$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-2)-1,31)*%aydym[0]+((.not. -sh_right(abs($0ib2k-2)-1,31) .and. 1)*%aydym[1]))
  12112. set_control_par(%n34di[27],$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-1)-1,31)*%aydym[0]+((.not. -sh_right(abs($0ib2k-1)-1,31) .and. 1)*%aydym[1]))
  12113. set_control_par(%n34di[27],$CONTROL_PAR_FONT_TYPE_OFF_HOVER,-sh_right(abs($0ib2k-1)-1,31)*%aydym[11]+((.not. -sh_right(abs($0ib2k-1)-1,31) .and. 1)*%aydym[2]))
  12114. set_control_par(get_ui_id($rzycf),$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-1)-1,31)*%aydym[0]+((.not. -sh_right(abs($0ib2k-1)-1,31) .and. 1)*%aydym[1]))
  12115. end if
  12116. end if
  12117. set_control_par(get_ui_id($ojlo0),$CONTROL_PAR_FONT_TYPE,-sh_right(abs($0ib2k-0)-1,31)*%aydym[16]+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*%aydym[7]))
  12118. set_control_par(get_ui_id($ojlo0),$CONTROL_PAR_FONT_TYPE_OFF_HOVER,-sh_right(abs($0ib2k-0)-1,31)*%aydym[8]+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*%aydym[8]))
  12119. set_control_par(get_ui_id($ojlo0),$CONTROL_PAR_FONT_TYPE_OFF_PRESSED,-sh_right(abs($0ib2k-0)-1,31)*%aydym[8]+((.not. -sh_right(abs($0ib2k-0)-1,31) .and. 1)*%aydym[8]))
  12120. set_control_par_str(get_ui_id($mb40x),$CONTROL_PAR_PICTURE,"GE_Prev_btn_" & "1" & (1+sh_right(abs(%k4yha[2]-%BRW__num_preset_in_search_pool_array[2])-1,31)))
  12121. set_control_par_str(get_ui_id($0efsn),$CONTROL_PAR_PICTURE,"GE_Next_btn_" & "1" & (1+sh_right(abs(%k4yha[2]-%BRW__num_preset_in_search_pool_array[2])-1,31)))
  12122. set_control_par_str(get_ui_id($siaxq),$CONTROL_PAR_PICTURE,"GE_MACRO_DROP_DN_SHORT_" & -sh_right(abs($0ib2k-0)-1,31) & $siaxq)
  12123. set_control_par_str(get_ui_id($yazuk),$CONTROL_PAR_PICTURE,"GE_MACRO_DROP_DN_SHORT_" & -sh_right(abs($0ib2k-0)-1,31) & $yazuk)
  12124. if ($yhwrb=1)
  12125. $yhwrb := 0
  12126. set_menu_item_str(get_ui_id($siaxq),0,get_menu_item_str(get_ui_id($siaxq),0))
  12127. end if
  12128. end function
  12129. function MOD__store_current_mod_context
  12130. $jdgl1 := 0
  12131. while ($jdgl1<24)
  12132. %qum0u[$jdgl1] := %ppvim[$jdgl1]
  12133. inc($jdgl1)
  12134. end while
  12135. end function
  12136. function set_mod_knob_engine_par_with_permanent_modulation_for_gl_m_id
  12137. if (%hivzv[$gpzoi]=1 and (%c1qym[$gpzoi] # 0))
  12138. call set_mod_knob_group_engine_par_for_gl_m_id
  12139. call _update_mod_knob_rt_indicator_for_gl_m_id
  12140. end if
  12141. end function
  12142. function update_poly_mod_event_id
  12143. if (event_status($pfgf4)=$EVENT_STATUS_NOTE_QUEUE)
  12144. $4ggtc := $pfgf4
  12145. else
  12146. if (event_status($ukkxs)=$EVENT_STATUS_NOTE_QUEUE)
  12147. $4ggtc := $ukkxs
  12148. else
  12149. if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE and ($ruhe4=0))
  12150. $4ggtc := $auli3
  12151. else
  12152. $y3mgr := 0
  12153. while (%mc3xd[$y3mgr]=0 and ($y3mgr<15))
  12154. inc($y3mgr)
  12155. end while
  12156. if ($y3mgr<15 and (event_status(%mc3xd[$y3mgr])=$EVENT_STATUS_NOTE_QUEUE))
  12157. $4ggtc := %mc3xd[$y3mgr]
  12158. else
  12159. $y3mgr := 0
  12160. while ($y3mgr<256)
  12161. if (event_status(%5ggz3[$y3mgr])=$EVENT_STATUS_NOTE_QUEUE)
  12162. $4ggtc := %5ggz3[$y3mgr]
  12163. $y3mgr := 256
  12164. end if
  12165. inc($y3mgr)
  12166. end while
  12167. end if
  12168. end if
  12169. end if
  12170. end if
  12171. if ($4ggtc # $bh4s5)
  12172. $wkxzh := 1
  12173. $bh4s5 := $4ggtc
  12174. else
  12175. $wkxzh := 0
  12176. end if
  12177. $bctbb := %laljf[$4ggtc mod 8192]
  12178. end function
  12179. function update_mod_knob_cont_params_for_gl_m_id
  12180. if (%hivzv[$gpzoi]=1)
  12181. call _update_mod_knob_rt_indicator_for_gl_m_id
  12182. end if
  12183. end function
  12184. function SHP1__update_mod_vals
  12185. $dyt1q := %ppvim[$cvjhr]*(1+(sh_right(1000-%ppvim[$cvjhr],31) .or. sh_right(%ppvim[$cvjhr]-0,31)))-0-(1000*sh_right(1000-%ppvim[$cvjhr],31))
  12186. select ($ytzwi)
  12187. case 0
  12188. $vxhwf := ($dyt1q-1)*$gllpo/1000
  12189. $vxhwf := $vxhwf*(1+(sh_right($gllpo-1-$vxhwf,31) .or. sh_right($vxhwf-0,31)))-0-(($gllpo-1)*sh_right($gllpo-1-$vxhwf,31))
  12190. %ppvim[2] := %w0xec[$vxhwf]
  12191. if ($oj0wr=1 and (get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
  12192. set_control_par(get_ui_id($paonj),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_POS_X)+3+real_to_int(int_to_real($vxhwf)*~zxkmy))
  12193. set_control_par(get_ui_id($paonj),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_POS_Y)+3)
  12194. set_control_par(get_ui_id($paonj),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_POS_X)+2+real_to_int(int_to_real($vxhwf+1)*~zxkmy)-get_control_par(get_ui_id($paonj),$CONTROL_PAR_POS_X))
  12195. set_control_par(get_ui_id($paonj),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HEIGHT)-6)
  12196. end if
  12197. case 1 to 2
  12198. ~wn00q := 1000.0/int_to_real($gllpo-1)
  12199. $vxhwf := real_to_int(int_to_real($dyt1q)/~wn00q)
  12200. ~frgrz := (int_to_real($dyt1q)-(~wn00q*int_to_real($vxhwf)))/~wn00q
  12201. if ($ytzwi=2)
  12202. ~frgrz := ~frgrz*~frgrz*~frgrz*(10.0+(~frgrz*(6.0*~frgrz-15.0)))
  12203. end if
  12204. if ($vxhwf>=($gllpo-1))
  12205. %ppvim[2] := %w0xec[$vxhwf]
  12206. else
  12207. %ppvim[2] := %w0xec[$vxhwf]+real_to_int(int_to_real(%w0xec[$vxhwf+1]-%w0xec[$vxhwf])*~frgrz)
  12208. end if
  12209. if ($oj0wr=1 and (get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
  12210. $kkmz2 := %ppvim[2]*(get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HEIGHT)-6)/1000
  12211. set_control_par(get_ui_id($paonj),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_POS_X)+3+(real_to_int(int_to_real($gllpo-1)*~zxkmy)*$dyt1q/999))
  12212. set_control_par(get_ui_id($paonj),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_POS_Y)+(get_control_par(get_ui_id(%w0xec),$CONTROL_PAR_HEIGHT)-4)-$kkmz2)
  12213. set_control_par(get_ui_id($paonj),$CONTROL_PAR_WIDTH,real_to_int(~zxkmy))
  12214. set_control_par(get_ui_id($paonj),$CONTROL_PAR_HEIGHT,$kkmz2+1)
  12215. end if
  12216. end select
  12217. end function
  12218. function SHP2__update_mod_vals
  12219. $dyt1q := %ppvim[$fpvgj]*(1+(sh_right(1000-%ppvim[$fpvgj],31) .or. sh_right(%ppvim[$fpvgj]-0,31)))-0-(1000*sh_right(1000-%ppvim[$fpvgj],31))
  12220. select ($f3u5d)
  12221. case 0
  12222. $a1lqd := ($dyt1q-1)*$hn35i/1000
  12223. $a1lqd := $a1lqd*(1+(sh_right($hn35i-1-$a1lqd,31) .or. sh_right($a1lqd-0,31)))-0-(($hn35i-1)*sh_right($hn35i-1-$a1lqd,31))
  12224. %ppvim[3] := %rzzs4[$a1lqd]
  12225. if ($oj0wr=1 and (get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
  12226. set_control_par(get_ui_id($qnejb),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_POS_X)+3+real_to_int(int_to_real($a1lqd)*~c2vo0))
  12227. set_control_par(get_ui_id($qnejb),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_POS_Y)+3)
  12228. set_control_par(get_ui_id($qnejb),$CONTROL_PAR_WIDTH,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_POS_X)+2+real_to_int(int_to_real($a1lqd+1)*~c2vo0)-get_control_par(get_ui_id($qnejb),$CONTROL_PAR_POS_X))
  12229. set_control_par(get_ui_id($qnejb),$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HEIGHT)-6)
  12230. end if
  12231. case 1 to 2
  12232. ~ndqvl := 1000.0/int_to_real($hn35i-1)
  12233. $a1lqd := real_to_int(int_to_real($dyt1q)/~ndqvl)
  12234. ~4pkcz := (int_to_real($dyt1q)-(~ndqvl*int_to_real($a1lqd)))/~ndqvl
  12235. if ($f3u5d=2)
  12236. ~4pkcz := ~4pkcz*~4pkcz*~4pkcz*(10.0+(~4pkcz*(6.0*~4pkcz-15.0)))
  12237. end if
  12238. if ($a1lqd>=($hn35i-1))
  12239. %ppvim[3] := %rzzs4[$a1lqd]
  12240. else
  12241. %ppvim[3] := %rzzs4[$a1lqd]+real_to_int(int_to_real(%rzzs4[$a1lqd+1]-%rzzs4[$a1lqd])*~4pkcz)
  12242. end if
  12243. if ($oj0wr=1 and (get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
  12244. $z1wbi := %ppvim[3]*(get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HEIGHT)-6)/1000
  12245. set_control_par(get_ui_id($qnejb),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_POS_X)+3+(real_to_int(int_to_real($hn35i-1)*~c2vo0)*$dyt1q/999))
  12246. set_control_par(get_ui_id($qnejb),$CONTROL_PAR_POS_Y,get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_POS_Y)+(get_control_par(get_ui_id(%rzzs4),$CONTROL_PAR_HEIGHT)-4)-$z1wbi)
  12247. set_control_par(get_ui_id($qnejb),$CONTROL_PAR_WIDTH,real_to_int(~c2vo0))
  12248. set_control_par(get_ui_id($qnejb),$CONTROL_PAR_HEIGHT,$z1wbi+1)
  12249. end if
  12250. end select
  12251. end function
  12252. function LFO1__update_mod_vals
  12253. $ebpbv := %laljf[$dc3zm mod 8192]
  12254. if (($e2mne=3 or ($e2mne=4)) and (?lrdg1[$ebpbv]>(0.9999+(int_to_real($rj2yq)/360.0))))
  12255. ?lrdg1[$ebpbv] := 0.9999+(int_to_real($rj2yq)/360.0)
  12256. end if
  12257. select ($doz2m)
  12258. case 0
  12259. %icfc1[$ebpbv] := real_to_int(sin(?lrdg1[$ebpbv]*2.0*~NI_MATH_PI)*1000000.0*0.5+500000.0)
  12260. case 1
  12261. %icfc1[$ebpbv] := 1000000-abs(real_to_int(2.0*?lrdg1[$ebpbv]*1000000.0) mod 2000000-1000000)
  12262. case 7
  12263. %icfc1[$ebpbv] := real_to_int((1.0-(?lrdg1[$ebpbv]-floor(?lrdg1[$ebpbv])))*1.99999)*1000000
  12264. case 2
  12265. %icfc1[$ebpbv] := real_to_int(1000000.0*(?lrdg1[$ebpbv]-floor(?lrdg1[$ebpbv])))
  12266. case 3
  12267. %icfc1[$ebpbv] := 1000000-real_to_int(1000000.0*(?lrdg1[$ebpbv]-floor(?lrdg1[$ebpbv])))
  12268. case 4
  12269. if (%iv2n3[$e2mne]=1 and ($ebpbv # $a2nqk))
  12270. %icfc1[$ebpbv] := %icfc1[$a2nqk]
  12271. else
  12272. if (?lrdg1[$ebpbv]>=?2bxj3[$ebpbv] or (?lrdg1[$ebpbv]<(?2bxj3[$ebpbv]-1.0)))
  12273. %icfc1[$ebpbv] := random(0,1000000)
  12274. ?2bxj3[$ebpbv] := floor(?lrdg1[$ebpbv])+1.0
  12275. end if
  12276. end if
  12277. case 5
  12278. if (?lrdg1[$ebpbv]>=?2bxj3[$ebpbv] or (?lrdg1[$ebpbv]<(?2bxj3[$ebpbv]-1.0)))
  12279. ?2bxj3[$ebpbv] := floor(?lrdg1[$ebpbv])+1.0
  12280. %105bp[$ebpbv] := random(0,1000000)
  12281. if (%icfc1[$ebpbv]=0)
  12282. %icfc1[$ebpbv] := random(0,1000000)
  12283. end if
  12284. end if
  12285. if (%iv2n3[$e2mne]=1 and ($ebpbv # $a2nqk))
  12286. %icfc1[$ebpbv] := %icfc1[$a2nqk]
  12287. else
  12288. %icfc1[$ebpbv] := %icfc1[$ebpbv]+real_to_int(int_to_real(%105bp[$ebpbv]-%icfc1[$ebpbv])*(?lrdg1[$ebpbv]-floor(?lrdg1[$ebpbv])))
  12289. end if
  12290. case 6
  12291. if (?lrdg1[$ebpbv]>=?2bxj3[$ebpbv] or (?lrdg1[$ebpbv]<(?2bxj3[$ebpbv]-1.0)))
  12292. ?2bxj3[$ebpbv] := floor(?lrdg1[$ebpbv])+1.0
  12293. %105bp[$ebpbv] := random(0,1000000)
  12294. if (%icfc1[$ebpbv]=0)
  12295. %icfc1[$ebpbv] := random(0,1000000)
  12296. end if
  12297. end if
  12298. if (%iv2n3[$e2mne]=1 and ($ebpbv # $a2nqk))
  12299. %icfc1[$ebpbv] := %icfc1[$a2nqk]
  12300. else
  12301. %icfc1[$ebpbv] := %icfc1[$ebpbv]+real_to_int(int_to_real(%105bp[$ebpbv]-%icfc1[$ebpbv])/375.0)
  12302. end if
  12303. end select
  12304. %ppvim[4] := %icfc1[$ebpbv]/1000
  12305. end function
  12306. function LFO2__update_mod_vals
  12307. $33eug := %laljf[$dc3zm mod 8192]
  12308. if (($eu0kx=3 or ($eu0kx=4)) and (?pu5ib[$33eug]>(0.9999+(int_to_real($s2bg4)/360.0))))
  12309. ?pu5ib[$33eug] := 0.9999+(int_to_real($s2bg4)/360.0)
  12310. end if
  12311. select ($1wrdd)
  12312. case 0
  12313. %1cwa0[$33eug] := real_to_int(sin(?pu5ib[$33eug]*2.0*~NI_MATH_PI)*1000000.0*0.5+500000.0)
  12314. case 1
  12315. %1cwa0[$33eug] := 1000000-abs(real_to_int(2.0*?pu5ib[$33eug]*1000000.0) mod 2000000-1000000)
  12316. case 7
  12317. %1cwa0[$33eug] := real_to_int((1.0-(?pu5ib[$33eug]-floor(?pu5ib[$33eug])))*1.99999)*1000000
  12318. case 2
  12319. %1cwa0[$33eug] := real_to_int(1000000.0*(?pu5ib[$33eug]-floor(?pu5ib[$33eug])))
  12320. case 3
  12321. %1cwa0[$33eug] := 1000000-real_to_int(1000000.0*(?pu5ib[$33eug]-floor(?pu5ib[$33eug])))
  12322. case 4
  12323. if (%iv2n3[$eu0kx]=1 and ($33eug # $xpr4r))
  12324. %1cwa0[$33eug] := %1cwa0[$xpr4r]
  12325. else
  12326. if (?pu5ib[$33eug]>=?p2rij[$33eug] or (?pu5ib[$33eug]<(?p2rij[$33eug]-1.0)))
  12327. %1cwa0[$33eug] := random(0,1000000)
  12328. ?p2rij[$33eug] := floor(?pu5ib[$33eug])+1.0
  12329. end if
  12330. end if
  12331. case 5
  12332. if (?pu5ib[$33eug]>=?p2rij[$33eug] or (?pu5ib[$33eug]<(?p2rij[$33eug]-1.0)))
  12333. ?p2rij[$33eug] := floor(?pu5ib[$33eug])+1.0
  12334. %igs1h[$33eug] := random(0,1000000)
  12335. if (%1cwa0[$33eug]=0)
  12336. %1cwa0[$33eug] := random(0,1000000)
  12337. end if
  12338. end if
  12339. if (%iv2n3[$eu0kx]=1 and ($33eug # $xpr4r))
  12340. %1cwa0[$33eug] := %1cwa0[$xpr4r]
  12341. else
  12342. %1cwa0[$33eug] := %1cwa0[$33eug]+real_to_int(int_to_real(%igs1h[$33eug]-%1cwa0[$33eug])*(?pu5ib[$33eug]-floor(?pu5ib[$33eug])))
  12343. end if
  12344. case 6
  12345. if (?pu5ib[$33eug]>=?p2rij[$33eug] or (?pu5ib[$33eug]<(?p2rij[$33eug]-1.0)))
  12346. ?p2rij[$33eug] := floor(?pu5ib[$33eug])+1.0
  12347. %igs1h[$33eug] := random(0,1000000)
  12348. if (%1cwa0[$33eug]=0)
  12349. %1cwa0[$33eug] := random(0,1000000)
  12350. end if
  12351. end if
  12352. if (%iv2n3[$eu0kx]=1 and ($33eug # $xpr4r))
  12353. %1cwa0[$33eug] := %1cwa0[$xpr4r]
  12354. else
  12355. %1cwa0[$33eug] := %1cwa0[$33eug]+real_to_int(int_to_real(%igs1h[$33eug]-%1cwa0[$33eug])/375.0)
  12356. end if
  12357. end select
  12358. %ppvim[5] := %1cwa0[$33eug]/1000
  12359. end function
  12360. function BUS1__update_mod_vals
  12361. if ($3k3u2=0)
  12362. if ($ttvix=1)
  12363. %ppvim[6] := (%ppvim[$1fo5x]*2-1000)*($3tqoo+($yexen*%ppvim[$zi2jx]/1000))/1000
  12364. else
  12365. %ppvim[6] := %ppvim[$1fo5x]*($3tqoo+($yexen*%ppvim[$zi2jx]/1000))/1000
  12366. end if
  12367. else
  12368. %ppvim[6] := %ppvim[$1fo5x]*$gehcz/1000+(%ppvim[$zi2jx]*$0qzrr/1000)
  12369. end if
  12370. if ($oj0wr=1)
  12371. $dyt1q := (%ppvim[6]--1000)*40/2000
  12372. $dyt1q := $dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40))
  12373. if (get_control_par(get_ui_id($dfysh),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
  12374. set_control_par(get_ui_id($dfysh),$CONTROL_PAR_PICTURE_STATE,$dyt1q)
  12375. end if
  12376. end if
  12377. end function
  12378. function BUS2__update_mod_vals
  12379. if ($13ap0=0)
  12380. if ($hj1x4=1)
  12381. %ppvim[7] := (%ppvim[$z1x5e]*2-1000)*($1tszb+($v1jgb*%ppvim[$gxopj]/1000))/1000
  12382. else
  12383. %ppvim[7] := %ppvim[$z1x5e]*($1tszb+($v1jgb*%ppvim[$gxopj]/1000))/1000
  12384. end if
  12385. else
  12386. %ppvim[7] := %ppvim[$z1x5e]*$ihtwl/1000+(%ppvim[$gxopj]*$pzeed/1000)
  12387. end if
  12388. if ($oj0wr=1)
  12389. $dyt1q := (%ppvim[7]--1000)*40/2000
  12390. $dyt1q := $dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40))
  12391. if (get_control_par(get_ui_id($p0xv1),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
  12392. set_control_par(get_ui_id($p0xv1),$CONTROL_PAR_PICTURE_STATE,$dyt1q)
  12393. end if
  12394. end if
  12395. end function
  12396. function SUM__update_mod_vals
  12397. %ppvim[8] := %ppvim[6]+%ppvim[7]
  12398. if ($oj0wr=1)
  12399. $dyt1q := (%ppvim[8]--2000)*40/4000
  12400. if (get_control_par(get_ui_id($ako01),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
  12401. set_control_par(get_ui_id($ako01),$CONTROL_PAR_PICTURE_STATE,$dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40)))
  12402. end if
  12403. end if
  12404. end function
  12405. function MTX__update_mod_vals
  12406. if ($3k3u2=0)
  12407. if ($ttvix=1)
  12408. %ppvim[6] := (%ppvim[$1fo5x]*2-1000)*($3tqoo+($yexen*%ppvim[$zi2jx]/1000))/1000
  12409. else
  12410. %ppvim[6] := %ppvim[$1fo5x]*($3tqoo+($yexen*%ppvim[$zi2jx]/1000))/1000
  12411. end if
  12412. else
  12413. %ppvim[6] := %ppvim[$1fo5x]*$gehcz/1000+(%ppvim[$zi2jx]*$0qzrr/1000)
  12414. end if
  12415. if ($oj0wr=1)
  12416. $dyt1q := (%ppvim[6]--1000)*40/2000
  12417. $dyt1q := $dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40))
  12418. if (get_control_par(get_ui_id($dfysh),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
  12419. set_control_par(get_ui_id($dfysh),$CONTROL_PAR_PICTURE_STATE,$dyt1q)
  12420. end if
  12421. end if
  12422. if ($13ap0=0)
  12423. if ($hj1x4=1)
  12424. %ppvim[7] := (%ppvim[$z1x5e]*2-1000)*($1tszb+($v1jgb*%ppvim[$gxopj]/1000))/1000
  12425. else
  12426. %ppvim[7] := %ppvim[$z1x5e]*($1tszb+($v1jgb*%ppvim[$gxopj]/1000))/1000
  12427. end if
  12428. else
  12429. %ppvim[7] := %ppvim[$z1x5e]*$ihtwl/1000+(%ppvim[$gxopj]*$pzeed/1000)
  12430. end if
  12431. if ($oj0wr=1)
  12432. $dyt1q := (%ppvim[7]--1000)*40/2000
  12433. $dyt1q := $dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40))
  12434. if (get_control_par(get_ui_id($p0xv1),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
  12435. set_control_par(get_ui_id($p0xv1),$CONTROL_PAR_PICTURE_STATE,$dyt1q)
  12436. end if
  12437. end if
  12438. %ppvim[8] := %ppvim[6]+%ppvim[7]
  12439. if ($oj0wr=1)
  12440. $dyt1q := (%ppvim[8]--2000)*40/4000
  12441. if (get_control_par(get_ui_id($ako01),$CONTROL_PAR_PICTURE_STATE) # $dyt1q and ($mdykc=2))
  12442. set_control_par(get_ui_id($ako01),$CONTROL_PAR_PICTURE_STATE,$dyt1q-(-sh_right(40-$dyt1q,31)*($dyt1q-40)))
  12443. end if
  12444. end if
  12445. end function
  12446. function NOTE_DURATION_POLY__update_mod_vals
  12447. if (event_status($dc3zm)=$EVENT_STATUS_NOTE_QUEUE)
  12448. $1psz5 := %w1vde[%laljf[$dc3zm mod 8192]]
  12449. if ($dc3zm=$y3puj)
  12450. $v54fu := $1psz5
  12451. end if
  12452. else
  12453. if ($dc3zm=$y3puj)
  12454. $1psz5 := $v54fu
  12455. else
  12456. $1psz5 := %w1vde[%laljf[$dc3zm mod 8192]]
  12457. end if
  12458. end if
  12459. $ey2qd := ($ENGINE_UPTIME-$1psz5)/10
  12460. %ppvim[12] := $ey2qd-(-sh_right(1000-$ey2qd,31)*($ey2qd-1000))
  12461. end function
  12462. function VELOCITY_POLY__update_mod_vals
  12463. %ppvim[10] := (%c1kc4[%laljf[$dc3zm mod 8192]]+(-sh_right(%c1kc4[%laljf[$dc3zm mod 8192]]-1,31)*(1-%c1kc4[%laljf[$dc3zm mod 8192]]))-1)*1000/126
  12464. end function
  12465. function KEY_TRACK_POLY__update_mod_vals
  12466. if (event_status($dc3zm)=$EVENT_STATUS_NOTE_QUEUE)
  12467. %ppvim[13] := get_event_par($dc3zm,$EVENT_PAR_NOTE)*1000/127
  12468. if ($dc3zm=$y3puj)
  12469. %h1b0t[13] := %ppvim[13]
  12470. end if
  12471. else
  12472. if ($dc3zm=$y3puj)
  12473. %ppvim[13] := %h1b0t[13]
  12474. else
  12475. %ppvim[13] := %ilm5d[%laljf[$dc3zm mod 8192]]*1000/127
  12476. end if
  12477. end if
  12478. end function
  12479. function CONST_MOD__update_mod_vals
  12480. %ppvim[18] := 1000
  12481. %h1b0t[18] := 1000
  12482. end function
  12483. function REL_MOD__update_mod_vals
  12484. if (event_status($dc3zm)=$EVENT_STATUS_NOTE_QUEUE)
  12485. if ($dc3zm=$y3puj)
  12486. if ($frfox=0)
  12487. %ppvim[19] := %jnhix[$meuyq]*1000
  12488. else
  12489. %ppvim[19] := -sh_right(abs($0e0hy-0)-1,31)*1000
  12490. end if
  12491. else
  12492. %ppvim[19] := %jnhix[%laljf[$dc3zm mod 8192]]*1000
  12493. end if
  12494. else
  12495. if ($frfox=0)
  12496. %ppvim[19] := 1000
  12497. else
  12498. %ppvim[19] := -sh_right(abs($0e0hy-0)-1,31)*1000
  12499. end if
  12500. end if
  12501. end function
  12502. function ARP_MOD__update_mod_vals
  12503. %ppvim[20] := %0lu1d[$tp4oa]*1000/2400*$ruhe4
  12504. end function
  12505. function AFTERTOUCH__update_mod_vals
  12506. if ($frfox=1)
  12507. if ($yrh4w=1)
  12508. $dyt1q := %a31v5[0]
  12509. $kyxij := 1
  12510. while ($kyxij<num_elements(%a31v5))
  12511. if ($dyt1q<=%a31v5[$kyxij])
  12512. $dyt1q := %a31v5[$kyxij]
  12513. end if
  12514. inc($kyxij)
  12515. end while
  12516. $r0pwv := %vftan[0]
  12517. $kyxij := 1
  12518. while ($kyxij<num_elements(%vftan))
  12519. if ($r0pwv<=%vftan[$kyxij])
  12520. $r0pwv := %vftan[$kyxij]
  12521. end if
  12522. inc($kyxij)
  12523. end while
  12524. %ppvim[9] := $dyt1q+$r0pwv-(-sh_right(1000-($dyt1q+$r0pwv),31)*($dyt1q+$r0pwv-1000))
  12525. else
  12526. %ppvim[9] := %a31v5[0]
  12527. $kyxij := 1
  12528. while ($kyxij<num_elements(%a31v5))
  12529. if (%ppvim[9]<=%a31v5[$kyxij])
  12530. %ppvim[9] := %a31v5[$kyxij]
  12531. end if
  12532. inc($kyxij)
  12533. end while
  12534. end if
  12535. else
  12536. $dyt1q := %gvnxp[%laljf[$dc3zm mod 8192]]
  12537. %ppvim[9] := %a31v5[$dyt1q]*-sh_right(0-$dyt1q,31)+%a31v5[0]+%vftan[%ilm5d[%laljf[$dc3zm mod 8192]]]-(-sh_right(1000-(%a31v5[$dyt1q]*-sh_right(0-$dyt1q,31)+%a31v5[0]+%vftan[%ilm5d[%laljf[$dc3zm mod 8192]]]),31)*(%a31v5[$dyt1q]*-sh_right(0-$dyt1q,31)+%a31v5[0]+%vftan[%ilm5d[%laljf[$dc3zm mod 8192]]]-1000))
  12538. end if
  12539. end function
  12540. function MPE_SLIDE__update_mod_vals
  12541. if ($frfox=1)
  12542. $dyt1q := %2zfuu[0]
  12543. $kyxij := 1
  12544. while ($kyxij<num_elements(%2zfuu))
  12545. if ($dyt1q<=%2zfuu[$kyxij])
  12546. if (event_status(%z3n3e[$kyxij])=$EVENT_STATUS_NOTE_QUEUE)
  12547. $dyt1q := %2zfuu[$kyxij]
  12548. else
  12549. %2zfuu[$kyxij] := 0
  12550. end if
  12551. end if
  12552. inc($kyxij)
  12553. end while
  12554. %ppvim[21] := %2zfuu[0]
  12555. $kyxij := 1
  12556. while ($kyxij<num_elements(%2zfuu))
  12557. if (%ppvim[21]<=%2zfuu[$kyxij])
  12558. %ppvim[21] := %2zfuu[$kyxij]
  12559. end if
  12560. inc($kyxij)
  12561. end while
  12562. else
  12563. %ppvim[21] := %2zfuu[%gvnxp[%laljf[$dc3zm mod 8192]]]*-sh_right(0-%gvnxp[%laljf[$dc3zm mod 8192]],31)+%2zfuu[0]-(-sh_right(1000-(%2zfuu[%gvnxp[%laljf[$dc3zm mod 8192]]]*-sh_right(0-%gvnxp[%laljf[$dc3zm mod 8192]],31)+%2zfuu[0]),31)*(%2zfuu[%gvnxp[%laljf[$dc3zm mod 8192]]]*-sh_right(0-%gvnxp[%laljf[$dc3zm mod 8192]],31)+%2zfuu[0]-1000))
  12564. end if
  12565. end function
  12566. function RANDOM__update_mod_vals
  12567. %ppvim[22] := %oy5fa[%laljf[$dc3zm mod 8192]]
  12568. end function
  12569. function ABS_CURSOR__update_mod_vals
  12570. if ($kexsv # 0)
  12571. %ppvim[23] := real_to_int(int_to_real(%45gob[%laljf[$dc3zm mod 8192]])*1000.0/int_to_real($kexsv*1000))
  12572. end if
  12573. end function
  12574. function MOD__perform_full_update
  12575. $dc3zm := $y3puj
  12576. if ($0ib2k=3 or ($0ib2k=4))
  12577. $oj0wr := 1
  12578. end if
  12579. $frfox := 1
  12580. $fg4rw := 0
  12581. while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
  12582. select (%dpoyh[$fg4rw])
  12583. case 2
  12584. call SHP1__update_mod_vals
  12585. case 3
  12586. call SHP2__update_mod_vals
  12587. case 4
  12588. call LFO1__update_mod_vals
  12589. case 5
  12590. call LFO2__update_mod_vals
  12591. case 6
  12592. call BUS1__update_mod_vals
  12593. case 7
  12594. call BUS2__update_mod_vals
  12595. case 8
  12596. call MTX__update_mod_vals
  12597. case 12
  12598. call NOTE_DURATION_POLY__update_mod_vals
  12599. case 10
  12600. call VELOCITY_POLY__update_mod_vals
  12601. case 13
  12602. call KEY_TRACK_POLY__update_mod_vals
  12603. case 18
  12604. call CONST_MOD__update_mod_vals
  12605. case 19
  12606. call REL_MOD__update_mod_vals
  12607. case 20
  12608. call ARP_MOD__update_mod_vals
  12609. case 9
  12610. call AFTERTOUCH__update_mod_vals
  12611. case 21
  12612. call MPE_SLIDE__update_mod_vals
  12613. case 22
  12614. call RANDOM__update_mod_vals
  12615. case 23
  12616. call ABS_CURSOR__update_mod_vals
  12617. end select
  12618. inc($fg4rw)
  12619. end while
  12620. call MOD__store_current_mod_context
  12621. $oj0wr := 0
  12622. $jdgl1 := 0
  12623. while ($jdgl1<48)
  12624. $gpzoi := %xdonk[$jdgl1]
  12625. call set_mod_knob_group_engine_par_for_gl_m_id
  12626. call _update_mod_knob_rt_indicator_for_gl_m_id
  12627. inc($jdgl1)
  12628. end while
  12629. if ($ruhe4=1)
  12630. $jdgl1 := 0
  12631. while ($jdgl1<3)
  12632. $gpzoi := %arjqa[$jdgl1]
  12633. call _update_mod_knob_rt_indicator_for_gl_m_id
  12634. inc($jdgl1)
  12635. end while
  12636. else
  12637. $jdgl1 := 0
  12638. while ($jdgl1<4)
  12639. $gpzoi := %xkzmj[$jdgl1]
  12640. call set_mod_knob_group_engine_par_for_gl_m_id
  12641. call _update_mod_knob_rt_indicator_for_gl_m_id
  12642. inc($jdgl1)
  12643. end while
  12644. end if
  12645. if ($0ib2k=3 or ($0ib2k=4))
  12646. $jdgl1 := 0
  12647. while ($jdgl1<4)
  12648. $gpzoi := %u335j[$jdgl1]
  12649. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  12650. inc($jdgl1)
  12651. end while
  12652. end if
  12653. call update_morph_stepper
  12654. if ($t4vew=1)
  12655. $y3mgr := 0
  12656. while ($y3mgr<num_elements(%hrm2k))
  12657. if (event_status(%hrm2k[$y3mgr])=$EVENT_STATUS_NOTE_QUEUE)
  12658. $gpzoi := 23
  12659. $dc3zm := %k0ra5[$y3mgr]
  12660. $1il5i := %3hbq2[$gpzoi]-1
  12661. while ($1il5i>=0)
  12662. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  12663. select (%q4rwz[20*$gpzoi+$1il5i])
  12664. case 2
  12665. call SHP1__update_mod_vals
  12666. case 3
  12667. call SHP2__update_mod_vals
  12668. case 4
  12669. call LFO1__update_mod_vals
  12670. case 5
  12671. call LFO2__update_mod_vals
  12672. case 6
  12673. call BUS1__update_mod_vals
  12674. case 7
  12675. call BUS2__update_mod_vals
  12676. case 8
  12677. call MTX__update_mod_vals
  12678. case 12
  12679. call NOTE_DURATION_POLY__update_mod_vals
  12680. case 10
  12681. call VELOCITY_POLY__update_mod_vals
  12682. case 13
  12683. call KEY_TRACK_POLY__update_mod_vals
  12684. case 18
  12685. call CONST_MOD__update_mod_vals
  12686. case 19
  12687. call REL_MOD__update_mod_vals
  12688. case 20
  12689. call ARP_MOD__update_mod_vals
  12690. case 9
  12691. call AFTERTOUCH__update_mod_vals
  12692. case 21
  12693. call MPE_SLIDE__update_mod_vals
  12694. case 22
  12695. call RANDOM__update_mod_vals
  12696. case 23
  12697. call ABS_CURSOR__update_mod_vals
  12698. end select
  12699. end if
  12700. dec($1il5i)
  12701. end while
  12702. $dyt1q := 127*($l2tv1+($zv33b*%ppvim[$dbgkf]/1000))/1000
  12703. change_vol(%hrm2k[$y3mgr],-real_to_int(60000.0-(?xpxzm[$dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))]*60000.0))-get_event_par(%hrm2k[$y3mgr],$EVENT_PAR_VOLUME),1)
  12704. if (%hrm2k[$y3mgr]=$auli3)
  12705. call _update_mod_knob_rt_indicator_for_gl_m_id
  12706. end if
  12707. $gpzoi := 28
  12708. $dc3zm := %k0ra5[$y3mgr]
  12709. $1il5i := %3hbq2[$gpzoi]-1
  12710. while ($1il5i>=0)
  12711. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  12712. select (%q4rwz[20*$gpzoi+$1il5i])
  12713. case 2
  12714. call SHP1__update_mod_vals
  12715. case 3
  12716. call SHP2__update_mod_vals
  12717. case 4
  12718. call LFO1__update_mod_vals
  12719. case 5
  12720. call LFO2__update_mod_vals
  12721. case 6
  12722. call BUS1__update_mod_vals
  12723. case 7
  12724. call BUS2__update_mod_vals
  12725. case 8
  12726. call MTX__update_mod_vals
  12727. case 12
  12728. call NOTE_DURATION_POLY__update_mod_vals
  12729. case 10
  12730. call VELOCITY_POLY__update_mod_vals
  12731. case 13
  12732. call KEY_TRACK_POLY__update_mod_vals
  12733. case 18
  12734. call CONST_MOD__update_mod_vals
  12735. case 19
  12736. call REL_MOD__update_mod_vals
  12737. case 20
  12738. call ARP_MOD__update_mod_vals
  12739. case 9
  12740. call AFTERTOUCH__update_mod_vals
  12741. case 21
  12742. call MPE_SLIDE__update_mod_vals
  12743. case 22
  12744. call RANDOM__update_mod_vals
  12745. case 23
  12746. call ABS_CURSOR__update_mod_vals
  12747. end select
  12748. end if
  12749. dec($1il5i)
  12750. end while
  12751. change_tune(%hrm2k[$y3mgr],($c21kk+($eg3kt*%ppvim[$2vyff]/1000))*1000+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),0)
  12752. if (%hrm2k[$y3mgr]=$auli3)
  12753. call _update_mod_knob_rt_indicator_for_gl_m_id
  12754. end if
  12755. if (%hrm2k[$y3mgr]=$auli3)
  12756. $gpzoi := 29
  12757. $dc3zm := %k0ra5[$y3mgr]
  12758. $1il5i := %3hbq2[$gpzoi]-1
  12759. while ($1il5i>=0)
  12760. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  12761. select (%q4rwz[20*$gpzoi+$1il5i])
  12762. case 2
  12763. call SHP1__update_mod_vals
  12764. case 3
  12765. call SHP2__update_mod_vals
  12766. case 4
  12767. call LFO1__update_mod_vals
  12768. case 5
  12769. call LFO2__update_mod_vals
  12770. case 6
  12771. call BUS1__update_mod_vals
  12772. case 7
  12773. call BUS2__update_mod_vals
  12774. case 8
  12775. call MTX__update_mod_vals
  12776. case 12
  12777. call NOTE_DURATION_POLY__update_mod_vals
  12778. case 10
  12779. call VELOCITY_POLY__update_mod_vals
  12780. case 13
  12781. call KEY_TRACK_POLY__update_mod_vals
  12782. case 18
  12783. call CONST_MOD__update_mod_vals
  12784. case 19
  12785. call REL_MOD__update_mod_vals
  12786. case 20
  12787. call ARP_MOD__update_mod_vals
  12788. case 9
  12789. call AFTERTOUCH__update_mod_vals
  12790. case 21
  12791. call MPE_SLIDE__update_mod_vals
  12792. case 22
  12793. call RANDOM__update_mod_vals
  12794. case 23
  12795. call ABS_CURSOR__update_mod_vals
  12796. end select
  12797. end if
  12798. dec($1il5i)
  12799. end while
  12800. call _update_mod_knob_rt_indicator_for_gl_m_id
  12801. $gpzoi := 30
  12802. $dc3zm := %k0ra5[$y3mgr]
  12803. $1il5i := %3hbq2[$gpzoi]-1
  12804. while ($1il5i>=0)
  12805. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  12806. select (%q4rwz[20*$gpzoi+$1il5i])
  12807. case 2
  12808. call SHP1__update_mod_vals
  12809. case 3
  12810. call SHP2__update_mod_vals
  12811. case 4
  12812. call LFO1__update_mod_vals
  12813. case 5
  12814. call LFO2__update_mod_vals
  12815. case 6
  12816. call BUS1__update_mod_vals
  12817. case 7
  12818. call BUS2__update_mod_vals
  12819. case 8
  12820. call MTX__update_mod_vals
  12821. case 12
  12822. call NOTE_DURATION_POLY__update_mod_vals
  12823. case 10
  12824. call VELOCITY_POLY__update_mod_vals
  12825. case 13
  12826. call KEY_TRACK_POLY__update_mod_vals
  12827. case 18
  12828. call CONST_MOD__update_mod_vals
  12829. case 19
  12830. call REL_MOD__update_mod_vals
  12831. case 20
  12832. call ARP_MOD__update_mod_vals
  12833. case 9
  12834. call AFTERTOUCH__update_mod_vals
  12835. case 21
  12836. call MPE_SLIDE__update_mod_vals
  12837. case 22
  12838. call RANDOM__update_mod_vals
  12839. case 23
  12840. call ABS_CURSOR__update_mod_vals
  12841. end select
  12842. end if
  12843. dec($1il5i)
  12844. end while
  12845. call _update_mod_knob_rt_indicator_for_gl_m_id
  12846. end if
  12847. end if
  12848. inc($y3mgr)
  12849. end while
  12850. end if
  12851. call update_poly_mod_event_id
  12852. $dc3zm := $4ggtc
  12853. if ($mdykc=2 and ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0))))
  12854. $oj0wr := 1
  12855. end if
  12856. $frfox := 0
  12857. $fg4rw := 0
  12858. while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
  12859. select (%dpoyh[$fg4rw])
  12860. case 2
  12861. call SHP1__update_mod_vals
  12862. case 3
  12863. call SHP2__update_mod_vals
  12864. case 4
  12865. call LFO1__update_mod_vals
  12866. case 5
  12867. call LFO2__update_mod_vals
  12868. case 6
  12869. call BUS1__update_mod_vals
  12870. case 7
  12871. call BUS2__update_mod_vals
  12872. case 8
  12873. call MTX__update_mod_vals
  12874. case 12
  12875. call NOTE_DURATION_POLY__update_mod_vals
  12876. case 10
  12877. call VELOCITY_POLY__update_mod_vals
  12878. case 13
  12879. call KEY_TRACK_POLY__update_mod_vals
  12880. case 18
  12881. call CONST_MOD__update_mod_vals
  12882. case 19
  12883. call REL_MOD__update_mod_vals
  12884. case 20
  12885. call ARP_MOD__update_mod_vals
  12886. case 9
  12887. call AFTERTOUCH__update_mod_vals
  12888. case 21
  12889. call MPE_SLIDE__update_mod_vals
  12890. case 22
  12891. call RANDOM__update_mod_vals
  12892. case 23
  12893. call ABS_CURSOR__update_mod_vals
  12894. end select
  12895. inc($fg4rw)
  12896. end while
  12897. $oj0wr := 0
  12898. $jdgl1 := 0
  12899. while ($jdgl1<2)
  12900. $gpzoi := %ulgib[$jdgl1]
  12901. call _update_mod_knob_rt_indicator_for_gl_m_id
  12902. inc($jdgl1)
  12903. end while
  12904. $jdgl1 := 0
  12905. while ($jdgl1<11)
  12906. $gpzoi := %h2jv2[$jdgl1]
  12907. call _update_mod_knob_rt_indicator_for_gl_m_id
  12908. inc($jdgl1)
  12909. end while
  12910. if ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0)))
  12911. $jdgl1 := 0
  12912. while ($jdgl1<4)
  12913. $gpzoi := %u335j[$jdgl1]
  12914. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  12915. inc($jdgl1)
  12916. end while
  12917. end if
  12918. if ($ruhe4=1)
  12919. if ($mdykc=2 and ($0ib2k=2))
  12920. $oj0wr := 1
  12921. end if
  12922. $dc3zm := $auli3
  12923. $frfox := 0
  12924. $fg4rw := 0
  12925. while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
  12926. select (%dpoyh[$fg4rw])
  12927. case 2
  12928. call SHP1__update_mod_vals
  12929. case 3
  12930. call SHP2__update_mod_vals
  12931. case 4
  12932. call LFO1__update_mod_vals
  12933. case 5
  12934. call LFO2__update_mod_vals
  12935. case 6
  12936. call BUS1__update_mod_vals
  12937. case 7
  12938. call BUS2__update_mod_vals
  12939. case 8
  12940. call MTX__update_mod_vals
  12941. case 12
  12942. call NOTE_DURATION_POLY__update_mod_vals
  12943. case 10
  12944. call VELOCITY_POLY__update_mod_vals
  12945. case 13
  12946. call KEY_TRACK_POLY__update_mod_vals
  12947. case 18
  12948. call CONST_MOD__update_mod_vals
  12949. case 19
  12950. call REL_MOD__update_mod_vals
  12951. case 20
  12952. call ARP_MOD__update_mod_vals
  12953. case 9
  12954. call AFTERTOUCH__update_mod_vals
  12955. case 21
  12956. call MPE_SLIDE__update_mod_vals
  12957. case 22
  12958. call RANDOM__update_mod_vals
  12959. case 23
  12960. call ABS_CURSOR__update_mod_vals
  12961. end select
  12962. inc($fg4rw)
  12963. end while
  12964. $oj0wr := 0
  12965. $jdgl1 := 0
  12966. while ($jdgl1<4)
  12967. $gpzoi := %xkzmj[$jdgl1]
  12968. call set_mod_knob_group_engine_par_for_gl_m_id
  12969. call _update_mod_knob_rt_indicator_for_gl_m_id
  12970. inc($jdgl1)
  12971. end while
  12972. if ($0ib2k=2)
  12973. $jdgl1 := 0
  12974. while ($jdgl1<4)
  12975. $gpzoi := %u335j[$jdgl1]
  12976. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  12977. inc($jdgl1)
  12978. end while
  12979. end if
  12980. end if
  12981. end function
  12982. function MOD__position_all_mod_menus
  12983. $gpzoi := 0
  12984. while ($gpzoi<$upapg)
  12985. call MOD__position_mod_menu_for_gl_m_id
  12986. inc($gpzoi)
  12987. end while
  12988. end function
  12989. function update_light_guide
  12990. $fg4rw := 0
  12991. while ($fg4rw<=127)
  12992. $dyt1q := %_rootkey_offset_for_note[128*$51oxm+$fg4rw]
  12993. if ($dyt1q>-128)
  12994. set_key_color($fg4rw,-sh_right(abs($dyt1q-0)-1,31)*$KEY_COLOR_CYAN+((.not. -sh_right(abs($dyt1q-0)-1,31) .and. 1)*$KEY_COLOR_DEFAULT))
  12995. else
  12996. set_key_color($fg4rw,$KEY_COLOR_INACTIVE)
  12997. end if
  12998. inc($fg4rw)
  12999. end while
  13000. end function
  13001. function RAND__update_ui_after_randomization
  13002. call update_preset_name_displays
  13003. set_control_par_str(get_ui_id($va2lk),$CONTROL_PAR_PICTURE,"GE_g_crs_rel_dir_" & $va2lk)
  13004. call evaluate_mod_connections
  13005. call update_g_rng_max_label
  13006. set_control_par(get_ui_id($brjbw),$CONTROL_PAR_HIDE,(%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31))*$HIDE_PART_NOTHING+((.not. (%is_mono_src[$hdmk1] .and. -sh_right(abs($0ib2k-2)-1,31)) .and. 1)*$HIDE_WHOLE_CONTROL))
  13007. call update_all_WF_for_default_key
  13008. call NAV_PAGE__update_main_nav
  13009. call set_all_engine_par_norm_knobs
  13010. call MOD__perform_full_update
  13011. call MOD__position_all_mod_menus
  13012. call update_all_mod_knob_range_indicator
  13013. call update_light_guide
  13014. end function
  13015. function ARP__shift_tables
  13016. $fg4rw := 1
  13017. while ($fg4rw<=($k5z4u+$wg0d2))
  13018. $dyt1q := %pyeoz[$k5z4u-1]
  13019. $r0pwv := %0lu1d[$k5z4u-1]
  13020. $y3mgr := 0
  13021. while ($y3mgr<=($k5z4u-2))
  13022. %pyeoz[$k5z4u-1-$y3mgr] := %pyeoz[$k5z4u-2-$y3mgr]
  13023. %0lu1d[$k5z4u-1-$y3mgr] := %0lu1d[$k5z4u-2-$y3mgr]
  13024. inc($y3mgr)
  13025. end while
  13026. %pyeoz[0] := $dyt1q
  13027. %0lu1d[0] := $r0pwv
  13028. inc($fg4rw)
  13029. end while
  13030. end function
  13031. function update_modal_dialog_lbl
  13032. if ($3pvid=1)
  13033. set_control_par(get_ui_id($xhutf),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  13034. set_control_par(get_ui_id($3pvid),$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  13035. else
  13036. set_control_par(get_ui_id($xhutf),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  13037. set_control_par(get_ui_id($3pvid),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  13038. end if
  13039. end function
  13040. function _handle_mod_knob_modifiers_for_gl_m_id
  13041. if (get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_KEY_ALT)=1)
  13042. if (get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_KEY_SHIFT) # 1)
  13043. $tmkul := 1
  13044. $tkfsc := get_control_par(%2hswt[$gpzoi],$CONTROL_PAR_PICTURE_STATE)
  13045. set_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE,$tkfsc*%qxmpr[$gpzoi]/101-get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+%dwdw3[$gpzoi])
  13046. else
  13047. if ($tpui1=1)
  13048. $tpui1 := 0
  13049. $dyt1q := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)
  13050. if ($dyt1q<=%sbnwu[$gpzoi] and ($dyt1q>=%dwdw3[$gpzoi]))
  13051. set_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE,$dyt1q)
  13052. set_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE,-get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))
  13053. else
  13054. $3pvid := 1
  13055. call update_modal_dialog_lbl
  13056. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Ups, a consistent modulation direction inversion is not possible as the knob range would be exceeded. Please make you settings manually.")
  13057. end if
  13058. else
  13059. $tpui1 := 1
  13060. end if
  13061. end if
  13062. else
  13063. $tmkul := 0
  13064. end if
  13065. end function
  13066. function update_g_dis_sync_idx
  13067. $gv5ha := $bpkqt+($g345d*%ppvim[$3pyb3]/1000)
  13068. $gv5ha := ($gv5ha-50)*28/2950
  13069. $gv5ha := $gv5ha*(1+(sh_right(28-$gv5ha,31) .or. sh_right($gv5ha-0,31)))-0-(28*sh_right(28-$gv5ha,31))
  13070. end function
  13071. function _update_mod_knob_automation_label_for_gl_m_id
  13072. if (?rylw5[$gpzoi]=1.0)
  13073. if (%jeswc[$gpzoi]=31)
  13074. if ($linka=0)
  13075. @uamno := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)/%oazdd[$gpzoi] & "." & abs(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE) mod %oazdd[$gpzoi]/(%oazdd[$gpzoi]/10)) & " " & !gh3f0[$gpzoi]
  13076. else
  13077. $pqpgc := real_to_int((int_to_real($sgbvz)+(int_to_real($cx1ja*%ppvim[$qxhis])/1000.0)+8000.0)/16001.0*17.0)
  13078. @uamno := !je2na[$pqpgc*(1+(sh_right(16-$pqpgc,31) .or. sh_right($pqpgc-0,31)))-0-(16*sh_right(16-$pqpgc,31))]
  13079. call update_g_pos_hit_anker_lenth_text
  13080. end if
  13081. else
  13082. if ($gpzoi=12 and ($p5wl1=1))
  13083. call update_g_dis_sync_idx
  13084. @uamno := !qeoj3[$gv5ha]
  13085. else
  13086. if ($gpzoi=9)
  13087. @uamno := !qniir[(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))]
  13088. else
  13089. if (get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)>=0)
  13090. @uamno := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)/%oazdd[$gpzoi]
  13091. else
  13092. @uamno := "-" & (abs(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE))/%oazdd[$gpzoi])
  13093. end if
  13094. if (%oazdd[$gpzoi]>=10)
  13095. @uamno := @uamno & "." & (abs(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)) mod %oazdd[$gpzoi]/(%oazdd[$gpzoi]/10))
  13096. if (%oazdd[$gpzoi]>=100)
  13097. @uamno := @uamno & (abs(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)) mod (%oazdd[$gpzoi]/10)/(%oazdd[$gpzoi]/100))
  13098. end if
  13099. end if
  13100. @uamno := @uamno & " " & !gh3f0[$gpzoi]
  13101. end if
  13102. end if
  13103. end if
  13104. else
  13105. if (%jeswc[$gpzoi]=310 and ($l4ujc=1) or (%jeswc[$gpzoi]=320 and ($x02cl=1)))
  13106. @uamno := !je2na[(((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000))*(1+(sh_right(1500-(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)),31) .or. sh_right(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)-0,31)))-0-(1500*sh_right(1500-(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)),31)))*17-1)/1500]
  13107. else
  13108. $dyt1q := real_to_int(pow((int_to_real(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE))-int_to_real(%dwdw3[$gpzoi]))/(int_to_real(%sbnwu[$gpzoi])-int_to_real(%dwdw3[$gpzoi])),?rylw5[$gpzoi])*int_to_real(%qxmpr[$gpzoi])+int_to_real(%dwdw3[$gpzoi]))
  13109. @uamno := $dyt1q/%oazdd[$gpzoi] & "." & ($dyt1q mod %oazdd[$gpzoi]/(%oazdd[$gpzoi]/10)) & ($dyt1q mod (%oazdd[$gpzoi]/10)/(%oazdd[$gpzoi]/100)) & " " & !gh3f0[$gpzoi]
  13110. end if
  13111. end if
  13112. set_control_par_str(%41o3s[$gpzoi],$CONTROL_PAR_LABEL,@uamno)
  13113. end function
  13114. function MOD__perform_optimized_update_for_gl_ext_mod
  13115. $dc3zm := $y3puj
  13116. if ($0ib2k=3 or ($0ib2k=4))
  13117. $oj0wr := 1
  13118. end if
  13119. $frfox := 1
  13120. $fg4rw := 0
  13121. while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
  13122. select (%dpoyh[$fg4rw])
  13123. case 2
  13124. call SHP1__update_mod_vals
  13125. case 3
  13126. call SHP2__update_mod_vals
  13127. case 4
  13128. call LFO1__update_mod_vals
  13129. case 5
  13130. call LFO2__update_mod_vals
  13131. case 6
  13132. call BUS1__update_mod_vals
  13133. case 7
  13134. call BUS2__update_mod_vals
  13135. case 8
  13136. call MTX__update_mod_vals
  13137. case 12
  13138. call NOTE_DURATION_POLY__update_mod_vals
  13139. case 10
  13140. call VELOCITY_POLY__update_mod_vals
  13141. case 13
  13142. call KEY_TRACK_POLY__update_mod_vals
  13143. case 18
  13144. call CONST_MOD__update_mod_vals
  13145. case 19
  13146. call REL_MOD__update_mod_vals
  13147. case 20
  13148. call ARP_MOD__update_mod_vals
  13149. case 9
  13150. call AFTERTOUCH__update_mod_vals
  13151. case 21
  13152. call MPE_SLIDE__update_mod_vals
  13153. case 22
  13154. call RANDOM__update_mod_vals
  13155. case 23
  13156. call ABS_CURSOR__update_mod_vals
  13157. end select
  13158. inc($fg4rw)
  13159. end while
  13160. call MOD__store_current_mod_context
  13161. $oj0wr := 0
  13162. $jdgl1 := 0
  13163. while ($jdgl1<48)
  13164. $gpzoi := %xdonk[$jdgl1]
  13165. call set_mod_knob_group_engine_par_for_gl_m_id
  13166. call _update_mod_knob_rt_indicator_for_gl_m_id
  13167. inc($jdgl1)
  13168. end while
  13169. if ($ruhe4=1)
  13170. $jdgl1 := 0
  13171. while ($jdgl1<3)
  13172. $gpzoi := %arjqa[$jdgl1]
  13173. call _update_mod_knob_rt_indicator_for_gl_m_id
  13174. inc($jdgl1)
  13175. end while
  13176. else
  13177. $jdgl1 := 0
  13178. while ($jdgl1<4)
  13179. $gpzoi := %xkzmj[$jdgl1]
  13180. call set_mod_knob_group_engine_par_for_gl_m_id
  13181. call _update_mod_knob_rt_indicator_for_gl_m_id
  13182. inc($jdgl1)
  13183. end while
  13184. end if
  13185. if ($0ib2k=3 or ($0ib2k=4))
  13186. $jdgl1 := 0
  13187. while ($jdgl1<4)
  13188. $gpzoi := %u335j[$jdgl1]
  13189. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  13190. inc($jdgl1)
  13191. end while
  13192. end if
  13193. call update_morph_stepper
  13194. if ($t4vew=1)
  13195. $y3mgr := 0
  13196. while ($y3mgr<num_elements(%hrm2k))
  13197. if (event_status(%hrm2k[$y3mgr])=$EVENT_STATUS_NOTE_QUEUE)
  13198. $gpzoi := 23
  13199. $dc3zm := %k0ra5[$y3mgr]
  13200. $1il5i := %3hbq2[$gpzoi]-1
  13201. while ($1il5i>=0)
  13202. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  13203. select (%q4rwz[20*$gpzoi+$1il5i])
  13204. case 2
  13205. call SHP1__update_mod_vals
  13206. case 3
  13207. call SHP2__update_mod_vals
  13208. case 4
  13209. call LFO1__update_mod_vals
  13210. case 5
  13211. call LFO2__update_mod_vals
  13212. case 6
  13213. call BUS1__update_mod_vals
  13214. case 7
  13215. call BUS2__update_mod_vals
  13216. case 8
  13217. call MTX__update_mod_vals
  13218. case 12
  13219. call NOTE_DURATION_POLY__update_mod_vals
  13220. case 10
  13221. call VELOCITY_POLY__update_mod_vals
  13222. case 13
  13223. call KEY_TRACK_POLY__update_mod_vals
  13224. case 18
  13225. call CONST_MOD__update_mod_vals
  13226. case 19
  13227. call REL_MOD__update_mod_vals
  13228. case 20
  13229. call ARP_MOD__update_mod_vals
  13230. case 9
  13231. call AFTERTOUCH__update_mod_vals
  13232. case 21
  13233. call MPE_SLIDE__update_mod_vals
  13234. case 22
  13235. call RANDOM__update_mod_vals
  13236. case 23
  13237. call ABS_CURSOR__update_mod_vals
  13238. end select
  13239. end if
  13240. dec($1il5i)
  13241. end while
  13242. $dyt1q := 127*($l2tv1+($zv33b*%ppvim[$dbgkf]/1000))/1000
  13243. change_vol(%hrm2k[$y3mgr],-real_to_int(60000.0-(?xpxzm[$dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))]*60000.0))-get_event_par(%hrm2k[$y3mgr],$EVENT_PAR_VOLUME),1)
  13244. if (%hrm2k[$y3mgr]=$auli3)
  13245. call _update_mod_knob_rt_indicator_for_gl_m_id
  13246. end if
  13247. $gpzoi := 28
  13248. $dc3zm := %k0ra5[$y3mgr]
  13249. $1il5i := %3hbq2[$gpzoi]-1
  13250. while ($1il5i>=0)
  13251. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  13252. select (%q4rwz[20*$gpzoi+$1il5i])
  13253. case 2
  13254. call SHP1__update_mod_vals
  13255. case 3
  13256. call SHP2__update_mod_vals
  13257. case 4
  13258. call LFO1__update_mod_vals
  13259. case 5
  13260. call LFO2__update_mod_vals
  13261. case 6
  13262. call BUS1__update_mod_vals
  13263. case 7
  13264. call BUS2__update_mod_vals
  13265. case 8
  13266. call MTX__update_mod_vals
  13267. case 12
  13268. call NOTE_DURATION_POLY__update_mod_vals
  13269. case 10
  13270. call VELOCITY_POLY__update_mod_vals
  13271. case 13
  13272. call KEY_TRACK_POLY__update_mod_vals
  13273. case 18
  13274. call CONST_MOD__update_mod_vals
  13275. case 19
  13276. call REL_MOD__update_mod_vals
  13277. case 20
  13278. call ARP_MOD__update_mod_vals
  13279. case 9
  13280. call AFTERTOUCH__update_mod_vals
  13281. case 21
  13282. call MPE_SLIDE__update_mod_vals
  13283. case 22
  13284. call RANDOM__update_mod_vals
  13285. case 23
  13286. call ABS_CURSOR__update_mod_vals
  13287. end select
  13288. end if
  13289. dec($1il5i)
  13290. end while
  13291. change_tune(%hrm2k[$y3mgr],($c21kk+($eg3kt*%ppvim[$2vyff]/1000))*1000+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),0)
  13292. if (%hrm2k[$y3mgr]=$auli3)
  13293. call _update_mod_knob_rt_indicator_for_gl_m_id
  13294. end if
  13295. if (%hrm2k[$y3mgr]=$auli3)
  13296. $gpzoi := 29
  13297. $dc3zm := %k0ra5[$y3mgr]
  13298. $1il5i := %3hbq2[$gpzoi]-1
  13299. while ($1il5i>=0)
  13300. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  13301. select (%q4rwz[20*$gpzoi+$1il5i])
  13302. case 2
  13303. call SHP1__update_mod_vals
  13304. case 3
  13305. call SHP2__update_mod_vals
  13306. case 4
  13307. call LFO1__update_mod_vals
  13308. case 5
  13309. call LFO2__update_mod_vals
  13310. case 6
  13311. call BUS1__update_mod_vals
  13312. case 7
  13313. call BUS2__update_mod_vals
  13314. case 8
  13315. call MTX__update_mod_vals
  13316. case 12
  13317. call NOTE_DURATION_POLY__update_mod_vals
  13318. case 10
  13319. call VELOCITY_POLY__update_mod_vals
  13320. case 13
  13321. call KEY_TRACK_POLY__update_mod_vals
  13322. case 18
  13323. call CONST_MOD__update_mod_vals
  13324. case 19
  13325. call REL_MOD__update_mod_vals
  13326. case 20
  13327. call ARP_MOD__update_mod_vals
  13328. case 9
  13329. call AFTERTOUCH__update_mod_vals
  13330. case 21
  13331. call MPE_SLIDE__update_mod_vals
  13332. case 22
  13333. call RANDOM__update_mod_vals
  13334. case 23
  13335. call ABS_CURSOR__update_mod_vals
  13336. end select
  13337. end if
  13338. dec($1il5i)
  13339. end while
  13340. call _update_mod_knob_rt_indicator_for_gl_m_id
  13341. $gpzoi := 30
  13342. $dc3zm := %k0ra5[$y3mgr]
  13343. $1il5i := %3hbq2[$gpzoi]-1
  13344. while ($1il5i>=0)
  13345. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  13346. select (%q4rwz[20*$gpzoi+$1il5i])
  13347. case 2
  13348. call SHP1__update_mod_vals
  13349. case 3
  13350. call SHP2__update_mod_vals
  13351. case 4
  13352. call LFO1__update_mod_vals
  13353. case 5
  13354. call LFO2__update_mod_vals
  13355. case 6
  13356. call BUS1__update_mod_vals
  13357. case 7
  13358. call BUS2__update_mod_vals
  13359. case 8
  13360. call MTX__update_mod_vals
  13361. case 12
  13362. call NOTE_DURATION_POLY__update_mod_vals
  13363. case 10
  13364. call VELOCITY_POLY__update_mod_vals
  13365. case 13
  13366. call KEY_TRACK_POLY__update_mod_vals
  13367. case 18
  13368. call CONST_MOD__update_mod_vals
  13369. case 19
  13370. call REL_MOD__update_mod_vals
  13371. case 20
  13372. call ARP_MOD__update_mod_vals
  13373. case 9
  13374. call AFTERTOUCH__update_mod_vals
  13375. case 21
  13376. call MPE_SLIDE__update_mod_vals
  13377. case 22
  13378. call RANDOM__update_mod_vals
  13379. case 23
  13380. call ABS_CURSOR__update_mod_vals
  13381. end select
  13382. end if
  13383. dec($1il5i)
  13384. end while
  13385. call _update_mod_knob_rt_indicator_for_gl_m_id
  13386. end if
  13387. end if
  13388. inc($y3mgr)
  13389. end while
  13390. end if
  13391. call update_poly_mod_event_id
  13392. $dc3zm := $4ggtc
  13393. if ($mdykc=2 and ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0))))
  13394. $oj0wr := 1
  13395. end if
  13396. $frfox := 0
  13397. $fg4rw := 0
  13398. while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
  13399. select (%dpoyh[$fg4rw])
  13400. case 2
  13401. call SHP1__update_mod_vals
  13402. case 3
  13403. call SHP2__update_mod_vals
  13404. case 4
  13405. call LFO1__update_mod_vals
  13406. case 5
  13407. call LFO2__update_mod_vals
  13408. case 6
  13409. call BUS1__update_mod_vals
  13410. case 7
  13411. call BUS2__update_mod_vals
  13412. case 8
  13413. call MTX__update_mod_vals
  13414. case 12
  13415. call NOTE_DURATION_POLY__update_mod_vals
  13416. case 10
  13417. call VELOCITY_POLY__update_mod_vals
  13418. case 13
  13419. call KEY_TRACK_POLY__update_mod_vals
  13420. case 18
  13421. call CONST_MOD__update_mod_vals
  13422. case 19
  13423. call REL_MOD__update_mod_vals
  13424. case 20
  13425. call ARP_MOD__update_mod_vals
  13426. case 9
  13427. call AFTERTOUCH__update_mod_vals
  13428. case 21
  13429. call MPE_SLIDE__update_mod_vals
  13430. case 22
  13431. call RANDOM__update_mod_vals
  13432. case 23
  13433. call ABS_CURSOR__update_mod_vals
  13434. end select
  13435. inc($fg4rw)
  13436. end while
  13437. $oj0wr := 0
  13438. $jdgl1 := 0
  13439. while ($jdgl1<2)
  13440. $gpzoi := %ulgib[$jdgl1]
  13441. call _update_mod_knob_rt_indicator_for_gl_m_id
  13442. inc($jdgl1)
  13443. end while
  13444. $jdgl1 := 0
  13445. while ($jdgl1<11)
  13446. $gpzoi := %h2jv2[$jdgl1]
  13447. call _update_mod_knob_rt_indicator_for_gl_m_id
  13448. inc($jdgl1)
  13449. end while
  13450. if ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0)))
  13451. $jdgl1 := 0
  13452. while ($jdgl1<4)
  13453. $gpzoi := %u335j[$jdgl1]
  13454. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  13455. inc($jdgl1)
  13456. end while
  13457. end if
  13458. if ($ruhe4=1)
  13459. if ($mdykc=2 and ($0ib2k=2))
  13460. $oj0wr := 1
  13461. end if
  13462. $dc3zm := $auli3
  13463. $frfox := 0
  13464. $fg4rw := 0
  13465. while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
  13466. select (%dpoyh[$fg4rw])
  13467. case 2
  13468. call SHP1__update_mod_vals
  13469. case 3
  13470. call SHP2__update_mod_vals
  13471. case 4
  13472. call LFO1__update_mod_vals
  13473. case 5
  13474. call LFO2__update_mod_vals
  13475. case 6
  13476. call BUS1__update_mod_vals
  13477. case 7
  13478. call BUS2__update_mod_vals
  13479. case 8
  13480. call MTX__update_mod_vals
  13481. case 12
  13482. call NOTE_DURATION_POLY__update_mod_vals
  13483. case 10
  13484. call VELOCITY_POLY__update_mod_vals
  13485. case 13
  13486. call KEY_TRACK_POLY__update_mod_vals
  13487. case 18
  13488. call CONST_MOD__update_mod_vals
  13489. case 19
  13490. call REL_MOD__update_mod_vals
  13491. case 20
  13492. call ARP_MOD__update_mod_vals
  13493. case 9
  13494. call AFTERTOUCH__update_mod_vals
  13495. case 21
  13496. call MPE_SLIDE__update_mod_vals
  13497. case 22
  13498. call RANDOM__update_mod_vals
  13499. case 23
  13500. call ABS_CURSOR__update_mod_vals
  13501. end select
  13502. inc($fg4rw)
  13503. end while
  13504. $oj0wr := 0
  13505. $jdgl1 := 0
  13506. while ($jdgl1<4)
  13507. $gpzoi := %xkzmj[$jdgl1]
  13508. call set_mod_knob_group_engine_par_for_gl_m_id
  13509. call _update_mod_knob_rt_indicator_for_gl_m_id
  13510. inc($jdgl1)
  13511. end while
  13512. if ($0ib2k=2)
  13513. $jdgl1 := 0
  13514. while ($jdgl1<4)
  13515. $gpzoi := %u335j[$jdgl1]
  13516. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  13517. inc($jdgl1)
  13518. end while
  13519. end if
  13520. end if
  13521. end function
  13522. function _update_mod_knob_label_for_gl_m_id
  13523. $volav := $gpzoi
  13524. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,@uamno)
  13525. if ($gpzoi # 9)
  13526. set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_HIDE))
  13527. end if
  13528. if (%jeswc[$gpzoi]=55)
  13529. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask_8")
  13530. end if
  13531. if (%jeswc[$gpzoi]=330)
  13532. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
  13533. if ($afnek=0)
  13534. %latnx[0] := 6
  13535. %latnx[1] := 6
  13536. call MOD__perform_optimized_update_for_gl_ext_mod
  13537. %latnx[0] := 8
  13538. %latnx[1] := 8
  13539. call MOD__perform_optimized_update_for_gl_ext_mod
  13540. $gpzoi := $volav
  13541. end if
  13542. end if
  13543. if (%jeswc[$gpzoi]=335)
  13544. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
  13545. if ($afnek=0)
  13546. %latnx[0] := 7
  13547. %latnx[1] := 7
  13548. call MOD__perform_optimized_update_for_gl_ext_mod
  13549. %latnx[0] := 8
  13550. %latnx[1] := 8
  13551. call MOD__perform_optimized_update_for_gl_ext_mod
  13552. $gpzoi := $volav
  13553. end if
  13554. end if
  13555. %gmios[$gpzoi] := $ENGINE_UPTIME
  13556. end function
  13557. function on_mod_knob_for_gl_m_id
  13558. call _handle_mod_knob_modifiers_for_gl_m_id
  13559. call _update_mod_knob_range_indicator_for_gl_m_id
  13560. call _update_mod_knob_automation_label_for_gl_m_id
  13561. call _update_mod_knob_label_for_gl_m_id
  13562. call _update_mod_knob_rt_indicator_for_gl_m_id
  13563. end function
  13564. function seq__on_step_dur_btn_for_h
  13565. $dyt1q := (1000000-($dyt1q*83333))*(1+(sh_right(1000000-(1000000-($dyt1q*83333)),31) .or. sh_right(1000000-($dyt1q*83333)-0,31)))-0-(1000000*sh_right(1000000-(1000000-($dyt1q*83333)),31))
  13566. $dyt1q := $dyt1q-($1ybzi*%ppvim[$rpaco]/1000)
  13567. $ius2b := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
  13568. $gpzoi := 9
  13569. call on_mod_knob_for_gl_m_id
  13570. end function
  13571. function stepper_on_listener_set_modulation
  13572. if (%pqcgh[8*$3qz3a+$v2ky0]=1 and ($ejy35=1))
  13573. if ($afnek=1)
  13574. if ($fojqp mod $qxgdn=0)
  13575. $5jkam := %t40az[$zgcke mod $ilpk2]*500
  13576. if (get_engine_par($ENGINE_PAR_GN_GAIN,-1,$v2ky0,$qscu5) # $5jkam)
  13577. set_engine_par($ENGINE_PAR_GN_GAIN,$5jkam,-1,$v2ky0,$qscu5)
  13578. end if
  13579. call stepper__update_pos_ind
  13580. inc($zgcke)
  13581. end if
  13582. inc($fojqp)
  13583. end if
  13584. else
  13585. if (get_engine_par($ENGINE_PAR_GN_GAIN,-1,$v2ky0,$qscu5) # 397461)
  13586. set_engine_par($ENGINE_PAR_GN_GAIN,397461,-1,$v2ky0,$qscu5)
  13587. end if
  13588. end if
  13589. end function
  13590. function _reset_mod_knob_label_for_gl_m_id
  13591. if (%vvlef[$gpzoi]>0)
  13592. if (%gmios[$gpzoi]>0 and ($ENGINE_UPTIME-%gmios[$gpzoi]>=700))
  13593. if (%q4mzh[$gpzoi] # -1 and (%mnk53[$gpzoi]>=%mnk53[35] and (%mnk53[$gpzoi]<=%mnk53[73]) or in_range(%mnk53[$gpzoi],%mnk53[31],33) or in_range(%mnk53[$gpzoi],114,116) or in_range(%mnk53[$gpzoi],120,122)))
  13594. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,"")
  13595. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_" & -sh_right(440-get_control_par(%vvlef[$gpzoi],$CONTROL_PAR_POS_Y),31))
  13596. if (in_range(%mnk53[$gpzoi],31,33) or in_range(%mnk53[$gpzoi],114,116) or in_range(%mnk53[$gpzoi],120,122))
  13597. set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%q4mzh[$gpzoi])+106)
  13598. else
  13599. set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE_STATE,(1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$gpzoi])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])])-$EFFECT_TYPE_FILTER)-1,31))*(%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$gpzoi])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])])]]+((%mnk53[$gpzoi]-75) mod 3))+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$gpzoi])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])])-$EFFECT_TYPE_FILTER)-1,31)*(%5gftk[3*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$gpzoi])],%hpc0e[$gpzoi],%zjgrf[search(%zjgrf,%eujmz[$gpzoi])])))))+((%mnk53[$gpzoi]-75) mod 3)]+106)))
  13600. end if
  13601. else
  13602. set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  13603. end if
  13604. %gmios[$gpzoi] := 0
  13605. end if
  13606. end if
  13607. end function
  13608. function MOD__perform_cont_update
  13609. $dc3zm := $y3puj
  13610. if ($0ib2k=3 or ($0ib2k=4))
  13611. $oj0wr := 1
  13612. end if
  13613. $frfox := 1
  13614. $fg4rw := 0
  13615. while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
  13616. select (%dpoyh[$fg4rw])
  13617. case 2
  13618. call SHP1__update_mod_vals
  13619. case 3
  13620. call SHP2__update_mod_vals
  13621. case 4
  13622. call LFO1__update_mod_vals
  13623. case 5
  13624. call LFO2__update_mod_vals
  13625. case 6
  13626. call BUS1__update_mod_vals
  13627. case 7
  13628. call BUS2__update_mod_vals
  13629. case 8
  13630. call MTX__update_mod_vals
  13631. case 12
  13632. call NOTE_DURATION_POLY__update_mod_vals
  13633. case 10
  13634. call VELOCITY_POLY__update_mod_vals
  13635. case 13
  13636. call KEY_TRACK_POLY__update_mod_vals
  13637. case 18
  13638. call CONST_MOD__update_mod_vals
  13639. case 19
  13640. call REL_MOD__update_mod_vals
  13641. case 20
  13642. call ARP_MOD__update_mod_vals
  13643. case 9
  13644. call AFTERTOUCH__update_mod_vals
  13645. case 21
  13646. call MPE_SLIDE__update_mod_vals
  13647. case 22
  13648. call RANDOM__update_mod_vals
  13649. case 23
  13650. call ABS_CURSOR__update_mod_vals
  13651. end select
  13652. inc($fg4rw)
  13653. end while
  13654. call MOD__store_current_mod_context
  13655. $oj0wr := 0
  13656. $jdgl1 := 0
  13657. while ($jdgl1<48)
  13658. $gpzoi := %xdonk[$jdgl1]
  13659. call set_mod_knob_engine_par_with_permanent_modulation_for_gl_m_id
  13660. inc($jdgl1)
  13661. end while
  13662. if ($ruhe4=1)
  13663. $jdgl1 := 0
  13664. while ($jdgl1<3)
  13665. $gpzoi := %arjqa[$jdgl1]
  13666. call update_mod_knob_cont_params_for_gl_m_id
  13667. inc($jdgl1)
  13668. end while
  13669. else
  13670. $jdgl1 := 0
  13671. while ($jdgl1<4)
  13672. $gpzoi := %xkzmj[$jdgl1]
  13673. call set_mod_knob_engine_par_with_permanent_modulation_for_gl_m_id
  13674. inc($jdgl1)
  13675. end while
  13676. end if
  13677. if ($0ib2k=3 or ($0ib2k=4))
  13678. $jdgl1 := 0
  13679. while ($jdgl1<4)
  13680. $gpzoi := %u335j[$jdgl1]
  13681. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  13682. inc($jdgl1)
  13683. end while
  13684. end if
  13685. if (%hivzv[6]=1)
  13686. call update_morph_stepper
  13687. end if
  13688. if ($t4vew=1)
  13689. $y3mgr := 0
  13690. while ($y3mgr<num_elements(%hrm2k))
  13691. if (event_status(%hrm2k[$y3mgr])=$EVENT_STATUS_NOTE_QUEUE)
  13692. $gpzoi := 23
  13693. $dc3zm := %k0ra5[$y3mgr]
  13694. $1il5i := %3hbq2[$gpzoi]-1
  13695. while ($1il5i>=0)
  13696. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  13697. select (%q4rwz[20*$gpzoi+$1il5i])
  13698. case 2
  13699. call SHP1__update_mod_vals
  13700. case 3
  13701. call SHP2__update_mod_vals
  13702. case 4
  13703. call LFO1__update_mod_vals
  13704. case 5
  13705. call LFO2__update_mod_vals
  13706. case 6
  13707. call BUS1__update_mod_vals
  13708. case 7
  13709. call BUS2__update_mod_vals
  13710. case 8
  13711. call MTX__update_mod_vals
  13712. case 12
  13713. call NOTE_DURATION_POLY__update_mod_vals
  13714. case 10
  13715. call VELOCITY_POLY__update_mod_vals
  13716. case 13
  13717. call KEY_TRACK_POLY__update_mod_vals
  13718. case 18
  13719. call CONST_MOD__update_mod_vals
  13720. case 19
  13721. call REL_MOD__update_mod_vals
  13722. case 20
  13723. call ARP_MOD__update_mod_vals
  13724. case 9
  13725. call AFTERTOUCH__update_mod_vals
  13726. case 21
  13727. call MPE_SLIDE__update_mod_vals
  13728. case 22
  13729. call RANDOM__update_mod_vals
  13730. case 23
  13731. call ABS_CURSOR__update_mod_vals
  13732. end select
  13733. end if
  13734. dec($1il5i)
  13735. end while
  13736. $dyt1q := 127*($l2tv1+($zv33b*%ppvim[$dbgkf]/1000))/1000
  13737. change_vol(%hrm2k[$y3mgr],-real_to_int(60000.0-(?xpxzm[$dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))]*60000.0))-get_event_par(%hrm2k[$y3mgr],$EVENT_PAR_VOLUME),1)
  13738. if (%hrm2k[$y3mgr]=$auli3)
  13739. call _update_mod_knob_rt_indicator_for_gl_m_id
  13740. end if
  13741. $gpzoi := 28
  13742. $dc3zm := %k0ra5[$y3mgr]
  13743. $1il5i := %3hbq2[$gpzoi]-1
  13744. while ($1il5i>=0)
  13745. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  13746. select (%q4rwz[20*$gpzoi+$1il5i])
  13747. case 2
  13748. call SHP1__update_mod_vals
  13749. case 3
  13750. call SHP2__update_mod_vals
  13751. case 4
  13752. call LFO1__update_mod_vals
  13753. case 5
  13754. call LFO2__update_mod_vals
  13755. case 6
  13756. call BUS1__update_mod_vals
  13757. case 7
  13758. call BUS2__update_mod_vals
  13759. case 8
  13760. call MTX__update_mod_vals
  13761. case 12
  13762. call NOTE_DURATION_POLY__update_mod_vals
  13763. case 10
  13764. call VELOCITY_POLY__update_mod_vals
  13765. case 13
  13766. call KEY_TRACK_POLY__update_mod_vals
  13767. case 18
  13768. call CONST_MOD__update_mod_vals
  13769. case 19
  13770. call REL_MOD__update_mod_vals
  13771. case 20
  13772. call ARP_MOD__update_mod_vals
  13773. case 9
  13774. call AFTERTOUCH__update_mod_vals
  13775. case 21
  13776. call MPE_SLIDE__update_mod_vals
  13777. case 22
  13778. call RANDOM__update_mod_vals
  13779. case 23
  13780. call ABS_CURSOR__update_mod_vals
  13781. end select
  13782. end if
  13783. dec($1il5i)
  13784. end while
  13785. change_tune(%hrm2k[$y3mgr],($c21kk+($eg3kt*%ppvim[$2vyff]/1000))*1000+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[%k0ra5[$y3mgr] mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),0)
  13786. if (%hrm2k[$y3mgr]=$auli3)
  13787. call _update_mod_knob_rt_indicator_for_gl_m_id
  13788. end if
  13789. if (%hrm2k[$y3mgr]=$auli3)
  13790. $gpzoi := 29
  13791. $dc3zm := %k0ra5[$y3mgr]
  13792. $1il5i := %3hbq2[$gpzoi]-1
  13793. while ($1il5i>=0)
  13794. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  13795. select (%q4rwz[20*$gpzoi+$1il5i])
  13796. case 2
  13797. call SHP1__update_mod_vals
  13798. case 3
  13799. call SHP2__update_mod_vals
  13800. case 4
  13801. call LFO1__update_mod_vals
  13802. case 5
  13803. call LFO2__update_mod_vals
  13804. case 6
  13805. call BUS1__update_mod_vals
  13806. case 7
  13807. call BUS2__update_mod_vals
  13808. case 8
  13809. call MTX__update_mod_vals
  13810. case 12
  13811. call NOTE_DURATION_POLY__update_mod_vals
  13812. case 10
  13813. call VELOCITY_POLY__update_mod_vals
  13814. case 13
  13815. call KEY_TRACK_POLY__update_mod_vals
  13816. case 18
  13817. call CONST_MOD__update_mod_vals
  13818. case 19
  13819. call REL_MOD__update_mod_vals
  13820. case 20
  13821. call ARP_MOD__update_mod_vals
  13822. case 9
  13823. call AFTERTOUCH__update_mod_vals
  13824. case 21
  13825. call MPE_SLIDE__update_mod_vals
  13826. case 22
  13827. call RANDOM__update_mod_vals
  13828. case 23
  13829. call ABS_CURSOR__update_mod_vals
  13830. end select
  13831. end if
  13832. dec($1il5i)
  13833. end while
  13834. call _update_mod_knob_rt_indicator_for_gl_m_id
  13835. $gpzoi := 30
  13836. $dc3zm := %k0ra5[$y3mgr]
  13837. $1il5i := %3hbq2[$gpzoi]-1
  13838. while ($1il5i>=0)
  13839. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  13840. select (%q4rwz[20*$gpzoi+$1il5i])
  13841. case 2
  13842. call SHP1__update_mod_vals
  13843. case 3
  13844. call SHP2__update_mod_vals
  13845. case 4
  13846. call LFO1__update_mod_vals
  13847. case 5
  13848. call LFO2__update_mod_vals
  13849. case 6
  13850. call BUS1__update_mod_vals
  13851. case 7
  13852. call BUS2__update_mod_vals
  13853. case 8
  13854. call MTX__update_mod_vals
  13855. case 12
  13856. call NOTE_DURATION_POLY__update_mod_vals
  13857. case 10
  13858. call VELOCITY_POLY__update_mod_vals
  13859. case 13
  13860. call KEY_TRACK_POLY__update_mod_vals
  13861. case 18
  13862. call CONST_MOD__update_mod_vals
  13863. case 19
  13864. call REL_MOD__update_mod_vals
  13865. case 20
  13866. call ARP_MOD__update_mod_vals
  13867. case 9
  13868. call AFTERTOUCH__update_mod_vals
  13869. case 21
  13870. call MPE_SLIDE__update_mod_vals
  13871. case 22
  13872. call RANDOM__update_mod_vals
  13873. case 23
  13874. call ABS_CURSOR__update_mod_vals
  13875. end select
  13876. end if
  13877. dec($1il5i)
  13878. end while
  13879. call _update_mod_knob_rt_indicator_for_gl_m_id
  13880. end if
  13881. end if
  13882. inc($y3mgr)
  13883. end while
  13884. end if
  13885. call update_poly_mod_event_id
  13886. $dc3zm := $4ggtc
  13887. if ($mdykc=2 and ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0))))
  13888. $oj0wr := 1
  13889. end if
  13890. $frfox := 0
  13891. $fg4rw := 0
  13892. while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
  13893. select (%dpoyh[$fg4rw])
  13894. case 2
  13895. call SHP1__update_mod_vals
  13896. case 3
  13897. call SHP2__update_mod_vals
  13898. case 4
  13899. call LFO1__update_mod_vals
  13900. case 5
  13901. call LFO2__update_mod_vals
  13902. case 6
  13903. call BUS1__update_mod_vals
  13904. case 7
  13905. call BUS2__update_mod_vals
  13906. case 8
  13907. call MTX__update_mod_vals
  13908. case 12
  13909. call NOTE_DURATION_POLY__update_mod_vals
  13910. case 10
  13911. call VELOCITY_POLY__update_mod_vals
  13912. case 13
  13913. call KEY_TRACK_POLY__update_mod_vals
  13914. case 18
  13915. call CONST_MOD__update_mod_vals
  13916. case 19
  13917. call REL_MOD__update_mod_vals
  13918. case 20
  13919. call ARP_MOD__update_mod_vals
  13920. case 9
  13921. call AFTERTOUCH__update_mod_vals
  13922. case 21
  13923. call MPE_SLIDE__update_mod_vals
  13924. case 22
  13925. call RANDOM__update_mod_vals
  13926. case 23
  13927. call ABS_CURSOR__update_mod_vals
  13928. end select
  13929. inc($fg4rw)
  13930. end while
  13931. $oj0wr := 0
  13932. $jdgl1 := 0
  13933. while ($jdgl1<2)
  13934. $gpzoi := %ulgib[$jdgl1]
  13935. call update_mod_knob_cont_params_for_gl_m_id
  13936. inc($jdgl1)
  13937. end while
  13938. $jdgl1 := 0
  13939. while ($jdgl1<11)
  13940. $gpzoi := %h2jv2[$jdgl1]
  13941. if ($wkxzh=0)
  13942. call update_mod_knob_cont_params_for_gl_m_id
  13943. else
  13944. call _update_mod_knob_rt_indicator_for_gl_m_id
  13945. end if
  13946. inc($jdgl1)
  13947. end while
  13948. if ($0ib2k=1 or ($0ib2k=2 and ($ruhe4=0)))
  13949. $jdgl1 := 0
  13950. while ($jdgl1<4)
  13951. $gpzoi := %u335j[$jdgl1]
  13952. if ($wkxzh=0)
  13953. call update_mod_knob_cont_params_for_gl_m_id
  13954. else
  13955. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  13956. end if
  13957. inc($jdgl1)
  13958. end while
  13959. end if
  13960. if ($ruhe4=1)
  13961. if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE)
  13962. if ($mdykc=2 and ($0ib2k=2))
  13963. $oj0wr := 1
  13964. end if
  13965. $dc3zm := $auli3
  13966. $frfox := 0
  13967. $fg4rw := 0
  13968. while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
  13969. select (%dpoyh[$fg4rw])
  13970. case 2
  13971. call SHP1__update_mod_vals
  13972. case 3
  13973. call SHP2__update_mod_vals
  13974. case 4
  13975. call LFO1__update_mod_vals
  13976. case 5
  13977. call LFO2__update_mod_vals
  13978. case 6
  13979. call BUS1__update_mod_vals
  13980. case 7
  13981. call BUS2__update_mod_vals
  13982. case 8
  13983. call MTX__update_mod_vals
  13984. case 12
  13985. call NOTE_DURATION_POLY__update_mod_vals
  13986. case 10
  13987. call VELOCITY_POLY__update_mod_vals
  13988. case 13
  13989. call KEY_TRACK_POLY__update_mod_vals
  13990. case 18
  13991. call CONST_MOD__update_mod_vals
  13992. case 19
  13993. call REL_MOD__update_mod_vals
  13994. case 20
  13995. call ARP_MOD__update_mod_vals
  13996. case 9
  13997. call AFTERTOUCH__update_mod_vals
  13998. case 21
  13999. call MPE_SLIDE__update_mod_vals
  14000. case 22
  14001. call RANDOM__update_mod_vals
  14002. case 23
  14003. call ABS_CURSOR__update_mod_vals
  14004. end select
  14005. inc($fg4rw)
  14006. end while
  14007. $oj0wr := 0
  14008. $jdgl1 := 0
  14009. while ($jdgl1<4)
  14010. $gpzoi := %xkzmj[$jdgl1]
  14011. call set_mod_knob_group_engine_par_for_gl_m_id
  14012. call _update_mod_knob_rt_indicator_for_gl_m_id
  14013. inc($jdgl1)
  14014. end while
  14015. if ($0ib2k=2)
  14016. $jdgl1 := 0
  14017. while ($jdgl1<4)
  14018. $gpzoi := %u335j[$jdgl1]
  14019. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  14020. inc($jdgl1)
  14021. end while
  14022. end if
  14023. end if
  14024. end if
  14025. if (get_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL and ($t4vew=1))
  14026. if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE)
  14027. set_ui_wf_property($tmcuy,$UI_WF_PROP_PLAY_CURSOR,0,get_event_par($auli3,$EVENT_PAR_PLAY_POS)-1)
  14028. else
  14029. set_ui_wf_property($tmcuy,$UI_WF_PROP_PLAY_CURSOR,0,-1)
  14030. end if
  14031. end if
  14032. end function
  14033. function _LFO__update_phase_update_mod_id_arg
  14034. $ga54u := -1
  14035. if (event_status(%5ggz3[$fg4rw])=$EVENT_STATUS_NOTE_QUEUE or (%5ggz3[$fg4rw]=$y3puj))
  14036. $ga54u := %5ggz3[$fg4rw]
  14037. else
  14038. if (event_status(%asdef[$fg4rw])=$EVENT_STATUS_NOTE_QUEUE)
  14039. $ga54u := %asdef[$fg4rw]
  14040. end if
  14041. end if
  14042. end function
  14043. function LFO1__update_phase
  14044. if ($l4ujc=1)
  14045. $fg4rw := 0
  14046. while ($fg4rw<256)
  14047. call _LFO__update_phase_update_mod_id_arg
  14048. if ($ga54u # -1)
  14049. if (%hxpuh[7]=1)
  14050. $dc3zm := $ga54u
  14051. $1il5i := %3hbq2[7]-1
  14052. while ($1il5i>=0)
  14053. if (%q4rwz[140+$1il5i]>=0)
  14054. select (%q4rwz[140+$1il5i])
  14055. case 2
  14056. call SHP1__update_mod_vals
  14057. case 3
  14058. call SHP2__update_mod_vals
  14059. case 4
  14060. call LFO1__update_mod_vals
  14061. case 5
  14062. call LFO2__update_mod_vals
  14063. case 6
  14064. call BUS1__update_mod_vals
  14065. case 7
  14066. call BUS2__update_mod_vals
  14067. case 8
  14068. call MTX__update_mod_vals
  14069. case 12
  14070. call NOTE_DURATION_POLY__update_mod_vals
  14071. case 10
  14072. call VELOCITY_POLY__update_mod_vals
  14073. case 13
  14074. call KEY_TRACK_POLY__update_mod_vals
  14075. case 18
  14076. call CONST_MOD__update_mod_vals
  14077. case 19
  14078. call REL_MOD__update_mod_vals
  14079. case 20
  14080. call ARP_MOD__update_mod_vals
  14081. case 9
  14082. call AFTERTOUCH__update_mod_vals
  14083. case 21
  14084. call MPE_SLIDE__update_mod_vals
  14085. case 22
  14086. call RANDOM__update_mod_vals
  14087. case 23
  14088. call ABS_CURSOR__update_mod_vals
  14089. end select
  14090. end if
  14091. dec($1il5i)
  14092. end while
  14093. end if
  14094. $kil43 := real_to_int((int_to_real($zktrd)+(int_to_real($2zugt*%ppvim[$vas4o])/1000.0))/1500.1*17.0)
  14095. $kil43 := $kil43*(1+(sh_right(16-$kil43,31) .or. sh_right($kil43-0,31)))-0-(16*sh_right(16-$kil43,31))
  14096. if (?3nlwo[$kil43]>0.0)
  14097. ?lrdg1[$fg4rw] := int_to_real(($ENGINE_UPTIME-%hqihq[$fg4rw])*1000)/(int_to_real($DURATION_QUARTER*4)*?3nlwo[$kil43])+(int_to_real($rj2yq)/360.0)
  14098. else
  14099. ?lrdg1[$fg4rw] := int_to_real(($ENGINE_UPTIME-%hqihq[$fg4rw])*1000)/(int_to_real($SIGNATURE_NUM*$DURATION_QUARTER*4/$SIGNATURE_DENOM)*-?3nlwo[$kil43])+(int_to_real($rj2yq)/360.0)
  14100. end if
  14101. end if
  14102. inc($fg4rw)
  14103. end while
  14104. else
  14105. if (%iv2n3[$e2mne]=1)
  14106. if (%hxpuh[7]=1)
  14107. $dc3zm := %5ggz3[$a2nqk]
  14108. $1il5i := %3hbq2[7]-1
  14109. while ($1il5i>=0)
  14110. if (%q4rwz[140+$1il5i]>=0)
  14111. select (%q4rwz[140+$1il5i])
  14112. case 2
  14113. call SHP1__update_mod_vals
  14114. case 3
  14115. call SHP2__update_mod_vals
  14116. case 4
  14117. call LFO1__update_mod_vals
  14118. case 5
  14119. call LFO2__update_mod_vals
  14120. case 6
  14121. call BUS1__update_mod_vals
  14122. case 7
  14123. call BUS2__update_mod_vals
  14124. case 8
  14125. call MTX__update_mod_vals
  14126. case 12
  14127. call NOTE_DURATION_POLY__update_mod_vals
  14128. case 10
  14129. call VELOCITY_POLY__update_mod_vals
  14130. case 13
  14131. call KEY_TRACK_POLY__update_mod_vals
  14132. case 18
  14133. call CONST_MOD__update_mod_vals
  14134. case 19
  14135. call REL_MOD__update_mod_vals
  14136. case 20
  14137. call ARP_MOD__update_mod_vals
  14138. case 9
  14139. call AFTERTOUCH__update_mod_vals
  14140. case 21
  14141. call MPE_SLIDE__update_mod_vals
  14142. case 22
  14143. call RANDOM__update_mod_vals
  14144. case 23
  14145. call ABS_CURSOR__update_mod_vals
  14146. end select
  14147. end if
  14148. dec($1il5i)
  14149. end while
  14150. $gpzoi := 7
  14151. call _update_mod_knob_rt_indicator_for_gl_m_id
  14152. end if
  14153. ?lrdg1[$a2nqk] := ?lrdg1[$a2nqk]+((pow((int_to_real($zktrd+($2zugt*%ppvim[$vas4o]/1000))-1.0)/1499.0,?rylw5[7])*1499.0+1.0)/100.0/150.0)
  14154. $fg4rw := 0
  14155. while ($fg4rw<256)
  14156. ?lrdg1[$fg4rw] := ?lrdg1[$a2nqk]
  14157. inc($fg4rw)
  14158. end while
  14159. else
  14160. $fg4rw := 0
  14161. while ($fg4rw<256)
  14162. call _LFO__update_phase_update_mod_id_arg
  14163. if ($ga54u # -1)
  14164. if (%hxpuh[7]=1)
  14165. $dc3zm := $ga54u
  14166. $1il5i := %3hbq2[7]-1
  14167. while ($1il5i>=0)
  14168. if (%q4rwz[140+$1il5i]>=0)
  14169. select (%q4rwz[140+$1il5i])
  14170. case 2
  14171. call SHP1__update_mod_vals
  14172. case 3
  14173. call SHP2__update_mod_vals
  14174. case 4
  14175. call LFO1__update_mod_vals
  14176. case 5
  14177. call LFO2__update_mod_vals
  14178. case 6
  14179. call BUS1__update_mod_vals
  14180. case 7
  14181. call BUS2__update_mod_vals
  14182. case 8
  14183. call MTX__update_mod_vals
  14184. case 12
  14185. call NOTE_DURATION_POLY__update_mod_vals
  14186. case 10
  14187. call VELOCITY_POLY__update_mod_vals
  14188. case 13
  14189. call KEY_TRACK_POLY__update_mod_vals
  14190. case 18
  14191. call CONST_MOD__update_mod_vals
  14192. case 19
  14193. call REL_MOD__update_mod_vals
  14194. case 20
  14195. call ARP_MOD__update_mod_vals
  14196. case 9
  14197. call AFTERTOUCH__update_mod_vals
  14198. case 21
  14199. call MPE_SLIDE__update_mod_vals
  14200. case 22
  14201. call RANDOM__update_mod_vals
  14202. case 23
  14203. call ABS_CURSOR__update_mod_vals
  14204. end select
  14205. end if
  14206. dec($1il5i)
  14207. end while
  14208. end if
  14209. ?lrdg1[$fg4rw] := ?lrdg1[$fg4rw]+((pow((int_to_real($zktrd+($2zugt*%ppvim[$vas4o]/1000))-1.0)/1499.0,?rylw5[7])*1499.0+1.0)/100.0/150.0)
  14210. end if
  14211. inc($fg4rw)
  14212. end while
  14213. end if
  14214. end if
  14215. end function
  14216. function LFO2__update_phase
  14217. if ($x02cl=1)
  14218. $fg4rw := 0
  14219. while ($fg4rw<256)
  14220. call _LFO__update_phase_update_mod_id_arg
  14221. if ($ga54u # -1)
  14222. if (%hxpuh[8]=1)
  14223. $dc3zm := $ga54u
  14224. $1il5i := %3hbq2[8]-1
  14225. while ($1il5i>=0)
  14226. if (%q4rwz[160+$1il5i]>=0)
  14227. select (%q4rwz[160+$1il5i])
  14228. case 2
  14229. call SHP1__update_mod_vals
  14230. case 3
  14231. call SHP2__update_mod_vals
  14232. case 4
  14233. call LFO1__update_mod_vals
  14234. case 5
  14235. call LFO2__update_mod_vals
  14236. case 6
  14237. call BUS1__update_mod_vals
  14238. case 7
  14239. call BUS2__update_mod_vals
  14240. case 8
  14241. call MTX__update_mod_vals
  14242. case 12
  14243. call NOTE_DURATION_POLY__update_mod_vals
  14244. case 10
  14245. call VELOCITY_POLY__update_mod_vals
  14246. case 13
  14247. call KEY_TRACK_POLY__update_mod_vals
  14248. case 18
  14249. call CONST_MOD__update_mod_vals
  14250. case 19
  14251. call REL_MOD__update_mod_vals
  14252. case 20
  14253. call ARP_MOD__update_mod_vals
  14254. case 9
  14255. call AFTERTOUCH__update_mod_vals
  14256. case 21
  14257. call MPE_SLIDE__update_mod_vals
  14258. case 22
  14259. call RANDOM__update_mod_vals
  14260. case 23
  14261. call ABS_CURSOR__update_mod_vals
  14262. end select
  14263. end if
  14264. dec($1il5i)
  14265. end while
  14266. end if
  14267. $wuhc2 := real_to_int((int_to_real($sseum)+(int_to_real($bi544*%ppvim[$y3s33])/1000.0))/1500.1*17.0)
  14268. $wuhc2 := $wuhc2*(1+(sh_right(16-$wuhc2,31) .or. sh_right($wuhc2-0,31)))-0-(16*sh_right(16-$wuhc2,31))
  14269. if (?3nlwo[$wuhc2]>0.0)
  14270. ?pu5ib[$fg4rw] := int_to_real(($ENGINE_UPTIME-%qvhhl[$fg4rw])*1000)/(int_to_real($DURATION_QUARTER*4)*?3nlwo[$wuhc2])+(int_to_real($s2bg4)/360.0)
  14271. else
  14272. ?pu5ib[$fg4rw] := int_to_real(($ENGINE_UPTIME-%qvhhl[$fg4rw])*1000)/(int_to_real($SIGNATURE_NUM*$DURATION_QUARTER*4/$SIGNATURE_DENOM)*-?3nlwo[$wuhc2])+(int_to_real($s2bg4)/360.0)
  14273. end if
  14274. end if
  14275. inc($fg4rw)
  14276. end while
  14277. else
  14278. if (%iv2n3[$eu0kx]=1)
  14279. if (%hxpuh[8]=1)
  14280. $dc3zm := %5ggz3[$xpr4r]
  14281. $1il5i := %3hbq2[8]-1
  14282. while ($1il5i>=0)
  14283. if (%q4rwz[160+$1il5i]>=0)
  14284. select (%q4rwz[160+$1il5i])
  14285. case 2
  14286. call SHP1__update_mod_vals
  14287. case 3
  14288. call SHP2__update_mod_vals
  14289. case 4
  14290. call LFO1__update_mod_vals
  14291. case 5
  14292. call LFO2__update_mod_vals
  14293. case 6
  14294. call BUS1__update_mod_vals
  14295. case 7
  14296. call BUS2__update_mod_vals
  14297. case 8
  14298. call MTX__update_mod_vals
  14299. case 12
  14300. call NOTE_DURATION_POLY__update_mod_vals
  14301. case 10
  14302. call VELOCITY_POLY__update_mod_vals
  14303. case 13
  14304. call KEY_TRACK_POLY__update_mod_vals
  14305. case 18
  14306. call CONST_MOD__update_mod_vals
  14307. case 19
  14308. call REL_MOD__update_mod_vals
  14309. case 20
  14310. call ARP_MOD__update_mod_vals
  14311. case 9
  14312. call AFTERTOUCH__update_mod_vals
  14313. case 21
  14314. call MPE_SLIDE__update_mod_vals
  14315. case 22
  14316. call RANDOM__update_mod_vals
  14317. case 23
  14318. call ABS_CURSOR__update_mod_vals
  14319. end select
  14320. end if
  14321. dec($1il5i)
  14322. end while
  14323. $gpzoi := 8
  14324. call _update_mod_knob_rt_indicator_for_gl_m_id
  14325. end if
  14326. ?pu5ib[$xpr4r] := ?pu5ib[$xpr4r]+((pow((int_to_real($sseum+($bi544*%ppvim[$y3s33]/1000))-1.0)/1499.0,?rylw5[8])*1499.0+1.0)/100.0/150.0)
  14327. $fg4rw := 0
  14328. while ($fg4rw<256)
  14329. ?pu5ib[$fg4rw] := ?pu5ib[$xpr4r]
  14330. inc($fg4rw)
  14331. end while
  14332. else
  14333. $fg4rw := 0
  14334. while ($fg4rw<256)
  14335. call _LFO__update_phase_update_mod_id_arg
  14336. if ($ga54u # -1)
  14337. if (%hxpuh[8]=1)
  14338. $dc3zm := $ga54u
  14339. $1il5i := %3hbq2[8]-1
  14340. while ($1il5i>=0)
  14341. if (%q4rwz[160+$1il5i]>=0)
  14342. select (%q4rwz[160+$1il5i])
  14343. case 2
  14344. call SHP1__update_mod_vals
  14345. case 3
  14346. call SHP2__update_mod_vals
  14347. case 4
  14348. call LFO1__update_mod_vals
  14349. case 5
  14350. call LFO2__update_mod_vals
  14351. case 6
  14352. call BUS1__update_mod_vals
  14353. case 7
  14354. call BUS2__update_mod_vals
  14355. case 8
  14356. call MTX__update_mod_vals
  14357. case 12
  14358. call NOTE_DURATION_POLY__update_mod_vals
  14359. case 10
  14360. call VELOCITY_POLY__update_mod_vals
  14361. case 13
  14362. call KEY_TRACK_POLY__update_mod_vals
  14363. case 18
  14364. call CONST_MOD__update_mod_vals
  14365. case 19
  14366. call REL_MOD__update_mod_vals
  14367. case 20
  14368. call ARP_MOD__update_mod_vals
  14369. case 9
  14370. call AFTERTOUCH__update_mod_vals
  14371. case 21
  14372. call MPE_SLIDE__update_mod_vals
  14373. case 22
  14374. call RANDOM__update_mod_vals
  14375. case 23
  14376. call ABS_CURSOR__update_mod_vals
  14377. end select
  14378. end if
  14379. dec($1il5i)
  14380. end while
  14381. end if
  14382. ?pu5ib[$fg4rw] := ?pu5ib[$fg4rw]+((pow((int_to_real($sseum+($bi544*%ppvim[$y3s33]/1000))-1.0)/1499.0,?rylw5[8])*1499.0+1.0)/100.0/150.0)
  14383. end if
  14384. inc($fg4rw)
  14385. end while
  14386. end if
  14387. end if
  14388. end function
  14389. function LFO__update_phase
  14390. call LFO1__update_phase
  14391. call LFO2__update_phase
  14392. end function
  14393. function MOD__inc_POLY__count
  14394. $1bi4b := ($1bi4b+1) mod 256
  14395. while (event_status(%5ggz3[$1bi4b])=$EVENT_STATUS_NOTE_QUEUE or (%5ggz3[$1bi4b]=$y3puj))
  14396. $1bi4b := ($1bi4b+1) mod 256
  14397. end while
  14398. end function
  14399. function update_all_poly_mod_paths
  14400. $dwl3e := 0
  14401. while (%zeecp[$dwl3e] # -1 and ($dwl3e<num_elements(%zeecp)))
  14402. select (%zeecp[$dwl3e])
  14403. case 2
  14404. call SHP1__update_mod_vals
  14405. case 3
  14406. call SHP2__update_mod_vals
  14407. case 4
  14408. call LFO1__update_mod_vals
  14409. case 5
  14410. call LFO2__update_mod_vals
  14411. case 6
  14412. call BUS1__update_mod_vals
  14413. case 7
  14414. call BUS2__update_mod_vals
  14415. case 8
  14416. call MTX__update_mod_vals
  14417. case 12
  14418. call NOTE_DURATION_POLY__update_mod_vals
  14419. case 10
  14420. call VELOCITY_POLY__update_mod_vals
  14421. case 13
  14422. call KEY_TRACK_POLY__update_mod_vals
  14423. case 18
  14424. call CONST_MOD__update_mod_vals
  14425. case 19
  14426. call REL_MOD__update_mod_vals
  14427. case 20
  14428. call ARP_MOD__update_mod_vals
  14429. case 9
  14430. call AFTERTOUCH__update_mod_vals
  14431. case 21
  14432. call MPE_SLIDE__update_mod_vals
  14433. case 22
  14434. call RANDOM__update_mod_vals
  14435. case 23
  14436. call ABS_CURSOR__update_mod_vals
  14437. end select
  14438. inc($dwl3e)
  14439. end while
  14440. end function
  14441. function GE_beat_sync_update_duration_bar
  14442. $jqz2q := $SIGNATURE_NUM*$DURATION_QUARTER*4/$SIGNATURE_DENOM
  14443. end function
  14444. function update_free_run_sync_start_vars
  14445. call GE_beat_sync_update_duration_bar
  14446. $pqpgc := real_to_int((int_to_real($sgbvz)+(int_to_real($cx1ja*%ppvim[$qxhis])/1000.0)+8000.0)/16001.0*17.0)
  14447. $pqpgc := $pqpgc*(1+(sh_right(16-$pqpgc,31) .or. sh_right($pqpgc-0,31)))-0-(16*sh_right(16-$pqpgc,31))
  14448. if (?3nlwo[$pqpgc]>0.0)
  14449. $xg4xz := real_to_int(int_to_real($DURATION_QUARTER)*4.0/1000.0*?3nlwo[$pqpgc])
  14450. else
  14451. $xg4xz := real_to_int(int_to_real($jqz2q)/1000.0*-1.0*?3nlwo[$pqpgc])
  14452. end if
  14453. $h4bci := ($wo1eq+($i11wt*$gm014))/1000
  14454. $1wd3b := real_to_int(int_to_real(%smp_l_grp[$51oxm])*~tptmd)
  14455. $f2ujt := ($1wd3b-$h4bci)*$y4ap3/$xg4xz*100
  14456. $ottdr := $f2ujt
  14457. end function
  14458. function update_g_absl_cursor_pos_for_synced_progr
  14459. if ($xc3po=0)
  14460. if (get_event_par($ygbzd,$EVENT_PAR_0) # 3)
  14461. call GE_beat_sync_update_duration_bar
  14462. $pqpgc := real_to_int((int_to_real($sgbvz)+(int_to_real($cx1ja*%ppvim[$qxhis])/1000.0)+8000.0)/16001.0*17.0)
  14463. $pqpgc := $pqpgc*(1+(sh_right(16-$pqpgc,31) .or. sh_right($pqpgc-0,31)))-0-(16*sh_right(16-$pqpgc,31))
  14464. $y1zim := $i11wt*$gm014/1000
  14465. if (?3nlwo[$pqpgc]>0.0)
  14466. $y1zim := (($ENGINE_UPTIME-$gj552-0)*(real_to_int(int_to_real(%smp_l_grp[$51oxm])*~tptmd)-($wo1eq/1000)-$y1zim)/(real_to_int(int_to_real($DURATION_QUARTER)*4.0/1000.0*?3nlwo[$pqpgc])-0)+$y1zim)*1000
  14467. else
  14468. $y1zim := (($ENGINE_UPTIME-$gj552-0)*(real_to_int(int_to_real(%smp_l_grp[$51oxm])*~tptmd)-($wo1eq/1000)-$y1zim)/(real_to_int(int_to_real($jqz2q)/-1000.0*?3nlwo[$pqpgc])-0)+$y1zim)*1000
  14469. end if
  14470. else
  14471. if ($f2ujt=0)
  14472. call update_free_run_sync_start_vars
  14473. end if
  14474. $y1zim := $mkoi4+($f2ujt*$t4gop)
  14475. end if
  14476. else
  14477. $y1zim := $mkoi4+($f2ujt*$t4gop)
  14478. end if
  14479. end function
  14480. function MOD__restore_last_mono_mod_context
  14481. $jdgl1 := 0
  14482. while ($jdgl1<24)
  14483. %ppvim[$jdgl1] := %qum0u[$jdgl1]
  14484. inc($jdgl1)
  14485. end while
  14486. end function
  14487. function MOD__perform_sample_layer_update_for_arp_note
  14488. $dc3zm := $auli3
  14489. $frfox := 1
  14490. $fg4rw := 0
  14491. while ($fg4rw<num_elements(%tyrok) and (%tyrok[$fg4rw]>-1))
  14492. select (%tyrok[$fg4rw])
  14493. case 2
  14494. call SHP1__update_mod_vals
  14495. case 3
  14496. call SHP2__update_mod_vals
  14497. case 4
  14498. call LFO1__update_mod_vals
  14499. case 5
  14500. call LFO2__update_mod_vals
  14501. case 6
  14502. call BUS1__update_mod_vals
  14503. case 7
  14504. call BUS2__update_mod_vals
  14505. case 8
  14506. call MTX__update_mod_vals
  14507. case 12
  14508. call NOTE_DURATION_POLY__update_mod_vals
  14509. case 10
  14510. call VELOCITY_POLY__update_mod_vals
  14511. case 13
  14512. call KEY_TRACK_POLY__update_mod_vals
  14513. case 18
  14514. call CONST_MOD__update_mod_vals
  14515. case 19
  14516. call REL_MOD__update_mod_vals
  14517. case 20
  14518. call ARP_MOD__update_mod_vals
  14519. case 9
  14520. call AFTERTOUCH__update_mod_vals
  14521. case 21
  14522. call MPE_SLIDE__update_mod_vals
  14523. case 22
  14524. call RANDOM__update_mod_vals
  14525. case 23
  14526. call ABS_CURSOR__update_mod_vals
  14527. end select
  14528. inc($fg4rw)
  14529. end while
  14530. $dyt1q := get_event_par($auli3,$EVENT_PAR_NOTE)+$uvcxk+($ia54c*%ppvim[$wh1ke]/1000)
  14531. if ($dyt1q>127)
  14532. $dyt1q := 115+($dyt1q mod 12)
  14533. end if
  14534. if ($dyt1q<0)
  14535. $dyt1q := ($dyt1q+128) mod 12
  14536. end if
  14537. set_event_par($auli3,$EVENT_PAR_NOTE,$dyt1q)
  14538. $jdgl1 := 0
  14539. while ($jdgl1<4)
  14540. $gpzoi := %xkzmj[$jdgl1]
  14541. call set_mod_knob_group_engine_par_for_gl_m_id
  14542. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  14543. inc($jdgl1)
  14544. end while
  14545. if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE)
  14546. $gpzoi := 23
  14547. $dc3zm := $auli3
  14548. $1il5i := %3hbq2[$gpzoi]-1
  14549. while ($1il5i>=0)
  14550. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  14551. select (%q4rwz[20*$gpzoi+$1il5i])
  14552. case 2
  14553. call SHP1__update_mod_vals
  14554. case 3
  14555. call SHP2__update_mod_vals
  14556. case 4
  14557. call LFO1__update_mod_vals
  14558. case 5
  14559. call LFO2__update_mod_vals
  14560. case 6
  14561. call BUS1__update_mod_vals
  14562. case 7
  14563. call BUS2__update_mod_vals
  14564. case 8
  14565. call MTX__update_mod_vals
  14566. case 12
  14567. call NOTE_DURATION_POLY__update_mod_vals
  14568. case 10
  14569. call VELOCITY_POLY__update_mod_vals
  14570. case 13
  14571. call KEY_TRACK_POLY__update_mod_vals
  14572. case 18
  14573. call CONST_MOD__update_mod_vals
  14574. case 19
  14575. call REL_MOD__update_mod_vals
  14576. case 20
  14577. call ARP_MOD__update_mod_vals
  14578. case 9
  14579. call AFTERTOUCH__update_mod_vals
  14580. case 21
  14581. call MPE_SLIDE__update_mod_vals
  14582. case 22
  14583. call RANDOM__update_mod_vals
  14584. case 23
  14585. call ABS_CURSOR__update_mod_vals
  14586. end select
  14587. end if
  14588. dec($1il5i)
  14589. end while
  14590. $dyt1q := 127*($l2tv1+($zv33b*%ppvim[$dbgkf]/1000))/1000
  14591. change_vol($auli3,-real_to_int(60000.0-(?xpxzm[$dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))]*60000.0))-get_event_par($auli3,$EVENT_PAR_VOLUME),1)
  14592. if ($auli3=$auli3)
  14593. call _update_mod_knob_rt_indicator_for_gl_m_id
  14594. end if
  14595. $gpzoi := 28
  14596. $dc3zm := $auli3
  14597. $1il5i := %3hbq2[$gpzoi]-1
  14598. while ($1il5i>=0)
  14599. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  14600. select (%q4rwz[20*$gpzoi+$1il5i])
  14601. case 2
  14602. call SHP1__update_mod_vals
  14603. case 3
  14604. call SHP2__update_mod_vals
  14605. case 4
  14606. call LFO1__update_mod_vals
  14607. case 5
  14608. call LFO2__update_mod_vals
  14609. case 6
  14610. call BUS1__update_mod_vals
  14611. case 7
  14612. call BUS2__update_mod_vals
  14613. case 8
  14614. call MTX__update_mod_vals
  14615. case 12
  14616. call NOTE_DURATION_POLY__update_mod_vals
  14617. case 10
  14618. call VELOCITY_POLY__update_mod_vals
  14619. case 13
  14620. call KEY_TRACK_POLY__update_mod_vals
  14621. case 18
  14622. call CONST_MOD__update_mod_vals
  14623. case 19
  14624. call REL_MOD__update_mod_vals
  14625. case 20
  14626. call ARP_MOD__update_mod_vals
  14627. case 9
  14628. call AFTERTOUCH__update_mod_vals
  14629. case 21
  14630. call MPE_SLIDE__update_mod_vals
  14631. case 22
  14632. call RANDOM__update_mod_vals
  14633. case 23
  14634. call ABS_CURSOR__update_mod_vals
  14635. end select
  14636. end if
  14637. dec($1il5i)
  14638. end while
  14639. change_tune($auli3,($c21kk+($eg3kt*%ppvim[$2vyff]/1000))*1000+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[$auli3 mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[$auli3 mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),0)
  14640. if ($auli3=$auli3)
  14641. call _update_mod_knob_rt_indicator_for_gl_m_id
  14642. end if
  14643. if ($auli3=$auli3)
  14644. $gpzoi := 29
  14645. $dc3zm := $auli3
  14646. $1il5i := %3hbq2[$gpzoi]-1
  14647. while ($1il5i>=0)
  14648. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  14649. select (%q4rwz[20*$gpzoi+$1il5i])
  14650. case 2
  14651. call SHP1__update_mod_vals
  14652. case 3
  14653. call SHP2__update_mod_vals
  14654. case 4
  14655. call LFO1__update_mod_vals
  14656. case 5
  14657. call LFO2__update_mod_vals
  14658. case 6
  14659. call BUS1__update_mod_vals
  14660. case 7
  14661. call BUS2__update_mod_vals
  14662. case 8
  14663. call MTX__update_mod_vals
  14664. case 12
  14665. call NOTE_DURATION_POLY__update_mod_vals
  14666. case 10
  14667. call VELOCITY_POLY__update_mod_vals
  14668. case 13
  14669. call KEY_TRACK_POLY__update_mod_vals
  14670. case 18
  14671. call CONST_MOD__update_mod_vals
  14672. case 19
  14673. call REL_MOD__update_mod_vals
  14674. case 20
  14675. call ARP_MOD__update_mod_vals
  14676. case 9
  14677. call AFTERTOUCH__update_mod_vals
  14678. case 21
  14679. call MPE_SLIDE__update_mod_vals
  14680. case 22
  14681. call RANDOM__update_mod_vals
  14682. case 23
  14683. call ABS_CURSOR__update_mod_vals
  14684. end select
  14685. end if
  14686. dec($1il5i)
  14687. end while
  14688. call _update_mod_knob_rt_indicator_for_gl_m_id
  14689. $gpzoi := 30
  14690. $dc3zm := $auli3
  14691. $1il5i := %3hbq2[$gpzoi]-1
  14692. while ($1il5i>=0)
  14693. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  14694. select (%q4rwz[20*$gpzoi+$1il5i])
  14695. case 2
  14696. call SHP1__update_mod_vals
  14697. case 3
  14698. call SHP2__update_mod_vals
  14699. case 4
  14700. call LFO1__update_mod_vals
  14701. case 5
  14702. call LFO2__update_mod_vals
  14703. case 6
  14704. call BUS1__update_mod_vals
  14705. case 7
  14706. call BUS2__update_mod_vals
  14707. case 8
  14708. call MTX__update_mod_vals
  14709. case 12
  14710. call NOTE_DURATION_POLY__update_mod_vals
  14711. case 10
  14712. call VELOCITY_POLY__update_mod_vals
  14713. case 13
  14714. call KEY_TRACK_POLY__update_mod_vals
  14715. case 18
  14716. call CONST_MOD__update_mod_vals
  14717. case 19
  14718. call REL_MOD__update_mod_vals
  14719. case 20
  14720. call ARP_MOD__update_mod_vals
  14721. case 9
  14722. call AFTERTOUCH__update_mod_vals
  14723. case 21
  14724. call MPE_SLIDE__update_mod_vals
  14725. case 22
  14726. call RANDOM__update_mod_vals
  14727. case 23
  14728. call ABS_CURSOR__update_mod_vals
  14729. end select
  14730. end if
  14731. dec($1il5i)
  14732. end while
  14733. call _update_mod_knob_rt_indicator_for_gl_m_id
  14734. end if
  14735. end if
  14736. end function
  14737. function ARP__update_sample_waveform
  14738. wait(1)
  14739. $a5fyp := get_event_par($auli3,$EVENT_PAR_ZONE_ID)
  14740. if ($a5fyp # $kzyw4 and ($a5fyp>0))
  14741. attach_zone($tmcuy,$a5fyp,0)
  14742. $kzyw4 := $a5fyp
  14743. call update_s_wf_start_indic_label_position
  14744. end if
  14745. end function
  14746. function _ARP__update_step_length
  14747. $dyt1q := (($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))
  14748. if (?2wk03[$dyt1q]>0.0)
  14749. ~qa2mp := int_to_real($DURATION_QUARTER)*?2wk03[$dyt1q]
  14750. else
  14751. ~qa2mp := int_to_real($SIGNATURE_NUM*$DURATION_QUARTER*4/$SIGNATURE_DENOM)*-?2wk03[$dyt1q]
  14752. end if
  14753. end function
  14754. function ARP__remove_all_notes_and_reset
  14755. $5sroo := 0
  14756. while ($5sroo<num_elements(%br0tn))
  14757. %br0tn[$5sroo] := %wwz2v[$0erls]
  14758. inc($5sroo)
  14759. end while
  14760. $gcbnc := 0
  14761. end function
  14762. function BRW__set_scroll_bar_for_selected_item
  14763. if (not in_range(%kt24s[$zor2m],$fykja,$fykja+19-1))
  14764. if (%kt24s[$zor2m]<$fykja)
  14765. $z2tnd := real_to_int((int_to_real(%kt24s[$zor2m])-0.0)*-1000.0/(int_to_real(%k4yha[$zor2m]-19)-0.0)+1000.0)
  14766. else
  14767. $z2tnd := real_to_int((int_to_real(%kt24s[$zor2m])-18.0)*-1000.0/(int_to_real(%k4yha[$zor2m]-1)-18.0)+1000.0)
  14768. end if
  14769. end if
  14770. end function
  14771. function BRW__ensure_selected_item_is_visible
  14772. if (not in_range(%kt24s[$zor2m],$fykja,$fykja+19-1) and in_range($0ib2k,5,7))
  14773. call BRW__set_scroll_bar_for_selected_item
  14774. call BRW__update_search_result_list_ui
  14775. end if
  14776. end function
  14777. function _BRW__select_preset_id_for_file_type_with_offset
  14778. if (%xeyhi[$zor2m]=0)
  14779. call BRW__apply_mask_to_search_pool_for_sel_file_type
  14780. end if
  14781. %kt24s[$zor2m] := (%kt24s[$zor2m]+%k4yha[$zor2m]+$w0x5j) mod %k4yha[$zor2m]
  14782. %jj5qi[$zor2m] := %3owef[500*$zor2m+%kt24s[$zor2m]]
  14783. $zor2m := $4ut4g
  14784. call BRW__update_search_result_selection
  14785. call BRW__ensure_selected_item_is_visible
  14786. end function
  14787. function convert_preset_data_to_current_version
  14788. if (45 # $b4lv0)
  14789. if ($b4lv0<38)
  14790. $swg5e := 0
  14791. end if
  14792. if ($b4lv0<40)
  14793. $3tnu3 := 0
  14794. while ($3tnu3<4)
  14795. $y3mgr := 0
  14796. while ($y3mgr<8)
  14797. if (%45vq1[8*$3tnu3+$y3mgr]=2)
  14798. %l2lis[8*$3tnu3+$y3mgr] := %glqqy[%l2lis[8*$3tnu3+$y3mgr]]
  14799. end if
  14800. inc($y3mgr)
  14801. end while
  14802. inc($3tnu3)
  14803. end while
  14804. $3tnu3 := 0
  14805. while ($3tnu3<4)
  14806. $y3mgr := 0
  14807. while ($y3mgr<8)
  14808. if (%45vq1[8*$3tnu3+$y3mgr]=1)
  14809. %l2lis[8*$3tnu3+$y3mgr] := %z5iau[%l2lis[8*$3tnu3+$y3mgr]]
  14810. end if
  14811. inc($y3mgr)
  14812. end while
  14813. inc($3tnu3)
  14814. end while
  14815. $ruhe4 := 0
  14816. $mcp2m := (%is_mono_src[$hdmk1]+1) mod 2
  14817. call update_ARP_and_S_WF_area
  14818. $dyo2q := (%is_mono_src[$hdmk1]+1) mod 2
  14819. pgs_set_key_val(PGS_FUNC,0,9)
  14820. $q0rb2 := get_control_par(get_ui_id($q0rb2),$CONTROL_PAR_DEFAULT_VALUE)
  14821. end if
  14822. if ($b4lv0<42)
  14823. $ttvix := 0
  14824. $hj1x4 := 0
  14825. end if
  14826. if ($b4lv0<43)
  14827. $xrt5z := $p5wl1
  14828. end if
  14829. $b4lv0 := 45
  14830. end if
  14831. end function
  14832. function TABS__reset_position_after_preset_load
  14833. $r3fzy := 0
  14834. while ($r3fzy<4)
  14835. $2rota := 0
  14836. while ($2rota<%gxveo[$r3fzy])
  14837. if (%gxveo[$r3fzy]>1)
  14838. set_control_par(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_POS_X,%pxakq[$r3fzy]+($2rota*66))
  14839. set_control_par(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_POS_Y,%wswe0[$r3fzy])
  14840. set_control_par(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_WIDTH,57)
  14841. set_control_par(%ejazl[4*$r3fzy+$2rota],$CONTROL_PAR_HEIGHT,57)
  14842. end if
  14843. inc($2rota)
  14844. end while
  14845. inc($r3fzy)
  14846. end while
  14847. end function
  14848. function update_g_interval_mode
  14849. $p5wl1 := $xrt5z mod 2
  14850. set_control_par_str(get_ui_id($p5wl1),$CONTROL_PAR_PICTURE,"GE_SYNC_btn_0" & (sh_right($xrt5z,1) .and. 1))
  14851. end function
  14852. function MOD__recall_ext_mod_storage
  14853. ?xy[0] := int_to_real($2thol)/10000.0
  14854. ?xy[1] := int_to_real($jy3sd)/10000.0
  14855. %ppvim[0] := real_to_int(?xy[0]*1000.0)
  14856. %ppvim[1] := real_to_int(?xy[1]*1000.0)
  14857. %ppvim[14] := $543zt
  14858. %ppvim[15] := $lynqa
  14859. %ppvim[16] := $cbkgv
  14860. %ppvim[17] := $cxfv2
  14861. set_control_par_str(get_ui_id($543zt),$CONTROL_PAR_LABEL,$543zt/$b2o1i & "." & ($543zt mod $b2o1i) & " " & @edixu)
  14862. set_control_par_str(get_ui_id($lynqa),$CONTROL_PAR_LABEL,$lynqa/$pfnw5 & "." & ($lynqa mod $pfnw5) & " " & @cxern)
  14863. set_control_par_str(get_ui_id($cbkgv),$CONTROL_PAR_LABEL,$cbkgv/$yg3sr & "." & ($cbkgv mod $yg3sr) & " " & @aqf3u)
  14864. set_control_par_str(get_ui_id($cxfv2),$CONTROL_PAR_LABEL,$cxfv2/$t3gfg & "." & ($cxfv2 mod $t3gfg) & " " & @3frwb)
  14865. set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_LABEL,real_to_int(?xy[0]*100.0) & " %",0)
  14866. set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_LABEL,real_to_int(?xy[1]*100.0) & " %",1)
  14867. end function
  14868. function STEPPER__set_preset_vals
  14869. $hl2ji := 0
  14870. while ($hl2ji<32)
  14871. %lfbyb[$hl2ji] := %stepper__preset_vals[$hl2ji]
  14872. %bswku[$hl2ji] := %stepper__preset_vals[$hl2ji+32]
  14873. inc($hl2ji)
  14874. end while
  14875. $qxgdn := %stepper__preset_vals[64]
  14876. $ilpk2 := %stepper__preset_vals[65]
  14877. call STEPPER__update_ui
  14878. end function
  14879. function update_mod_knob_ep_automation_label_for_gl_m_id
  14880. if (%vc4gu[$gpzoi]=100000)
  14881. @uamno := get_engine_par_disp(%q4mzh[$gpzoi],$51oxm+100,%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
  14882. else
  14883. if (%q4mzh[$gpzoi]<=0)
  14884. @uamno := " "
  14885. else
  14886. if (%fogcg[$gpzoi]=1)
  14887. $r0pwv := search(%zjgrf,%eujmz[$gpzoi])
  14888. if (-sh_right(-1-%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]],31)=1)
  14889. if (%sxlyt[8*$r0pwv+%hpc0e[$gpzoi]]=1)
  14890. $dyt1q := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)
  14891. $y1xwz := $dyt1q*(1+(sh_right(%sbnwu[$gpzoi]-$dyt1q,31) .or. sh_right($dyt1q-%dwdw3[$gpzoi],31)))-(%dwdw3[$gpzoi]*sh_right($dyt1q-%dwdw3[$gpzoi],31))-(%sbnwu[$gpzoi]*sh_right(%sbnwu[$gpzoi]-$dyt1q,31))
  14892. $dyt1q := abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$r0pwv]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$r0pwv],%hpc0e[$gpzoi],%zjgrf[$r0pwv])]]-$y1xwz)*15/1000000
  14893. @uamno := !um04d[$dyt1q]
  14894. else
  14895. @uamno := get_engine_par_disp(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
  14896. end if
  14897. else
  14898. @uamno := get_engine_par_disp(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
  14899. end if
  14900. else
  14901. if (%5zak5[$gpzoi]=0)
  14902. if (%vc4gu[$gpzoi]=100001)
  14903. @uamno := get_engine_par_disp(%q4mzh[$gpzoi],$hdmk1,%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
  14904. if (%jeswc[$gpzoi]=231)
  14905. if ($zqnbc<0)
  14906. @uamno := "-" & @uamno
  14907. end if
  14908. end if
  14909. else
  14910. @uamno := get_engine_par_disp(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
  14911. end if
  14912. else
  14913. if (%q4mzh[$gpzoi]=$ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN)
  14914. $dyt1q := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$gpzoi],get_control_par(%n34di[$gpzoi],$CONTROL_PAR_VALUE))]/1000)
  14915. $y1xwz := $dyt1q*(1+(sh_right(%sbnwu[$gpzoi]-$dyt1q,31) .or. sh_right($dyt1q-%dwdw3[$gpzoi],31)))-(%dwdw3[$gpzoi]*sh_right($dyt1q-%dwdw3[$gpzoi],31))-(%sbnwu[$gpzoi]*sh_right(%sbnwu[$gpzoi]-$dyt1q,31))
  14916. @uamno := 100-($y1xwz/10000) & "/" & ($y1xwz/10000) & " %"
  14917. else
  14918. @uamno := get_engine_par_disp(%q4mzh[$gpzoi],%vc4gu[$gpzoi],%hpc0e[$gpzoi],%eujmz[$gpzoi]) & " " & !gh3f0[$gpzoi]
  14919. end if
  14920. end if
  14921. end if
  14922. end if
  14923. end if
  14924. set_control_par_str(%41o3s[$gpzoi],$CONTROL_PAR_LABEL,@uamno)
  14925. end function
  14926. function LAY_FX__sync_ui_to_engine
  14927. $xwusl := 0
  14928. while ($xwusl<39)
  14929. $lzf3q := %fs3hy[$xwusl]
  14930. $dyt1q := search(%zjgrf,%eujmz[$lzf3q])
  14931. if ((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31))*%xdshj[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31)*%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))])>($xwusl mod 3))
  14932. %q4mzh[$lzf3q] := (1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])]]+($xwusl mod 3)]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-56))]+($xwusl mod 3-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-57-1))]-1-($xwusl mod 3),31)*($xwusl mod 3-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))))-57-1))]-1))))])
  14933. else
  14934. %q4mzh[$lzf3q] := -1
  14935. end if
  14936. if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]) # $EFFECT_TYPE_NONE)
  14937. !gh3f0[$lzf3q] := !1s04y[(1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31))*%wmjdo[%0hhbc[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])]]+((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31))*($xwusl mod 3))]] & !njfof[-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31)*%5gftk[3*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])))))+($xwusl mod 3)]]
  14938. !isqic[$lzf3q] := !yyfkk[(1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31))*(%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])]]+($xwusl mod 3))] & !rnens[-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])-$EFFECT_TYPE_FILTER)-1,31)*%5gftk[3*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])))))+($xwusl mod 3)]]
  14939. else
  14940. !gh3f0[$lzf3q] := ""
  14941. !isqic[$lzf3q] := ""
  14942. end if
  14943. set_control_par_str(%vvlef[$lzf3q],$CONTROL_PAR_TEXT,"")
  14944. set_control_par_str(%vvlef[$lzf3q],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_" & -sh_right(440-get_control_par(%vvlef[$lzf3q],$CONTROL_PAR_POS_Y),31))
  14945. set_control_par(%vvlef[$lzf3q],$CONTROL_PAR_PICTURE_STATE,(1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$lzf3q])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])])-$EFFECT_TYPE_FILTER)-1,31))*(%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$lzf3q])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])])]]+($xwusl mod 3))+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%eujmz[$lzf3q])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])])-$EFFECT_TYPE_FILTER)-1,31)*(%5gftk[3*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%eujmz[$lzf3q])],%hpc0e[$lzf3q],%zjgrf[search(%zjgrf,%eujmz[$lzf3q])])))))+($xwusl mod 3)]+106)))
  14946. if (%q4mzh[$lzf3q] # -1)
  14947. set_control_par_str(%41o3s[$lzf3q],$CONTROL_PAR_AUTOMATION_NAME,!isqic[$lzf3q])
  14948. set_control_par_str(%c1qym[$lzf3q],$CONTROL_PAR_AUTOMATION_NAME,!isqic[$lzf3q] & " Mod")
  14949. else
  14950. set_control_par_str(%41o3s[$lzf3q],$CONTROL_PAR_AUTOMATION_NAME,"")
  14951. set_control_par_str(%c1qym[$lzf3q],$CONTROL_PAR_AUTOMATION_NAME,"")
  14952. end if
  14953. set_control_par(%41o3s[$lzf3q],$CONTROL_PAR_DEFAULT_VALUE,%_FXC__fx_par_defs[3*%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$dyt1q]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$dyt1q],%hpc0e[$lzf3q],%zjgrf[$dyt1q])]+($xwusl mod 3)])
  14954. if (%z3r0h[8*$dyt1q+%hpc0e[$lzf3q]]=1)
  14955. set_control_par(%41o3s[$lzf3q],$CONTROL_PAR_VALUE,get_control_par(%41o3s[$lzf3q],$CONTROL_PAR_DEFAULT_VALUE))
  14956. if ($xwusl mod 3=2)
  14957. %z3r0h[8*$dyt1q+%hpc0e[$lzf3q]] := 0
  14958. end if
  14959. end if
  14960. $gpzoi := $lzf3q
  14961. call set_mod_knob_group_engine_par_for_gl_m_id
  14962. call update_mod_knob_ep_automation_label_for_gl_m_id
  14963. call _update_mod_knob_range_indicator_for_gl_m_id
  14964. call _update_mod_knob_rt_indicator_no_mod_for_gl_m_id
  14965. inc($xwusl)
  14966. end while
  14967. $xwusl := 0
  14968. while ($xwusl<4)
  14969. $g5k3r := 0
  14970. while ($g5k3r<8)
  14971. if (%2q55x[$xwusl*8+$g5k3r]=1)
  14972. %pqcgh[8*$xwusl+$g5k3r] := %pqcgh[8*$xwusl+$g5k3r]
  14973. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8*$xwusl+$g5k3r]+1) mod 2,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])
  14974. if (-sh_right(-1-%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]],31)=1)
  14975. if ($xwusl<=1)
  14976. $0x4nk := search(%41o3s,%ce3ql[12*$xwusl+(3*$g5k3r)])
  14977. $dyt1q := get_control_par(%41o3s[$0x4nk],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$0x4nk],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$0x4nk],get_control_par(%n34di[$0x4nk],$CONTROL_PAR_VALUE))]/1000)
  14978. else
  14979. $dyt1q := $tcdg3+($fflhr*%ppvim[$rpdbb]/1000)
  14980. end if
  14981. %sxlyt[8*$xwusl+$g5k3r] := %sxlyt[8*$xwusl+$g5k3r]
  14982. $dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
  14983. if (%sxlyt[8*$xwusl+$g5k3r]=1)
  14984. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]]-$dyt1q)*15/1000000],%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])
  14985. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])
  14986. else
  14987. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]],$NI_SYNC_UNIT_ABS,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])
  14988. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$xwusl]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl]))))-57-1))]-1))))]),$dyt1q,%3wawk[$xwusl],$g5k3r,%zjgrf[$xwusl])
  14989. end if
  14990. end if
  14991. end if
  14992. inc($g5k3r)
  14993. end while
  14994. inc($xwusl)
  14995. end while
  14996. $g5k3r := 0
  14997. while ($g5k3r<5)
  14998. $xwusl := 0
  14999. while ($xwusl<4)
  15000. if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$g5k3r]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$g5k3r]],$xwusl,%zjgrf[%mpjcc[$g5k3r]])=$EFFECT_TYPE_FILTER)
  15001. set_control_par_str(%pfy4f[20*$g5k3r+10+$xwusl],$CONTROL_PAR_AUTOMATION_NAME,!gdlxl[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$g5k3r]],$xwusl,%zjgrf[%mpjcc[$g5k3r]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$g5k3r]],$xwusl,%zjgrf[%mpjcc[$g5k3r]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$g5k3r]],$xwusl,%zjgrf[%mpjcc[$g5k3r]]))))])
  15002. else
  15003. set_control_par_str(%pfy4f[20*$g5k3r+10+$xwusl],$CONTROL_PAR_AUTOMATION_NAME,!zufcx[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$g5k3r]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$g5k3r]],$xwusl,%zjgrf[%mpjcc[$g5k3r]])]])
  15004. end if
  15005. inc($xwusl)
  15006. end while
  15007. inc($g5k3r)
  15008. end while
  15009. end function
  15010. function FX__restore_settings
  15011. $ejy35 := 0
  15012. $n0kpw := 0
  15013. while ($n0kpw<4)
  15014. $e1wl4 := 0
  15015. $da5tg := 0
  15016. while ($da5tg<8)
  15017. if ($verq0>1)
  15018. $cz3ou := 1
  15019. exit
  15020. end if
  15021. if (%2q55x[$n0kpw*8+$da5tg]=1)
  15022. if (%45vq1[8*$n0kpw+$da5tg]=6)
  15023. $ejy35 := 0
  15024. $y1ewg := 0
  15025. while ($y1ewg<4)
  15026. $fh05a := 0
  15027. while ($fh05a<8)
  15028. if (%45vq1[8*$y1ewg+$fh05a]=6 and (%2q55x[$y1ewg*8+$fh05a]=1))
  15029. if ($ejy35=0)
  15030. $v2ky0 := $fh05a
  15031. $qscu5 := %zjgrf[$y1ewg]
  15032. $3qz3a := $y1ewg
  15033. if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a]) # $EFFECT_TYPE_GAINER)
  15034. $m2etg := 1
  15035. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_GAINER,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
  15036. while ($m2etg=1)
  15037. wait(3000)
  15038. end while
  15039. end if
  15040. set_engine_par($ENGINE_PAR_SEND_EFFECT_DRY_LEVEL,0,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
  15041. $ejy35 := 1
  15042. else
  15043. $3pvid := 1
  15044. call update_modal_dialog_lbl
  15045. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Gater can only be used once")
  15046. add_text_line($xhutf,"and is already inserted in")
  15047. add_text_line($xhutf,!1ckyy[$3qz3a] & " slot " & ($v2ky0+1) & ".")
  15048. %45vq1[8*$y1ewg+$fh05a] := 8
  15049. $m2etg := 1
  15050. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$y1ewg]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_NONE,%3wawk[$y1ewg],$n0kpw,%zjgrf[$y1ewg])
  15051. while ($m2etg=1)
  15052. wait(3000)
  15053. end while
  15054. end if
  15055. end if
  15056. inc($fh05a)
  15057. end while
  15058. inc($y1ewg)
  15059. end while
  15060. else
  15061. if ($k240z=1)
  15062. $4qnnk := %44fry[%rx3ip[256*$n0kpw+(32*$da5tg)]]
  15063. $3tnu3 := 0
  15064. while ($3tnu3<%2nyh4[$4qnnk])
  15065. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_TYPE or (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_SEND_EFFECT_TYPE))
  15066. $dyt1q := get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
  15067. if ($dyt1q # %rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3])
  15068. %ihqwp[$e1wl4] := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3],%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
  15069. inc($e1wl4)
  15070. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8*$n0kpw+$da5tg]+1) mod 2,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
  15071. end if
  15072. else
  15073. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_SUBTYPE)
  15074. if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]) # %rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3])
  15075. %ihqwp[$e1wl4] := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3],%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
  15076. inc($e1wl4)
  15077. end if
  15078. else
  15079. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=080000000h)
  15080. if ($dyt1q # $EFFECT_TYPE_IRC or ($afnek=-1))
  15081. %3zszw[8*$n0kpw+$da5tg] := %rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3]
  15082. $m2etg := 1
  15083. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1))))]),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
  15084. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1))))]),0,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
  15085. $bu04v := load_ir_sample(!5sry1[%3zszw[8*$n0kpw+$da5tg]] & ".wav",$da5tg,%zjgrf[$n0kpw])
  15086. while ($m2etg=1)
  15087. wait(3000)
  15088. end while
  15089. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$n0kpw]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw]))))-57-1))]-1))))]),$x202u,%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
  15090. end if
  15091. end if
  15092. end if
  15093. end if
  15094. inc($3tnu3)
  15095. end while
  15096. end if
  15097. end if
  15098. end if
  15099. inc($da5tg)
  15100. end while
  15101. $lwvso := 0
  15102. while ($lwvso<$e1wl4)
  15103. wait_async(%ihqwp[$lwvso])
  15104. inc($lwvso)
  15105. end while
  15106. inc($n0kpw)
  15107. end while
  15108. if ($k240z=1)
  15109. $n0kpw := 0
  15110. while ($n0kpw<4)
  15111. $da5tg := 0
  15112. while ($da5tg<8)
  15113. if (%2q55x[$n0kpw*8+$da5tg]=1)
  15114. if (%45vq1[8*$n0kpw+$da5tg] # 6)
  15115. $4qnnk := %44fry[%rx3ip[256*$n0kpw+(32*$da5tg)]]
  15116. $3tnu3 := 0
  15117. while ($3tnu3<%2nyh4[$4qnnk])
  15118. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3] # $ENGINE_PAR_EFFECT_TYPE and (%3n0yu[%w5uro[$4qnnk]+$3tnu3] # $ENGINE_PAR_SEND_EFFECT_TYPE) and (%3n0yu[%w5uro[$4qnnk]+$3tnu3] # $ENGINE_PAR_EFFECT_SUBTYPE) and (%3n0yu[%w5uro[$4qnnk]+$3tnu3] # 080000000h))
  15119. set_engine_par(%3n0yu[%w5uro[$4qnnk]+$3tnu3],%rx3ip[256*$n0kpw+(32*$da5tg)+$3tnu3],%3wawk[$n0kpw],$da5tg,%zjgrf[$n0kpw])
  15120. end if
  15121. inc($3tnu3)
  15122. end while
  15123. end if
  15124. end if
  15125. inc($da5tg)
  15126. end while
  15127. inc($n0kpw)
  15128. end while
  15129. end if
  15130. call LAY_FX__sync_ui_to_engine
  15131. $k240z := 2
  15132. end function
  15133. function update_mod_range_automation_label_for_gl_m_id
  15134. if (?rylw5[$gpzoi]=1.0)
  15135. if ($gpzoi=12 and ($p5wl1=1))
  15136. call update_g_dis_sync_idx
  15137. @uamno := !qeoj3[$gv5ha]
  15138. else
  15139. if ($gpzoi=9)
  15140. @uamno := !qniir[((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)-0)*-12/1000000+12)*(1+(sh_right(12-((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)-0)*-12/1000000+12),31) .or. sh_right((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)-0)*-12/1000000+12),31))]
  15141. else
  15142. if (get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)>=0)
  15143. @uamno := get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)/%oazdd[$gpzoi]
  15144. else
  15145. @uamno := "-" & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))/%oazdd[$gpzoi])
  15146. end if
  15147. if (%oazdd[$gpzoi]>=10)
  15148. @uamno := @uamno & "." & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)) mod %oazdd[$gpzoi]/(%oazdd[$gpzoi]/10))
  15149. if (%oazdd[$gpzoi]>=100)
  15150. @uamno := @uamno & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)) mod (%oazdd[$gpzoi]/10)/(%oazdd[$gpzoi]/100))
  15151. end if
  15152. end if
  15153. @uamno := @uamno & " " & !gh3f0[$gpzoi]
  15154. end if
  15155. end if
  15156. else
  15157. if (%jeswc[$gpzoi]=310 and ($l4ujc=1) or (%jeswc[$gpzoi]=320 and ($x02cl=1)))
  15158. $dyt1q := ((get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))*17-1)/1500
  15159. $dyt1q := $dyt1q*(1+(sh_right(num_elements(!je2na)-1-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-((num_elements(!je2na)-1)*sh_right(num_elements(!je2na)-1-$dyt1q,31))
  15160. @uamno := !je2na[$dyt1q]
  15161. else
  15162. $dyt1q := real_to_int(pow((int_to_real(get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)+get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))-int_to_real(%dwdw3[$gpzoi]))/(int_to_real(%sbnwu[$gpzoi])-int_to_real(%dwdw3[$gpzoi])),?rylw5[$gpzoi])*int_to_real(%qxmpr[$gpzoi])+int_to_real(%dwdw3[$gpzoi]))
  15163. $dyt1q := $dyt1q*(1+(sh_right(%sbnwu[$gpzoi]-$dyt1q,31) .or. sh_right($dyt1q-%dwdw3[$gpzoi],31)))-(%dwdw3[$gpzoi]*sh_right($dyt1q-%dwdw3[$gpzoi],31))-(%sbnwu[$gpzoi]*sh_right(%sbnwu[$gpzoi]-$dyt1q,31))
  15164. @uamno := $dyt1q/%oazdd[$gpzoi] & "." & ($dyt1q mod %oazdd[$gpzoi]/(%oazdd[$gpzoi]/10)) & ($dyt1q mod (%oazdd[$gpzoi]/10)/(%oazdd[$gpzoi]/100)) & " " & !gh3f0[$gpzoi]
  15165. end if
  15166. end if
  15167. set_control_par_str(%c1qym[$gpzoi],$CONTROL_PAR_LABEL,@uamno)
  15168. end function
  15169. function update_mod_range_ep_automation_label_for_gl_m_id
  15170. if (get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)<0)
  15171. @uamno := "-"
  15172. else
  15173. @uamno := ""
  15174. end if
  15175. if (get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_KEY_SHIFT)=1)
  15176. @uamno := @uamno & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))/10000) & "." & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))/100 mod 100) & "%"
  15177. else
  15178. @uamno := @uamno & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))/10000) & "." & (abs(get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE))/1000 mod 10) & "%"
  15179. end if
  15180. set_control_par_str(%c1qym[$gpzoi],$CONTROL_PAR_LABEL,@uamno)
  15181. end function
  15182. function update_norm_knob_ep_automation_label_for_gl_nk_ep_id
  15183. if (%qpgwq[$4djds]=100000)
  15184. @uamno := get_engine_par_disp(%i5z0e[$4djds],$51oxm+100,%bjbtn[$4djds],%c40o1[$4djds]) & " " & !5hawr[$4djds]
  15185. else
  15186. if (%qpgwq[$4djds]=100001)
  15187. @uamno := get_engine_par_disp(%i5z0e[$4djds],$hdmk1,%bjbtn[$4djds],%c40o1[$4djds]) & " " & !5hawr[$4djds]
  15188. else
  15189. @uamno := get_engine_par_disp(%i5z0e[$4djds],%qpgwq[$4djds],%bjbtn[$4djds],%c40o1[$4djds]) & " " & !5hawr[$4djds]
  15190. end if
  15191. end if
  15192. set_control_par_str(%aazjf[$4djds],$CONTROL_PAR_LABEL,@uamno)
  15193. end function
  15194. function update_norm_knob_automation_label_for_gl_nk_ep_id
  15195. set_control_par_str(%aazjf[$4djds],$CONTROL_PAR_LABEL,get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE)/%cy2pa[$4djds] & "." & abs(get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE) mod %cy2pa[$4djds]/(%cy2pa[$4djds]/10)) & " " & !5hawr[$4djds])
  15196. end function
  15197. function ARP__update_all_automation_labels
  15198. $h2jke := $0erls
  15199. set_control_par_str(get_ui_id($h2jke),$CONTROL_PAR_LABEL,get_menu_item_str(get_ui_id($0erls),$0erls))
  15200. set_control_par_str(get_ui_id($k5z4u),$CONTROL_PAR_LABEL,$k5z4u)
  15201. set_control_par_str(get_ui_id($q0o5r),$CONTROL_PAR_LABEL,$q0o5r)
  15202. end function
  15203. function update_all_mod_knob_automation_labels
  15204. $jdgl1 := 0
  15205. while ($jdgl1<num_elements(%3xxkk))
  15206. $gpzoi := %3xxkk[$jdgl1]
  15207. call _update_mod_knob_automation_label_for_gl_m_id
  15208. call update_mod_range_automation_label_for_gl_m_id
  15209. inc($jdgl1)
  15210. end while
  15211. $jdgl1 := 0
  15212. while ($jdgl1<num_elements(%pv2ax))
  15213. $gpzoi := %pv2ax[$jdgl1]
  15214. call update_mod_knob_ep_automation_label_for_gl_m_id
  15215. call update_mod_range_ep_automation_label_for_gl_m_id
  15216. inc($jdgl1)
  15217. end while
  15218. $4djds := 0
  15219. while ($4djds<26)
  15220. call update_norm_knob_ep_automation_label_for_gl_nk_ep_id
  15221. inc($4djds)
  15222. end while
  15223. $4djds := 1
  15224. call update_norm_knob_automation_label_for_gl_nk_ep_id
  15225. $4djds := 2
  15226. call update_norm_knob_automation_label_for_gl_nk_ep_id
  15227. $4djds := 3
  15228. call update_norm_knob_automation_label_for_gl_nk_ep_id
  15229. $4djds := 4
  15230. call update_norm_knob_automation_label_for_gl_nk_ep_id
  15231. $4djds := 0
  15232. call update_norm_knob_automation_label_for_gl_nk_ep_id
  15233. call ARP__update_all_automation_labels
  15234. end function
  15235. function SHP1__update_pos_ind_width
  15236. ~zxkmy := 256.0/int_to_real($gllpo)
  15237. end function
  15238. function SHP1__update_mod_vals_and_refresh_ui
  15239. $oj0wr := 1
  15240. call SHP1__update_mod_vals
  15241. call MOD__perform_full_update
  15242. $oj0wr := 0
  15243. end function
  15244. function SHP1__update_tb_display
  15245. call SHP1__update_pos_ind_width
  15246. set_table_steps_shown(%w0xec,$gllpo)
  15247. call SHP1__update_mod_vals_and_refresh_ui
  15248. end function
  15249. function SHP2__update_pos_ind_width
  15250. ~c2vo0 := 256.0/int_to_real($hn35i)
  15251. end function
  15252. function SHP2__update_mod_vals_and_refresh_ui
  15253. $oj0wr := 1
  15254. call SHP2__update_mod_vals
  15255. call MOD__perform_full_update
  15256. $oj0wr := 0
  15257. end function
  15258. function SHP2__update_tb_display
  15259. call SHP2__update_pos_ind_width
  15260. set_table_steps_shown(%rzzs4,$hn35i)
  15261. call SHP2__update_mod_vals_and_refresh_ui
  15262. end function
  15263. function SHAPER__update_displays
  15264. call SHP1__update_tb_display
  15265. call SHP2__update_tb_display
  15266. end function
  15267. function MACRO__update_labels_and_automation_names
  15268. set_control_par_str(get_ui_id($siaxq),$CONTROL_PAR_PICTURE,"GE_MACRO_DROP_DN_SHORT_" & -sh_right(abs($0ib2k-0)-1,31) & $siaxq)
  15269. set_control_par_str(get_ui_id($yazuk),$CONTROL_PAR_PICTURE,"GE_MACRO_DROP_DN_SHORT_" & -sh_right(abs($0ib2k-0)-1,31) & $yazuk)
  15270. set_control_par(get_ui_id($ajvki),$CONTROL_PAR_PICTURE_STATE,$siaxq)
  15271. set_control_par(get_ui_id($a4om3),$CONTROL_PAR_PICTURE_STATE,$yazuk)
  15272. set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$siaxq],0)
  15273. set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$yazuk],1)
  15274. set_control_par_str(get_ui_id($543zt),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$uyjwl])
  15275. set_control_par_str(get_ui_id($lynqa),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$4so5t])
  15276. set_control_par_str(get_ui_id($cbkgv),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$q1nql])
  15277. set_control_par_str(get_ui_id($cxfv2),$CONTROL_PAR_AUTOMATION_NAME,!xy__axis_lbls_long[$5q4fp])
  15278. end function
  15279. function update_perform_animation
  15280. set_control_par(get_ui_id($5rsow),$CONTROL_PAR_PICTURE_STATE,real_to_int((2.0-?xy[0]-?xy[1])/2.0*49.0))
  15281. end function
  15282. function update_ui_after_preset_reload
  15283. call MOD__position_all_mod_menus
  15284. if ($siaxq=0)
  15285. set_control_par(get_ui_id($siaxq),$CONTROL_PAR_VALUE,2)
  15286. end if
  15287. if ($yazuk=0)
  15288. set_control_par(get_ui_id($yazuk),$CONTROL_PAR_VALUE,2)
  15289. end if
  15290. $fg4rw := 0
  15291. while ($fg4rw<=3)
  15292. if (get_control_par(%xwg5s[10*(46+$fg4rw)+1],$CONTROL_PAR_VALUE)=0)
  15293. set_control_par(%xwg5s[10*(46+$fg4rw)+1],$CONTROL_PAR_VALUE,2)
  15294. end if
  15295. inc($fg4rw)
  15296. end while
  15297. call TABS__reset_position_after_preset_load
  15298. call update_preset_name_displays
  15299. call update_g_interval_mode
  15300. set_control_par_str(get_ui_id($va2lk),$CONTROL_PAR_PICTURE,"GE_g_crs_rel_dir_" & $va2lk)
  15301. call MOD__recall_ext_mod_storage
  15302. call evaluate_mod_connections
  15303. if ($mdykc=2 and in_range($0ib2k,1,4))
  15304. call MTX__update_ui
  15305. end if
  15306. ~tptmd := int_to_real($gnlj2)/1000000.0
  15307. call update_g_pos_hit_anker_ui
  15308. call FX__restore_settings
  15309. call ARP__on_mode_changed
  15310. if ($cz3ou=1)
  15311. exit
  15312. end if
  15313. if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$hdmk1,0,-1) # $2qtv2)
  15314. $m2etg := 1
  15315. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$2qtv2,$hdmk1,0,-1)
  15316. while ($m2etg=1)
  15317. wait(3000)
  15318. end while
  15319. end if
  15320. call FX__set_SMPL_filter_parameters
  15321. if ($verq0>1)
  15322. $cz3ou := 1
  15323. exit
  15324. end if
  15325. if ($4hpei=1)
  15326. $4hpei := 0
  15327. else
  15328. call NAV_PAGE__update_main_nav
  15329. end if
  15330. set_control_par(get_ui_id($dxpqd),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  15331. call set_all_engine_par_norm_knobs
  15332. call update_all_mod_knob_range_indicator
  15333. call update_all_mod_knob_automation_labels
  15334. call SHAPER__update_displays
  15335. call STEPPER__update_ui
  15336. call LFO__update_ui
  15337. call ARP__update_filter_src_menus
  15338. call update_g_rng_max_label
  15339. call update_light_guide
  15340. call MACRO__update_labels_and_automation_names
  15341. call update_perform_animation
  15342. set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,$NI_BUS_OFFSET)
  15343. set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,$NI_BUS_OFFSET+1)
  15344. set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,2)
  15345. wait(100)
  15346. end function
  15347. function ARP__restore_from_preset_buffer
  15348. $q0o5r := %arp__preset_vals[0]
  15349. $0erls := %arp__preset_vals[1]
  15350. $2v40q := %arp__preset_vals[2]
  15351. $k5z4u := %arp__preset_vals[3]
  15352. $3rksw := %arp__preset_vals[4]
  15353. $ius2b := %arp__preset_vals[5]
  15354. $5sroo := 0
  15355. while ($5sroo<32)
  15356. %pyeoz[$5sroo] := %arp__preset_vals[40+$5sroo]
  15357. %0lu1d[$5sroo] := %arp__preset_vals[72+$5sroo]
  15358. inc($5sroo)
  15359. end while
  15360. end function
  15361. function ARP__update_mod_knob_ui
  15362. $gpzoi := 9
  15363. call _update_mod_knob_range_indicator_for_gl_m_id
  15364. call _update_mod_knob_rt_indicator_for_gl_m_id
  15365. $gpzoi := 10
  15366. call _update_mod_knob_range_indicator_for_gl_m_id
  15367. call _update_mod_knob_rt_indicator_for_gl_m_id
  15368. $gpzoi := 11
  15369. call _update_mod_knob_range_indicator_for_gl_m_id
  15370. call _update_mod_knob_rt_indicator_for_gl_m_id
  15371. end function
  15372. function update_std_start_offs_from_s_wf_xy
  15373. $r0pwv := real_to_int((?3lzme[0]-0.0)*10000.0/1.0)
  15374. $r0pwv := $r0pwv-($5l3um*%ppvim[$f4o1c]/1000)
  15375. $dgu14 := $r0pwv*(1+(sh_right(10000-$r0pwv,31) .or. sh_right($r0pwv-0,31)))-0-(10000*sh_right(10000-$r0pwv,31))
  15376. $gpzoi := 30
  15377. call on_mod_knob_for_gl_m_id
  15378. end function
  15379. function update_rootkey_array_for_g_user_sample
  15380. $a4np1 := 0
  15381. while ($a4np1<=127)
  15382. %_rootkey_offset_for_note[33664+$a4np1] := $a4np1-$aewcf
  15383. inc($a4np1)
  15384. end while
  15385. end function
  15386. function on_g_user_sample_root_key_changed
  15387. wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_ROOT_KEY,$aewcf))
  15388. call update_rootkey_array_for_g_user_sample
  15389. call update_light_guide
  15390. end function
  15391. function on_s_user_sample_root_key_changed
  15392. wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_ROOT_KEY,$v3y5j))
  15393. end function
  15394. function TABS__selection_did_change
  15395. $r3fzy := 0
  15396. while ($r3fzy<%gxveo[$ptarc])
  15397. set_control_par(%ejazl[4*$ptarc+$r3fzy],$CONTROL_PAR_VALUE,-sh_right(abs($r3fzy-%v5xab[$ptarc])-1,31))
  15398. inc($r3fzy)
  15399. end while
  15400. %h152r[$ptarc] := %v5xab[$ptarc]
  15401. $qlteh := %geafe[$ptarc]
  15402. call _FX_UI__update_ui_controls_for_global_set_id
  15403. call update_all_mod_knob_range_indicator
  15404. call update_all_mod_knob_rt_indicator_mono
  15405. end function
  15406. function STEPPER__prepare_preset_buffer
  15407. $fg4rw := 0
  15408. while ($fg4rw<32)
  15409. %stepper__preset_vals[$fg4rw] := %lfbyb[$fg4rw]
  15410. %stepper__preset_vals[$fg4rw+32] := %bswku[$fg4rw]
  15411. inc($fg4rw)
  15412. end while
  15413. %stepper__preset_vals[64] := $qxgdn
  15414. %stepper__preset_vals[65] := $ilpk2
  15415. end function
  15416. function FXC__prepare_storage_array
  15417. $3tnu3 := 0
  15418. while ($3tnu3<num_elements(%3zszw))
  15419. %vhqqa[$3tnu3] := %3zszw[$3tnu3]
  15420. %vhqqa[48+$3tnu3] := %45vq1[$3tnu3]
  15421. %vhqqa[96+$3tnu3] := %l2lis[$3tnu3]
  15422. %vhqqa[144+$3tnu3] := %pqcgh[$3tnu3]
  15423. %vhqqa[192+$3tnu3] := %sxlyt[$3tnu3]
  15424. inc($3tnu3)
  15425. end while
  15426. end function
  15427. function FX__reorder_after_tab_swap
  15428. inc($owq4s)
  15429. while ($gmcfe=1)
  15430. wait(100000)
  15431. end while
  15432. $gmcfe := 1
  15433. $irlfd := $ptarc
  15434. $hu1za := 0
  15435. while ($hu1za<num_elements(%ejazl))
  15436. %d0oml[$hu1za] := %ejazl[$hu1za]
  15437. inc($hu1za)
  15438. end while
  15439. $hu1za := 0
  15440. while ($hu1za<%gxveo[$irlfd])
  15441. $4qnnk := %44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])]
  15442. if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])=$EFFECT_TYPE_GAINER)
  15443. call STEPPER__prepare_preset_buffer
  15444. end if
  15445. $3tnu3 := 0
  15446. while ($3tnu3<%2nyh4[$4qnnk])
  15447. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=080000000h)
  15448. %rx3ip[256*%rdbw1[$irlfd]+(32*$hu1za)+$3tnu3] := %3zszw[8*%rdbw1[$irlfd]+$hu1za]
  15449. else
  15450. %rx3ip[256*%rdbw1[$irlfd]+(32*$hu1za)+$3tnu3] := get_engine_par(%3n0yu[%w5uro[$4qnnk]+$3tnu3],%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
  15451. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_SCOMP_ATTACK or (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_SCOMP_RELEASE))
  15452. %rx3ip[256*%rdbw1[$irlfd]+(32*$hu1za)+$3tnu3] := %rx3ip[256*%rdbw1[$irlfd]+(32*$hu1za)+$3tnu3]+1
  15453. end if
  15454. end if
  15455. inc($3tnu3)
  15456. end while
  15457. $412pd := 0
  15458. while ($412pd<3)
  15459. $dyt1q := search(%41o3s,%ce3ql[12*$irlfd+(3*$hu1za)+$412pd])
  15460. %d03k4[12*$irlfd+(3*$hu1za)+$412pd] := get_control_par(%ce3ql[12*$irlfd+(3*$hu1za)+$412pd],$CONTROL_PAR_VALUE)
  15461. %2e42a[12*$irlfd+(3*$hu1za)+$412pd] := get_control_par(%c1qym[$dyt1q],$CONTROL_PAR_VALUE)
  15462. %kdfz1[12*$irlfd+(3*$hu1za)+$412pd] := get_control_par(%n34di[$dyt1q],$CONTROL_PAR_VALUE)
  15463. inc($412pd)
  15464. end while
  15465. inc($hu1za)
  15466. end while
  15467. call FXC__prepare_storage_array
  15468. $hu1za := 0
  15469. while ($hu1za<%gxveo[$irlfd])
  15470. if (%d0oml[4*$irlfd+$hu1za] # %n5ge0[8*%rdbw1[$irlfd]+$hu1za])
  15471. $pi54y := search(%n5ge0,%d0oml[4*$irlfd+$hu1za]) mod %gxveo[$irlfd]
  15472. $4qnnk := %44fry[%rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)]]
  15473. $3tnu3 := 0
  15474. while ($3tnu3<%2nyh4[$4qnnk])
  15475. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_TYPE or (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_SEND_EFFECT_TYPE))
  15476. $dyt1q := get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
  15477. if ($dyt1q # %rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3])
  15478. $m2etg := 1
  15479. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3],%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
  15480. while ($m2etg=1)
  15481. wait(3000)
  15482. end while
  15483. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8*%rdbw1[$irlfd]+$pi54y]+1) mod 2,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
  15484. end if
  15485. else
  15486. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_SUBTYPE)
  15487. if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]) # %rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3])
  15488. $m2etg := 1
  15489. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3],%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
  15490. while ($m2etg=1)
  15491. wait(3000)
  15492. end while
  15493. end if
  15494. else
  15495. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=080000000h)
  15496. if ($dyt1q # $EFFECT_TYPE_IRC or ($afnek=-1))
  15497. %3zszw[8*%rdbw1[$irlfd]+$hu1za] := %rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3]
  15498. $m2etg := 1
  15499. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1))))]),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
  15500. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1))))]),0,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
  15501. $bu04v := load_ir_sample(!5sry1[%3zszw[8*%rdbw1[$irlfd]+$hu1za]] & ".wav",$hu1za,%zjgrf[%rdbw1[$irlfd]])
  15502. while ($m2etg=1)
  15503. wait(3000)
  15504. end while
  15505. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%rdbw1[$irlfd]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]]))))-57-1))]-1))))]),$x202u,%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
  15506. end if
  15507. else
  15508. set_engine_par(%3n0yu[%w5uro[$4qnnk]+$3tnu3],%rx3ip[256*%rdbw1[$irlfd]+(32*$pi54y)+$3tnu3],%3wawk[%rdbw1[$irlfd]],$hu1za,%zjgrf[%rdbw1[$irlfd]])
  15509. end if
  15510. end if
  15511. end if
  15512. inc($3tnu3)
  15513. end while
  15514. $412pd := 0
  15515. while ($412pd<3)
  15516. $dyt1q := search(%41o3s,%ce3ql[12*$irlfd+(3*$hu1za)+$412pd])
  15517. set_control_par(%ce3ql[12*$irlfd+(3*$hu1za)+$412pd],$CONTROL_PAR_VALUE,%d03k4[12*$irlfd+(3*$pi54y)+$412pd])
  15518. set_control_par(%c1qym[$dyt1q],$CONTROL_PAR_VALUE,%2e42a[12*$irlfd+(3*$pi54y)+$412pd])
  15519. set_control_par(%n34di[$dyt1q],$CONTROL_PAR_VALUE,%kdfz1[12*$irlfd+(3*$pi54y)+$412pd])
  15520. inc($412pd)
  15521. end while
  15522. %3zszw[8*%rdbw1[$irlfd]+$hu1za] := %vhqqa[8*%rdbw1[$irlfd]+$pi54y]
  15523. %45vq1[8*%rdbw1[$irlfd]+$hu1za] := %vhqqa[48+(8*%rdbw1[$irlfd])+$pi54y]
  15524. %l2lis[8*%rdbw1[$irlfd]+$hu1za] := %vhqqa[96+(8*%rdbw1[$irlfd])+$pi54y]
  15525. %pqcgh[8*%rdbw1[$irlfd]+$hu1za] := %vhqqa[144+(8*%rdbw1[$irlfd])+$pi54y]
  15526. %sxlyt[8*%rdbw1[$irlfd]+$hu1za] := %vhqqa[192+(8*%rdbw1[$irlfd])+$pi54y]
  15527. end if
  15528. if (get_control_par(%ejazl[4*$irlfd+$hu1za],$CONTROL_PAR_VALUE)=1)
  15529. %v5xab[$irlfd] := $hu1za
  15530. %h152r[%geafe[$irlfd]] := $hu1za
  15531. end if
  15532. inc($hu1za)
  15533. end while
  15534. $hu1za := 0
  15535. while ($hu1za<%gxveo[$irlfd])
  15536. if (%45vq1[8*%rdbw1[$irlfd]+$hu1za]=6)
  15537. $ejy35 := 0
  15538. $y1ewg := 0
  15539. while ($y1ewg<4)
  15540. $fh05a := 0
  15541. while ($fh05a<8)
  15542. if (%45vq1[8*$y1ewg+$fh05a]=6 and (%2q55x[$y1ewg*8+$fh05a]=1))
  15543. if ($ejy35=0)
  15544. $v2ky0 := $fh05a
  15545. $qscu5 := %zjgrf[$y1ewg]
  15546. $3qz3a := $y1ewg
  15547. if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a]) # $EFFECT_TYPE_GAINER)
  15548. $m2etg := 1
  15549. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_GAINER,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
  15550. while ($m2etg=1)
  15551. wait(3000)
  15552. end while
  15553. end if
  15554. set_engine_par($ENGINE_PAR_SEND_EFFECT_DRY_LEVEL,0,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
  15555. $ejy35 := 1
  15556. else
  15557. $3pvid := 1
  15558. call update_modal_dialog_lbl
  15559. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Gater can only be used once")
  15560. add_text_line($xhutf,"and is already inserted in")
  15561. add_text_line($xhutf,!1ckyy[$3qz3a] & " slot " & ($v2ky0+1) & ".")
  15562. %45vq1[8*$y1ewg+$fh05a] := 8
  15563. $m2etg := 1
  15564. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$y1ewg]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_NONE,%3wawk[$y1ewg],$hu1za,%zjgrf[$y1ewg])
  15565. while ($m2etg=1)
  15566. wait(3000)
  15567. end while
  15568. end if
  15569. end if
  15570. inc($fh05a)
  15571. end while
  15572. inc($y1ewg)
  15573. end while
  15574. end if
  15575. inc($hu1za)
  15576. end while
  15577. $dyt1q := 0
  15578. $hu1za := 0
  15579. while ($hu1za<4)
  15580. $412pd := 0
  15581. while ($412pd<%wvg1x[$hu1za])
  15582. %n5ge0[8*$hu1za+$412pd] := %d0oml[$dyt1q]
  15583. inc($dyt1q)
  15584. inc($412pd)
  15585. end while
  15586. inc($hu1za)
  15587. end while
  15588. if ($owq4s=1)
  15589. call evaluate_mod_connections
  15590. call LAY_FX__sync_ui_to_engine
  15591. $qlteh := %geafe[$irlfd]
  15592. call _FX_UI__update_ui_controls_for_global_set_id
  15593. call update_all_mod_knob_range_indicator
  15594. call update_all_mod_knob_rt_indicator_mono
  15595. end if
  15596. dec($owq4s)
  15597. $gmcfe := 0
  15598. call MOD__position_all_mod_menus
  15599. end function
  15600. function TABS__order_did_change
  15601. call FX__reorder_after_tab_swap
  15602. end function
  15603. function _TABS__animate
  15604. if ($ear3d=0)
  15605. $ear3d := 1
  15606. while ($ear3d=1)
  15607. $ear3d := 0
  15608. $utjil := 0
  15609. while ($utjil<4)
  15610. $d3vlq := 0
  15611. while ($d3vlq<%gxveo[$utjil])
  15612. $nkklz := %pxakq[$utjil]+($d3vlq*66)
  15613. $od12p := get_control_par(%ejazl[4*$utjil+$d3vlq],$CONTROL_PAR_POS_X)
  15614. if ($od12p # $nkklz and (%ejazl[4*$utjil+$d3vlq] # $iwpwh))
  15615. $ear3d := 1
  15616. $rqqww := ($nkklz-$od12p)*20/100
  15617. if ($rqqww=0)
  15618. set_control_par(%ejazl[4*$utjil+$d3vlq],$CONTROL_PAR_POS_X,$nkklz)
  15619. else
  15620. set_control_par(%ejazl[4*$utjil+$d3vlq],$CONTROL_PAR_POS_X,$od12p+$rqqww)
  15621. end if
  15622. end if
  15623. inc($d3vlq)
  15624. end while
  15625. inc($utjil)
  15626. end while
  15627. if ($ear3d=1)
  15628. wait(16000)
  15629. end if
  15630. end while
  15631. end if
  15632. end function
  15633. function TABS__on_xy
  15634. $wry2j := $ptarc
  15635. $odmi5 := real_to_int(~tllyo*int_to_real(get_control_par(%d2t1g[$wry2j],$CONTROL_PAR_WIDTH)))
  15636. $zpa1n := $odmi5/66
  15637. select ($sfqck)
  15638. case 1
  15639. if ($odmi5 mod 66>55)
  15640. $1fg0q := 0
  15641. exit
  15642. else
  15643. $1fg0q := 1
  15644. $iwpwh := %ejazl[4*$wry2j+$zpa1n]
  15645. $0eeyn := $odmi5
  15646. $nsffy := get_control_par($iwpwh,$CONTROL_PAR_POS_X)
  15647. $yyqo2 := $zpa1n
  15648. $ikf00 := $zpa1n
  15649. end if
  15650. case 2
  15651. if ($1fg0q=1)
  15652. %v5xab[$wry2j] := $zpa1n
  15653. call TABS__selection_did_change
  15654. end if
  15655. $1fg0q := 0
  15656. $iwpwh := 0
  15657. if ($vp2vr=1)
  15658. call TABS__order_did_change
  15659. $vp2vr := 0
  15660. end if
  15661. call _TABS__animate
  15662. case 3
  15663. if ($1fg0q=0 or ($iwpwh=0))
  15664. exit
  15665. end if
  15666. $1fg0q := 2
  15667. if ($zpa1n>$yyqo2)
  15668. $cbdm5 := $yyqo2
  15669. while ($cbdm5<$zpa1n)
  15670. %ejazl[4*$wry2j+$cbdm5] := %ejazl[4*$wry2j+$cbdm5+1]
  15671. inc($cbdm5)
  15672. end while
  15673. $yyqo2 := $zpa1n
  15674. %ejazl[4*$wry2j+$zpa1n] := $iwpwh
  15675. $vp2vr := 1
  15676. call _TABS__animate
  15677. else
  15678. if ($zpa1n<$yyqo2)
  15679. $cbdm5 := $yyqo2
  15680. while ($cbdm5>=($zpa1n+1))
  15681. %ejazl[4*$wry2j+$cbdm5] := %ejazl[4*$wry2j+($cbdm5-1)]
  15682. dec($cbdm5)
  15683. end while
  15684. %ejazl[4*$wry2j+$zpa1n] := $iwpwh
  15685. $yyqo2 := $zpa1n
  15686. $vp2vr := 1
  15687. call _TABS__animate
  15688. end if
  15689. end if
  15690. $ufovt := $nsffy+($odmi5-$0eeyn)
  15691. if ($ufovt<%pxakq[$wry2j])
  15692. $ufovt := %pxakq[$wry2j]
  15693. else
  15694. if ($ufovt>(%pxakq[$wry2j]+((%gxveo[$wry2j]-1)*66)))
  15695. $ufovt := %pxakq[$wry2j]+((%gxveo[$wry2j]-1)*66)
  15696. end if
  15697. end if
  15698. if ($iwpwh # 0)
  15699. if (abs($ufovt-(%pxakq[$wry2j]+($zpa1n*66)))<20 and ($ikf00 # $zpa1n))
  15700. set_control_par($iwpwh,$CONTROL_PAR_POS_X,%pxakq[$wry2j]+($zpa1n*66))
  15701. $ikf00 := -1
  15702. else
  15703. set_control_par($iwpwh,$CONTROL_PAR_POS_X,$ufovt)
  15704. end if
  15705. end if
  15706. end select
  15707. end function
  15708. function _load_fx_preset_for_gl_vars
  15709. %45vq1[8*$jtvhn+$g2apy] := $pgdcw
  15710. %l2lis[8*$jtvhn+$g2apy] := $euybr
  15711. if ($pgdcw=6 and ($jtvhn # 3))
  15712. $ejy35 := 0
  15713. $y1ewg := 0
  15714. while ($y1ewg<4)
  15715. $fh05a := 0
  15716. while ($fh05a<8)
  15717. if (%45vq1[8*$y1ewg+$fh05a]=6 and (%2q55x[$y1ewg*8+$fh05a]=1))
  15718. if ($ejy35=0)
  15719. $v2ky0 := $fh05a
  15720. $qscu5 := %zjgrf[$y1ewg]
  15721. $3qz3a := $y1ewg
  15722. if (get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a]) # $EFFECT_TYPE_GAINER)
  15723. $m2etg := 1
  15724. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$3qz3a]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_GAINER,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
  15725. while ($m2etg=1)
  15726. wait(3000)
  15727. end while
  15728. end if
  15729. set_engine_par($ENGINE_PAR_SEND_EFFECT_DRY_LEVEL,0,%3wawk[$3qz3a],$v2ky0,%zjgrf[$3qz3a])
  15730. $ejy35 := 1
  15731. if ($k240z=2)
  15732. $m2etg := 1
  15733. pgs_set_key_val(PGS_FUNC,0,3)
  15734. while ($m2etg=1)
  15735. wait(3000)
  15736. end while
  15737. call STEPPER__set_preset_vals
  15738. end if
  15739. else
  15740. $3pvid := 1
  15741. call update_modal_dialog_lbl
  15742. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Gater can only be used once")
  15743. add_text_line($xhutf,"and is already inserted in")
  15744. add_text_line($xhutf,!1ckyy[$3qz3a] & " slot " & ($v2ky0+1) & ".")
  15745. %45vq1[8*$y1ewg+$fh05a] := 8
  15746. $m2etg := 1
  15747. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$y1ewg]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),$EFFECT_TYPE_NONE,%3wawk[$y1ewg],$g2apy,%zjgrf[$y1ewg])
  15748. while ($m2etg=1)
  15749. wait(3000)
  15750. end while
  15751. end if
  15752. end if
  15753. inc($fh05a)
  15754. end while
  15755. inc($y1ewg)
  15756. end while
  15757. else
  15758. $m2etg := 1
  15759. pgs_set_key_val(PGS_FUNC,0,2)
  15760. while ($m2etg=1)
  15761. wait(3000)
  15762. end while
  15763. $4qnnk := %44fry[%preset_buf[0]]
  15764. $3tnu3 := 0
  15765. while ($3tnu3<%2nyh4[$4qnnk])
  15766. %rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3] := %preset_buf[$3tnu3]
  15767. inc($3tnu3)
  15768. end while
  15769. $4qnnk := %44fry[%rx3ip[256*$jtvhn+(32*$g2apy)]]
  15770. $3tnu3 := 0
  15771. while ($3tnu3<%2nyh4[$4qnnk])
  15772. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_TYPE or (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_SEND_EFFECT_TYPE))
  15773. $dyt1q := get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
  15774. if ($dyt1q # %rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3])
  15775. $m2etg := 1
  15776. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3],%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
  15777. while ($m2etg=1)
  15778. wait(3000)
  15779. end while
  15780. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8*$jtvhn+$g2apy]+1) mod 2,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
  15781. end if
  15782. else
  15783. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=$ENGINE_PAR_EFFECT_SUBTYPE)
  15784. if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]) # %rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3])
  15785. $m2etg := 1
  15786. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3],%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
  15787. while ($m2etg=1)
  15788. wait(3000)
  15789. end while
  15790. end if
  15791. else
  15792. if (%3n0yu[%w5uro[$4qnnk]+$3tnu3]=080000000h)
  15793. if ($dyt1q # $EFFECT_TYPE_IRC or ($afnek=-1))
  15794. %3zszw[8*$jtvhn+$g2apy] := %rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3]
  15795. $m2etg := 1
  15796. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1))))]),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
  15797. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1))))]),0,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
  15798. $bu04v := load_ir_sample(!5sry1[%3zszw[8*$jtvhn+$g2apy]] & ".wav",$g2apy,%zjgrf[$jtvhn])
  15799. while ($m2etg=1)
  15800. wait(3000)
  15801. end while
  15802. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[$jtvhn]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn]))))-57-1))]-1))))]),$x202u,%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
  15803. end if
  15804. else
  15805. set_engine_par(%3n0yu[%w5uro[$4qnnk]+$3tnu3],%rx3ip[256*$jtvhn+(32*$g2apy)+$3tnu3],%3wawk[$jtvhn],$g2apy,%zjgrf[$jtvhn])
  15806. end if
  15807. end if
  15808. end if
  15809. inc($3tnu3)
  15810. end while
  15811. end if
  15812. end function
  15813. function FX_UI__on_fx_cat_btn
  15814. $05pba := $jldiw mod 10
  15815. $qlteh := $jldiw/10+-sh_right(abs($0ib2k-4)-1,31)
  15816. if ($05pba # %45vq1[8*%mpjcc[$qlteh]+%h152r[$qlteh]])
  15817. if ($05pba=6 and ($ejy35=1))
  15818. $3pvid := 1
  15819. call update_modal_dialog_lbl
  15820. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Gater can only be used once")
  15821. add_text_line($xhutf,"and is already inserted in")
  15822. add_text_line($xhutf,!1ckyy[$3qz3a] & " slot " & ($v2ky0+1) & ".")
  15823. else
  15824. if (%45vq1[8*%mpjcc[$qlteh]+%h152r[$qlteh]]=6)
  15825. $ejy35 := 0
  15826. end if
  15827. %45vq1[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := $05pba
  15828. $jtvhn := %mpjcc[$qlteh]
  15829. $g2apy := %h152r[$qlteh]
  15830. $pgdcw := $jldiw mod 10
  15831. $euybr := 0
  15832. call _load_fx_preset_for_gl_vars
  15833. %z3r0h[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := 1
  15834. call LAY_FX__sync_ui_to_engine
  15835. if ($05pba # 8)
  15836. set_control_par(%pfy4f[20*$qlteh+10+%h152r[$qlteh]],$CONTROL_PAR_VALUE,1)
  15837. %pqcgh[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := 1
  15838. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8*%mpjcc[$qlteh]+%h152r[$qlteh]]+1) mod 2,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])
  15839. end if
  15840. end if
  15841. end if
  15842. set_control_par(%pfy4f[20*$qlteh+4],$CONTROL_PAR_VALUE,0)
  15843. $qlteh := $qlteh
  15844. call _FX_UI__update_ui_controls_for_global_set_id
  15845. call update_all_mod_knob_range_indicator
  15846. call update_all_mod_knob_rt_indicator_mono
  15847. end function
  15848. function BOTTOM_TABS__on_click
  15849. $fg4rw := 0
  15850. while ($fg4rw<3)
  15851. set_control_par(%23vl1[$fg4rw],$CONTROL_PAR_VALUE,-sh_right(abs($fg4rw-$mdykc)-1,31))
  15852. inc($fg4rw)
  15853. end while
  15854. $fg4rw := 0
  15855. while ($fg4rw<200)
  15856. $y0aji := 0
  15857. while ($y0aji<=31)
  15858. if (sh_right(1040 .or. (64 .and. .not. %konvz[$mdykc]),$y0aji) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$y0aji) .and. 1=1))
  15859. $g5k3r := 0
  15860. while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
  15861. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  15862. inc($g5k3r)
  15863. end while
  15864. end if
  15865. inc($y0aji)
  15866. end while
  15867. inc($fg4rw)
  15868. end while
  15869. $fg4rw := 0
  15870. while ($fg4rw<200)
  15871. $y0aji := 0
  15872. while ($y0aji<=31)
  15873. if (sh_right(%konvz[$mdykc],$y0aji) .and. 1=1 and (sh_right(%cqg2m[$fg4rw],$y0aji) .and. 1=1))
  15874. $g5k3r := 0
  15875. while (%xwg5s[10*$fg4rw+$g5k3r]>0 and ($g5k3r<10))
  15876. set_control_par(%xwg5s[10*$fg4rw+$g5k3r],$CONTROL_PAR_HIDE,%_GUI_state[190*$fg4rw+(19*$g5k3r)+5])
  15877. inc($g5k3r)
  15878. end while
  15879. end if
  15880. inc($y0aji)
  15881. end while
  15882. inc($fg4rw)
  15883. end while
  15884. call BOTTOM_TABS__update_ui
  15885. end function
  15886. function BRW__update_cat_mask_and_apply
  15887. $lpg20 := 0
  15888. while ($lpg20<2)
  15889. %iz114[4*$zor2m+(2*$lpg20)] := 0
  15890. %iz114[4*$zor2m+(2*$lpg20)+1] := 0
  15891. inc($lpg20)
  15892. end while
  15893. $lz0yu := 0
  15894. while ($lz0yu<4)
  15895. $rc1ud := 0
  15896. while ($rc1ud<18)
  15897. if ($bgdzw=1)
  15898. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_VALUE,0)
  15899. %e0xxd[72*$zor2m+(18*$lz0yu)+$rc1ud] := 0
  15900. else
  15901. if (get_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_VALUE)=1 and ($rc1ud<%ey2zb[$zor2m*4+$lz0yu]))
  15902. $dyt1q := %0mw41[%t1pnk[$zor2m*4+$lz0yu]+$rc1ud]
  15903. %iz114[4*$zor2m+(2*($dyt1q/32))] := %iz114[4*$zor2m+(2*($dyt1q/32))] .or. sh_left((%e0xxd[72*$zor2m+(18*$lz0yu)+$rc1ud]+1) mod 2,$dyt1q mod 32)
  15904. %iz114[4*$zor2m+(2*($dyt1q/32))+1] := %iz114[4*$zor2m+(2*($dyt1q/32))+1] .or. sh_left(%e0xxd[72*$zor2m+(18*$lz0yu)+$rc1ud],$dyt1q mod 32)
  15905. end if
  15906. end if
  15907. inc($rc1ud)
  15908. end while
  15909. inc($lz0yu)
  15910. end while
  15911. $bgdzw := 0
  15912. call BRW__apply_mask_to_search_pool_for_sel_file_type
  15913. if (%kt24s[$zor2m] # -1)
  15914. $z2tnd := ((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000)*(1+(sh_right(1000-((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000),31) .or. sh_right((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000-0,31)))-0-(1000*sh_right(1000-((%kt24s[$zor2m]-0)*-1000/(%k4yha[$zor2m]-19-0)+1000),31))
  15915. end if
  15916. call BRW__update_search_result_list_ui
  15917. end function
  15918. function _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  15919. $dyt1q := %djxm0[18*($otddp/18)+($otddp mod 18)]
  15920. %e0xxd[72*$zor2m+(18*($otddp/18))+($otddp mod 18)] := get_control_par($dyt1q,$CONTROL_PAR_KEY_CONTROL) .and. get_control_par($dyt1q,$CONTROL_PAR_VALUE)
  15921. call BRW__update_cat_mask_and_apply
  15922. $r0pwv := %aydym[%blrx5[$zor2m+(%e0xxd[72*$zor2m+(18*($otddp/18))+($otddp mod 18)]*3)]]
  15923. set_control_par(%djxm0[18*($otddp/18)+($otddp mod 18)],$CONTROL_PAR_FONT_TYPE_ON,$r0pwv)
  15924. set_control_par(%djxm0[18*($otddp/18)+($otddp mod 18)],$CONTROL_PAR_FONT_TYPE_ON_HOVER,$r0pwv)
  15925. set_control_par(%djxm0[18*($otddp/18)+($otddp mod 18)],$CONTROL_PAR_FONT_TYPE_ON_PRESSED,$r0pwv)
  15926. set_control_par_str(%djxm0[18*($otddp/18)+($otddp mod 18)],$CONTROL_PAR_TEXT,!udzrt[%0sc2s[$zor2m*4+($otddp/18)]+($otddp mod 18)])
  15927. end function
  15928. function BRW__close_ui
  15929. $0ib2k := (1+(sh_right(4-$luyp1,31) .or. sh_right($luyp1-0,31)))*$luyp1
  15930. $lz0yu := 0
  15931. while ($lz0yu<4)
  15932. $rc1ud := 0
  15933. while ($rc1ud<18)
  15934. set_control_par(%djxm0[18*$lz0yu+$rc1ud],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  15935. inc($rc1ud)
  15936. end while
  15937. inc($lz0yu)
  15938. end while
  15939. $lz0yu := 0
  15940. while ($lz0yu<19)
  15941. set_control_par(%wqnrl[$lz0yu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  15942. set_control_par(%4gyqw[$lz0yu],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  15943. inc($lz0yu)
  15944. end while
  15945. call NAV_PAGE__update_main_nav
  15946. end function
  15947. function _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  15948. $hb51u := 0
  15949. if ($ax53k=$y1xhf and ($ENGINE_UPTIME-$5nvbg<300 or ($oppog=1)))
  15950. set_control_par(%wqnrl[$y1xhf],$CONTROL_PAR_VALUE,1)
  15951. call BRW__close_ui
  15952. $hb51u := 1
  15953. exit
  15954. end if
  15955. $5nvbg := $ENGINE_UPTIME
  15956. if ($ax53k=$y1xhf)
  15957. wait(300000)
  15958. end if
  15959. $ax53k := $y1xhf
  15960. %kt24s[$zor2m] := $fykja+$y1xhf
  15961. %jj5qi[$zor2m] := %3owef[500*$zor2m+%kt24s[$zor2m]]
  15962. call BRW__update_search_result_selection
  15963. end function
  15964. function set_all_engine_par_mod_knobs
  15965. $jdgl1 := 0
  15966. while ($jdgl1<2)
  15967. $gpzoi := %ulgib[$jdgl1]
  15968. call set_mod_knob_group_engine_par_for_gl_m_id
  15969. inc($jdgl1)
  15970. end while
  15971. $jdgl1 := 0
  15972. while ($jdgl1<48)
  15973. $gpzoi := %xdonk[$jdgl1]
  15974. call set_mod_knob_group_engine_par_for_gl_m_id
  15975. inc($jdgl1)
  15976. end while
  15977. end function
  15978. function on_selected_g_group_changed
  15979. $cm312 := 1
  15980. call update_main_snapshot_name_display
  15981. call update_g_xy_for_user_sample
  15982. call update_g_source_name_display
  15983. call set_all_engine_par_mod_knobs
  15984. $r5war := -1
  15985. call update_g_formant_shift_control
  15986. call update_light_guide
  15987. end function
  15988. function MOD__update_mono_start_mode
  15989. select ($zdrta)
  15990. case 3
  15991. $fg4rw := 0
  15992. while (%0wsff[$fg4rw]=0 and ($fg4rw<=(num_elements(%0wsff)-2)))
  15993. inc($fg4rw)
  15994. end while
  15995. $qbqpm := $fg4rw
  15996. case 2
  15997. $fg4rw := num_elements(%0wsff)-1
  15998. while (%0wsff[$fg4rw]=0 and ($fg4rw>0))
  15999. dec($fg4rw)
  16000. end while
  16001. $qbqpm := $fg4rw
  16002. end select
  16003. end function
  16004. function stop_all_pedal_notes
  16005. $iva44 := 0
  16006. $0e0hy := $0e0hy-$sgrou
  16007. $sgrou := 0
  16008. if ($t4vew=1)
  16009. if ($ruhe4=1)
  16010. $fg4rw := 0
  16011. while ($fg4rw<$h3axx)
  16012. $dyt1q := %sef3k[$fg4rw]
  16013. if (%KEY_DOWN[$dyt1q]=0)
  16014. $swdze := search(%br0tn,$dyt1q)
  16015. if ($swdze # -1)
  16016. %br0tn[$swdze] := %wwz2v[$0erls]
  16017. call ARP__update_notes
  16018. end if
  16019. end if
  16020. inc($fg4rw)
  16021. end while
  16022. else
  16023. if ($mcp2m=1)
  16024. $fg4rw := 0
  16025. while ($fg4rw<$rf3ya)
  16026. %0wsff[get_event_par(%srzwv[$fg4rw],$EVENT_PAR_2)] := 0
  16027. %jnhix[%laljf[%srzwv[$fg4rw] mod 8192]] := 1
  16028. note_off(%srzwv[$fg4rw])
  16029. %srzwv[$fg4rw] := -1
  16030. inc($fg4rw)
  16031. end while
  16032. $rf3ya := 0
  16033. else
  16034. if ($0e0hy=0)
  16035. note_off($auli3)
  16036. %jnhix[%laljf[$auli3 mod 8192]] := 1
  16037. end if
  16038. end if
  16039. end if
  16040. end if
  16041. $tsm3s := $ENGINE_UPTIME
  16042. $fg4rw := 0
  16043. while ($fg4rw<$h3axx)
  16044. set_event_par(%medyt[$fg4rw],$EVENT_PAR_0,3)
  16045. %0wsff[get_event_par(%medyt[$fg4rw],$EVENT_PAR_NOTE)] := 0
  16046. %lx5kr[%sef3k[$fg4rw]] := -1
  16047. %medyt[$fg4rw] := -1
  16048. %sef3k[$fg4rw] := -1
  16049. inc($fg4rw)
  16050. end while
  16051. $h3axx := 0
  16052. call MOD__update_mono_start_mode
  16053. end function
  16054. function stop_all_notes
  16055. call stop_all_pedal_notes
  16056. get_event_ids(%dhweu)
  16057. $fg4rw := 0
  16058. while ($fg4rw<num_elements(%dhweu) and (%dhweu[$fg4rw] # 0))
  16059. if (get_event_par(%dhweu[$fg4rw],$EVENT_PAR_0)>=0)
  16060. set_event_par(%dhweu[$fg4rw],$EVENT_PAR_0,4)
  16061. %jnhix[%laljf[%dhweu[$fg4rw] mod 8192]] := 1
  16062. else
  16063. if (get_event_par(%dhweu[$fg4rw],$EVENT_PAR_0)=-1)
  16064. note_off(%dhweu[$fg4rw])
  16065. fade_out(%dhweu[$fg4rw],1,1)
  16066. end if
  16067. end if
  16068. inc($fg4rw)
  16069. end while
  16070. $fg4rw := 0
  16071. while ($fg4rw<num_elements(%srzwv))
  16072. %medyt[$fg4rw] := -1
  16073. %srzwv[$fg4rw] := -1
  16074. %lx5kr[$fg4rw] := -1
  16075. %sef3k[$fg4rw] := -1
  16076. inc($fg4rw)
  16077. end while
  16078. call ARP__remove_all_notes_and_reset
  16079. $kyxij := 0
  16080. while ($kyxij<num_elements(%0wsff))
  16081. %0wsff[$kyxij] := 0
  16082. inc($kyxij)
  16083. end while
  16084. $fg4rw := 0
  16085. while ($fg4rw<10)
  16086. %dz3eb[$fg4rw] := 0
  16087. set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  16088. inc($fg4rw)
  16089. end while
  16090. $pdzso := 0
  16091. $kyxij := 0
  16092. while ($kyxij<num_elements(%mc3xd))
  16093. %mc3xd[$kyxij] := 0
  16094. inc($kyxij)
  16095. end while
  16096. end function
  16097. function _BRW__cue_snapshot_load
  16098. inc($verq0)
  16099. while ($oppog=1)
  16100. wait(3000)
  16101. end while
  16102. if ($verq0=1)
  16103. $oppog := 1
  16104. $cz3ou := 0
  16105. call stop_all_notes
  16106. $afnek := -1
  16107. set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,0,-1,6,$NI_BUS_OFFSET)
  16108. set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,0,-1,6,$NI_BUS_OFFSET+1)
  16109. set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,0,-1,6,2)
  16110. wait(100)
  16111. $cm312 := 0
  16112. @cs0dz := !_BRW__preset_names[1000+%jj5qi[2]]
  16113. @3cyqr := @pua5f & @cs0dz & ".nka"
  16114. $d1d43 := 1
  16115. if ($0ib2k # 4 and ($0ib2k # 3) and ($mdykc # 0))
  16116. $4hpei := 1
  16117. end if
  16118. if (in_range($0ib2k,5,7))
  16119. $uciwo := 0
  16120. end if
  16121. pgs_set_key_val(PGS_FUNC,0,5)
  16122. while ($d1d43 # -1 and ($cz3ou=0))
  16123. wait(3000)
  16124. end while
  16125. end if
  16126. end function
  16127. function _BRW__load_preset_for_b_type
  16128. call BRW__update_preset_name_display
  16129. select ($zor2m)
  16130. case 0
  16131. $51oxm := %BRW__grp_remap[%jj5qi[$zor2m]+100]-100
  16132. call on_selected_g_group_changed
  16133. case 1
  16134. if (%jj5qi[$zor2m]=100)
  16135. if ($NUM_GROUPS=365)
  16136. $hdmk1 := 364
  16137. else
  16138. $3pvid := 1
  16139. call update_modal_dialog_lbl
  16140. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Please reload the Straylight nki from the Library Tab to enabled User Samples.")
  16141. exit
  16142. end if
  16143. else
  16144. $hdmk1 := %BRW__grp_remap[%jj5qi[$zor2m]]
  16145. end if
  16146. call on_selected_std_group_changed
  16147. case 2
  16148. call _BRW__cue_snapshot_load
  16149. if ($cz3ou=1)
  16150. dec($verq0)
  16151. $oppog := 0
  16152. exit
  16153. end if
  16154. if ($verq0 # 1)
  16155. dec($verq0)
  16156. exit
  16157. end if
  16158. end select
  16159. end function
  16160. function prepare_purge
  16161. $fg4rw := 0
  16162. while ($fg4rw<$NUM_GROUPS)
  16163. if ($fg4rw=($51oxm+100) or ($fg4rw=$hdmk1))
  16164. %tuuuf[$fg4rw] := 1
  16165. else
  16166. %tuuuf[$fg4rw] := 0
  16167. end if
  16168. inc($fg4rw)
  16169. end while
  16170. end function
  16171. function BRW___do_clean_up_after_snapshot_load
  16172. set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,$NI_BUS_OFFSET)
  16173. set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,$NI_BUS_OFFSET+1)
  16174. set_engine_par($ENGINE_PAR_SEND_EFFECT_OUTPUT_GAIN,397461,-1,6,2)
  16175. wait(100)
  16176. $afnek := 1
  16177. dec($verq0)
  16178. $oppog := 0
  16179. end function
  16180. function _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  16181. %_BRW__user_fav_array[500*$zor2m+%3owef[500*$zor2m+$fykja+$y1xhf]] := get_control_par(%4gyqw[$y1xhf],$CONTROL_PAR_VALUE)
  16182. if ($d5tn2=1)
  16183. call BRW__update_cat_mask_and_apply
  16184. end if
  16185. end function
  16186. function FX_UI__on_preset_menu_for_gl_set_id
  16187. $ibaqw := %44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]
  16188. $jtvhn := %mpjcc[$qlteh]
  16189. $g2apy := %h152r[$qlteh]
  16190. $pgdcw := %qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))
  16191. $euybr := get_menu_item_value(%pfy4f[20*$qlteh+2],get_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE))
  16192. call _load_fx_preset_for_gl_vars
  16193. %z3r0h[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := 1+sh_right(abs(%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]-$ibaqw)-1,31)
  16194. call LAY_FX__sync_ui_to_engine
  16195. call _FX_UI__update_ui_controls_for_global_set_id
  16196. call update_all_mod_knob_range_indicator
  16197. end function
  16198. function FX_UI__on_next_preset_btn_for_gl_set_id
  16199. $ibaqw := %44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]
  16200. set_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE,(get_menu_item_value(%pfy4f[20*$qlteh+2],get_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE))+1) mod %FXC__num_presets4cat[%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))])
  16201. $jtvhn := %mpjcc[$qlteh]
  16202. $g2apy := %h152r[$qlteh]
  16203. $pgdcw := %qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))
  16204. $euybr := get_menu_item_value(%pfy4f[20*$qlteh+2],get_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE))
  16205. call _load_fx_preset_for_gl_vars
  16206. %z3r0h[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := 1+sh_right(abs(%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]-$ibaqw)-1,31)
  16207. call LAY_FX__sync_ui_to_engine
  16208. call _FX_UI__update_ui_controls_for_global_set_id
  16209. call update_all_mod_knob_range_indicator
  16210. set_control_par(%pfy4f[20*$qlteh+5],$CONTROL_PAR_VALUE,0)
  16211. end function
  16212. function FX_UI__on_prev_preset_btn_for_gl_set_id
  16213. $ibaqw := %44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]
  16214. set_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE,(get_menu_item_value(%pfy4f[20*$qlteh+2],get_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE))+%FXC__num_presets4cat[%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))]-1) mod %FXC__num_presets4cat[%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))])
  16215. $jtvhn := %mpjcc[$qlteh]
  16216. $g2apy := %h152r[$qlteh]
  16217. $pgdcw := %qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[%mpjcc[$qlteh]])-1,31)))
  16218. $euybr := get_menu_item_value(%pfy4f[20*$qlteh+2],get_control_par(%pfy4f[20*$qlteh+2],$CONTROL_PAR_VALUE))
  16219. call _load_fx_preset_for_gl_vars
  16220. %z3r0h[8*%mpjcc[$qlteh]+%h152r[$qlteh]] := 1+sh_right(abs(%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[%mpjcc[$qlteh]]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[%mpjcc[$qlteh]],%h152r[$qlteh],%zjgrf[%mpjcc[$qlteh]])]-$ibaqw)-1,31)
  16221. call LAY_FX__sync_ui_to_engine
  16222. call _FX_UI__update_ui_controls_for_global_set_id
  16223. call update_all_mod_knob_range_indicator
  16224. set_control_par(%pfy4f[20*$qlteh+6],$CONTROL_PAR_VALUE,0)
  16225. end function
  16226. function _update_mod_range_label_for_gl_m_id
  16227. $22rrq := $gpzoi
  16228. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,"m: " & @uamno)
  16229. if (%jeswc[$gpzoi]=55)
  16230. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask_8")
  16231. end if
  16232. if (%jeswc[$gpzoi]=330)
  16233. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
  16234. if ($afnek=0)
  16235. %latnx[0] := 6
  16236. %latnx[1] := 6
  16237. call MOD__perform_optimized_update_for_gl_ext_mod
  16238. %latnx[0] := 8
  16239. %latnx[1] := 8
  16240. call MOD__perform_optimized_update_for_gl_ext_mod
  16241. $gpzoi := $22rrq
  16242. end if
  16243. end if
  16244. if (%jeswc[$gpzoi]=335)
  16245. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
  16246. if ($afnek=0)
  16247. %latnx[0] := 7
  16248. %latnx[1] := 7
  16249. call MOD__perform_optimized_update_for_gl_ext_mod
  16250. %latnx[0] := 8
  16251. %latnx[1] := 8
  16252. call MOD__perform_optimized_update_for_gl_ext_mod
  16253. $gpzoi := $22rrq
  16254. end if
  16255. end if
  16256. set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_HIDE))
  16257. %gmios[$gpzoi] := $ENGINE_UPTIME
  16258. end function
  16259. function on_mod_range_knob_for_gl_m_id
  16260. $tmkul := 0
  16261. if ($ENGINE_UPTIME-%gmios[$gpzoi]>800)
  16262. $kzcmg := get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE)
  16263. $eoj1p := %z15qu[$gpzoi]
  16264. end if
  16265. if (get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_KEY_ALT)=1)
  16266. set_control_par(%41o3s[$gpzoi],$CONTROL_PAR_VALUE,$kzcmg-((get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)-$eoj1p)/2))
  16267. end if
  16268. %z15qu[$gpzoi] := get_control_par(%c1qym[$gpzoi],$CONTROL_PAR_VALUE)
  16269. call _update_mod_knob_range_indicator_for_gl_m_id
  16270. call update_mod_range_automation_label_for_gl_m_id
  16271. call _update_mod_range_label_for_gl_m_id
  16272. call _update_mod_knob_rt_indicator_for_gl_m_id
  16273. end function
  16274. function on_mod_source_for_gl_m_id
  16275. call MOD__position_mod_menu_for_gl_m_id
  16276. call evaluate_mod_connections
  16277. call _update_mod_knob_range_indicator_for_gl_m_id
  16278. call _update_mod_knob_rt_indicator_for_gl_m_id
  16279. end function
  16280. function _on_mod_knob_engine_par_for_gl_m_id
  16281. call _handle_mod_knob_modifiers_for_gl_m_id
  16282. call _update_mod_knob_range_indicator_for_gl_m_id
  16283. call set_mod_knob_group_engine_par_for_gl_m_id
  16284. call update_mod_knob_ep_automation_label_for_gl_m_id
  16285. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,@uamno)
  16286. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
  16287. set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_HIDE))
  16288. %gmios[$gpzoi] := $ENGINE_UPTIME
  16289. call _update_mod_knob_rt_indicator_for_gl_m_id
  16290. end function
  16291. function _on_mod_range_knob_engine_par_for_gl_m_id
  16292. $tmkul := 0
  16293. call _update_mod_knob_range_indicator_for_gl_m_id
  16294. call set_mod_knob_group_engine_par_for_gl_m_id
  16295. call update_mod_range_ep_automation_label_for_gl_m_id
  16296. set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,get_control_par(%41o3s[$gpzoi],$CONTROL_PAR_HIDE))
  16297. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"MK_Mask" & !4gjzd[$gpzoi])
  16298. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,@uamno)
  16299. %gmios[$gpzoi] := $ENGINE_UPTIME
  16300. call _update_mod_knob_rt_indicator_for_gl_m_id
  16301. end function
  16302. function _on_mod_source_engine_par_for_gl_m_id
  16303. call MOD__position_mod_menu_for_gl_m_id
  16304. call evaluate_mod_connections
  16305. call set_mod_knob_group_engine_par_for_gl_m_id
  16306. call _update_mod_knob_range_indicator_for_gl_m_id
  16307. call _update_mod_knob_rt_indicator_for_gl_m_id
  16308. end function
  16309. function _on_norm_knob_engine_par_for_gl_nk_ep_id
  16310. call set_norm_knob_group_engine_par_for_gl_nk_ep_id
  16311. call update_norm_knob_ep_automation_label_for_gl_nk_ep_id
  16312. set_control_par_str(%5comw[$4djds],$CONTROL_PAR_TEXT,@uamno)
  16313. set_control_par(%5comw[$4djds],$CONTROL_PAR_HIDE,get_control_par(%aazjf[$4djds],$CONTROL_PAR_HIDE))
  16314. %qdiwi[$4djds] := $ENGINE_UPTIME
  16315. end function
  16316. function _on_norm_knob_for_gl_nk_ep_id
  16317. call update_norm_knob_automation_label_for_gl_nk_ep_id
  16318. set_control_par_str(%5comw[$4djds],$CONTROL_PAR_TEXT,get_control_par(%aazjf[$4djds],$CONTROL_PAR_VALUE) & " " & !5hawr[$4djds])
  16319. set_control_par(%5comw[$4djds],$CONTROL_PAR_HIDE,get_control_par(%aazjf[$4djds],$CONTROL_PAR_HIDE))
  16320. %qdiwi[$4djds] := $ENGINE_UPTIME
  16321. end function
  16322. on ui_control(?xy)
  16323. $2thol := real_to_int(?xy[0]*10000.0)
  16324. $jy3sd := real_to_int(?xy[1]*10000.0)
  16325. %ppvim[0] := real_to_int(?xy[0]*1000.0)
  16326. %ppvim[1] := real_to_int(?xy[1]*1000.0)
  16327. %latnx[0] := 0
  16328. %latnx[1] := 1
  16329. call MOD__perform_optimized_update_for_gl_ext_mod
  16330. set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_LABEL,real_to_int(?xy[0]*100.0) & " %",0)
  16331. set_control_par_str_arr(get_ui_id(?xy),$CONTROL_PAR_LABEL,real_to_int(?xy[1]*100.0) & " %",1)
  16332. call update_perform_animation
  16333. end on
  16334. on ui_control($4ainj)
  16335. end on
  16336. on ui_control($gcjlt)
  16337. end on
  16338. on ui_control($iyqua)
  16339. $qrpdp := 1
  16340. while ($iyqua=1)
  16341. set_control_par_str(get_ui_id($iyqua),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_" & $qrpdp)
  16342. $qrpdp := ($qrpdp+1) mod 2
  16343. wait(500000)
  16344. end while
  16345. set_control_par_str(get_ui_id($iyqua),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_0")
  16346. end on
  16347. on ui_control($otffr)
  16348. $euiqi := 1
  16349. while ($otffr=1)
  16350. set_control_par_str(get_ui_id($otffr),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_" & $euiqi)
  16351. $euiqi := ($euiqi+1) mod 2
  16352. wait(500000)
  16353. end while
  16354. set_control_par_str(get_ui_id($otffr),$CONTROL_PAR_PICTURE,"GE_MIDI_LEARN_BTN_0")
  16355. end on
  16356. on ui_control($ilpk2)
  16357. call STEPPER__update_ui
  16358. end on
  16359. on ui_control(%qysah)
  16360. select ($i3fbq)
  16361. case 0
  16362. $y3mgr := 0
  16363. while ($y3mgr<32)
  16364. %lfbyb[$y3mgr] := %qysah[$y3mgr]
  16365. inc($y3mgr)
  16366. end while
  16367. call update_morph_stepper
  16368. case 1
  16369. $y3mgr := 0
  16370. while ($y3mgr<32)
  16371. %bswku[$y3mgr] := %qysah[$y3mgr]
  16372. inc($y3mgr)
  16373. end while
  16374. call update_morph_stepper
  16375. end select
  16376. end on
  16377. on ui_control($3f4bh)
  16378. $3f4bh := 0
  16379. $hokt3 := 1+(get_control_par(get_ui_id($3f4bh),$CONTROL_PAR_KEY_SHIFT)*3)
  16380. call STEPPER__shift_tables
  16381. end on
  16382. on ui_control($bryp1)
  16383. $bryp1 := 0
  16384. $hokt3 := -1-(get_control_par(get_ui_id($bryp1),$CONTROL_PAR_KEY_SHIFT)*3)
  16385. call STEPPER__shift_tables
  16386. end on
  16387. on ui_control($i3fbq)
  16388. call STEPPER__update_ui
  16389. end on
  16390. on ui_control($c1dov)
  16391. select ($c1dov)
  16392. case 0
  16393. $y3mgr := 0
  16394. while ($y3mgr<32)
  16395. %bswku[$y3mgr] := %lfbyb[$y3mgr]
  16396. inc($y3mgr)
  16397. end while
  16398. $i3fbq := 1
  16399. case 1
  16400. $y3mgr := 0
  16401. while ($y3mgr<32)
  16402. %lfbyb[$y3mgr] := %bswku[$y3mgr]
  16403. inc($y3mgr)
  16404. end while
  16405. $i3fbq := 0
  16406. case 2
  16407. $y3mgr := 0
  16408. while ($y3mgr<32)
  16409. %lfbyb[$y3mgr] := %t40az[$y3mgr]
  16410. inc($y3mgr)
  16411. end while
  16412. case 3
  16413. $y3mgr := 0
  16414. while ($y3mgr<32)
  16415. %bswku[$y3mgr] := %t40az[$y3mgr]
  16416. inc($y3mgr)
  16417. end while
  16418. case 4
  16419. $y3mgr := 0
  16420. while ($y3mgr<32)
  16421. %t40az[$y3mgr] := %lfbyb[$y3mgr]
  16422. %lfbyb[$y3mgr] := %bswku[$y3mgr]
  16423. %bswku[$y3mgr] := %t40az[$y3mgr]
  16424. inc($y3mgr)
  16425. end while
  16426. case 5
  16427. if ($ilpk2*2<=32)
  16428. $y3mgr := 0
  16429. while ($y3mgr<32)
  16430. %t40az[$y3mgr] := %lfbyb[$y3mgr]
  16431. %lfbyb[$y3mgr] := 0
  16432. inc($y3mgr)
  16433. end while
  16434. $y3mgr := 0
  16435. while ($y3mgr<$ilpk2)
  16436. %lfbyb[$y3mgr*2] := %t40az[$y3mgr]
  16437. %lfbyb[$y3mgr*2+1] := %t40az[$y3mgr]
  16438. inc($y3mgr)
  16439. end while
  16440. $y3mgr := 0
  16441. while ($y3mgr<32)
  16442. %t40az[$y3mgr] := %bswku[$y3mgr]
  16443. %bswku[$y3mgr] := 0
  16444. inc($y3mgr)
  16445. end while
  16446. $y3mgr := 0
  16447. while ($y3mgr<$ilpk2)
  16448. %bswku[$y3mgr*2] := %t40az[$y3mgr]
  16449. %bswku[$y3mgr*2+1] := %t40az[$y3mgr]
  16450. inc($y3mgr)
  16451. end while
  16452. $ilpk2 := $ilpk2*2
  16453. set_control_par(get_ui_id($qxgdn),$CONTROL_PAR_VALUE,get_control_par(get_ui_id($qxgdn),$CONTROL_PAR_VALUE)+1)
  16454. else
  16455. $3pvid := 1
  16456. call update_modal_dialog_lbl
  16457. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Sequence can not be doubled.")
  16458. end if
  16459. case 6
  16460. if ($ilpk2>2)
  16461. $y3mgr := 0
  16462. while ($y3mgr<32)
  16463. %t40az[$y3mgr] := %lfbyb[$y3mgr]
  16464. %lfbyb[$y3mgr] := 0
  16465. inc($y3mgr)
  16466. end while
  16467. $y3mgr := 0
  16468. while ($y3mgr<$ilpk2)
  16469. %lfbyb[$y3mgr/2] := %t40az[$y3mgr]
  16470. %qysah[$y3mgr/2] := %t40az[$y3mgr]
  16471. $y3mgr := $y3mgr+2
  16472. end while
  16473. $y3mgr := 0
  16474. while ($y3mgr<32)
  16475. %t40az[$y3mgr] := %bswku[$y3mgr]
  16476. %bswku[$y3mgr] := 0
  16477. inc($y3mgr)
  16478. end while
  16479. $y3mgr := 0
  16480. while ($y3mgr<$ilpk2)
  16481. %bswku[$y3mgr/2] := %t40az[$y3mgr]
  16482. $y3mgr := $y3mgr+2
  16483. end while
  16484. $ilpk2 := $ilpk2/2
  16485. set_control_par(get_ui_id($qxgdn),$CONTROL_PAR_VALUE,get_control_par(get_ui_id($qxgdn),$CONTROL_PAR_VALUE)-1)
  16486. else
  16487. $3pvid := 1
  16488. call update_modal_dialog_lbl
  16489. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Sequence can not be halfend.")
  16490. end if
  16491. case 7
  16492. $y3mgr := 0
  16493. while ($y3mgr<32)
  16494. if ($i3fbq=0)
  16495. %lfbyb[$y3mgr] := random(0,1000)
  16496. else
  16497. %bswku[$y3mgr] := random(0,1000)
  16498. end if
  16499. inc($y3mgr)
  16500. end while
  16501. end select
  16502. call STEPPER__update_ui
  16503. end on
  16504. on ui_control($xaqda)
  16505. if ($oov5z=0)
  16506. $5vbbt := $gllpo
  16507. $fg4rw := 0
  16508. while ($fg4rw<$gllpo)
  16509. %2piom[$fg4rw] := %w0xec[$fg4rw]
  16510. inc($fg4rw)
  16511. end while
  16512. else
  16513. $5vbbt := $hn35i
  16514. $fg4rw := 0
  16515. while ($fg4rw<$hn35i)
  16516. %2piom[$fg4rw] := %rzzs4[$fg4rw]
  16517. inc($fg4rw)
  16518. end while
  16519. end if
  16520. $fg4rw := 1
  16521. while ($fg4rw<=($5vbbt-2))
  16522. $r0pwv := 0
  16523. $m12vk := 0
  16524. $y3mgr := 0
  16525. while ($y3mgr<3)
  16526. $dyt1q := $fg4rw+$y3mgr-1
  16527. if (in_range($dyt1q,0,$5vbbt-1))
  16528. $r0pwv := $r0pwv+%2piom[$dyt1q]
  16529. inc($m12vk)
  16530. end if
  16531. inc($y3mgr)
  16532. end while
  16533. if ($oov5z=0)
  16534. %w0xec[$fg4rw] := $r0pwv/$m12vk
  16535. else
  16536. %rzzs4[$fg4rw] := $r0pwv/$m12vk
  16537. end if
  16538. inc($fg4rw)
  16539. end while
  16540. end on
  16541. on ui_control($oov5z)
  16542. call SHAPER__update_ui
  16543. end on
  16544. on ui_control($zdrta)
  16545. select ($zdrta)
  16546. case 2
  16547. $qbqpm := 0
  16548. case 3
  16549. $qbqpm := 127
  16550. end select
  16551. end on
  16552. on ui_control($ojlo0)
  16553. if (get_control_par(get_ui_id($ojlo0),$CONTROL_PAR_KEY_ALT)=1)
  16554. $fg4rw := 0
  16555. while ($fg4rw<num_elements(%preset))
  16556. %preset[$fg4rw] := 0
  16557. inc($fg4rw)
  16558. end while
  16559. $d1d43 := load_array(%preset,0)
  16560. set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,"Unkown NKA file")
  16561. @3cyqr := "Unknown"
  16562. @cs0dz := "Unknown"
  16563. $421rl := 0
  16564. while ($d1d43 # -1)
  16565. wait(3000)
  16566. end while
  16567. call prepare_purge
  16568. $rlfxd := 0
  16569. while ($rlfxd<$NUM_GROUPS)
  16570. purge_group($rlfxd,%tuuuf[$rlfxd])
  16571. inc($rlfxd)
  16572. end while
  16573. call update_all_WF_for_default_key
  16574. $ojlo0 := 0
  16575. exit
  16576. end if
  16577. $ojlo0 := 0
  16578. $luyp1 := $0ib2k
  16579. $0ib2k := 7
  16580. call NAV_PAGE__update_main_nav
  16581. end on
  16582. on ui_control($0efsn)
  16583. $0efsn := 0
  16584. $4ut4g := $zor2m
  16585. $zor2m := 2
  16586. $w0x5j := 1
  16587. call _BRW__select_preset_id_for_file_type_with_offset
  16588. $dyt1q := %jj5qi[2]
  16589. $zor2m := 2
  16590. call _BRW__load_preset_for_b_type
  16591. if ($cz3ou=1)
  16592. exit
  16593. end if
  16594. call prepare_purge
  16595. $rlfxd := 0
  16596. while ($rlfxd<$NUM_GROUPS)
  16597. purge_group($rlfxd,%tuuuf[$rlfxd])
  16598. inc($rlfxd)
  16599. end while
  16600. call update_all_WF_for_default_key
  16601. call BRW___do_clean_up_after_snapshot_load
  16602. end on
  16603. on ui_control($mb40x)
  16604. $mb40x := 0
  16605. $4ut4g := $zor2m
  16606. $zor2m := 2
  16607. $w0x5j := -1
  16608. call _BRW__select_preset_id_for_file_type_with_offset
  16609. $dyt1q := %jj5qi[2]
  16610. $zor2m := 2
  16611. call _BRW__load_preset_for_b_type
  16612. if ($cz3ou=1)
  16613. exit
  16614. end if
  16615. call prepare_purge
  16616. $rlfxd := 0
  16617. while ($rlfxd<$NUM_GROUPS)
  16618. purge_group($rlfxd,%tuuuf[$rlfxd])
  16619. inc($rlfxd)
  16620. end while
  16621. call update_all_WF_for_default_key
  16622. call BRW___do_clean_up_after_snapshot_load
  16623. end on
  16624. on ui_control($bbjq4)
  16625. $bgdzw := 1
  16626. call BRW__update_cat_mask_and_apply
  16627. call _BRW__update_ui_for_sel_file_type
  16628. end on
  16629. on ui_control($z2tnd)
  16630. if (get_control_par(get_ui_id($z2tnd),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL)
  16631. call BRW__update_search_result_list_ui
  16632. end if
  16633. end on
  16634. on ui_control($d5tn2)
  16635. if (get_control_par(get_ui_id($d5tn2),$CONTROL_PAR_KEY_ALT)=1 and (get_control_par(get_ui_id($d5tn2),$CONTROL_PAR_KEY_SHIFT)=1))
  16636. $d5tn2 := 0
  16637. $lz0yu := 0
  16638. while ($lz0yu<500)
  16639. %_BRW__user_fav_array[500*$zor2m+$lz0yu] := 0
  16640. inc($lz0yu)
  16641. end while
  16642. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  16643. end if
  16644. %31af0[$zor2m] := $d5tn2
  16645. call BRW__update_cat_mask_and_apply
  16646. end on
  16647. on ui_control($wwkuw)
  16648. $wwkuw := 0
  16649. $4ut4g := $zor2m
  16650. $zor2m := $zor2m
  16651. $w0x5j := -1
  16652. call _BRW__select_preset_id_for_file_type_with_offset
  16653. select ($zor2m)
  16654. case 2
  16655. $lz0yu := %jj5qi[$zor2m]
  16656. case 0
  16657. $lz0yu := %BRW__grp_remap[%jj5qi[$zor2m]+100]-100
  16658. case 1
  16659. $lz0yu := -sh_right(abs(%jj5qi[$zor2m]-100)-1,31)*364+((.not. -sh_right(abs(%jj5qi[$zor2m]-100)-1,31) .and. 1)*%BRW__grp_remap[%jj5qi[$zor2m]])
  16660. end select
  16661. $zor2m := $zor2m
  16662. call _BRW__load_preset_for_b_type
  16663. if ($cz3ou=1)
  16664. exit
  16665. end if
  16666. call prepare_purge
  16667. $rlfxd := 0
  16668. while ($rlfxd<$NUM_GROUPS)
  16669. purge_group($rlfxd,%tuuuf[$rlfxd])
  16670. inc($rlfxd)
  16671. end while
  16672. call update_all_WF_for_default_key
  16673. if ($zor2m=2)
  16674. call BRW___do_clean_up_after_snapshot_load
  16675. end if
  16676. end on
  16677. on ui_control($les2u)
  16678. $les2u := 0
  16679. $4ut4g := $zor2m
  16680. $zor2m := $zor2m
  16681. $w0x5j := 1
  16682. call _BRW__select_preset_id_for_file_type_with_offset
  16683. select ($zor2m)
  16684. case 2
  16685. $lz0yu := %jj5qi[$zor2m]
  16686. case 0
  16687. $lz0yu := %BRW__grp_remap[%jj5qi[$zor2m]+100]-100
  16688. case 1
  16689. $lz0yu := -sh_right(abs(%jj5qi[$zor2m]-100)-1,31)*364+((.not. -sh_right(abs(%jj5qi[$zor2m]-100)-1,31) .and. 1)*%BRW__grp_remap[%jj5qi[$zor2m]])
  16690. end select
  16691. $zor2m := $zor2m
  16692. call _BRW__load_preset_for_b_type
  16693. if ($cz3ou=1)
  16694. exit
  16695. end if
  16696. call prepare_purge
  16697. $rlfxd := 0
  16698. while ($rlfxd<$NUM_GROUPS)
  16699. purge_group($rlfxd,%tuuuf[$rlfxd])
  16700. inc($rlfxd)
  16701. end while
  16702. call update_all_WF_for_default_key
  16703. if ($zor2m=2)
  16704. call BRW___do_clean_up_after_snapshot_load
  16705. end if
  16706. end on
  16707. on ui_control($w5s50)
  16708. call BRW__close_ui
  16709. end on
  16710. on ui_control($41roa)
  16711. set_control_par_str(get_ui_id($41roa),$CONTROL_PAR_PICTURE,"GE_RND_MENU_" & $41roa)
  16712. end on
  16713. on ui_control($y2kih)
  16714. set_control_par_str(get_ui_id($y2kih),$CONTROL_PAR_PICTURE,"GE_RND_MENU_" & $y2kih)
  16715. end on
  16716. on ui_control($v3w2j)
  16717. $v3w2j := 0
  16718. $n4ppl := $41roa
  16719. if ($n4ppl=1)
  16720. $cm312 := 1
  16721. set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,"User Snapshot")
  16722. $zor2m := 0
  16723. if (%xeyhi[$zor2m]=0)
  16724. call BRW__apply_mask_to_search_pool_for_sel_file_type
  16725. end if
  16726. $dyt1q := %3owef[random(0,%k4yha[0]-1)]
  16727. $51oxm := %BRW__grp_remap[$dyt1q+100]-100
  16728. end if
  16729. $ord01 := random(0,1)
  16730. $3fqin := get_control_par(get_ui_id($3fqin),$CONTROL_PAR_DEFAULT_VALUE)
  16731. $q5pfd := random(-100000,50000)
  16732. $m0zqt := %ludky[random(0,689)]
  16733. $xc3po := random(0,1)
  16734. $2zs5k := random(0,4)/4
  16735. $neagb := random(0,1)
  16736. $bpkqt := random(150,3000)
  16737. $g345d := random(-$bpkqt+100,3000-$bpkqt)
  16738. $3pyb3 := %zpgb5[random(0,719)]
  16739. $m2mpa := random(10,1000)
  16740. $n0kha := random(-$m2mpa+10,1000-$m2mpa)
  16741. $u2pwx := %zpgb5[random(0,719)]
  16742. $1g0ky := real_to_int(pow(int_to_real(random(0,500000))/500000.0,3.0)*500000.0)
  16743. $2xzsd := random(0,1)*random(-$1g0ky,500000-$1g0ky)
  16744. $ldi1z := %zpgb5[random(0,719)]
  16745. $liaof := random(1,1000)
  16746. $5wlib := random(-$liaof+1,1000-$liaof)
  16747. $eu2xe := %zpgb5[random(0,719)]
  16748. $sgbvz := random(-8000,8000)
  16749. $cx1ja := random(-$sgbvz+-8000,8000-$sgbvz)
  16750. $qxhis := %zpgb5[random(0,719)]
  16751. $4zkqn := random(0,1000)
  16752. $boshu := random(-$4zkqn,1000-$4zkqn)
  16753. $oicux := %zpgb5[random(0,719)]
  16754. $kuk42 := random(1,100)
  16755. $o5n5m := random(-$kuk42+1,100-$kuk42)
  16756. $fzwxf := %zpgb5[random(0,719)]
  16757. $qsfxg := 1200*random(-2,2)
  16758. $xeafk := random(0,1)*(1200*random(-2,2))
  16759. $52sa5 := %zpgb5[random(0,719)]
  16760. $aaf4s := get_control_par(get_ui_id($aaf4s),$CONTROL_PAR_DEFAULT_VALUE)
  16761. $sddk3 := random(-100,100)
  16762. $nplew := %zpgb5[random(0,719)]
  16763. $nwl2v := random(100000,525000)
  16764. $pk0h4 := random(-$nwl2v+100000,525000-$nwl2v)
  16765. $u2ki4 := %zpgb5[random(0,719)]
  16766. $wfiom := random(100000,525000)
  16767. $0hnr5 := random(-$wfiom+100000,637500-$wfiom)
  16768. $tmtfv := %zpgb5[random(0,719)]
  16769. $k21jk := random(0,1)
  16770. $eai4d := random(0,500)
  16771. $3zolj := random(-$eai4d,1000-$eai4d)
  16772. $r3d0o := %zpgb5[random(0,719)]
  16773. if ($k21jk=0)
  16774. $r0khx := random($eai4d+($r0khx/10),1000)
  16775. $yl1h5 := random(-$r0khx+(($eai4d+10)*(1+sh_right($eai4d+10-($eai4d+$3zolj),31))-(($eai4d+$3zolj)*sh_right($eai4d+10-($eai4d+$3zolj),31))),1000-$r0khx)
  16776. else
  16777. $r0khx := random(25,800)
  16778. $yl1h5 := random(-$r0khx+10,1000-$eai4d-$r0khx)
  16779. end if
  16780. $yqtdo := %zpgb5[random(0,719)]
  16781. $qwf1w := 25
  16782. $ppaoe := random(%aebtw[1],%hgu5c[1])
  16783. $ork5f := random(200,%hgu5c[2])
  16784. $dg3qf := random(%aebtw[3],%hgu5c[3])
  16785. $p3vhn := random(%aebtw[4],4000)
  16786. $y1mc2 := random(1,8)
  16787. call RAND__update_ui_after_randomization
  16788. if ($n4ppl=1)
  16789. call prepare_purge
  16790. $rlfxd := 0
  16791. while ($rlfxd<$NUM_GROUPS)
  16792. purge_group($rlfxd,%tuuuf[$rlfxd])
  16793. inc($rlfxd)
  16794. end while
  16795. call update_all_WF_for_default_key
  16796. end if
  16797. end on
  16798. on ui_control($r2b4a)
  16799. $r2b4a := 0
  16800. $n4ppl := $y2kih
  16801. if ($n4ppl=1)
  16802. $cm312 := 1
  16803. set_control_par_str(get_ui_id($ojlo0),$CONTROL_PAR_TEXT,"User Snapshot")
  16804. $zor2m := 1
  16805. if (%xeyhi[$zor2m]=0)
  16806. call BRW__apply_mask_to_search_pool_for_sel_file_type
  16807. end if
  16808. $dyt1q := 100
  16809. while ($dyt1q=100)
  16810. $dyt1q := %3owef[500+random(0,%k4yha[1]-1)]
  16811. end while
  16812. $hdmk1 := %BRW__grp_remap[$dyt1q]
  16813. end if
  16814. $t4vew := 1
  16815. $ruhe4 := -sh_right(40-random(1,100),31)
  16816. $q0o5r := random(1,3)
  16817. $0erls := random(0,9)
  16818. $2v40q := random(0,1)
  16819. $k5z4u := real_to_int(pow(2.0,int_to_real(random(2,4))))--sh_right(90-random(0,100),31)
  16820. $ius2b := random(550000,800000)
  16821. $3rksw := random(500,650)
  16822. $q0rb2 := random(600,1200)
  16823. $1ybzi := random(-$ius2b+550000,800000-$ius2b)*-sh_right(92-random(0,100),31)
  16824. $qbhb5 := random(-$3rksw+475,760-$3rksw)*-sh_right(90-random(0,100),31)
  16825. $qb5xv := random(-$q0rb2+1,1200-$q0rb2)
  16826. $rpaco := %ludky[random(0,689)]
  16827. $m5sxk := %ludky[random(0,689)]
  16828. $0vs3i := %ludky[random(0,689)]
  16829. $y3mgr := 0
  16830. while ($y3mgr<$k5z4u)
  16831. %pyeoz[$y3mgr] := random(0,127)*-sh_right(25+(20*($y3mgr mod 2))-random(0,100),31)
  16832. %0lu1d[$y3mgr] := random(0,2400)
  16833. inc($y3mgr)
  16834. end while
  16835. call ARP__on_mode_changed
  16836. call ARP__update_step_dur_display
  16837. $l2tv1 := $l2tv1
  16838. $zv33b := random(-$l2tv1+600,1000-$l2tv1)
  16839. $dbgkf := %zpgb5[random(0,719)]
  16840. $c21kk := 1200*random(-1,1)*-sh_right(80-random(1,100),31)
  16841. $dyt1q := -sh_right(60-random(1,100),31)
  16842. $eg3kt := 1200*random(-2,2)*$dyt1q+(random(-100,100)*(($dyt1q+1) mod 2))
  16843. $2vyff := %zpgb5[random(0,719)]
  16844. $uvcxk := 12*random(-1,1)*-sh_right(60-random(1,100),31)
  16845. $ia54c := 12*random(-2,2)*-sh_right(80-random(1,100),31)
  16846. $wh1ke := %zpgb5[random(0,719)]
  16847. $dgu14 := random(0,3333)
  16848. $5l3um := random(-$dgu14,10000-$dgu14)
  16849. $f4o1c := %zpgb5[random(0,719)]
  16850. $h11uu := get_control_par(get_ui_id($h11uu),$CONTROL_PAR_DEFAULT_VALUE)
  16851. $rgoik := random(-$h11uu+($h11uu*70/100),$h11uu*110/100-$h11uu)
  16852. $1xnyu := %ludky[random(0,689)]
  16853. $u51dh := random(100,%hgu5c[5]*($ruhe4*60+((.not. $ruhe4 .and. 1)*85))/100)
  16854. $2d1qh := random(300000,700000)
  16855. $2qveo := random(0,%hgu5c[6])
  16856. $fjnu3 := random(0,%hgu5c[7])
  16857. $tz115 := random(%hgu5c[8]*20/100,%hgu5c[8]*($ruhe4*50+((.not. $ruhe4 .and. 1)*85))/100)
  16858. $az3wx := random(100,%hgu5c[10]*($ruhe4*60+((.not. $ruhe4 .and. 1)*85))/100)
  16859. $ki4hc := random(0,%hgu5c[11])
  16860. $y4fhf := random(0,%hgu5c[12])
  16861. $cfneg := random(%hgu5c[13]*20/100,%hgu5c[13]*85/100)
  16862. $lk05f := random(0,1)
  16863. $2qtv2 := %p41k2[random(0,28)]
  16864. $ufbsw := random(0,1000000)
  16865. $3s02f := random(-$ufbsw,1000000-$ufbsw)
  16866. $3rcax := %ludky[random(0,689)]*(($ruhe4+1) mod 2)+(%zpgb5[random(0,719)]*((($ruhe4+1) mod 2+1) mod 2))
  16867. $maq5o := random(0,1000000)
  16868. $410y5 := random(-$maq5o,800000-$maq5o)
  16869. $5qrmj := %ludky[random(0,689)]*(($ruhe4+1) mod 2)+(%zpgb5[random(0,719)]*((($ruhe4+1) mod 2+1) mod 2))
  16870. $lqoqt := random(0,1000000)
  16871. $begpw := random(-$lqoqt,1000000-$lqoqt)
  16872. $f0ljx := %ludky[random(0,689)]*(($ruhe4+1) mod 2)+(%zpgb5[random(0,719)]*((($ruhe4+1) mod 2+1) mod 2))
  16873. $zqnbc := random(-1000000,1000000)
  16874. $llm0i := random(-$zqnbc+-1000000,1000000-$zqnbc)
  16875. $5m5qp := %ludky[random(0,689)]*(($ruhe4+1) mod 2)+(%zpgb5[random(0,719)]*((($ruhe4+1) mod 2+1) mod 2))
  16876. call on_selected_std_group_changed
  16877. call RAND__update_ui_after_randomization
  16878. if ($n4ppl=1)
  16879. call prepare_purge
  16880. $rlfxd := 0
  16881. while ($rlfxd<$NUM_GROUPS)
  16882. purge_group($rlfxd,%tuuuf[$rlfxd])
  16883. inc($rlfxd)
  16884. end while
  16885. call update_all_WF_for_default_key
  16886. end if
  16887. end on
  16888. on ui_control($dafnz)
  16889. $dafnz := 0
  16890. $n4ppl := get_control_par(get_ui_id($dafnz),$CONTROL_PAR_KEY_ALT)
  16891. if ($n4ppl=0)
  16892. $zktrd := random(1,1500)
  16893. $2zugt := random(-$zktrd+1,1500-$zktrd)
  16894. $vas4o := %zpgb5[random(0,719)]
  16895. $doz2m := random(0,7)
  16896. $e2mne := random(0,4)
  16897. $l4ujc := random(0,9)/9
  16898. $sseum := random(1,1500)
  16899. $bi544 := random(-$sseum+1,1500-$sseum)
  16900. $y3s33 := %zpgb5[random(0,719)]
  16901. $1wrdd := random(0,7)
  16902. $eu0kx := random(0,4)
  16903. $x02cl := random(0,9)/9
  16904. $3tqoo := random(-1000,1000)
  16905. $yexen := random(-$3tqoo+-1000,1000-$3tqoo)
  16906. $zi2jx := %zpgb5[random(0,719)]
  16907. $1fo5x := %zpgb5[random(0,719)]
  16908. $1tszb := random(-1000,1000)
  16909. $v1jgb := random(-$1tszb+-1000,1000-$1tszb)
  16910. $gxopj := %zpgb5[random(0,719)]
  16911. $z1x5e := %zpgb5[random(0,719)]
  16912. $3k3u2 := random(0,1)
  16913. $13ap0 := random(0,1)
  16914. $gehcz := random(-1000,1000)
  16915. $0qzrr := random(-1000,1000)
  16916. $ihtwl := random(-1000,1000)
  16917. $pzeed := random(-1000,1000)
  16918. $ytzwi := random(0,17)
  16919. $gllpo := %zdvxw[random(0,9)]
  16920. $cvjhr := %zpgb5[random(0,719)]
  16921. $f3u5d := random(0,17)
  16922. $hn35i := %zdvxw[random(0,9)]
  16923. $fpvgj := %zpgb5[random(0,719)]
  16924. $dyt1q := random(0,999)
  16925. $fg4rw := 0
  16926. while ($fg4rw<128)
  16927. $dyt1q := $dyt1q+random(-250,250)
  16928. $dyt1q := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
  16929. %w0xec[$fg4rw] := $dyt1q
  16930. inc($fg4rw)
  16931. end while
  16932. $dyt1q := random(0,999)
  16933. $fg4rw := 0
  16934. while ($fg4rw<128)
  16935. $dyt1q := $dyt1q+random(-250,250)
  16936. $dyt1q := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
  16937. %rzzs4[$fg4rw] := $dyt1q
  16938. inc($fg4rw)
  16939. end while
  16940. else
  16941. $zktrd := get_control_par(get_ui_id($zktrd),$CONTROL_PAR_DEFAULT_VALUE)
  16942. $2zugt := 0
  16943. $vas4o := 0
  16944. $doz2m := 0
  16945. $e2mne := get_control_par(get_ui_id($e2mne),$CONTROL_PAR_DEFAULT_VALUE)
  16946. $l4ujc := 0
  16947. $sseum := get_control_par(get_ui_id($sseum),$CONTROL_PAR_DEFAULT_VALUE)
  16948. $bi544 := 0
  16949. $y3s33 := 0
  16950. $1wrdd := 0
  16951. $eu0kx := get_control_par(get_ui_id($eu0kx),$CONTROL_PAR_DEFAULT_VALUE)
  16952. $x02cl := 0
  16953. $3tqoo := get_control_par(get_ui_id($3tqoo),$CONTROL_PAR_DEFAULT_VALUE)
  16954. $yexen := 0
  16955. $zi2jx := 0
  16956. $1fo5x := 0
  16957. $1tszb := get_control_par(get_ui_id($1tszb),$CONTROL_PAR_DEFAULT_VALUE)
  16958. $v1jgb := 0
  16959. $gxopj := 0
  16960. $z1x5e := 0
  16961. $3k3u2 := get_control_par(get_ui_id($3k3u2),$CONTROL_PAR_DEFAULT_VALUE)
  16962. $13ap0 := get_control_par(get_ui_id($13ap0),$CONTROL_PAR_DEFAULT_VALUE)
  16963. $gehcz := random(-1000,1000)
  16964. $0qzrr := random(-1000,1000)
  16965. $ihtwl := random(-1000,1000)
  16966. $pzeed := random(-1000,1000)
  16967. $ytzwi := 0
  16968. $gllpo := 64
  16969. $cvjhr := 0
  16970. $f3u5d := 0
  16971. $hn35i := 64
  16972. $fpvgj := 0
  16973. $dyt1q := random(0,999)
  16974. $fg4rw := 0
  16975. while ($fg4rw<$gllpo)
  16976. %w0xec[$fg4rw] := $fg4rw*1000/$gllpo
  16977. %rzzs4[$fg4rw] := $fg4rw*1000/$hn35i
  16978. inc($fg4rw)
  16979. end while
  16980. end if
  16981. call update_ui_after_preset_reload
  16982. end on
  16983. on ui_control($ecodz)
  16984. $0ib2k := 1
  16985. call NAV_PAGE__update_main_nav
  16986. end on
  16987. on ui_control($nd04g)
  16988. $0ib2k := 2
  16989. call NAV_PAGE__update_main_nav
  16990. end on
  16991. on ui_control($0erls)
  16992. call ARP__on_mode_changed
  16993. end on
  16994. on ui_control($h2jke)
  16995. $0erls := $h2jke
  16996. call ARP__on_mode_changed
  16997. end on
  16998. on ui_control($k5z4u)
  16999. call ARP__update_seq_tables
  17000. set_control_par_str(get_ui_id($k5z4u),$CONTROL_PAR_LABEL,$k5z4u)
  17001. end on
  17002. on ui_control($ivqya)
  17003. call ARP__update_table_display
  17004. end on
  17005. on ui_control($zkud4)
  17006. $zkud4 := 0
  17007. $wg0d2 := 1+(get_control_par(get_ui_id($zkud4),$CONTROL_PAR_KEY_SHIFT)*3)
  17008. call ARP__shift_tables
  17009. end on
  17010. on ui_control($t2fpk)
  17011. $t2fpk := 0
  17012. $wg0d2 := -1-(get_control_par(get_ui_id($t2fpk),$CONTROL_PAR_KEY_SHIFT)*3)
  17013. call ARP__shift_tables
  17014. end on
  17015. on ui_control($hvmxr)
  17016. $hvmxr := 0
  17017. $ojboo := ($ojboo+15-1) mod 15
  17018. wait_async(load_array_str(%arp__preset_vals,@ichwi & "ARP/" & $ojboo & ".nka"))
  17019. call ARP__restore_from_preset_buffer
  17020. call ARP__on_mode_changed
  17021. call ARP__update_seq_tables
  17022. call ARP__update_mod_knob_ui
  17023. call ARP__update_all_automation_labels
  17024. end on
  17025. on ui_control($kbuvs)
  17026. $kbuvs := 0
  17027. $ojboo := ($ojboo+1) mod 15
  17028. wait_async(load_array_str(%arp__preset_vals,@ichwi & "ARP/" & $ojboo & ".nka"))
  17029. call ARP__restore_from_preset_buffer
  17030. call ARP__on_mode_changed
  17031. call ARP__update_seq_tables
  17032. call ARP__update_mod_knob_ui
  17033. call ARP__update_all_automation_labels
  17034. end on
  17035. on ui_control($ojboo)
  17036. wait_async(load_array_str(%arp__preset_vals,@ichwi & "ARP/" & $ojboo & ".nka"))
  17037. call ARP__restore_from_preset_buffer
  17038. call ARP__on_mode_changed
  17039. call ARP__update_seq_tables
  17040. call ARP__update_mod_knob_ui
  17041. call ARP__update_all_automation_labels
  17042. end on
  17043. on ui_control($q0o5r)
  17044. set_control_par_str(get_ui_id($q0o5r),$CONTROL_PAR_LABEL,$q0o5r)
  17045. end on
  17046. on ui_control($1p3ww)
  17047. $q0o5r := $q0o5r+1-(-sh_right(4-($q0o5r+1),31)*($q0o5r+1-4))
  17048. set_control_par_str(get_ui_id($q0o5r),$CONTROL_PAR_LABEL,$q0o5r)
  17049. end on
  17050. on ui_control($5dkam)
  17051. $q0o5r := $q0o5r-1+(-sh_right($q0o5r-1-1,31)*(1-($q0o5r-1)))
  17052. set_control_par_str(get_ui_id($q0o5r),$CONTROL_PAR_LABEL,$q0o5r)
  17053. end on
  17054. on ui_control($en0xw)
  17055. $dyt1q := (($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))-1+(-sh_right((($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))-1-0,31)*(0-((($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))-1)))
  17056. call seq__on_step_dur_btn_for_h
  17057. end on
  17058. on ui_control($4tx2f)
  17059. $dyt1q := (($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12)*(1+(sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31) .or. sh_right(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12-0,31)))-0-(12*sh_right(12-(($ius2b+($1ybzi*%ppvim[$rpaco]/1000)-0)*-12/1000000+12),31))+1
  17060. call seq__on_step_dur_btn_for_h
  17061. end on
  17062. on ui_control($ruhe4)
  17063. call ARP__update_filter_src_menus
  17064. end on
  17065. on ui_control($lh5xo)
  17066. select ($lh5xo)
  17067. case 0
  17068. $y3mgr := 0
  17069. while ($y3mgr<32)
  17070. %0lu1d[$y3mgr] := %pyeoz[$y3mgr]*2400/127
  17071. inc($y3mgr)
  17072. end while
  17073. $ivqya := 1
  17074. case 1
  17075. $y3mgr := 0
  17076. while ($y3mgr<32)
  17077. %pyeoz[$y3mgr] := %0lu1d[$y3mgr]*127/2400
  17078. inc($y3mgr)
  17079. end while
  17080. $ivqya := 0
  17081. case 2
  17082. if ($k5z4u*2<=32)
  17083. $y3mgr := 0
  17084. while ($y3mgr<32)
  17085. %nr1qo[$y3mgr] := %pyeoz[$y3mgr]
  17086. %pyeoz[$y3mgr] := 0
  17087. inc($y3mgr)
  17088. end while
  17089. $y3mgr := 0
  17090. while ($y3mgr<$k5z4u)
  17091. %pyeoz[$y3mgr*2] := %nr1qo[$y3mgr]
  17092. %pyeoz[$y3mgr*2+1] := %nr1qo[$y3mgr]
  17093. inc($y3mgr)
  17094. end while
  17095. $y3mgr := 0
  17096. while ($y3mgr<32)
  17097. %nr1qo[$y3mgr] := %0lu1d[$y3mgr]
  17098. %0lu1d[$y3mgr] := 0
  17099. inc($y3mgr)
  17100. end while
  17101. $y3mgr := 0
  17102. while ($y3mgr<$k5z4u)
  17103. %0lu1d[$y3mgr*2] := %nr1qo[$y3mgr]
  17104. %0lu1d[$y3mgr*2+1] := %nr1qo[$y3mgr]
  17105. inc($y3mgr)
  17106. end while
  17107. $k5z4u := $k5z4u*2
  17108. else
  17109. $3pvid := 1
  17110. call update_modal_dialog_lbl
  17111. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Sorry, the sequence can not be doubled.")
  17112. end if
  17113. case 3
  17114. if ($k5z4u>2)
  17115. $y3mgr := 0
  17116. while ($y3mgr<32)
  17117. %nr1qo[$y3mgr] := %pyeoz[$y3mgr]
  17118. %pyeoz[$y3mgr] := 0
  17119. inc($y3mgr)
  17120. end while
  17121. $y3mgr := 0
  17122. while ($y3mgr<$k5z4u)
  17123. %pyeoz[$y3mgr/2] := %nr1qo[$y3mgr]
  17124. $y3mgr := $y3mgr+2
  17125. end while
  17126. $y3mgr := 0
  17127. while ($y3mgr<32)
  17128. %nr1qo[$y3mgr] := %0lu1d[$y3mgr]
  17129. %0lu1d[$y3mgr] := 0
  17130. inc($y3mgr)
  17131. end while
  17132. $y3mgr := 0
  17133. while ($y3mgr<$k5z4u)
  17134. %0lu1d[$y3mgr/2] := %nr1qo[$y3mgr]
  17135. $y3mgr := $y3mgr+2
  17136. end while
  17137. $k5z4u := $k5z4u/2
  17138. else
  17139. $3pvid := 1
  17140. call update_modal_dialog_lbl
  17141. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Sorry, the sequence can not be halfend.")
  17142. end if
  17143. case 4
  17144. $y3mgr := 0
  17145. while ($y3mgr<$k5z4u)
  17146. if (sh_left(1,$ivqya) .and. 1=1)
  17147. %pyeoz[$y3mgr] := random(0,127)*-sh_right(25+(20*($y3mgr mod 2))-random(0,100),31)
  17148. end if
  17149. if (sh_right(sh_left(1,$ivqya),1) .and. 1=1)
  17150. %0lu1d[$y3mgr] := random(0,2400)
  17151. end if
  17152. inc($y3mgr)
  17153. end while
  17154. case 6
  17155. $y3mgr := 0
  17156. while ($y3mgr<$k5z4u)
  17157. if ($ivqya=0)
  17158. $dyt1q := random(-20,20)
  17159. %pyeoz[$y3mgr] := ((%pyeoz[$y3mgr]+$dyt1q)*(1+(sh_right(127-(%pyeoz[$y3mgr]+$dyt1q),31) .or. sh_right(%pyeoz[$y3mgr]+$dyt1q-0,31)))-0-(127*sh_right(127-(%pyeoz[$y3mgr]+$dyt1q),31)))*-sh_right(0-%pyeoz[$y3mgr],31)
  17160. else
  17161. $dyt1q := random(-288,288)
  17162. %0lu1d[$y3mgr] := ((%0lu1d[$y3mgr]+$dyt1q)*(1+(sh_right(2400-(%0lu1d[$y3mgr]+$dyt1q),31) .or. sh_right(%0lu1d[$y3mgr]+$dyt1q-0,31)))-0-(2400*sh_right(2400-(%0lu1d[$y3mgr]+$dyt1q),31)))*-sh_right(0-%0lu1d[$y3mgr],31)
  17163. end if
  17164. inc($y3mgr)
  17165. end while
  17166. case 5
  17167. if ($k5z4u*2<=32)
  17168. $y3mgr := 0
  17169. while ($y3mgr<$k5z4u)
  17170. %0lu1d[$k5z4u+$y3mgr] := %0lu1d[$y3mgr]
  17171. %pyeoz[$k5z4u+$y3mgr] := %pyeoz[$y3mgr]
  17172. inc($y3mgr)
  17173. end while
  17174. $k5z4u := $k5z4u*2
  17175. else
  17176. $3pvid := 1
  17177. call update_modal_dialog_lbl
  17178. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Sorry, the sequence can not be doubled.")
  17179. end if
  17180. end select
  17181. call ARP__update_table_display
  17182. end on
  17183. on persistence_changed
  17184. if ($b4lv0=43)
  17185. %jj5qi[2] := %BRW__snapshot_remap_v43[%jj5qi[2]]
  17186. end if
  17187. if ($b4lv0=44)
  17188. %jj5qi[2] := %BRW__snapshot_remap_v44[%jj5qi[2]]
  17189. end if
  17190. call convert_preset_data_to_current_version
  17191. $fg4rw := 0
  17192. while ($fg4rw<10)
  17193. %dz3eb[$fg4rw] := 0
  17194. set_control_par(%kte0r[$fg4rw],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  17195. inc($fg4rw)
  17196. end while
  17197. $0e0hy := 0
  17198. inc($4l4u3)
  17199. if (-sh_right(1-$4l4u3,31)=1)
  17200. if ($51oxm=263)
  17201. wait_async(set_sample(%NI_USER_ZONE_IDS[0],@4xudw))
  17202. $lxku3 := -sh_right(abs(get_sample_length(%NI_USER_ZONE_IDS[0])-0)-1,31)
  17203. if ($lxku3=0)
  17204. wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_ROOT_KEY,$aewcf))
  17205. wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_TUNE,real_to_int(~spjzv)))
  17206. wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_VOLUME,real_to_int(-~fbacu*100.0)))
  17207. end if
  17208. end if
  17209. if ($hdmk1=364)
  17210. wait_async(set_sample(%NI_USER_ZONE_IDS[1],@g233i))
  17211. $x1spm := -sh_right(abs(get_sample_length(%NI_USER_ZONE_IDS[1])-0)-1,31)
  17212. if ($x1spm=0)
  17213. wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_ROOT_KEY,$v3y5j))
  17214. wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_TUNE,real_to_int(~qzdh0)))
  17215. wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_VOLUME,real_to_int(-~rhrbs*100.0)))
  17216. end if
  17217. end if
  17218. else
  17219. $lxku3 := 0
  17220. if (get_sample_length(%NI_USER_ZONE_IDS[0]) # 0)
  17221. wait_async(detect_sample_type(%NI_USER_ZONE_IDS[0],$dyt1q))
  17222. if ($dyt1q=-1)
  17223. $lxku3 := 1
  17224. end if
  17225. end if
  17226. $x1spm := 0
  17227. if (get_sample_length(%NI_USER_ZONE_IDS[1]) # 0)
  17228. wait_async(detect_sample_type(%NI_USER_ZONE_IDS[1],$dyt1q))
  17229. if ($dyt1q=-1)
  17230. $x1spm := 1
  17231. end if
  17232. end if
  17233. end if
  17234. %smp_l_grp[263] := get_sample_length(%NI_USER_ZONE_IDS[0])/1000
  17235. %std_smp_l_grp[364] := get_sample_length(%NI_USER_ZONE_IDS[1])/1000
  17236. if ($51oxm=263)
  17237. call update_rootkey_array_for_g_user_sample
  17238. end if
  17239. wait_async(load_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka"))
  17240. $knxce := 0
  17241. while ($knxce<3)
  17242. $zor2m := $knxce
  17243. call BRW__apply_mask_to_search_pool_for_sel_file_type
  17244. inc($knxce)
  17245. end while
  17246. $k240z := 0
  17247. call update_ui_after_preset_reload
  17248. call prepare_purge
  17249. $rlfxd := 0
  17250. while ($rlfxd<$NUM_GROUPS)
  17251. purge_group($rlfxd,%tuuuf[$rlfxd])
  17252. inc($rlfxd)
  17253. end while
  17254. call update_all_WF_for_default_key
  17255. end on
  17256. on listener
  17257. select ($NI_SIGNAL_TYPE)
  17258. case $NI_SIGNAL_TIMER_BEAT
  17259. call stepper_on_listener_set_modulation
  17260. $jdgl1 := 0
  17261. while ($jdgl1<num_elements(%pv2ax))
  17262. $gpzoi := %pv2ax[$jdgl1]
  17263. call _reset_mod_knob_label_for_gl_m_id
  17264. inc($jdgl1)
  17265. end while
  17266. $4djds := 0
  17267. while ($4djds<26)
  17268. if (%qdiwi[$4djds]>0 and ($ENGINE_UPTIME-%qdiwi[$4djds]>=700))
  17269. if (%ipim0[$4djds]>=75 and (%ipim0[$4djds]<=113) or in_range(%ipim0[$4djds],31,33) or in_range(%ipim0[$4djds],114,116) or in_range(%ipim0[$4djds],120,122))
  17270. set_control_par_str(%5comw[$4djds],$CONTROL_PAR_TEXT,"")
  17271. set_control_par_str(%5comw[$4djds],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_" & -sh_right(440-get_control_par(%5comw[$4djds],$CONTROL_PAR_POS_Y),31))
  17272. if (in_range(%ipim0[$4djds],31,33) or in_range(%ipim0[$4djds],114,116) or in_range(%ipim0[$4djds],120,122))
  17273. set_control_par(%5comw[$4djds],$CONTROL_PAR_PICTURE_STATE,search(%cz2mn,%i5z0e[$4djds])+106)
  17274. else
  17275. set_control_par(%5comw[$4djds],$CONTROL_PAR_PICTURE_STATE,(1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%c40o1[$4djds])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])])-$EFFECT_TYPE_FILTER)-1,31))*(%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%c40o1[$4djds])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])])]]+((%ipim0[$4djds]-75) mod 3))+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[search(%zjgrf,%c40o1[$4djds])]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])])-$EFFECT_TYPE_FILTER)-1,31)*(%5gftk[3*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[search(%zjgrf,%c40o1[$4djds])],%bjbtn[$4djds],%zjgrf[search(%zjgrf,%c40o1[$4djds])])))))+((%ipim0[$4djds]-75) mod 3)]+106)))
  17276. end if
  17277. else
  17278. set_control_par(%5comw[$4djds],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  17279. end if
  17280. %qdiwi[$4djds] := 0
  17281. end if
  17282. inc($4djds)
  17283. end while
  17284. $jdgl1 := 0
  17285. while ($jdgl1<num_elements(%3xxkk))
  17286. $gpzoi := %3xxkk[$jdgl1]
  17287. if (%gmios[$gpzoi]>0 and ($ENGINE_UPTIME-%gmios[$gpzoi]>=700))
  17288. if ($gpzoi=0 or ($gpzoi=2))
  17289. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_TEXT,"")
  17290. set_control_par_str(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE,"GE_FX_KNOB_LABELS_V1_6_" & -sh_right(440-get_control_par(%vvlef[$gpzoi],$CONTROL_PAR_POS_Y),31))
  17291. set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_PICTURE_STATE,3)
  17292. else
  17293. if ($gpzoi=25)
  17294. call update_g_rng_max_label
  17295. else
  17296. set_control_par(%vvlef[$gpzoi],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  17297. end if
  17298. end if
  17299. %gmios[$gpzoi] := 0
  17300. end if
  17301. inc($jdgl1)
  17302. end while
  17303. case $NI_SIGNAL_TIMER_MS
  17304. if ($afnek # -1)
  17305. if ($PLAYED_VOICES_INST # 0)
  17306. $afnek := 1
  17307. $1sqif := $ENGINE_UPTIME
  17308. else
  17309. if ($ENGINE_UPTIME-$1sqif<8000)
  17310. $afnek := 1
  17311. else
  17312. $afnek := 0
  17313. end if
  17314. end if
  17315. if ($afnek=1)
  17316. call MOD__perform_cont_update
  17317. call LFO__update_phase
  17318. end if
  17319. end if
  17320. end select
  17321. end on
  17322. on note
  17323. ignore_event($EVENT_ID)
  17324. while ($oppog=1)
  17325. set_event_par($EVENT_ID,$EVENT_PAR_0,1000)
  17326. if ($NOTE_HELD=0)
  17327. exit
  17328. end if
  17329. wait(3000)
  17330. end while
  17331. if (%smp_l_grp[$51oxm]<=0 and ($uummz=0))
  17332. message("DEV_auto_smpl_len = 1 > Sample Map analysis running")
  17333. $uummz := 1
  17334. $wfzez := 2147483647
  17335. $tuwra := -2
  17336. $t1jz4 := 0
  17337. while ($t1jz4<=127)
  17338. $iz4ec := 0
  17339. while ($iz4ec<=12)
  17340. disallow_group($ALL_GROUPS)
  17341. $oxfyj := play_note($t1jz4,$iz4ec*10+5,0,0)
  17342. set_event_par_arr($oxfyj,$EVENT_PAR_ALLOW_GROUP,1,$51oxm+100)
  17343. set_event_par($oxfyj,$EVENT_PAR_0,-5)
  17344. change_vol($oxfyj,-144000,0)
  17345. wait(100)
  17346. $dyt1q := get_sample_length(get_event_par($oxfyj,$EVENT_PAR_ZONE_ID))/1000
  17347. fade_out($oxfyj,1,1)
  17348. if ($dyt1q # 0 and ($dyt1q<$wfzez))
  17349. $wfzez := $dyt1q
  17350. end if
  17351. if ($iz4ec=0)
  17352. if ($tuwra=get_event_par($oxfyj,$EVENT_PAR_ZONE_ID))
  17353. $iz4ec := 13
  17354. else
  17355. $tuwra := get_event_par($oxfyj,$EVENT_PAR_ZONE_ID)
  17356. end if
  17357. end if
  17358. inc($iz4ec)
  17359. end while
  17360. inc($t1jz4)
  17361. end while
  17362. if (%smp_l_grp[$51oxm] # $wfzez)
  17363. %smp_l_grp[$51oxm] := $wfzez
  17364. pgs_set_key_val(PGS_FUNC,0,0)
  17365. end if
  17366. $uummz := 0
  17367. end if
  17368. $gj552 := $ENGINE_UPTIME
  17369. %w1vde[%laljf[$EVENT_ID mod 8192]] := $ENGINE_UPTIME
  17370. set_event_par($EVENT_ID,$EVENT_PAR_3,0)
  17371. set_event_par($EVENT_ID,$EVENT_PAR_0,0)
  17372. $q2v0i := 0
  17373. $mkoi4 := 0
  17374. $t4gop := 1
  17375. $r5war := -1
  17376. $pfgf4 := $EVENT_ID
  17377. %0wsff[$EVENT_NOTE] := $EVENT_ID
  17378. inc($0e0hy)
  17379. if ($0e0hy=1)
  17380. $n0uzs := $EVENT_ID
  17381. $ma1nd := $ENGINE_UPTIME
  17382. $wmznm := 0
  17383. end if
  17384. call MOD__inc_POLY__count
  17385. %laljf[$EVENT_ID mod 8192] := $1bi4b
  17386. %5ggz3[$1bi4b] := $EVENT_ID
  17387. %w1vde[$1bi4b] := $ENGINE_UPTIME
  17388. %ilm5d[$1bi4b] := get_event_par($EVENT_ID,$EVENT_PAR_NOTE)
  17389. %c1kc4[$1bi4b] := get_event_par($EVENT_ID,$EVENT_PAR_VELOCITY)
  17390. %jnhix[$1bi4b] := 0
  17391. %gvnxp[$1bi4b] := get_event_par($EVENT_ID,$EVENT_PAR_MIDI_CHANNEL)
  17392. %z3n3e[%gvnxp[$1bi4b]] := $EVENT_ID
  17393. %oy5fa[$1bi4b] := random(0,1000)
  17394. select ($zdrta)
  17395. case 0
  17396. if ($0e0hy=1)
  17397. $y3puj := $EVENT_ID
  17398. end if
  17399. case 1
  17400. $y3puj := $EVENT_ID
  17401. case 2
  17402. if ($0e0hy=1 or ($EVENT_NOTE>$qbqpm))
  17403. $qbqpm := $EVENT_NOTE
  17404. $y3puj := $EVENT_ID
  17405. end if
  17406. case 3
  17407. if ($0e0hy=1 or ($EVENT_NOTE<$qbqpm))
  17408. $qbqpm := $EVENT_NOTE
  17409. $y3puj := $EVENT_ID
  17410. end if
  17411. end select
  17412. $meuyq := %laljf[$y3puj mod 8192]
  17413. $dc3zm := $y3puj
  17414. if ($0e0hy=1)
  17415. $zgcke := 0
  17416. $fojqp := 0
  17417. end if
  17418. %ppvim[11] := get_event_par($EVENT_ID,$EVENT_PAR_VELOCITY)*1000/127
  17419. $3yie0 := %laljf[$EVENT_ID mod 8192]
  17420. select ($e2mne)
  17421. case 0
  17422. ?lrdg1[$3yie0] := int_to_real(random(0,10000))/10000.0
  17423. ?2bxj3[$3yie0] := 0.0
  17424. %hqihq[$3yie0] := $ENGINE_UPTIME
  17425. case 1
  17426. if ($0e0hy=1 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -4))
  17427. $a2nqk := $3yie0
  17428. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  17429. ?2bxj3[$3yie0] := 0.0
  17430. %hqihq[$3yie0] := $ENGINE_UPTIME
  17431. else
  17432. ?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
  17433. ?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
  17434. %hqihq[$3yie0] := %hqihq[$a2nqk]
  17435. end if
  17436. case 2
  17437. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  17438. ?2bxj3[$3yie0] := 0.0
  17439. %hqihq[$3yie0] := $ENGINE_UPTIME
  17440. case 3
  17441. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  17442. ?2bxj3[$3yie0] := 0.0
  17443. %hqihq[$3yie0] := $ENGINE_UPTIME
  17444. case 4
  17445. if ($0e0hy=1 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -4))
  17446. $a2nqk := $3yie0
  17447. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  17448. ?2bxj3[$3yie0] := 0.0
  17449. %hqihq[$3yie0] := $ENGINE_UPTIME
  17450. else
  17451. ?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
  17452. ?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
  17453. %hqihq[$3yie0] := %hqihq[$a2nqk]
  17454. end if
  17455. end select
  17456. $3yie0 := %laljf[$EVENT_ID mod 8192]
  17457. select ($eu0kx)
  17458. case 0
  17459. ?pu5ib[$3yie0] := int_to_real(random(0,10000))/10000.0
  17460. ?p2rij[$3yie0] := 0.0
  17461. %qvhhl[$3yie0] := $ENGINE_UPTIME
  17462. case 1
  17463. if ($0e0hy=1 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -4))
  17464. $xpr4r := $3yie0
  17465. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  17466. ?p2rij[$3yie0] := 0.0
  17467. %qvhhl[$3yie0] := $ENGINE_UPTIME
  17468. else
  17469. ?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
  17470. ?p2rij[$3yie0] := ?p2rij[$xpr4r]
  17471. %qvhhl[$3yie0] := %qvhhl[$xpr4r]
  17472. end if
  17473. case 2
  17474. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  17475. ?p2rij[$3yie0] := 0.0
  17476. %qvhhl[$3yie0] := $ENGINE_UPTIME
  17477. case 3
  17478. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  17479. ?p2rij[$3yie0] := 0.0
  17480. %qvhhl[$3yie0] := $ENGINE_UPTIME
  17481. case 4
  17482. if ($0e0hy=1 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -4))
  17483. $xpr4r := $3yie0
  17484. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  17485. ?p2rij[$3yie0] := 0.0
  17486. %qvhhl[$3yie0] := $ENGINE_UPTIME
  17487. else
  17488. ?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
  17489. ?p2rij[$3yie0] := ?p2rij[$xpr4r]
  17490. %qvhhl[$3yie0] := %qvhhl[$xpr4r]
  17491. end if
  17492. end select
  17493. %ppvim[0] := real_to_int(?xy[0]*1000.0)
  17494. %ppvim[1] := real_to_int(?xy[1]*1000.0)
  17495. if ($oppog # 1)
  17496. call MOD__perform_full_update
  17497. end if
  17498. if ($t4vew=1 and ($hdmk1 # 364 or ($x1spm=0 and (get_sample_length(%NI_USER_ZONE_IDS[1]) # 0))))
  17499. disallow_group($ALL_GROUPS)
  17500. if ($ruhe4=1 and ($mcp2m=1))
  17501. $dyt1q := play_note($EVENT_NOTE,$EVENT_VELOCITY,0,1)
  17502. set_event_par($dyt1q,$EVENT_PAR_0,-3)
  17503. set_event_par($dyt1q,$EVENT_PAR_1,$EVENT_ID)
  17504. set_event_par_arr($EVENT_ID,$EVENT_PAR_CUSTOM,1,4)
  17505. else
  17506. if ($mcp2m=1 or ($mcp2m=0 and ($0e0hy=1)))
  17507. $dyt1q := ($dgu14+($5l3um*%ppvim[$f4o1c]/1000))*%std_smp_l_grp[$hdmk1]/10000
  17508. $dyt1q := ($dyt1q*(1+(sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-((%std_smp_l_grp[$hdmk1]-5)*sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31)))*1000
  17509. $t1jz4 := (.not. -sh_right(abs($mcp2m-0)-1,31) .and. 1)*-1
  17510. if ($dyo2q=1)
  17511. $r0pwv := $EVENT_NOTE+$uvcxk+($ia54c*%ppvim[$wh1ke]/1000)
  17512. $r0pwv := $r0pwv*(1+(sh_right(127-$r0pwv,31) .or. sh_right($r0pwv-0,31)))-0-(127*sh_right(127-$r0pwv,31))
  17513. $auli3 := play_note($r0pwv,$EVENT_VELOCITY,$dyt1q,$t1jz4)
  17514. else
  17515. $auli3 := play_note(60+$uvcxk+($ia54c*%ppvim[$wh1ke]/1000),$EVENT_VELOCITY,$dyt1q,$t1jz4)
  17516. end if
  17517. %hrm2k[$fijbx] := $auli3
  17518. %k0ra5[$fijbx] := $EVENT_ID
  17519. %asdef[$1bi4b] := $auli3
  17520. $fijbx := ($fijbx+1) mod num_elements(%hrm2k)
  17521. set_event_par($auli3,$EVENT_PAR_0,-2)
  17522. set_event_par($auli3,$EVENT_PAR_2,$EVENT_NOTE)
  17523. set_event_par_arr($auli3,$EVENT_PAR_ALLOW_GROUP,1,$hdmk1)
  17524. if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE)
  17525. $gpzoi := 23
  17526. $dc3zm := $EVENT_ID
  17527. $1il5i := %3hbq2[$gpzoi]-1
  17528. while ($1il5i>=0)
  17529. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  17530. select (%q4rwz[20*$gpzoi+$1il5i])
  17531. case 2
  17532. call SHP1__update_mod_vals
  17533. case 3
  17534. call SHP2__update_mod_vals
  17535. case 4
  17536. call LFO1__update_mod_vals
  17537. case 5
  17538. call LFO2__update_mod_vals
  17539. case 6
  17540. call BUS1__update_mod_vals
  17541. case 7
  17542. call BUS2__update_mod_vals
  17543. case 8
  17544. call MTX__update_mod_vals
  17545. case 12
  17546. call NOTE_DURATION_POLY__update_mod_vals
  17547. case 10
  17548. call VELOCITY_POLY__update_mod_vals
  17549. case 13
  17550. call KEY_TRACK_POLY__update_mod_vals
  17551. case 18
  17552. call CONST_MOD__update_mod_vals
  17553. case 19
  17554. call REL_MOD__update_mod_vals
  17555. case 20
  17556. call ARP_MOD__update_mod_vals
  17557. case 9
  17558. call AFTERTOUCH__update_mod_vals
  17559. case 21
  17560. call MPE_SLIDE__update_mod_vals
  17561. case 22
  17562. call RANDOM__update_mod_vals
  17563. case 23
  17564. call ABS_CURSOR__update_mod_vals
  17565. end select
  17566. end if
  17567. dec($1il5i)
  17568. end while
  17569. $dyt1q := 127*($l2tv1+($zv33b*%ppvim[$dbgkf]/1000))/1000
  17570. change_vol($auli3,-real_to_int(60000.0-(?xpxzm[$dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))]*60000.0))-get_event_par($auli3,$EVENT_PAR_VOLUME),1)
  17571. if ($auli3=$auli3)
  17572. call _update_mod_knob_rt_indicator_for_gl_m_id
  17573. end if
  17574. $gpzoi := 28
  17575. $dc3zm := $EVENT_ID
  17576. $1il5i := %3hbq2[$gpzoi]-1
  17577. while ($1il5i>=0)
  17578. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  17579. select (%q4rwz[20*$gpzoi+$1il5i])
  17580. case 2
  17581. call SHP1__update_mod_vals
  17582. case 3
  17583. call SHP2__update_mod_vals
  17584. case 4
  17585. call LFO1__update_mod_vals
  17586. case 5
  17587. call LFO2__update_mod_vals
  17588. case 6
  17589. call BUS1__update_mod_vals
  17590. case 7
  17591. call BUS2__update_mod_vals
  17592. case 8
  17593. call MTX__update_mod_vals
  17594. case 12
  17595. call NOTE_DURATION_POLY__update_mod_vals
  17596. case 10
  17597. call VELOCITY_POLY__update_mod_vals
  17598. case 13
  17599. call KEY_TRACK_POLY__update_mod_vals
  17600. case 18
  17601. call CONST_MOD__update_mod_vals
  17602. case 19
  17603. call REL_MOD__update_mod_vals
  17604. case 20
  17605. call ARP_MOD__update_mod_vals
  17606. case 9
  17607. call AFTERTOUCH__update_mod_vals
  17608. case 21
  17609. call MPE_SLIDE__update_mod_vals
  17610. case 22
  17611. call RANDOM__update_mod_vals
  17612. case 23
  17613. call ABS_CURSOR__update_mod_vals
  17614. end select
  17615. end if
  17616. dec($1il5i)
  17617. end while
  17618. change_tune($auli3,($c21kk+($eg3kt*%ppvim[$2vyff]/1000))*1000+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[$EVENT_ID mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[$EVENT_ID mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),0)
  17619. if ($auli3=$auli3)
  17620. call _update_mod_knob_rt_indicator_for_gl_m_id
  17621. end if
  17622. if ($auli3=$auli3)
  17623. $gpzoi := 29
  17624. $dc3zm := $EVENT_ID
  17625. $1il5i := %3hbq2[$gpzoi]-1
  17626. while ($1il5i>=0)
  17627. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  17628. select (%q4rwz[20*$gpzoi+$1il5i])
  17629. case 2
  17630. call SHP1__update_mod_vals
  17631. case 3
  17632. call SHP2__update_mod_vals
  17633. case 4
  17634. call LFO1__update_mod_vals
  17635. case 5
  17636. call LFO2__update_mod_vals
  17637. case 6
  17638. call BUS1__update_mod_vals
  17639. case 7
  17640. call BUS2__update_mod_vals
  17641. case 8
  17642. call MTX__update_mod_vals
  17643. case 12
  17644. call NOTE_DURATION_POLY__update_mod_vals
  17645. case 10
  17646. call VELOCITY_POLY__update_mod_vals
  17647. case 13
  17648. call KEY_TRACK_POLY__update_mod_vals
  17649. case 18
  17650. call CONST_MOD__update_mod_vals
  17651. case 19
  17652. call REL_MOD__update_mod_vals
  17653. case 20
  17654. call ARP_MOD__update_mod_vals
  17655. case 9
  17656. call AFTERTOUCH__update_mod_vals
  17657. case 21
  17658. call MPE_SLIDE__update_mod_vals
  17659. case 22
  17660. call RANDOM__update_mod_vals
  17661. case 23
  17662. call ABS_CURSOR__update_mod_vals
  17663. end select
  17664. end if
  17665. dec($1il5i)
  17666. end while
  17667. call _update_mod_knob_rt_indicator_for_gl_m_id
  17668. $gpzoi := 30
  17669. $dc3zm := $EVENT_ID
  17670. $1il5i := %3hbq2[$gpzoi]-1
  17671. while ($1il5i>=0)
  17672. if (%q4rwz[20*$gpzoi+$1il5i]>=0)
  17673. select (%q4rwz[20*$gpzoi+$1il5i])
  17674. case 2
  17675. call SHP1__update_mod_vals
  17676. case 3
  17677. call SHP2__update_mod_vals
  17678. case 4
  17679. call LFO1__update_mod_vals
  17680. case 5
  17681. call LFO2__update_mod_vals
  17682. case 6
  17683. call BUS1__update_mod_vals
  17684. case 7
  17685. call BUS2__update_mod_vals
  17686. case 8
  17687. call MTX__update_mod_vals
  17688. case 12
  17689. call NOTE_DURATION_POLY__update_mod_vals
  17690. case 10
  17691. call VELOCITY_POLY__update_mod_vals
  17692. case 13
  17693. call KEY_TRACK_POLY__update_mod_vals
  17694. case 18
  17695. call CONST_MOD__update_mod_vals
  17696. case 19
  17697. call REL_MOD__update_mod_vals
  17698. case 20
  17699. call ARP_MOD__update_mod_vals
  17700. case 9
  17701. call AFTERTOUCH__update_mod_vals
  17702. case 21
  17703. call MPE_SLIDE__update_mod_vals
  17704. case 22
  17705. call RANDOM__update_mod_vals
  17706. case 23
  17707. call ABS_CURSOR__update_mod_vals
  17708. end select
  17709. end if
  17710. dec($1il5i)
  17711. end while
  17712. call _update_mod_knob_rt_indicator_for_gl_m_id
  17713. end if
  17714. end if
  17715. wait(1)
  17716. $a5fyp := get_event_par($auli3,$EVENT_PAR_ZONE_ID)
  17717. if ($a5fyp # $kzyw4 and ($a5fyp>0))
  17718. attach_zone($tmcuy,$a5fyp,0)
  17719. $kzyw4 := $a5fyp
  17720. call update_s_wf_start_indic_label_position
  17721. end if
  17722. end if
  17723. end if
  17724. end if
  17725. if ($spdyk=0)
  17726. $n0uzs := $EVENT_ID
  17727. exit
  17728. end if
  17729. if ($51oxm=263 and ($lxku3=1 or (get_sample_length(%NI_USER_ZONE_IDS[0])=0)))
  17730. exit
  17731. end if
  17732. inc($pdzso)
  17733. while ($pdzso>$y1mc2)
  17734. $dyt1q := 2147483647
  17735. $r0pwv := 2147483647
  17736. $hqjjl := -1
  17737. $gcqjr := -1
  17738. $y3mgr := 0
  17739. while ($y3mgr<16)
  17740. if (%mc3xd[$y3mgr] # 0)
  17741. if (get_event_par(%mc3xd[$y3mgr],$EVENT_PAR_0)=3)
  17742. if (%w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]<$dyt1q)
  17743. $dyt1q := %w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]
  17744. $hqjjl := $y3mgr
  17745. end if
  17746. else
  17747. if (%w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]<$r0pwv)
  17748. $r0pwv := %w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]
  17749. $gcqjr := $y3mgr
  17750. end if
  17751. end if
  17752. end if
  17753. inc($y3mgr)
  17754. end while
  17755. if ($iva44=1)
  17756. $r0pwv := 0
  17757. $y3mgr := 0
  17758. while ($y3mgr<$h3axx)
  17759. if (%w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]>$r0pwv and (get_event_par(%medyt[$y3mgr],$EVENT_PAR_3)=0))
  17760. $r0pwv := %w1vde[%laljf[%mc3xd[$y3mgr] mod 8192]]
  17761. $dyt1q := search(%mc3xd,%medyt[$y3mgr])
  17762. if ($dyt1q # -1)
  17763. $gcqjr := $dyt1q
  17764. end if
  17765. end if
  17766. inc($y3mgr)
  17767. end while
  17768. end if
  17769. if ($hqjjl # -1)
  17770. $r0pwv := $hqjjl
  17771. else
  17772. $r0pwv := $gcqjr
  17773. end if
  17774. set_event_par(%mc3xd[$r0pwv],$EVENT_PAR_3,1)
  17775. $dyt1q := %lx5kr[get_event_par(%mc3xd[$r0pwv],$EVENT_PAR_NOTE)]
  17776. if ($dyt1q # -1 and (%medyt[$dyt1q]=%mc3xd[$r0pwv]))
  17777. $tsm3s := $ENGINE_UPTIME
  17778. set_event_par(%mc3xd[$r0pwv],$EVENT_PAR_0,3)
  17779. else
  17780. note_off(%mc3xd[$r0pwv])
  17781. end if
  17782. %mc3xd[$r0pwv] := 0
  17783. dec($pdzso)
  17784. end while
  17785. %mc3xd[search(%mc3xd,0)] := $EVENT_ID
  17786. disallow_group($ALL_GROUPS)
  17787. if ($n0uzs # $EVENT_ID and ($xrt5z>=2))
  17788. if ($b1esx>$ENGINE_UPTIME)
  17789. if ($ENGINE_UPTIME-$ma1nd>15)
  17790. wait(($b1esx-$ENGINE_UPTIME)*1000)
  17791. end if
  17792. else
  17793. $dyt1q := abs(($b1esx-$ENGINE_UPTIME)/($y4ap3/10))+1
  17794. $dyt1q := ($b1esx+($dyt1q*($y4ap3/10))-$ENGINE_UPTIME)*1000
  17795. wait($dyt1q)
  17796. end if
  17797. end if
  17798. while (get_event_par($EVENT_ID,$EVENT_PAR_0)<4)
  17799. $ygbzd := $EVENT_ID
  17800. $dc3zm := $EVENT_ID
  17801. call update_all_poly_mod_paths
  17802. $jdgl1 := 0
  17803. while ($jdgl1<2)
  17804. $gpzoi := %ulgib[$jdgl1]
  17805. call set_mod_knob_group_engine_par_for_gl_m_id
  17806. inc($jdgl1)
  17807. end while
  17808. if ($p5wl1=0)
  17809. $y4ap3 := $bpkqt+($g345d*%ppvim[$3pyb3]/1000)+(-sh_right($bpkqt+($g345d*%ppvim[$3pyb3]/1000)-50,31)*(50-($bpkqt+($g345d*%ppvim[$3pyb3]/1000))))
  17810. else
  17811. call update_g_dis_sync_idx
  17812. if (?qedta[$gv5ha]>0.0)
  17813. $y4ap3 := real_to_int(int_to_real($DURATION_QUARTER)*?qedta[$gv5ha])/100
  17814. else
  17815. $y4ap3 := real_to_int(int_to_real($SIGNATURE_NUM*$DURATION_QUARTER*4/$SIGNATURE_DENOM)*-?qedta[$gv5ha])/100
  17816. end if
  17817. end if
  17818. $wuu5g := $51oxm+100
  17819. call calc_g_area_vars
  17820. if (get_event_par($EVENT_ID,$EVENT_PAR_0)<3)
  17821. $gm014 := $liaof+($5wlib*%ppvim[$eu2xe]/1000)
  17822. end if
  17823. if ($n0uzs=-1 or (event_status($n0uzs)=$EVENT_STATUS_INACTIVE))
  17824. $n0uzs := $EVENT_ID
  17825. end if
  17826. if ($xc3po=0 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3))
  17827. if ($ord01=0)
  17828. if ($linka=0)
  17829. if ($gj552=$ENGINE_UPTIME)
  17830. $jwx5k := 0
  17831. else
  17832. $jwx5k := $jwx5k+(($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$y4ap3/10)
  17833. end if
  17834. else
  17835. if ($gj552=$ENGINE_UPTIME)
  17836. call update_free_run_sync_start_vars
  17837. end if
  17838. call update_g_absl_cursor_pos_for_synced_progr
  17839. $jwx5k := $y1zim
  17840. end if
  17841. else
  17842. if ($EVENT_ID=$n0uzs)
  17843. if ($linka=0)
  17844. if ($gj552=$ENGINE_UPTIME)
  17845. $wmznm := 0
  17846. $jwx5k := 0
  17847. else
  17848. $wmznm := $jwx5k+(($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$y4ap3/10)
  17849. end if
  17850. else
  17851. call update_g_absl_cursor_pos_for_synced_progr
  17852. $wmznm := $y1zim
  17853. end if
  17854. else
  17855. $gj552 := $ma1nd
  17856. end if
  17857. $jwx5k := $wmznm
  17858. end if
  17859. $dyt1q := $i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))
  17860. if ($linka=0)
  17861. $whs1s := $i11wt*$gm014+(random(-$dyt1q,$dyt1q)/5)+$jwx5k
  17862. if ($neagb=0)
  17863. $mkoi4 := $wo1eq+($i11wt*$gm014)+$jwx5k
  17864. end if
  17865. else
  17866. $whs1s := $jwx5k+(random(-$dyt1q,$dyt1q)/5)
  17867. if ($neagb=0)
  17868. $mkoi4 := $wo1eq+$jwx5k
  17869. end if
  17870. end if
  17871. else
  17872. if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($va2lk # 0))
  17873. if ($linka=0)
  17874. if ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000)>=0)
  17875. $t4gop := $va2lk
  17876. else
  17877. $t4gop := -$va2lk
  17878. end if
  17879. else
  17880. $t4gop := $va2lk*((sh_right($f2ujt,31) .or. 1)/1)
  17881. end if
  17882. end if
  17883. if ($ord01=0 or ($xc3po=0))
  17884. if ($mkoi4=0)
  17885. $mkoi4 := $wo1eq+($i11wt*$gm014)
  17886. if ($linka=1)
  17887. call update_free_run_sync_start_vars
  17888. call update_g_absl_cursor_pos_for_synced_progr
  17889. $mkoi4 := $y1zim-$f2ujt
  17890. end if
  17891. else
  17892. if ($linka=0)
  17893. $f2ujt := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$y4ap3*$t4gop/10
  17894. $mkoi4 := $mkoi4+$f2ujt
  17895. else
  17896. call update_g_absl_cursor_pos_for_synced_progr
  17897. $mkoi4 := $y1zim
  17898. end if
  17899. end if
  17900. $dyt1q := $i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))
  17901. $whs1s := $mkoi4+(random(-$dyt1q,$dyt1q)/5)
  17902. else
  17903. if ($wmznm=0 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3))
  17904. $n0uzs := $EVENT_ID
  17905. $wmznm := $wo1eq+($i11wt*$gm014)
  17906. $mkoi4 := $wmznm
  17907. $hqznn := $t4gop
  17908. call update_free_run_sync_start_vars
  17909. else
  17910. if ($EVENT_ID=$n0uzs)
  17911. if ($linka=0)
  17912. $ottdr := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$y4ap3*$t4gop/10
  17913. $wmznm := $wmznm+$ottdr
  17914. else
  17915. if ($f2ujt=0)
  17916. $f2ujt := $ottdr
  17917. end if
  17918. call update_g_absl_cursor_pos_for_synced_progr
  17919. $wmznm := $y1zim
  17920. end if
  17921. $f2ujt := $ottdr
  17922. $mkoi4 := $wmznm
  17923. $hqznn := $t4gop
  17924. end if
  17925. end if
  17926. if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($EVENT_ID # $n0uzs))
  17927. if ($linka=0)
  17928. $f2ujt := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$y4ap3*$t4gop/10
  17929. $mkoi4 := $mkoi4+$f2ujt
  17930. else
  17931. if ($f2ujt=0)
  17932. $f2ujt := $ottdr
  17933. end if
  17934. call update_g_absl_cursor_pos_for_synced_progr
  17935. $mkoi4 := $y1zim
  17936. end if
  17937. else
  17938. $t4gop := $hqznn
  17939. $mkoi4 := $wmznm
  17940. end if
  17941. $dyt1q := $i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))
  17942. $whs1s := $mkoi4+(random(-$dyt1q,$dyt1q)/5)
  17943. end if
  17944. end if
  17945. if ($neagb=1)
  17946. if ($xc3po=0 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3))
  17947. if ($whs1s>0)
  17948. $whs1s := $whs1s/1000
  17949. else
  17950. $whs1s := $whs1s/1000+(($whs1s/1000/-($i11wt*2)+1)*($i11wt*2))
  17951. end if
  17952. $dyt1q := abs(abs($whs1s mod ($i11wt*2))-($i11wt*2-1))+-$i11wt
  17953. $t4gop := (sh_right($dyt1q,31) .or. 1)/1
  17954. $whs1s := ($i11wt-abs($whs1s mod ($i11wt*2)-$i11wt))*1000
  17955. $whs1s := $wo1eq+$whs1s
  17956. $mkoi4 := $whs1s
  17957. else
  17958. if ($ord01=0 or ($EVENT_ID=$n0uzs) or (get_event_par($EVENT_ID,$EVENT_PAR_0)=3))
  17959. if ($whs1s>$uiy0n)
  17960. if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($va2lk=1))
  17961. $whs1s := $uiy0n-random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
  17962. $mkoi4 := $whs1s
  17963. else
  17964. if ($linka=1)
  17965. $t4gop := -1*((sh_right($f2ujt,31) .or. 1)/1)
  17966. else
  17967. if ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000)>=0)
  17968. $t4gop := -1
  17969. else
  17970. $t4gop := 1
  17971. end if
  17972. end if
  17973. if ($ord01=0 or (get_event_par($EVENT_ID,$EVENT_PAR_0)=3))
  17974. if ($xc3po=1)
  17975. $mkoi4 := $mkoi4-(($whs1s-$uiy0n)/10)
  17976. else
  17977. $mkoi4 := $uiy0n-random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
  17978. end if
  17979. else
  17980. if ($xc3po=1)
  17981. $wmznm := $wmznm-(($whs1s-$uiy0n)/10)
  17982. else
  17983. $wmznm := $uiy0n-random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
  17984. end if
  17985. $mkoi4 := $wmznm
  17986. end if
  17987. end if
  17988. else
  17989. if ($whs1s<$wo1eq)
  17990. if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($va2lk=-1))
  17991. $whs1s := $wo1eq+random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
  17992. $mkoi4 := $whs1s
  17993. else
  17994. if ($linka=1)
  17995. $t4gop := (sh_right($f2ujt,31) .or. 1)/1
  17996. else
  17997. if ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000)<=0)
  17998. $t4gop := -1
  17999. else
  18000. $t4gop := 1
  18001. end if
  18002. end if
  18003. if ($ord01=0 or (get_event_par($EVENT_ID,$EVENT_PAR_0)=3))
  18004. $mkoi4 := $mkoi4+(($wo1eq-$whs1s)/10)
  18005. else
  18006. $wmznm := $wmznm+(($wo1eq-$whs1s)/10)
  18007. $mkoi4 := $wmznm
  18008. end if
  18009. end if
  18010. end if
  18011. end if
  18012. end if
  18013. end if
  18014. else
  18015. if ($xc3po=0 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3))
  18016. $whs1s := $wo1eq+$whs1s
  18017. end if
  18018. if ($whs1s>$uiy0n)
  18019. if ($xc3po=1)
  18020. if (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3 or (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($va2lk # -1)))
  18021. if ($linka=0)
  18022. $dyt1q := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$t4gop
  18023. else
  18024. $dyt1q := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000)--8000)/2*$t4gop
  18025. end if
  18026. ~u0ht0 := (int_to_real($y4ap3)-50.0)*-2.0/2950.0+4.0
  18027. $mkoi4 := $mkoi4-$f2ujt+($dyt1q*real_to_int(100.0/~u0ht0))
  18028. ~u0ht0 := (int_to_real($y4ap3)-50.0)*-2.0/2950.0+4.0+1.0
  18029. $whs1s := $mkoi4-real_to_int(int_to_real($mkoi4-$uiy0n)/~u0ht0)
  18030. $whs1s := $whs1s-(random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000)))/5)
  18031. $mkoi4 := $whs1s
  18032. if ($EVENT_ID=$n0uzs)
  18033. $wmznm := $whs1s
  18034. end if
  18035. end if
  18036. else
  18037. $whs1s := $uiy0n-random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
  18038. $jwx5k := $whs1s-$wo1eq-($i11wt*$gm014)
  18039. $mkoi4 := $whs1s
  18040. end if
  18041. else
  18042. if ($whs1s<$wo1eq)
  18043. if ($xc3po=1)
  18044. if (get_event_par($EVENT_ID,$EVENT_PAR_0) # 3 or (get_event_par($EVENT_ID,$EVENT_PAR_0)=3 and ($va2lk # 1)))
  18045. if ($linka=0)
  18046. $dyt1q := ($sgbvz+($cx1ja*%ppvim[$qxhis]/1000))*$t4gop
  18047. else
  18048. $dyt1q := -($sgbvz+($cx1ja*%ppvim[$qxhis]/1000)--8000)/2*$t4gop
  18049. end if
  18050. ~u0ht0 := (int_to_real($y4ap3)-50.0)*-2.0/2950.0+4.0
  18051. $mkoi4 := $mkoi4-$f2ujt+($dyt1q*real_to_int(100.0/~u0ht0))
  18052. ~u0ht0 := (int_to_real($y4ap3)-50.0)*-2.0/2950.0+4.0+1.0
  18053. $whs1s := $mkoi4+real_to_int(int_to_real($wo1eq-$mkoi4)/~u0ht0)
  18054. $whs1s := $whs1s+(random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000)))/5)
  18055. $mkoi4 := $whs1s
  18056. if ($EVENT_ID=$n0uzs)
  18057. $wmznm := $whs1s
  18058. end if
  18059. end if
  18060. else
  18061. $whs1s := $wo1eq+random(0,2*$i11wt*($4zkqn+($boshu*%ppvim[$oicux]/1000))/5)
  18062. $jwx5k := $whs1s-$wo1eq-($i11wt*$gm014)
  18063. $mkoi4 := $whs1s
  18064. end if
  18065. end if
  18066. end if
  18067. end if
  18068. $dyt1q := ($kexsv-2)*1000
  18069. if ($whs1s>=$dyt1q)
  18070. $whs1s := $dyt1q
  18071. end if
  18072. if ($whs1s<0)
  18073. $whs1s := 0
  18074. end if
  18075. if ($cvjhr=23 or ($fpvgj=23))
  18076. $4ggtc := $EVENT_ID
  18077. $bctbb := %laljf[$4ggtc mod 8192]
  18078. %45gob[$bctbb] := $whs1s
  18079. $dc3zm := $4ggtc
  18080. $frfox := 0
  18081. $fg4rw := 0
  18082. while ($fg4rw<num_elements(%dpoyh) and (%dpoyh[$fg4rw]>-1))
  18083. select (%dpoyh[$fg4rw])
  18084. case 2
  18085. call SHP1__update_mod_vals
  18086. case 3
  18087. call SHP2__update_mod_vals
  18088. case 4
  18089. call LFO1__update_mod_vals
  18090. case 5
  18091. call LFO2__update_mod_vals
  18092. case 6
  18093. call BUS1__update_mod_vals
  18094. case 7
  18095. call BUS2__update_mod_vals
  18096. case 8
  18097. call MTX__update_mod_vals
  18098. case 12
  18099. call NOTE_DURATION_POLY__update_mod_vals
  18100. case 10
  18101. call VELOCITY_POLY__update_mod_vals
  18102. case 13
  18103. call KEY_TRACK_POLY__update_mod_vals
  18104. case 18
  18105. call CONST_MOD__update_mod_vals
  18106. case 19
  18107. call REL_MOD__update_mod_vals
  18108. case 20
  18109. call ARP_MOD__update_mod_vals
  18110. case 9
  18111. call AFTERTOUCH__update_mod_vals
  18112. case 21
  18113. call MPE_SLIDE__update_mod_vals
  18114. case 22
  18115. call RANDOM__update_mod_vals
  18116. case 23
  18117. call ABS_CURSOR__update_mod_vals
  18118. end select
  18119. inc($fg4rw)
  18120. end while
  18121. end if
  18122. if ($2zs5k=1 and (%_rootkey_offset_for_note[128*$51oxm+$EVENT_NOTE]>0))
  18123. $xoacb := ($m2mpa+($n0kha*%ppvim[$u2pwx]/1000))*real_to_int(?uya1g[%_rootkey_offset_for_note[128*$51oxm+$EVENT_NOTE]+60]*1000.0)
  18124. else
  18125. $xoacb := ($m2mpa+($n0kha*%ppvim[$u2pwx]/1000))*1000
  18126. end if
  18127. $xoacb := $xoacb+(-sh_right($xoacb-1,31)*(1-$xoacb))
  18128. $oxfyj := play_note($EVENT_NOTE-($swg5e*%g_frm_shft[$51oxm]),$EVENT_VELOCITY,$whs1s,$xoacb)
  18129. set_event_par_arr($oxfyj,$EVENT_PAR_ALLOW_GROUP,1,$wuu5g)
  18130. set_event_par($oxfyj,$EVENT_PAR_0,-1)
  18131. change_pan($oxfyj,random(-10*($kuk42+($o5n5m*%ppvim[$fzwxf]/1000)),10*($kuk42+($o5n5m*%ppvim[$fzwxf]/1000))),0)
  18132. $dyt1q := real_to_int(pow((int_to_real($1g0ky+($2xzsd*%ppvim[$ldi1z]/1000))-0.0)/500000.0,?rylw5[14])*500001.0)
  18133. if (%g_frm_shft[$51oxm]=0)
  18134. change_tune($oxfyj,random(-$dyt1q,$dyt1q)+(1000*($qsfxg+($xeafk*%ppvim[$52sa5]/1000)))+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[$EVENT_ID mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[$EVENT_ID mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0),1)
  18135. else
  18136. change_tune($oxfyj,random(-$dyt1q,$dyt1q)+(1000*($qsfxg+($xeafk*%ppvim[$52sa5]/1000)))+real_to_int(200000.0*int_to_real(48*%eehid[%gvnxp[%laljf[$EVENT_ID mod 8192]]])/16384.0)*-sh_right(0-%gvnxp[%laljf[$EVENT_ID mod 8192]],31)+real_to_int(200000.0*int_to_real(12*%eehid[0])/16384.0)+(100000*$swg5e),1)
  18137. end if
  18138. if ($2zs5k=1 and (%_rootkey_offset_for_note[128*$51oxm+$EVENT_NOTE]>0))
  18139. $dyt1q := %_rootkey_offset_for_note[128*$51oxm+$EVENT_NOTE]*1500/12
  18140. change_vol($oxfyj,$dyt1q,1)
  18141. end if
  18142. select (get_event_par($EVENT_ID,$EVENT_PAR_0))
  18143. case 0
  18144. if ($ppaoe=1)
  18145. if ($ork5f=0)
  18146. $lgveb := $dg3qf
  18147. else
  18148. $lgveb := 127
  18149. end if
  18150. else
  18151. $dyt1q := ($ENGINE_UPTIME-%w1vde[%laljf[$EVENT_ID mod 8192]])*127/$ppaoe
  18152. if (int_to_real((1000+-sh_right($qwf1w,1))*10)/10000.0 # 1.0)
  18153. $lgveb := real_to_int(127.0*((pow(int_to_real((1000+-sh_right($qwf1w,1))*10)/10000.0,int_to_real($dyt1q))-1.0)/(pow(int_to_real((1000+-sh_right($qwf1w,1))*10)/10000.0,int_to_real(127))-1.0)))
  18154. else
  18155. $lgveb := $dyt1q*127/127
  18156. end if
  18157. $lgveb := $lgveb-(-sh_right(127-$lgveb,31)*($lgveb-127))
  18158. end if
  18159. $tjpb1 := -real_to_int(60000.0-(?xpxzm[$lgveb*($aaf4s+($sddk3*%ppvim[$nplew]/1000)+(-sh_right($aaf4s+($sddk3*%ppvim[$nplew]/1000)-0,31)*(0-($aaf4s+($sddk3*%ppvim[$nplew]/1000)))))/1000]*60000.0))
  18160. change_vol($oxfyj,$tjpb1,1)
  18161. if ($ENGINE_UPTIME-%w1vde[%laljf[$EVENT_ID mod 8192]]>=($ppaoe-($y4ap3/10)))
  18162. set_event_par($EVENT_ID,$EVENT_PAR_0,1)
  18163. $cgeby := $lgveb
  18164. end if
  18165. case 1
  18166. $dyt1q := ($ENGINE_UPTIME-%w1vde[%laljf[$EVENT_ID mod 8192]]-$ppaoe)*127/$ork5f
  18167. $dyt1q := $dyt1q*(1+(sh_right(127-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(127*sh_right(127-$dyt1q,31))
  18168. $lgveb := 128+real_to_int(int_to_real($dg3qf-128)*((pow(0.985,int_to_real($dyt1q))-1.0)/(pow(0.985,int_to_real(127))-1.0)))
  18169. $tjpb1 := -real_to_int(60000.0-(?xpxzm[$lgveb*($aaf4s+($sddk3*%ppvim[$nplew]/1000)+(-sh_right($aaf4s+($sddk3*%ppvim[$nplew]/1000)-0,31)*(0-($aaf4s+($sddk3*%ppvim[$nplew]/1000)))))/1000]*60000.0))
  18170. change_vol($oxfyj,$tjpb1,1)
  18171. if ($ENGINE_UPTIME-%w1vde[%laljf[$EVENT_ID mod 8192]]>=($ppaoe+$ork5f-($y4ap3/10)))
  18172. set_event_par($EVENT_ID,$EVENT_PAR_0,2)
  18173. end if
  18174. case 2
  18175. $lgveb := $dg3qf
  18176. $tjpb1 := -real_to_int(60000.0-(?xpxzm[$dg3qf*($aaf4s+($sddk3*%ppvim[$nplew]/1000)+(-sh_right($aaf4s+($sddk3*%ppvim[$nplew]/1000)-0,31)*(0-($aaf4s+($sddk3*%ppvim[$nplew]/1000)))))/1000]*60000.0))
  18177. change_vol($oxfyj,$tjpb1,1)
  18178. case 3
  18179. if ($q2v0i=0)
  18180. $q2v0i := $tsm3s
  18181. end if
  18182. %jnhix[%laljf[$EVENT_ID mod 8192]] := 1
  18183. $dyt1q := ($ENGINE_UPTIME-$q2v0i)*127/$p3vhn
  18184. $r0pwv := $lgveb+real_to_int(int_to_real(0-$lgveb)*((pow(0.985,int_to_real($dyt1q))-1.0)/(pow(0.985,int_to_real(127))-1.0)))
  18185. $tjpb1 := -real_to_int(60000.0-(?xpxzm[($r0pwv+(-sh_right($r0pwv-0,31)*(0-$r0pwv)))*($aaf4s+($sddk3*%ppvim[$nplew]/1000)+(-sh_right($aaf4s+($sddk3*%ppvim[$nplew]/1000)-0,31)*(0-($aaf4s+($sddk3*%ppvim[$nplew]/1000)))))/1000]*60000.0))
  18186. change_vol($oxfyj,$tjpb1,1)
  18187. if ($EVENT_ID=$n0uzs and ($0e0hy>0))
  18188. $n0uzs := -1
  18189. end if
  18190. if ($ENGINE_UPTIME-$q2v0i>=$p3vhn or (get_event_par($oxfyj,$EVENT_PAR_VOLUME)<-60000) or (get_event_par($EVENT_ID,$EVENT_PAR_3)=1))
  18191. set_event_par($EVENT_ID,$EVENT_PAR_0,4)
  18192. fade_out($oxfyj,200,1)
  18193. if ($EVENT_ID=$ukkxs)
  18194. $r5war := -1
  18195. end if
  18196. $dyt1q := search(%mc3xd,$EVENT_ID)
  18197. if ($dyt1q # -1)
  18198. %mc3xd[$dyt1q] := 0
  18199. dec($pdzso)
  18200. end if
  18201. $er442 := search(%dz3eb,$EVENT_ID)
  18202. if ($er442 # -1)
  18203. %dz3eb[$er442] := 0
  18204. set_control_par(%kte0r[$er442],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  18205. end if
  18206. end if
  18207. end select
  18208. if ($EVENT_ID=$ukkxs and ($linka=1) and (get_control_par(get_ui_id($rbfcs),$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
  18209. call update_g_pos_hit_anker_lenth_text
  18210. end if
  18211. wait(1)
  18212. if ($r5war=-1 and ($ukkxs # $EVENT_ID))
  18213. $ukkxs := $EVENT_ID
  18214. $r5war := get_event_par($oxfyj,$EVENT_PAR_ZONE_ID)
  18215. $pilpf := get_sample_length($r5war)/1000
  18216. if ($r5war # $3rm1t and ($r5war>-1))
  18217. attach_zone($4lo3h,$r5war,0)
  18218. $3rm1t := $r5war
  18219. call update_all_mod_knob_rt_indicator_poly
  18220. end if
  18221. end if
  18222. $er442 := search(%dz3eb,$EVENT_ID)
  18223. if (($0ib2k=1 or ($0ib2k=0)) and (get_event_par($EVENT_ID,$EVENT_PAR_0) # 4))
  18224. if ($er442 # -1)
  18225. $dyt1q := ($whs1s/1000-0)*(get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X))/($pilpf-0)+get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)
  18226. set_control_par(%kte0r[$er442],$CONTROL_PAR_POS_X,$dyt1q)
  18227. set_control_par(%kte0r[$er442],$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y)+2+-sh_right(abs($0ib2k-0)-1,31))
  18228. set_control_par(%kte0r[$er442],$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT)-4)
  18229. if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3)
  18230. set_control_par(%kte0r[$er442],$CONTROL_PAR_PICTURE_STATE,2+(-sh_right(abs($0ib2k-0)-1,31)*3))
  18231. else
  18232. set_control_par(%kte0r[$er442],$CONTROL_PAR_PICTURE_STATE,1+(-sh_right(abs($0ib2k-0)-1,31)*3))
  18233. end if
  18234. set_control_par(%kte0r[$er442],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  18235. else
  18236. $er442 := search(%dz3eb,0)
  18237. if ($er442 # -1)
  18238. %dz3eb[$er442] := $EVENT_ID
  18239. $dyt1q := ($whs1s/1000-0)*(get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_WIDTH)-get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X))/($pilpf-0)+get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_X)
  18240. set_control_par(%kte0r[$er442],$CONTROL_PAR_POS_X,$dyt1q)
  18241. set_control_par(%kte0r[$er442],$CONTROL_PAR_POS_Y,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_POS_Y)+2+-sh_right(abs($0ib2k-0)-1,31))
  18242. set_control_par(%kte0r[$er442],$CONTROL_PAR_HEIGHT,get_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HEIGHT)-4)
  18243. if (get_event_par($EVENT_ID,$EVENT_PAR_0)=3)
  18244. set_control_par(%kte0r[$er442],$CONTROL_PAR_PICTURE_STATE,2+(-sh_right(abs($0ib2k-0)-1,31)*3))
  18245. else
  18246. set_control_par(%kte0r[$er442],$CONTROL_PAR_PICTURE_STATE,1+(-sh_right(abs($0ib2k-0)-1,31)*3))
  18247. end if
  18248. set_control_par(%kte0r[$er442],$CONTROL_PAR_HIDE,$HIDE_PART_NOTHING)
  18249. end if
  18250. end if
  18251. else
  18252. if ($er442 # -1 and (get_control_par(%kte0r[$er442],$CONTROL_PAR_HIDE) # $HIDE_WHOLE_CONTROL))
  18253. set_control_par(%kte0r[$er442],$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  18254. end if
  18255. end if
  18256. if ($EVENT_ID=$n0uzs)
  18257. $b1esx := $ENGINE_UPTIME+($y4ap3/10)
  18258. end if
  18259. wait($y4ap3*100)
  18260. end while
  18261. end on
  18262. on release
  18263. if (get_event_par($EVENT_ID,$EVENT_PAR_0)=1000)
  18264. exit
  18265. end if
  18266. if (get_event_par($EVENT_ID,$EVENT_PAR_0)=-3)
  18267. $z5xav := get_event_par($EVENT_ID,$EVENT_PAR_NOTE)
  18268. $35mmm := search(%br0tn,%wwz2v[$0erls])
  18269. if ($35mmm<24 and ($35mmm # -1) and (search(%br0tn,$z5xav)=-1))
  18270. %br0tn[$35mmm] := $z5xav
  18271. %2rhz1[$z5xav] := get_event_par($EVENT_ID,$EVENT_PAR_1)
  18272. end if
  18273. call ARP__update_notes
  18274. if ($gcbnc=1 and ($mluem=0))
  18275. $mluem := 1
  18276. $tp4oa := 0
  18277. $0tbzw := 0
  18278. $0c1m3 := 0
  18279. $gbgom := 1
  18280. $5pffj := $ENGINE_UPTIME
  18281. $upvcm := 0
  18282. while ($gcbnc>0 and ($ruhe4=1) and ($t4vew=1))
  18283. call _ARP__update_step_length
  18284. if (%br0tn[$0tbzw]=%wwz2v[$0erls])
  18285. $0tbzw := 0
  18286. end if
  18287. call ARP_MOD__update_mod_vals
  18288. if (%pyeoz[$tp4oa]>0)
  18289. select ($0erls)
  18290. case 4
  18291. $ut1tc := 0
  18292. while ($ut1tc<$gcbnc)
  18293. $cej2p := %br0tn[$ut1tc]
  18294. if ($cej2p>127)
  18295. $cej2p := 115+($cej2p mod 12)
  18296. end if
  18297. $cej2p := $cej2p+($0c1m3*12)
  18298. while ($cej2p>127 and (%br0tn[$ut1tc]<127))
  18299. $0c1m3 := ($0c1m3+1) mod $q0o5r
  18300. $cej2p := %br0tn[$ut1tc]+($0c1m3*12)
  18301. end while
  18302. if (in_range($cej2p,0,127))
  18303. call MOD__restore_last_mono_mod_context
  18304. $r0pwv := ($q0rb2+($qb5xv*%ppvim[$0vs3i]/1000))*%pyeoz[$tp4oa]/1000
  18305. $r0pwv := $r0pwv*(1+(sh_right(127-$r0pwv,31) .or. sh_right($r0pwv-1,31)))-sh_right($r0pwv-1,31)-(127*sh_right(127-$r0pwv,31))
  18306. %ppvim[10] := ($r0pwv-1)*1000/126
  18307. %ppvim[13] := $cej2p*1000/127
  18308. %ppvim[12] := 0
  18309. $gysvc := random(0,1000)
  18310. %ppvim[22] := $gysvc
  18311. $dyt1q := ($dgu14+($5l3um*%ppvim[$f4o1c]/1000))*%std_smp_l_grp[$hdmk1]/10000
  18312. $dyt1q := ($dyt1q*(1+(sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-((%std_smp_l_grp[$hdmk1]-5)*sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31)))*1000
  18313. $auli3 := play_note($cej2p,$r0pwv,$dyt1q,real_to_int(~qa2mp/2.0))
  18314. set_event_par($auli3,$EVENT_PAR_0,-4)
  18315. %hrm2k[$fijbx] := $auli3
  18316. %k0ra5[$fijbx] := $auli3
  18317. $fijbx := ($fijbx+1) mod num_elements(%hrm2k)
  18318. call MOD__inc_POLY__count
  18319. %asdef[$1bi4b] := $auli3
  18320. %laljf[$auli3 mod 8192] := $1bi4b
  18321. %5ggz3[$1bi4b] := $auli3
  18322. %w1vde[$1bi4b] := $ENGINE_UPTIME
  18323. %ilm5d[$1bi4b] := get_event_par($auli3,$EVENT_PAR_NOTE)
  18324. %c1kc4[$1bi4b] := get_event_par($auli3,$EVENT_PAR_VELOCITY)
  18325. %jnhix[$1bi4b] := 0
  18326. %gvnxp[$1bi4b] := %gvnxp[%laljf[%2rhz1[%br0tn[$0tbzw]] mod 8192]]
  18327. %oy5fa[$1bi4b] := $gysvc
  18328. if (event_status(%z3n3e[%gvnxp[$1bi4b]])=$EVENT_STATUS_INACTIVE)
  18329. %z3n3e[%gvnxp[$1bi4b]] := $auli3
  18330. end if
  18331. $3yie0 := %laljf[$auli3 mod 8192]
  18332. select ($e2mne)
  18333. case 0
  18334. ?lrdg1[$3yie0] := int_to_real(random(0,10000))/10000.0
  18335. ?2bxj3[$3yie0] := 0.0
  18336. %hqihq[$3yie0] := $ENGINE_UPTIME
  18337. case 1
  18338. if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
  18339. $a2nqk := $3yie0
  18340. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  18341. ?2bxj3[$3yie0] := 0.0
  18342. %hqihq[$3yie0] := $ENGINE_UPTIME
  18343. else
  18344. ?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
  18345. ?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
  18346. %hqihq[$3yie0] := %hqihq[$a2nqk]
  18347. end if
  18348. case 2
  18349. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  18350. ?2bxj3[$3yie0] := 0.0
  18351. %hqihq[$3yie0] := $ENGINE_UPTIME
  18352. case 3
  18353. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  18354. ?2bxj3[$3yie0] := 0.0
  18355. %hqihq[$3yie0] := $ENGINE_UPTIME
  18356. case 4
  18357. if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
  18358. $a2nqk := $3yie0
  18359. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  18360. ?2bxj3[$3yie0] := 0.0
  18361. %hqihq[$3yie0] := $ENGINE_UPTIME
  18362. else
  18363. ?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
  18364. ?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
  18365. %hqihq[$3yie0] := %hqihq[$a2nqk]
  18366. end if
  18367. end select
  18368. $3yie0 := %laljf[$auli3 mod 8192]
  18369. select ($eu0kx)
  18370. case 0
  18371. ?pu5ib[$3yie0] := int_to_real(random(0,10000))/10000.0
  18372. ?p2rij[$3yie0] := 0.0
  18373. %qvhhl[$3yie0] := $ENGINE_UPTIME
  18374. case 1
  18375. if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
  18376. $xpr4r := $3yie0
  18377. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  18378. ?p2rij[$3yie0] := 0.0
  18379. %qvhhl[$3yie0] := $ENGINE_UPTIME
  18380. else
  18381. ?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
  18382. ?p2rij[$3yie0] := ?p2rij[$xpr4r]
  18383. %qvhhl[$3yie0] := %qvhhl[$xpr4r]
  18384. end if
  18385. case 2
  18386. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  18387. ?p2rij[$3yie0] := 0.0
  18388. %qvhhl[$3yie0] := $ENGINE_UPTIME
  18389. case 3
  18390. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  18391. ?p2rij[$3yie0] := 0.0
  18392. %qvhhl[$3yie0] := $ENGINE_UPTIME
  18393. case 4
  18394. if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
  18395. $xpr4r := $3yie0
  18396. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  18397. ?p2rij[$3yie0] := 0.0
  18398. %qvhhl[$3yie0] := $ENGINE_UPTIME
  18399. else
  18400. ?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
  18401. ?p2rij[$3yie0] := ?p2rij[$xpr4r]
  18402. %qvhhl[$3yie0] := %qvhhl[$xpr4r]
  18403. end if
  18404. end select
  18405. set_event_par_arr($auli3,$EVENT_PAR_ALLOW_GROUP,1,$hdmk1)
  18406. call MOD__perform_sample_layer_update_for_arp_note
  18407. end if
  18408. inc($ut1tc)
  18409. end while
  18410. call ARP__update_sample_waveform
  18411. case 0 to 9
  18412. if ($dyo2q=0)
  18413. $cej2p := 60
  18414. else
  18415. $cej2p := %br0tn[$0tbzw]
  18416. end if
  18417. if ($cej2p>127)
  18418. $cej2p := 115+($cej2p mod 12)
  18419. end if
  18420. $cej2p := $cej2p+($0c1m3*12)
  18421. while ($cej2p>127 and (%br0tn[$0tbzw]<127))
  18422. $0c1m3 := ($0c1m3+1) mod $q0o5r
  18423. $cej2p := %br0tn[$0tbzw]+($0c1m3*12)
  18424. end while
  18425. if (in_range($cej2p,0,127))
  18426. call MOD__restore_last_mono_mod_context
  18427. $r0pwv := ($q0rb2+($qb5xv*%ppvim[$0vs3i]/1000))*%pyeoz[$tp4oa]/1000
  18428. $r0pwv := $r0pwv*(1+(sh_right(127-$r0pwv,31) .or. sh_right($r0pwv-1,31)))-sh_right($r0pwv-1,31)-(127*sh_right(127-$r0pwv,31))
  18429. %ppvim[10] := ($r0pwv-1)*1000/126
  18430. %ppvim[13] := $cej2p*1000/127
  18431. %ppvim[12] := 0
  18432. $gysvc := random(0,1000)
  18433. %ppvim[22] := $gysvc
  18434. $dyt1q := ($dgu14+($5l3um*%ppvim[$f4o1c]/1000))*%std_smp_l_grp[$hdmk1]/10000
  18435. $dyt1q := ($dyt1q*(1+(sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-((%std_smp_l_grp[$hdmk1]-5)*sh_right(%std_smp_l_grp[$hdmk1]-5-$dyt1q,31)))*1000
  18436. $auli3 := play_note($cej2p,$r0pwv,$dyt1q,real_to_int(~qa2mp/2.0))
  18437. set_event_par($auli3,$EVENT_PAR_0,-4)
  18438. %hrm2k[$fijbx] := $auli3
  18439. %k0ra5[$fijbx] := $auli3
  18440. $fijbx := ($fijbx+1) mod num_elements(%hrm2k)
  18441. call MOD__inc_POLY__count
  18442. %asdef[$1bi4b] := $auli3
  18443. %laljf[$auli3 mod 8192] := $1bi4b
  18444. %5ggz3[$1bi4b] := $auli3
  18445. %w1vde[$1bi4b] := $ENGINE_UPTIME
  18446. %ilm5d[$1bi4b] := get_event_par($auli3,$EVENT_PAR_NOTE)
  18447. %c1kc4[$1bi4b] := get_event_par($auli3,$EVENT_PAR_VELOCITY)
  18448. %jnhix[$1bi4b] := 0
  18449. %gvnxp[$1bi4b] := %gvnxp[%laljf[%2rhz1[%br0tn[$0tbzw]] mod 8192]]
  18450. %oy5fa[$1bi4b] := $gysvc
  18451. if (event_status(%z3n3e[%gvnxp[$1bi4b]])=$EVENT_STATUS_INACTIVE)
  18452. %z3n3e[%gvnxp[$1bi4b]] := $auli3
  18453. end if
  18454. $3yie0 := %laljf[$auli3 mod 8192]
  18455. select ($e2mne)
  18456. case 0
  18457. ?lrdg1[$3yie0] := int_to_real(random(0,10000))/10000.0
  18458. ?2bxj3[$3yie0] := 0.0
  18459. %hqihq[$3yie0] := $ENGINE_UPTIME
  18460. case 1
  18461. if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
  18462. $a2nqk := $3yie0
  18463. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  18464. ?2bxj3[$3yie0] := 0.0
  18465. %hqihq[$3yie0] := $ENGINE_UPTIME
  18466. else
  18467. ?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
  18468. ?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
  18469. %hqihq[$3yie0] := %hqihq[$a2nqk]
  18470. end if
  18471. case 2
  18472. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  18473. ?2bxj3[$3yie0] := 0.0
  18474. %hqihq[$3yie0] := $ENGINE_UPTIME
  18475. case 3
  18476. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  18477. ?2bxj3[$3yie0] := 0.0
  18478. %hqihq[$3yie0] := $ENGINE_UPTIME
  18479. case 4
  18480. if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
  18481. $a2nqk := $3yie0
  18482. ?lrdg1[$3yie0] := int_to_real($rj2yq)/360.0
  18483. ?2bxj3[$3yie0] := 0.0
  18484. %hqihq[$3yie0] := $ENGINE_UPTIME
  18485. else
  18486. ?lrdg1[$3yie0] := ?lrdg1[$a2nqk]
  18487. ?2bxj3[$3yie0] := ?2bxj3[$a2nqk]
  18488. %hqihq[$3yie0] := %hqihq[$a2nqk]
  18489. end if
  18490. end select
  18491. $3yie0 := %laljf[$auli3 mod 8192]
  18492. select ($eu0kx)
  18493. case 0
  18494. ?pu5ib[$3yie0] := int_to_real(random(0,10000))/10000.0
  18495. ?p2rij[$3yie0] := 0.0
  18496. %qvhhl[$3yie0] := $ENGINE_UPTIME
  18497. case 1
  18498. if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
  18499. $xpr4r := $3yie0
  18500. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  18501. ?p2rij[$3yie0] := 0.0
  18502. %qvhhl[$3yie0] := $ENGINE_UPTIME
  18503. else
  18504. ?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
  18505. ?p2rij[$3yie0] := ?p2rij[$xpr4r]
  18506. %qvhhl[$3yie0] := %qvhhl[$xpr4r]
  18507. end if
  18508. case 2
  18509. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  18510. ?p2rij[$3yie0] := 0.0
  18511. %qvhhl[$3yie0] := $ENGINE_UPTIME
  18512. case 3
  18513. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  18514. ?p2rij[$3yie0] := 0.0
  18515. %qvhhl[$3yie0] := $ENGINE_UPTIME
  18516. case 4
  18517. if ($0e0hy=1 and (get_event_par($auli3,$EVENT_PAR_0) # -4))
  18518. $xpr4r := $3yie0
  18519. ?pu5ib[$3yie0] := int_to_real($s2bg4)/360.0
  18520. ?p2rij[$3yie0] := 0.0
  18521. %qvhhl[$3yie0] := $ENGINE_UPTIME
  18522. else
  18523. ?pu5ib[$3yie0] := ?pu5ib[$xpr4r]
  18524. ?p2rij[$3yie0] := ?p2rij[$xpr4r]
  18525. %qvhhl[$3yie0] := %qvhhl[$xpr4r]
  18526. end if
  18527. end select
  18528. set_event_par_arr($auli3,$EVENT_PAR_ALLOW_GROUP,1,$hdmk1)
  18529. call MOD__perform_sample_layer_update_for_arp_note
  18530. call ARP__update_sample_waveform
  18531. end if
  18532. end select
  18533. end if
  18534. set_control_par(get_ui_id($vjofa),$CONTROL_PAR_POS_X,get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_POS_X)+3+($tp4oa*(get_control_par(get_ui_id(%pyeoz),$CONTROL_PAR_WIDTH)-6)/$k5z4u))
  18535. wait(10000)
  18536. ~oukv1 := 2.0*~qa2mp
  18537. call MOD__restore_last_mono_mod_context
  18538. call _ARP__update_step_length
  18539. $dyt1q := $3rksw+($qbhb5*%ppvim[$m5sxk]/1000)
  18540. $dyt1q := $dyt1q*(1+(sh_right(%sbnwu[10]-$dyt1q,31) .or. sh_right($dyt1q-%dwdw3[10],31)))-(%dwdw3[10]*sh_right($dyt1q-%dwdw3[10],31))-(%sbnwu[10]*sh_right(%sbnwu[10]-$dyt1q,31))
  18541. $wgaas := real_to_int(~oukv1*int_to_real($dyt1q)/1000.0)
  18542. $4vgzm := real_to_int(int_to_real($ENGINE_UPTIME-$5pffj)*1000.0-(floor(int_to_real($ENGINE_UPTIME-$5pffj)*1000.0/~oukv1)*~oukv1))
  18543. $upvcm := 1+sh_right($wgaas-$4vgzm,31)
  18544. while (not in_range($4vgzm,$wgaas*$upvcm,real_to_int(~oukv1)*$upvcm+($wgaas*(($upvcm+1) mod 2))) and ($gcbnc>0))
  18545. wait(1000)
  18546. call MOD__restore_last_mono_mod_context
  18547. call _ARP__update_step_length
  18548. ~oukv1 := 2.0*~qa2mp
  18549. $dyt1q := $3rksw+($qbhb5*%ppvim[$m5sxk]/1000)
  18550. $dyt1q := $dyt1q*(1+(sh_right(%sbnwu[10]-$dyt1q,31) .or. sh_right($dyt1q-%dwdw3[10],31)))-(%dwdw3[10]*sh_right($dyt1q-%dwdw3[10],31))-(%sbnwu[10]*sh_right(%sbnwu[10]-$dyt1q,31))
  18551. $wgaas := real_to_int(~oukv1*int_to_real($dyt1q)/1000.0)
  18552. $4vgzm := real_to_int(int_to_real($ENGINE_UPTIME-$5pffj)*1000.0-(floor(int_to_real($ENGINE_UPTIME-$5pffj)*1000.0/~oukv1)*~oukv1))
  18553. end while
  18554. if ($0erls=2)
  18555. if ($0tbzw=($gcbnc-1))
  18556. $gbgom := -1
  18557. else
  18558. if ($0tbzw=0)
  18559. $gbgom := 1
  18560. end if
  18561. end if
  18562. end if
  18563. if (%pyeoz[$tp4oa]>0 or (%pyeoz[$tp4oa]=0 and ($2v40q=0)))
  18564. $0tbzw := ($0tbzw+$gbgom) mod $gcbnc
  18565. end if
  18566. $tp4oa := ($tp4oa+1) mod $k5z4u
  18567. if ($0tbzw=0)
  18568. $0c1m3 := ($0c1m3+1) mod $q0o5r
  18569. end if
  18570. end while
  18571. $mluem := 0
  18572. call ARP__remove_all_notes_and_reset
  18573. end if
  18574. exit
  18575. end if
  18576. if (get_event_par($EVENT_ID,$EVENT_PAR_0) # -1 and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -2) and (get_event_par($EVENT_ID,$EVENT_PAR_0) # -5))
  18577. if ($iva44=0 or (get_event_par($EVENT_ID,$EVENT_PAR_3)=1))
  18578. dec($0e0hy)
  18579. $swdze := search(%br0tn,$EVENT_NOTE)
  18580. if ($swdze # -1)
  18581. %br0tn[$swdze] := %wwz2v[$0erls]
  18582. call ARP__update_notes
  18583. end if
  18584. $0e0hy := $0e0hy+(-sh_right($0e0hy-0,31)*(0-$0e0hy))
  18585. set_event_par($EVENT_ID,$EVENT_PAR_0,3)
  18586. $q2v0i := $ENGINE_UPTIME
  18587. %0wsff[$EVENT_NOTE] := 0
  18588. $qfspw := $EVENT_ID
  18589. call MOD__update_mono_start_mode
  18590. else
  18591. if (%lx5kr[$EVENT_NOTE] # -1)
  18592. dec($0e0hy)
  18593. $0e0hy := $0e0hy+(-sh_right($0e0hy-0,31)*(0-$0e0hy))
  18594. $tsm3s := $ENGINE_UPTIME
  18595. set_event_par(%medyt[%lx5kr[$EVENT_NOTE]],$EVENT_PAR_0,3)
  18596. %medyt[%lx5kr[$EVENT_NOTE]] := $EVENT_ID
  18597. else
  18598. %medyt[$h3axx] := $EVENT_ID
  18599. %lx5kr[$EVENT_NOTE] := $h3axx
  18600. %sef3k[$h3axx] := $EVENT_NOTE
  18601. inc($h3axx)
  18602. inc($sgrou)
  18603. end if
  18604. end if
  18605. if ($0e0hy=0 and ($mcp2m=0))
  18606. note_off($auli3)
  18607. %jnhix[%laljf[$auli3 mod 8192]] := 1
  18608. end if
  18609. end if
  18610. if (get_event_par($EVENT_ID,$EVENT_PAR_0)=-2 or (get_event_par_arr($EVENT_ID,$EVENT_PAR_CUSTOM,4)=1))
  18611. if ($iva44=1)
  18612. ignore_event($EVENT_ID)
  18613. %srzwv[$rf3ya] := $EVENT_ID
  18614. $rf3ya := ($rf3ya+1) mod 128
  18615. else
  18616. if (get_event_par($EVENT_ID,$EVENT_PAR_0)=-2)
  18617. %jnhix[%laljf[$EVENT_ID mod 8192]] := 1
  18618. end if
  18619. end if
  18620. end if
  18621. end on
  18622. on controller
  18623. if ($oppog=1)
  18624. exit
  18625. end if
  18626. if ($iyqua=1)
  18627. $4ainj := $CC_NUM
  18628. $iyqua := 0
  18629. exit
  18630. else
  18631. if ($otffr=1 and ($CC_NUM # $4ainj))
  18632. $gcjlt := $CC_NUM
  18633. $otffr := 0
  18634. exit
  18635. end if
  18636. end if
  18637. if ($CC_NUM=$4ainj)
  18638. ?xy[0] := int_to_real(%CC[$CC_NUM])/127.0
  18639. $2thol := real_to_int(?xy[0]*10000.0)
  18640. %ppvim[0] := real_to_int(?xy[0]*1000.0)
  18641. %latnx[0] := 0
  18642. %latnx[1] := 0
  18643. call MOD__perform_optimized_update_for_gl_ext_mod
  18644. call update_perform_animation
  18645. exit
  18646. else
  18647. if ($CC_NUM=$gcjlt)
  18648. ?xy[1] := int_to_real(%CC[$CC_NUM])/127.0
  18649. $jy3sd := real_to_int(?xy[1]*10000.0)
  18650. %ppvim[1] := real_to_int(?xy[1]*1000.0)
  18651. %latnx[0] := 1
  18652. %latnx[1] := 1
  18653. call MOD__perform_optimized_update_for_gl_ext_mod
  18654. call update_perform_animation
  18655. exit
  18656. else
  18657. if ($CC_NUM=$VCC_PITCH_BEND)
  18658. %eehid[$MIDI_CHANNEL] := %CC[$CC_NUM]
  18659. exit
  18660. else
  18661. if ($CC_NUM=$VCC_MONO_AT)
  18662. %a31v5[$MIDI_CHANNEL] := %CC[$CC_NUM]*1000/127
  18663. %latnx[0] := 9
  18664. %latnx[1] := 9
  18665. call MOD__perform_optimized_update_for_gl_ext_mod
  18666. exit
  18667. else
  18668. if ($CC_NUM=74)
  18669. %2zfuu[$MIDI_CHANNEL] := %CC[$CC_NUM]*1000/127
  18670. %latnx[0] := 21
  18671. %latnx[1] := 21
  18672. call MOD__perform_optimized_update_for_gl_ext_mod
  18673. exit
  18674. else
  18675. if ($CC_NUM=64)
  18676. if (%CC[64]>64)
  18677. $iva44 := 1
  18678. else
  18679. if ($iva44=1)
  18680. call stop_all_pedal_notes
  18681. end if
  18682. end if
  18683. exit
  18684. else
  18685. if ($CC_NUM=123)
  18686. call stop_all_notes
  18687. exit
  18688. else
  18689. if ($CC_NUM=121)
  18690. $fg4rw := 0
  18691. while ($fg4rw<16)
  18692. %eehid[$fg4rw] := 0
  18693. %a31v5[$fg4rw] := 0
  18694. %2zfuu[$fg4rw] := 0
  18695. %z3n3e[$fg4rw] := 0
  18696. inc($fg4rw)
  18697. end while
  18698. end if
  18699. end if
  18700. end if
  18701. end if
  18702. end if
  18703. end if
  18704. end if
  18705. end if
  18706. end on
  18707. on poly_at
  18708. $yrh4w := 1
  18709. %vftan[$POLY_AT_NUM] := %POLY_AT[$POLY_AT_NUM]*1000/127
  18710. %latnx[0] := 9
  18711. %latnx[1] := 9
  18712. call MOD__perform_optimized_update_for_gl_ext_mod
  18713. end on
  18714. on ui_control($3pvid)
  18715. call update_modal_dialog_lbl
  18716. end on
  18717. on ui_control($spdyk)
  18718. if (get_control_par(get_ui_id($spdyk),$CONTROL_PAR_KEY_SHIFT)=1)
  18719. %smp_l_grp[$51oxm] := -1
  18720. $spdyk := ($spdyk+1) mod 2
  18721. end if
  18722. end on
  18723. on ui_control($1c3gj)
  18724. $1c3gj := 0
  18725. $luyp1 := $0ib2k
  18726. $0ib2k := 5
  18727. call NAV_PAGE__update_main_nav
  18728. end on
  18729. on ui_control($udker)
  18730. $udker := 0
  18731. $4ut4g := $zor2m
  18732. $zor2m := 0
  18733. $w0x5j := -1
  18734. call _BRW__select_preset_id_for_file_type_with_offset
  18735. $51oxm := %BRW__grp_remap[%jj5qi[0]+100]-100
  18736. call prepare_purge
  18737. $rlfxd := 0
  18738. while ($rlfxd<$NUM_GROUPS)
  18739. purge_group($rlfxd,%tuuuf[$rlfxd])
  18740. inc($rlfxd)
  18741. end while
  18742. call update_all_WF_for_default_key
  18743. call on_selected_g_group_changed
  18744. end on
  18745. on ui_control($2ch0u)
  18746. $2ch0u := 0
  18747. $4ut4g := $zor2m
  18748. $zor2m := 0
  18749. $w0x5j := 1
  18750. call _BRW__select_preset_id_for_file_type_with_offset
  18751. $51oxm := %BRW__grp_remap[%jj5qi[0]+100]-100
  18752. call prepare_purge
  18753. $rlfxd := 0
  18754. while ($rlfxd<$NUM_GROUPS)
  18755. purge_group($rlfxd,%tuuuf[$rlfxd])
  18756. inc($rlfxd)
  18757. end while
  18758. call update_all_WF_for_default_key
  18759. call on_selected_g_group_changed
  18760. end on
  18761. on ui_control($lk05f)
  18762. set_engine_par($ENGINE_PAR_EFFECT_BYPASS,($lk05f+1) mod 2,$hdmk1,0,-1)
  18763. end on
  18764. on ui_control($2qtv2)
  18765. if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$hdmk1,0,-1) # $2qtv2)
  18766. $m2etg := 1
  18767. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$2qtv2,$hdmk1,0,-1)
  18768. while ($m2etg=1)
  18769. wait(3000)
  18770. end while
  18771. end if
  18772. call FX__set_SMPL_filter_parameters
  18773. call FX__update_smpl_filter_ui
  18774. end on
  18775. on ui_control($hmrz5)
  18776. set_control_par(get_ui_id($2qtv2),$CONTROL_PAR_VALUE,(get_control_par(get_ui_id($2qtv2),$CONTROL_PAR_VALUE)+29-1) mod 29)
  18777. if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$hdmk1,0,-1) # $2qtv2)
  18778. $m2etg := 1
  18779. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$2qtv2,$hdmk1,0,-1)
  18780. while ($m2etg=1)
  18781. wait(3000)
  18782. end while
  18783. end if
  18784. call FX__set_SMPL_filter_parameters
  18785. call FX__update_smpl_filter_ui
  18786. $hmrz5 := 0
  18787. end on
  18788. on ui_control($mm1ti)
  18789. $mm1ti := 0
  18790. $luyp1 := $0ib2k
  18791. $0ib2k := 6
  18792. call NAV_PAGE__update_main_nav
  18793. end on
  18794. on ui_control($4cstx)
  18795. set_control_par(get_ui_id($2qtv2),$CONTROL_PAR_VALUE,(get_control_par(get_ui_id($2qtv2),$CONTROL_PAR_VALUE)+1) mod 29)
  18796. if (get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$hdmk1,0,-1) # $2qtv2)
  18797. $m2etg := 1
  18798. $hojz4 := set_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,$2qtv2,$hdmk1,0,-1)
  18799. while ($m2etg=1)
  18800. wait(3000)
  18801. end while
  18802. end if
  18803. call FX__set_SMPL_filter_parameters
  18804. call FX__update_smpl_filter_ui
  18805. $4cstx := 0
  18806. end on
  18807. on ui_control($3r1av)
  18808. $3r1av := 0
  18809. $4ut4g := $zor2m
  18810. $zor2m := 1
  18811. $w0x5j := -1
  18812. call _BRW__select_preset_id_for_file_type_with_offset
  18813. $hdmk1 := -sh_right(abs(%jj5qi[1]-100)-1,31)*364+((.not. -sh_right(abs(%jj5qi[1]-100)-1,31) .and. 1)*%BRW__grp_remap[%jj5qi[1]])
  18814. call prepare_purge
  18815. $rlfxd := 0
  18816. while ($rlfxd<$NUM_GROUPS)
  18817. purge_group($rlfxd,%tuuuf[$rlfxd])
  18818. inc($rlfxd)
  18819. end while
  18820. call update_all_WF_for_default_key
  18821. call on_selected_std_group_changed
  18822. end on
  18823. on ui_control($0l4xe)
  18824. $0l4xe := 0
  18825. $4ut4g := $zor2m
  18826. $zor2m := 1
  18827. $w0x5j := 1
  18828. call _BRW__select_preset_id_for_file_type_with_offset
  18829. $hdmk1 := -sh_right(abs(%jj5qi[1]-100)-1,31)*364+((.not. -sh_right(abs(%jj5qi[1]-100)-1,31) .and. 1)*%BRW__grp_remap[%jj5qi[1]])
  18830. call prepare_purge
  18831. $rlfxd := 0
  18832. while ($rlfxd<$NUM_GROUPS)
  18833. purge_group($rlfxd,%tuuuf[$rlfxd])
  18834. inc($rlfxd)
  18835. end while
  18836. call update_all_WF_for_default_key
  18837. call on_selected_std_group_changed
  18838. end on
  18839. on ui_control($k21jk)
  18840. if ($k21jk=1)
  18841. $dyt1q := $r0khx-($eai4d+($3zolj*%ppvim[$r3d0o]/1000))
  18842. else
  18843. $dyt1q := 1000*(1+sh_right($r0khx+$eai4d+($3zolj*%ppvim[$r3d0o]/1000)-1000,31))-(($r0khx+$eai4d+($3zolj*%ppvim[$r3d0o]/1000))*sh_right($r0khx+$eai4d+($3zolj*%ppvim[$r3d0o]/1000)-1000,31))
  18844. end if
  18845. $r0khx := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
  18846. $gpzoi := 25
  18847. call _update_mod_knob_range_indicator_for_gl_m_id
  18848. call _update_mod_knob_rt_indicator_for_gl_m_id
  18849. call update_g_rng_max_label
  18850. call update_g_rng_max_area
  18851. end on
  18852. on ui_control($xc3po)
  18853. set_control_par_str(get_ui_id($hnp3t),$CONTROL_PAR_PICTURE,"GE_WF_COV_LEFT_" & $xc3po & -sh_right(abs($0ib2k-0)-1,31))
  18854. set_control_par_str(get_ui_id($q3vtp),$CONTROL_PAR_PICTURE,"GE_WF_COV_RIGHT_" & $xc3po & -sh_right(abs($0ib2k-0)-1,31))
  18855. end on
  18856. on async_complete
  18857. if ($NI_ASYNC_ID=$d1d43)
  18858. if (%preset[22]=0)
  18859. $d1d43 := -1
  18860. exit
  18861. end if
  18862. $bpkqt := %preset[19]
  18863. $m2mpa := %preset[22]
  18864. $1g0ky := %preset[25]
  18865. $liaof := %preset[28]
  18866. $sgbvz := %preset[31]
  18867. $4zkqn := %preset[34]
  18868. $kuk42 := %preset[37]
  18869. $qsfxg := %preset[40]
  18870. $aaf4s := %preset[43]
  18871. $eai4d := %preset[52]
  18872. $r0khx := %preset[55]
  18873. $zktrd := %preset[310]
  18874. $sseum := %preset[320]
  18875. $3tqoo := %preset[330]
  18876. $1tszb := %preset[335]
  18877. $l2tv1 := %preset[202]
  18878. $c21kk := %preset[205]
  18879. $uvcxk := %preset[215]
  18880. $dgu14 := %preset[234]
  18881. $qbesm := %preset[1012]
  18882. $tqsps := %preset[1015]
  18883. $4knyg := %preset[1018]
  18884. $x5zyo := %preset[1021]
  18885. $3xmqt := %preset[1024]
  18886. $c30oe := %preset[1027]
  18887. $41deb := %preset[1030]
  18888. $ynoq5 := %preset[1033]
  18889. $33zwn := %preset[1036]
  18890. $p0hox := %preset[1039]
  18891. $bokn2 := %preset[1042]
  18892. $xxdkc := %preset[1045]
  18893. $dyqeg := %preset[1048]
  18894. $nznqd := %preset[1051]
  18895. $zprpl := %preset[1054]
  18896. $bpu3e := %preset[1057]
  18897. $s20mm := %preset[1060]
  18898. $5q021 := %preset[1063]
  18899. $fnpd2 := %preset[1066]
  18900. $wmqep := %preset[1069]
  18901. $gsxh3 := %preset[1072]
  18902. $edhpo := %preset[1075]
  18903. $ei4rr := %preset[1078]
  18904. $nfnkh := %preset[1081]
  18905. $xug04 := %preset[1084]
  18906. $bvaw5 := %preset[1087]
  18907. $54gsh := %preset[1090]
  18908. $xgma4 := %preset[1093]
  18909. $4ppiu := %preset[1096]
  18910. $2lmoo := %preset[1099]
  18911. $ajka4 := %preset[1102]
  18912. $kw31l := %preset[1105]
  18913. $za4fi := %preset[1108]
  18914. $zctyt := %preset[1111]
  18915. $nqqg3 := %preset[1114]
  18916. $et1j2 := %preset[1117]
  18917. $ouvzc := %preset[1120]
  18918. $yi2x2 := %preset[1123]
  18919. $yr3xi := %preset[1126]
  18920. $tcdg3 := %preset[1206]
  18921. $ud2dz := %preset[1200]
  18922. $b4qif := %preset[1203]
  18923. $ppztm := %preset[1000]
  18924. $mjxc2 := %preset[1003]
  18925. $uvwcc := %preset[1006]
  18926. $ev1e5 := %preset[1009]
  18927. $3fqin := %preset[13]
  18928. $h11uu := %preset[208]
  18929. $nwl2v := %preset[46]
  18930. $wfiom := %preset[49]
  18931. $ufbsw := %preset[222]
  18932. $maq5o := %preset[225]
  18933. $lqoqt := %preset[228]
  18934. $zqnbc := %preset[231]
  18935. $u51dh := %preset[211]
  18936. $2qveo := %preset[212]
  18937. $fjnu3 := %preset[213]
  18938. $tz115 := %preset[214]
  18939. $2d1qh := %preset[218]
  18940. $az3wx := %preset[250]
  18941. $ki4hc := %preset[251]
  18942. $y4fhf := %preset[252]
  18943. $cfneg := %preset[253]
  18944. $kpiih := %preset[1129]
  18945. $ddusk := %preset[1130]
  18946. $ysdm4 := %preset[1131]
  18947. $dtugu := %preset[1132]
  18948. $pvege := %preset[1133]
  18949. $iggz4 := %preset[1134]
  18950. $5ernz := %preset[1135]
  18951. $gepsm := %preset[1136]
  18952. $qtif2 := %preset[1137]
  18953. $dtx0r := %preset[1138]
  18954. $ophyd := %preset[1139]
  18955. $ydeyc := %preset[1140]
  18956. $ppaoe := %preset[58]
  18957. $ork5f := %preset[59]
  18958. $dg3qf := %preset[60]
  18959. $p3vhn := %preset[61]
  18960. $qwf1w := %preset[63]
  18961. $fflhr := %preset[1207]
  18962. $rpdbb := %preset[1208]
  18963. $3imfl := %preset[1201]
  18964. $v2kdj := %preset[1202]
  18965. $uqaye := %preset[1204]
  18966. $tpmdd := %preset[1205]
  18967. $gwhxp := %preset[1001]
  18968. $r0mpl := %preset[1002]
  18969. $bxtyp := %preset[1004]
  18970. $a1mcv := %preset[1005]
  18971. $xcb2e := %preset[1007]
  18972. $h5tys := %preset[1008]
  18973. $vtpyr := %preset[1010]
  18974. $mophf := %preset[1011]
  18975. $24riz := %preset[1013]
  18976. $e2h4j := %preset[1014]
  18977. $51jvx := %preset[1016]
  18978. $lqfpr := %preset[1017]
  18979. $rsero := %preset[1019]
  18980. $sejrr := %preset[1020]
  18981. $os0gc := %preset[1022]
  18982. $2iqnc := %preset[1023]
  18983. $0nwvw := %preset[1025]
  18984. $o0yx0 := %preset[1026]
  18985. $iwhhy := %preset[1028]
  18986. $lafc5 := %preset[1029]
  18987. $5yyj1 := %preset[1031]
  18988. $nj3pk := %preset[1032]
  18989. $brpj3 := %preset[1034]
  18990. $b1s4y := %preset[1035]
  18991. $hwhlk := %preset[1037]
  18992. $1kgif := %preset[1038]
  18993. $2ytkr := %preset[1040]
  18994. $s2dqk := %preset[1041]
  18995. $ak4fz := %preset[1043]
  18996. $0zrh0 := %preset[1044]
  18997. $pqxkq := %preset[1046]
  18998. $mgevd := %preset[1047]
  18999. $cz5nc := %preset[1049]
  19000. $n32ls := %preset[1050]
  19001. $pa1jg := %preset[1052]
  19002. $51guv := %preset[1053]
  19003. $hfm3k := %preset[1055]
  19004. $k3qfg := %preset[1056]
  19005. $fnxkg := %preset[1058]
  19006. $d4ity := %preset[1059]
  19007. $i5nrk := %preset[1061]
  19008. $cm0ux := %preset[1062]
  19009. $fm2z3 := %preset[1064]
  19010. $q1g2q := %preset[1065]
  19011. $cakzn := %preset[1067]
  19012. $rjvzf := %preset[1068]
  19013. $oybgu := %preset[1070]
  19014. $nrlyv := %preset[1071]
  19015. $jkr4m := %preset[1073]
  19016. $qvjwi := %preset[1074]
  19017. $dero1 := %preset[1076]
  19018. $no43m := %preset[1077]
  19019. $2ptey := %preset[1079]
  19020. $k20qf := %preset[1080]
  19021. $lxste := %preset[1082]
  19022. $3drha := %preset[1083]
  19023. $hqxeu := %preset[1085]
  19024. $0zlbe := %preset[1088]
  19025. $h4nrw := %preset[1091]
  19026. $pg4ei := %preset[1094]
  19027. $2bixl := %preset[1097]
  19028. $5jo04 := %preset[1100]
  19029. $iw2oc := %preset[1086]
  19030. $exjvd := %preset[1089]
  19031. $hr3vo := %preset[1092]
  19032. $d0pbl := %preset[1095]
  19033. $oxbzh := %preset[1098]
  19034. $2moaw := %preset[1101]
  19035. $dhmoe := %preset[1103]
  19036. $sw0os := %preset[1104]
  19037. $0shp5 := %preset[1106]
  19038. $pjmqm := %preset[1107]
  19039. $21luc := %preset[1109]
  19040. $ujr4n := %preset[1110]
  19041. $p4vlm := %preset[1112]
  19042. $2cyex := %preset[1113]
  19043. $u45os := %preset[1115]
  19044. $4ng2b := %preset[1116]
  19045. $opstl := %preset[1118]
  19046. $w3nfb := %preset[1119]
  19047. $f3pav := %preset[1121]
  19048. $i1321 := %preset[1122]
  19049. $nrkm4 := %preset[1124]
  19050. $lczp2 := %preset[1125]
  19051. $yixdb := %preset[1127]
  19052. $fr5xq := %preset[1128]
  19053. $qxgdn := %preset[750]
  19054. $ilpk2 := %preset[751]
  19055. $jiutx := %preset[752]
  19056. $2zugt := %preset[311]
  19057. $vas4o := %preset[312]
  19058. $doz2m := %preset[313]
  19059. $e2mne := %preset[314]
  19060. $l4ujc := %preset[315]
  19061. $rj2yq := %preset[316]
  19062. $1wrdd := %preset[323]
  19063. $eu0kx := %preset[324]
  19064. $bi544 := %preset[321]
  19065. $y3s33 := %preset[322]
  19066. $x02cl := %preset[325]
  19067. $s2bg4 := %preset[326]
  19068. $ytzwi := %preset[350]
  19069. $gllpo := %preset[351]
  19070. $cvjhr := %preset[352]
  19071. $f3u5d := %preset[550]
  19072. $hn35i := %preset[551]
  19073. $fpvgj := %preset[552]
  19074. $yexen := %preset[331]
  19075. $v1jgb := %preset[336]
  19076. $zi2jx := %preset[332]
  19077. $gxopj := %preset[337]
  19078. $1fo5x := %preset[333]
  19079. $z1x5e := %preset[338]
  19080. $3k3u2 := %preset[334]
  19081. $13ap0 := %preset[339]
  19082. $gehcz := %preset[370]
  19083. $0qzrr := %preset[371]
  19084. $ihtwl := %preset[380]
  19085. $pzeed := %preset[381]
  19086. $ttvix := %preset[372]
  19087. $hj1x4 := %preset[382]
  19088. $2thol := %preset[300]
  19089. $jy3sd := %preset[301]
  19090. $siaxq := %preset[302]
  19091. $yazuk := %preset[303]
  19092. $zdrta := %preset[306]
  19093. $b4lv0 := %preset[0]
  19094. $ord01 := %preset[12]
  19095. $g345d := %preset[20]
  19096. $n0kha := %preset[23]
  19097. $2xzsd := %preset[26]
  19098. $5wlib := %preset[29]
  19099. $cx1ja := %preset[32]
  19100. $boshu := %preset[35]
  19101. $o5n5m := %preset[38]
  19102. $xeafk := %preset[41]
  19103. $3zolj := %preset[53]
  19104. $yl1h5 := %preset[56]
  19105. $sddk3 := %preset[44]
  19106. $neagb := %preset[18]
  19107. $51oxm := %preset[11]
  19108. $2zs5k := %preset[17]
  19109. $3pyb3 := %preset[21]
  19110. $u2pwx := %preset[24]
  19111. $ldi1z := %preset[27]
  19112. $eu2xe := %preset[30]
  19113. $qxhis := %preset[33]
  19114. $oicux := %preset[36]
  19115. $fzwxf := %preset[39]
  19116. $52sa5 := %preset[42]
  19117. $r3d0o := %preset[54]
  19118. $yqtdo := %preset[57]
  19119. $nplew := %preset[45]
  19120. $xc3po := %preset[16]
  19121. $k21jk := %preset[62]
  19122. $q5pfd := %preset[14]
  19123. $m0zqt := %preset[15]
  19124. $spdyk := %preset[10]
  19125. $pk0h4 := %preset[47]
  19126. $u2ki4 := %preset[48]
  19127. $0hnr5 := %preset[50]
  19128. $tmtfv := %preset[51]
  19129. $gnlj2 := %preset[66]
  19130. $linka := %preset[70]
  19131. $va2lk := %preset[64]
  19132. $y1mc2 := %preset[65]
  19133. $p5wl1 := %preset[71]
  19134. $xrt5z := %preset[72]
  19135. $hdmk1 := %preset[201]
  19136. $zv33b := %preset[203]
  19137. $eg3kt := %preset[206]
  19138. $t4vew := %preset[200]
  19139. $dbgkf := %preset[204]
  19140. $2vyff := %preset[207]
  19141. $rgoik := %preset[209]
  19142. $1xnyu := %preset[210]
  19143. $ia54c := %preset[216]
  19144. $wh1ke := %preset[217]
  19145. $lk05f := %preset[220]
  19146. $2qtv2 := %preset[221]
  19147. $3s02f := %preset[223]
  19148. $3rcax := %preset[224]
  19149. $410y5 := %preset[226]
  19150. $5qrmj := %preset[227]
  19151. $begpw := %preset[229]
  19152. $f0ljx := %preset[230]
  19153. $llm0i := %preset[232]
  19154. $5m5qp := %preset[233]
  19155. $5l3um := %preset[235]
  19156. $f4o1c := %preset[236]
  19157. $ruhe4 := %preset[4000]
  19158. $ojboo := %preset[4001]
  19159. $q0o5r := %preset[4002]
  19160. $0erls := %preset[4003]
  19161. $2v40q := %preset[4004]
  19162. $k5z4u := %preset[4005]
  19163. $1ybzi := %preset[4011]
  19164. $qbhb5 := %preset[4014]
  19165. $qb5xv := %preset[4017]
  19166. $rpaco := %preset[4012]
  19167. $m5sxk := %preset[4015]
  19168. $0vs3i := %preset[4018]
  19169. $ius2b := %preset[4010]
  19170. $3rksw := %preset[4013]
  19171. $q0rb2 := %preset[4016]
  19172. $dyo2q := %preset[237]
  19173. $mcp2m := %preset[238]
  19174. $543zt := %preset[340]
  19175. $lynqa := %preset[341]
  19176. $cbkgv := %preset[342]
  19177. $cxfv2 := %preset[343]
  19178. $uyjwl := %preset[344]
  19179. $4so5t := %preset[345]
  19180. $q1nql := %preset[346]
  19181. $5q4fp := %preset[347]
  19182. $y3mgr := 0
  19183. while ($y3mgr<num_elements(%w0xec))
  19184. %w0xec[$y3mgr] := %preset[400+$y3mgr]
  19185. inc($y3mgr)
  19186. end while
  19187. $y3mgr := 0
  19188. while ($y3mgr<num_elements(%rzzs4))
  19189. %rzzs4[$y3mgr] := %preset[600+$y3mgr]
  19190. inc($y3mgr)
  19191. end while
  19192. $y3mgr := 0
  19193. while ($y3mgr<num_elements(%lfbyb))
  19194. %lfbyb[$y3mgr] := %preset[800+$y3mgr]
  19195. inc($y3mgr)
  19196. end while
  19197. $y3mgr := 0
  19198. while ($y3mgr<num_elements(%bswku))
  19199. %bswku[$y3mgr] := %preset[900+$y3mgr]
  19200. inc($y3mgr)
  19201. end while
  19202. $y3mgr := 0
  19203. while ($y3mgr<num_elements(%vhqqa))
  19204. %vhqqa[$y3mgr] := %preset[$00fmj+$y3mgr]
  19205. inc($y3mgr)
  19206. end while
  19207. $y3mgr := 0
  19208. while ($y3mgr<num_elements(%rx3ip))
  19209. %rx3ip[$y3mgr] := %preset[$vhkpx+$y3mgr]
  19210. inc($y3mgr)
  19211. end while
  19212. $y3mgr := 0
  19213. while ($y3mgr<num_elements(%pyeoz))
  19214. %pyeoz[$y3mgr] := %preset[4200+$y3mgr]
  19215. inc($y3mgr)
  19216. end while
  19217. $y3mgr := 0
  19218. while ($y3mgr<num_elements(%0lu1d))
  19219. %0lu1d[$y3mgr] := %preset[4100+$y3mgr]
  19220. inc($y3mgr)
  19221. end while
  19222. $fg4rw := 0
  19223. while ($fg4rw<num_elements(%3zszw))
  19224. %3zszw[$fg4rw] := %vhqqa[$fg4rw]
  19225. %45vq1[$fg4rw] := %vhqqa[48+$fg4rw]
  19226. %l2lis[$fg4rw] := %vhqqa[96+$fg4rw]
  19227. %pqcgh[$fg4rw] := %vhqqa[144+$fg4rw]
  19228. %sxlyt[$fg4rw] := %vhqqa[192+$fg4rw]
  19229. inc($fg4rw)
  19230. end while
  19231. call convert_preset_data_to_current_version
  19232. $pilpf := %smp_l_grp[$51oxm]
  19233. $421rl := 1
  19234. $k240z := 1
  19235. call update_ui_after_preset_reload
  19236. if ($cz3ou=1)
  19237. exit
  19238. end if
  19239. $d1d43 := -1
  19240. end if
  19241. if ($NI_ASYNC_ID=$hojz4)
  19242. if ($NI_ASYNC_EXIT_STATUS=0)
  19243. $hojz4 := -1
  19244. end if
  19245. $m2etg := 0
  19246. end if
  19247. if ($NI_ASYNC_ID=$bu04v)
  19248. $m2etg := 0
  19249. end if
  19250. if ($NI_ASYNC_ID=$ygbjm)
  19251. $ygbjm := $NI_ASYNC_EXIT_STATUS-1
  19252. end if
  19253. end on
  19254. on pgs_changed
  19255. if (pgs_key_exists(PGS_FUNC))
  19256. select (pgs_get_key_val(PGS_FUNC,0))
  19257. case 2
  19258. $hojz4 := load_array_str(%preset_buf,@ichwi & !4jeon[$pgdcw] & "/" & $euybr & ".nka")
  19259. case 3
  19260. $hojz4 := load_array_str(%stepper__preset_vals,@ichwi & !4jeon[$pgdcw] & "/" & $euybr & ".nka")
  19261. case 5
  19262. $d1d43 := load_array_str(%preset,@3cyqr)
  19263. case 9
  19264. wait_async(load_array_str(%arp__preset_vals,@ichwi & "ARP/" & $ojboo & ".nka"))
  19265. call ARP__restore_from_preset_buffer
  19266. call ARP__on_mode_changed
  19267. call ARP__update_seq_tables
  19268. call ARP__update_mod_knob_ui
  19269. call ARP__update_all_automation_labels
  19270. end select
  19271. end if
  19272. end on
  19273. on ui_control($t4vew)
  19274. if ($t4vew=0)
  19275. set_ui_wf_property($tmcuy,$UI_WF_PROP_PLAY_CURSOR,0,-1)
  19276. end if
  19277. end on
  19278. on ui_control(?51qxr)
  19279. $r0pwv := real_to_int(round(?51qxr[0]*int_to_real(get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_WIDTH))))+get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_POS_X)
  19280. select ($NI_MOUSE_EVENT_TYPE)
  19281. case 1
  19282. ~chanf := ?51qxr[0]
  19283. $xpd30 := $r0khx
  19284. $eyamh := $eai4d
  19285. if (in_range($r0pwv,get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X),get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($q5i1b),$CONTROL_PAR_WIDTH)) and ($linka=1))
  19286. $bygzx := 3
  19287. else
  19288. if (in_range($r0pwv,get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X)-((get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X)-(get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($hnp3t),$CONTROL_PAR_WIDTH)))/2),get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_POS_X)+get_control_par(get_ui_id($q3vtp),$CONTROL_PAR_WIDTH)))
  19289. $bygzx := 2
  19290. else
  19291. $bygzx := 1
  19292. end if
  19293. end if
  19294. case 2
  19295. if ($0ib2k # 1 and ($v5b0i=1))
  19296. $0ib2k := 1
  19297. call NAV_PAGE__update_main_nav
  19298. end if
  19299. if ($bygzx=3 and (get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_KEY_ALT)=1) and (get_control_par(get_ui_id(?51qxr),$CONTROL_PAR_KEY_SHIFT)=1) and ($v5b0i=1))
  19300. ~u0ht0 := ~tptmd
  19301. ~tptmd := int_to_real($wo1eq+($i11wt*($liaof+($5wlib*%ppvim[$eu2xe]/1000))))/int_to_real(%smp_l_grp[$51oxm]*1000)
  19302. $gnlj2 := real_to_int(~tptmd*1000000.0)
  19303. $r0pwv := real_to_int(~u0ht0*int_to_real(%smp_l_grp[$51oxm]*1000))
  19304. $r0pwv := ($r0pwv-$wo1eq)/$i11wt
  19305. $r0pwv := $r0pwv-($5wlib*%ppvim[$eu2xe]/1000)
  19306. $liaof := $r0pwv*(1+(sh_right(1000-$r0pwv,31) .or. sh_right($r0pwv-1,31)))-sh_right($r0pwv-1,31)-(1000*sh_right(1000-$r0pwv,31))
  19307. $gpzoi := 15
  19308. call _update_mod_knob_range_indicator_for_gl_m_id
  19309. call _update_mod_knob_rt_indicator_for_gl_m_id
  19310. call update_g_pos_hit_anker_ui
  19311. end if
  19312. case 3
  19313. if ($bygzx=2)
  19314. if (~chanf>0.95 or (real_to_int(~chanf*1000.0)<$xpd30))
  19315. $r0pwv := $xpd30-real_to_int((~chanf-?51qxr[0])*1000.0)
  19316. else
  19317. $r0pwv := real_to_int((?51qxr[0]-~chanf)*(1000.0-int_to_real($xpd30))/(1.0-~chanf)+int_to_real($xpd30))
  19318. end if
  19319. $r0khx := $r0pwv*(1+(sh_right(1000-$r0pwv,31) .or. sh_right($r0pwv-0,31)))-0-(1000*sh_right(1000-$r0pwv,31))
  19320. $gpzoi := 25
  19321. call _update_mod_knob_range_indicator_for_gl_m_id
  19322. call _update_mod_knob_rt_indicator_for_gl_m_id
  19323. else
  19324. if ($bygzx=1)
  19325. if (~chanf<0.05 or (real_to_int(~chanf*1000.0)>$eyamh))
  19326. $r0pwv := $eyamh-real_to_int((~chanf-?51qxr[0])*1000.0)
  19327. else
  19328. $r0pwv := real_to_int((?51qxr[0]-0.0)*(int_to_real($eyamh)-0.0)/(~chanf-0.0))
  19329. end if
  19330. $eai4d := $r0pwv*(1+(sh_right(1000-$r0pwv,31) .or. sh_right($r0pwv-0,31)))-0-(1000*sh_right(1000-$r0pwv,31))
  19331. $gpzoi := 24
  19332. call _update_mod_knob_range_indicator_for_gl_m_id
  19333. call _update_mod_knob_rt_indicator_for_gl_m_id
  19334. else
  19335. if ($bygzx=3)
  19336. ~tptmd := ?51qxr[0]
  19337. $gnlj2 := real_to_int(~tptmd*1000000.0)
  19338. call update_g_pos_hit_anker_ui
  19339. end if
  19340. end if
  19341. end if
  19342. end select
  19343. $v5b0i := $NI_MOUSE_EVENT_TYPE
  19344. end on
  19345. on ui_control(?3lzme)
  19346. select ($NI_MOUSE_EVENT_TYPE)
  19347. case 2
  19348. if ($0ib2k # 2 and ($rlhoi=1))
  19349. $0ib2k := 2
  19350. call NAV_PAGE__update_main_nav
  19351. exit
  19352. end if
  19353. call update_std_start_offs_from_s_wf_xy
  19354. case 3
  19355. call update_std_start_offs_from_s_wf_xy
  19356. end select
  19357. $rlhoi := $NI_MOUSE_EVENT_TYPE
  19358. end on
  19359. on ui_control($linka)
  19360. %1iv2s[($linka+1) mod 2] := $sgbvz
  19361. $sgbvz := %1iv2s[$linka]
  19362. $gpzoi := 16
  19363. call _update_mod_knob_range_indicator_for_gl_m_id
  19364. call _update_mod_knob_rt_indicator_for_gl_m_id
  19365. call _update_mod_knob_automation_label_for_gl_m_id
  19366. call _update_mod_knob_label_for_gl_m_id
  19367. if (~tptmd=0.0 and ($liaof=1))
  19368. ~tptmd := int_to_real($r0khx)/1000.0+(int_to_real($eai4d)/1000.0*int_to_real($k21jk))
  19369. $gnlj2 := real_to_int(~tptmd*1000000.0)
  19370. end if
  19371. $pqpgc := real_to_int((int_to_real($sgbvz)+(int_to_real($cx1ja*%ppvim[$qxhis])/1000.0)+8000.0)/16001.0*17.0)
  19372. call update_g_pos_hit_anker_ui
  19373. end on
  19374. on ui_control($va2lk)
  19375. set_control_par_str(get_ui_id($va2lk),$CONTROL_PAR_PICTURE,"GE_g_crs_rel_dir_" & $va2lk)
  19376. end on
  19377. on ui_control($fdz1c)
  19378. $fdz1c := 0
  19379. $y1mc2 := $y1mc2+1-(-sh_right(16-($y1mc2+1),31)*($y1mc2+1-16))
  19380. end on
  19381. on ui_control($b2d3h)
  19382. $b2d3h := 0
  19383. $y1mc2 := $y1mc2-1+(-sh_right($y1mc2-1-1,31)*(1-($y1mc2-1)))
  19384. end on
  19385. on ui_control($aewcf)
  19386. call on_g_user_sample_root_key_changed
  19387. end on
  19388. on ui_control($wzxlg)
  19389. $dyt1q := $aewcf+get_control_par(get_ui_id($wzxlg),$CONTROL_PAR_KEY_ALT)+((.not. get_control_par(get_ui_id($wzxlg),$CONTROL_PAR_KEY_ALT) .and. 1)*12)
  19390. if (in_range($dyt1q,0,127))
  19391. $aewcf := $dyt1q
  19392. call on_g_user_sample_root_key_changed
  19393. end if
  19394. end on
  19395. on ui_control($r5bjx)
  19396. $dyt1q := $aewcf-(get_control_par(get_ui_id($r5bjx),$CONTROL_PAR_KEY_ALT)+((.not. get_control_par(get_ui_id($r5bjx),$CONTROL_PAR_KEY_ALT) .and. 1)*12))
  19397. if (in_range($dyt1q,0,127))
  19398. $aewcf := $dyt1q
  19399. call on_g_user_sample_root_key_changed
  19400. end if
  19401. end on
  19402. on ui_control($v3y5j)
  19403. call on_s_user_sample_root_key_changed
  19404. end on
  19405. on ui_control($ozbon)
  19406. $dyt1q := $v3y5j+get_control_par(get_ui_id($ozbon),$CONTROL_PAR_KEY_ALT)+((.not. get_control_par(get_ui_id($ozbon),$CONTROL_PAR_KEY_ALT) .and. 1)*12)
  19407. if (in_range($dyt1q,0,127))
  19408. $v3y5j := $dyt1q
  19409. call on_s_user_sample_root_key_changed
  19410. end if
  19411. end on
  19412. on ui_control($uceyz)
  19413. $dyt1q := $v3y5j-(get_control_par(get_ui_id($uceyz),$CONTROL_PAR_KEY_ALT)+((.not. get_control_par(get_ui_id($uceyz),$CONTROL_PAR_KEY_ALT) .and. 1)*12))
  19414. if (in_range($dyt1q,0,127))
  19415. $v3y5j := $dyt1q
  19416. call on_s_user_sample_root_key_changed
  19417. end if
  19418. end on
  19419. on ui_control($v3pyu)
  19420. select ($NI_MOUSE_EVENT_TYPE)
  19421. case $NI_MOUSE_EVENT_TYPE_DRAG
  19422. if (num_elements(!NI_DND_ITEMS_AUDIO)=1 or ($zylsx=1))
  19423. $zylsx := ($zylsx+1) mod 2
  19424. $dyt1q := $zylsx
  19425. if ($lxku3=1 and ($zylsx=0))
  19426. $dyt1q := 3
  19427. end if
  19428. set_control_par_str(get_ui_id(?51qxr),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & $0ib2k & $dyt1q)
  19429. if (not ($51oxm=263 and (get_sample_length(%NI_USER_ZONE_IDS[0])=0)))
  19430. $dyt1q := $lxku3*$HIDE_PART_NOTHING+((.not. $lxku3 .and. 1)*$HIDE_PART_BG)
  19431. set_control_par(get_ui_id(?51qxr),$CONTROL_PAR_HIDE,$zylsx*$HIDE_PART_NOTHING+((.not. $zylsx .and. 1)*$dyt1q))
  19432. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HIDE,$zylsx*$HIDE_WHOLE_CONTROL+((.not. $zylsx .and. 1)*$HIDE_PART_BG))
  19433. $dyt1q := $lxku3*$HIDE_WHOLE_CONTROL+((.not. $lxku3 .and. 1)*$HIDE_PART_NOTHING)
  19434. set_control_par(get_ui_id($hnp3t),$CONTROL_PAR_HIDE,$zylsx*$HIDE_WHOLE_CONTROL+((.not. $zylsx .and. 1)*$dyt1q))
  19435. set_control_par(get_ui_id($q3vtp),$CONTROL_PAR_HIDE,$zylsx*$HIDE_WHOLE_CONTROL+((.not. $zylsx .and. 1)*$dyt1q))
  19436. call update_g_pos_hit_anker_ui
  19437. end if
  19438. end if
  19439. case $NI_MOUSE_EVENT_TYPE_DROP
  19440. $zylsx := 0
  19441. if ($NUM_GROUPS=365)
  19442. if (num_elements(!NI_DND_ITEMS_AUDIO)=1)
  19443. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  19444. set_control_par_str(get_ui_id(?51qxr),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & $0ib2k & 2)
  19445. @4xudw := !NI_DND_ITEMS_AUDIO[0]
  19446. wait_async(set_sample(%NI_USER_ZONE_IDS[0],@4xudw))
  19447. @vzouq := get_sample(%NI_USER_ZONE_IDS[0],$NI_FILE_NAME)
  19448. wait_async(detect_pitch(%NI_USER_ZONE_IDS[0],~spjzv))
  19449. if (~spjzv=~NI_DETECT_PITCH_INVALID)
  19450. ~spjzv := 60.0
  19451. $3pvid := 1
  19452. call update_modal_dialog_lbl
  19453. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT," Pitch could not be detected. Please set the root key and pitch manually.")
  19454. end if
  19455. if (~spjzv<48.0)
  19456. ~spjzv := 60.0+(~spjzv-(floor(~spjzv/12.0)*12.0))
  19457. end if
  19458. $aewcf := real_to_int(round(~spjzv))
  19459. ~spjzv := 100.0*(round(~spjzv)-~spjzv)
  19460. wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_ROOT_KEY,$aewcf))
  19461. wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_TUNE,real_to_int(~spjzv)))
  19462. wait_async(detect_peak(%NI_USER_ZONE_IDS[0],~fbacu))
  19463. if (~fbacu=~NI_DETECT_PEAK_INVALID)
  19464. ~fbacu := 0.0
  19465. end if
  19466. if (~fbacu<-36.0)
  19467. ~fbacu := -36.0
  19468. end if
  19469. wait_async(set_zone_par(%NI_USER_ZONE_IDS[0],$ZONE_PAR_VOLUME,real_to_int(-~fbacu*100.0)))
  19470. $51oxm := 263
  19471. %smp_l_grp[263] := get_sample_length(%NI_USER_ZONE_IDS[0])/1000
  19472. $lxku3 := -sh_right(abs(get_sample_length(%NI_USER_ZONE_IDS[0])-0)-1,31)
  19473. if ($lxku3=1)
  19474. $3pvid := 1
  19475. call update_modal_dialog_lbl
  19476. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"The file could not be loaded !")
  19477. end if
  19478. %jj5qi[0] := 263
  19479. $dyt1q := -1
  19480. $fg4rw := 0
  19481. while ($fg4rw<%k4yha[0])
  19482. if (%3owef[$fg4rw]=263)
  19483. $dyt1q := $fg4rw
  19484. $fg4rw := %k4yha[0]
  19485. end if
  19486. inc($fg4rw)
  19487. end while
  19488. %kt24s[0] := $dyt1q
  19489. call update_rootkey_array_for_g_user_sample
  19490. call prepare_purge
  19491. $rlfxd := 0
  19492. while ($rlfxd<$NUM_GROUPS)
  19493. purge_group($rlfxd,%tuuuf[$rlfxd])
  19494. inc($rlfxd)
  19495. end while
  19496. call update_all_WF_for_default_key
  19497. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
  19498. else
  19499. $3pvid := 1
  19500. call update_modal_dialog_lbl
  19501. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT," Sorry, you can only drop a single wav/ncw/aif file onto Straylight.")
  19502. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
  19503. end if
  19504. else
  19505. $3pvid := 1
  19506. call update_modal_dialog_lbl
  19507. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Please reload the Straylight nki from the Library Tab to enabled the drag and drop functionality.")
  19508. set_control_par(get_ui_id($4lo3h),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
  19509. end if
  19510. call on_selected_g_group_changed
  19511. end select
  19512. end on
  19513. on ui_control($fi22y)
  19514. select ($NI_MOUSE_EVENT_TYPE)
  19515. case $NI_MOUSE_EVENT_TYPE_DRAG
  19516. if (num_elements(!NI_DND_ITEMS_AUDIO)=1 or ($nfr15=1))
  19517. $nfr15 := ($nfr15+1) mod 2
  19518. $dyt1q := $nfr15
  19519. if ($x1spm=1 and ($nfr15=0))
  19520. $dyt1q := 3
  19521. end if
  19522. set_control_par_str(get_ui_id(?3lzme),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & ($0ib2k/2+($0ib2k/2*$mcp2m)) & $dyt1q)
  19523. if (not ($hdmk1=364 and (get_sample_length(%NI_USER_ZONE_IDS[1])=0)))
  19524. $dyt1q := $x1spm*$HIDE_PART_NOTHING+((.not. $x1spm .and. 1)*$HIDE_PART_BG)
  19525. set_control_par(get_ui_id(?3lzme),$CONTROL_PAR_HIDE,$nfr15*$HIDE_PART_NOTHING+((.not. $nfr15 .and. 1)*$dyt1q))
  19526. $dyt1q := $x1spm*$HIDE_WHOLE_CONTROL+((.not. $x1spm .and. 1)*$HIDE_PART_BG)
  19527. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE,$nfr15*$HIDE_WHOLE_CONTROL+((.not. $nfr15 .and. 1)*$dyt1q))
  19528. $dyt1q := $x1spm*$HIDE_WHOLE_CONTROL+((.not. $x1spm .and. 1)*$HIDE_PART_NOTHING)
  19529. set_control_par(get_ui_id($rgqvn),$CONTROL_PAR_HIDE,$nfr15*$HIDE_WHOLE_CONTROL+((.not. $nfr15 .and. 1)*$dyt1q))
  19530. if ($0ib2k=2)
  19531. set_control_par(get_ui_id($k5o2p),$CONTROL_PAR_HIDE,$nfr15*$HIDE_WHOLE_CONTROL+((.not. $nfr15 .and. 1)*$dyt1q))
  19532. end if
  19533. end if
  19534. end if
  19535. case $NI_MOUSE_EVENT_TYPE_DROP
  19536. $nfr15 := 0
  19537. if ($NUM_GROUPS=365)
  19538. if (num_elements(!NI_DND_ITEMS_AUDIO)=1)
  19539. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE,$HIDE_WHOLE_CONTROL)
  19540. set_control_par_str(get_ui_id(?3lzme),$CONTROL_PAR_PICTURE,"GE_DnD_Area_" & ($0ib2k/2+($0ib2k/2*$mcp2m)) & 2)
  19541. @g233i := !NI_DND_ITEMS_AUDIO[0]
  19542. wait_async(set_sample(%NI_USER_ZONE_IDS[1],@g233i))
  19543. @bnt5b := get_sample(%NI_USER_ZONE_IDS[1],$NI_FILE_NAME)
  19544. wait_async(detect_pitch(%NI_USER_ZONE_IDS[1],~qzdh0))
  19545. if (~qzdh0=~NI_DETECT_PITCH_INVALID)
  19546. ~qzdh0 := 60.0
  19547. $3pvid := 1
  19548. call update_modal_dialog_lbl
  19549. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT," Pitch could not be detected. Please set the root key and pitch manually.")
  19550. end if
  19551. if (~qzdh0<48.0)
  19552. ~qzdh0 := 60.0+(~qzdh0-(floor(~qzdh0/12.0)*12.0))
  19553. end if
  19554. $v3y5j := real_to_int(round(~qzdh0))
  19555. ~qzdh0 := 100.0*(round(~qzdh0)-~qzdh0)
  19556. wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_ROOT_KEY,$v3y5j))
  19557. wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_TUNE,real_to_int(~qzdh0)))
  19558. wait_async(detect_peak(%NI_USER_ZONE_IDS[1],~rhrbs))
  19559. if (~rhrbs=~NI_DETECT_PEAK_INVALID)
  19560. ~rhrbs := 0.0
  19561. end if
  19562. if (~rhrbs<-36.0)
  19563. ~rhrbs := -36.0
  19564. end if
  19565. wait_async(set_zone_par(%NI_USER_ZONE_IDS[1],$ZONE_PAR_VOLUME,real_to_int(-~rhrbs*100.0)))
  19566. $hdmk1 := 364
  19567. %std_smp_l_grp[$hdmk1] := get_sample_length(%NI_USER_ZONE_IDS[1])/1000
  19568. $x1spm := -sh_right(abs(get_sample_length(%NI_USER_ZONE_IDS[1])-0)-1,31)
  19569. if ($x1spm=1)
  19570. $3pvid := 1
  19571. call update_modal_dialog_lbl
  19572. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"The file could not be loaded !")
  19573. end if
  19574. %jj5qi[1] := 100
  19575. $dyt1q := -1
  19576. $fg4rw := 0
  19577. while ($fg4rw<%k4yha[1])
  19578. if (%3owef[500+$fg4rw]=100)
  19579. $dyt1q := $fg4rw
  19580. $fg4rw := %k4yha[1]
  19581. end if
  19582. inc($fg4rw)
  19583. end while
  19584. %kt24s[1] := $dyt1q
  19585. call prepare_purge
  19586. $rlfxd := 0
  19587. while ($rlfxd<$NUM_GROUPS)
  19588. purge_group($rlfxd,%tuuuf[$rlfxd])
  19589. inc($rlfxd)
  19590. end while
  19591. call update_all_WF_for_default_key
  19592. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
  19593. else
  19594. $3pvid := 1
  19595. call update_modal_dialog_lbl
  19596. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT," Sorry, you can only drop a single wav/ncw/aif file onto Straylight.")
  19597. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
  19598. end if
  19599. else
  19600. $3pvid := 1
  19601. call update_modal_dialog_lbl
  19602. set_control_par_str(get_ui_id($xhutf),$CONTROL_PAR_TEXT,"Please reload the Straylight nki from the Library Tab to enabled the drag and drop functionality.")
  19603. set_control_par(get_ui_id($tmcuy),$CONTROL_PAR_HIDE,$HIDE_PART_BG)
  19604. end if
  19605. call on_selected_std_group_changed
  19606. end select
  19607. end on
  19608. on ui_control($a2kga)
  19609. $0ib2k := 1
  19610. call NAV_PAGE__update_main_nav
  19611. end on
  19612. on ui_control($rppxv)
  19613. $0ib2k := 2
  19614. call NAV_PAGE__update_main_nav
  19615. end on
  19616. on ui_control($mcp2m)
  19617. if (event_status($auli3)=$EVENT_STATUS_NOTE_QUEUE)
  19618. note_off($auli3)
  19619. %jnhix[%laljf[$auli3 mod 8192]] := 1
  19620. end if
  19621. $mcp2m := $mcp2m
  19622. call update_ARP_and_S_WF_area
  19623. call ARP__update_filter_src_menus
  19624. end on
  19625. on ui_control($p5wl1)
  19626. %pzp2y[($p5wl1+1) mod 2] := $bpkqt
  19627. $bpkqt := %pzp2y[$p5wl1]
  19628. $xrt5z := ($xrt5z+1) mod 4
  19629. call update_g_interval_mode
  19630. $gpzoi := 12
  19631. call _update_mod_knob_range_indicator_for_gl_m_id
  19632. call _update_mod_knob_rt_indicator_for_gl_m_id
  19633. call _update_mod_knob_automation_label_for_gl_m_id
  19634. call _update_mod_knob_label_for_gl_m_id
  19635. end on
  19636. on ui_control(?2jnfl)
  19637. $ptarc := 0
  19638. ~tllyo := ?2jnfl[0]
  19639. $sfqck := $NI_MOUSE_EVENT_TYPE
  19640. call TABS__on_xy
  19641. end on
  19642. on ui_control(?afz4n)
  19643. $ptarc := 1
  19644. ~tllyo := ?afz4n[0]
  19645. $sfqck := $NI_MOUSE_EVENT_TYPE
  19646. call TABS__on_xy
  19647. end on
  19648. on ui_control(?a14rv)
  19649. $ptarc := 2
  19650. ~tllyo := ?a14rv[0]
  19651. $sfqck := $NI_MOUSE_EVENT_TYPE
  19652. call TABS__on_xy
  19653. end on
  19654. on ui_control($1pewz)
  19655. $dyt1q := search(%ejazl,get_ui_id($1pewz))
  19656. $ptarc := $dyt1q/4
  19657. %v5xab[$ptarc] := $dyt1q mod 4
  19658. call TABS__selection_did_change
  19659. end on
  19660. on ui_control($nvtf2)
  19661. $dyt1q := search(%ejazl,get_ui_id($nvtf2))
  19662. $ptarc := $dyt1q/4
  19663. %v5xab[$ptarc] := $dyt1q mod 4
  19664. call TABS__selection_did_change
  19665. end on
  19666. on ui_control($dau0c)
  19667. $dyt1q := search(%ejazl,get_ui_id($dau0c))
  19668. $ptarc := $dyt1q/4
  19669. %v5xab[$ptarc] := $dyt1q mod 4
  19670. call TABS__selection_did_change
  19671. end on
  19672. on ui_control($fq2ca)
  19673. $dyt1q := search(%ejazl,get_ui_id($fq2ca))
  19674. $ptarc := $dyt1q/4
  19675. %v5xab[$ptarc] := $dyt1q mod 4
  19676. call TABS__selection_did_change
  19677. end on
  19678. on ui_control($imy0h)
  19679. $dyt1q := search(%ejazl,get_ui_id($imy0h))
  19680. $ptarc := $dyt1q/4
  19681. %v5xab[$ptarc] := $dyt1q mod 4
  19682. call TABS__selection_did_change
  19683. end on
  19684. on ui_control($rmb0e)
  19685. $dyt1q := search(%ejazl,get_ui_id($rmb0e))
  19686. $ptarc := $dyt1q/4
  19687. %v5xab[$ptarc] := $dyt1q mod 4
  19688. call TABS__selection_did_change
  19689. end on
  19690. on ui_control($ndbm1)
  19691. $dyt1q := search(%ejazl,get_ui_id($ndbm1))
  19692. $ptarc := $dyt1q/4
  19693. %v5xab[$ptarc] := $dyt1q mod 4
  19694. call TABS__selection_did_change
  19695. end on
  19696. on ui_control($mmx4s)
  19697. $dyt1q := search(%ejazl,get_ui_id($mmx4s))
  19698. $ptarc := $dyt1q/4
  19699. %v5xab[$ptarc] := $dyt1q mod 4
  19700. call TABS__selection_did_change
  19701. end on
  19702. on ui_control($eedi4)
  19703. $dyt1q := search(%ejazl,get_ui_id($eedi4))
  19704. $ptarc := $dyt1q/4
  19705. %v5xab[$ptarc] := $dyt1q mod 4
  19706. call TABS__selection_did_change
  19707. end on
  19708. on ui_control($sipdv)
  19709. $dyt1q := search(%ejazl,get_ui_id($sipdv))
  19710. $ptarc := $dyt1q/4
  19711. %v5xab[$ptarc] := $dyt1q mod 4
  19712. call TABS__selection_did_change
  19713. end on
  19714. on ui_control($l3a0o)
  19715. $dyt1q := search(%ejazl,get_ui_id($l3a0o))
  19716. $ptarc := $dyt1q/4
  19717. %v5xab[$ptarc] := $dyt1q mod 4
  19718. call TABS__selection_did_change
  19719. end on
  19720. on ui_control($frelg)
  19721. $dyt1q := search(%ejazl,get_ui_id($frelg))
  19722. $ptarc := $dyt1q/4
  19723. %v5xab[$ptarc] := $dyt1q mod 4
  19724. call TABS__selection_did_change
  19725. end on
  19726. on ui_control($qpt4p)
  19727. $jldiw := 0
  19728. call FX_UI__on_fx_cat_btn
  19729. end on
  19730. on ui_control($crmx3)
  19731. $jldiw := 1
  19732. call FX_UI__on_fx_cat_btn
  19733. end on
  19734. on ui_control($ej0s0)
  19735. $jldiw := 2
  19736. call FX_UI__on_fx_cat_btn
  19737. end on
  19738. on ui_control($0opdg)
  19739. $jldiw := 3
  19740. call FX_UI__on_fx_cat_btn
  19741. end on
  19742. on ui_control($2n2ws)
  19743. $jldiw := 4
  19744. call FX_UI__on_fx_cat_btn
  19745. end on
  19746. on ui_control($lvtvx)
  19747. $jldiw := 5
  19748. call FX_UI__on_fx_cat_btn
  19749. end on
  19750. on ui_control($vljka)
  19751. $jldiw := 6
  19752. call FX_UI__on_fx_cat_btn
  19753. end on
  19754. on ui_control($2s05o)
  19755. $jldiw := 7
  19756. call FX_UI__on_fx_cat_btn
  19757. end on
  19758. on ui_control($umlht)
  19759. $jldiw := 8
  19760. call FX_UI__on_fx_cat_btn
  19761. end on
  19762. on ui_control($zj0wn)
  19763. $jldiw := 9
  19764. call FX_UI__on_fx_cat_btn
  19765. end on
  19766. on ui_control($50dyn)
  19767. $jldiw := 10
  19768. call FX_UI__on_fx_cat_btn
  19769. end on
  19770. on ui_control($hpwcd)
  19771. $jldiw := 11
  19772. call FX_UI__on_fx_cat_btn
  19773. end on
  19774. on ui_control($cboaa)
  19775. $jldiw := 12
  19776. call FX_UI__on_fx_cat_btn
  19777. end on
  19778. on ui_control($l1jpb)
  19779. $jldiw := 13
  19780. call FX_UI__on_fx_cat_btn
  19781. end on
  19782. on ui_control($1vvs5)
  19783. $jldiw := 14
  19784. call FX_UI__on_fx_cat_btn
  19785. end on
  19786. on ui_control($2hnjg)
  19787. $jldiw := 15
  19788. call FX_UI__on_fx_cat_btn
  19789. end on
  19790. on ui_control($grc51)
  19791. $jldiw := 16
  19792. call FX_UI__on_fx_cat_btn
  19793. end on
  19794. on ui_control($2pvsn)
  19795. $jldiw := 17
  19796. call FX_UI__on_fx_cat_btn
  19797. end on
  19798. on ui_control($jhigl)
  19799. $jldiw := 18
  19800. call FX_UI__on_fx_cat_btn
  19801. end on
  19802. on ui_control($5ptjd)
  19803. $jldiw := 19
  19804. call FX_UI__on_fx_cat_btn
  19805. end on
  19806. on ui_control($gehcz)
  19807. call BUS1__update_mod_vals
  19808. call SUM__update_mod_vals
  19809. @uamno := $gehcz/10 & "." & abs($gehcz mod 10) & " %"
  19810. set_control_par_str(get_ui_id($gehcz),$CONTROL_PAR_LABEL,@uamno)
  19811. set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_PICTURE,"MK_Mask_5")
  19812. set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_TEXT,@uamno)
  19813. %gmios[0] := $ENGINE_UPTIME
  19814. if ($afnek=0 or (%hivzv[0]=0 and (%hivzv[1]=0)))
  19815. call MOD__perform_full_update
  19816. end if
  19817. end on
  19818. on ui_control($0qzrr)
  19819. call BUS1__update_mod_vals
  19820. call SUM__update_mod_vals
  19821. @uamno := $0qzrr/10 & "." & abs($0qzrr mod 10) & " %"
  19822. set_control_par_str(get_ui_id($0qzrr),$CONTROL_PAR_LABEL,@uamno)
  19823. set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_PICTURE,"MK_Mask_5")
  19824. set_control_par_str(get_ui_id($him5m),$CONTROL_PAR_TEXT,@uamno)
  19825. %gmios[0] := $ENGINE_UPTIME
  19826. if ($afnek=0 or (%hivzv[0]=0 and (%hivzv[1]=0)))
  19827. call MOD__perform_full_update
  19828. end if
  19829. end on
  19830. on ui_control($ihtwl)
  19831. call BUS2__update_mod_vals
  19832. call SUM__update_mod_vals
  19833. @uamno := $ihtwl/10 & "." & abs($ihtwl mod 10) & " %"
  19834. set_control_par_str(get_ui_id($ihtwl),$CONTROL_PAR_LABEL,@uamno)
  19835. set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_PICTURE,"MK_Mask_5")
  19836. set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_TEXT,@uamno)
  19837. %gmios[2] := $ENGINE_UPTIME
  19838. if ($afnek=0 or (%hivzv[2]=0 and (%hivzv[3]=0)))
  19839. call MOD__perform_full_update
  19840. end if
  19841. end on
  19842. on ui_control($pzeed)
  19843. call BUS2__update_mod_vals
  19844. call SUM__update_mod_vals
  19845. @uamno := $pzeed/10 & "." & abs($pzeed mod 10) & " %"
  19846. set_control_par_str(get_ui_id($pzeed),$CONTROL_PAR_LABEL,@uamno)
  19847. set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_PICTURE,"MK_Mask_5")
  19848. set_control_par_str(get_ui_id($twgeq),$CONTROL_PAR_TEXT,@uamno)
  19849. %gmios[2] := $ENGINE_UPTIME
  19850. if ($afnek=0 or (%hivzv[2]=0 and (%hivzv[3]=0)))
  19851. call MOD__perform_full_update
  19852. end if
  19853. end on
  19854. on ui_control($3k3u2)
  19855. call MTX__update_ui
  19856. call BUS1__update_mod_vals
  19857. if ($afnek=0)
  19858. call MOD__perform_full_update
  19859. end if
  19860. end on
  19861. on ui_control($13ap0)
  19862. call MTX__update_ui
  19863. call BUS2__update_mod_vals
  19864. if ($afnek=0)
  19865. call MOD__perform_full_update
  19866. end if
  19867. end on
  19868. on ui_control($bjll0)
  19869. $0ib2k := 0
  19870. call NAV_PAGE__update_main_nav
  19871. end on
  19872. on ui_control($myubi)
  19873. $0ib2k := 1
  19874. call NAV_PAGE__update_main_nav
  19875. end on
  19876. on ui_control($xgbml)
  19877. $0ib2k := 2
  19878. call NAV_PAGE__update_main_nav
  19879. end on
  19880. on ui_control($b3dyn)
  19881. $0ib2k := 3
  19882. call NAV_PAGE__update_main_nav
  19883. end on
  19884. on ui_control($akgz1)
  19885. $0ib2k := 4
  19886. call NAV_PAGE__update_main_nav
  19887. end on
  19888. on ui_control($v2hxc)
  19889. $mdykc := 0
  19890. call BOTTOM_TABS__on_click
  19891. end on
  19892. on ui_control($raqd0)
  19893. $mdykc := 1
  19894. call BOTTOM_TABS__on_click
  19895. end on
  19896. on ui_control($txw2h)
  19897. $mdykc := 2
  19898. call BOTTOM_TABS__on_click
  19899. end on
  19900. on ui_control($4yej1)
  19901. $otddp := 0
  19902. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19903. end on
  19904. on ui_control($rdzvq)
  19905. $otddp := 1
  19906. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19907. end on
  19908. on ui_control($ecjm3)
  19909. $otddp := 2
  19910. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19911. end on
  19912. on ui_control($032h0)
  19913. $otddp := 3
  19914. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19915. end on
  19916. on ui_control($djvko)
  19917. $otddp := 4
  19918. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19919. end on
  19920. on ui_control($bmyvz)
  19921. $otddp := 5
  19922. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19923. end on
  19924. on ui_control($3hydy)
  19925. $otddp := 6
  19926. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19927. end on
  19928. on ui_control($bcw1j)
  19929. $otddp := 7
  19930. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19931. end on
  19932. on ui_control($y4p3i)
  19933. $otddp := 8
  19934. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19935. end on
  19936. on ui_control($f1hl5)
  19937. $otddp := 9
  19938. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19939. end on
  19940. on ui_control($h23p3)
  19941. $otddp := 10
  19942. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19943. end on
  19944. on ui_control($0blpx)
  19945. $otddp := 11
  19946. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19947. end on
  19948. on ui_control($24ihv)
  19949. $otddp := 12
  19950. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19951. end on
  19952. on ui_control($wzy03)
  19953. $otddp := 13
  19954. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19955. end on
  19956. on ui_control($hz0mw)
  19957. $otddp := 14
  19958. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19959. end on
  19960. on ui_control($4tphh)
  19961. $otddp := 15
  19962. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19963. end on
  19964. on ui_control($0dern)
  19965. $otddp := 16
  19966. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19967. end on
  19968. on ui_control($v0bpc)
  19969. $otddp := 17
  19970. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19971. end on
  19972. on ui_control($rtumo)
  19973. $otddp := 18
  19974. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19975. end on
  19976. on ui_control($4yeq1)
  19977. $otddp := 19
  19978. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19979. end on
  19980. on ui_control($32nru)
  19981. $otddp := 20
  19982. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19983. end on
  19984. on ui_control($mzanj)
  19985. $otddp := 21
  19986. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19987. end on
  19988. on ui_control($oevzy)
  19989. $otddp := 22
  19990. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19991. end on
  19992. on ui_control($gk2v5)
  19993. $otddp := 23
  19994. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19995. end on
  19996. on ui_control($ojx3k)
  19997. $otddp := 24
  19998. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  19999. end on
  20000. on ui_control($dyw32)
  20001. $otddp := 25
  20002. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20003. end on
  20004. on ui_control($brxm1)
  20005. $otddp := 26
  20006. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20007. end on
  20008. on ui_control($al5ta)
  20009. $otddp := 27
  20010. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20011. end on
  20012. on ui_control($xsyba)
  20013. $otddp := 28
  20014. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20015. end on
  20016. on ui_control($5cb23)
  20017. $otddp := 29
  20018. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20019. end on
  20020. on ui_control($khuwm)
  20021. $otddp := 30
  20022. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20023. end on
  20024. on ui_control($gucms)
  20025. $otddp := 31
  20026. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20027. end on
  20028. on ui_control($ivqsn)
  20029. $otddp := 32
  20030. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20031. end on
  20032. on ui_control($gcccz)
  20033. $otddp := 33
  20034. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20035. end on
  20036. on ui_control($cs03b)
  20037. $otddp := 34
  20038. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20039. end on
  20040. on ui_control($5imez)
  20041. $otddp := 35
  20042. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20043. end on
  20044. on ui_control($gnnlh)
  20045. $otddp := 36
  20046. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20047. end on
  20048. on ui_control($ttgfi)
  20049. $otddp := 37
  20050. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20051. end on
  20052. on ui_control($0r5xb)
  20053. $otddp := 38
  20054. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20055. end on
  20056. on ui_control($f5qo5)
  20057. $otddp := 39
  20058. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20059. end on
  20060. on ui_control($t1rbt)
  20061. $otddp := 40
  20062. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20063. end on
  20064. on ui_control($pxzz3)
  20065. $otddp := 41
  20066. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20067. end on
  20068. on ui_control($eezgv)
  20069. $otddp := 42
  20070. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20071. end on
  20072. on ui_control($xfckc)
  20073. $otddp := 43
  20074. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20075. end on
  20076. on ui_control($xbrfy)
  20077. $otddp := 44
  20078. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20079. end on
  20080. on ui_control($ucgwt)
  20081. $otddp := 45
  20082. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20083. end on
  20084. on ui_control($y1sxa)
  20085. $otddp := 46
  20086. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20087. end on
  20088. on ui_control($wuqce)
  20089. $otddp := 47
  20090. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20091. end on
  20092. on ui_control($nb0wk)
  20093. $otddp := 48
  20094. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20095. end on
  20096. on ui_control($dwlt2)
  20097. $otddp := 49
  20098. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20099. end on
  20100. on ui_control($rkmzj)
  20101. $otddp := 50
  20102. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20103. end on
  20104. on ui_control($4kviy)
  20105. $otddp := 51
  20106. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20107. end on
  20108. on ui_control($0sgpg)
  20109. $otddp := 52
  20110. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20111. end on
  20112. on ui_control($u2hf0)
  20113. $otddp := 53
  20114. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20115. end on
  20116. on ui_control($pvrz1)
  20117. $otddp := 54
  20118. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20119. end on
  20120. on ui_control($na0ji)
  20121. $otddp := 55
  20122. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20123. end on
  20124. on ui_control($qysdx)
  20125. $otddp := 56
  20126. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20127. end on
  20128. on ui_control($etjre)
  20129. $otddp := 57
  20130. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20131. end on
  20132. on ui_control($wovls)
  20133. $otddp := 58
  20134. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20135. end on
  20136. on ui_control($baopj)
  20137. $otddp := 59
  20138. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20139. end on
  20140. on ui_control($ncdss)
  20141. $otddp := 60
  20142. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20143. end on
  20144. on ui_control($jde44)
  20145. $otddp := 61
  20146. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20147. end on
  20148. on ui_control($ypsjd)
  20149. $otddp := 62
  20150. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20151. end on
  20152. on ui_control($uz02i)
  20153. $otddp := 63
  20154. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20155. end on
  20156. on ui_control($3kkcw)
  20157. $otddp := 64
  20158. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20159. end on
  20160. on ui_control($n01mf)
  20161. $otddp := 65
  20162. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20163. end on
  20164. on ui_control($2lp4m)
  20165. $otddp := 66
  20166. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20167. end on
  20168. on ui_control($nohrb)
  20169. $otddp := 67
  20170. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20171. end on
  20172. on ui_control($3mr2k)
  20173. $otddp := 68
  20174. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20175. end on
  20176. on ui_control($1c3mu)
  20177. $otddp := 69
  20178. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20179. end on
  20180. on ui_control($rmz1j)
  20181. $otddp := 70
  20182. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20183. end on
  20184. on ui_control($tipqk)
  20185. $otddp := 71
  20186. call _BRW__on_btn_pressed_for_glo_br_cat_btn_id
  20187. end on
  20188. on ui_control($0ux1w)
  20189. $y1xhf := 0
  20190. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20191. if ($hb51u=1)
  20192. $hb51u := 0
  20193. exit
  20194. end if
  20195. $zor2m := $zor2m
  20196. call _BRW__load_preset_for_b_type
  20197. if ($cz3ou=1)
  20198. exit
  20199. end if
  20200. call prepare_purge
  20201. $rlfxd := 0
  20202. while ($rlfxd<$NUM_GROUPS)
  20203. purge_group($rlfxd,%tuuuf[$rlfxd])
  20204. inc($rlfxd)
  20205. end while
  20206. call update_all_WF_for_default_key
  20207. if ($zor2m=2)
  20208. call BRW___do_clean_up_after_snapshot_load
  20209. end if
  20210. end on
  20211. on ui_control($nlbcz)
  20212. $y1xhf := 1
  20213. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20214. if ($hb51u=1)
  20215. $hb51u := 0
  20216. exit
  20217. end if
  20218. $zor2m := $zor2m
  20219. call _BRW__load_preset_for_b_type
  20220. if ($cz3ou=1)
  20221. exit
  20222. end if
  20223. call prepare_purge
  20224. $rlfxd := 0
  20225. while ($rlfxd<$NUM_GROUPS)
  20226. purge_group($rlfxd,%tuuuf[$rlfxd])
  20227. inc($rlfxd)
  20228. end while
  20229. call update_all_WF_for_default_key
  20230. if ($zor2m=2)
  20231. call BRW___do_clean_up_after_snapshot_load
  20232. end if
  20233. end on
  20234. on ui_control($md33w)
  20235. $y1xhf := 2
  20236. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20237. if ($hb51u=1)
  20238. $hb51u := 0
  20239. exit
  20240. end if
  20241. $zor2m := $zor2m
  20242. call _BRW__load_preset_for_b_type
  20243. if ($cz3ou=1)
  20244. exit
  20245. end if
  20246. call prepare_purge
  20247. $rlfxd := 0
  20248. while ($rlfxd<$NUM_GROUPS)
  20249. purge_group($rlfxd,%tuuuf[$rlfxd])
  20250. inc($rlfxd)
  20251. end while
  20252. call update_all_WF_for_default_key
  20253. if ($zor2m=2)
  20254. call BRW___do_clean_up_after_snapshot_load
  20255. end if
  20256. end on
  20257. on ui_control($pzuhn)
  20258. $y1xhf := 3
  20259. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20260. if ($hb51u=1)
  20261. $hb51u := 0
  20262. exit
  20263. end if
  20264. $zor2m := $zor2m
  20265. call _BRW__load_preset_for_b_type
  20266. if ($cz3ou=1)
  20267. exit
  20268. end if
  20269. call prepare_purge
  20270. $rlfxd := 0
  20271. while ($rlfxd<$NUM_GROUPS)
  20272. purge_group($rlfxd,%tuuuf[$rlfxd])
  20273. inc($rlfxd)
  20274. end while
  20275. call update_all_WF_for_default_key
  20276. if ($zor2m=2)
  20277. call BRW___do_clean_up_after_snapshot_load
  20278. end if
  20279. end on
  20280. on ui_control($ec44j)
  20281. $y1xhf := 4
  20282. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20283. if ($hb51u=1)
  20284. $hb51u := 0
  20285. exit
  20286. end if
  20287. $zor2m := $zor2m
  20288. call _BRW__load_preset_for_b_type
  20289. if ($cz3ou=1)
  20290. exit
  20291. end if
  20292. call prepare_purge
  20293. $rlfxd := 0
  20294. while ($rlfxd<$NUM_GROUPS)
  20295. purge_group($rlfxd,%tuuuf[$rlfxd])
  20296. inc($rlfxd)
  20297. end while
  20298. call update_all_WF_for_default_key
  20299. if ($zor2m=2)
  20300. call BRW___do_clean_up_after_snapshot_load
  20301. end if
  20302. end on
  20303. on ui_control($g5ega)
  20304. $y1xhf := 5
  20305. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20306. if ($hb51u=1)
  20307. $hb51u := 0
  20308. exit
  20309. end if
  20310. $zor2m := $zor2m
  20311. call _BRW__load_preset_for_b_type
  20312. if ($cz3ou=1)
  20313. exit
  20314. end if
  20315. call prepare_purge
  20316. $rlfxd := 0
  20317. while ($rlfxd<$NUM_GROUPS)
  20318. purge_group($rlfxd,%tuuuf[$rlfxd])
  20319. inc($rlfxd)
  20320. end while
  20321. call update_all_WF_for_default_key
  20322. if ($zor2m=2)
  20323. call BRW___do_clean_up_after_snapshot_load
  20324. end if
  20325. end on
  20326. on ui_control($ospiy)
  20327. $y1xhf := 6
  20328. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20329. if ($hb51u=1)
  20330. $hb51u := 0
  20331. exit
  20332. end if
  20333. $zor2m := $zor2m
  20334. call _BRW__load_preset_for_b_type
  20335. if ($cz3ou=1)
  20336. exit
  20337. end if
  20338. call prepare_purge
  20339. $rlfxd := 0
  20340. while ($rlfxd<$NUM_GROUPS)
  20341. purge_group($rlfxd,%tuuuf[$rlfxd])
  20342. inc($rlfxd)
  20343. end while
  20344. call update_all_WF_for_default_key
  20345. if ($zor2m=2)
  20346. call BRW___do_clean_up_after_snapshot_load
  20347. end if
  20348. end on
  20349. on ui_control($cryss)
  20350. $y1xhf := 7
  20351. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20352. if ($hb51u=1)
  20353. $hb51u := 0
  20354. exit
  20355. end if
  20356. $zor2m := $zor2m
  20357. call _BRW__load_preset_for_b_type
  20358. if ($cz3ou=1)
  20359. exit
  20360. end if
  20361. call prepare_purge
  20362. $rlfxd := 0
  20363. while ($rlfxd<$NUM_GROUPS)
  20364. purge_group($rlfxd,%tuuuf[$rlfxd])
  20365. inc($rlfxd)
  20366. end while
  20367. call update_all_WF_for_default_key
  20368. if ($zor2m=2)
  20369. call BRW___do_clean_up_after_snapshot_load
  20370. end if
  20371. end on
  20372. on ui_control($odkxk)
  20373. $y1xhf := 8
  20374. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20375. if ($hb51u=1)
  20376. $hb51u := 0
  20377. exit
  20378. end if
  20379. $zor2m := $zor2m
  20380. call _BRW__load_preset_for_b_type
  20381. if ($cz3ou=1)
  20382. exit
  20383. end if
  20384. call prepare_purge
  20385. $rlfxd := 0
  20386. while ($rlfxd<$NUM_GROUPS)
  20387. purge_group($rlfxd,%tuuuf[$rlfxd])
  20388. inc($rlfxd)
  20389. end while
  20390. call update_all_WF_for_default_key
  20391. if ($zor2m=2)
  20392. call BRW___do_clean_up_after_snapshot_load
  20393. end if
  20394. end on
  20395. on ui_control($1d1qv)
  20396. $y1xhf := 9
  20397. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20398. if ($hb51u=1)
  20399. $hb51u := 0
  20400. exit
  20401. end if
  20402. $zor2m := $zor2m
  20403. call _BRW__load_preset_for_b_type
  20404. if ($cz3ou=1)
  20405. exit
  20406. end if
  20407. call prepare_purge
  20408. $rlfxd := 0
  20409. while ($rlfxd<$NUM_GROUPS)
  20410. purge_group($rlfxd,%tuuuf[$rlfxd])
  20411. inc($rlfxd)
  20412. end while
  20413. call update_all_WF_for_default_key
  20414. if ($zor2m=2)
  20415. call BRW___do_clean_up_after_snapshot_load
  20416. end if
  20417. end on
  20418. on ui_control($j41z3)
  20419. $y1xhf := 10
  20420. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20421. if ($hb51u=1)
  20422. $hb51u := 0
  20423. exit
  20424. end if
  20425. $zor2m := $zor2m
  20426. call _BRW__load_preset_for_b_type
  20427. if ($cz3ou=1)
  20428. exit
  20429. end if
  20430. call prepare_purge
  20431. $rlfxd := 0
  20432. while ($rlfxd<$NUM_GROUPS)
  20433. purge_group($rlfxd,%tuuuf[$rlfxd])
  20434. inc($rlfxd)
  20435. end while
  20436. call update_all_WF_for_default_key
  20437. if ($zor2m=2)
  20438. call BRW___do_clean_up_after_snapshot_load
  20439. end if
  20440. end on
  20441. on ui_control($0hw3x)
  20442. $y1xhf := 11
  20443. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20444. if ($hb51u=1)
  20445. $hb51u := 0
  20446. exit
  20447. end if
  20448. $zor2m := $zor2m
  20449. call _BRW__load_preset_for_b_type
  20450. if ($cz3ou=1)
  20451. exit
  20452. end if
  20453. call prepare_purge
  20454. $rlfxd := 0
  20455. while ($rlfxd<$NUM_GROUPS)
  20456. purge_group($rlfxd,%tuuuf[$rlfxd])
  20457. inc($rlfxd)
  20458. end while
  20459. call update_all_WF_for_default_key
  20460. if ($zor2m=2)
  20461. call BRW___do_clean_up_after_snapshot_load
  20462. end if
  20463. end on
  20464. on ui_control($rttry)
  20465. $y1xhf := 12
  20466. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20467. if ($hb51u=1)
  20468. $hb51u := 0
  20469. exit
  20470. end if
  20471. $zor2m := $zor2m
  20472. call _BRW__load_preset_for_b_type
  20473. if ($cz3ou=1)
  20474. exit
  20475. end if
  20476. call prepare_purge
  20477. $rlfxd := 0
  20478. while ($rlfxd<$NUM_GROUPS)
  20479. purge_group($rlfxd,%tuuuf[$rlfxd])
  20480. inc($rlfxd)
  20481. end while
  20482. call update_all_WF_for_default_key
  20483. if ($zor2m=2)
  20484. call BRW___do_clean_up_after_snapshot_load
  20485. end if
  20486. end on
  20487. on ui_control($ume1e)
  20488. $y1xhf := 13
  20489. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20490. if ($hb51u=1)
  20491. $hb51u := 0
  20492. exit
  20493. end if
  20494. $zor2m := $zor2m
  20495. call _BRW__load_preset_for_b_type
  20496. if ($cz3ou=1)
  20497. exit
  20498. end if
  20499. call prepare_purge
  20500. $rlfxd := 0
  20501. while ($rlfxd<$NUM_GROUPS)
  20502. purge_group($rlfxd,%tuuuf[$rlfxd])
  20503. inc($rlfxd)
  20504. end while
  20505. call update_all_WF_for_default_key
  20506. if ($zor2m=2)
  20507. call BRW___do_clean_up_after_snapshot_load
  20508. end if
  20509. end on
  20510. on ui_control($acigq)
  20511. $y1xhf := 14
  20512. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20513. if ($hb51u=1)
  20514. $hb51u := 0
  20515. exit
  20516. end if
  20517. $zor2m := $zor2m
  20518. call _BRW__load_preset_for_b_type
  20519. if ($cz3ou=1)
  20520. exit
  20521. end if
  20522. call prepare_purge
  20523. $rlfxd := 0
  20524. while ($rlfxd<$NUM_GROUPS)
  20525. purge_group($rlfxd,%tuuuf[$rlfxd])
  20526. inc($rlfxd)
  20527. end while
  20528. call update_all_WF_for_default_key
  20529. if ($zor2m=2)
  20530. call BRW___do_clean_up_after_snapshot_load
  20531. end if
  20532. end on
  20533. on ui_control($fal5w)
  20534. $y1xhf := 15
  20535. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20536. if ($hb51u=1)
  20537. $hb51u := 0
  20538. exit
  20539. end if
  20540. $zor2m := $zor2m
  20541. call _BRW__load_preset_for_b_type
  20542. if ($cz3ou=1)
  20543. exit
  20544. end if
  20545. call prepare_purge
  20546. $rlfxd := 0
  20547. while ($rlfxd<$NUM_GROUPS)
  20548. purge_group($rlfxd,%tuuuf[$rlfxd])
  20549. inc($rlfxd)
  20550. end while
  20551. call update_all_WF_for_default_key
  20552. if ($zor2m=2)
  20553. call BRW___do_clean_up_after_snapshot_load
  20554. end if
  20555. end on
  20556. on ui_control($u4kkx)
  20557. $y1xhf := 16
  20558. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20559. if ($hb51u=1)
  20560. $hb51u := 0
  20561. exit
  20562. end if
  20563. $zor2m := $zor2m
  20564. call _BRW__load_preset_for_b_type
  20565. if ($cz3ou=1)
  20566. exit
  20567. end if
  20568. call prepare_purge
  20569. $rlfxd := 0
  20570. while ($rlfxd<$NUM_GROUPS)
  20571. purge_group($rlfxd,%tuuuf[$rlfxd])
  20572. inc($rlfxd)
  20573. end while
  20574. call update_all_WF_for_default_key
  20575. if ($zor2m=2)
  20576. call BRW___do_clean_up_after_snapshot_load
  20577. end if
  20578. end on
  20579. on ui_control($fw5ha)
  20580. $y1xhf := 17
  20581. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20582. if ($hb51u=1)
  20583. $hb51u := 0
  20584. exit
  20585. end if
  20586. $zor2m := $zor2m
  20587. call _BRW__load_preset_for_b_type
  20588. if ($cz3ou=1)
  20589. exit
  20590. end if
  20591. call prepare_purge
  20592. $rlfxd := 0
  20593. while ($rlfxd<$NUM_GROUPS)
  20594. purge_group($rlfxd,%tuuuf[$rlfxd])
  20595. inc($rlfxd)
  20596. end while
  20597. call update_all_WF_for_default_key
  20598. if ($zor2m=2)
  20599. call BRW___do_clean_up_after_snapshot_load
  20600. end if
  20601. end on
  20602. on ui_control($zosaw)
  20603. $y1xhf := 18
  20604. call _BRW__on_btn_pressed_for_glo_br_search_resul_btn_id
  20605. if ($hb51u=1)
  20606. $hb51u := 0
  20607. exit
  20608. end if
  20609. $zor2m := $zor2m
  20610. call _BRW__load_preset_for_b_type
  20611. if ($cz3ou=1)
  20612. exit
  20613. end if
  20614. call prepare_purge
  20615. $rlfxd := 0
  20616. while ($rlfxd<$NUM_GROUPS)
  20617. purge_group($rlfxd,%tuuuf[$rlfxd])
  20618. inc($rlfxd)
  20619. end while
  20620. call update_all_WF_for_default_key
  20621. if ($zor2m=2)
  20622. call BRW___do_clean_up_after_snapshot_load
  20623. end if
  20624. end on
  20625. on ui_control($0rdar)
  20626. $y1xhf := 0
  20627. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20628. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20629. end on
  20630. on ui_control($mzhrk)
  20631. $y1xhf := 1
  20632. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20633. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20634. end on
  20635. on ui_control($y1ktm)
  20636. $y1xhf := 2
  20637. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20638. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20639. end on
  20640. on ui_control($h41x5)
  20641. $y1xhf := 3
  20642. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20643. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20644. end on
  20645. on ui_control($ogc4a)
  20646. $y1xhf := 4
  20647. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20648. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20649. end on
  20650. on ui_control($5x50g)
  20651. $y1xhf := 5
  20652. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20653. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20654. end on
  20655. on ui_control($i1chm)
  20656. $y1xhf := 6
  20657. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20658. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20659. end on
  20660. on ui_control($gxhbs)
  20661. $y1xhf := 7
  20662. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20663. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20664. end on
  20665. on ui_control($rm010)
  20666. $y1xhf := 8
  20667. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20668. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20669. end on
  20670. on ui_control($iafgo)
  20671. $y1xhf := 9
  20672. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20673. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20674. end on
  20675. on ui_control($obm4g)
  20676. $y1xhf := 10
  20677. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20678. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20679. end on
  20680. on ui_control($appd1)
  20681. $y1xhf := 11
  20682. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20683. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20684. end on
  20685. on ui_control($adbg5)
  20686. $y1xhf := 12
  20687. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20688. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20689. end on
  20690. on ui_control($r5rmc)
  20691. $y1xhf := 13
  20692. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20693. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20694. end on
  20695. on ui_control($4rran)
  20696. $y1xhf := 14
  20697. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20698. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20699. end on
  20700. on ui_control($g5s50)
  20701. $y1xhf := 15
  20702. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20703. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20704. end on
  20705. on ui_control($i02c4)
  20706. $y1xhf := 16
  20707. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20708. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20709. end on
  20710. on ui_control($0cjtm)
  20711. $y1xhf := 17
  20712. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20713. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20714. end on
  20715. on ui_control($xaewn)
  20716. $y1xhf := 18
  20717. call _BRW__on_btn_pressed_for_glo_br_search_fav_btn_id
  20718. save_array_str(%_BRW__user_fav_array,@4ll3e & "BRW.user_fav2.nka")
  20719. end on
  20720. on ui_control($rbym5)
  20721. $qlteh := 0
  20722. call FX_UI__on_preset_menu_for_gl_set_id
  20723. end on
  20724. on ui_control($5euxa)
  20725. $qlteh := 0
  20726. call _FX_UI__update_ui_controls_for_global_set_id
  20727. call update_all_mod_knob_range_indicator
  20728. call update_all_mod_knob_rt_indicator_mono
  20729. end on
  20730. on ui_control($h5hzc)
  20731. %3zszw[%h152r[0]] := get_menu_item_value(%pfy4f[0],get_control_par(%pfy4f[0],$CONTROL_PAR_VALUE))
  20732. $m2etg := 1
  20733. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),%3wawk[0],%h152r[0],%zjgrf[0])
  20734. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),0,%3wawk[0],%h152r[0],%zjgrf[0])
  20735. $bu04v := load_ir_sample(!5sry1[%3zszw[%h152r[0]]] & ".wav",%h152r[0],%zjgrf[0])
  20736. while ($m2etg=1)
  20737. wait(3000)
  20738. end while
  20739. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),$x202u,%3wawk[0],%h152r[0],%zjgrf[0])
  20740. end on
  20741. on ui_control($dtkx1)
  20742. $h5hzc := ($h5hzc+36-1) mod 36
  20743. %3zszw[%h152r[0]] := get_menu_item_value(%pfy4f[0],get_control_par(%pfy4f[0],$CONTROL_PAR_VALUE))
  20744. $m2etg := 1
  20745. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),%3wawk[0],%h152r[0],%zjgrf[0])
  20746. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),0,%3wawk[0],%h152r[0],%zjgrf[0])
  20747. $bu04v := load_ir_sample(!5sry1[%3zszw[%h152r[0]]] & ".wav",%h152r[0],%zjgrf[0])
  20748. while ($m2etg=1)
  20749. wait(3000)
  20750. end while
  20751. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),$x202u,%3wawk[0],%h152r[0],%zjgrf[0])
  20752. $dtkx1 := 0
  20753. end on
  20754. on ui_control($upamz)
  20755. $h5hzc := ($h5hzc+36+1) mod 36
  20756. %3zszw[%h152r[0]] := get_menu_item_value(%pfy4f[0],get_control_par(%pfy4f[0],$CONTROL_PAR_VALUE))
  20757. $m2etg := 1
  20758. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),%3wawk[0],%h152r[0],%zjgrf[0])
  20759. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),0,%3wawk[0],%h152r[0],%zjgrf[0])
  20760. $bu04v := load_ir_sample(!5sry1[%3zszw[%h152r[0]]] & ".wav",%h152r[0],%zjgrf[0])
  20761. while ($m2etg=1)
  20762. wait(3000)
  20763. end while
  20764. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),$x202u,%3wawk[0],%h152r[0],%zjgrf[0])
  20765. $upamz := 0
  20766. end on
  20767. on ui_control($hsq4o)
  20768. $qlteh := 0
  20769. call FX_UI__on_next_preset_btn_for_gl_set_id
  20770. end on
  20771. on ui_control($iqkyu)
  20772. $qlteh := 0
  20773. call FX_UI__on_prev_preset_btn_for_gl_set_id
  20774. end on
  20775. on ui_control($usl30)
  20776. $0x4nk := search(%41o3s,%ce3ql[3*%h152r[0]])
  20777. $dyt1q := get_control_par(%41o3s[$0x4nk],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$0x4nk],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$0x4nk],get_control_par(%n34di[$0x4nk],$CONTROL_PAR_VALUE))]/1000)
  20778. %sxlyt[%h152r[0]] := $usl30
  20779. $dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
  20780. if ($usl30=1)
  20781. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]-$dyt1q)*15/1000000],%3wawk[0],%h152r[0],%zjgrf[0])
  20782. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[0],%h152r[0],%zjgrf[0])
  20783. else
  20784. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]],$NI_SYNC_UNIT_ABS,%3wawk[0],%h152r[0],%zjgrf[0])
  20785. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],%h152r[0],%zjgrf[0])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],%h152r[0],%zjgrf[0]))))-57-1))]-1))))]),$dyt1q,%3wawk[0],%h152r[0],%zjgrf[0])
  20786. end if
  20787. $gpzoi := %fs3hy[%h152r[0]*3]
  20788. call update_mod_knob_ep_automation_label_for_gl_m_id
  20789. end on
  20790. on ui_control($b2aaa)
  20791. %pqcgh[0] := $b2aaa
  20792. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[0]+1) mod 2,%3wawk[0],0,%zjgrf[0])
  20793. set_control_par_str(%ejazl[0],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $b2aaa & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],0,%zjgrf[0])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],0,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],0,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],0,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],0,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)))))
  20794. end on
  20795. on ui_control($j14ck)
  20796. %pqcgh[1] := $j14ck
  20797. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[1]+1) mod 2,%3wawk[0],1,%zjgrf[0])
  20798. set_control_par_str(%ejazl[1],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $j14ck & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],1,%zjgrf[0])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],1,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],1,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],1,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],1,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)))))
  20799. end on
  20800. on ui_control($jbe0y)
  20801. %pqcgh[2] := $jbe0y
  20802. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[2]+1) mod 2,%3wawk[0],2,%zjgrf[0])
  20803. set_control_par_str(%ejazl[2],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $jbe0y & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],2,%zjgrf[0])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],2,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],2,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],2,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],2,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)))))
  20804. end on
  20805. on ui_control($dqn5p)
  20806. %pqcgh[3] := $dqn5p
  20807. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[3]+1) mod 2,%3wawk[0],3,%zjgrf[0])
  20808. set_control_par_str(%ejazl[3],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $dqn5p & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[0]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[0],3,%zjgrf[0])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],3,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],3,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],3,%zjgrf[0]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[0],3,%zjgrf[0])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[0])-1,31)))))
  20809. end on
  20810. on ui_control($z0ozi)
  20811. $qlteh := 1
  20812. call FX_UI__on_preset_menu_for_gl_set_id
  20813. end on
  20814. on ui_control($m5fet)
  20815. $qlteh := 1
  20816. call _FX_UI__update_ui_controls_for_global_set_id
  20817. call update_all_mod_knob_range_indicator
  20818. call update_all_mod_knob_rt_indicator_mono
  20819. end on
  20820. on ui_control($fzikm)
  20821. %3zszw[8+%h152r[1]] := get_menu_item_value(%pfy4f[20],get_control_par(%pfy4f[20],$CONTROL_PAR_VALUE))
  20822. $m2etg := 1
  20823. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),%3wawk[1],%h152r[1],%zjgrf[1])
  20824. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),0,%3wawk[1],%h152r[1],%zjgrf[1])
  20825. $bu04v := load_ir_sample(!5sry1[%3zszw[8+%h152r[1]]] & ".wav",%h152r[1],%zjgrf[1])
  20826. while ($m2etg=1)
  20827. wait(3000)
  20828. end while
  20829. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),$x202u,%3wawk[1],%h152r[1],%zjgrf[1])
  20830. end on
  20831. on ui_control($htkht)
  20832. $fzikm := ($fzikm+36-1) mod 36
  20833. %3zszw[8+%h152r[1]] := get_menu_item_value(%pfy4f[20],get_control_par(%pfy4f[20],$CONTROL_PAR_VALUE))
  20834. $m2etg := 1
  20835. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),%3wawk[1],%h152r[1],%zjgrf[1])
  20836. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),0,%3wawk[1],%h152r[1],%zjgrf[1])
  20837. $bu04v := load_ir_sample(!5sry1[%3zszw[8+%h152r[1]]] & ".wav",%h152r[1],%zjgrf[1])
  20838. while ($m2etg=1)
  20839. wait(3000)
  20840. end while
  20841. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),$x202u,%3wawk[1],%h152r[1],%zjgrf[1])
  20842. $htkht := 0
  20843. end on
  20844. on ui_control($vsxdx)
  20845. $fzikm := ($fzikm+36+1) mod 36
  20846. %3zszw[8+%h152r[1]] := get_menu_item_value(%pfy4f[20],get_control_par(%pfy4f[20],$CONTROL_PAR_VALUE))
  20847. $m2etg := 1
  20848. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),%3wawk[1],%h152r[1],%zjgrf[1])
  20849. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),0,%3wawk[1],%h152r[1],%zjgrf[1])
  20850. $bu04v := load_ir_sample(!5sry1[%3zszw[8+%h152r[1]]] & ".wav",%h152r[1],%zjgrf[1])
  20851. while ($m2etg=1)
  20852. wait(3000)
  20853. end while
  20854. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),$x202u,%3wawk[1],%h152r[1],%zjgrf[1])
  20855. $vsxdx := 0
  20856. end on
  20857. on ui_control($j3xgb)
  20858. $qlteh := 1
  20859. call FX_UI__on_next_preset_btn_for_gl_set_id
  20860. end on
  20861. on ui_control($vszfv)
  20862. $qlteh := 1
  20863. call FX_UI__on_prev_preset_btn_for_gl_set_id
  20864. end on
  20865. on ui_control($zhirl)
  20866. $0x4nk := search(%41o3s,%ce3ql[12+(3*%h152r[1])])
  20867. $dyt1q := get_control_par(%41o3s[$0x4nk],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$0x4nk],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$0x4nk],get_control_par(%n34di[$0x4nk],$CONTROL_PAR_VALUE))]/1000)
  20868. %sxlyt[8+%h152r[1]] := $zhirl
  20869. $dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
  20870. if ($zhirl=1)
  20871. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]-$dyt1q)*15/1000000],%3wawk[1],%h152r[1],%zjgrf[1])
  20872. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[1],%h152r[1],%zjgrf[1])
  20873. else
  20874. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]],$NI_SYNC_UNIT_ABS,%3wawk[1],%h152r[1],%zjgrf[1])
  20875. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],%h152r[1],%zjgrf[1])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],%h152r[1],%zjgrf[1]))))-57-1))]-1))))]),$dyt1q,%3wawk[1],%h152r[1],%zjgrf[1])
  20876. end if
  20877. $gpzoi := %fs3hy[12+(%h152r[1]*3)]
  20878. call update_mod_knob_ep_automation_label_for_gl_m_id
  20879. end on
  20880. on ui_control($lahkd)
  20881. %pqcgh[8] := $lahkd
  20882. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[8]+1) mod 2,%3wawk[1],0,%zjgrf[1])
  20883. set_control_par_str(%ejazl[4],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $lahkd & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],0,%zjgrf[1])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],0,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],0,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],0,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],0,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)))))
  20884. end on
  20885. on ui_control($p5uon)
  20886. %pqcgh[9] := $p5uon
  20887. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[9]+1) mod 2,%3wawk[1],1,%zjgrf[1])
  20888. set_control_par_str(%ejazl[5],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $p5uon & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],1,%zjgrf[1])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],1,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],1,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],1,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],1,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)))))
  20889. end on
  20890. on ui_control($muk05)
  20891. %pqcgh[10] := $muk05
  20892. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[10]+1) mod 2,%3wawk[1],2,%zjgrf[1])
  20893. set_control_par_str(%ejazl[6],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $muk05 & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],2,%zjgrf[1])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],2,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],2,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],2,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],2,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)))))
  20894. end on
  20895. on ui_control($mmaez)
  20896. %pqcgh[11] := $mmaez
  20897. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[11]+1) mod 2,%3wawk[1],3,%zjgrf[1])
  20898. set_control_par_str(%ejazl[7],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $mmaez & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[1]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[1],3,%zjgrf[1])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],3,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],3,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],3,%zjgrf[1]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[1],3,%zjgrf[1])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[1])-1,31)))))
  20899. end on
  20900. on ui_control($5v21m)
  20901. $qlteh := 2
  20902. call FX_UI__on_preset_menu_for_gl_set_id
  20903. end on
  20904. on ui_control($00fkv)
  20905. $qlteh := 2
  20906. call _FX_UI__update_ui_controls_for_global_set_id
  20907. call update_all_mod_knob_range_indicator
  20908. call update_all_mod_knob_rt_indicator_mono
  20909. end on
  20910. on ui_control($vpahb)
  20911. %3zszw[16+%h152r[2]] := get_menu_item_value(%pfy4f[40],get_control_par(%pfy4f[40],$CONTROL_PAR_VALUE))
  20912. $m2etg := 1
  20913. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),%3wawk[2],%h152r[2],%zjgrf[2])
  20914. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),0,%3wawk[2],%h152r[2],%zjgrf[2])
  20915. $bu04v := load_ir_sample(!5sry1[%3zszw[16+%h152r[2]]] & ".wav",%h152r[2],%zjgrf[2])
  20916. while ($m2etg=1)
  20917. wait(3000)
  20918. end while
  20919. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),$x202u,%3wawk[2],%h152r[2],%zjgrf[2])
  20920. end on
  20921. on ui_control($q3mq5)
  20922. $vpahb := ($vpahb+36-1) mod 36
  20923. %3zszw[16+%h152r[2]] := get_menu_item_value(%pfy4f[40],get_control_par(%pfy4f[40],$CONTROL_PAR_VALUE))
  20924. $m2etg := 1
  20925. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),%3wawk[2],%h152r[2],%zjgrf[2])
  20926. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),0,%3wawk[2],%h152r[2],%zjgrf[2])
  20927. $bu04v := load_ir_sample(!5sry1[%3zszw[16+%h152r[2]]] & ".wav",%h152r[2],%zjgrf[2])
  20928. while ($m2etg=1)
  20929. wait(3000)
  20930. end while
  20931. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),$x202u,%3wawk[2],%h152r[2],%zjgrf[2])
  20932. $q3mq5 := 0
  20933. end on
  20934. on ui_control($psujc)
  20935. $vpahb := ($vpahb+36+1) mod 36
  20936. %3zszw[16+%h152r[2]] := get_menu_item_value(%pfy4f[40],get_control_par(%pfy4f[40],$CONTROL_PAR_VALUE))
  20937. $m2etg := 1
  20938. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),%3wawk[2],%h152r[2],%zjgrf[2])
  20939. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),0,%3wawk[2],%h152r[2],%zjgrf[2])
  20940. $bu04v := load_ir_sample(!5sry1[%3zszw[16+%h152r[2]]] & ".wav",%h152r[2],%zjgrf[2])
  20941. while ($m2etg=1)
  20942. wait(3000)
  20943. end while
  20944. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),$x202u,%3wawk[2],%h152r[2],%zjgrf[2])
  20945. $psujc := 0
  20946. end on
  20947. on ui_control($vlwdd)
  20948. $qlteh := 2
  20949. call FX_UI__on_next_preset_btn_for_gl_set_id
  20950. end on
  20951. on ui_control($as2k5)
  20952. $qlteh := 2
  20953. call FX_UI__on_prev_preset_btn_for_gl_set_id
  20954. end on
  20955. on ui_control($zsz2j)
  20956. $0x4nk := search(%41o3s,%ce3ql[24+(3*%h152r[2])])
  20957. $dyt1q := get_control_par(%41o3s[$0x4nk],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$0x4nk],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$0x4nk],get_control_par(%n34di[$0x4nk],$CONTROL_PAR_VALUE))]/1000)
  20958. %sxlyt[16+%h152r[2]] := $zsz2j
  20959. $dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
  20960. if ($zsz2j=1)
  20961. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]-$dyt1q)*15/1000000],%3wawk[2],%h152r[2],%zjgrf[2])
  20962. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[2],%h152r[2],%zjgrf[2])
  20963. else
  20964. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]],$NI_SYNC_UNIT_ABS,%3wawk[2],%h152r[2],%zjgrf[2])
  20965. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],%h152r[2],%zjgrf[2])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],%h152r[2],%zjgrf[2]))))-57-1))]-1))))]),$dyt1q,%3wawk[2],%h152r[2],%zjgrf[2])
  20966. end if
  20967. $gpzoi := %fs3hy[24+(%h152r[2]*3)]
  20968. call update_mod_knob_ep_automation_label_for_gl_m_id
  20969. end on
  20970. on ui_control($5dq1e)
  20971. %pqcgh[16] := $5dq1e
  20972. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[16]+1) mod 2,%3wawk[2],0,%zjgrf[2])
  20973. set_control_par_str(%ejazl[8],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $5dq1e & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],0,%zjgrf[2])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],0,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],0,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],0,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],0,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)))))
  20974. end on
  20975. on ui_control($2ueu0)
  20976. %pqcgh[17] := $2ueu0
  20977. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[17]+1) mod 2,%3wawk[2],1,%zjgrf[2])
  20978. set_control_par_str(%ejazl[9],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $2ueu0 & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],1,%zjgrf[2])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],1,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],1,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],1,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],1,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)))))
  20979. end on
  20980. on ui_control($z2hm2)
  20981. %pqcgh[18] := $z2hm2
  20982. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[18]+1) mod 2,%3wawk[2],2,%zjgrf[2])
  20983. set_control_par_str(%ejazl[10],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $z2hm2 & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],2,%zjgrf[2])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],2,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],2,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],2,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],2,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)))))
  20984. end on
  20985. on ui_control($12ugr)
  20986. %pqcgh[19] := $12ugr
  20987. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[19]+1) mod 2,%3wawk[2],3,%zjgrf[2])
  20988. set_control_par_str(%ejazl[11],$CONTROL_PAR_PICTURE,"GE_FX_tab_btns_" & $12ugr & (%qaxnh[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[2]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[2],3,%zjgrf[2])]]*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],3,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],3,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)+1)+(9*((1+(sh_right($FILTER_TYPE_EQ3BAND-get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],3,%zjgrf[2]),31) .or. sh_right(get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[2],3,%zjgrf[2])-$FILTER_TYPE_EQ1BAND,31)))*-sh_right(abs(%lwrqe[2])-1,31)))))
  20989. end on
  20990. on ui_control($zig2t)
  20991. $qlteh := 3
  20992. call FX_UI__on_preset_menu_for_gl_set_id
  20993. end on
  20994. on ui_control($uvkex)
  20995. $qlteh := 3
  20996. call _FX_UI__update_ui_controls_for_global_set_id
  20997. call update_all_mod_knob_range_indicator
  20998. call update_all_mod_knob_rt_indicator_mono
  20999. end on
  21000. on ui_control($avs41)
  21001. %3zszw[24+%h152r[3]] := get_menu_item_value(%pfy4f[60],get_control_par(%pfy4f[60],$CONTROL_PAR_VALUE))
  21002. $m2etg := 1
  21003. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[3],%zjgrf[3])
  21004. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[3],%zjgrf[3])
  21005. $bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[3]]] & ".wav",%h152r[3],%zjgrf[3])
  21006. while ($m2etg=1)
  21007. wait(3000)
  21008. end while
  21009. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[3],%zjgrf[3])
  21010. end on
  21011. on ui_control($elcsk)
  21012. $avs41 := ($avs41+36-1) mod 36
  21013. %3zszw[24+%h152r[3]] := get_menu_item_value(%pfy4f[60],get_control_par(%pfy4f[60],$CONTROL_PAR_VALUE))
  21014. $m2etg := 1
  21015. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[3],%zjgrf[3])
  21016. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[3],%zjgrf[3])
  21017. $bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[3]]] & ".wav",%h152r[3],%zjgrf[3])
  21018. while ($m2etg=1)
  21019. wait(3000)
  21020. end while
  21021. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[3],%zjgrf[3])
  21022. $elcsk := 0
  21023. end on
  21024. on ui_control($mmvzm)
  21025. $avs41 := ($avs41+36+1) mod 36
  21026. %3zszw[24+%h152r[3]] := get_menu_item_value(%pfy4f[60],get_control_par(%pfy4f[60],$CONTROL_PAR_VALUE))
  21027. $m2etg := 1
  21028. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[3],%zjgrf[3])
  21029. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[3],%zjgrf[3])
  21030. $bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[3]]] & ".wav",%h152r[3],%zjgrf[3])
  21031. while ($m2etg=1)
  21032. wait(3000)
  21033. end while
  21034. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[3],%zjgrf[3])
  21035. $mmvzm := 0
  21036. end on
  21037. on ui_control($y1u34)
  21038. $qlteh := 3
  21039. call FX_UI__on_next_preset_btn_for_gl_set_id
  21040. end on
  21041. on ui_control($kpijv)
  21042. $qlteh := 3
  21043. call FX_UI__on_prev_preset_btn_for_gl_set_id
  21044. end on
  21045. on ui_control($iyugw)
  21046. $0x4nk := search(%41o3s,%ce3ql[36+(3*%h152r[3])])
  21047. $dyt1q := get_control_par(%41o3s[$0x4nk],$CONTROL_PAR_VALUE)+(get_control_par(%c1qym[$0x4nk],$CONTROL_PAR_VALUE)*%ppvim[get_menu_item_value(%n34di[$0x4nk],get_control_par(%n34di[$0x4nk],$CONTROL_PAR_VALUE))]/1000)
  21048. %sxlyt[24+%h152r[3]] := $iyugw
  21049. $dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
  21050. if ($iyugw=1)
  21051. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]-$dyt1q)*15/1000000],%3wawk[3],%h152r[3],%zjgrf[3])
  21052. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[3],%h152r[3],%zjgrf[3])
  21053. else
  21054. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]],$NI_SYNC_UNIT_ABS,%3wawk[3],%h152r[3],%zjgrf[3])
  21055. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[3],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[3],%zjgrf[3]))))-57-1))]-1))))]),$dyt1q,%3wawk[3],%h152r[3],%zjgrf[3])
  21056. end if
  21057. $gpzoi := %fs3hy[36+(%h152r[3]*3)]
  21058. call update_mod_knob_ep_automation_label_for_gl_m_id
  21059. end on
  21060. on ui_control($hdpxn)
  21061. %pqcgh[24] := $hdpxn
  21062. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[24]+1) mod 2,%3wawk[3],0,%zjgrf[3])
  21063. wait(30000)
  21064. $gpzoi := 77
  21065. call set_mod_knob_group_engine_par_for_gl_m_id
  21066. $gpzoi := 79
  21067. call set_mod_knob_group_engine_par_for_gl_m_id
  21068. end on
  21069. on ui_control($xdahy)
  21070. end on
  21071. on ui_control($dkvhn)
  21072. end on
  21073. on ui_control($aqf0b)
  21074. end on
  21075. on ui_control($25tac)
  21076. $qlteh := 4
  21077. call FX_UI__on_preset_menu_for_gl_set_id
  21078. end on
  21079. on ui_control($vppxu)
  21080. $qlteh := 4
  21081. call _FX_UI__update_ui_controls_for_global_set_id
  21082. call update_all_mod_knob_range_indicator
  21083. call update_all_mod_knob_rt_indicator_mono
  21084. end on
  21085. on ui_control($hnem0)
  21086. %3zszw[24+%h152r[4]] := get_menu_item_value(%pfy4f[80],get_control_par(%pfy4f[80],$CONTROL_PAR_VALUE))
  21087. $m2etg := 1
  21088. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[4],%zjgrf[3])
  21089. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[4],%zjgrf[3])
  21090. $bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[4]]] & ".wav",%h152r[4],%zjgrf[3])
  21091. while ($m2etg=1)
  21092. wait(3000)
  21093. end while
  21094. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[4],%zjgrf[3])
  21095. end on
  21096. on ui_control($ijtiz)
  21097. $hnem0 := ($hnem0+36-1) mod 36
  21098. %3zszw[24+%h152r[4]] := get_menu_item_value(%pfy4f[80],get_control_par(%pfy4f[80],$CONTROL_PAR_VALUE))
  21099. $m2etg := 1
  21100. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[4],%zjgrf[3])
  21101. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[4],%zjgrf[3])
  21102. $bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[4]]] & ".wav",%h152r[4],%zjgrf[3])
  21103. while ($m2etg=1)
  21104. wait(3000)
  21105. end while
  21106. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[4],%zjgrf[3])
  21107. $ijtiz := 0
  21108. end on
  21109. on ui_control($24ggh)
  21110. $hnem0 := ($hnem0+36+1) mod 36
  21111. %3zszw[24+%h152r[4]] := get_menu_item_value(%pfy4f[80],get_control_par(%pfy4f[80],$CONTROL_PAR_VALUE))
  21112. $m2etg := 1
  21113. $x202u := get_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),%3wawk[3],%h152r[4],%zjgrf[3])
  21114. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),0,%3wawk[3],%h152r[4],%zjgrf[3])
  21115. $bu04v := load_ir_sample(!5sry1[%3zszw[24+%h152r[4]]] & ".wav",%h152r[4],%zjgrf[3])
  21116. while ($m2etg=1)
  21117. wait(3000)
  21118. end while
  21119. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),$x202u,%3wawk[3],%h152r[4],%zjgrf[3])
  21120. $24ggh := 0
  21121. end on
  21122. on ui_control($nar4l)
  21123. $qlteh := 4
  21124. call FX_UI__on_next_preset_btn_for_gl_set_id
  21125. end on
  21126. on ui_control($g2sn3)
  21127. $qlteh := 4
  21128. call FX_UI__on_prev_preset_btn_for_gl_set_id
  21129. end on
  21130. on ui_control($o0h5y)
  21131. $dyt1q := $tcdg3+($fflhr*%ppvim[$rpdbb]/1000)
  21132. %sxlyt[24+%h152r[4]] := $o0h5y
  21133. $dyt1q := $dyt1q*(1+(sh_right(1000000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000000*sh_right(1000000-$dyt1q,31))
  21134. if ($o0h5y=1)
  21135. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]],%ry4pp[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]-$dyt1q)*15/1000000],%3wawk[3],%h152r[4],%zjgrf[3])
  21136. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),abs(%b1si1[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]-(%tkyhf[abs(%cl2a0[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]-$dyt1q)*15/1000000]-1))*1000000/12,%3wawk[3],%h152r[4],%zjgrf[3])
  21137. else
  21138. set_engine_par(%iaqug[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]],$NI_SYNC_UNIT_ABS,%3wawk[3],%h152r[4],%zjgrf[3])
  21139. set_engine_par((1+sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31))*%uxwoh[%osxle[%44fry[get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])]]]+(-sh_right(abs(get_engine_par($ENGINE_PAR_EFFECT_TYPE+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_TYPE-$ENGINE_PAR_EFFECT_TYPE)),%3wawk[3],%h152r[4],%zjgrf[3])-$EFFECT_TYPE_FILTER)-1,31)*%edmyi[%wl2qc[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-56))]+(0-(-sh_right(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1-0,31)*(0-(%oie55[search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-(-sh_right(56-(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))),31)*(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))+(-sh_right(search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))-0,31)*(0-search(%mdgl1,get_engine_par($ENGINE_PAR_EFFECT_SUBTYPE,%3wawk[3],%h152r[4],%zjgrf[3]))))-57-1))]-1))))]),$dyt1q,%3wawk[3],%h152r[4],%zjgrf[3])
  21140. end if
  21141. $gpzoi := 76
  21142. call update_mod_knob_ep_automation_label_for_gl_m_id
  21143. end on
  21144. on ui_control($q1h31)
  21145. end on
  21146. on ui_control($dsxga)
  21147. %pqcgh[25] := $dsxga
  21148. set_engine_par($ENGINE_PAR_EFFECT_BYPASS+(%lwrqe[3]*($ENGINE_PAR_SEND_EFFECT_BYPASS-$ENGINE_PAR_EFFECT_BYPASS)),(%pqcgh[25]+1) mod 2,%3wawk[3],1,%zjgrf[3])
  21149. wait(30000)
  21150. $gpzoi := 78
  21151. call set_mod_knob_group_engine_par_for_gl_m_id
  21152. $gpzoi := 80
  21153. call set_mod_knob_group_engine_par_for_gl_m_id
  21154. end on
  21155. on ui_control($fkuzg)
  21156. end on
  21157. on ui_control($av4dw)
  21158. end on
  21159. on ui_control($siaxq)
  21160. if ($siaxq<0)
  21161. $siaxq := 0
  21162. end if
  21163. call MACRO__update_labels_and_automation_names
  21164. end on
  21165. on ui_control($yazuk)
  21166. if ($yazuk<0)
  21167. $yazuk := 0
  21168. end if
  21169. call MACRO__update_labels_and_automation_names
  21170. end on
  21171. on ui_control($uyjwl)
  21172. if ($uyjwl<0)
  21173. $uyjwl := 0
  21174. end if
  21175. call MACRO__update_labels_and_automation_names
  21176. end on
  21177. on ui_control($4so5t)
  21178. if ($4so5t<0)
  21179. $4so5t := 0
  21180. end if
  21181. call MACRO__update_labels_and_automation_names
  21182. end on
  21183. on ui_control($q1nql)
  21184. if ($q1nql<0)
  21185. $q1nql := 0
  21186. end if
  21187. call MACRO__update_labels_and_automation_names
  21188. end on
  21189. on ui_control($5q4fp)
  21190. if ($5q4fp<0)
  21191. $5q4fp := 0
  21192. end if
  21193. call MACRO__update_labels_and_automation_names
  21194. end on
  21195. on ui_control($gllpo)
  21196. call SHP1__update_tb_display
  21197. end on
  21198. on ui_control(%w0xec)
  21199. call SHP1__update_mod_vals_and_refresh_ui
  21200. end on
  21201. on ui_control($ytzwi)
  21202. if ($ytzwi>=3 or ($ytzwi=-1))
  21203. select ($ytzwi)
  21204. case 4 to 7
  21205. $fg4rw := 0
  21206. while ($fg4rw<$gllpo)
  21207. %w0xec[$fg4rw] := real_to_int(pow(int_to_real($fg4rw)/int_to_real($gllpo-1),int_to_real($ytzwi-2)*1.5)*1000.0)
  21208. inc($fg4rw)
  21209. end while
  21210. case 8
  21211. $fg4rw := 0
  21212. while ($fg4rw<=(($gllpo-1)/2))
  21213. $dyt1q := %w0xec[$fg4rw]
  21214. %w0xec[$fg4rw] := %w0xec[$gllpo-1-$fg4rw]
  21215. %w0xec[$gllpo-1-$fg4rw] := $dyt1q
  21216. inc($fg4rw)
  21217. end while
  21218. case 9
  21219. $dyt1q := 83
  21220. $fg4rw := 0
  21221. while ($fg4rw<$gllpo)
  21222. %w0xec[$fg4rw] := (%w0xec[$fg4rw]+($dyt1q/2))/$dyt1q*$dyt1q
  21223. inc($fg4rw)
  21224. end while
  21225. case 10
  21226. $y3mgr := 1
  21227. while ($y3mgr<=($gllpo/4))
  21228. $dyt1q := %w0xec[$gllpo-1]
  21229. $fg4rw := 0
  21230. while ($fg4rw<=($gllpo-2))
  21231. %w0xec[$gllpo-1-$fg4rw] := %w0xec[$gllpo-2-$fg4rw]
  21232. inc($fg4rw)
  21233. end while
  21234. %w0xec[0] := $dyt1q
  21235. inc($y3mgr)
  21236. end while
  21237. case 11
  21238. $y3mgr := 1
  21239. while ($y3mgr<=($gllpo/2))
  21240. $dyt1q := %w0xec[$gllpo-1]
  21241. $fg4rw := 0
  21242. while ($fg4rw<=($gllpo-2))
  21243. %w0xec[$gllpo-1-$fg4rw] := %w0xec[$gllpo-2-$fg4rw]
  21244. inc($fg4rw)
  21245. end while
  21246. %w0xec[0] := $dyt1q
  21247. inc($y3mgr)
  21248. end while
  21249. case 12
  21250. $fg4rw := 0
  21251. while ($fg4rw<$gllpo)
  21252. $dyt1q := %w0xec[$fg4rw]+(%w0xec[$fg4rw]/10)
  21253. %w0xec[$fg4rw] := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
  21254. inc($fg4rw)
  21255. end while
  21256. case 13
  21257. $fg4rw := 0
  21258. while ($fg4rw<$gllpo)
  21259. $dyt1q := %w0xec[$fg4rw]-(%w0xec[$fg4rw]/10)
  21260. %w0xec[$fg4rw] := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
  21261. inc($fg4rw)
  21262. end while
  21263. case 14
  21264. $fg4rw := 0
  21265. while ($fg4rw<$gllpo)
  21266. %w0xec[$fg4rw] := 1000-%w0xec[$fg4rw]
  21267. inc($fg4rw)
  21268. end while
  21269. case 15
  21270. $fg4rw := 0
  21271. while ($fg4rw<$gllpo)
  21272. %w0xec[$fg4rw] := random(0,1000)
  21273. inc($fg4rw)
  21274. end while
  21275. case 16
  21276. $fg4rw := 0
  21277. while ($fg4rw<$gllpo)
  21278. %2piom[$fg4rw] := %w0xec[$fg4rw]
  21279. inc($fg4rw)
  21280. end while
  21281. $fg4rw := 1
  21282. while ($fg4rw<=($gllpo-2))
  21283. $r0pwv := 0
  21284. $m12vk := 0
  21285. $y3mgr := 0
  21286. while ($y3mgr<3)
  21287. $dyt1q := $fg4rw+$y3mgr-1
  21288. if (in_range($dyt1q,0,$gllpo-1))
  21289. $r0pwv := $r0pwv+%2piom[$dyt1q]
  21290. inc($m12vk)
  21291. end if
  21292. inc($y3mgr)
  21293. end while
  21294. %w0xec[$fg4rw] := $r0pwv/$m12vk
  21295. inc($fg4rw)
  21296. end while
  21297. case 17
  21298. $fg4rw := 0
  21299. while ($fg4rw<$gllpo)
  21300. %2piom[$fg4rw] := %w0xec[$fg4rw]
  21301. inc($fg4rw)
  21302. end while
  21303. $fg4rw := 0
  21304. while ($fg4rw<$gllpo)
  21305. $r0pwv := 0
  21306. $y3mgr := 0
  21307. while ($y3mgr<3)
  21308. $dyt1q := ($fg4rw+$y3mgr+$gllpo-1) mod $gllpo
  21309. $r0pwv := $r0pwv+%2piom[$dyt1q]
  21310. inc($y3mgr)
  21311. end while
  21312. %w0xec[$fg4rw] := $r0pwv/3
  21313. inc($fg4rw)
  21314. end while
  21315. end select
  21316. $ytzwi := $uh2d4
  21317. else
  21318. $uh2d4 := $ytzwi
  21319. end if
  21320. $oj0wr := 1
  21321. call SHP1__update_mod_vals
  21322. $oj0wr := 0
  21323. end on
  21324. on ui_control($hn35i)
  21325. call SHP2__update_tb_display
  21326. end on
  21327. on ui_control(%rzzs4)
  21328. call SHP2__update_mod_vals_and_refresh_ui
  21329. end on
  21330. on ui_control($f3u5d)
  21331. if ($f3u5d>=3 or ($f3u5d=-1))
  21332. select ($f3u5d)
  21333. case 4 to 7
  21334. $fg4rw := 0
  21335. while ($fg4rw<$hn35i)
  21336. %rzzs4[$fg4rw] := real_to_int(pow(int_to_real($fg4rw)/int_to_real($hn35i-1),int_to_real($f3u5d-2)*1.5)*1000.0)
  21337. inc($fg4rw)
  21338. end while
  21339. case 8
  21340. $fg4rw := 0
  21341. while ($fg4rw<=(($hn35i-1)/2))
  21342. $dyt1q := %rzzs4[$fg4rw]
  21343. %rzzs4[$fg4rw] := %rzzs4[$hn35i-1-$fg4rw]
  21344. %rzzs4[$hn35i-1-$fg4rw] := $dyt1q
  21345. inc($fg4rw)
  21346. end while
  21347. case 9
  21348. $dyt1q := 83
  21349. $fg4rw := 0
  21350. while ($fg4rw<$hn35i)
  21351. %rzzs4[$fg4rw] := (%rzzs4[$fg4rw]+($dyt1q/2))/$dyt1q*$dyt1q
  21352. inc($fg4rw)
  21353. end while
  21354. case 10
  21355. $y3mgr := 1
  21356. while ($y3mgr<=($hn35i/4))
  21357. $dyt1q := %rzzs4[$hn35i-1]
  21358. $fg4rw := 0
  21359. while ($fg4rw<=($hn35i-2))
  21360. %rzzs4[$hn35i-1-$fg4rw] := %rzzs4[$hn35i-2-$fg4rw]
  21361. inc($fg4rw)
  21362. end while
  21363. %rzzs4[0] := $dyt1q
  21364. inc($y3mgr)
  21365. end while
  21366. case 11
  21367. $y3mgr := 1
  21368. while ($y3mgr<=($hn35i/2))
  21369. $dyt1q := %rzzs4[$hn35i-1]
  21370. $fg4rw := 0
  21371. while ($fg4rw<=($hn35i-2))
  21372. %rzzs4[$hn35i-1-$fg4rw] := %rzzs4[$hn35i-2-$fg4rw]
  21373. inc($fg4rw)
  21374. end while
  21375. %rzzs4[0] := $dyt1q
  21376. inc($y3mgr)
  21377. end while
  21378. case 12
  21379. $fg4rw := 0
  21380. while ($fg4rw<$hn35i)
  21381. $dyt1q := %rzzs4[$fg4rw]+(%rzzs4[$fg4rw]/10)
  21382. %rzzs4[$fg4rw] := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
  21383. inc($fg4rw)
  21384. end while
  21385. case 13
  21386. $fg4rw := 0
  21387. while ($fg4rw<$hn35i)
  21388. $dyt1q := %rzzs4[$fg4rw]-(%rzzs4[$fg4rw]/10)
  21389. %rzzs4[$fg4rw] := $dyt1q*(1+(sh_right(1000-$dyt1q,31) .or. sh_right($dyt1q-0,31)))-0-(1000*sh_right(1000-$dyt1q,31))
  21390. inc($fg4rw)
  21391. end while
  21392. case 14
  21393. $fg4rw := 0
  21394. while ($fg4rw<$hn35i)
  21395. %rzzs4[$fg4rw] := 1000-%rzzs4[$fg4rw]
  21396. inc($fg4rw)
  21397. end while
  21398. case 15
  21399. $fg4rw := 0
  21400. while ($fg4rw<$hn35i)
  21401. %rzzs4[$fg4rw] := random(0,1000)
  21402. inc($fg4rw)
  21403. end while
  21404. case 16
  21405. $fg4rw := 0
  21406. while ($fg4rw<$hn35i)
  21407. %2piom[$fg4rw] := %rzzs4[$fg4rw]
  21408. inc($fg4rw)
  21409. end while
  21410. $fg4rw := 1
  21411. while ($fg4rw<=($hn35i-2))
  21412. $r0pwv := 0
  21413. $m12vk := 0
  21414. $y3mgr := 0
  21415. while ($y3mgr<3)
  21416. $dyt1q := $fg4rw+$y3mgr-1
  21417. if (in_range($dyt1q,0,$hn35i-1))
  21418. $r0pwv := $r0pwv+%2piom[$dyt1q]
  21419. inc($m12vk)
  21420. end if
  21421. inc($y3mgr)
  21422. end while
  21423. %rzzs4[$fg4rw] := $r0pwv/$m12vk
  21424. inc($fg4rw)
  21425. end while
  21426. case 17
  21427. $fg4rw := 0
  21428. while ($fg4rw<$hn35i)
  21429. %2piom[$fg4rw] := %rzzs4[$fg4rw]
  21430. inc($fg4rw)
  21431. end while
  21432. $fg4rw := 0
  21433. while ($fg4rw<$hn35i)
  21434. $r0pwv := 0
  21435. $y3mgr := 0
  21436. while ($y3mgr<3)
  21437. $dyt1q := ($fg4rw+$y3mgr+$hn35i-1) mod $hn35i
  21438. $r0pwv := $r0pwv+%2piom[$dyt1q]
  21439. inc($y3mgr)
  21440. end while
  21441. %rzzs4[$fg4rw] := $r0pwv/3
  21442. inc($fg4rw)
  21443. end while
  21444. end select
  21445. $f3u5d := $0zmjz
  21446. else
  21447. $0zmjz := $f3u5d
  21448. end if
  21449. $oj0wr := 1
  21450. call SHP2__update_mod_vals
  21451. $oj0wr := 0
  21452. end on
  21453. on ui_control($doz2m)
  21454. set_control_par(get_ui_id($zcuf4),$CONTROL_PAR_PICTURE_STATE,$doz2m)
  21455. set_control_par(get_ui_id($i5fky),$CONTROL_PAR_PICTURE_STATE,$1wrdd)
  21456. end on
  21457. on ui_control($1wrdd)
  21458. set_control_par(get_ui_id($zcuf4),$CONTROL_PAR_PICTURE_STATE,$doz2m)
  21459. set_control_par(get_ui_id($i5fky),$CONTROL_PAR_PICTURE_STATE,$1wrdd)
  21460. end on
  21461. on ui_control($rj2yq)
  21462. end on
  21463. on ui_control($s2bg4)
  21464. end on
  21465. on ui_control($543zt)
  21466. %ppvim[14] := $543zt
  21467. set_control_par_str(get_ui_id($543zt),$CONTROL_PAR_LABEL,$543zt/$b2o1i & "." & ($543zt mod $b2o1i) & " " & @edixu)
  21468. %latnx[0] := 14
  21469. %latnx[1] := 14
  21470. call MOD__perform_optimized_update_for_gl_ext_mod
  21471. end on
  21472. on ui_control($lynqa)
  21473. %ppvim[15] := $lynqa
  21474. set_control_par_str(get_ui_id($lynqa),$CONTROL_PAR_LABEL,$lynqa/$pfnw5 & "." & ($lynqa mod $pfnw5) & " " & @cxern)
  21475. %latnx[0] := 15
  21476. %latnx[1] := 15
  21477. call MOD__perform_optimized_update_for_gl_ext_mod
  21478. end on
  21479. on ui_control($cbkgv)
  21480. %ppvim[16] := $cbkgv
  21481. set_control_par_str(get_ui_id($cbkgv),$CONTROL_PAR_LABEL,$cbkgv/$yg3sr & "." & ($cbkgv mod $yg3sr) & " " & @aqf3u)
  21482. %latnx[0] := 16
  21483. %latnx[1] := 16
  21484. call MOD__perform_optimized_update_for_gl_ext_mod
  21485. end on
  21486. on ui_control($cxfv2)
  21487. %ppvim[17] := $cxfv2
  21488. set_control_par_str(get_ui_id($cxfv2),$CONTROL_PAR_LABEL,$cxfv2/$t3gfg & "." & ($cxfv2 mod $t3gfg) & " " & @3frwb)
  21489. %latnx[0] := 17
  21490. %latnx[1] := 17
  21491. call MOD__perform_optimized_update_for_gl_ext_mod
  21492. end on
  21493. on ui_control($bpkqt)
  21494. $gpzoi := 12
  21495. call on_mod_knob_for_gl_m_id
  21496. end on
  21497. on ui_control($m2mpa)
  21498. $gpzoi := 13
  21499. call on_mod_knob_for_gl_m_id
  21500. end on
  21501. on ui_control($1g0ky)
  21502. $gpzoi := 14
  21503. call on_mod_knob_for_gl_m_id
  21504. end on
  21505. on ui_control($liaof)
  21506. $gpzoi := 15
  21507. call on_mod_knob_for_gl_m_id
  21508. end on
  21509. on ui_control($sgbvz)
  21510. $gpzoi := 16
  21511. call on_mod_knob_for_gl_m_id
  21512. end on
  21513. on ui_control($4zkqn)
  21514. $gpzoi := 17
  21515. call on_mod_knob_for_gl_m_id
  21516. end on
  21517. on ui_control($kuk42)
  21518. $gpzoi := 18
  21519. call on_mod_knob_for_gl_m_id
  21520. end on
  21521. on ui_control($qsfxg)
  21522. $gpzoi := 19
  21523. call on_mod_knob_for_gl_m_id
  21524. end on
  21525. on ui_control($aaf4s)
  21526. $gpzoi := 20
  21527. call on_mod_knob_for_gl_m_id
  21528. end on
  21529. on ui_control($eai4d)
  21530. $gpzoi := 24
  21531. call on_mod_knob_for_gl_m_id
  21532. end on
  21533. on ui_control($r0khx)
  21534. $gpzoi := 25
  21535. call on_mod_knob_for_gl_m_id
  21536. end on
  21537. on ui_control($zktrd)
  21538. $gpzoi := 7
  21539. call on_mod_knob_for_gl_m_id
  21540. end on
  21541. on ui_control($sseum)
  21542. $gpzoi := 8
  21543. call on_mod_knob_for_gl_m_id
  21544. end on
  21545. on ui_control($3tqoo)
  21546. $gpzoi := 0
  21547. call on_mod_knob_for_gl_m_id
  21548. end on
  21549. on ui_control($1tszb)
  21550. $gpzoi := 2
  21551. call on_mod_knob_for_gl_m_id
  21552. end on
  21553. on ui_control($l2tv1)
  21554. $gpzoi := 23
  21555. call on_mod_knob_for_gl_m_id
  21556. end on
  21557. on ui_control($c21kk)
  21558. $gpzoi := 28
  21559. call on_mod_knob_for_gl_m_id
  21560. end on
  21561. on ui_control($uvcxk)
  21562. $gpzoi := 29
  21563. call on_mod_knob_for_gl_m_id
  21564. end on
  21565. on ui_control($dgu14)
  21566. $gpzoi := 30
  21567. call on_mod_knob_for_gl_m_id
  21568. end on
  21569. on ui_control($ius2b)
  21570. $gpzoi := 9
  21571. call on_mod_knob_for_gl_m_id
  21572. end on
  21573. on ui_control($3rksw)
  21574. $gpzoi := 10
  21575. call on_mod_knob_for_gl_m_id
  21576. end on
  21577. on ui_control($q0rb2)
  21578. $gpzoi := 11
  21579. call on_mod_knob_for_gl_m_id
  21580. end on
  21581. on ui_control($g345d)
  21582. $gpzoi := 12
  21583. call on_mod_range_knob_for_gl_m_id
  21584. end on
  21585. on ui_control($n0kha)
  21586. $gpzoi := 13
  21587. call on_mod_range_knob_for_gl_m_id
  21588. end on
  21589. on ui_control($2xzsd)
  21590. $gpzoi := 14
  21591. call on_mod_range_knob_for_gl_m_id
  21592. end on
  21593. on ui_control($5wlib)
  21594. $gpzoi := 15
  21595. call on_mod_range_knob_for_gl_m_id
  21596. end on
  21597. on ui_control($cx1ja)
  21598. $gpzoi := 16
  21599. call on_mod_range_knob_for_gl_m_id
  21600. end on
  21601. on ui_control($boshu)
  21602. $gpzoi := 17
  21603. call on_mod_range_knob_for_gl_m_id
  21604. end on
  21605. on ui_control($o5n5m)
  21606. $gpzoi := 18
  21607. call on_mod_range_knob_for_gl_m_id
  21608. end on
  21609. on ui_control($xeafk)
  21610. $gpzoi := 19
  21611. call on_mod_range_knob_for_gl_m_id
  21612. end on
  21613. on ui_control($sddk3)
  21614. $gpzoi := 20
  21615. call on_mod_range_knob_for_gl_m_id
  21616. end on
  21617. on ui_control($3zolj)
  21618. $gpzoi := 24
  21619. call on_mod_range_knob_for_gl_m_id
  21620. end on
  21621. on ui_control($yl1h5)
  21622. $gpzoi := 25
  21623. call on_mod_range_knob_for_gl_m_id
  21624. end on
  21625. on ui_control($2zugt)
  21626. $gpzoi := 7
  21627. call on_mod_range_knob_for_gl_m_id
  21628. end on
  21629. on ui_control($bi544)
  21630. $gpzoi := 8
  21631. call on_mod_range_knob_for_gl_m_id
  21632. end on
  21633. on ui_control($yexen)
  21634. $gpzoi := 0
  21635. call on_mod_range_knob_for_gl_m_id
  21636. end on
  21637. on ui_control($v1jgb)
  21638. $gpzoi := 2
  21639. call on_mod_range_knob_for_gl_m_id
  21640. end on
  21641. on ui_control($zv33b)
  21642. $gpzoi := 23
  21643. call on_mod_range_knob_for_gl_m_id
  21644. end on
  21645. on ui_control($eg3kt)
  21646. $gpzoi := 28
  21647. call on_mod_range_knob_for_gl_m_id
  21648. end on
  21649. on ui_control($ia54c)
  21650. $gpzoi := 29
  21651. call on_mod_range_knob_for_gl_m_id
  21652. end on
  21653. on ui_control($5l3um)
  21654. $gpzoi := 30
  21655. call on_mod_range_knob_for_gl_m_id
  21656. end on
  21657. on ui_control($1ybzi)
  21658. $gpzoi := 9
  21659. call on_mod_range_knob_for_gl_m_id
  21660. end on
  21661. on ui_control($qbhb5)
  21662. $gpzoi := 10
  21663. call on_mod_range_knob_for_gl_m_id
  21664. end on
  21665. on ui_control($qb5xv)
  21666. $gpzoi := 11
  21667. call on_mod_range_knob_for_gl_m_id
  21668. end on
  21669. on ui_control($3pyb3)
  21670. $gpzoi := 12
  21671. call on_mod_source_for_gl_m_id
  21672. end on
  21673. on ui_control($u2pwx)
  21674. $gpzoi := 13
  21675. call on_mod_source_for_gl_m_id
  21676. end on
  21677. on ui_control($ldi1z)
  21678. $gpzoi := 14
  21679. call on_mod_source_for_gl_m_id
  21680. end on
  21681. on ui_control($eu2xe)
  21682. $gpzoi := 15
  21683. call on_mod_source_for_gl_m_id
  21684. end on
  21685. on ui_control($qxhis)
  21686. $gpzoi := 16
  21687. call on_mod_source_for_gl_m_id
  21688. end on
  21689. on ui_control($oicux)
  21690. $gpzoi := 17
  21691. call on_mod_source_for_gl_m_id
  21692. end on
  21693. on ui_control($fzwxf)
  21694. $gpzoi := 18
  21695. call on_mod_source_for_gl_m_id
  21696. end on
  21697. on ui_control($52sa5)
  21698. $gpzoi := 19
  21699. call on_mod_source_for_gl_m_id
  21700. end on
  21701. on ui_control($nplew)
  21702. $gpzoi := 20
  21703. call on_mod_source_for_gl_m_id
  21704. end on
  21705. on ui_control($r3d0o)
  21706. $gpzoi := 24
  21707. call on_mod_source_for_gl_m_id
  21708. end on
  21709. on ui_control($yqtdo)
  21710. $gpzoi := 25
  21711. call on_mod_source_for_gl_m_id
  21712. end on
  21713. on ui_control($vas4o)
  21714. $gpzoi := 7
  21715. call on_mod_source_for_gl_m_id
  21716. end on
  21717. on ui_control($y3s33)
  21718. $gpzoi := 8
  21719. call on_mod_source_for_gl_m_id
  21720. end on
  21721. on ui_control($zi2jx)
  21722. $gpzoi := 0
  21723. call on_mod_source_for_gl_m_id
  21724. end on
  21725. on ui_control($gxopj)
  21726. $gpzoi := 2
  21727. call on_mod_source_for_gl_m_id
  21728. end on
  21729. on ui_control($dbgkf)
  21730. $gpzoi := 23
  21731. call on_mod_source_for_gl_m_id
  21732. end on
  21733. on ui_control($2vyff)
  21734. $gpzoi := 28
  21735. call on_mod_source_for_gl_m_id
  21736. end on
  21737. on ui_control($wh1ke)
  21738. $gpzoi := 29
  21739. call on_mod_source_for_gl_m_id
  21740. end on
  21741. on ui_control($f4o1c)
  21742. $gpzoi := 30
  21743. call on_mod_source_for_gl_m_id
  21744. end on
  21745. on ui_control($rpaco)
  21746. $gpzoi := 9
  21747. call on_mod_source_for_gl_m_id
  21748. end on
  21749. on ui_control($m5sxk)
  21750. $gpzoi := 10
  21751. call on_mod_source_for_gl_m_id
  21752. end on
  21753. on ui_control($0vs3i)
  21754. $gpzoi := 11
  21755. call on_mod_source_for_gl_m_id
  21756. end on
  21757. on ui_control($qbesm)
  21758. $gpzoi := 35
  21759. call _on_mod_knob_engine_par_for_gl_m_id
  21760. end on
  21761. on ui_control($tqsps)
  21762. $gpzoi := 36
  21763. call _on_mod_knob_engine_par_for_gl_m_id
  21764. end on
  21765. on ui_control($4knyg)
  21766. $gpzoi := 37
  21767. call _on_mod_knob_engine_par_for_gl_m_id
  21768. end on
  21769. on ui_control($x5zyo)
  21770. $gpzoi := 38
  21771. call _on_mod_knob_engine_par_for_gl_m_id
  21772. end on
  21773. on ui_control($3xmqt)
  21774. $gpzoi := 39
  21775. call _on_mod_knob_engine_par_for_gl_m_id
  21776. end on
  21777. on ui_control($c30oe)
  21778. $gpzoi := 40
  21779. call _on_mod_knob_engine_par_for_gl_m_id
  21780. end on
  21781. on ui_control($41deb)
  21782. $gpzoi := 41
  21783. call _on_mod_knob_engine_par_for_gl_m_id
  21784. end on
  21785. on ui_control($ynoq5)
  21786. $gpzoi := 42
  21787. call _on_mod_knob_engine_par_for_gl_m_id
  21788. end on
  21789. on ui_control($33zwn)
  21790. $gpzoi := 43
  21791. call _on_mod_knob_engine_par_for_gl_m_id
  21792. end on
  21793. on ui_control($p0hox)
  21794. $gpzoi := 44
  21795. call _on_mod_knob_engine_par_for_gl_m_id
  21796. end on
  21797. on ui_control($bokn2)
  21798. $gpzoi := 45
  21799. call _on_mod_knob_engine_par_for_gl_m_id
  21800. end on
  21801. on ui_control($xxdkc)
  21802. $gpzoi := 46
  21803. call _on_mod_knob_engine_par_for_gl_m_id
  21804. end on
  21805. on ui_control($dyqeg)
  21806. $gpzoi := 47
  21807. call _on_mod_knob_engine_par_for_gl_m_id
  21808. end on
  21809. on ui_control($nznqd)
  21810. $gpzoi := 48
  21811. call _on_mod_knob_engine_par_for_gl_m_id
  21812. end on
  21813. on ui_control($zprpl)
  21814. $gpzoi := 49
  21815. call _on_mod_knob_engine_par_for_gl_m_id
  21816. end on
  21817. on ui_control($bpu3e)
  21818. $gpzoi := 50
  21819. call _on_mod_knob_engine_par_for_gl_m_id
  21820. end on
  21821. on ui_control($s20mm)
  21822. $gpzoi := 51
  21823. call _on_mod_knob_engine_par_for_gl_m_id
  21824. end on
  21825. on ui_control($5q021)
  21826. $gpzoi := 52
  21827. call _on_mod_knob_engine_par_for_gl_m_id
  21828. end on
  21829. on ui_control($fnpd2)
  21830. $gpzoi := 53
  21831. call _on_mod_knob_engine_par_for_gl_m_id
  21832. end on
  21833. on ui_control($wmqep)
  21834. $gpzoi := 54
  21835. call _on_mod_knob_engine_par_for_gl_m_id
  21836. end on
  21837. on ui_control($gsxh3)
  21838. $gpzoi := 55
  21839. call _on_mod_knob_engine_par_for_gl_m_id
  21840. end on
  21841. on ui_control($edhpo)
  21842. $gpzoi := 56
  21843. call _on_mod_knob_engine_par_for_gl_m_id
  21844. end on
  21845. on ui_control($ei4rr)
  21846. $gpzoi := 57
  21847. call _on_mod_knob_engine_par_for_gl_m_id
  21848. end on
  21849. on ui_control($nfnkh)
  21850. $gpzoi := 58
  21851. call _on_mod_knob_engine_par_for_gl_m_id
  21852. end on
  21853. on ui_control($xug04)
  21854. $gpzoi := 59
  21855. call _on_mod_knob_engine_par_for_gl_m_id
  21856. end on
  21857. on ui_control($bvaw5)
  21858. $gpzoi := 60
  21859. call _on_mod_knob_engine_par_for_gl_m_id
  21860. end on
  21861. on ui_control($54gsh)
  21862. $gpzoi := 61
  21863. call _on_mod_knob_engine_par_for_gl_m_id
  21864. end on
  21865. on ui_control($xgma4)
  21866. $gpzoi := 62
  21867. call _on_mod_knob_engine_par_for_gl_m_id
  21868. end on
  21869. on ui_control($4ppiu)
  21870. $gpzoi := 63
  21871. call _on_mod_knob_engine_par_for_gl_m_id
  21872. end on
  21873. on ui_control($2lmoo)
  21874. $gpzoi := 64
  21875. call _on_mod_knob_engine_par_for_gl_m_id
  21876. end on
  21877. on ui_control($ajka4)
  21878. $gpzoi := 65
  21879. call _on_mod_knob_engine_par_for_gl_m_id
  21880. end on
  21881. on ui_control($kw31l)
  21882. $gpzoi := 66
  21883. call _on_mod_knob_engine_par_for_gl_m_id
  21884. end on
  21885. on ui_control($za4fi)
  21886. $gpzoi := 67
  21887. call _on_mod_knob_engine_par_for_gl_m_id
  21888. end on
  21889. on ui_control($zctyt)
  21890. $gpzoi := 68
  21891. call _on_mod_knob_engine_par_for_gl_m_id
  21892. end on
  21893. on ui_control($nqqg3)
  21894. $gpzoi := 69
  21895. call _on_mod_knob_engine_par_for_gl_m_id
  21896. end on
  21897. on ui_control($et1j2)
  21898. $gpzoi := 70
  21899. call _on_mod_knob_engine_par_for_gl_m_id
  21900. end on
  21901. on ui_control($ouvzc)
  21902. $gpzoi := 71
  21903. call _on_mod_knob_engine_par_for_gl_m_id
  21904. end on
  21905. on ui_control($yi2x2)
  21906. $gpzoi := 72
  21907. call _on_mod_knob_engine_par_for_gl_m_id
  21908. end on
  21909. on ui_control($yr3xi)
  21910. $gpzoi := 73
  21911. call _on_mod_knob_engine_par_for_gl_m_id
  21912. end on
  21913. on ui_control($tcdg3)
  21914. $gpzoi := 76
  21915. call _on_mod_knob_engine_par_for_gl_m_id
  21916. end on
  21917. on ui_control($ud2dz)
  21918. $gpzoi := 74
  21919. call _on_mod_knob_engine_par_for_gl_m_id
  21920. end on
  21921. on ui_control($b4qif)
  21922. $gpzoi := 75
  21923. call _on_mod_knob_engine_par_for_gl_m_id
  21924. end on
  21925. on ui_control($ppztm)
  21926. $gpzoi := 77
  21927. call _on_mod_knob_engine_par_for_gl_m_id
  21928. end on
  21929. on ui_control($mjxc2)
  21930. $gpzoi := 78
  21931. call _on_mod_knob_engine_par_for_gl_m_id
  21932. end on
  21933. on ui_control($uvwcc)
  21934. $gpzoi := 79
  21935. call _on_mod_knob_engine_par_for_gl_m_id
  21936. end on
  21937. on ui_control($ev1e5)
  21938. $gpzoi := 80
  21939. call _on_mod_knob_engine_par_for_gl_m_id
  21940. end on
  21941. on ui_control($3fqin)
  21942. $gpzoi := 26
  21943. call _on_mod_knob_engine_par_for_gl_m_id
  21944. end on
  21945. on ui_control($h11uu)
  21946. $gpzoi := 27
  21947. call _on_mod_knob_engine_par_for_gl_m_id
  21948. end on
  21949. on ui_control($nwl2v)
  21950. $gpzoi := 21
  21951. call _on_mod_knob_engine_par_for_gl_m_id
  21952. end on
  21953. on ui_control($wfiom)
  21954. $gpzoi := 22
  21955. call _on_mod_knob_engine_par_for_gl_m_id
  21956. end on
  21957. on ui_control($ufbsw)
  21958. $gpzoi := 31
  21959. call _on_mod_knob_engine_par_for_gl_m_id
  21960. end on
  21961. on ui_control($maq5o)
  21962. $gpzoi := 32
  21963. call _on_mod_knob_engine_par_for_gl_m_id
  21964. end on
  21965. on ui_control($lqoqt)
  21966. $gpzoi := 33
  21967. call _on_mod_knob_engine_par_for_gl_m_id
  21968. end on
  21969. on ui_control($zqnbc)
  21970. $gpzoi := 34
  21971. call _on_mod_knob_engine_par_for_gl_m_id
  21972. end on
  21973. on ui_control($24riz)
  21974. $gpzoi := 35
  21975. call _on_mod_range_knob_engine_par_for_gl_m_id
  21976. end on
  21977. on ui_control($51jvx)
  21978. $gpzoi := 36
  21979. call _on_mod_range_knob_engine_par_for_gl_m_id
  21980. end on
  21981. on ui_control($rsero)
  21982. $gpzoi := 37
  21983. call _on_mod_range_knob_engine_par_for_gl_m_id
  21984. end on
  21985. on ui_control($os0gc)
  21986. $gpzoi := 38
  21987. call _on_mod_range_knob_engine_par_for_gl_m_id
  21988. end on
  21989. on ui_control($0nwvw)
  21990. $gpzoi := 39
  21991. call _on_mod_range_knob_engine_par_for_gl_m_id
  21992. end on
  21993. on ui_control($iwhhy)
  21994. $gpzoi := 40
  21995. call _on_mod_range_knob_engine_par_for_gl_m_id
  21996. end on
  21997. on ui_control($5yyj1)
  21998. $gpzoi := 41
  21999. call _on_mod_range_knob_engine_par_for_gl_m_id
  22000. end on
  22001. on ui_control($brpj3)
  22002. $gpzoi := 42
  22003. call _on_mod_range_knob_engine_par_for_gl_m_id
  22004. end on
  22005. on ui_control($hwhlk)
  22006. $gpzoi := 43
  22007. call _on_mod_range_knob_engine_par_for_gl_m_id
  22008. end on
  22009. on ui_control($2ytkr)
  22010. $gpzoi := 44
  22011. call _on_mod_range_knob_engine_par_for_gl_m_id
  22012. end on
  22013. on ui_control($ak4fz)
  22014. $gpzoi := 45
  22015. call _on_mod_range_knob_engine_par_for_gl_m_id
  22016. end on
  22017. on ui_control($pqxkq)
  22018. $gpzoi := 46
  22019. call _on_mod_range_knob_engine_par_for_gl_m_id
  22020. end on
  22021. on ui_control($cz5nc)
  22022. $gpzoi := 47
  22023. call _on_mod_range_knob_engine_par_for_gl_m_id
  22024. end on
  22025. on ui_control($pa1jg)
  22026. $gpzoi := 48
  22027. call _on_mod_range_knob_engine_par_for_gl_m_id
  22028. end on
  22029. on ui_control($hfm3k)
  22030. $gpzoi := 49
  22031. call _on_mod_range_knob_engine_par_for_gl_m_id
  22032. end on
  22033. on ui_control($fnxkg)
  22034. $gpzoi := 50
  22035. call _on_mod_range_knob_engine_par_for_gl_m_id
  22036. end on
  22037. on ui_control($i5nrk)
  22038. $gpzoi := 51
  22039. call _on_mod_range_knob_engine_par_for_gl_m_id
  22040. end on
  22041. on ui_control($fm2z3)
  22042. $gpzoi := 52
  22043. call _on_mod_range_knob_engine_par_for_gl_m_id
  22044. end on
  22045. on ui_control($cakzn)
  22046. $gpzoi := 53
  22047. call _on_mod_range_knob_engine_par_for_gl_m_id
  22048. end on
  22049. on ui_control($oybgu)
  22050. $gpzoi := 54
  22051. call _on_mod_range_knob_engine_par_for_gl_m_id
  22052. end on
  22053. on ui_control($jkr4m)
  22054. $gpzoi := 55
  22055. call _on_mod_range_knob_engine_par_for_gl_m_id
  22056. end on
  22057. on ui_control($dero1)
  22058. $gpzoi := 56
  22059. call _on_mod_range_knob_engine_par_for_gl_m_id
  22060. end on
  22061. on ui_control($2ptey)
  22062. $gpzoi := 57
  22063. call _on_mod_range_knob_engine_par_for_gl_m_id
  22064. end on
  22065. on ui_control($lxste)
  22066. $gpzoi := 58
  22067. call _on_mod_range_knob_engine_par_for_gl_m_id
  22068. end on
  22069. on ui_control($hqxeu)
  22070. $gpzoi := 59
  22071. call _on_mod_range_knob_engine_par_for_gl_m_id
  22072. end on
  22073. on ui_control($0zlbe)
  22074. $gpzoi := 60
  22075. call _on_mod_range_knob_engine_par_for_gl_m_id
  22076. end on
  22077. on ui_control($h4nrw)
  22078. $gpzoi := 61
  22079. call _on_mod_range_knob_engine_par_for_gl_m_id
  22080. end on
  22081. on ui_control($pg4ei)
  22082. $gpzoi := 62
  22083. call _on_mod_range_knob_engine_par_for_gl_m_id
  22084. end on
  22085. on ui_control($2bixl)
  22086. $gpzoi := 63
  22087. call _on_mod_range_knob_engine_par_for_gl_m_id
  22088. end on
  22089. on ui_control($5jo04)
  22090. $gpzoi := 64
  22091. call _on_mod_range_knob_engine_par_for_gl_m_id
  22092. end on
  22093. on ui_control($dhmoe)
  22094. $gpzoi := 65
  22095. call _on_mod_range_knob_engine_par_for_gl_m_id
  22096. end on
  22097. on ui_control($0shp5)
  22098. $gpzoi := 66
  22099. call _on_mod_range_knob_engine_par_for_gl_m_id
  22100. end on
  22101. on ui_control($21luc)
  22102. $gpzoi := 67
  22103. call _on_mod_range_knob_engine_par_for_gl_m_id
  22104. end on
  22105. on ui_control($p4vlm)
  22106. $gpzoi := 68
  22107. call _on_mod_range_knob_engine_par_for_gl_m_id
  22108. end on
  22109. on ui_control($u45os)
  22110. $gpzoi := 69
  22111. call _on_mod_range_knob_engine_par_for_gl_m_id
  22112. end on
  22113. on ui_control($opstl)
  22114. $gpzoi := 70
  22115. call _on_mod_range_knob_engine_par_for_gl_m_id
  22116. end on
  22117. on ui_control($f3pav)
  22118. $gpzoi := 71
  22119. call _on_mod_range_knob_engine_par_for_gl_m_id
  22120. end on
  22121. on ui_control($nrkm4)
  22122. $gpzoi := 72
  22123. call _on_mod_range_knob_engine_par_for_gl_m_id
  22124. end on
  22125. on ui_control($yixdb)
  22126. $gpzoi := 73
  22127. call _on_mod_range_knob_engine_par_for_gl_m_id
  22128. end on
  22129. on ui_control($fflhr)
  22130. $gpzoi := 76
  22131. call _on_mod_range_knob_engine_par_for_gl_m_id
  22132. end on
  22133. on ui_control($3imfl)
  22134. $gpzoi := 74
  22135. call _on_mod_range_knob_engine_par_for_gl_m_id
  22136. end on
  22137. on ui_control($uqaye)
  22138. $gpzoi := 75
  22139. call _on_mod_range_knob_engine_par_for_gl_m_id
  22140. end on
  22141. on ui_control($gwhxp)
  22142. $gpzoi := 77
  22143. call _on_mod_range_knob_engine_par_for_gl_m_id
  22144. end on
  22145. on ui_control($bxtyp)
  22146. $gpzoi := 78
  22147. call _on_mod_range_knob_engine_par_for_gl_m_id
  22148. end on
  22149. on ui_control($xcb2e)
  22150. $gpzoi := 79
  22151. call _on_mod_range_knob_engine_par_for_gl_m_id
  22152. end on
  22153. on ui_control($vtpyr)
  22154. $gpzoi := 80
  22155. call _on_mod_range_knob_engine_par_for_gl_m_id
  22156. end on
  22157. on ui_control($q5pfd)
  22158. $gpzoi := 26
  22159. call _on_mod_range_knob_engine_par_for_gl_m_id
  22160. end on
  22161. on ui_control($rgoik)
  22162. $gpzoi := 27
  22163. call _on_mod_range_knob_engine_par_for_gl_m_id
  22164. end on
  22165. on ui_control($pk0h4)
  22166. $gpzoi := 21
  22167. call _on_mod_range_knob_engine_par_for_gl_m_id
  22168. end on
  22169. on ui_control($0hnr5)
  22170. $gpzoi := 22
  22171. call _on_mod_range_knob_engine_par_for_gl_m_id
  22172. end on
  22173. on ui_control($3s02f)
  22174. $gpzoi := 31
  22175. call _on_mod_range_knob_engine_par_for_gl_m_id
  22176. end on
  22177. on ui_control($410y5)
  22178. $gpzoi := 32
  22179. call _on_mod_range_knob_engine_par_for_gl_m_id
  22180. end on
  22181. on ui_control($begpw)
  22182. $gpzoi := 33
  22183. call _on_mod_range_knob_engine_par_for_gl_m_id
  22184. end on
  22185. on ui_control($llm0i)
  22186. $gpzoi := 34
  22187. call _on_mod_range_knob_engine_par_for_gl_m_id
  22188. end on
  22189. on ui_control($1fo5x)
  22190. $gpzoi := 1
  22191. call MOD__position_mod_menu_for_gl_m_id
  22192. call evaluate_mod_connections
  22193. call MOD__perform_full_update
  22194. end on
  22195. on ui_control($z1x5e)
  22196. $gpzoi := 3
  22197. call MOD__position_mod_menu_for_gl_m_id
  22198. call evaluate_mod_connections
  22199. call MOD__perform_full_update
  22200. end on
  22201. on ui_control($cvjhr)
  22202. call evaluate_mod_connections
  22203. call MOD__perform_full_update
  22204. end on
  22205. on ui_control($fpvgj)
  22206. call evaluate_mod_connections
  22207. call MOD__perform_full_update
  22208. end on
  22209. on ui_control($jiutx)
  22210. call evaluate_mod_connections
  22211. call MOD__perform_full_update
  22212. end on
  22213. on ui_control($e2h4j)
  22214. $gpzoi := 35
  22215. call _on_mod_source_engine_par_for_gl_m_id
  22216. end on
  22217. on ui_control($lqfpr)
  22218. $gpzoi := 36
  22219. call _on_mod_source_engine_par_for_gl_m_id
  22220. end on
  22221. on ui_control($sejrr)
  22222. $gpzoi := 37
  22223. call _on_mod_source_engine_par_for_gl_m_id
  22224. end on
  22225. on ui_control($2iqnc)
  22226. $gpzoi := 38
  22227. call _on_mod_source_engine_par_for_gl_m_id
  22228. end on
  22229. on ui_control($o0yx0)
  22230. $gpzoi := 39
  22231. call _on_mod_source_engine_par_for_gl_m_id
  22232. end on
  22233. on ui_control($lafc5)
  22234. $gpzoi := 40
  22235. call _on_mod_source_engine_par_for_gl_m_id
  22236. end on
  22237. on ui_control($nj3pk)
  22238. $gpzoi := 41
  22239. call _on_mod_source_engine_par_for_gl_m_id
  22240. end on
  22241. on ui_control($b1s4y)
  22242. $gpzoi := 42
  22243. call _on_mod_source_engine_par_for_gl_m_id
  22244. end on
  22245. on ui_control($1kgif)
  22246. $gpzoi := 43
  22247. call _on_mod_source_engine_par_for_gl_m_id
  22248. end on
  22249. on ui_control($s2dqk)
  22250. $gpzoi := 44
  22251. call _on_mod_source_engine_par_for_gl_m_id
  22252. end on
  22253. on ui_control($0zrh0)
  22254. $gpzoi := 45
  22255. call _on_mod_source_engine_par_for_gl_m_id
  22256. end on
  22257. on ui_control($mgevd)
  22258. $gpzoi := 46
  22259. call _on_mod_source_engine_par_for_gl_m_id
  22260. end on
  22261. on ui_control($n32ls)
  22262. $gpzoi := 47
  22263. call _on_mod_source_engine_par_for_gl_m_id
  22264. end on
  22265. on ui_control($51guv)
  22266. $gpzoi := 48
  22267. call _on_mod_source_engine_par_for_gl_m_id
  22268. end on
  22269. on ui_control($k3qfg)
  22270. $gpzoi := 49
  22271. call _on_mod_source_engine_par_for_gl_m_id
  22272. end on
  22273. on ui_control($d4ity)
  22274. $gpzoi := 50
  22275. call _on_mod_source_engine_par_for_gl_m_id
  22276. end on
  22277. on ui_control($cm0ux)
  22278. $gpzoi := 51
  22279. call _on_mod_source_engine_par_for_gl_m_id
  22280. end on
  22281. on ui_control($q1g2q)
  22282. $gpzoi := 52
  22283. call _on_mod_source_engine_par_for_gl_m_id
  22284. end on
  22285. on ui_control($rjvzf)
  22286. $gpzoi := 53
  22287. call _on_mod_source_engine_par_for_gl_m_id
  22288. end on
  22289. on ui_control($nrlyv)
  22290. $gpzoi := 54
  22291. call _on_mod_source_engine_par_for_gl_m_id
  22292. end on
  22293. on ui_control($qvjwi)
  22294. $gpzoi := 55
  22295. call _on_mod_source_engine_par_for_gl_m_id
  22296. end on
  22297. on ui_control($no43m)
  22298. $gpzoi := 56
  22299. call _on_mod_source_engine_par_for_gl_m_id
  22300. end on
  22301. on ui_control($k20qf)
  22302. $gpzoi := 57
  22303. call _on_mod_source_engine_par_for_gl_m_id
  22304. end on
  22305. on ui_control($3drha)
  22306. $gpzoi := 58
  22307. call _on_mod_source_engine_par_for_gl_m_id
  22308. end on
  22309. on ui_control($iw2oc)
  22310. $gpzoi := 59
  22311. call _on_mod_source_engine_par_for_gl_m_id
  22312. end on
  22313. on ui_control($exjvd)
  22314. $gpzoi := 60
  22315. call _on_mod_source_engine_par_for_gl_m_id
  22316. end on
  22317. on ui_control($hr3vo)
  22318. $gpzoi := 61
  22319. call _on_mod_source_engine_par_for_gl_m_id
  22320. end on
  22321. on ui_control($d0pbl)
  22322. $gpzoi := 62
  22323. call _on_mod_source_engine_par_for_gl_m_id
  22324. end on
  22325. on ui_control($oxbzh)
  22326. $gpzoi := 63
  22327. call _on_mod_source_engine_par_for_gl_m_id
  22328. end on
  22329. on ui_control($2moaw)
  22330. $gpzoi := 64
  22331. call _on_mod_source_engine_par_for_gl_m_id
  22332. end on
  22333. on ui_control($sw0os)
  22334. $gpzoi := 65
  22335. call _on_mod_source_engine_par_for_gl_m_id
  22336. end on
  22337. on ui_control($pjmqm)
  22338. $gpzoi := 66
  22339. call _on_mod_source_engine_par_for_gl_m_id
  22340. end on
  22341. on ui_control($ujr4n)
  22342. $gpzoi := 67
  22343. call _on_mod_source_engine_par_for_gl_m_id
  22344. end on
  22345. on ui_control($2cyex)
  22346. $gpzoi := 68
  22347. call _on_mod_source_engine_par_for_gl_m_id
  22348. end on
  22349. on ui_control($4ng2b)
  22350. $gpzoi := 69
  22351. call _on_mod_source_engine_par_for_gl_m_id
  22352. end on
  22353. on ui_control($w3nfb)
  22354. $gpzoi := 70
  22355. call _on_mod_source_engine_par_for_gl_m_id
  22356. end on
  22357. on ui_control($i1321)
  22358. $gpzoi := 71
  22359. call _on_mod_source_engine_par_for_gl_m_id
  22360. end on
  22361. on ui_control($lczp2)
  22362. $gpzoi := 72
  22363. call _on_mod_source_engine_par_for_gl_m_id
  22364. end on
  22365. on ui_control($fr5xq)
  22366. $gpzoi := 73
  22367. call _on_mod_source_engine_par_for_gl_m_id
  22368. end on
  22369. on ui_control($rpdbb)
  22370. $gpzoi := 76
  22371. call _on_mod_source_engine_par_for_gl_m_id
  22372. end on
  22373. on ui_control($v2kdj)
  22374. $gpzoi := 74
  22375. call _on_mod_source_engine_par_for_gl_m_id
  22376. end on
  22377. on ui_control($tpmdd)
  22378. $gpzoi := 75
  22379. call _on_mod_source_engine_par_for_gl_m_id
  22380. end on
  22381. on ui_control($r0mpl)
  22382. $gpzoi := 77
  22383. call _on_mod_source_engine_par_for_gl_m_id
  22384. end on
  22385. on ui_control($a1mcv)
  22386. $gpzoi := 78
  22387. call _on_mod_source_engine_par_for_gl_m_id
  22388. end on
  22389. on ui_control($h5tys)
  22390. $gpzoi := 79
  22391. call _on_mod_source_engine_par_for_gl_m_id
  22392. end on
  22393. on ui_control($mophf)
  22394. $gpzoi := 80
  22395. call _on_mod_source_engine_par_for_gl_m_id
  22396. end on
  22397. on ui_control($m0zqt)
  22398. $gpzoi := 26
  22399. call _on_mod_source_engine_par_for_gl_m_id
  22400. end on
  22401. on ui_control($1xnyu)
  22402. $gpzoi := 27
  22403. call _on_mod_source_engine_par_for_gl_m_id
  22404. end on
  22405. on ui_control($u2ki4)
  22406. $gpzoi := 21
  22407. call _on_mod_source_engine_par_for_gl_m_id
  22408. end on
  22409. on ui_control($tmtfv)
  22410. $gpzoi := 22
  22411. call _on_mod_source_engine_par_for_gl_m_id
  22412. end on
  22413. on ui_control($3rcax)
  22414. $gpzoi := 31
  22415. call _on_mod_source_engine_par_for_gl_m_id
  22416. end on
  22417. on ui_control($5qrmj)
  22418. $gpzoi := 32
  22419. call _on_mod_source_engine_par_for_gl_m_id
  22420. end on
  22421. on ui_control($f0ljx)
  22422. $gpzoi := 33
  22423. call _on_mod_source_engine_par_for_gl_m_id
  22424. end on
  22425. on ui_control($5m5qp)
  22426. $gpzoi := 34
  22427. call _on_mod_source_engine_par_for_gl_m_id
  22428. end on
  22429. on ui_control($u51dh)
  22430. $4djds := 5
  22431. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22432. end on
  22433. on ui_control($2qveo)
  22434. $4djds := 6
  22435. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22436. end on
  22437. on ui_control($fjnu3)
  22438. $4djds := 7
  22439. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22440. end on
  22441. on ui_control($tz115)
  22442. $4djds := 8
  22443. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22444. end on
  22445. on ui_control($2d1qh)
  22446. $4djds := 9
  22447. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22448. end on
  22449. on ui_control($az3wx)
  22450. $4djds := 10
  22451. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22452. end on
  22453. on ui_control($ki4hc)
  22454. $4djds := 11
  22455. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22456. end on
  22457. on ui_control($y4fhf)
  22458. $4djds := 12
  22459. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22460. end on
  22461. on ui_control($cfneg)
  22462. $4djds := 13
  22463. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22464. end on
  22465. on ui_control($kpiih)
  22466. $4djds := 14
  22467. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22468. set_control_par_str(%5comw[14],$CONTROL_PAR_PICTURE,"blank")
  22469. end on
  22470. on ui_control($ddusk)
  22471. $4djds := 15
  22472. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22473. set_control_par_str(%5comw[15],$CONTROL_PAR_PICTURE,"blank")
  22474. end on
  22475. on ui_control($ysdm4)
  22476. $4djds := 16
  22477. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22478. set_control_par_str(%5comw[16],$CONTROL_PAR_PICTURE,"blank")
  22479. end on
  22480. on ui_control($dtugu)
  22481. $4djds := 17
  22482. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22483. end on
  22484. on ui_control($pvege)
  22485. $4djds := 18
  22486. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22487. end on
  22488. on ui_control($iggz4)
  22489. $4djds := 19
  22490. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22491. end on
  22492. on ui_control($5ernz)
  22493. $4djds := 20
  22494. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22495. set_control_par_str(%5comw[20],$CONTROL_PAR_PICTURE,"blank")
  22496. end on
  22497. on ui_control($gepsm)
  22498. $4djds := 21
  22499. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22500. set_control_par_str(%5comw[21],$CONTROL_PAR_PICTURE,"blank")
  22501. end on
  22502. on ui_control($qtif2)
  22503. $4djds := 22
  22504. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22505. set_control_par_str(%5comw[22],$CONTROL_PAR_PICTURE,"blank")
  22506. end on
  22507. on ui_control($dtx0r)
  22508. $4djds := 23
  22509. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22510. end on
  22511. on ui_control($ophyd)
  22512. $4djds := 24
  22513. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22514. end on
  22515. on ui_control($ydeyc)
  22516. $4djds := 25
  22517. call _on_norm_knob_engine_par_for_gl_nk_ep_id
  22518. end on
  22519. on ui_control($ppaoe)
  22520. $4djds := 1
  22521. call _on_norm_knob_for_gl_nk_ep_id
  22522. end on
  22523. on ui_control($ork5f)
  22524. $4djds := 2
  22525. call _on_norm_knob_for_gl_nk_ep_id
  22526. end on
  22527. on ui_control($dg3qf)
  22528. $4djds := 3
  22529. call _on_norm_knob_for_gl_nk_ep_id
  22530. end on
  22531. on ui_control($p3vhn)
  22532. $4djds := 4
  22533. call _on_norm_knob_for_gl_nk_ep_id
  22534. end on
  22535. on ui_control($qwf1w)
  22536. $4djds := 0
  22537. call _on_norm_knob_for_gl_nk_ep_id
  22538. end on