📄 slq02.asm
字号:
BTFSC STATUS,Z
GOTO K503
MOVLW .3
SUBWF GH, .0
BTFSC STATUS,Z
GOTO K505
MOVLW .4
SUBWF GH, .0
BTFSC STATUS,Z
GOTO K507
K502 RETURN
K501 MOVF TB, .0
MOVWF ZTA
BCF ZTB, .0
CALL KN00
MOVLW .1
MOVWF TS
DECF TB, .1
MOVF TB, .1
BTFSS STATUS,Z
GOTO K502
CLRF TS
MOVLW .24
MOVWF TB
MOVLW .24
MOVWF ZTA
CALL KM00
GOTO K502
K503 MOVF HS, .0
MOVWF ZTA
BCF ZTB, .0
CALL KN00
DECFSZ HS, .1
GOTO K504
MOVLW .10
MOVWF HS
K504 MOVF HS, .0
MOVWF ZTA
BSF ZTB, .0
CALL KN00
GOTO K502
K505 DECFSZ TG, .1
GOTO K506
MOVLW .24
MOVWF TG
K506 MOVF TG, .0
MOVWF ZTA
CALL KM00
GOTO K502
K507 MOVF SG, .0
ADDWF PCL, .1
GOTO K508
GOTO K510
GOTO K511
K508 DECF RE, .1
INCFSZ RE, .0
GOTO K509
MOVLW .24
MOVWF RE
GOTO K509
K510 DECF YE, .1
INCFSZ RE, .0
GOTO K509
MOVLW .24
MOVWF YE
GOTO K509
K511 DECF BL, .1
INCFSZ BL, .0
GOTO K509
MOVLW .24
MOVWF BL
K509 CALL KL00
GOTO K502
H100 INCF ZTE, .1
MOVF ZTE, .0
SUBWF ZTD, .0
BTFSS STATUS,Z
H101 RETURN
CLRF ZTE
INCF ZTC, .1
MOVLW .49
SUBWF ZTC, .0
BTFSS STATUS,Z
GOTO H102
CLRF ZTC
H102 CLRF HHA
CLRF HHD
CLRF HHE
CLRF HHF
CLRF HHG
CLRF HHH
MOVLW .1
MOVWF HHI
MOVLW L1
MOVWF FSR
H103 INCF HHA, .1
MOVLW .4
SUBWF HHA, .0
BTFSS STATUS,Z
GOTO H104
MOVLW .1
MOVWF HHA
MOVF ZTA, .0
ADDWF HHE, .1
H104 MOVLW .1
SUBWF HHA, .0
BTFSC STATUS,Z
GOTO H105
MOVLW .2
SUBWF HHA, .0
BTFSC STATUS,Z
GOTO H106
MOVF ZTB, .0
ADDWF ZTB, .0
MOVWF HHD
H107 MOVF HHD, .0
ADDWF HHE, .0
ADDWF ZTC, .0
MOVWF HHF
H108 MOVF HHF, .0
MOVWF HHG
MOVLW .48
SUBWF HHF, .1
BTFSC STATUS,C
GOTO H108
MOVLW .24
SUBWF HHG, .0
MOVWF HHH
BTFSC STATUS,C
GOTO H109
MOVF HHG, .0
MOVWF .0
H110 INCF FSR, .1
INCF HHI, .1
MOVLW .25
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO H103
GOTO H101
H105 CLRF HHD
GOTO H107
H106 MOVF ZTB, .0
MOVWF HHD
GOTO H107
H109 MOVF HHG, .0
SUBLW .48
MOVWF .0
GOTO H110
H200 INCF ZTE, .1
MOVF ZTE, .0
SUBWF ZTD, .0
BTFSS STATUS,Z
H201 RETURN
CLRF ZTE
INCF ZTA, .1
INCF ZTB, .1
INCF ZTC, .1
MOVLW .49
SUBWF ZTA, .0
BTFSS STATUS,Z
GOTO H202
CLRF ZTA
H202 MOVLW .47
SUBWF ZTB, .0
BTFSS STATUS,Z
GOTO H203
CLRF ZTB
H203 MOVLW .45
SUBWF ZTC, .0
BTFSS STATUS,Z
GOTO H204
CLRF ZTC
H204 CLRF HHA
CLRF HHD
MOVLW .1
MOVWF HHI
MOVLW L1
MOVWF FSR
H205 INCF HHA, .1
MOVLW .4
SUBWF HHA, .0
BTFSS STATUS,Z
GOTO H206
MOVLW .1
MOVWF HHA
H206 MOVLW .1
SUBWF HHA, .0
BTFSC STATUS,Z
GOTO H208
MOVLW .2
SUBWF HHA, .0
BTFSC STATUS,Z
GOTO H209
MOVF ZTC, .0
MOVWF HHD
MOVLW .22
SUBWF HHD, .0
BTFSS STATUS,C
GOTO H207
MOVF HHD, .0
SUBLW .44
MOVWF HHD
H207 MOVF HHD, .0
MOVWF .0
INCF FSR, .1
INCF HHI, .1
MOVLW .25
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO H205
GOTO H201
H208 MOVF ZTA, .0
MOVWF HHD
MOVLW .24
SUBWF HHD, .0
BTFSS STATUS,C
GOTO H207
MOVF HHD, .0
SUBLW .48
MOVWF HHD
GOTO H207
H209 MOVF ZTB, .0
MOVWF HHD
MOVLW .23
SUBWF HHD, .0
BTFSS STATUS,C
GOTO H207
MOVF HHD, .0
SUBLW .46
MOVWF HHD
GOTO H207
H300 INCF ZTF, .1
MOVF ZTG, .0
SUBWF ZTF, .0
BTFSS STATUS,Z
H301 RETURN
CLRF ZTF
MOVLW .1
SUBWF ZTB, .0
BTFSS STATUS,Z
GOTO H302
MOVLW .8
SUBWF ZTH, .0
BTFSS STATUS,Z
GOTO H302
BTFSS ZTI, .0
GOTO H303
MOVF ZTC, .0
SUBWF ZTG, .0
MOVWF HHA
BTFSS STATUS,C
GOTO H305
MOVF HHA, .0
SUBWF ZTD, .0
BTFSS STATUS,C
GOTO H304
BCF ZTI, .0
H304 BTFSS ZTI, .0
GOTO H306
MOVF ZTC, .0
SUBWF ZTG, .1
H302 MOVLW .1
MOVWF HHI
MOVLW L1
MOVWF FSR
MOVF L1, .0
MOVWF L25
MOVF L2, .0
MOVWF L26
MOVF L3, .0
MOVWF L27
H307 MOVLW .3
ADDWF FSR, .1
MOVF .0, .0
MOVWF HHD
MOVLW .1
SUBWF ZTE, .0
BTFSS STATUS,Z
GOTO H308
INCF HHD, .1
MOVLW .25
SUBWF HHD, .0
BTFSS STATUS,Z
GOTO H308
CLRF HHD
H308 MOVLW .3
SUBWF FSR, .1
MOVF HHD, .0
MOVWF .0
INCF FSR, .1
INCF HHI, .1
MOVLW .25
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO H307
INCF ZTH, .1
MOVLW .9
SUBWF ZTH, .0
BTFSS STATUS,Z
GOTO H301
MOVLW .1
MOVWF ZTH
GOTO H301
H303 MOVF ZTC, .0
ADDWF ZTG, .0
MOVWF HHA
MOVF ZTA, .0
SUBWF HHA, .0
BTFSS STATUS,C
GOTO H304
BSF ZTI, .0
GOTO H304
H305 BCF ZTI, .0
GOTO H304
H306 MOVF ZTC, .0
ADDWF ZTG, .1
GOTO H302
H400 INCF ZTE, .1
MOVF ZTA, .0
SUBWF ZTE, .0
BTFSS STATUS,Z
GOTO H401
CLRF ZTE
MOVLW .1
MOVWF HHI
MOVWF HHC
MOVLW L1
MOVWF .4
CLRF HHB
CLRF HHA
CLRF HHD
CLRF HHE
CLRF HHF
CLRF HHH
CLRF HHG
MOVF ZTF, .1
BTFSC STATUS,Z
GOTO H402
DECF ZTG, .1
MOVLW .0
SUBWF ZTG, .0
BTFSS STATUS,Z
GOTO H403
BCF ZTF, .0
H403 MOVLW .3
ADDWF ZTG, .0
MOVWF HHA
H420 MOVLW .11
SUBWF HHA, .0
BTFSC STATUS,C
GOTO H404
MOVLW .4
SUBWF HHA, .0
BTFSS STATUS,C
GOTO H404
MOVF ZTB, .0
MOVWF HHD
CLRF HHC
H405 MOVF HHA, .0
SUBWF HHC, .0
BTFSS STATUS,Z
GOTO H406
H407 MOVF HHD, .0
MOVWF HHF
H408 MOVF HHF, .0
MOVWF HHE
MOVLW .48
SUBWF HHF, .1
BTFSC STATUS,C
GOTO H408
MOVLW .24
SUBWF HHE, .0
MOVWF HHH
BTFSC STATUS,C
GOTO H409
MOVF HHE, .0
MOVWF .0
H410 INCF .4, .1
MOVF ZTC, .0
ADDWF HHD, .1
INCF HHG, .1
MOVLW .3
SUBWF HHG, .0
BTFSS STATUS,Z
GOTO H407
H411 CLRF HHG
INCF HHI, .1
DECF HHA, .1
MOVLW .5
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO H420
CLRF HHE
CLRF HHI
H412 MOVF ZTH, .1
BTFSC STATUS,Z
GOTO H413
INCF HHE, .1
MOVLW .3
SUBWF HHE, .0
BTFSS STATUS,Z
GOTO H414
CLRF HHE
H414 MOVLW .1
SUBWF HHE, .0
BTFSC STATUS,Z
GOTO H421
MOVLW .2
SUBWF HHE, .0
BTFSC STATUS,Z
GOTO H422
GOTO H423
H415 MOVF .4, .0
SUBWF HHD, .0
MOVWF .4
MOVF .0, .0
MOVWF HHG
MOVF .4, .0
SUBWF HHD, .0
MOVWF .4
MOVF HHG, .0
MOVWF .0
H416 INCF .4, .1
INCF HHI, .1
MOVLW .12
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO H412
GOTO H401
H401 RETURN
H402 INCF ZTG, .1
MOVLW .11
SUBWF ZTG, .0
BTFSS STATUS,Z
GOTO H403
MOVLW .1
MOVWF ZTF
GOTO H403
H404 MOVLW .24
MOVWF .0
INCF .4, .1
MOVLW .24
MOVWF .0
INCF .4, .1
MOVLW .24
MOVWF .0
INCF .4, .1
GOTO H411
H406 MOVF ZTD, .0
ADDWF HHD, .1
INCF HHC, .1
GOTO H405
H409 MOVF HHE, .0
SUBLW .48
MOVWF .0
GOTO H410
H413 MOVLW .12
SUBWF .4, .1
MOVF .0, .0
MOVWF HHG
MOVLW .12
ADDWF .4, .1
MOVF HHG, .0
MOVWF .0
GOTO H416
H421 MOVLW .21+L1+L1
MOVWF HHD
GOTO H415
H422 MOVLW .23+L1+L1
MOVWF HHD
GOTO H415
H423 MOVLW .25+L1+L1
MOVWF HHD
GOTO H415
H500 INCF ZTE, .1
MOVF ZTA, .0
SUBWF ZTE, .0
BTFSS STATUS,Z
H501 RETURN
CLRF ZTE
MOVLW .1
MOVWF HHI
CLRF HHA
MOVLW L1
MOVWF FSR
H502 INCF HHA, .1
MOVLW .4
SUBWF HHA, .0
BTFSS STATUS,Z
GOTO H503
MOVLW .1
MOVWF HHA
H503 MOVLW .1
SUBWF HHA, .0
BTFSC STATUS,Z
GOTO H504
MOVLW .2
SUBWF HHA, .0
BTFSC STATUS,Z
GOTO H507
GOTO H509
H504 MOVF .0, .0
SUBWF ZTB, .0
BTFSC STATUS,Z
GOTO H506
BTFSS STATUS,C
GOTO H505
INCF .0, .1
GOTO H506
H505 DECF .0, .1
GOTO H506
H507 MOVF .0, .0
SUBWF ZTC, .0
BTFSC STATUS,Z
GOTO H506
BTFSS STATUS,C
GOTO H508
INCF .0, .1
GOTO H506
H508 DECF .0, .1
GOTO H506
H509 MOVF .0, .0
SUBWF ZTD, .0
BTFSC STATUS,Z
GOTO H506
BTFSS STATUS,C
GOTO H510
INCF .0, .1
GOTO H506
H510 DECF .0, .1
GOTO H506
H506 INCF HHI, .1
INCF FSR, .1
MOVLW .25
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO H502
GOTO H501
H600 INCF HHJ, .1
MOVF ZTA, .0
SUBWF HHJ, .0
BTFSS STATUS,Z
H601 RETURN
CLRF HHJ
MOVLW .1
MOVWF HHI
CLRF HHA
MOVLW L1
MOVWF FSR
INCF HHH, .1
MOVLW .4
SUBWF HHH, .0
BTFSS STATUS,Z
GOTO H602
MOVLW .1
MOVWF HHH
H602 MOVLW .1
SUBWF HHH, .0
BTFSC STATUS,Z
GOTO H603
MOVLW .2
SUBWF HHH, .0
BTFSC STATUS,Z
GOTO H607
GOTO H620
H603 MOVF ZTE, .0
SUBWF ZTB, .0
BTFSC STATUS,Z
GOTO H604
BTFSC STATUS,C
GOTO H605
INCF ZTB, .1
H606 MOVF ZTB, .0
MOVWF HHA
GOTO H614
H604 BSF HHG, .0
GOTO H606
H605 DECF ZTB, .1
GOTO H606
H607 MOVF ZTF, .0
SUBWF ZTC, .0
BTFSC STATUS,Z
GOTO H608
BTFSC STATUS,C
GOTO H609
INCF ZTC, .1
H610 MOVF ZTC, .0
MOVWF HHA
GOTO H614
H608 BSF HHG, .1
GOTO H610
H609 DECF ZTC, .1
GOTO H610
H620 MOVF ZTG, .0
SUBWF ZTD, .0
BTFSC STATUS,Z
GOTO H611
BTFSC STATUS,C
GOTO H612
INCF ZTD, .1
H613 MOVF ZTD, .0
MOVWF HHA
GOTO H614
H611 BSF HHG, .2
GOTO H613
H612 DECF ZTD, .1
GOTO H613
H614 MOVF HHH, .0
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -