opamp.ls

该程序是ST7MC驱动BLDC120

   1                     ; C Compiler for ST7 (COSMIC Software)
   2                     ; Generator V4.4a - 17 Dec 2001
   3                     ; Optimizer V4.2g - 21 Dec 2001
  47                     ; 32 void OPAMP_InitOffset(u8 Gain)
  47                     ; 33 {   
  48                     .text:	section	.text,new
  50                     	xref.b	_OPAMP_InitOffset$L
  51  0000               _OPAMP_InitOffset:
  53  0000 b700          	ld	_OPAMP_InitOffset$L,a
  55                     ; 35 	OACSR |= OAON;	// Power-up the Op-Amp 
  57  0002 1800          	bset	_OACSR,#4
  58                     ; 36     Wait1ms();    // Wait for OPAMP to wake up
  60  0004 cd0000        	call	_Wait1ms
  62                     ; 38 	OACSR |= OAON + OFFCMP + AVGCMP;
  64  0007 b600          	ld	a,_OACSR
  65  0009 aa70          	or	a,#112
  66  000b b700          	ld	_OACSR,a
  68  000d               L13:
  69                     ; 39 	while(!(OACSR & CMPOVR));		// Wait compensation completion
  71  000d 0f00fd        	btjf	_OACSR,#7,L13
  72                     ; 41 	if	(Gain == LOW_GAIN)	OACSR &= ((u8) ~HIGHGAIN);		// Close Loop Gain up to 20dB
  74  0010 3d00          	tnz	_OPAMP_InitOffset$L
  75  0012 2603          	jrne	L53
  78  0014 1700          	bres	_OACSR,#3
  81  0016 81            	ret	
  82  0017               L53:
  83                     ; 42 	else	OACSR |= HIGHGAIN;				// Close Loop Gain More than 20dB
  85  0017 1600          	bset	_OACSR,#3
  86                     ; 44 }	
  89  0019 81            	ret	
 101                     	xref	_Wait1ms
 102                     	xdef	_OPAMP_InitOffset
 103                     	xref.b	_OACSR
 122                     	end