1                     ; C Compiler for STM8 (COSMIC Software)
   2                     ; Parser V4.8.32 - 23 Mar 2010
   3                     ; Generator V4.3.4 - 23 Mar 2010
2727                     ; 29 void IIC_Init(void) {
2729                     	switch	.text
2730  0000               _IIC_Init:
2734                     ; 35   I2C_CR1 = 0x00;
2736  0000 725f5210      	clr	_I2C_CR1
2737                     ; 37   I2C_FREQR = 8;
2739  0004 35085212      	mov	_I2C_FREQR,#8
2740                     ; 40   I2C_CCRL = 40;
2742  0008 3528521b      	mov	_I2C_CCRL,#40
2743                     ; 41   I2C_CCRH = 0;
2745  000c 725f521c      	clr	_I2C_CCRH
2746                     ; 43   I2C_TRISER = 9;
2748  0010 3509521d      	mov	_I2C_TRISER,#9
2749                     ; 45   I2C_CR1 = 0x01;
2751  0014 35015210      	mov	_I2C_CR1,#1
2752                     ; 47   I2C_OARL = (SLAVE_ADDRESS << 1);
2754  0018 35a25213      	mov	_I2C_OARL,#162
2755                     ; 48   I2C_OARH |= 0x40;
2757  001c 721c5214      	bset	_I2C_OARH,#6
2758                     ; 50   I2C_CR2 |= 1 << 2;
2760  0020 72145211      	bset	_I2C_CR2,#2
2761                     ; 52   I2C_ITR = 0x07;
2763  0024 3507521a      	mov	_I2C_ITR,#7
2764                     ; 53 }
2767  0028 81            	ret
2838                     ; 62 int TempCalculate(uint Rv,int B,int Revise,int BasicRx)
2838                     ; 63 {
2839                     	switch	.text
2840  0029               _TempCalculate:
2842  0029 89            	pushw	x
2843  002a 5208          	subw	sp,#8
2844       00000008      OFST:	set	8
2847                     ; 66 	Rx = Rv * 1.0 / BasicRx;
2849  002c 1e11          	ldw	x,(OFST+9,sp)
2850  002e cd0000        	call	c_itof
2852  0031 96            	ldw	x,sp
2853  0032 1c0001        	addw	x,#OFST-7
2854  0035 cd0000        	call	c_rtol
2856  0038 1e09          	ldw	x,(OFST+1,sp)
2857  003a cd0000        	call	c_uitof
2859  003d ae000c        	ldw	x,#L7671
2860  0040 cd0000        	call	c_fmul
2862  0043 96            	ldw	x,sp
2863  0044 1c0001        	addw	x,#OFST-7
2864  0047 cd0000        	call	c_fdiv
2866  004a 96            	ldw	x,sp
2867  004b 1c0005        	addw	x,#OFST-3
2868  004e cd0000        	call	c_rtol
2870                     ; 68 	Rx = log(Rx);
2872  0051 1e07          	ldw	x,(OFST-1,sp)
2873  0053 89            	pushw	x
2874  0054 1e07          	ldw	x,(OFST-1,sp)
2875  0056 89            	pushw	x
2876  0057 cd0000        	call	_log
2878  005a 5b04          	addw	sp,#4
2879  005c 96            	ldw	x,sp
2880  005d 1c0005        	addw	x,#OFST-3
2881  0060 cd0000        	call	c_rtol
2883                     ; 70 	Rx = Rx / B;
2885  0063 1e0d          	ldw	x,(OFST+5,sp)
2886  0065 cd0000        	call	c_itof
2888  0068 96            	ldw	x,sp
2889  0069 1c0005        	addw	x,#OFST-3
2890  006c cd0000        	call	c_fgdiv
2892                     ; 71     Rx = 1/(Rx+0.003354);
2894  006f 96            	ldw	x,sp
2895  0070 1c0005        	addw	x,#OFST-3
2896  0073 cd0000        	call	c_ltor
2898  0076 ae0008        	ldw	x,#L7771
2899  0079 cd0000        	call	c_fadd
2901  007c 96            	ldw	x,sp
2902  007d 1c0001        	addw	x,#OFST-7
2903  0080 cd0000        	call	c_rtol
2905  0083 a601          	ld	a,#1
2906  0085 cd0000        	call	c_ctof
2908  0088 96            	ldw	x,sp
2909  0089 1c0001        	addw	x,#OFST-7
2910  008c cd0000        	call	c_fdiv
2912  008f 96            	ldw	x,sp
2913  0090 1c0005        	addw	x,#OFST-3
2914  0093 cd0000        	call	c_rtol
2916                     ; 74 	Rx = Rx - 273.13;
2918  0096 ae0004        	ldw	x,#L7002
2919  0099 cd0000        	call	c_ltor
2921  009c 96            	ldw	x,sp
2922  009d 1c0005        	addw	x,#OFST-3
2923  00a0 cd0000        	call	c_fgsub
2925                     ; 75 	Rx = Rx + Revise;
2927  00a3 1e0f          	ldw	x,(OFST+7,sp)
2928  00a5 cd0000        	call	c_itof
2930  00a8 96            	ldw	x,sp
2931  00a9 1c0005        	addw	x,#OFST-3
2932  00ac cd0000        	call	c_fgadd
2934                     ; 77 	return (int)(Rx+0.5);
2936  00af 96            	ldw	x,sp
2937  00b0 1c0005        	addw	x,#OFST-3
2938  00b3 cd0000        	call	c_ltor
2940  00b6 ae0000        	ldw	x,#L7102
2941  00b9 cd0000        	call	c_fadd
2943  00bc cd0000        	call	c_ftoi
2947  00bf 5b0a          	addw	sp,#10
2948  00c1 81            	ret
3003                     ; 89 void i2c_send(uchar *dat,uchar len){
3004                     	switch	.text
3005  00c2               _i2c_send:
3007  00c2 89            	pushw	x
3008  00c3 88            	push	a
3009       00000001      OFST:	set	1
3012                     ; 91     dat_len = len;
3014  00c4 7b06          	ld	a,(OFST+5,sp)
3015  00c6 b723          	ld	_dat_len,a
3016                     ; 92     for(i=0;i<len;i++){
3018  00c8 0f01          	clr	(OFST+0,sp)
3020  00ca 2016          	jra	L5502
3021  00cc               L1502:
3022                     ; 93         i2c_buffer[i] = dat[i];
3024  00cc 7b01          	ld	a,(OFST+0,sp)
3025  00ce 5f            	clrw	x
3026  00cf 97            	ld	xl,a
3027  00d0 89            	pushw	x
3028  00d1 7b04          	ld	a,(OFST+3,sp)
3029  00d3 97            	ld	xl,a
3030  00d4 7b05          	ld	a,(OFST+4,sp)
3031  00d6 1b03          	add	a,(OFST+2,sp)
3032  00d8 2401          	jrnc	L21
3033  00da 5c            	incw	x
3034  00db               L21:
3035  00db 02            	rlwa	x,a
3036  00dc f6            	ld	a,(x)
3037  00dd 85            	popw	x
3038  00de e702          	ld	(_i2c_buffer,x),a
3039                     ; 92     for(i=0;i<len;i++){
3041  00e0 0c01          	inc	(OFST+0,sp)
3042  00e2               L5502:
3045  00e2 7b01          	ld	a,(OFST+0,sp)
3046  00e4 1106          	cp	a,(OFST+5,sp)
3047  00e6 25e4          	jrult	L1502
3048                     ; 95 }
3051  00e8 5b03          	addw	sp,#3
3052  00ea 81            	ret
3098                     ; 97 uchar i2c_recv(uchar *dat){
3099                     	switch	.text
3100  00eb               _i2c_recv:
3102  00eb 89            	pushw	x
3103  00ec 88            	push	a
3104       00000001      OFST:	set	1
3107                     ; 99     for(i=2;i<i2c_idx;i++) {
3109  00ed a602          	ld	a,#2
3110  00ef 6b01          	ld	(OFST+0,sp),a
3112  00f1 2015          	jra	L7012
3113  00f3               L3012:
3114                     ; 100         dat[i-2] = i2c_buffer[i];
3116  00f3 7b01          	ld	a,(OFST+0,sp)
3117  00f5 5f            	clrw	x
3118  00f6 97            	ld	xl,a
3119  00f7 5a            	decw	x
3120  00f8 5a            	decw	x
3121  00f9 72fb02        	addw	x,(OFST+1,sp)
3122  00fc 7b01          	ld	a,(OFST+0,sp)
3123  00fe 905f          	clrw	y
3124  0100 9097          	ld	yl,a
3125  0102 90e602        	ld	a,(_i2c_buffer,y)
3126  0105 f7            	ld	(x),a
3127                     ; 99     for(i=2;i<i2c_idx;i++) {
3129  0106 0c01          	inc	(OFST+0,sp)
3130  0108               L7012:
3133  0108 7b01          	ld	a,(OFST+0,sp)
3134  010a b124          	cp	a,_i2c_idx
3135  010c 25e5          	jrult	L3012
3136                     ; 102     return i2c_idx;
3138  010e b624          	ld	a,_i2c_idx
3141  0110 5b03          	addw	sp,#3
3142  0112 81            	ret
3201                     ; 116 @svlreg @far @interrupt void I2C_EVENT_IRQ(void) {
3203                     	switch	.text
3204  0113               f_I2C_EVENT_IRQ:
3206       00000001      OFST:	set	1
3207  0113 3b0002        	push	c_x+2
3208  0116 be00          	ldw	x,c_x
3209  0118 89            	pushw	x
3210  0119 3b0002        	push	c_y+2
3211  011c be00          	ldw	x,c_y
3212  011e 89            	pushw	x
3213  011f be02          	ldw	x,c_lreg+2
3214  0121 89            	pushw	x
3215  0122 be00          	ldw	x,c_lreg
3216  0124 89            	pushw	x
3217  0125 88            	push	a
3220                     ; 119   if (I2C_SR2 & (I2C_SR2_WUFH | I2C_SR2_OVR | I2C_SR2_ARLO | I2C_SR2_BERR)) {
3222  0126 c65218        	ld	a,_I2C_SR2
3223  0129 a52b          	bcp	a,#43
3224  012b 270a          	jreq	L1612
3225                     ; 121     I2C_SR2 = 0;
3227  012d 725f5218      	clr	_I2C_SR2
3228                     ; 123     I2C_CR2 |= I2C_CR2_STOP;
3230  0131 72125211      	bset	_I2C_CR2,#1
3231                     ; 124     return;
3233  0135 2010          	jra	L04
3234  0137               L1612:
3235                     ; 127   if (I2C_SR1 & I2C_SR1_ADDR) {
3237  0137 c65217        	ld	a,_I2C_SR1
3238  013a a502          	bcp	a,#2
3239  013c 271d          	jreq	L3612
3240                     ; 129     temp = I2C_SR3;
3242  013e c65219        	ld	a,_I2C_SR3
3243                     ; 130     i2c_busy = 1;
3245  0141 35010022      	mov	_i2c_busy,#1
3246                     ; 131     i2c_idx = 0;
3248  0145 3f24          	clr	_i2c_idx
3249                     ; 132     return;
3250  0147               L04:
3253  0147 84            	pop	a
3254  0148 85            	popw	x
3255  0149 bf00          	ldw	c_lreg,x
3256  014b 85            	popw	x
3257  014c bf02          	ldw	c_lreg+2,x
3258  014e 85            	popw	x
3259  014f bf00          	ldw	c_y,x
3260  0151 320002        	pop	c_y+2
3261  0154 85            	popw	x
3262  0155 bf00          	ldw	c_x,x
3263  0157 320002        	pop	c_x+2
3264  015a 80            	iret
3265  015b               L3612:
3266                     ; 135   if(I2C_SR1 & I2C_SR1_RXNE){
3268  015b c65217        	ld	a,_I2C_SR1
3269  015e a540          	bcp	a,#64
3270  0160 2717          	jreq	L5612
3271                     ; 136     if (i2c_idx == I2C_MAX_SIZE)
3273  0162 b624          	ld	a,_i2c_idx
3274  0164 a120          	cp	a,#32
3275  0166 2602          	jrne	L7612
3276                     ; 137         i2c_idx = 0;
3278  0168 3f24          	clr	_i2c_idx
3279  016a               L7612:
3280                     ; 138     i2c_buffer[i2c_idx++] = I2C_DR;
3282  016a b624          	ld	a,_i2c_idx
3283  016c 97            	ld	xl,a
3284  016d 3c24          	inc	_i2c_idx
3285  016f 9f            	ld	a,xl
3286  0170 5f            	clrw	x
3287  0171 97            	ld	xl,a
3288  0172 c65216        	ld	a,_I2C_DR
3289  0175 e702          	ld	(_i2c_buffer,x),a
3290                     ; 139     return;
3292  0177 20ce          	jra	L04
3293  0179               L5612:
3294                     ; 142   if (I2C_SR2 & I2C_SR2_AF) {
3296  0179 c65218        	ld	a,_I2C_SR2
3297  017c a504          	bcp	a,#4
3298  017e 2708          	jreq	L1712
3299                     ; 143     I2C_SR2 &= ~I2C_SR2_AF;
3301  0180 72155218      	bres	_I2C_SR2,#2
3302                     ; 144     i2c_busy = 0;
3304  0184 3f22          	clr	_i2c_busy
3305                     ; 145     return;
3307  0186 20bf          	jra	L04
3308  0188               L1712:
3309                     ; 148   if(I2C_SR1 & I2C_SR1_TXE){
3311  0188 c65217        	ld	a,_I2C_SR1
3312  018b a580          	bcp	a,#128
3313  018d 2719          	jreq	L3712
3314                     ; 149     if (i2c_idx < dat_len)
3316  018f b624          	ld	a,_i2c_idx
3317  0191 b123          	cp	a,_dat_len
3318  0193 240f          	jruge	L5712
3319                     ; 150       I2C_DR = i2c_buffer[i2c_idx++];
3321  0195 b624          	ld	a,_i2c_idx
3322  0197 97            	ld	xl,a
3323  0198 3c24          	inc	_i2c_idx
3324  019a 9f            	ld	a,xl
3325  019b 5f            	clrw	x
3326  019c 97            	ld	xl,a
3327  019d e602          	ld	a,(_i2c_buffer,x)
3328  019f c75216        	ld	_I2C_DR,a
3330  01a2 2004          	jra	L3712
3331  01a4               L5712:
3332                     ; 152       I2C_DR = 0x00;
3334  01a4 725f5216      	clr	_I2C_DR
3335  01a8               L3712:
3336                     ; 155   if (I2C_SR1 & I2C_SR1_STOPF) {
3338  01a8 c65217        	ld	a,_I2C_SR1
3339  01ab a510          	bcp	a,#16
3340  01ad 2604          	jrne	L24
3341  01af ac8c028c      	jpf	L1022
3342  01b3               L24:
3343                     ; 156     I2C_CR2 |= I2C_CR2_ACK;
3345  01b3 72145211      	bset	_I2C_CR2,#2
3346                     ; 157     i2c_busy = 0;
3348  01b7 3f22          	clr	_i2c_busy
3349                     ; 159     if(0xAA == i2c_buffer[0]) { // 写指令
3351  01b9 b602          	ld	a,_i2c_buffer
3352  01bb a1aa          	cp	a,#170
3353  01bd 2704          	jreq	L44
3354  01bf ac520252      	jpf	L3022
3355  01c3               L44:
3356                     ; 160         switch(i2c_buffer[1]){
3358  01c3 b603          	ld	a,_i2c_buffer+1
3360                     ; 189             default: break;
3361  01c5 4a            	dec	a
3362  01c6 271b          	jreq	L3112
3363  01c8 4a            	dec	a
3364  01c9 2722          	jreq	L5112
3365  01cb 4a            	dec	a
3366  01cc 2733          	jreq	L7112
3367  01ce 4a            	dec	a
3368  01cf 2742          	jreq	L1212
3369  01d1 4a            	dec	a
3370  01d2 2751          	jreq	L3212
3371  01d4 4a            	dec	a
3372  01d5 2760          	jreq	L5212
3373  01d7 a004          	sub	a,#4
3374  01d9 2764          	jreq	L7212
3375  01db a07e          	sub	a,#126
3376  01dd 2765          	jreq	L1312
3377  01df ac880288      	jpf	L1122
3378  01e3               L3112:
3379                     ; 161             case 1:
3379                     ; 162 								//是否使能定时器，产生pwm：
3379                     ; 163 								turn_order = i2c_buffer[2];
3381  01e3 450400        	mov	_turn_order,_i2c_buffer+2
3382                     ; 164 								turn_sec = i2c_buffer[3];
3384  01e6 450500        	mov	_turn_sec,_i2c_buffer+3
3385                     ; 165                 break;
3387  01e9 ac880288      	jpf	L1122
3388  01ed               L5112:
3389                     ; 166             case 2:
3389                     ; 167                 COLLECT_FAN = i2c_buffer[2];
3391  01ed 3d04          	tnz	_i2c_buffer+2
3392  01ef 2602          	jrne	L64
3393  01f1 2006          	jpf	L02
3394  01f3               L64:
3395  01f3 72125000      	bset	_COLLECT_FAN
3396  01f7 2004          	jra	L22
3397  01f9               L02:
3398  01f9 72135000      	bres	_COLLECT_FAN
3399  01fd               L22:
3400                     ; 168                 break;
3402  01fd ac880288      	jra	L1122
3403  0201               L7112:
3404                     ; 169             case 3:
3404                     ; 170                 COOL = i2c_buffer[2];
3406  0201 3d04          	tnz	_i2c_buffer+2
3407  0203 2602          	jrne	L05
3408  0205 2006          	jpf	L42
3409  0207               L05:
3410  0207 72145000      	bset	_COOL
3411  020b 2004          	jra	L62
3412  020d               L42:
3413  020d 72155000      	bres	_COOL
3414  0211               L62:
3415                     ; 171                 break;
3417  0211 2075          	jra	L1122
3418  0213               L1212:
3419                     ; 172             case 4:
3419                     ; 173                 HEAT = i2c_buffer[2];
3421  0213 3d04          	tnz	_i2c_buffer+2
3422  0215 2602          	jrne	L25
3423  0217 2006          	jpf	L03
3424  0219               L25:
3425  0219 7212500f      	bset	_HEAT
3426  021d 2004          	jra	L23
3427  021f               L03:
3428  021f 7213500f      	bres	_HEAT
3429  0223               L23:
3430                     ; 174                 break;
3432  0223 2063          	jra	L1122
3433  0225               L3212:
3434                     ; 175             case 5:
3434                     ; 176                 COLD = i2c_buffer[2];
3436  0225 3d04          	tnz	_i2c_buffer+2
3437  0227 2602          	jrne	L45
3438  0229 2006          	jpf	L43
3439  022b               L45:
3440  022b 7218500f      	bset	_COLD
3441  022f 2004          	jra	L63
3442  0231               L43:
3443  0231 7219500f      	bres	_COLD
3444  0235               L63:
3445                     ; 177                 break;
3447  0235 2051          	jra	L1122
3448  0237               L5212:
3449                     ; 178             case 6:
3449                     ; 179 						    up_dw_flag = i2c_buffer[2];
3451  0237 450400        	mov	_up_dw_flag,_i2c_buffer+2
3452                     ; 180 								fsl_sec = i2c_buffer[3];
3454  023a 450500        	mov	_fsl_sec,_i2c_buffer+3
3455                     ; 181                 break;
3457  023d 2049          	jra	L1122
3458  023f               L7212:
3459                     ; 182             case 0x0A:
3459                     ; 183                 wdgtim = i2c_buffer[2];
3461  023f 450400        	mov	_wdgtim,_i2c_buffer+2
3462                     ; 184                 break;
3464  0242 2044          	jra	L1122
3465  0244               L1312:
3466                     ; 185 						case 0x88:
3466                     ; 186 								IWDG_KR = 0x55; //解除 PR 及 RLR 的写保护
3468  0244 355550e0      	mov	_IWDG_KR,#85
3469                     ; 187 								IWDG_RLR = 0x00; //看门狗计数器重装载数值
3471  0248 725f50e2      	clr	_IWDG_RLR
3472                     ; 188 								break;
3474  024c 203a          	jra	L1122
3475  024e               L3312:
3476                     ; 189             default: break;
3478  024e 2038          	jra	L1122
3479  0250               L7022:
3480                     ; 190         };
3482  0250 2036          	jra	L1122
3483  0252               L3022:
3484                     ; 192     else if(0x55 == i2c_buffer[0]){ // 读指令
3486  0252 b602          	ld	a,_i2c_buffer
3487  0254 a155          	cp	a,#85
3488  0256 2630          	jrne	L1122
3489                     ; 193         switch(i2c_buffer[1]){
3491  0258 b603          	ld	a,_i2c_buffer+1
3493                     ; 202             default:break;
3494  025a a007          	sub	a,#7
3495  025c 270f          	jreq	L7312
3496  025e a005          	sub	a,#5
3497  0260 2626          	jrne	L1122
3498                     ; 194 						case 0x0C: // 获取STM8数据
3498                     ; 195 								i2c_send((char *)(&stm8_data),11);
3500  0262 4b0b          	push	#11
3501  0264 ae0000        	ldw	x,#_stm8_data
3502  0267 cd00c2        	call	_i2c_send
3504  026a 84            	pop	a
3505                     ; 196                 break;
3507  026b 201b          	jra	L1122
3508  026d               L7312:
3509                     ; 197 						case 7:
3509                     ; 198 								turn_limit.turn = TURN_IN;
3511  026d 4f            	clr	a
3512                     	btst	_TURN_IN
3513  0273 49            	rlc	a
3514  0274 b700          	ld	_turn_limit,a
3515                     ; 199 								turn_limit.turn_init = TURN_IN0;
3517  0276 4f            	clr	a
3518                     	btst	_TURN_IN0
3519  027c 49            	rlc	a
3520  027d b701          	ld	_turn_limit+1,a
3521                     ; 200 								i2c_send((char *)(&turn_limit),2);
3523  027f 4b02          	push	#2
3524  0281 ae0000        	ldw	x,#_turn_limit
3525  0284 cd00c2        	call	_i2c_send
3527  0287 84            	pop	a
3528                     ; 201                 break;
3530  0288               L1412:
3531                     ; 202             default:break;
3533  0288               L7122:
3535  0288               L1122:
3536                     ; 206     return;
3538  0288 ac470147      	jpf	L04
3539  028c               L1022:
3540                     ; 208 }
3542  028c ac470147      	jpf	L04
3624                     	xdef	f_I2C_EVENT_IRQ
3625                     	switch	.ubsct
3626  0000               _turn_limit:
3627  0000 0000          	ds.b	2
3628                     	xdef	_turn_limit
3629                     	xref.b	_fsl_sec
3630                     	xref.b	_up_dw_flag
3631                     	xref.b	_turn_sec
3632                     	xref.b	_turn_order
3633                     	xdef	_i2c_recv
3634                     	xdef	_i2c_send
3635                     	xdef	_TempCalculate
3636  0002               _i2c_buffer:
3637  0002 000000000000  	ds.b	32
3638                     	xdef	_i2c_buffer
3639  0022               _i2c_busy:
3640  0022 00            	ds.b	1
3641                     	xdef	_i2c_busy
3642  0023               _dat_len:
3643  0023 00            	ds.b	1
3644                     	xdef	_dat_len
3645  0024               _i2c_idx:
3646  0024 00            	ds.b	1
3647                     	xdef	_i2c_idx
3648                     	xref.b	_stm8_data
3649                     	xref	_log
3650                     	xref.b	_wdgtim
3651                     	xdef	_IIC_Init
3652                     .const:	section	.text
3653  0000               L7102:
3654  0000 3f000000      	dc.w	16128,0
3655  0004               L7002:
3656  0004 438890a3      	dc.w	17288,-28509
3657  0008               L7771:
3658  0008 3b5bcec8      	dc.w	15195,-12600
3659  000c               L7671:
3660  000c 3f800000      	dc.w	16256,0
3661                     	xref.b	c_lreg
3662                     	xref.b	c_x
3663                     	xref.b	c_y
3683                     	xref	c_ftoi
3684                     	xref	c_fgadd
3685                     	xref	c_fgsub
3686                     	xref	c_fadd
3687                     	xref	c_ltor
3688                     	xref	c_ctof
3689                     	xref	c_fgdiv
3690                     	xref	c_fdiv
3691                     	xref	c_rtol
3692                     	xref	c_itof
3693                     	xref	c_fmul
3694                     	xref	c_uitof
3695                     	end