[VERSION] save version=121 usine version=HH5 date usine=230125 [PA-INFO] usine version=Usine HH5 5.2.230125 EXPERT date usine=230125 description= filename=D:\HH 5\MatrixSwitchTest.pat patch version=121 [PA-PASE] name=MatrixSwitchTest saved in preset=1 can be randomized=1 can be reset=1 fast graphic render=0 also visible in IB=0 enabled=1 is visible=1 ignored in parent global color=0 on top=0 opacity=1 zoom scale=1 can zoom=1 left=2 top=100 width=485.127288818359 height=278.331634521484 resize grip enabled=1 IB left=0 IB top=0 IB width=100000 IB height=100000 location left=100000 location top=100000 location width=100000 location height=100000 memo minimized in IB=0 memo minimized=0 memo reduced=0 floating x=0 floating y=0 floating content parent X=1 floating content parent Y=1 resizable left=0 resizable right=0 resizable top=0 resizable bottom=0 ignored in physical engine=0 collide=0 collide info=0 speed x=0 speed y=0 angular speed=0 transparent=0 background color=$FF363636 hilited color=$FF939393 frames count=1 frames alignment=0 fit size=1 show border=0 border color=$FF717171 border width=0 round size=3 don't draw selection border=0 show caption=1 caption font color=$BBFFFFFF caption font size factor=0.600000023841858 caption align=1 caption V align=0 caption font name=Arial caption font bold=1 caption font italic=0 caption font underline=0 show header=1 header height=20 header color=$FF717171 show toolbar=1 toolbar size factor=0.999999940395355 minimized=0 HeightBeforeMinimize=0 WidthBeforeMinimize=0 snap to grid=1 grid size=2 auto resize=1 auto resize margin=6 show H scroller=1 H scroller height=14 H scroller color=$FF545454 H scroller back color=$00000000 H scroller opacity=1 [PA-] UID=6073195804140353610 PRESETUID=4999152280162646104 PATCHTYPE=11 ORIGINDEVICE= NBPG=5 OFFSETX=-100 OFFSETY=-84 QIDX1NEW0=0 QIDX2NEW0=0 ID0=95 L0=377 T0=573 USR0=D:\HH 5\Resources\Modules\Matrix\Matrix.usr-win64 ID1=223 L1=260 T1=606 QIDX1NEW2=0 QIDX2NEW2=0 ID2=355 L2=710 T2=593 QIDX1NEW3=0 QIDX2NEW3=0 ID3=355 L3=928 T3=636 QIDX2NEW4=0 ID4=164 L4=574 T4=764 C0=0100000000005700 CSRCNAME0=COLOR OUT CTARGNAME0=COLOR OFF 1 C1=0100000000005800 CSRCNAME1=COLOR OUT CTARGNAME1=COLOR OFF 2 C2=0100000000005900 CSRCNAME2=COLOR OUT CTARGNAME2=COLOR OFF 3 C3=0100000000005A00 CSRCNAME3=COLOR OUT CTARGNAME3=COLOR OFF 4 C4=0100000000005B00 CSRCNAME4=COLOR OUT CTARGNAME4=COLOR OFF 5 C5=0200050000001100 CSRCNAME5=DISPLAY CT CTARGNAME5=CELLS CAPTION C6=0000020002000000 CSRCNAME6=NUM OF COLS CTARGNAME6=COL CT C7=0000030002000100 CSRCNAME7=NUM OF ROWS CTARGNAME7=ROW CT C8=00000E0002000300 CSRCNAME8=CELLS OUT CTARGNAME8=VALUES C9=0400010002000200 CSRCNAME9=TEXT 1 CTARGNAME9=CTEXT C10=0200040003000000 CSRCNAME10=CT OUT CTARGNAME10=COMMA TEXT IN C11=0200060003000100 CSRCNAME11=VALUES OUT CTARGNAME11=INDICES IN NBCO=12 [PA-0] UID=6907775436741979274 PRESETUID=5258311401539939491 saved in preset=1 can be randomized=1 can be reset=1 INDEXvisible=1 Vmatrix size=20 Vnum of cols=4 Vnum of rows=5 INDEXmouse mode=0 Vcell draw val=1 Vrandom coverage=0.25 Vreset val=0 Vlast click cell=4 Vlast click col=0 Vlast click row=1 TABcells valL=1 TABcells valV=00000000 TABcells outL=20 TABcells outV=000000000000803F00000000000000000000803F0000000000000000000000000000803F0000000000000000000000000000803F00000000000000000000000000000000000000000000000000000000 Vcursor pos=0 TABcursor outL=4 TABcursor outV=00000000040000000500000000000000 Tcells caption= Vallow drop=0 COLLAPS=1 CHUNK=4D5832300400000005000000000000000000803F00000000000000000000803F0000000000000000000000000000803F0000000000000000000000000000803F0000000000000000000000000000000000000000000000000000000000000000 CHUNKCRC=706837465 [PA-0CTRL] UID=5749464708103842981 PRESETUID=2789216459919502513 VISIBLE=1 MINIMIZED=0 [PA-0CTRLSE] UID=5749464708103842981 PRESETUID=2789216459919502513 also visible in IB=0 edition enabled=1 is visible=1 ignored in parent global color=0 on top=1 opacity=1 blur softness=0 vertical=0 rotation angle=0 zoom scale=1 can zoom=0 left=0 top=15.342960357666 width=479.127288818359 height=219.409042358398 resize grip enabled=1 IB left=0 IB top=0 IB width=10000 IB height=10000 location left=10000 location top=10000 location width=10000 location height=10000 memo minimized in IB=0 memo minimized=0 memo reduced=0 floating x=0 floating y=0 floating content parent X=1 floating content parent Y=1 resizable left=0 resizable right=0 resizable top=0 resizable bottom=0 ignored in physical engine=0 collide=0 collide info=0 speed x=0 speed y=0 angular speed=0 transparent=1 background color=$36000000 hilited color=$FF828282 frames count=1 frames alignment=0 fit size=1 show border=0 border color=$FF696969 border width=2 round size=0 don't draw selection border=1 show caption=0 caption font color=$FFDDDDDD caption font size factor=0.638528108596802 caption align=1 caption V align=0 caption font name=Arial caption font bold=0 caption font italic=0 caption font underline=0 show poly order=0 show header=0 header height=20 header color=$FF515151 show toolbar=0 toolbar size factor=1 mouse over=0 selected=0 [PA-0SE] UID=6907775436741979274 PRESETUID=5258311401539939491 also visible in IB=0 saved in preset=1 can be randomized=1 can be reset=1 cursor orientation=1 cursor color=$FF888888 cells rounded=0 cells round size=0 cells gap=1 colors orientation=0 color on 1=$57000000 color on 2=$57000000 color on 3=$57000000 color on 4=$57000000 color on 5=$FF7C6AFF color on 6=$FF7C6AFF color on 7=$FF7C6AFF color on 8=$FF7C6AFF color on 9=$FF7C6AFF color on 10=$FF7C6AFF color on 11=$FF7C6AFF color on 12=$FF7C6AFF color off 1=$CD000000 color off 2=$CD000000 color off 3=$CD000000 color off 4=$CD000000 color off 5=$CD000000 color off 6=$FF000000 color off 7=$FF000000 color off 8=$FF000000 color off 9=$FF000000 color off 10=$FF000000 color off 11=$FF000000 color off 12=$FF000000 vertical align=0 horizontal align=0 cells caption size=0.376190513372421 cells caption color=$FFDDDDDD fade distance=50 SHIFT fade factor=7 edition enabled=1 is visible=1 ignored in parent global color=0 on top=1 opacity=1 blur softness=0 vertical=0 rotation angle=0 zoom scale=1 can zoom=0 left=0 top=15.342960357666 width=479.127288818359 height=219.409042358398 resize grip enabled=1 IB left=0 IB top=0 IB width=10000 IB height=10000 location left=10000 location top=10000 location width=10000 location height=10000 memo minimized in IB=0 memo minimized=0 memo reduced=0 floating x=0 floating y=0 floating content parent X=1 floating content parent Y=1 resizable left=0 resizable right=0 resizable top=0 resizable bottom=0 ignored in physical engine=0 collide=0 collide info=0 speed x=0 speed y=0 angular speed=0 transparent=1 background color=$36000000 hilited color=$FF828282 frames count=1 frames alignment=0 fit size=1 show border=0 border color=$FF696969 border width=2 round size=0 don't draw selection border=1 show caption=0 caption font color=$FFDDDDDD caption font size factor=0.638528108596802 caption align=1 caption V align=0 caption font name=Arial caption font bold=0 caption font italic=0 caption font underline=0 show poly order=0 show header=0 header height=20 header color=$FF515151 show toolbar=0 toolbar size factor=1 mouse over=0 selected=0 [PA-1] UID=3219947232407891669 PRESETUID=7932898370537696992 COLcolor out=$CD000000 [PA-2] FNAME=D:\WINDOWS_MOON\Desktop\HH 5\Global Recall Work\matrixSwitcher.fastscript UID=8832954710680297212 PRESETUID=7108095393635131171 script source=//////////////////////////////////////////////////////,// read matrix data newspaper style in columns,//e moon Nov 2022,////////////////////////////////////////////////////,,const FAVTAG = '-';,"var rowsIN, colsIN,ctIN,valsIN : Tparameter;","var ctOUT,dispCtOUT,valsOUT: Tparameter;",,"var gTextin, gTextOut, gDisplayText : TstringList; ","var row, col : integer;",,// Globally enable/disable logging/////////////////////////////////////// ,const DTAG = 'matrix Sw> ';,const DBUG_ON = TRUE;,procedure debug(s: string); begin if DBUG_ON then strace(DTAG + s); end;,procedure iDebug(s: string; num : integer); begin debug(s + '= ' + intToStr(num)); end;,procedure fDebug(s: string; num : single); begin debug(s + '= ' + floatToStr(num)); end;,"// Always log, whether debug is on or not.",procedure Error(s: string); begin strace('ERROR-' + DTAG + s); end;,procedure fError(s: string; num : single); begin strace('ERROR-' + DTAG + s + '= ' + floatToStr(num)); end;,//////////////////////////////////////////////////////////////////////////,,,procedure init;,begin ," colsIN := CreateParam('col ct',ptDatafield,pioInput); "," rowsIN := CreateParam('row ct',ptDatafield,pioInput);"," ctIN := CreateParam('ctext',ptTextField,pioInput);"," valsIN := CreateParam('values',ptArray,pioInput);",," ctOUT := CreateParam('ct out',ptTextField,pioOutput);"," dispCtOUT := CreateParam('display ct',ptTextField,pioOutput);"," valsOUT := CreateParam('values out',ptArray, pioOutput);",, ModuleColor($FF8E44AD); , gTextin.create; gTextOut.create; gDisplayText.create;,end;,,// destroy,procedure Destroy; begin gTextIn.free; gTextOut.free; gDisplayText.free; end; ,,procedure Callback(n:integer);,"var i,j,len: integer;",var val: float;,"var text,displayT: string;",var options: TReplaceFlags;,VAR values : ARRAY OF float;,begin, ," //setArrayLength(values, 0); ", if n = valsIN then, begin, len := valsIN.Length;, valsOUT.Length(len);, debug('vals in changed');, j := 0;, for col := 0 to (colsIN.asInteger - 1) do , begin, for row := 0 to (rowsIN.asInteger - 1) do , begin , i := (colsIN.asInteger * row) + col; ," valsOUT.asArray(j,valsIN.asArray(i));"," //iDebug('setting output array position',j);"," //iDebug('to value',i);", j := j + 1;, end;, end;, end, else begin , gTextIn.clear; gTextOut.clear; gDisplayText.clear;, gTextIn.setCommaText(ctIN.asString);,, options := [];, , for row := 0 to (rowsIN.asInteger - 1) do , begin, for col := 0 to (colsIN.asInteger - 1) do , begin , i := (rowsIN.asInteger * col) + row;, if i >= gTextIn.count then text := '' else text := gTextIn.getStrings(i);, values[j] := valsIN.asArray(i);," //fDebug(text,values[j]); ", gTextOut.add(text);, //trim leading '-' from names for display," if text.startsWith(FAVTAG) then displayT := StringReplace(text, FAVTAG,'', options) else displayT := text;", gDisplayText.add(displayT);, j := j + 1;, end;, end;, ctOUT.asString(gTextOut.GetCommatext); , dispCtOUT.asString(gDisplayText.GetCommatext); , end; ,end; background color=$FF8E44AD fixed location=0 Vcol ct=4 Vrow ct=5 Tctext=-KEY1,-KEY2,EFFECT,LH Bass,RH4Bass TABvaluesL=20 TABvaluesV=000000000000803F00000000000000000000803F0000000000000000000000000000803F0000000000000000000000000000803F00000000000000000000000000000000000000000000000000000000 Tct out= Tdisplay ct= TABvalues outL=20 TABvalues outV=000000000000803F0000803F0000803F000000000000803F0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 [PA-3] FNAME=D:\HH 5\Resources\Templates\\Scripts\Empty Script.fastscript UID=2752881143970819107 PRESETUID=5659955695575919662 script source=//////////////////////////,// SetCommatext multi,//By Eric Moon Feb 2018,,// Globally enable/disable logging/////////////////////////////////////// ,const DTAG = 'SetCommatextMulti: ';,const DBUG_ON = TRUE;,procedure debug(s: string); begin if DBUG_ON then strace(DTAG + s); end;,procedure iDebug(s: string; num : integer); begin debug(s + '= ' + intToStr(num)); end;,procedure fDebug(s: string; num : single); begin debug(s + '= ' + floatToStr(num)); end;,"// Always log, whether debug is on or not.",procedure Error(s: string); begin strace('ERROR-' + DTAG + s); end;,procedure fError(s: string; num : single); begin strace('ERROR-' + DTAG + s + '= ' + floatToStr(num)); end;,//////////////////////////////////////////////////////////////////////////,,"var CommatextIN, IndicesIN, commaTextOUT: Tparameter;",,"var inputList,outputList: TstringList;",////////////////////////////////////////,Procedure Destroy; begin inputList.free; outputList.free end;,/////////////////////////////////////////,procedure init;,var i: integer;,begin , ModuleColor($FF27AE61); ," commatextIN:= CreateParam('comma text in',PtTextField,pioInput);"," indicesIN:= CreateParam('indices in', PtArray,pioInput);"," commatextOUT:= CreateParam('comma text out',PtTextField,pioOutput); ", , inputList.create;, outputList.create;, ,END;//INIT,///////////////////////////////////////////,Procedure Callback(N:integer); ,"var i, itemCount: integer;",var selected: boolean;,begin , if (n = CommatextIn) , then begin, inputList.clear;, outputList.clear;, inputList.SetCommatext(commatextIN.asString); , itemCount:= inputList.Count;, end , else begin, for i := 0 to itemCount - 1 do, begin , selected := trunc(IndicesIN.asArray(i)) > 0;, if selected then outputList.add(inputList.getStrings(i));, end;," SetStringValue(commatextOUT, outputList.getCommatext);", end; ,END;,,/////////////////////////////// background color=$FF27AE61 fixed location=0 Tcomma text in= TABindices inL=20 TABindices inV=000000000000803F0000803F0000803F000000000000803F0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 Tcomma text out= [PA-4] UID=7404794487517523889 PRESETUID=4726716038673117118 USERADDR= saved in preset=0 once in poly=0 in-outlet visible=1 set only if has changed=0 INDEXvisible=1 Ttext=-KEY1,-KEY2,EFFECT,LH Bass,RH4Bass Tcaption=NS FILES Tsymbol= Vallow drop=0 [PA-4textSE] UID=3283478017136963520 PRESETUID=470054239578664903 USERADDR= also visible in IB=0 edition enabled=1 is visible=1 ignored in parent global color=0 on top=0 opacity=1 blur softness=0 vertical=0 rotation angle=0 zoom scale=1 can zoom=0 left=2 top=238.331634521484 width=160 height=34 resize grip enabled=1 IB left=0 IB top=0 IB width=0 IB height=0 location left=32345 location top=32345 location width=0 location height=0 memo minimized in IB=0 memo minimized=0 memo reduced=0 floating x=0 floating y=0 floating content parent X=1 floating content parent Y=1 resizable left=0 resizable right=0 resizable top=0 resizable bottom=0 ignored in physical engine=0 collide=0 collide info=0 speed x=0 speed y=0 angular speed=0 transparent=0 background color=$FF363636 hilited color=$FF939393 frames count=1 frames alignment=0 fit size=1 show border=0 border color=$BBFFFFFF border width=3 round size=3 don't draw selection border=0 show caption=1 caption font color=$BBFFFFFF caption font size factor=0.860000014305115 caption align=1 caption V align=0 caption font bold=0 caption font italic=0 caption font underline=0 show poly order=1 text align=1 show value=1 show symbol=1 show value and symbol on click=1 hint value on mouse down=0 edit with simple click=0 display array values=0 value font color=$BBFFFFFF value font size factor=0.879999995231628 value font bold=0 value align=1 value V align=0 touch hi precision=0 precision factor=8 mouse mode=0 circular mouse=0 active mode=0 inverse=0 quantize=0 mode=0 channel=1 control type=0 control num=0 motorized=0 mackie mode=0 soft take over=0 short cut=0 osc tag order=1 osc mode=0 osc feedback=0 osc feedback port=2002 dmx universe=0 dmx channel=0 range min=0 range max=1 curve=2 coeff=1 auto record on click=0 mouse over=0 selected=0 [PA-CPSE] also visible in IB=0 enabled=1 is visible=1 ignored in parent global color=0 on top=0 opacity=1 zoom scale=1 can zoom=1 left=2 top=100 width=485.127288818359 height=278.331634521484 resize grip enabled=1 IB left=0 IB top=0 IB width=100000 IB height=100000 location left=100000 location top=100000 location width=100000 location height=100000 memo minimized in IB=0 memo minimized=0 memo reduced=0 floating x=0 floating y=0 floating content parent X=1 floating content parent Y=1 resizable left=0 resizable right=0 resizable top=0 resizable bottom=0 ignored in physical engine=0 collide=0 collide info=0 speed x=0 speed y=0 angular speed=0 transparent=0 background color=$FF363636 hilited color=$FF939393 frames count=1 frames alignment=0 fit size=1 show border=0 border color=$FF717171 border width=0 round size=3 don't draw selection border=0 show caption=1 caption font color=$BBFFFFFF caption font size factor=0.600000023841858 caption align=1 caption V align=0 caption font name=Arial caption font bold=1 caption font italic=0 caption font underline=0 show header=1 header height=20 header color=$FF717171 show toolbar=1 toolbar size factor=0.999999940395355 minimized=0 HeightBeforeMinimize=0 WidthBeforeMinimize=0 snap to grid=1 grid size=2 auto resize=1 auto resize margin=6 show H scroller=1 H scroller height=14 H scroller color=$FF545454 H scroller back color=$00000000 H scroller opacity=1 name=MatrixSwitchTest saved in preset=1 can be randomized=1 can be reset=1 fast graphic render=0 [PA-CPTOOLBARTBENABLESE] UID=8928835195355636899 PRESETUID=3521291046657546460 USERADDR= [PA-CPTOOLBARTBMINIMIZESE] UID=6455593497170644764 PRESETUID=503716497731443208 USERADDR= [PA-CPTOOLBARTBPRESETSE] UID=5992934073767139312 PRESETUID=8521704869894643258 USERADDR= active mode=0 inverse=0 mode=2 channel=1 control type=0 control num=0 motorized=0 mackie mode=0 soft take over=0 short cut=0 key mode=1 mouse mode=1 time code ON=0 time code OFF=0 osc tag order=1 osc mode=0 osc feedback=0 osc feedback port=2002 dmx universe=0 dmx channel=0