; ------- Bome MIDI Translator: signed project file
; ------- You can modify this file as you like, but that will invalidate the
; ------- signature so that it cannot be opened in the BomeBox or MT Player anymore.
;
[Preset.0]
Active=1
Comments=
Incoming0=EnDi02
Incoming1=KAM10000KSQ1000201B21B
Incoming2=Tim0TimT0004Init
Name=Init
Name0=Project Opened - Init
Name1=ESC - Init
Name2=Init Global
Options0=Actv01Stop00OutO00
Options1=Actv01Stop00OutO00
Options2=Actv01Stop00OutO00StMa00000008label0017__cmt>// Encoded numberga=0label0006__cmt>label001D__cmt>// Page Number (1 base)gb=0label0006__cmt>label0015__cmt>// current bankgc=0
Outgoing0=Tim0TimS0004Init1:0:1
Outgoing1=Tim0TimS0004Init1:0:1
Outgoing2=None
PresetSwitchIgnore=0
[Preset.1]
Active=1
Comments=
Incoming0=MID3
Incoming1=MID3
Incoming10=Tim0TimT000ASend Digit
Incoming11=Tim0TimT000ASend Digit
Incoming12=Tim0TimT000ASend Digit
Incoming13=Tim0TimT000ASend Digit
Incoming14=Tim0TimT000ASend Digit
Incoming15=Tim0TimT000ASend Digit
Incoming16=Tim0TimT000ASend Digit
Incoming17=Tim0TimT000ASend Digit
Incoming18=Tim0TimT0009Send Post
Incoming2=Tim0TimT0004Send
Incoming3=Tim0TimT0004Send
Incoming4=Tim0TimT000BSend Prefix
Incoming5=Tim0TimT000BSend Prefix
Incoming6=Tim0TimT0004Send
Incoming7=Tim0TimT000ASend Digit
Incoming8=Tim0TimT000ASend Digit
Incoming9=Tim0TimT000ASend Digit
Name=Work
Name0=Bank Change
Name1=Incoming Program Change
Name10=3
Name11=4
Name12=5
Name13=6
Name14=7
Name15=8
Name16=9
Name17=Increment digit counter and Send Post
Name18=Send Post
Name2=Send Timer
Name3=Send Timer
Name4=Prefix
Name5=Focus
Name6=Send Digit
Name7=0
Name8=1
Name9=2
Options0=Actv01Stop00OutO00StMa00000007label0006__cmt>label0020__cmt>// scale it from 128 to 78pp=pp*78pp=pp/128if(zz!=0)label001F__log>Log scaled value is %pp%gc=ppif(gc>77)gc=77
Options1=Actv01Stop00OutO00StMa0000003Clabel000E__cmt>// debugzz=0label0014__cmt>// Bank numberrr=gcss=rr*128pp=pp+sslabel0015__cmt>// Start with 1pp=pp+1if(pp>9999)pp=9999gb=pplabel0024__cmt>// we now have the value in pplabel0006__cmt>if(zz!=0)label0011__log>Log pp=%pp%label0036__cmt>//if zz!=0 then exit rules, skip outgoing actionlabel0006__cmt>label0035__cmt>// ignore if we are in the middle of a sequencerr=ga&15label0035__cmt>// note if you do PC faster than the keystrokeslabel002D__cmt>// are being sent, you will lose the PClabel002E__cmt>// although you don't want to send a newlabel0035__cmt>// PC mid stream in a character output sequenceif(rr!=0)noexecutelabel0006__cmt>label001B__cmt>// get 1000's into uuuu=pp/1000uu=uu&15label0031__cmt>//if zz!=0 then Log "Log thousands is %uu%"label0018__cmt>// get 100's in qqqq=pp/100qq=qq%10qq=qq&15label0030__cmt>//if zz!=0 then Log "Log hundreds is %qq%"label0017__cmt>// get 10's in rrrr=pp/10rr=rr%10rr=rr&15label002C__cmt>//if zz!=0 then Log "Log tens is %rr%"label0016__cmt>// get 1's in ssss=pp%10ss=ss&15label002C__cmt>//if zz!=0 then Log "Log ones is %ss%"label0006__cmt>label0015__cmt>//if zz!=0 thenlabel0020__log>Number is %uu%%qq%%rr%%ss%label0018__cmt>// ss rr qq uu sqga=0label0018__cmt>// store thousandstt=uu<<4ga=ga|ttlabel0016__cmt>//store hundredstt=qq<<8ga=ga|ttlabel0013__cmt>// store tenstt=rr<<12ga=ga|ttlabel0013__cmt>// store onestt=ss<<16ga=ga|ttlabel0006__cmt>label0006__cmt>
Options10=Actv01Stop00OutO00Dlaytt:MillisStMa0000000Dlabel0012__cmt>// get digitpp=ga&15label0012__cmt>// set delaytt=pp*10if(pp==1)qq=ga>>4if(pp==2)qq=ga>>8if(pp==3)qq=ga>>12if(pp==4)qq=ga>>16qq=qq&15if(qq!=3)noexecutelabel0006__cmt>if(zz==1)label003B__log>Log pass %pp% Sending keystroke %qq% delay of %tt% msif(zz==1)noexecute
Options11=Actv01Stop00OutO00Dlaytt:MillisStMa0000000Dlabel0012__cmt>// get digitpp=ga&15label0012__cmt>// set delaytt=pp*10if(pp==1)qq=ga>>4if(pp==2)qq=ga>>8if(pp==3)qq=ga>>12if(pp==4)qq=ga>>16qq=qq&15if(qq!=4)noexecutelabel0006__cmt>if(zz==1)label003B__log>Log pass %pp% Sending keystroke %qq% delay of %tt% msif(zz==1)noexecute
Options12=Actv01Stop00OutO00Dlaytt:MillisStMa0000000Clabel0012__cmt>// get digitpp=ga&15label0012__cmt>// set delaytt=pp*10if(pp==1)qq=ga>>4if(pp==2)qq=ga>>8if(pp==3)qq=ga>>12if(pp==4)qq=ga>>16qq=qq&15if(qq!=5)noexecuteif(zz==1)label003B__log>Log pass %pp% Sending keystroke %qq% delay of %tt% msif(zz==1)noexecute
Options13=Actv01Stop00OutO00Dlaytt:MillisStMa0000000Clabel0012__cmt>// get digitpp=ga&15label0012__cmt>// set delaytt=pp*10if(pp==1)qq=ga>>4if(pp==2)qq=ga>>8if(pp==3)qq=ga>>12if(pp==4)qq=ga>>16qq=qq&15if(qq!=6)noexecuteif(zz==1)label003B__log>Log pass %pp% Sending keystroke %qq% delay of %tt% msif(zz==1)noexecute
Options14=Actv01Stop00OutO00Dlaytt:MillisStMa0000000Dlabel0012__cmt>// get digitpp=ga&15label0012__cmt>// set delaytt=pp*10if(pp==1)qq=ga>>4if(pp==2)qq=ga>>8if(pp==3)qq=ga>>12if(pp==4)qq=ga>>16qq=qq&15if(qq!=7)noexecutelabel0006__cmt>if(zz==1)label003B__log>Log pass %pp% Sending keystroke %qq% delay of %tt% msif(zz==1)noexecute
Options15=Actv01Stop00OutO00Dlaytt:MillisStMa0000000Dlabel0012__cmt>// get digitpp=ga&15label0012__cmt>// set delaytt=pp*10if(pp==1)qq=ga>>4if(pp==2)qq=ga>>8if(pp==3)qq=ga>>12if(pp==4)qq=ga>>16qq=qq&15if(qq!=8)noexecutelabel0015__cmt>//if zz==1 thenlabel003B__log>Log pass %pp% Sending keystroke %qq% delay of %tt% msif(zz==1)noexecute
Options16=Actv01Stop00OutO00Dlaytt:MillisStMa0000000Dlabel0012__cmt>// get digitpp=ga&15label0012__cmt>// set delaytt=pp*10if(pp==1)qq=ga>>4if(pp==2)qq=ga>>8if(pp==3)qq=ga>>12if(pp==4)qq=ga>>16qq=qq&15if(qq!=9)noexecutelabel0006__cmt>if(zz==1)label003B__log>Log pass %pp% Sending keystroke %qq% delay of %tt% msif(zz==1)noexecute
Options17=Actv01Stop00OutO00Dlaytt:MillisStMa00000008label0010__cmt>//pp=ga&15if(pp>0)ga=ga+1if(pp>0)pp=pp+1label000E__cmt>// delaytt=pp*10label001F__log>Increment Sequence = %pp%if(pp<5)noexecutelabel0006__cmt>
Options18=Actv01Stop00OutO00StMa00000006label0029__cmt>// set back to 0 for next iterationga=0if(zz==1)label0016__log>Log Sending Postif(zz==1)noexecuteif(zz==1)noexecuteif(zz!=0)label0010__log>Log RETURN
Options2=Actv01Stop00OutO00StMa00000002pp=ga&15if(pp!=0)noexecute
Options3=Actv01Stop00OutO00StMa00000004pp=ga&15label001E__cmt>// delay in millisecondsqq=pp*10ga=ga+1
Options4=Actv00Stop00OutO00Dlay0:MillisStMa00000002if(zz==1)label002E__log>Log prefix being sent with delay of %qq%if(zz==1)noexecute
Options5=Actv01Stop00OutO00Dlay0:MillisStMa00000002if(zz==1)label002E__log>Log prefix being sent with delay of %qq%if(zz==1)noexecute
Options6=Actv01Stop00OutO00StMa00000007pp=ga&15label001E__cmt>// delay in millisecondsqq=pp*10label0006__cmt>label0006__cmt>if(zz==1)label0030__log>Log Digit being sent with delay of %qq% msif(zz==1)noexecute
Options7=Actv01Stop00OutO00Dlaytt:MillisStMa00000026label0012__cmt>// get digitpp=ga&15label0012__cmt>// set delaytt=pp*10label0011__cmt>//thousandsif(pp==1)qq=ga>>4label0010__cmt>//hundredsif(pp==2)qq=ga>>8label000D__cmt>// tensif(pp==3)qq=ga>>12label000D__cmt>// onesif(pp==4)qq=ga>>16qq=qq&15label0017__log>Digit %pp% = %qq%if(qq!=0)noexecutelabel0006__cmt>label0020__cmt>// this is not working yetgoto0004overlabel001B__cmt>// Skip leading zeroslabel001C__cmt>// leading not skippedvv=0label002D__cmt>// thousands if under 1000 skip digit 1if(pp!=1)sk2iplabel0018__cmt>// leading skippedvv=1noexecuteif(vv==1)skipif(pp!=2)sk2ipvv=1noexecuteif(pp!=3)skipnoexecutelabel0004overlabel0006__cmt>label0006__cmt>label0006__cmt>if(zz==1)label003B__log>Log pass %pp% Sending keystroke %qq% delay of %tt% msif(zz==1)noexecute
Options8=Actv01Stop00OutO00Dlaytt:MillisStMa0000000Clabel0012__cmt>// get digitpp=ga&15label0012__cmt>// set delaytt=pp*10if(pp==1)qq=ga>>4if(pp==2)qq=ga>>8if(pp==3)qq=ga>>12if(pp==4)qq=ga>>16qq=qq&15if(qq!=1)noexecuteif(zz==1)label003B__log>Log pass %pp% Sending keystroke %qq% delay of %tt% msif(zz==1)noexecute
Options9=Actv01Stop00OutO00Dlaytt:MillisStMa0000000Clabel0012__cmt>// get digitpp=ga&15label0012__cmt>// set delaytt=pp*10if(pp==1)qq=ga>>4if(pp==2)qq=ga>>8if(pp==3)qq=ga>>12if(pp==4)qq=ga>>16qq=qq&15if(qq!=2)noexecuteif(zz==1)label003B__log>Log pass %pp% Sending keystroke %qq% delay of %tt% msif(zz==1)noexecute
Outgoing0=None
Outgoing1=Tim0TimS0004Send1:0:1
Outgoing10=KAM10100KSQ10002033233
Outgoing11=KAM10100KSQ10002034234
Outgoing12=KAM10100KSQ10002035235
Outgoing13=KAM10100KSQ10002036236
Outgoing14=KAM10100KSQ10002037237
Outgoing15=KAM10100KSQ10002038238
Outgoing16=KAM10100KSQ10002039239
Outgoing17=Tim0TimS0009Send Post1:0:1
Outgoing18=KAM10100KSQ1000200D20D
Outgoing2=Tim0TimS000BSend Prefix1:0:1
Outgoing3=Tim0TimS000ASend Digit1:0:1
Outgoing4=KAM3Text
Outgoing5=AcApA000Ceditplus.exe
Outgoing6=Tim0TimS000ASend Digit3:0:10
Outgoing7=KAM10100KSQ10002030230
Outgoing8=KAM10100KSQ10002031231
Outgoing9=KAM10100KSQ10002032232
PresetSwitchIgnore=0
[Project]
DefaultInPorts=MIDA0001000FFrom Controller
DefaultOutPorts=MIDA0000
Version=2
[Signatures]
SigName-1=[Midi Translator Pro Internal]
Signature-1=nPbbWeIxm2E+YeXcYSgaw1zrWUhDQqooB7F6/Fqziqvr6sT1Cn+6n3LpClfaZ0uDodKlC024LbG8cVwIr4CsZsXCgQCfQPT4+UwUwE7En81tBhgNmJNyckJ2AlxQIbDMUb4IoVPnfUNaB7MZZiMQ9CaJKm+MZ/yFWpJWnHa8ccI=
SignedBy-1=Steve Caldwell