main.p1

一個使用PIC16F877解GPS訊號的範例

[v _IntJDValue `uc -> 2 `i e ]
[v _FloatJDValue `uc -> 3 `i e ]
"19
[v _IntWDValue `uc 1 e ]
"20
[v _FloatWDValue `uc -> 3 `i e ]
"25
[v _GpsSeg_count `uc 1 e ]
"27
[v _GpsByte_count `uc 1 e ]
"28
[v _GpsCmd_number `uc 1 e ]
"29
[v _GpsCmd_mode `uc 1 e ]
"30
[v _GpsBuf_full `uc 1 e ]
"31
[v _GpsCmd `uc -> 5 `i e ]
"6 D:\Program Files\HI-TECH Software\PICC\STD\9.60\include\conio.h
[v _ptrdiff_t `i 1 t ]
"7
[v _size_t `ui 1 t ]
"8
[v _wchar_t `us 1 t ]
"29 D:\Program Files\HI-TECH Software\PICC\STD\9.60\include\stdarg.h
[v _va_list `*v -> -> 1 `i `ux t ]
"61 D:\Program Files\HI-TECH Software\PICC\STD\9.60\include\stdio.h
[v F567 `(v 1 tf1`uc ]
"62
[s S6 `*uc 1 `*F567 1 ]
[n S6 __prbuf ptr func ]
"17 C:\NOW_WORK\GOLF_CAR\program\Remoter\serial.c
[v _serial_setup `(v 1 ef ]
{
[e :U _serial_setup ]
[f ]
[; ;serial.c: 16: void serial_setup(void)
[; ;serial.c: 17: {
[; ;serial.c: 55: SPBRG=((8000000/(16UL * 9600) -1));
"55
[e = _SPBRG -> - / -> -> 8000000 `l `ul * -> 16 `ul -> -> -> 9600 `i `l `ul -> -> -> 1 `i `l `ul `uc ]
[; ;serial.c: 56: BRGH=1;
"56
[e = _BRGH -> -> 1 `i `b ]
[; ;serial.c: 57: SYNC=0;
"57
[e = _SYNC -> -> 0 `i `b ]
[; ;serial.c: 58: SPEN=1;
"58
[e = _SPEN -> -> 1 `i `b ]
[; ;serial.c: 59: CREN=1;
"59
[e = _CREN -> -> 1 `i `b ]
[; ;serial.c: 60: SREN=0;
"60
[e = _SREN -> -> 0 `i `b ]
[; ;serial.c: 61: TXIE=0;
"61
[e = _TXIE -> -> 0 `i `b ]
[; ;serial.c: 62: RCIE=0;
"62
[e = _RCIE -> -> 0 `i `b ]
[; ;serial.c: 63: TX9=0;
"63
[e = _TX9 -> -> 0 `i `b ]
[; ;serial.c: 64: RX9=0;
"64
[e = _RX9 -> -> 0 `i `b ]
[; ;serial.c: 65: TXEN=0;
"65
[e = _TXEN -> -> 0 `i `b ]
"67
[; ;serial.c: 67: }
[e :UE 7 ]
}
"68
[v _dummy `uc 1 e ]
"105
[v _putHex `(v 1 ef1`uc ]
{
[v _c `uc 1 r1 ]
[e :U _putHex ]
[f ]
[; ;serial.c: 104: void putHex(unsigned char c)
[; ;serial.c: 105: {
[; ;serial.c: 106: while(!TXIF)
"106
[e $U 9 ]
[e :U 10 ]
[; ;serial.c: 107: {
[; ;serial.c: 108: if (OERR) { TXEN=0; TXEN=1; CREN=0; CREN=1; } if (FERR) { dummy=RCREG; TXEN=0; TXEN=1; };
"108
[e $ ! _OERR 12 ]
[e = _TXEN -> -> 0 `i `b ]
[e = _TXEN -> -> 1 `i `b ]
[e = _CREN -> -> 0 `i `b ]
[e = _CREN -> -> 1 `i `b ]
[e :U 12 ]
[e $ ! _FERR 13 ]
[e = _dummy _RCREG ]
[e = _TXEN -> -> 0 `i `b ]
[e = _TXEN -> -> 1 `i `b ]
[e :U 13 ]
[; ;serial.c: 109: asm("clrwdt");
"109
[; clrwdt ;#
"110
[e :U 9 ]
"106
[e $ ! _TXIF 10 ]
[e :U 11 ]
[; ;serial.c: 110: }
[; ;serial.c: 111: TXREG=(HexToAsc_Table[(c/0x10)]);
"111
[v _HexToAsc_Table `Cuc -> 0 `x e ]
[e = _TXREG *U + &U _HexToAsc_Table * -> -> / -> _c `i -> 16 `i `ui `ux -> -> # `Cuc `ui `ux ]
[; ;serial.c: 112: while(!TXIF)
"112
[e $U 14 ]
[e :U 15 ]
[; ;serial.c: 113: {
[; ;serial.c: 114: if (OERR) { TXEN=0; TXEN=1; CREN=0; CREN=1; } if (FERR) { dummy=RCREG; TXEN=0; TXEN=1; };
"114
[e $ ! _OERR 17 ]
[e = _TXEN -> -> 0 `i `b ]
[e = _TXEN -> -> 1 `i `b ]
[e = _CREN -> -> 0 `i `b ]
[e = _CREN -> -> 1 `i `b ]
[e :U 17 ]
[e $ ! _FERR 18 ]
[e = _dummy _RCREG ]
[e = _TXEN -> -> 0 `i `b ]
[e = _TXEN -> -> 1 `i `b ]
[e :U 18 ]
[; ;serial.c: 115: asm("clrwdt");
"115
[; clrwdt ;#
"116
[e :U 14 ]
"112
[e $ ! _TXIF 15 ]
[e :U 16 ]
[; ;serial.c: 116: }
[; ;serial.c: 117: TXREG=(HexToAsc_Table[(c&0xf)]);
"117
[e = _TXREG *U + &U _HexToAsc_Table * -> -> & -> _c `i -> 15 `i `ui `ux -> -> # `Cuc `ui `ux ]
"120
[; ;serial.c: 120: }
[e :UE 8 ]
}
"122
[v _putch `(v 1 ef1`uc ]
{
[v _c `uc 1 r1 ]
[e :U _putch ]
[f ]
[; ;serial.c: 121: void putch(unsigned char c)
[; ;serial.c: 122: {
[; ;serial.c: 123: while(!TXIF)
"123
[e $U 20 ]
[e :U 21 ]
[; ;serial.c: 124: {
[; ;serial.c: 125: if (OERR) { TXEN=0; TXEN=1; CREN=0; CREN=1; } if (FERR) { dummy=RCREG; TXEN=0; TXEN=1; };
"125
[e $ ! _OERR 23 ]
[e = _TXEN -> -> 0 `i `b ]
[e = _TXEN -> -> 1 `i `b ]
[e = _CREN -> -> 0 `i `b ]
[e = _CREN -> -> 1 `i `b ]
[e :U 23 ]
[e $ ! _FERR 24 ]
[e = _dummy _RCREG ]
[e = _TXEN -> -> 0 `i `b ]
[e = _TXEN -> -> 1 `i `b ]
[e :U 24 ]
[; ;serial.c: 126: asm("clrwdt");
"126
[; clrwdt ;#
"127
[e :U 20 ]
"123
[e $ ! _TXIF 21 ]
[e :U 22 ]
[; ;serial.c: 127: }
[; ;serial.c: 128: TXREG=c;
"128
[e = _TXREG _c ]
[; ;serial.c: 129: { delayus_variable=(unsigned char)(10/2); asm("nop"); } asm("decfsz _delayus_variable,f"); asm("goto $ - 2");;
"129
[e = _delayus_variable -> / -> 10 `i -> 2 `i `uc ]
[; nop ;#
[; decfsz _delayus_variable,f ;#
[; goto $ - 2 ;#
"130
[; ;serial.c: 130: }
[e :UE 19 ]
}
"134
[v _putbuf `(v 1 ef2`uc`*uc ]
{
[v _cnt `uc 1 r1 ]
[v _p `*uc 1 r2 ]
[e :U _putbuf ]
[f ]
[; ;serial.c: 133: void putbuf(unsigned char cnt,unsigned char *p)
[; ;serial.c: 134: {
"135
[v _i `uc 1 a ]
[v _c `uc 1 a ]
[; ;serial.c: 135: unsigned char i,c;
[; ;serial.c: 136: for(i=0;i<cnt;i++)
"136
[e = _i -> -> 0 `i `uc ]
[e $U 29 ]
"137
[e :U 26 ]
[; ;serial.c: 137: {
[; ;serial.c: 138: c=*p;
"138
[e = _c *U _p ]
[; ;serial.c: 140: p++;
"140
[e ++ _p * -> -> 1 `i `x -> -> # `uc `i `x ]
"136
[e ++ _i -> -> 1 `i `uc ]
[e :U 29 ]
[e $ < -> _i `i -> _cnt `i 26 ]
[e :U 27 ]
"142
[; ;serial.c: 141: }
[; ;serial.c: 142: }
[e :UE 25 ]
}
"145
[v _putst `(v 1 ef1`*Cuc ]
{
[v _str `*Cuc 1 R1 ]
[e :U _putst ]
[f ]
[; ;serial.c: 144: void putst(register const char *str)
[; ;serial.c: 145: {
[; ;serial.c: 146: while((*str)!=0)
"146
[e $U 31 ]
[e :U 32 ]
[; ;serial.c: 147: {
[; ;serial.c: 148: putch(*str);
"148
[e ( _putch (1 *U _str ]
[; ;serial.c: 149: if (*str==13) putch(10);
"149
[e $ ! == -> *U _str `i -> 13 `i 34 ]
[e ( _putch (1 -> -> 10 `i `uc ]
[e :U 34 ]
[; ;serial.c: 150: if (*str==10) putch(13);
"150
[e $ ! == -> *U _str `i -> 10 `i 35 ]
[e ( _putch (1 -> -> 13 `i `uc ]
[e :U 35 ]
[; ;serial.c: 151: str++;
"151
[e ++ _str * -> -> 1 `i `x -> -> # `Cuc `i `x ]
"152
[e :U 31 ]
"146
[e $ != -> *U _str `i -> 0 `i 32 ]
[e :U 33 ]
"153
[; ;serial.c: 152: }
[; ;serial.c: 153: }
[e :UE 30 ]
}
"156
[v _SendToPc `(v 1 ef ]
{
[e :U _SendToPc ]
[f ]
[; ;serial.c: 155: void SendToPc(void)
[; ;serial.c: 156: {
[; ;serial.c: 157: putch('$');
"157
[e ( _putch (1 -> -> 36 `ui `uc ]
[; ;serial.c: 158: putHex(GpsLock);
"158
[e ( _putHex (1 _GpsLock ]
[; ;serial.c: 159: putch(',');
"159
[e ( _putch (1 -> -> 44 `ui `uc ]
[; ;serial.c: 160: putHex(IntJDValue[0]);
"160
[e ( _putHex (1 *U + &U _IntJDValue * -> -> -> 0 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 161: putHex(IntJDValue[1]);
"161
[e ( _putHex (1 *U + &U _IntJDValue * -> -> -> 1 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 162: putch('.');
"162
[e ( _putch (1 -> -> 46 `ui `uc ]
[; ;serial.c: 163: putHex(FloatJDValue[0]);
"163
[e ( _putHex (1 *U + &U _FloatJDValue * -> -> -> 0 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 164: putHex(FloatJDValue[1]);
"164
[e ( _putHex (1 *U + &U _FloatJDValue * -> -> -> 1 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 165: putHex(FloatJDValue[2]);
"165
[e ( _putHex (1 *U + &U _FloatJDValue * -> -> -> 2 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 166: putch(',');
"166
[e ( _putch (1 -> -> 44 `ui `uc ]
[; ;serial.c: 167: putch(GpsJD_a);
"167
[e ( _putch (1 _GpsJD_a ]
[; ;serial.c: 169: putch(',');
"169
[e ( _putch (1 -> -> 44 `ui `uc ]
[; ;serial.c: 170: putHex(IntWDValue);
"170
[e ( _putHex (1 _IntWDValue ]
[; ;serial.c: 171: putch('.');
"171
[e ( _putch (1 -> -> 46 `ui `uc ]
[; ;serial.c: 172: putHex(FloatWDValue[0]);
"172
[e ( _putHex (1 *U + &U _FloatWDValue * -> -> -> 0 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 173: putHex(FloatWDValue[1]);
"173
[e ( _putHex (1 *U + &U _FloatWDValue * -> -> -> 1 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 174: putHex(FloatWDValue[2]);
"174
[e ( _putHex (1 *U + &U _FloatWDValue * -> -> -> 2 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 175: putch(',');
"175
[e ( _putch (1 -> -> 44 `ui `uc ]
[; ;serial.c: 176: putch(GpsWD_a);
"176
[e ( _putch (1 _GpsWD_a ]
[; ;serial.c: 178: putch(',');
"178
[e ( _putch (1 -> -> 44 `ui `uc ]
[; ;serial.c: 179: putHex(KeyStatus);
"179
[e ( _putHex (1 _KeyStatus ]
[; ;serial.c: 180: putch(',');
"180
[e ( _putch (1 -> -> 44 `ui `uc ]
[; ;serial.c: 181: putHex(SpeedSet);
"181
[e ( _putHex (1 _SpeedSet ]
[; ;serial.c: 182: putch(',');
"182
[e ( _putch (1 -> -> 44 `ui `uc ]
[; ;serial.c: 183: putch(UTCtime[0]);
"183
[e ( _putch (1 *U + &U _UTCtime * -> -> -> 0 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 184: putch(UTCtime[1]);
"184
[e ( _putch (1 *U + &U _UTCtime * -> -> -> 1 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 185: putch(UTCtime[2]);
"185
[e ( _putch (1 *U + &U _UTCtime * -> -> -> 2 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 186: putch(UTCtime[3]);
"186
[e ( _putch (1 *U + &U _UTCtime * -> -> -> 3 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 187: putch(UTCtime[4]);
"187
[e ( _putch (1 *U + &U _UTCtime * -> -> -> 4 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 188: putch(UTCtime[5]);
"188
[e ( _putch (1 *U + &U _UTCtime * -> -> -> 5 `i `ui `ux -> -> # `uc `ui `ux ]
[; ;serial.c: 189: putch('*');
"189
[e ( _putch (1 -> -> 42 `ui `uc ]
"190
[; ;serial.c: 190: }
[e :UE 36 ]
}
"22 C:\NOW_WORK\GOLF_CAR\program\Remoter\delay.c
[v _DelayBigUs `(v 1 ef1`ui ]
{
[v _cnt `ui 1 r1 ]
[e :U _DelayBigUs ]
[f ]
[; ;delay.c: 21: void DelayBigUs(unsigned int cnt)
[; ;delay.c: 22: {
"23
[v _i `uc 1 a ]
[; ;delay.c: 23: unsigned char i;
[; ;delay.c: 25: i = (unsigned char)(cnt>>8);
"25
[e = _i -> >> _cnt -> 8 `i `uc ]
[; ;delay.c: 26: while(i>=1)
"26
[e $U 38 ]
[e :U 39 ]
[; ;delay.c: 27: {
[; ;delay.c: 28: i--;
"28
[e -- _i -> -> 1 `i `uc ]
[; ;delay.c: 29: { delayus_variable=(unsigned char)(253/2); asm("nop"); } asm("decfsz _delayus_variable,f"); asm("goto $ - 2");;
"29
[e = _delayus_variable -> / -> 253 `i -> 2 `i `uc ]
[; nop ;#
[; decfsz _delayus_variable,f ;#
[; goto $ - 2 ;#
[; ;delay.c: 30: asm("clrwdt");
"30
[; clrwdt ;#
"31
[e :U 38 ]
"26
[e $ >= -> _i `i -> 1 `i 39 ]
[e :U 40 ]
[; ;delay.c: 31: }
[; ;delay.c: 32: { delayus_variable=(unsigned char)((unsigned char)(cnt & 0xFF)/2); asm("nop"); } asm("decfsz _delayus_variable,f"); asm("goto $ - 2");;
"32
[e = _delayus_variable -> / -> -> & _cnt -> -> 255 `i `ui `uc `i -> 2 `i `uc ]
[; nop ;#
[; decfsz _delayus_variable,f ;#
[; goto $ - 2 ;#
"33
[; ;delay.c: 33: }
[e :UE 37 ]
}
"37
[v _DelayMs `(v 1 ef1`uc ]
{
[v _cnt `uc 1 r1 ]
[e :U _DelayMs ]
[f ]
[; ;delay.c: 36: void DelayMs(unsigned char cnt)
[; ;delay.c: 37: {
"38
[v _i `uc 1 a ]
[; ;delay.c: 38: unsigned char i;
[; ;delay.c: 39: do {
"39
[e :U 44 ]
[; ;delay.c: 40: i = 4;
"40
[e = _i -> -> 4 `i `uc ]
[; ;delay.c: 41: do {
"41
[e :U 47 ]
[; ;delay.c: 42: { delayus_variable=(unsigned char)(250/2); asm("nop"); } asm("decfsz _delayus_variable,f"); asm("goto $ - 2");;
"42
[e = _delayus_variable -> / -> 250 `i -> 2 `i `uc ]
[; nop ;#
[; decfsz _delayus_variable,f ;#
[; goto $ - 2 ;#
[; ;delay.c: 43: asm("clrwdt");
"43
[; clrwdt ;#
"44
[; ;delay.c: 44: } while(--i);
[e $ != -> =- _i -> -> 1 `i `uc `i -> -> -> 0 `i `uc `i 47 ]
[e :U 46 ]
"45
[; ;delay.c: 45: } while(--cnt);
[e $ != -> =- _cnt -> -> 1 `i `uc `i -> -> -> 0 `i `uc `i 44 ]
[e :U 43 ]
"46
[; ;delay.c: 46: }
[e :UE 41 ]
}
"62
[v _DelayBigMs `(v 1 ef1`ui ]
{
[v _cnt `ui 1 r1 ]
[e :U _DelayBigMs ]
[f ]
[; ;delay.c: 61: void DelayBigMs(unsigned int cnt)
[; ;delay.c: 62: {
"63
[v _i `uc 1 a ]
[; ;delay.c: 63: unsigned char i;
[; ;delay.c: 64: do {
"64
[e :U 51 ]
[; ;delay.c: 65: i = 4;
"65
[e = _i -> -> 4 `i `uc ]
[; ;delay.c: 66: do {
"66
[e :U 54 ]
[; ;delay.c: 67: { delayus_variable=(unsigned char)(250/2); asm("nop"); } asm("decfsz _delayus_variable,f"); asm("goto $ - 2");;
"67
[e = _delayus_variable -> / -> 250 `i -> 2 `i `uc ]
[; nop ;#
[; decfsz _delayus_variable,f ;#
[; goto $ - 2 ;#
[; ;delay.c: 68: asm("clrwdt");
"68
[; clrwdt ;#
"69
[; ;delay.c: 69: } while(--i);
[e $ != -> =- _i -> -> 1 `i `uc `i -> -> -> 0 `i `uc `i 54 ]
[e :U 53 ]
"70
[; ;delay.c: 70: } while(--cnt);
[e $ != =- _cnt -> -> 1 `i `ui -> -> 0 `i `ui 51 ]
[e :U 50 ]
"71
[; ;delay.c: 71: }
[e :UE 48 ]
}
"22 C:\NOW_WORK\GOLF_CAR\program\Remoter\TRW24G.c
[v _RF_SET `VXuc -> 12 `i s ]
"27
[v _TRW_24G_Table `Cuc -> 0 `x e ]
[i _TRW_24G_Table
:U ..
"28
-> -> 142 `i `uc
-> -> 8 `i `uc
-> -> 28 `i `uc
"29
-> -> 200 `i `uc
-> -> 200 `i `uc
"30
-> -> 192 `i `uc
-> -> 170 `i `uc
-> -> 85 `i `uc
-> -> 170 `i `uc
-> -> 85 `i `uc
"31
-> -> 170 `i `uc
-> -> 85 `i `uc
-> -> 170 `i `uc
-> -> 85 `i `uc
-> -> 170 `i `uc
"32
-> -> 163 `i `uc
"33
-> -> 79 `i `uc
"34
-> -> 21 `i `uc
..
]"44
[v _TRW24G_init `(v 1 ef ]
{
[e :U _TRW24G_init ]
[f ]
[; ;TRW24G.c: 43: void TRW24G_init(void)
[; ;TRW24G.c: 44: {
"45
[v _p `*Cuc 1 a ]
"46
[v _i `uc 1 a ]
[; ;TRW24G.c: 45: const unsigned char *p;
[; ;TRW24G.c: 46: unsigned char i;
[; ;TRW24G.c: 47: p=&TRW_24G_Table;
"47
[e = _p &U _TRW_24G_Table ]
[; ;TRW24G.c: 48: TRISC=0xA0;
"48
[e = _TRISC -> -> 160 `i `uc ]
[; ;TRW24G.c: 49: RC1 = 0;
"49
[e = _RC1 -> -> 0 `i `b ]
[; ;TRW24G.c: 50: RC0 = 0;