⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 hl-1000a.asm

📁 这个是UPS整套软件
💻 ASM
📖 第 1 页 / 共 5 页
字号:
                    ;  bcf       STATUS,0
                      addwf     sum,1
                      BTFSs     STATUS,0
                      goto      sumb2
                      incf      sumh
      sumb2:           decfsz    r1
                      goto      sumb1
                      movfw     min
                    ;  bcf       STATUS,0
                      subwf     sum
                      BTFSs     STATUS,0
                      decf      sumh
                      movfw     mix
                    ;  bcf       STATUS,0
                      subwf     sum
                      BTFSs     STATUS,0
                      decf      sumh
                      rrf       sumh
                      rrf       sum
                      bcf       STATUS,0
                      rrf       sumh
                      rrf       sum

                      btfss     cetime1z
                      goto      pressure1



                      movfw     sum
                     ; BCF       STATUS,0
                      SUBLW     255
                      BTFSC     STATUS,0
                      goto      pressure1
;*********************************************过热指示
                      movlw     0f9h
                      movwf     light
                      bsf      cn9
                      goto     close1
;*********************************************
;******************************************* 电容电压过高

       pressure1:
                      movlw     0e9h       ;5
                      movwf     adcon0
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      bsf       adcon0,2

       pressure2:     btfsc     adcon0,2
                      goto      pressure2


                      movlw     busa
                      addwf     f4a,0
                      movwf     4h
                      movfw     adres
                      movwf     0h
                      btfss     adcz
                      goto      pressure3


                      movlw     5
                      movwf     r1
                      movlw     busa
                      movwf     4h
                      movfw     0h
                      movwf     mix

      mixd1:          incf      4h
                      movfw     0h
                     ; bcf       STATUS,0
                      subwf     mix,0
                      BTFSC     STATUS,0
                      goto      mixd2
                      movfw     0h
                      movwf     mix
      mixd2:           decfsz    r1
                      goto     mixd1

                      movlw     5
                      movwf     r1
                      movlw     busa
                      movwf     4h
                      movfw     0h
                      movwf     min

      mind1:           incf      4h
                      movfw     0h
                    ;  bcf       STATUS,0
                      subwf     min,0
                      BTFSs     STATUS,0
                      goto      mind2
                      movfw     0h
                      movwf     min
      mind2:           decfsz    r1
                      goto      mind1

                      movlw     5
                      movwf     r1
                      movlw     busa
                      movwf     4h
                      movfw     0h
                      movwf     sum
                      clrf      sumh
      sumd1:           incf      4h
                      movfw     0h
                      ;bcf       STATUS,0
                      addwf     sum,1
                      BTFSs     STATUS,0
                      goto      sumd2
                      incf      sumh
      sumd2:           decfsz    r1
                      goto      sumd1
                      movfw     min
                     ; bcf       STATUS,0
                      subwf     sum
                      BTFSs     STATUS,0
                      decf      sumh
                      movfw     mix
                    ;  bcf       STATUS,0
                      subwf     sum
                      BTFSs     STATUS,0
                      decf      sumh
                      rrf       sumh
                      rrf       sum
                      bcf       STATUS,0
                      rrf       sumh
                      rrf       sum
                      movfw     sum

                      SUBLW     214          ;电容直流电压过高380v
                      BTFSs     STATUS,0      ;
                      goto      closeb1

                      btfss    oneturnz
                      goto     pressure3

                      movfw     sum
                      SUBLW     100             ;电容直流电压过低 300v
                      BTFSc     STATUS,0
                      goto      closeb1






      pressure3:      movlw     0f1h       ;6
                      movwf     adcon0
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      bsf       adcon0,2
      pressure4:      btfsc     adcon0,2
                      goto      pressure4



                      movlw     busb
                      addwf     f4a,0
                      movwf     4h
                      movfw     adres
                      movwf     0h

                      btfss     adcz
                      goto      current


                      movlw     5
                      movwf     r1
                      movlw     busb
                      movwf     4h
                      movfw     0h
                      movwf     mix

      mixe1:          incf      4h
                      movfw     0h
                    ;  bcf       STATUS,0
                      subwf     mix,0
                      BTFSC     STATUS,0
                      goto      mixe2
                      movfw     0h
                      movwf     mix
      mixe2:           decfsz    r1
                      goto     mixe1

                      movlw     5
                      movwf     r1
                      movlw     busb
                      movwf     4h
                      movfw     0h
                      movwf     min

      mine1:           incf      4h
                      movfw     0h
                     ; bcf       STATUS,0
                      subwf     min,0
                      BTFSs     STATUS,0
                      goto      mine2
                      movfw     0h
                      movwf     min
      mine2:           decfsz    r1
                      goto      mine1

                      movlw     5
                      movwf     r1
                      movlw     busb
                      movwf     4h
                      movfw     0h
                      movwf     sum
                      clrf      sumh
      sume1:           incf      4h
                      movfw     0h
                     ; bcf       STATUS,0
                      addwf     sum,1
                      BTFSs     STATUS,0
                      goto      sume2
                      incf      sumh
      sume2:           decfsz    r1
                      goto      sume1
                      movfw     min
                  ;    bcf       STATUS,0
                      subwf     sum
                      BTFSs     STATUS,0
                      decf      sumh
                      movfw     mix
                    ;  bcf       STATUS,0
                      subwf     sum
                      BTFSs     STATUS,0
                      decf      sumh
                      rrf       sumh
                      rrf       sum
                      bcf       STATUS,0
                      rrf       sumh
                      rrf       sum


                      movfw     sum

                      SUBLW     214             ;电容直流电压过高380v
                      BTFSs     STATUS,0
                      goto      closeb1

                      btfss    oneturnz
                      goto     current

                      movfw     sum
                      SUBLW     100            ;电容直流电压过低 300v
                      BTFSc     STATUS,0
                      goto      closeb1

;*********************************************


;*********************************************电流指示
         current:





                      movlw     0f9h       ;4通道
                      movwf     adcon0
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      nop
                      bsf       adcon0,2

        current2:     btfsc     adcon0,2
                      goto      current2

                      movlw     load
                      addwf     f4a,0



                      movwf     4h
                      movfw     adres
                      movwf     0h
                      btfss     bypassz
                      goto     current3
                      decfsz    adcount
                      goto      current3
                      movlw     6
                      movwf     adcount
                      goto      current4

        current3:
                      incf      f4a
                      btfss     adcz
                      goto      alarm


       current4:      movlw     5
                      movwf     r1
                      movlw     load
                      movwf     4h
                      movfw     0h
                      movwf     mix

      mixc1:          incf      4h
                      movfw     0h
                      ;bcf       STATUS,0
                      subwf     mix,0
                      BTFSC     STATUS,0
                      goto      mixc2
                      movfw     0h
                      movwf     mix
      mixc2:           decfsz    r1
                      goto     mixc1

                      movlw     5
                      movwf     r1
                      movlw     load
                      movwf     4h
                      movfw     0h
                      movwf     min

      minc1:           incf      4h
                      movfw     0h
                 ;     bcf       STATUS,0
                      subwf     min,0
                      BTFSs     STATUS,0
                      goto      minc2
                      movfw     0h
                      movwf     min
      minc2:           decfsz    r1
                      goto      minc1

                      movlw     5
                      movwf     r1
                      movlw     load
                      movwf     4h
                      movfw     0h
                      movwf     sum
                      clrf      sumh
      sumc1:           incf      4h
                      movfw     0h
              ;        bcf       STATUS,0
                      addwf     sum,1
                      BTFSs     STATUS,0
                      goto      sumc2
                      incf      sumh
      sumc2:           decfsz    r1
                      goto      sumc1
                      movfw     min
                    ;  bcf       STATUS,0
                      subwf     sum
                      BTFSs     STATUS,0
                      decf      sumh
                      movfw     mix
                  ;    bcf       STATUS,0
                      subwf     sum
                      BTFSs     STATUS,0
                      decf      sumh
                      rrf       sumh
                      rrf       sum
                      bcf       STATUS,0
                      rrf       sumh
                      rrf       sum
                       movfw     sum
                      movwf    Imax
                      clrf      f4a
                      bcf       adcz




   city250s:

                 btfsc     batteryz     ;额定电流是3.18=700W/220
                 goto      lzza         ;3.18*51= 162

                 btfss      currentrun
                 goto       city2a
                 movlw      48
                 movwf      r2
                 call       mmlt0a0
                 movfw         l_bytea
                 goto      city2a1
    city2a:

                 movlw      48

    city2a1:
                 SUBwf     sum,0          ;30%*162=48
                 BTFSs     STATUS,0
                 goto      d_v30xa

                 btfss      currentrun
                 goto       city3a
                 movlw      81
                 movwf      r2
                 call       mmlt0a0
                 movfw         l_bytea
                 goto      city3a1
    city3a:

                 movlw      81

    city3a1:
                 SUBwf     sum,0          ;30%*162=48                                                                                             ;50%*162=48

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -