📄 slq01.asm
字号:
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
ADDWF FSR, .1
MOVLW .1
SUBWF FSR, .1
H615 MOVF HHA, .0
MOVWF .0
MOVLW .3
ADDWF FSR, .1
INCF HHI, .1
MOVLW .9
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO H615
MOVLW .7
SUBWF HHG, .0
BTFSC STATUS,Z
GOTO H616
GOTO H601
H616 MOVF ZTE, .0
MOVWF ZTB
MOVF ZTF, .0
MOVWF ZTC
MOVF ZTG, .0
MOVWF ZTD
MOVF ZTH, .0
MOVWF ZTE
MOVF ZTI, .0
MOVWF ZTF
MOVF ZTJ, .0
MOVWF ZTG
CLRF HHG
GOTO H601
H700 INCF ZTB, .1
MOVF ZTA, .0
SUBWF ZTB, .0
BTFSS STATUS,Z
H701 RETURN
CLRF ZTB
CLRF HHI
CLRF HHA
CLRF HHB
CLRF HHC
MOVLW L1
MOVWF FSR
H702 MOVF .0, .0
MOVWF L25
INCF FSR, .1
MOVF .0, .0
MOVWF L26
INCF FSR, .1
MOVF .0, .0
MOVWF L27
INCF FSR, .1
MOVF .0, .0
MOVWF HHA
INCF FSR, .1
MOVF .0, .0
MOVWF HHB
INCF FSR, .1
MOVF .0, .0
MOVWF HHC
MOVLW .5
SUBWF FSR, .1
MOVF HHA, .0
MOVWF .0
INCF FSR, .1
MOVF HHB, .0
MOVWF .0
INCF FSR, .1
MOVF HHC, .0
MOVWF .0
INCF FSR, .1
MOVF L25, .0
MOVWF .0
INCF FSR, .1
MOVF L26, .0
MOVWF .0
INCF FSR, .1
MOVF L27, .0
MOVWF .0
INCF FSR, .1
INCF HHI, .1
MOVLW .4
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO H702
RETURN
H800 INCF ZTB, .1
MOVF ZTA, .0
SUBWF ZTB, .0
BTFSS STATUS,Z
H801 RETURN
CLRF ZTB
CLRF HHA
CLRF HHB
CLRF HHC
MOVLW .1
MOVWF HHI
MOVLW L1
MOVWF FSR
H802 BTFSS ZTI, .0
GOTO H803
MOVF ZTC, .0
MOVWF HHA
MOVF ZTD, .0
MOVWF HHB
MOVF ZTE, .0
MOVWF HHC
H804 MOVF HHA, .0
MOVWF .0
INCF FSR, .1
MOVF HHB, .0
MOVWF .0
INCF FSR, .1
MOVF HHC, .0
MOVWF .0
INCF FSR, .1
COMF ZTI, .1
INCF HHI, .1
MOVLW .9
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO H802
COMF ZTI, .1
RETURN
H803 MOVF ZTF, .0
MOVWF HHA
MOVF ZTG, .0
MOVWF HHB
MOVF ZTH, .0
MOVWF HHC
GOTO H804
H900 INCF ZTB, .1
MOVF ZTA, .0
SUBWF ZTB, .0
BTFSS STATUS,Z
H901 RETURN
INCF ZTH, .1
MOVLW .48
SUBWF ZTH, .0
BTFSC STATUS,Z
GOTO H922
H923 CLRF ZTB
MOVLW .1
MOVWF HHI
CLRF HHD
CLRF HHG
CLRF HHA
CLRF HHE
CLRF HHF
MOVLW L1
MOVWF FSR
H902 BTFSS ZTC, .7
GOTO H903
BTFSS ZTD, .1
GOTO H904
CLRF HHE
H905 MOVLW .1
MOVWF HHA
H906 MOVLW .1
SUBWF HHA, .0
BTFSC STATUS,Z
GOTO H907
MOVLW .2
SUBWF HHA, .0
BTFSC STATUS,Z
GOTO H908
MOVF ZTI, .0
ADDWF ZTI, .0
MOVWF HHD
H909 MOVF HHE, .0
ADDWF HHD, .0
ADDWF ZTH, .0
MOVWF HHF
H910 MOVF HHF, .0
MOVWF HHG
MOVLW .48
SUBWF HHF, .1
BTFSC STATUS,C
GOTO H910
MOVLW .24
SUBWF HHG, .0
BTFSC STATUS,C
GOTO H911
MOVF HHG, .0
MOVWF .0
H912 INCF FSR, .1
INCF HHA, .1
MOVLW .4
SUBWF HHA, .0
BTFSS STATUS,Z
GOTO H906
H913 RLF ZTC, .1
BTFSS STATUS,C
GOTO H920
BSF ZTC, .0
H921 INCF HHI, .1
MOVLW .9
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO H902
GOTO H901
H920 BCF ZTC, .0
GOTO H921
H903 BTFSS ZTD, .0
GOTO H913
MOVF ZTE, .0
MOVWF .0
INCF FSR, .1
MOVF ZTF, .0
MOVWF .0
INCF FSR, .1
MOVF ZTG, .0
MOVWF .0
INCF FSR, .1
GOTO H913
H904 MOVF ZTJ, .0
ADDWF HHE, .1
GOTO H905
H907 CLRF HHD
GOTO H909
H908 MOVF ZTI, .0
MOVWF HHD
GOTO H909
H911 MOVF HHG, .0
SUBLW .48
MOVWF .0
GOTO H912
H922 CLRF ZTH
GOTO H923
HA00 INCF ZTJ, .1
BTFSC HHA, .2
GOTO HA02
GOTO HA01
HA01 MOVF ZTH, .0
SUBWF ZTJ, .0
BTFSS STATUS,Z
HA03 RETURN
BSF HHA, .2
GOTO HA04
HA02 MOVF ZTI, .0
SUBWF ZTJ, .0
BTFSS STATUS,Z
GOTO HA03
BCF HHA, .2
GOTO HA04
HA04 CLRF ZTJ
CLRF HHB
CLRF HHC
CLRF HHD
CLRF HHE
MOVLW .1
MOVWF HHI
MOVLW L1
MOVWF FSR
BTFSC HHA, .2
GOTO HA06
GOTO HA05
HA05 MOVF ZTB, .0
MOVWF HHB
MOVF ZTC, .0
MOVWF HHC
MOVF ZTD, .0
MOVWF HHD
BTFSC HHA, .1
GOTO HA07
GOTO HA08
HA07 HONG ZTB,HHB,DOG01,DOG02
HONG ZTC,HHC,DOG03,DOG04
HONG ZTD,HHD,DOG05,DOG06
GOTO HA08
HA06 MOVF ZTE, .0
MOVWF HHB
MOVF ZTF, .0
MOVWF HHC
MOVF ZTG, .0
MOVWF HHD
BTFSC HHA, .0
GOTO HA09
GOTO HA08
HA09 HONG ZTE,HHB,DOG07,DOG08
HONG ZTF,HHC,DOG09,DOG10
HONG ZTG,HHD,DOG11,DOG12
GOTO HA08
HA08 INCF HHE, .1
MOVLW .4
SUBWF HHE, .0
BTFSS STATUS,Z
GOTO HA10
MOVLW .1
MOVWF HHE
HA10 MOVLW .1
SUBWF HHE, .0
BTFSC STATUS,Z
GOTO HA11
MOVLW .2
SUBWF HHE, .0
BTFSC STATUS,Z
GOTO HA12
MOVF HHD, .0
MOVWF .0
HA14 INCF FSR, .1
INCF HHI, .1
MOVLW .25
SUBWF HHI, .0
BTFSS STATUS,Z
GOTO HA08
GOTO HA03
HA11 MOVF HHB, .0
MOVWF .0
GOTO HA14
HA12 MOVF HHC, .0
MOVWF .0
GOTO HA14
MAIN CLRF TB
CLRF FB
BSF STATUS,RP0
CLRF TRISC
CLRF TRISD
CLRF PIE1
BCF STATUS,RP0
BCF STATUS,RP1
BCF STATUS,IRP
MOVLW .13
MOVWF TG
MOVLW .1
MOVWF HS
MOVWF SG
MOVLW .24
MOVWF JS
BSF STATUS,RP0
MOVLW .0
MOVWF TRISE
MOVLW .48
MOVWF TRISA
MOVLW .1
MOVWF TRISB
BSF PCON,NOT_POR
MOVLW .131
MOVWF OPTION_REG
BCF STATUS,RP0
MOVLW .208
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -