gb.s

应8位机计算电网无功量并自动投切电容,横好用的

	.module GB.C
	.area data(ram, con, rel)
_sincode::
	.blkb 2
	.area idata
	.word 0
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 71
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 142
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 214
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 285
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 356
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 428
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 499
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 570
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 640
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 711
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 781
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 851
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 921
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 990
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1060
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1129
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1197
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1265
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1333
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1400
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1467
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1534
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1600
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1665
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1731
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1795
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1859
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1922
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1985
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2048
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2109
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2170
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2230
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2290
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2349
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2407
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2465
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2521
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2577
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2632
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2687
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2740
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2793
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2845
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2896
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2946
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2995
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3043
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3091
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3137
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3183
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3227
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3271
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3313
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3355
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3395
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3435
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3473
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3510
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3547
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3582
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3616
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3649
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3681
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3712
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3741
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3770
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3797
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3823
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3848
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3872
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3895
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3917
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3937
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3956
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3974
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3991
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4006
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4020
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4033
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4045
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4056
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4065
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4073
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4080
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4086
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4090
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4093
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4095
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4096
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4095
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4093
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4090
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4086
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4080
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4073
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4065
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4056
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4045
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4033
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4020
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 4006
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3991
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3974
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3956
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3937
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3917
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3895
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3872
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3848
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3823
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3797
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3770
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3741
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3712
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3681
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3649
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3616
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3582
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3547
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3510
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3473
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3435
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3395
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3355
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3313
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3271
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3227
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3183
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3137
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3091
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 3043
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2995
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2946
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2896
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2845
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2793
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2740
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2687
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2632
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2577
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2521
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2465
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2407
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2349
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2290
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2230
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2170
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2109
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 2048
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1985
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1922
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1859
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1795
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1731
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1665
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1600
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1534
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1467
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1400
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1333
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1265
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1197
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1129
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 1060
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 990
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 921
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 851
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 781
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 711
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 640
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 570
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 499
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 428
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 356
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 285
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 214
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 142
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 71
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.word 0
	.area data(ram, con, rel)
	.dbfile C:\硬件ddb\功补\allinone\GB.C
	.dbsym e sincode _sincode A[362:181]i
	.area text(rom, con, rel)
	.dbfile C:\硬件ddb\功补\allinone\GB.C
	.dbfunc e EEPROMread _EEPROMread fc
;       location -> R16,R17
	.even
_EEPROMread::
	.dbline -1
	.dbline 71
; //ICC-AVR application builder : 2007-3-31 9:56:48
; // Target : M128
; // Crystal: 8.0000Mhz
; 
; #include <iom128v.h>
; #include <macros.h>
; //#include <eeprom.h>
; 
; long unsigned int count;
; unsigned int imax,imax_1,imax_2,imax_3;
; unsigned int ovclk,ovclk2,ov1count,ov2count,ov3count,ov4count;
; unsigned int umax,umax_1,umax_2,umax_3;
; unsigned int phamax,phamax_1,phamax_2,phamax_3;
; unsigned   char  qs10,qs20,qs30,qs40,he10,he20,he30,he40,yubei0;
; unsigned   char  qs11,qs21,qs31,qs41,he11,he21,he31,he41,yubei;
; unsigned   char  be10,be20,be30,be40,ov10,ov20,ov30,ov40;
; unsigned   char  be11,be21,be31,be41,ov11,ov21,ov31,ov41;
; unsigned   char  tounum,qenum,zzcode,phaserr,cutpulse,ovky,ovky2;
; struct PFC
;    {
;    char s;
;    char he;
;    char qs;
;    char be;
;    char ov;
;    char zznum;
;    char zzco;
;    char jcq;
;    };
; 
; struct PFC pfcz[4];
;  
;    
;  
; //#pragma abs_address:0x0FB00   const      
; unsigned int sincode[]=
; { 0x0000,0x0047,0X008E,0X00D6,0X011D,0X0164,0X01AC,0X01F3,0X023A,
;   0X0280,0X02C7,0X030D,0X0353,0X0399,0X03DE,0X0424,0X0469,0X04AD,
;   0X04F1,0X0535,0X0578,0X05BB,0X05FE,0X0640,0X0681,0X06C3,0X0703,
;   0X0743,0X0782,0X07C1,0X0800,0X083D,0X087A,0X08B6,0X08F2,0X092D,
;   0X0967,0X09A1,0X09D9,0X0A11,0X0A48,0X0A7F,0X0AB4,0X0AE9,0X0B1D,
;   0X0B50,0X0B82,0X0BB3,0X0BE3,0X0C13,0X0C41,0X0C6F,0X0C9B,0X0CC7,
;   0X0CF1,0X0D1B,0X0D43,0X0D6B,0X0D91,0X0DB6,0X0DDB,0X0DFE,0X0E20,
;   0X0E41,0X0E61,0X0E80,0X0E9D,0X0EBA,0X0ED5,0X0EEF,0X0F08,0X0F20,
;   0X0F37,0X0F4D,0X0F61,0X0F74,0X0F86,0X0F97,0X0FA6,0X0FB4,0X0FC1,
;   0X0FCD,0X0FD8,0X0FE1,0X0FE9,0X0FF0,0X0FF6,0X0FFA,0X0FFD,0X0FFF,
;   0X1000,0X0FFF,0X0FFD,0X0FFA,0X0FF6,0X0FF0,0X0FE9,0X0FE1,0X0FD8,
;   0X0FCD,0X0FC1,0X0FB4,0X0FA6,0X0F97,0X0F86,0X0F74,0X0F61,0X0F4D,
;   0X0F37,0X0F20,0X0F08,0X0EEF,0X0ED5,0X0EBA,0X0E9D,0X0E80,0X0E61,
;   0X0E41,0X0E20,0X0DFE,0X0DDB,0X0DB6,0X0D91,0X0D6B,0X0D43,0X0D1B,
;   0X0CF1,0X0CC7,0X0C9B,0X0C6F,0X0C41,0X0C13,0X0BE3,0X0BB3,0X0B82,
;   0X0B50,0X0B1D,0X0AE9,0X0AB4,0X0A7F,0X0A48,0X0A11,0X09D9,0X09A1,
;   0X0967,0X092D,0X08F2,0X08B6,0X087A,0X083D,0X0800,0X07C1,0X0782,
;   0X0743,0X0703,0X06C3,0X0681,0X0640,0X05FE,0X05BB,0X0578,0X0535,
;   0X04F1,0X04AD,0X0469,0X0424,0X03DE,0X0399,0X0353,0X030D,0X02C7,