mirror of
				https://github.com/alsa-project/alsa-tools.git
				synced 2025-11-03 09:01:51 -05:00 
			
		
		
		
	
		
			
	
	
		
			321 lines
		
	
	
	
		
			12 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
		
		
			
		
	
	
			321 lines
		
	
	
	
		
			12 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| 
								 | 
							
								;;; FV10K1 room relections code
							 | 
						||
| 
								 | 
							
								;;; Generates room reflections according to file default.room.rp, and stores
							 | 
						||
| 
								 | 
							
								;;; them in GPRs fvrefl_[fl|fr|rl|rr].
							 | 
						||
| 
								 | 
							
								;;; Built on Sat Jan 24 13:18:00 2004 from room definition file default.room.rp.
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								  ; define delays and dampening constants
							 | 
						||
| 
								 | 
							
								readr0 tread dlyr,&0.003511
							 | 
						||
| 
								 | 
							
								readl0 tread dlyl,&0.003511
							 | 
						||
| 
								 | 
							
								fl0 constant #-0.371429
							 | 
						||
| 
								 | 
							
								fr0 constant #-0.092857
							 | 
						||
| 
								 | 
							
								dmpstore_r0 sta 0
							 | 
						||
| 
								 | 
							
								dmpstore_l0 sta 0
							 | 
						||
| 
								 | 
							
								readr1 tread dlyr,&0.003511
							 | 
						||
| 
								 | 
							
								readl1 tread dlyl,&0.003511
							 | 
						||
| 
								 | 
							
								fl1 constant #-0.092857
							 | 
						||
| 
								 | 
							
								fr1 constant #-0.371429
							 | 
						||
| 
								 | 
							
								dmpstore_r1 sta 0
							 | 
						||
| 
								 | 
							
								dmpstore_l1 sta 0
							 | 
						||
| 
								 | 
							
								readr2 tread dlyr,&0.006548
							 | 
						||
| 
								 | 
							
								readl2 tread dlyl,&0.006548
							 | 
						||
| 
								 | 
							
								fr2 constant #-0.508333
							 | 
						||
| 
								 | 
							
								dmpstore_r2 sta 0
							 | 
						||
| 
								 | 
							
								dmpstore_l2 sta 0
							 | 
						||
| 
								 | 
							
								readr3 tread dlyr,&0.007252
							 | 
						||
| 
								 | 
							
								readl3 tread dlyl,&0.007252
							 | 
						||
| 
								 | 
							
								fl3 constant #-0.298947
							 | 
						||
| 
								 | 
							
								fr3 constant #-0.074737
							 | 
						||
| 
								 | 
							
								dmpstore_r3 sta 0
							 | 
						||
| 
								 | 
							
								dmpstore_l3 sta 0
							 | 
						||
| 
								 | 
							
								readr4 tread dlyr,&0.007252
							 | 
						||
| 
								 | 
							
								readl4 tread dlyl,&0.007252
							 | 
						||
| 
								 | 
							
								fl4 constant #-0.074737
							 | 
						||
| 
								 | 
							
								fr4 constant #-0.298947
							 | 
						||
| 
								 | 
							
								dmpstore_r4 sta 0
							 | 
						||
| 
								 | 
							
								dmpstore_l4 sta 0
							 | 
						||
| 
								 | 
							
								readr5 tread dlyr,&0.009261
							 | 
						||
| 
								 | 
							
								readl5 tread dlyl,&0.009261
							 | 
						||
| 
								 | 
							
								fr5 constant #0.270341
							 | 
						||
| 
								 | 
							
								dmpstore_r5 sta 0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l5 sta 0,0
							 | 
						||
| 
								 | 
							
								readr6 tread dlyr,&0.012327
							 | 
						||
| 
								 | 
							
								readl6 tread dlyl,&0.012327
							 | 
						||
| 
								 | 
							
								fr6 constant #0.240611
							 | 
						||
| 
								 | 
							
								dmpstore_r6 sta 0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l6 sta 0,0
							 | 
						||
| 
								 | 
							
								readr7 tread dlyr,&0.016174
							 | 
						||
| 
								 | 
							
								readl7 tread dlyl,&0.016174
							 | 
						||
| 
								 | 
							
								fr7 constant #-0.253287
							 | 
						||
| 
								 | 
							
								rr7 constant #-0.015830
							 | 
						||
| 
								 | 
							
								dmpstore_r7 sta 0
							 | 
						||
| 
								 | 
							
								dmpstore_l7 sta 0
							 | 
						||
| 
								 | 
							
								readr8 tread dlyr,&0.016690
							 | 
						||
| 
								 | 
							
								readl8 tread dlyl,&0.016690
							 | 
						||
| 
								 | 
							
								fl8 constant #0.105486
							 | 
						||
| 
								 | 
							
								fr8 constant #0.026371
							 | 
						||
| 
								 | 
							
								dmpstore_r8 sta 0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l8 sta 0,0
							 | 
						||
| 
								 | 
							
								readr9 tread dlyr,&0.016690
							 | 
						||
| 
								 | 
							
								readl9 tread dlyl,&0.016690
							 | 
						||
| 
								 | 
							
								fl9 constant #0.026371
							 | 
						||
| 
								 | 
							
								fr9 constant #0.105486
							 | 
						||
| 
								 | 
							
								dmpstore_r9 sta 0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l9 sta 0,0
							 | 
						||
| 
								 | 
							
								readr10 tread dlyr,&0.016690
							 | 
						||
| 
								 | 
							
								readl10 tread dlyl,&0.016690
							 | 
						||
| 
								 | 
							
								fl10 constant #0.105486
							 | 
						||
| 
								 | 
							
								fr10 constant #0.026371
							 | 
						||
| 
								 | 
							
								dmpstore_r10 sta 0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l10 sta 0,0
							 | 
						||
| 
								 | 
							
								readr11 tread dlyr,&0.016690
							 | 
						||
| 
								 | 
							
								readl11 tread dlyl,&0.016690
							 | 
						||
| 
								 | 
							
								fl11 constant #0.026371
							 | 
						||
| 
								 | 
							
								fr11 constant #0.105486
							 | 
						||
| 
								 | 
							
								dmpstore_r11 sta 0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l11 sta 0,0
							 | 
						||
| 
								 | 
							
								readr12 tread dlyr,&0.018195
							 | 
						||
| 
								 | 
							
								readl12 tread dlyl,&0.018195
							 | 
						||
| 
								 | 
							
								fr12 constant #0.147307
							 | 
						||
| 
								 | 
							
								rr12 constant #0.009207
							 | 
						||
| 
								 | 
							
								dmpstore_r12 sta 0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l12 sta 0,0
							 | 
						||
| 
								 | 
							
								readr13 tread dlyr,&0.020577
							 | 
						||
| 
								 | 
							
								readl13 tread dlyl,&0.020577
							 | 
						||
| 
								 | 
							
								fr13 constant #-0.098203
							 | 
						||
| 
								 | 
							
								dmpstore_r13 sta 0,0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l13 sta 0,0,0
							 | 
						||
| 
								 | 
							
								readr14 tread dlyr,&0.020577
							 | 
						||
| 
								 | 
							
								readl14 tread dlyl,&0.020577
							 | 
						||
| 
								 | 
							
								fr14 constant #0.142194
							 | 
						||
| 
								 | 
							
								rr14 constant #0.008887
							 | 
						||
| 
								 | 
							
								dmpstore_r14 sta 0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l14 sta 0,0
							 | 
						||
| 
								 | 
							
								readr15 tread dlyr,&0.020577
							 | 
						||
| 
								 | 
							
								readl15 tread dlyl,&0.020577
							 | 
						||
| 
								 | 
							
								fr15 constant #-0.098203
							 | 
						||
| 
								 | 
							
								dmpstore_r15 sta 0,0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l15 sta 0,0,0
							 | 
						||
| 
								 | 
							
								readr16 tread dlyr,&0.021591
							 | 
						||
| 
								 | 
							
								readl16 tread dlyl,&0.021591
							 | 
						||
| 
								 | 
							
								rl16 constant #-0.130920
							 | 
						||
| 
								 | 
							
								rr16 constant #-0.071413
							 | 
						||
| 
								 | 
							
								dmpstore_r16 sta 0
							 | 
						||
| 
								 | 
							
								dmpstore_l16 sta 0
							 | 
						||
| 
								 | 
							
								readr17 tread dlyr,&0.021591
							 | 
						||
| 
								 | 
							
								readl17 tread dlyl,&0.021591
							 | 
						||
| 
								 | 
							
								rl17 constant #-0.071413
							 | 
						||
| 
								 | 
							
								rr17 constant #-0.130920
							 | 
						||
| 
								 | 
							
								dmpstore_r17 sta 0
							 | 
						||
| 
								 | 
							
								dmpstore_l17 sta 0
							 | 
						||
| 
								 | 
							
								readr18 tread dlyr,&0.023355
							 | 
						||
| 
								 | 
							
								readl18 tread dlyl,&0.023355
							 | 
						||
| 
								 | 
							
								rl18 constant #0.078182
							 | 
						||
| 
								 | 
							
								rr18 constant #0.042646
							 | 
						||
| 
								 | 
							
								dmpstore_r18 sta 0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l18 sta 0,0
							 | 
						||
| 
								 | 
							
								readr19 tread dlyr,&0.023355
							 | 
						||
| 
								 | 
							
								readl19 tread dlyl,&0.023355
							 | 
						||
| 
								 | 
							
								rl19 constant #0.042646
							 | 
						||
| 
								 | 
							
								rr19 constant #0.078182
							 | 
						||
| 
								 | 
							
								dmpstore_r19 sta 0,0
							 | 
						||
| 
								 | 
							
								dmpstore_l19 sta 0,0
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
									;;; Accumulate reflections for FL
							 | 
						||
| 
								 | 
							
									interp dmpstore_l0+0,readl0,refldamp,dmpstore_l0+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r0+0,readr0,refldamp,dmpstore_r0+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r1+0,readr1,refldamp,dmpstore_r1+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l1+0,readl1,refldamp,dmpstore_l1+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l2+0,readl2,refldamp,dmpstore_l2+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l3+0,readl3,refldamp,dmpstore_l3+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r3+0,readr3,refldamp,dmpstore_r3+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r4+0,readr4,refldamp,dmpstore_r4+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l4+0,readl4,refldamp,dmpstore_l4+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l5+0,readl5,refldamp,dmpstore_l5+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l5+1,dmpstore_l5+0,refldamp,dmpstore_l5+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l6+0,readl6,refldamp,dmpstore_l6+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l6+1,dmpstore_l6+0,refldamp,dmpstore_l6+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r7+0,readr7,refldamp,dmpstore_r7+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l8+0,readl8,refldamp,dmpstore_l8+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l8+1,dmpstore_l8+0,refldamp,dmpstore_l8+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r8+0,readr8,refldamp,dmpstore_r8+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r8+1,dmpstore_r8+0,refldamp,dmpstore_r8+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r9+0,readr9,refldamp,dmpstore_r9+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r9+1,dmpstore_r9+0,refldamp,dmpstore_r9+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l9+0,readl9,refldamp,dmpstore_l9+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l9+1,dmpstore_l9+0,refldamp,dmpstore_l9+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l10+0,readl10,refldamp,dmpstore_l10+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l10+1,dmpstore_l10+0,refldamp,dmpstore_l10+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r10+0,readr10,refldamp,dmpstore_r10+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r10+1,dmpstore_r10+0,refldamp,dmpstore_r10+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r11+0,readr11,refldamp,dmpstore_r11+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r11+1,dmpstore_r11+0,refldamp,dmpstore_r11+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l11+0,readl11,refldamp,dmpstore_l11+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l11+1,dmpstore_l11+0,refldamp,dmpstore_l11+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r12+0,readr12,refldamp,dmpstore_r12+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r12+1,dmpstore_r12+0,refldamp,dmpstore_r12+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l13+0,readl13,refldamp,dmpstore_l13+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l13+1,dmpstore_l13+0,refldamp,dmpstore_l13+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l13+2,dmpstore_l13+1,refldamp,dmpstore_l13+2
							 | 
						||
| 
								 | 
							
									interp dmpstore_r14+0,readr14,refldamp,dmpstore_r14+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r14+1,dmpstore_r14+0,refldamp,dmpstore_r14+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l15+0,readl15,refldamp,dmpstore_l15+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l15+1,dmpstore_l15+0,refldamp,dmpstore_l15+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l15+2,dmpstore_l15+1,refldamp,dmpstore_l15+2
							 | 
						||
| 
								 | 
							
									macs C_0,C_0,C_0,C_0   ; reset accumulator
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l0+0,fl0
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r0+0,fr0
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r1+0,fl1
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l1+0,fr1
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l2+0,fr2
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l3+0,fl3
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r3+0,fr3
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r4+0,fl4
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l4+0,fr4
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l5+1,fr5
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l6+1,fr6
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r7+0,fr7
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l8+1,fl8
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r8+1,fr8
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r9+1,fl9
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l9+1,fr9
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l10+1,fl10
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r10+1,fr10
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r11+1,fl11
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l11+1,fr11
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r12+1,fr12
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l13+2,fr13
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r14+1,fr14
							 | 
						||
| 
								 | 
							
									macs fvrefl_fl,ACCUM,dmpstore_l15+2,fr15
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
									;;; Accumulate reflections for FR
							 | 
						||
| 
								 | 
							
									interp dmpstore_l0+0,readl0,refldamp,dmpstore_l0+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r0+0,readr0,refldamp,dmpstore_r0+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r1+0,readr1,refldamp,dmpstore_r1+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l1+0,readl1,refldamp,dmpstore_l1+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r2+0,readr2,refldamp,dmpstore_r2+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l3+0,readl3,refldamp,dmpstore_l3+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r3+0,readr3,refldamp,dmpstore_r3+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r4+0,readr4,refldamp,dmpstore_r4+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l4+0,readl4,refldamp,dmpstore_l4+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r5+0,readr5,refldamp,dmpstore_r5+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r5+1,dmpstore_r5+0,refldamp,dmpstore_r5+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r6+0,readr6,refldamp,dmpstore_r6+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r6+1,dmpstore_r6+0,refldamp,dmpstore_r6+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l7+0,readl7,refldamp,dmpstore_l7+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l8+0,readl8,refldamp,dmpstore_l8+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l8+1,dmpstore_l8+0,refldamp,dmpstore_l8+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r8+0,readr8,refldamp,dmpstore_r8+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r8+1,dmpstore_r8+0,refldamp,dmpstore_r8+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r9+0,readr9,refldamp,dmpstore_r9+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r9+1,dmpstore_r9+0,refldamp,dmpstore_r9+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l9+0,readl9,refldamp,dmpstore_l9+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l9+1,dmpstore_l9+0,refldamp,dmpstore_l9+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l10+0,readl10,refldamp,dmpstore_l10+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l10+1,dmpstore_l10+0,refldamp,dmpstore_l10+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r10+0,readr10,refldamp,dmpstore_r10+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r10+1,dmpstore_r10+0,refldamp,dmpstore_r10+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r11+0,readr11,refldamp,dmpstore_r11+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r11+1,dmpstore_r11+0,refldamp,dmpstore_r11+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l11+0,readl11,refldamp,dmpstore_l11+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l11+1,dmpstore_l11+0,refldamp,dmpstore_l11+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l12+0,readl12,refldamp,dmpstore_l12+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l12+1,dmpstore_l12+0,refldamp,dmpstore_l12+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r13+0,readr13,refldamp,dmpstore_r13+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r13+1,dmpstore_r13+0,refldamp,dmpstore_r13+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r13+2,dmpstore_r13+1,refldamp,dmpstore_r13+2
							 | 
						||
| 
								 | 
							
									interp dmpstore_l14+0,readl14,refldamp,dmpstore_l14+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l14+1,dmpstore_l14+0,refldamp,dmpstore_l14+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r15+0,readr15,refldamp,dmpstore_r15+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r15+1,dmpstore_r15+0,refldamp,dmpstore_r15+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r15+2,dmpstore_r15+1,refldamp,dmpstore_r15+2
							 | 
						||
| 
								 | 
							
									macs C_0,C_0,C_0,C_0   ; reset accumulator
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l0+0,fr0
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r0+0,fl0
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r1+0,fr1
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l1+0,fl1
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r2+0,fr2
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l3+0,fr3
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r3+0,fl3
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r4+0,fr4
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l4+0,fl4
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r5+1,fr5
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r6+1,fr6
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l7+0,fr7
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l8+1,fr8
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r8+1,fl8
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r9+1,fr9
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l9+1,fl9
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l10+1,fr10
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r10+1,fl10
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r11+1,fr11
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l11+1,fl11
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l12+1,fr12
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r13+2,fr13
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l14+1,fr14
							 | 
						||
| 
								 | 
							
									macs fvrefl_fr,ACCUM,dmpstore_r15+2,fr15
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
									;;; Accumulate reflections for RL
							 | 
						||
| 
								 | 
							
									interp dmpstore_r7+0,readr7,refldamp,dmpstore_r7+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r12+0,readr12,refldamp,dmpstore_r12+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r12+1,dmpstore_r12+0,refldamp,dmpstore_r12+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r14+0,readr14,refldamp,dmpstore_r14+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r14+1,dmpstore_r14+0,refldamp,dmpstore_r14+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l16+0,readl16,refldamp,dmpstore_l16+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r16+0,readr16,refldamp,dmpstore_r16+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r17+0,readr17,refldamp,dmpstore_r17+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l17+0,readl17,refldamp,dmpstore_l17+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l18+0,readl18,refldamp,dmpstore_l18+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l18+1,dmpstore_l18+0,refldamp,dmpstore_l18+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r18+0,readr18,refldamp,dmpstore_r18+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r18+1,dmpstore_r18+0,refldamp,dmpstore_r18+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r19+0,readr19,refldamp,dmpstore_r19+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r19+1,dmpstore_r19+0,refldamp,dmpstore_r19+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l19+0,readl19,refldamp,dmpstore_l19+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l19+1,dmpstore_l19+0,refldamp,dmpstore_l19+1
							 | 
						||
| 
								 | 
							
									macs C_0,C_0,C_0,C_0   ; reset accumulator
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r7+0,rr7
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r12+1,rr12
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r14+1,rr14
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l16+0,rl16
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r16+0,rr16
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r17+0,rl17
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l17+0,rr17
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l18+1,rl18
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r18+1,rr18
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r19+1,rl19
							 | 
						||
| 
								 | 
							
									macs fvrefl_rl,ACCUM,dmpstore_l19+1,rr19
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
									;;; Accumulate reflections for RR
							 | 
						||
| 
								 | 
							
									interp dmpstore_l7+0,readl7,refldamp,dmpstore_l7+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l12+0,readl12,refldamp,dmpstore_l12+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l12+1,dmpstore_l12+0,refldamp,dmpstore_l12+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l14+0,readl14,refldamp,dmpstore_l14+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l14+1,dmpstore_l14+0,refldamp,dmpstore_l14+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l16+0,readl16,refldamp,dmpstore_l16+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r16+0,readr16,refldamp,dmpstore_r16+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r17+0,readr17,refldamp,dmpstore_r17+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l17+0,readl17,refldamp,dmpstore_l17+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l18+0,readl18,refldamp,dmpstore_l18+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l18+1,dmpstore_l18+0,refldamp,dmpstore_l18+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r18+0,readr18,refldamp,dmpstore_r18+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r18+1,dmpstore_r18+0,refldamp,dmpstore_r18+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_r19+0,readr19,refldamp,dmpstore_r19+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_r19+1,dmpstore_r19+0,refldamp,dmpstore_r19+1
							 | 
						||
| 
								 | 
							
									interp dmpstore_l19+0,readl19,refldamp,dmpstore_l19+0
							 | 
						||
| 
								 | 
							
									interp dmpstore_l19+1,dmpstore_l19+0,refldamp,dmpstore_l19+1
							 | 
						||
| 
								 | 
							
									macs C_0,C_0,C_0,C_0   ; reset accumulator
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l7+0,rr7
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l12+1,rr12
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l14+1,rr14
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l16+0,rr16
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r16+0,rl16
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r17+0,rr17
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l17+0,rl17
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_l18+1,rr18
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r18+1,rl18
							 | 
						||
| 
								 | 
							
									macmv tmp,C_0,dmpstore_r19+1,rr19
							 | 
						||
| 
								 | 
							
									macs fvrefl_rr,ACCUM,dmpstore_l19+1,rl19
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
									END
							 |