GPS卫星保护装置对时103协议转换程序.docx
- 文档编号:23059591
- 上传时间:2023-04-30
- 格式:DOCX
- 页数:25
- 大小:21.89KB
GPS卫星保护装置对时103协议转换程序.docx
《GPS卫星保护装置对时103协议转换程序.docx》由会员分享,可在线阅读,更多相关《GPS卫星保护装置对时103协议转换程序.docx(25页珍藏版)》请在冰豆网上搜索。
GPS卫星保护装置对时103协议转换程序
GPS卫星保护装置对时103协议转换程序
;GPS卫星保护装置对时协议转换程序,本程序由<高山流水>于2006年
;6月29日0点35分成功完成。
此版本历时两天
org
JMP
00h
MAIN
MAIN:
MOV
P1,#0FFH
CLR
P1.7
;系统运行指示灯
MOV
TMOD,#20H
;定时器1,形式2
MOV
SCON,#50H
;串口方式1,允许接收
MOV
87H,#00H
;PCON设置(将SMO置0,使波特
率不加倍)
SETB
TR1
;启动计时
;11.0592MHZ4800bate/s0FAH;9600bate/s0FDH;300bate/s0A0H.
GPSHD
EQU
50H
;时十位
GPSLD
EQU
51H
;时个位
GPSHM1
EQU
52H
;分十位
GPSLM1
EQU
53H
;分个位
GPSHY
EQU
54H
;秒十位
GPSLY
EQU
55H
;秒个位
GPSHH
EQU
56H
;日十位
GPSLH
EQU
57H
;日个位
GPSHM2
EQU
58H
;月十位
GPSLM2
EQU
59H
;月个位
GPSHS
EQU
5AH
;年十位
GPSLS
EQU
5BH
J
GPSDD1
EQU
5CH
GPSDD2
EQU
5DH
GPSMM1
EQU
5EH
GPSMM2
EQU
5FH
GPS2E1
EQU
60H
GPSMM3
EQU
61H
GPSMM4
EQU
62H
GPSMM5
EQU
63H
GPSMM6
EQU
64H
GPSLA
EQU
65H
GPSDD3
EQU
66H
GPSDD4
EQU
67H
GPSDD5
EQU
68H
GPSMM7
EQU
69H
GPSMM8
EQU
6AH
GPS2E2
EQU
6BH
GPSMM9
EQU
6CH
GPSMM10
EQU
6DH
GPSMM11
EQU
6EH
GPSMM12
EQU
6FH
GPSLO
EQU
70H
GPSII
EQU
71H
GPSDD6
EQU
72H
年个位
校验
异或校验和)
;发送校验帧地址缓存
X1EQU73H
;秒低
X2
EQU
74H
;秒高
3
秒高,秒低为03e8为一秒
X3
EQU
75H
;分
X4
EQU
76H
;时
X5
EQU
77H
;日
X6
EQU
78H
;月
X7
EQU
79H
;年
XCS
EQU
7AH
;校验
(算术累加和)
x12
EQU
7BH
;秒临时
J
J
接收数据
J
AA:
CLR
P1.3
;喂狗低
SETB
P1.3
;喂狗高
J
CALL
JS
;接收数据
CALL
XRLL
;校验
BB:
J
CJNE
A,GPSDD6,AA
;校验成功就继续
S1:
;103校时发送程序
CALL
GES
;报文发送固定头部分
J
MOV
A,GPSHY
;秒十位十六进制转换为十进制
ANL
A,#0FH
CJNE
A,#00H,S1
MOV
A,#00D
;十进制数用"D"标示
JMP
SWA
CJNE
A,#01H,S2
MOV
A,#10D
JMP
SWA
S2:
CJNE
A,#02H,S3
MOV
A,#20D
JMP
SWA
S3:
CJNE
A,#03H,S4
MOV
A,#30D
JMP
SWA
S4:
CJNE
A,#04H,S5
MOV
A,#40D
JMP
SWA
S5:
MOV
A,#50D
SWA:
MOV
R7,A
J
MOV
A,GPSLY
;秒个位十六进制转换为十进制
ANL
A,#0FH
CJNE
A,#00H,SS1
MOV
A,#00D
JMP
SW
SS1:
CJNE
A,#01H,SS2
MOV
A,#01D
JMP
SW
SS2:
CJNE
A,#02H,SS3
MOV
A,#02D
JMP
SW
SS3:
CJNE
A,#03H,SS4
MOV
A,#03D
JMP
SW
SS4:
CJNE
A,#04H,SS5
MOV
A,#04D
JMP
SW
SS5:
CJNE
A,#05H,SS6
MOV
A,#05D
JMP
SW
SS6:
CJNE
A,#06H,SS7
MOV
A,#06D
JMP
SW
SS7:
CJNE
A,#07H,SS8
MOV
A,#07D
JMP
SW
SS8:
CJNE
A,#08H,SS9
MOV
A,#08D
JMP
SW
SS9:
MOV
A,#09D
SW:
ADD
A,R7
MOVB,#16D
DIVAB
SWAPA
ADD
A,B
MOV
X12,A
CALL
S
J
MOV
A,X1
ADD
A,#9H
MOV
X1,A
MOV
SBUF,A
JNB
TI,$
CLR
TI
;调用s->ms转换
;秒低发送
;秒校正+9ms
MOV
A,X2
;秒高发送
MOV
SBUF,A
JNB
TI,$
CLR
TI
J
========;(分)
MOV
A,GPSHM1
;分十位
ANL
A,#0FH
SWAP
A
MOV
R7,A
MOV
A,GPSLM1
;分个位
ANL
A,#0FH
ADD
A,R7
MOV
X3,A
MOV
SBUF,A
JNB
TI,$
CLR
TI
■/口汁\
J
MOV
========;(时)
A,GPSHD
;时十位
ANL
A,#0FH
SWAP
A
MOV
R7,A
MOV
A,GPSLD
;时个位
ANL
A,#0FH
ADD
A,R7
MOV
X4,A
MOV
SBUF,A
JNB
TI,$
CLR
TI
J
========;(日)
MOV
A,GPSHH
;日十位
ANL
A,#0FH
SWAP
A
MOV
R7,A
MOV
A,GPSLH
;日个位
ANL
A,#0FH
ADD
A,R7
MOV
X5,A
MOV
SBUF,A
JNB
TI,$
CLR
TI
J
========;(月)
MOV
A,GPSHM2
;月十位
ANL
A,#0FH
SWAP
A
MOV
R7,A
MOV
A,GPSLM2
;月个位
ANL
A,#0FH
ADD
A,R7
MOV
X6,A
MOV
SBUF,A
JNB
TI,$
CLR
TI
J
========;(年)
MOV
A,GPSHS
;年十位
ANL
A,#0FH
SWAP
A
MOV
R7,A
MOV
A,GPSLS
;年个位
ANL
A,#0FH
ADD
A,R7
MOV
X7,A
MOV
SBUF,A
JNB
TI,$
CLR
TI
==============;校验码
MOV
A,#44H
ADD
A,#0FFH
ADD
A,#06H
ADD
A,#081H
ADD
A,#08H
ADD
A,#0FFH
ADD
A,#0FFH
ADD
A,X1
ADD
A,X2
ADD
A,X3
ADD
A,X4
ADD
A,X5
ADD
A,X6
ADD
A,X7
MOV
SBUF,A
JNB
TI,$
CLR
TI
==============;发结束码
MOV
A,#16H
MOV
SBUF,A
JNB
TI,$
CLR
TI
J
MOV
A,P1
分钟否
ANL
A,#04H
CJNE
A,#04H,ENDD
CALLTIME;发送延时10分钟
ENDD:
JMPAA
;下面为各子程序段
;接收数据
;eb9030393234323933303036303632393032
;2e393339394e31303833332e38393939454176ff
J
JS:
MOV
TH1,#0FAH
;定时器1计数初值,初始化波特
率,4800bete/s
MOV
TL1,#0FAH
;定时器1计数初值,初始化
波特率,4800bete/s
J
MOV
A,SBUF
JNB
RI,$
CLR
RI
CJNE
A,#0EBH,JS
;判断有无有效数据
MOV
A,SBUF
JNB
RI,$
CLR
RI
CJNE
A,#090H,JS
;判断有无有效数据
J
J
===;HD
时十位
MOV
A,SBUF
JNBRI,$
CLRRI
MOVGPSHD,A
;========;LD
MOVA,SBUF
JNBRI,$
CLRRI
MOVGPSLD,A
;========;HM
MOVA,SBUF
JNBRI,$
CLRRI
MOVGPSHM1,A
;========;LM
MOVA,SBUF
JNBRI,$
CLRRI
MOVGPSLM1,A
;========;HY
MOVA,SBUF
JNBRI,$
CLRRI
MOVGPSHY,A
;========LY
MOVA,SBUF
JNBRI,$
CLRRI
MOVGPSLY,A
;========;HH
MOVA,SBUF
时个位
分十位
分个位
秒十位
秒个位
日十位
JNB
RI,$
CLR
RI
MOV
GPSHH,A
J
==;LH
日个位
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSLH,A
J
==;HM2
月十位
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSHM2,A
J
==;LM2
月个位
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSLM2,A
J
==;HS
年十位
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSHS,A
J
==;LS
年个位
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSLS,A
===================================;后面经度伟度等数据
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSDD1,A
J
==;DD2
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSDD2,A
J
==;MM1
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM1,A
J
==;MM2
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM2,A
J
==;2E1
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPS2E1,A
J
==;MM3
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM3,A
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM4,A
J
==;MM5
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM5,A
J
==;MM6
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM6,A
J
==;LA
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSLA,A
J
==;DD3
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSDD3,A
J
==;DD4
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSDD4,A
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSDD5,A
J
==;MM7
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM7,A
J
==;MM8
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM8,A
J
==;2E2
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPS2E2,A
J
==;MM9
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM9,A
J
==;MM10
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM10,A
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM11,A
J
==;MM12
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSMM12,A
J
==;LO
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSLO,A
-II
J
MOV
==;II
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSII,A
J
==;DD6校验位
MOV
A,SBUF
JNB
RI,$
CLR
RI
MOV
GPSDD6,A
RET
;延时程序
time:
MOVR2,#03CH
此数1有10秒(设定10分钟)
D:
MOV
R3,#0f0H
延时程序,修改此行改变10秒基
准时间
D1:
MOV
R4,#0ffH
;修改此行改变时间,其它行不用改
D2:
MOV
R5,#248H
J
CLR
P1.3
;喂狗低
SETB
P1.3
;喂狗高
J
DJNZ
R5,$
J
CLR
P1.3
;喂狗低
SETB
P1.3
;喂狗高
J
DJNZ
R4,D2
J
CLR
P1.3
;喂狗低
SETB
P1.3
;喂狗高
J
DJNZ
R3,D1
J
CLR
P1.3
;喂狗低
SETB
P1.3
;喂狗高
J
DJNZ
R2,D
J
CLR
P1.3
;喂狗低
SETB
P1.3
;喂狗高
J
RET
;异或校验和
XRL
A,GPSLD
;3
XRL
A,GPSHM1
;4
XRL
A,GPSLM1
;5
XRL
A,GPSHY
;6
XRL
A,GPSLY
;7
XRL
A,GPSHH
;8
XRL
A,GPSLH
;9
XRL
A,GPSHM2
;10
XRL
A,GPSLM2
;11
XRL
A,GPSHS
;12
XRL
A,GPSLS
;13
XRL
A,GPSDD1
;14
XRL
A,GPSDD2
;15
XRL
A,GPSMM1
;16
XRL
A,GPSMM2
;17
XRL
A,GPS2E1
;18
XRL
A,GPSMM3
;19
XRL
A,GPSMM4
;20
XRL
A,GPSMM5
;21
XRL
A,GPSMM6
;22
XRL
A,GPSLA
;23
XRL
A,GPSDD3
;24
XRL
A,GPSDD4
;25
XRL
A,GPSDD5
;26
XRL
A,GPSMM7
;27
XRL
A,GPSMM8
;28
XRL
A,GPS2E2
;29
XRL
A,GPSMM9
;30
A,GPSHD
;2
XRL
A,GPSMM10
;31
XRL
A,GPSMM11
;32
XRL
A,GPSMM12
;33
XRL
A,GPSLO
;34
XRL
A,GPSII
;35
RET
;680f0f6844ff068108ffff00f103380930060641161s
;06年6月30日9点38分1秒+9毫秒
;103校时报文前面固定帧部分(广播方式)
GES:
率,9600bete/s
波特率,9600bete/s
MOVTH1,#0FDH
定时器1计数初值,初始化波特
MOV
TL1,#0FDH
MOV
A,#68H
MOV
SBUF,A
JNB
TI,$
CLR
TI
MOV
A,#0FH
MOV
SBUF,A
JNB
TI,$
CLR
TI
MOV
A,#0FH
MOV
SBUF,A
JNB
TI,$
CLR
TI
MOV
A,#68H
MOV
SBUF,A
JNB
TI,$
定时器1计数初值,初始化
CLR
TI
MOV
A,#44H
MOV
SBUF,A
JNB
TI,$
CLR
TI
MOV
A,#0FFH
MOV
SBUF,A
JNB
TI,$
CLR
TI
MOV
A,#06H
MOV
SBUF,A
JNB
TI,$
CLR
TI
MOV
A,#81H
MOV
SBUF,A
JNB
TI,$
CLR
TI
MOV
A,#08H
MOV
SBUF,A
JNB
TI,$
CLR
TI
MOV
A,#0FFH
MOV
SBUF,A
JNB
TI,$
CLR
TI
MOV
A,#0FFH
MOV
SBUF,A
JNB
TI,$
CLR
TI
MOV
A,#00H
MOV
JNB
CLR
RET
SBUF,A
TI,$
TI
J
;秒->毫秒转换程序
J
S:
MOV
A,#03H
MOV
B,X12
MUL
AB
MOV
R1,A
MOV
A,X12
MOV
B,#0E8H
MUL
AB
MOV
X1,A
MOV
A,B
ADD
A,R1
MOV
X2,A
RET
J
;发送报文校验(算术和)
J
CS:
MOV
A,#44H
ADD
A,#0FFH
ADD
A,#0FFH
ADD
A,X1
ADD
A,X2
ADD
A,X3
ADD
A,X4
ADD
A,X5
ADD
A,X6
ADD
RET
A,X7
END
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- GPS 卫星 保护装置 103 协议 转换 程序