Lines Matching defs:a

16 abc2svg.pab40=function(p,a){p+=19
18 if(a&&a!=3)
19 b40+=a
25 abc2svg.rat=function(n,d){var a,t,n0=0,d1=0,n1=1,d0=1
29 a=(n/d)|0
32 t=n0+a*n1
35 t=d0+a*d1
41 var errs={bad_char:"Bad character '$1'",bad_grace:"Bad character in grace note sequence",bad_transp:"Bad transpose value",bad_val:"Bad value in $1",bar_grace:"Cannot have a bar in grace notes",ignored:"$1: inside tune - ignored",misplaced:"Misplaced '$1' in %%score",must_note:"!$1! must be on a note",must_note_rest:"!$1! must be on a note or a rest",nonote_vo:"No note in voice overlay",not_ascii:"Not an ASCII character",not_enough_n:'Not enough notes/rests for %%repeat',not_enough_m:'Not enough measures for %%repeat',not_enough_p:"Not enough parameters in %%map",not_in_tune:"Cannot have '$1' inside a tune",notransp:"Cannot transpose with a temperament"}
82 msg=msg.replace(/\$./g,function(a){switch(a){case'$1':return a1
281 function deco_def(nm){var a,dd,dd2,name2,c,i,elts,str,hd,text=decos[nm]
285 a=text.match(/(\d+)\s+(.+?)\s+([0-9.,]+)\s+([0-9.]+)\s+([0-9.]+)/)
286 if(!a){error(1,null,"Invalid decoration '$1'",nm)
288 var c_func=Number(a[1]),h=a[3],wl=parseFloat(a[4]),wr=parseFloat(a[5])
289 if(isNaN(c_func)){error(1,null,"%%deco: bad C function value '$1'",a[1])
305 dd.func=dd.name.indexOf("head-")==0?9:c_func;dd.glyph=a[2];dd.h=Number(h)
307 dd.wl=wl;dd.wr=wr;str=text.replace(a[0],'').trim()
348 case 33:if(s.type!=C.BAR){error(1,s,"!beamon! must be on a bar")
352 case 34:if(s.type!=C.NOTE||!prev||prev.type!=C.NOTE||s.dur!=prev.dur){error(1,s,"!$1! must be on the last of a couple of notes",dd.name)
376 s.feathered_beam=dd.name[5]=='a'?1:-1;continue
422 var de,de2,dd,s,note,f,st,x,y,y2,ym,uf,i,str,a,new_de=[],ymid=[]
468 if(str[0]=='@'){a=str.match(/^@([0-9.-]+),([0-9.-]+);?/);x+=Number(a[1]);y+=Number(a[2]);str=str.replace(a[0],"")}
502 default:error(1,null,"Cannot have !$1! on a head",dd.name)
774 Abc.prototype.calculate_beam=function(bm,s1){var s,s2,g,notes,nflags,st,v,two_staves,two_dir,x,y,ys,a,b,stem_err,max_stem_err,p_min,p_max,s_closest,stem_xoff,scale,visible,dy
806 return false}else{if(!two_staves){bm.s1=s1;bm.a=(s1.ys-s2.ys)/(s1.xs-s2.xs);bm.b=s1.ys-s1.xs*bm.a+staff_tb[st].y;bm.nflags=nflags
819 a=0
821 a=0
823 if(a==undefined)
824 a=(s2.ys+staff_tb[s2.st].y-y)/(s2.xs-s1.xs)
825 if(a!=0)
826 a=cfmt.beamslope*a/(cfmt.beamslope+Math.abs(a))
827 b=(y+s2.ys+staff_tb[s2.st].y)/2-a*(s2.xs+s1.xs)/2
838 x=s.v==v?s.xs:s.x;ys=a*x+b-staff_tb[s.st].y
860 max_stem_err=stem_err}}else{for(;;s=s.next){ys=a*s.xs+b-staff_tb[s.st].y;stem_err=GSTEM-2
877 case C.CLEF:y=a*s.x+b
888 case C.GRACE:for(g=s.extra;g;g=g.next){y=a*g.x+b
901 if(a==0)
903 for(s=s1;;s=s.next){switch(s.type){case C.NOTE:s.ys=a*s.xs+b-staff_tb[s.st].y
907 case C.REST:y=a*s.x+b-staff_tb[s.st].y
926 bm.s1=s1;bm.a=a;bm.b=b;bm.nflags=nflags
933 y1=bm.a*x1+bm.b-dy;x2-=x1;x2/=stv_g.scale;dy2=bm.a*x2
943 s.ys=bm.a*s.xs+bm.b
955 bm.a+=da
1044 function draw_acc(x,y,a){if(typeof a!="number"){var c,n=a[0],d=a[1]
1046 a=acc_nd[c]
1047 if(!a){a=abc2svg.rat(Math.abs(n),d)
1048 d=a[1]
1049 a=(n<0?-a[0]:a[0]).toString()
1051 a+='_'+d
1052 acc_nd[c]=a}}
1053 xygl(x,y,"acc"+a)}
1386 function draw_slur(path,not1,sl){var i,k,g,x1,y1,x2,y2,height,addy,a,y,z,h,dx,dy,ty=sl.ty,dir=(ty&0x07)==C.SL_ABOVE?1:-1,n=path.length,i1=0,i2=n-1,k1=path[0],k2=path[i2]
1432 a=(y2-y1)/(x2-x1)
1433 if(a>SLUR_SLOPE||a<-SLUR_SLOPE){a=a>SLUR_SLOPE?SLUR_SLOPE:-SLUR_SLOPE
1434 if(a*dir>0)
1435 y1=y2-a*(x2-x1)
1437 y2=y1+a*(x2-x1)}
1450 x2=k2.x+GSTEM_XOFF*1.5;h=0;a=(y2-y1)/(x2-x1)
1451 if(k1!=k2&&k1.v==k2.v){addy=y1-a*x1
1457 y=k.ymx;y-=a*k.x+addy
1461 y=k.ymn;y-=a*k.x+addy
1467 y=g.ymx;y-=a*g.x+addy
1471 y=g.ymn;y-=a*g.x+addy
1493 height*=cfmt.slurheight;slur_out(x1,y1,x2,y2,dir,height,ty&C.SL_DOTTED);dx=x2-x1;a=(y2-y1)/dx;addy=y1-a*x1
1501 y=a*k.x+addy
1584 function draw_tuplet(s1){var s2,s3,g,upstaff,nb_only,some_slur,x1,x2,y1,y2,xm,ym,a,s0,yy,yx,dy,a,dir,r,tp=s1.tp.shift()
1670 xm=.5*(x1+x2);ym=.5*(y1+y2);a=(y2-y1)/(x2-x1);s0=3*(s2.notes[s2.nhd].pit-s1.notes[s1.nhd].pit)/(x2-x1)
1671 if(s0>0){if(a<0)
1672 a=0
1673 else if(a>s0)
1674 a=s0}else{if(a>0)
1675 a=0
1676 else if(a<s0)
1677 a=s0}
1678 if(a*a<.1*.1)
1679 a=0
1684 yy=ym+(s3.x-xm)*a;yx=y_get(upstaff,1,s3.x-4,8)+2
1689 ym+=dy;y1=ym+a*(x1-xm);y2=ym+a*(x2-xm);ym+=6
1690 for(s3=s1;;s3=s3.next){if(s3.st==upstaff){yy=ym+(s3.x-xm)*a
1699 xm=.5*(x1+x2);ym=.5*(y1+y2);a=(y2-y1)/(x2-x1);s0=3*(s2.notes[0].pit-s1.notes[0].pit)/(x2-x1)
1700 if(s0>0){if(a<0)
1701 a=0
1702 else if(a>s0)
1703 a=s0}else{if(a>0)
1704 a=0
1705 else if(a<s0)
1706 a=s0}
1707 if(a*a<.1*.1)
1708 a=0
1713 yy=ym+(s3.x-xm)*a;yx=y_get(upstaff,0,s3.x-4,8)
1719 y1=ym+a*(x1-xm);y2=ym+a*(x2-xm);ym-=2
1722 yy=ym+(s3.x-xm)*a
1870 function draw_sym_near(){var p_voice,p_st,s,v,st,y,g,w,i,st,dx,top,bot,ymn,output_sav=output;function set_yab(s1,s2){var y,k=realwidth/YSTEP,i=(s1.x/k)|0,j=(s2.x/k)|0,a=(s1.ys-s2.ys)/(s1.xs-s2.xs),b=s1.ys-s1.xs*a,p_st=staff_tb[s1.st]
1871 k*=a
2758 function get_font_scale(param){var i,font,a=info_split(param)
2759 if(a.length<=1)
2761 var scale=parseFloat(a[a.length-1])
2764 font_scale_tb[a[0]]=scale}
2768 function param_set_font(xxxfont,p){var font,n,a
2774 cfmt[xxxfont]=font;a=p.match(/\s+(no)?box(\s|$)/)
2775 if(a){if(a[1]){font.box=false
2778 p=p.replace(a[0],a[2])}
2779 a=p.match(/\s+padding=([\d.]+)(\s|$)/)
2780 if(a){font.pad=a[1]?Number(a[1]):0
2781 p=p.replace(a[0],a[2])}
2782 a=p.match(/\s+class=(.*?)(\s|$)/)
2783 if(a){font.class=a[1];p=p.replace(a[0],a[2])}
2784 a=p.match(/\s+wadj=(.*?)(\s|$)/)
2785 if(a){if(typeof document=="undefined")
2786 switch(a[1]){case'none':font.wadj=''
2794 p=p.replace(a[0],a[2])}
2795 a=p.match(/\s+([0-9.]+|\*)$/)
2796 if(a){if(a[1]!="*")
2797 font.size=Number(a[1])
2798 p=p.replace(a[0],"")}
2799 a=p.match(/[- ]?[nN]ormal/)
2800 if(a){font.normal=true
2801 p=p.replace(a[0],'')}
2802 a=p.match(/[- ]?[bB]old/)
2803 if(a){font.weight="bold"
2804 p=p.replace(a[0],'')}
2805 a=p.match(/[- ]?[iI]talic/)
2806 if(a){font.style="italic"
2807 p=p.replace(a[0],'')}
2808 a=p.match(/[- ]?[oO]blique/)
2809 if(a){font.style="oblique"
2810 p=p.replace(a[0],'')}
2851 function set_writefields(parm){var c,i,a=parm.split(/\s+/)
2852 if(get_bool(a[1])){for(i=0;i<a[0].length;i++){c=a[0][i]
2854 cfmt.writefields+=c}}else{for(i=0;i<a[0].length;i++){c=a[0][i]
3126 function tosvg(in_fname,file,bol,eof){var i,c,eol,end,select,line0,line1,last_info,opt,text,a,b,s,pscom,txt_add='\n'
3171 text=file.slice(bol,eol);a=text.match(/\S+/)
3172 switch(a[0]){default:opt[select].push(uncomment(text,true))
3224 if(file[bol+2]=='a'&&file[bol+3]=='b'&&file[bol+4]=='c'&&file[bol+5]==' '){bol+=6;line0=file[bol];line1=file[bol+1]}else{pscom=true}}else if(line0=='I'&&line1==':'){pscom=true}
3227 a=text.match(/([^\s]+)\s*(.*)/)
3228 if(!a||a[1][0]=='%')
3230 switch(a[1]){case"abcm2ps":case"ss-pref":parse.prefix=a[2]
3232 case"abc-include":do_include(uncomment(a[2]))
3234 if(a[1].slice(0,5)=='begin'){b=a[1].substr(5);end='\n'+line0+line1+"end"+b;i=file.indexOf(end,eol)
3235 if(i<0){syntax(1,"No $1 after %%$2",end.slice(1),a[1]);parse.eol=eof
3237 self.do_begin_end(b,uncomment(a[2]),file.slice(eol+1,i).replace(new RegExp('^'+line0+line1,'gm'),''));parse.eol=file.indexOf('\n',i+6)
3241 switch(a[1]){case"select":if(parse.state!=0){syntax(1,errs.not_in_tune,"%%select")
3251 select=uncomment(a[2])
3266 text=file.slice(bol,eol);a=text.match(/([^\s]+)\s*(.*)/)
3267 switch(a[1]){case"tune":break
3268 case"voice":do_voice(uncomment(a[2],true),true)
3278 select=uncomment(a[2])
3334 a=text.match(/(.*?)[= ]+(.*)/)
3335 if(!a||!a[2]){syntax(1,errs.bad_val,"m:")
3337 mac[a[1]]=a[2];maci[a[1][0]]=true
4389 if(s.type!=C.NOTE){if(s.type==C.CLEF){if(s.clef_type!='a')
4401 if(clef_type_start=='a'){if((max+min)/2>=16)
4490 if(s2.clef_auto){new_type=set_auto_clef(st,s,staff_clef[st].clef?staff_clef[st].clef.clef_type:'a');new_line=new_type=='t'?2:4}else{new_type=s2.clef_type;new_line=s2.clef_line}
4491 if(!staff_clef[st].clef){if(s2.clef_auto){if(s2.type!='a')
4513 if(s.clef_type=='a'){s.clef_type=set_auto_clef(s.st,s.ts_next,staff_clef[s.st].clef.clef_type);s.clef_line=s.clef_type=='t'?2:4}
5545 case'a':if(clef_def[1]=='u'){s.clef_type="a";s.clef_auto=true;i=4
5602 function set_user(parm){var k,c,v,a=parm.match(/(.)[=\s]*(\[I:.+\]|".+"|!.+!)$/)
5603 if(!a){syntax(1,'Lack of starting [, ! or " in U: / %%user')
5605 c=a[1];v=a[2]
5644 Abc.prototype.set_vp=function(a){var s,item,pos,val,clefpit
5645 while(1){item=a.shift()
5648 if(item.slice(-1)=='='&&!a.length){syntax(1,errs.bad_val,item)
5650 switch(item){case"clef=":s=a.shift()
5652 case"clefpitch=":item=a.shift()
5664 case"octave=":val=parseInt(a.shift())
5670 case"cue=":curvoice.scale=a.shift()=='on'?.7:1
5672 case"instrument=":item=a.shift()
5680 case"map=":curvoice.map=a.shift()
5682 case"name=":case"nm=":curvoice.nm=a.shift()
5687 item=a.shift().split(' ')
5689 item=["stm",a.shift()];val=posval[item[1]]
5696 case"scale=":val=parseFloat(a.shift())
5704 item=a.shift()
5711 curvoice.shift=curvoice.sndsh=get_interval(a.shift())
5715 curvoice.sndtran=get_interval(a.shift())
5719 case"subname=":case"sname=":case"snm=":curvoice.snm=a.shift()
5722 case"stafflines=":val=get_st_lines(a.shift())
5730 case"staffnonote=":val=parseInt(a.shift())
5736 case"staffscale=":val=parseFloat(a.shift())
5744 val=get_transp(a.shift())
5754 a.shift()
5765 function set_kv_parm(a){if(!curvoice.init){curvoice.init=true
5767 a=info.V['*'].concat(a)
5769 a=info.V[curvoice.id].concat(a)}}
5770 if(a.length)
5771 self.set_vp(a)}
5772 function memo_kv_parm(vid,a){if(!a.length)
5777 Array.prototype.push.apply(info.V[vid],a)
5779 info.V[vid]=a}
5961 function do_info(info_type,text){var s,d1,d2,a,vid
5967 goto_tune();a=text.match(/^1\/(\d+)(=(\d+)\/(\d+))?$/)
5968 if(a){d1=Number(a[1])
5972 if(a[2]){d2=Number(a[4])
5973 d2=d2?Number(a[3])/d2*C.BLEN:0}else{d2=d1}}else if(text=="auto"){d1=d2=-1}
6140 function parse_staves(p){var v,vid,vids={},a_vf=[],err=false,flags=0,brace=0,bracket=0,parenth=0,flags_st=0,e,a=p.match(/[^[\]|{}()*+\s]+|[^\s]/g)
6141 if(!a){syntax(1,errs.bad_val,"%%score")
6143 while(1){e=a.shift()
6166 while(1){e=a.shift()
6189 a.unshift(e)
6197 var a=text.match(/[^\s"=]+=?|"[^"]+"/g)
6198 if(!a){syntax(1,"Unterminated string")
6200 return a}
6224 if(pit<16){syntax(1,"'$1' is not a note",line.buffer[line.index-1])
6709 if(grace){syntax(1,"Cannot have a broken rhythm in grace notes")
6822 if(j>0&&j-i<10){i=j;c='a'}
7276 function out_XYAB(str,x,y,a,b){x=sx(x);y=sy(y);output+=str.replace(/X|Y|A|B|F|G/g,function(c){switch(c){case'X':return x.toFixed(1)
7278 case'A':return a
7280 case'F':return a.toFixed(1)
7402 function out_deco_str(x,y,name,str){var a,f,a_deco=deco_str_style[name]
7456 function out_glisq(x2,y2,de){var de1=de.start,x1=de1.x,y1=de1.y+staff_tb[de1.st].y,ar=Math.atan2(y1-y2,x2-x1),a=ar/Math.PI*180,len=(x2-x1)/Math.cos(ar);g_open(x1,y1,a);x1=de1.s.dots?13+de1.s.xmx:8;len=(len-x1-6)/6|0
7461 function out_gliss(x2,y2,de){var de1=de.start,x1=de1.x,y1=de1.y+staff_tb[de1.st].y,ar=-Math.atan2(y2-y1,x2-x1),a=ar/Math.PI*180,len=(x2-x1)/Math.cos(ar);g_open(x1,y1,a);x1=de1.s.dots?13+de1.s.xmx:8;len-=x1+8;xypath(x1,0);output+='h'+len.toFixed(1)+'" stroke-width="1"/>\n';g_close()}
7663 function set_feathered_beam(s1){var s,s2,t,d,b,i,a,d=s1.dur,n=1
7669 s2=s;b=d/2;a=d/(n-1);t=s1.time
7670 if(s1.feathered_beam>0){for(s=s1,i=n-1;s!=s2;s=s.next,i--){d=((a*i)|0)+b;s.dur=d;s.time=t;t+=d}}else{for(s=s1,i=0;s!=s2;s=s.next,i++){d=((a*i)|0)+b;s.dur=d;s.time=t;t+=d}}
7797 var i,note,notes,map,tmp,ns,ty='',a=text.split(/\s+/)
7798 if(a.length<3){syntax(1,not_enough_p)
7800 ns=a[1]
7812 notes=maps[a[0]]
7814 maps[a[0]]=notes={}
7818 a.shift()
7819 a.shift()
7820 if(!a.length)
7822 a=info_split(a.join(' '))
7824 if(a[0].indexOf('=')<0){if(a[0][0]!='*'){tmp=new scanBuf;tmp.buffer=a[0];map[1]=parse_acc_pit(tmp)}
7825 if(!a[1])
7828 if(a[1].indexOf('=')<0){map[0]=a[1].split(',')
7830 for(;i<a.length;i++){switch(a[i]){case"heads=":if(!a[++i]){syntax(1,not_enough_p)
7832 map[0]=a[i].split(',')
7834 case"print=":case"play=":if(!a[++i]){syntax(1,not_enough_p)
7836 tmp=new scanBuf;tmp.buffer=a[i];note=parse_acc_pit(tmp)
7837 if(a[i-1][1]=='r')
7842 case"color=":if(!a[++i]){syntax(1,not_enough_p)
7844 map[2]=a[i]
7872 function note_transp(s,sk,note){var ak,an,d,b40,n=note.pit,a=note.acc
7873 if(!a&&sk.k_a_acc)
7874 a=sk.k_map[(n+19)%7]
7875 b40=abc2svg.pab40(n,a)+sk.k_transp
7877 if(!a){if(!sk.k_a_acc&&!sk.k_none)
7880 if(a){if(sk.k_a_acc){ak=sk.k_map[(note.pit+19)%7]
7990 if(!curvoice.last_sym){syntax(1,"%%repeat cannot start a tune")
8344 function get_key(parm){var v,p_voice,s,transp,sndtran,a=new_key(parm),s_key=a[0];a=a[1]
8349 if(a.length)
8350 memo_kv_parm('*',a)
8355 if(a.length)
8356 set_kv_parm(a)
8386 p_voice={v:v,id:id,time:0,new:true,pos:{dyn:0,gch:0,gst:0,orn:0,stm:0,voc:0,vol:0},scale:1,ulen:glovar.ulen,dur_fact:1,key:clone(parse.ckey),ckey:clone(parse.ckey),okey:clone(parse.ckey),meter:clone(glovar.meter),wmeasure:glovar.meter.wmeasure,staffnonote:1,clef:{type:C.CLEF,clef_auto:true,clef_type:"a",time:0},acc:[],sls:[],hy_st:0}
8390 function do_cloning(){var i,clone=curvoice.clone,vs=clone.vs,a=clone.a,bol=clone.bol,eol=parse.istart,parse_sav=parse,file=parse.file
8396 get_voice(vs[i],a)
8400 function get_voice(parm){var v,vs,a=info_split(parm),vid=a.shift()
8412 if(a.length)
8413 memo_kv_parm(vid,a)
8421 curvoice.clone={vs:vs,a:a,bol:parse.iend}
8424 set_kv_parm(a)
8688 lyst_tb[st].a=true
8706 st=p_voice.st;if(lyst_tb[st].a){top=lyst_tb[st].top+2
8772 function gch_tr1(p,transp){var i,o,n,a,ip,b40,csa=p.split('/')
8777 a=0
8778 while(p[ip]=='#'||p[ip]=='\u266f'){a++;ip++}
8779 while(p[ip]=='b'||p[ip]=='\u266d'){a--;ip++}
8781 b40=(abc2svg.pab40(n,a)+transp+200)%40
8931 Abc.prototype.goto_tune=goto_tune;Abc.prototype.info=function(){return info};Abc.prototype.new_block=new_block;Abc.prototype.out_arp=out_arp;Abc.prototype.out_deco_str=out_deco_str;Abc.prototype.out_deco_val=out_deco_val;Abc.prototype.out_ltr=out_ltr;Abc.prototype.param_set_font=param_set_font;Abc.prototype.parse=parse;Abc.prototype.psdeco=empty_function;Abc.prototype.psxygl=empty_function;Abc.prototype.set_cur_sy=function(sy){cur_sy=sy};Abc.prototype.set_dscale=set_dscale;Abc.prototype.set_font=set_font;Abc.prototype.set_a_gch=function(s,a){a_gch=a;csan_add(s)}