1                     ; C Compiler for STM8 (COSMIC Software)
   2                     ; Parser V4.8.32 - 23 Mar 2010
   3                     ; Generator V4.3.4 - 23 Mar 2010
2739                     ; 29 void IIC_Init(void) {
2741                     	switch	.text
2742  0000               _IIC_Init:
2746                     ; 35   I2C_CR1 = 0x00;
2748  0000 725f5210      	clr	_I2C_CR1
2749                     ; 37   I2C_FREQR = 8;
2751  0004 35085212      	mov	_I2C_FREQR,#8
2752                     ; 40   I2C_CCRL = 40;
2754  0008 3528521b      	mov	_I2C_CCRL,#40
2755                     ; 41   I2C_CCRH = 0;
2757  000c 725f521c      	clr	_I2C_CCRH
2758                     ; 43   I2C_TRISER = 9;
2760  0010 3509521d      	mov	_I2C_TRISER,#9
2761                     ; 45   I2C_CR1 = 0x01;
2763  0014 35015210      	mov	_I2C_CR1,#1
2764                     ; 47   I2C_OARL = (SLAVE_ADDRESS << 1);
2766  0018 35a25213      	mov	_I2C_OARL,#162
2767                     ; 48   I2C_OARH |= 0x40;
2769  001c 721c5214      	bset	_I2C_OARH,#6
2770                     ; 50   I2C_CR2 |= 1 << 2;
2772  0020 72145211      	bset	_I2C_CR2,#2
2773                     ; 52   I2C_ITR = 0x07;
2775  0024 3507521a      	mov	_I2C_ITR,#7
2776                     ; 53 }
2779  0028 81            	ret
2850                     ; 62 int TempCalculate(uint Rv,int B,int Revise,int BasicRx)
2850                     ; 63 {
2851                     	switch	.text
2852  0029               _TempCalculate:
2854  0029 89            	pushw	x
2855  002a 5208          	subw	sp,#8
2856       00000008      OFST:	set	8
2859                     ; 66 	Rx = Rv * 1.0 / BasicRx;
2861  002c 1e11          	ldw	x,(OFST+9,sp)
2862  002e cd0000        	call	c_itof
2864  0031 96            	ldw	x,sp
2865  0032 1c0001        	addw	x,#OFST-7
2866  0035 cd0000        	call	c_rtol
2868  0038 1e09          	ldw	x,(OFST+1,sp)
2869  003a cd0000        	call	c_uitof
2871  003d ae000c        	ldw	x,#L3771
2872  0040 cd0000        	call	c_fmul
2874  0043 96            	ldw	x,sp
2875  0044 1c0001        	addw	x,#OFST-7
2876  0047 cd0000        	call	c_fdiv
2878  004a 96            	ldw	x,sp
2879  004b 1c0005        	addw	x,#OFST-3
2880  004e cd0000        	call	c_rtol
2882                     ; 68 	Rx = log(Rx);
2884  0051 1e07          	ldw	x,(OFST-1,sp)
2885  0053 89            	pushw	x
2886  0054 1e07          	ldw	x,(OFST-1,sp)
2887  0056 89            	pushw	x
2888  0057 cd0000        	call	_log
2890  005a 5b04          	addw	sp,#4
2891  005c 96            	ldw	x,sp
2892  005d 1c0005        	addw	x,#OFST-3
2893  0060 cd0000        	call	c_rtol
2895                     ; 70 	Rx = Rx / B;
2897  0063 1e0d          	ldw	x,(OFST+5,sp)
2898  0065 cd0000        	call	c_itof
2900  0068 96            	ldw	x,sp
2901  0069 1c0005        	addw	x,#OFST-3
2902  006c cd0000        	call	c_fgdiv
2904                     ; 71     Rx = 1/(Rx+0.003354);
2906  006f 96            	ldw	x,sp
2907  0070 1c0005        	addw	x,#OFST-3
2908  0073 cd0000        	call	c_ltor
2910  0076 ae0008        	ldw	x,#L3002
2911  0079 cd0000        	call	c_fadd
2913  007c 96            	ldw	x,sp
2914  007d 1c0001        	addw	x,#OFST-7
2915  0080 cd0000        	call	c_rtol
2917  0083 a601          	ld	a,#1
2918  0085 cd0000        	call	c_ctof
2920  0088 96            	ldw	x,sp
2921  0089 1c0001        	addw	x,#OFST-7
2922  008c cd0000        	call	c_fdiv
2924  008f 96            	ldw	x,sp
2925  0090 1c0005        	addw	x,#OFST-3
2926  0093 cd0000        	call	c_rtol
2928                     ; 74 	Rx = Rx - 273.13;
2930  0096 ae0004        	ldw	x,#L3102
2931  0099 cd0000        	call	c_ltor
2933  009c 96            	ldw	x,sp
2934  009d 1c0005        	addw	x,#OFST-3
2935  00a0 cd0000        	call	c_fgsub
2937                     ; 75 	Rx = Rx + Revise;
2939  00a3 1e0f          	ldw	x,(OFST+7,sp)
2940  00a5 cd0000        	call	c_itof
2942  00a8 96            	ldw	x,sp
2943  00a9 1c0005        	addw	x,#OFST-3
2944  00ac cd0000        	call	c_fgadd
2946                     ; 77 	return (int)(Rx+0.5);
2948  00af 96            	ldw	x,sp
2949  00b0 1c0005        	addw	x,#OFST-3
2950  00b3 cd0000        	call	c_ltor
2952  00b6 ae0000        	ldw	x,#L3202
2953  00b9 cd0000        	call	c_fadd
2955  00bc cd0000        	call	c_ftoi
2959  00bf 5b0a          	addw	sp,#10
2960  00c1 81            	ret
3015                     ; 89 void i2c_send(uchar *dat,uchar len){
3016                     	switch	.text
3017  00c2               _i2c_send:
3019  00c2 89            	pushw	x
3020  00c3 88            	push	a
3021       00000001      OFST:	set	1
3024                     ; 91     dat_len = len;
3026  00c4 7b06          	ld	a,(OFST+5,sp)
3027  00c6 b723          	ld	_dat_len,a
3028                     ; 92     for(i=0;i<len;i++){
3030  00c8 0f01          	clr	(OFST+0,sp)
3032  00ca 2016          	jra	L1602
3033  00cc               L5502:
3034                     ; 93         i2c_buffer[i] = dat[i];
3036  00cc 7b01          	ld	a,(OFST+0,sp)
3037  00ce 5f            	clrw	x
3038  00cf 97            	ld	xl,a
3039  00d0 89            	pushw	x
3040  00d1 7b04          	ld	a,(OFST+3,sp)
3041  00d3 97            	ld	xl,a
3042  00d4 7b05          	ld	a,(OFST+4,sp)
3043  00d6 1b03          	add	a,(OFST+2,sp)
3044  00d8 2401          	jrnc	L21
3045  00da 5c            	incw	x
3046  00db               L21:
3047  00db 02            	rlwa	x,a
3048  00dc f6            	ld	a,(x)
3049  00dd 85            	popw	x
3050  00de e702          	ld	(_i2c_buffer,x),a
3051                     ; 92     for(i=0;i<len;i++){
3053  00e0 0c01          	inc	(OFST+0,sp)
3054  00e2               L1602:
3057  00e2 7b01          	ld	a,(OFST+0,sp)
3058  00e4 1106          	cp	a,(OFST+5,sp)
3059  00e6 25e4          	jrult	L5502
3060                     ; 95 }
3063  00e8 5b03          	addw	sp,#3
3064  00ea 81            	ret
3110                     ; 97 uchar i2c_recv(uchar *dat){
3111                     	switch	.text
3112  00eb               _i2c_recv:
3114  00eb 89            	pushw	x
3115  00ec 88            	push	a
3116       00000001      OFST:	set	1
3119                     ; 99     for(i=2;i<i2c_idx;i++) {
3121  00ed a602          	ld	a,#2
3122  00ef 6b01          	ld	(OFST+0,sp),a
3124  00f1 2015          	jra	L3112
3125  00f3               L7012:
3126                     ; 100         dat[i-2] = i2c_buffer[i];
3128  00f3 7b01          	ld	a,(OFST+0,sp)
3129  00f5 5f            	clrw	x
3130  00f6 97            	ld	xl,a
3131  00f7 5a            	decw	x
3132  00f8 5a            	decw	x
3133  00f9 72fb02        	addw	x,(OFST+1,sp)
3134  00fc 7b01          	ld	a,(OFST+0,sp)
3135  00fe 905f          	clrw	y
3136  0100 9097          	ld	yl,a
3137  0102 90e602        	ld	a,(_i2c_buffer,y)
3138  0105 f7            	ld	(x),a
3139                     ; 99     for(i=2;i<i2c_idx;i++) {
3141  0106 0c01          	inc	(OFST+0,sp)
3142  0108               L3112:
3145  0108 7b01          	ld	a,(OFST+0,sp)
3146  010a b124          	cp	a,_i2c_idx
3147  010c 25e5          	jrult	L7012
3148                     ; 102     return i2c_idx;
3150  010e b624          	ld	a,_i2c_idx
3153  0110 5b03          	addw	sp,#3
3154  0112 81            	ret
3213                     ; 116 @svlreg @far @interrupt void I2C_EVENT_IRQ(void) {
3215                     	switch	.text
3216  0113               f_I2C_EVENT_IRQ:
3218       00000001      OFST:	set	1
3219  0113 3b0002        	push	c_x+2
3220  0116 be00          	ldw	x,c_x
3221  0118 89            	pushw	x
3222  0119 3b0002        	push	c_y+2
3223  011c be00          	ldw	x,c_y
3224  011e 89            	pushw	x
3225  011f be02          	ldw	x,c_lreg+2
3226  0121 89            	pushw	x
3227  0122 be00          	ldw	x,c_lreg
3228  0124 89            	pushw	x
3229  0125 88            	push	a
3232                     ; 119   if (I2C_SR2 & (I2C_SR2_WUFH | I2C_SR2_OVR | I2C_SR2_ARLO | I2C_SR2_BERR)) {
3234  0126 c65218        	ld	a,_I2C_SR2
3235  0129 a52b          	bcp	a,#43
3236  012b 270a          	jreq	L5612
3237                     ; 121     I2C_SR2 = 0;
3239  012d 725f5218      	clr	_I2C_SR2
3240                     ; 123     I2C_CR2 |= I2C_CR2_STOP;
3242  0131 72125211      	bset	_I2C_CR2,#1
3243                     ; 124     return;
3245  0135 2010          	jra	L04
3246  0137               L5612:
3247                     ; 127   if (I2C_SR1 & I2C_SR1_ADDR) {
3249  0137 c65217        	ld	a,_I2C_SR1
3250  013a a502          	bcp	a,#2
3251  013c 271d          	jreq	L7612
3252                     ; 129     temp = I2C_SR3;
3254  013e c65219        	ld	a,_I2C_SR3
3255                     ; 130     i2c_busy = 1;
3257  0141 35010022      	mov	_i2c_busy,#1
3258                     ; 131     i2c_idx = 0;
3260  0145 3f24          	clr	_i2c_idx
3261                     ; 132     return;
3262  0147               L04:
3265  0147 84            	pop	a
3266  0148 85            	popw	x
3267  0149 bf00          	ldw	c_lreg,x
3268  014b 85            	popw	x
3269  014c bf02          	ldw	c_lreg+2,x
3270  014e 85            	popw	x
3271  014f bf00          	ldw	c_y,x
3272  0151 320002        	pop	c_y+2
3273  0154 85            	popw	x
3274  0155 bf00          	ldw	c_x,x
3275  0157 320002        	pop	c_x+2
3276  015a 80            	iret
3277  015b               L7612:
3278                     ; 135   if(I2C_SR1 & I2C_SR1_RXNE){
3280  015b c65217        	ld	a,_I2C_SR1
3281  015e a540          	bcp	a,#64
3282  0160 2717          	jreq	L1712
3283                     ; 136     if (i2c_idx == I2C_MAX_SIZE)
3285  0162 b624          	ld	a,_i2c_idx
3286  0164 a120          	cp	a,#32
3287  0166 2602          	jrne	L3712
3288                     ; 137         i2c_idx = 0;
3290  0168 3f24          	clr	_i2c_idx
3291  016a               L3712:
3292                     ; 138     i2c_buffer[i2c_idx++] = I2C_DR;
3294  016a b624          	ld	a,_i2c_idx
3295  016c 97            	ld	xl,a
3296  016d 3c24          	inc	_i2c_idx
3297  016f 9f            	ld	a,xl
3298  0170 5f            	clrw	x
3299  0171 97            	ld	xl,a
3300  0172 c65216        	ld	a,_I2C_DR
3301  0175 e702          	ld	(_i2c_buffer,x),a
3302                     ; 139     return;
3304  0177 20ce          	jra	L04
3305  0179               L1712:
3306                     ; 142   if (I2C_SR2 & I2C_SR2_AF) {
3308  0179 c65218        	ld	a,_I2C_SR2
3309  017c a504          	bcp	a,#4
3310  017e 2708          	jreq	L5712
3311                     ; 143     I2C_SR2 &= ~I2C_SR2_AF;
3313  0180 72155218      	bres	_I2C_SR2,#2
3314                     ; 144     i2c_busy = 0;
3316  0184 3f22          	clr	_i2c_busy
3317                     ; 145     return;
3319  0186 20bf          	jra	L04
3320  0188               L5712:
3321                     ; 148   if(I2C_SR1 & I2C_SR1_TXE){
3323  0188 c65217        	ld	a,_I2C_SR1
3324  018b a580          	bcp	a,#128
3325  018d 2719          	jreq	L7712
3326                     ; 149     if (i2c_idx < dat_len)
3328  018f b624          	ld	a,_i2c_idx
3329  0191 b123          	cp	a,_dat_len
3330  0193 240f          	jruge	L1022
3331                     ; 150       I2C_DR = i2c_buffer[i2c_idx++];
3333  0195 b624          	ld	a,_i2c_idx
3334  0197 97            	ld	xl,a
3335  0198 3c24          	inc	_i2c_idx
3336  019a 9f            	ld	a,xl
3337  019b 5f            	clrw	x
3338  019c 97            	ld	xl,a
3339  019d e602          	ld	a,(_i2c_buffer,x)
3340  019f c75216        	ld	_I2C_DR,a
3342  01a2 2004          	jra	L7712
3343  01a4               L1022:
3344                     ; 152       I2C_DR = 0x00;
3346  01a4 725f5216      	clr	_I2C_DR
3347  01a8               L7712:
3348                     ; 155   if (I2C_SR1 & I2C_SR1_STOPF) {
3350  01a8 c65217        	ld	a,_I2C_SR1
3351  01ab a510          	bcp	a,#16
3352  01ad 2604          	jrne	L24
3353  01af ac8c028c      	jpf	L5022
3354  01b3               L24:
3355                     ; 156     I2C_CR2 |= I2C_CR2_ACK;
3357  01b3 72145211      	bset	_I2C_CR2,#2
3358                     ; 157     i2c_busy = 0;
3360  01b7 3f22          	clr	_i2c_busy
3361                     ; 159     if(0xAA == i2c_buffer[0]) { // 写指令
3363  01b9 b602          	ld	a,_i2c_buffer
3364  01bb a1aa          	cp	a,#170
3365  01bd 2704          	jreq	L44
3366  01bf ac520252      	jpf	L7022
3367  01c3               L44:
3368                     ; 160         switch(i2c_buffer[1]){
3370  01c3 b603          	ld	a,_i2c_buffer+1
3372                     ; 189             default: break;
3373  01c5 4a            	dec	a
3374  01c6 271b          	jreq	L7112
3375  01c8 4a            	dec	a
3376  01c9 2722          	jreq	L1212
3377  01cb 4a            	dec	a
3378  01cc 2733          	jreq	L3212
3379  01ce 4a            	dec	a
3380  01cf 2742          	jreq	L5212
3381  01d1 4a            	dec	a
3382  01d2 2751          	jreq	L7212
3383  01d4 4a            	dec	a
3384  01d5 2760          	jreq	L1312
3385  01d7 a004          	sub	a,#4
3386  01d9 2764          	jreq	L3312
3387  01db a07e          	sub	a,#126
3388  01dd 2765          	jreq	L5312
3389  01df ac880288      	jpf	L5122
3390  01e3               L7112:
3391                     ; 161             case 1:
3391                     ; 162 								//是否使能定时器，产生pwm：
3391                     ; 163 								turn_order = i2c_buffer[2];
3393  01e3 450400        	mov	_turn_order,_i2c_buffer+2
3394                     ; 164 								turn_sec = i2c_buffer[3];
3396  01e6 450500        	mov	_turn_sec,_i2c_buffer+3
3397                     ; 165                 break;
3399  01e9 ac880288      	jpf	L5122
3400  01ed               L1212:
3401                     ; 166             case 2:
3401                     ; 167                 COLLECT_FAN = i2c_buffer[2];
3403  01ed 3d04          	tnz	_i2c_buffer+2
3404  01ef 2602          	jrne	L64
3405  01f1 2006          	jpf	L02
3406  01f3               L64:
3407  01f3 72125000      	bset	_COLLECT_FAN
3408  01f7 2004          	jra	L22
3409  01f9               L02:
3410  01f9 72135000      	bres	_COLLECT_FAN
3411  01fd               L22:
3412                     ; 168                 break;
3414  01fd ac880288      	jra	L5122
3415  0201               L3212:
3416                     ; 169             case 3:
3416                     ; 170                 COOL = i2c_buffer[2];
3418  0201 3d04          	tnz	_i2c_buffer+2
3419  0203 2602          	jrne	L05
3420  0205 2006          	jpf	L42
3421  0207               L05:
3422  0207 72145000      	bset	_COOL
3423  020b 2004          	jra	L62
3424  020d               L42:
3425  020d 72155000      	bres	_COOL
3426  0211               L62:
3427                     ; 171                 break;
3429  0211 2075          	jra	L5122
3430  0213               L5212:
3431                     ; 172             case 4:
3431                     ; 173                 HEAT = i2c_buffer[2];
3433  0213 3d04          	tnz	_i2c_buffer+2
3434  0215 2602          	jrne	L25
3435  0217 2006          	jpf	L03
3436  0219               L25:
3437  0219 7212500f      	bset	_HEAT
3438  021d 2004          	jra	L23
3439  021f               L03:
3440  021f 7213500f      	bres	_HEAT
3441  0223               L23:
3442                     ; 174                 break;
3444  0223 2063          	jra	L5122
3445  0225               L7212:
3446                     ; 175             case 5:
3446                     ; 176                 COLD = i2c_buffer[2];
3448  0225 3d04          	tnz	_i2c_buffer+2
3449  0227 2602          	jrne	L45
3450  0229 2006          	jpf	L43
3451  022b               L45:
3452  022b 7218500f      	bset	_COLD
3453  022f 2004          	jra	L63
3454  0231               L43:
3455  0231 7219500f      	bres	_COLD
3456  0235               L63:
3457                     ; 177                 break;
3459  0235 2051          	jra	L5122
3460  0237               L1312:
3461                     ; 178             case 6:
3461                     ; 179 						    up_dw_flag = i2c_buffer[2];
3463  0237 450400        	mov	_up_dw_flag,_i2c_buffer+2
3464                     ; 180 								fsl_sec = i2c_buffer[3];
3466  023a 450500        	mov	_fsl_sec,_i2c_buffer+3
3467                     ; 181                 break;
3469  023d 2049          	jra	L5122
3470  023f               L3312:
3471                     ; 182             case 0x0A:
3471                     ; 183                 wdgtim = i2c_buffer[2];
3473  023f 450400        	mov	_wdgtim,_i2c_buffer+2
3474                     ; 184                 break;
3476  0242 2044          	jra	L5122
3477  0244               L5312:
3478                     ; 185 						case 0x88:
3478                     ; 186 								IWDG_KR = 0x55; //解除 PR 及 RLR 的写保护
3480  0244 355550e0      	mov	_IWDG_KR,#85
3481                     ; 187 								IWDG_RLR = 0x00; //看门狗计数器重装载数值
3483  0248 725f50e2      	clr	_IWDG_RLR
3484                     ; 188 								break;
3486  024c 203a          	jra	L5122
3487  024e               L7312:
3488                     ; 189             default: break;
3490  024e 2038          	jra	L5122
3491  0250               L3122:
3492                     ; 190         };
3494  0250 2036          	jra	L5122
3495  0252               L7022:
3496                     ; 192     else if(0x55 == i2c_buffer[0]){ // 读指令
3498  0252 b602          	ld	a,_i2c_buffer
3499  0254 a155          	cp	a,#85
3500  0256 2630          	jrne	L5122
3501                     ; 193         switch(i2c_buffer[1]){
3503  0258 b603          	ld	a,_i2c_buffer+1
3505                     ; 202             default:break;
3506  025a a007          	sub	a,#7
3507  025c 270f          	jreq	L3412
3508  025e a005          	sub	a,#5
3509  0260 2626          	jrne	L5122
3510                     ; 194 						case 0x0C: // 获取STM8数据
3510                     ; 195 								i2c_send((char *)(&stm8_data),11);
3512  0262 4b0b          	push	#11
3513  0264 ae0000        	ldw	x,#_stm8_data
3514  0267 cd00c2        	call	_i2c_send
3516  026a 84            	pop	a
3517                     ; 196                 break;
3519  026b 201b          	jra	L5122
3520  026d               L3412:
3521                     ; 197 						case 7:
3521                     ; 198 								turn_limit.turn = TURN_IN;
3523  026d 4f            	clr	a
3524                     	btst	_TURN_IN
3525  0273 49            	rlc	a
3526  0274 b700          	ld	_turn_limit,a
3527                     ; 199 								turn_limit.turn_init = TURN_IN0;
3529  0276 4f            	clr	a
3530                     	btst	_TURN_IN0
3531  027c 49            	rlc	a
3532  027d b701          	ld	_turn_limit+1,a
3533                     ; 200 								i2c_send((char *)(&turn_limit),2);
3535  027f 4b02          	push	#2
3536  0281 ae0000        	ldw	x,#_turn_limit
3537  0284 cd00c2        	call	_i2c_send
3539  0287 84            	pop	a
3540                     ; 201                 break;
3542  0288               L5412:
3543                     ; 202             default:break;
3545  0288               L3222:
3547  0288               L5122:
3548                     ; 206     return;
3550  0288 ac470147      	jpf	L04
3551  028c               L5022:
3552                     ; 208 }
3554  028c ac470147      	jpf	L04
3636                     	xdef	f_I2C_EVENT_IRQ
3637                     	switch	.ubsct
3638  0000               _turn_limit:
3639  0000 0000          	ds.b	2
3640                     	xdef	_turn_limit
3641                     	xref.b	_fsl_sec
3642                     	xref.b	_up_dw_flag
3643                     	xref.b	_turn_sec
3644                     	xref.b	_turn_order
3645                     	xdef	_i2c_recv
3646                     	xdef	_i2c_send
3647                     	xdef	_TempCalculate
3648  0002               _i2c_buffer:
3649  0002 000000000000  	ds.b	32
3650                     	xdef	_i2c_buffer
3651  0022               _i2c_busy:
3652  0022 00            	ds.b	1
3653                     	xdef	_i2c_busy
3654  0023               _dat_len:
3655  0023 00            	ds.b	1
3656                     	xdef	_dat_len
3657  0024               _i2c_idx:
3658  0024 00            	ds.b	1
3659                     	xdef	_i2c_idx
3660                     	xref.b	_stm8_data
3661                     	xref	_log
3662                     	xref.b	_wdgtim
3663                     	xdef	_IIC_Init
3664                     .const:	section	.text
3665  0000               L3202:
3666  0000 3f000000      	dc.w	16128,0
3667  0004               L3102:
3668  0004 438890a3      	dc.w	17288,-28509
3669  0008               L3002:
3670  0008 3b5bcec8      	dc.w	15195,-12600
3671  000c               L3771:
3672  000c 3f800000      	dc.w	16256,0
3673                     	xref.b	c_lreg
3674                     	xref.b	c_x
3675                     	xref.b	c_y
3695                     	xref	c_ftoi
3696                     	xref	c_fgadd
3697                     	xref	c_fgsub
3698                     	xref	c_fadd
3699                     	xref	c_ltor
3700                     	xref	c_ctof
3701                     	xref	c_fgdiv
3702                     	xref	c_fdiv
3703                     	xref	c_rtol
3704                     	xref	c_itof
3705                     	xref	c_fmul
3706                     	xref	c_uitof
3707                     	end