assembly - Time Base, assembler, PIC , propeller clock -


so, i'm doing propeller clock , should display hour , 1 name, using assembler , pic 18f4550. think fine. it's can't manage "make" right time base.

the pic works naturally @ 8 mhz.

what i'm trying create routine counts 1 min, after that, clock add 1 minute "minutes", , on (that part done).

the user set hour, 4 push buttons, , after set current hour, , press final push button. that's when time base kick in.

i think can't last part, need time base, because can't seem understand in assembler (in c# i'd bid while o while or maybe for).

one way see - maybe need make big delay - 1 lasts 60 seconds - can put in assembler language, or wrong?

thank in advance guys.
here's code clock:

list p = 18f4550     #include<p18f4550.inc>   config wdt = off     config mclre = on    config debug = off     config lvp = off    config fosc = intosc_ec  delay1 equ 0x00     delay2 equ 0x01  aux1   equ 0x02 aux2   equ 0x03  org 0  movlw b'01110111'   ;8 mhz  movwf osccon   clrf porta clrf portb clrf trisb clrf aux1 clrf aux2  ;movwf b'01100100' ;movlw aux1  test btfss porta,4 goto test goto mainloop    mainloop movlw b'00000001' addwf aux2,1 call k call retardo call re call retardo call o call retardo call nn call retardo call o call retardo call ss call retardo call mm call retardo call yy call retardo call gg call retardo  ;movwf b'01100100'   movlw b'00000011'  cpfseq aux2,1  goto mainloop  call opt  goto test    ;*******************letters****************   k movlw b'11111111' movwf portb call retardo movlw b'00001000' movwf portb call retardo movlw b'00010100' movwf portb call retardo movlw b'00100010' movwf portb call retardo movlw b'01000001' movwf portb call retardo movlw b'00000000' movwf portb call retardo return   re movlw b'01111111' movwf portb call retardo movlw b'01001100' movwf portb call retardo movlw b'01001100' movwf portb call retardo movlw b'00110011' movwf portb call  retardo movlw b'00000000' movwf portb call retardo return  nn movlw b'01111111' movwf portb call retardo movlw b'00100000' movwf portb call retardo movlw b'00010000' movwf portb call retardo movlw b'00001000' movwf portb call retardo movlw b'00000100' movwf portb  call retardo movlw b'01111111' movwf portb call retardo movlw b'00000000' movwf portb call retardo return   o movlw b'00001000' movwf portb call retardo movlw b'00010100' movwf portb call retardo movlw b'00100010' movwf portb call retardo movlw b'01000001' movwf portb call retardo movlw b'00100010' movwf portb call retardo movlw b'00010100' movwf portb call retardo movlw b'00001000' movwf portb call retardo  movlw b'00000000' movwf portb call retardo return  ss movlw b'00010001' movwf portb call retardo movlw b'00101010' movwf portb call retardo movlw b'01000100' movwf portb call retardo movlw b'00000000' movwf portb call retardo return  mm call retardo movlw b'01111111' movwf portb call retardo movlw b'00000010' movwf portb call retardo movlw b'00000100' movwf portb call retardo movlw b'00001000' movwf portb call retardo movlw b'00000100' movwf portb call retardo movlw b'00000010' movwf portb call retardo movlw b'01111111' movwf portb call retardo movlw b'00000000' movwf portb call retardo return   yy movlw b'00000001' movwf portb call retardo movlw b'00000010' movwf portb call retardo movlw b'00000100' movwf portb call retardo movlw b'01111000' movwf portb call retardo movlw b'00000100' movwf portb call retardo movlw b'00000010' movwf portb call retardo movlw b'00000001' movwf portb call retardo movlw b'00000000' movwf portb call retardo return   gg movlw b'01111001' movwf portb call retardo movlw b'00101010' movwf portb call retardo movlw b'00010100' movwf portb call retardo movlw b'00001000' movwf portb call retardo  movlw b'00000000' movwf portb call retardo return  opt movlw b'11111111' movwf portb call retardo call retardo call retardo call retardo call retardo call retardo call retardo call retardo call retardo clrf aux2 movlw b'00000000' movwf portb return   ;*******number************   horas1  btfsc porta,0 goto cero1  cero1     btfsc porta,0     goto uno1     movlw b'00111110'     movwf portb     call retardo     movlw b'01000001'     movwf portb     call retardo     movlw b'01000001'     movwf portb     call retardo     movlw b'00111110'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo    uno1     btfsc porta,0     goto cero1     movlw b'00010000'     movwf portb     call retardo     movlw b'00100001'     movwf portb     call retardo     movlw b'01111111'     movwf portb     call retardo     movlw b'00000001'     movwf portb      call retardo     movlw b'00000000'     movwf portb      call retardo     horas2     btfsc porta,1     goto cero2  cero2     btfsc porta,1     goto uno2     movlw b'00111110'     movwf portb     call retardo     movlw b'01000001'     movwf portb     call retardo     movlw b'01000001'     movwf portb     call retardo     movlw b'00111110'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo    uno2     btfsc porta,1     goto dos2     movlw b'00010000'     movwf portb     call retardo     movlw b'00100001'     movwf portb     call retardo     movlw b'01111111'     movwf portb     call retardo     movlw b'00000001'     movwf portb      call retardo     movlw b'00000000'     movwf portb      call retardo  dos2     btfsc porta,1     goto tres2     movlw b'00110011'     movwf portb     call retardo     movlw b'01000101'     movwf portb      call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01110001'     movwf portb     call retardo     movlw b'00000000'     movwf portb      call retardo   tres2     btfsc porta,1     goto cuatro2     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'00111110'     movwf portb     call retardo     movlw b'00000000'     movwf portb      call retardo  cuatro2     btfsc porta,1     goto cinco2     movlw b'01111000'     movwf portb     call retardo     movlw b'00001000'     movwf portb     call retardo     movlw b'00001000'     movwf portb     call retardo     movlw b'01111111'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo  cinco2     btfsc porta,1     goto seis2     movlw b'01111001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001111'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo  seis2     btfsc porta,1     goto siete2     movlw b'00111110'     movwf portb     call retardo     movlw b'01000001'     movwf portb      call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001110'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo   siete2     btfsc porta,1     goto ocho2     movlw b'01000000'     movwf portb     call retardo     movlw b'01001000'     movwf portb     call retardo     movlw b'01111111'     movwf portb     call retardo     movlw b'00001000'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo   ocho2     btfsc porta,1     goto nueve2     movlw b'00111110'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'00111110'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo   nueve2     btfsc porta,1     goto cero2     movlw b'00110001'     movwf portb     call retardo     movlw b'01001001'     movwf portb      call retardo     movlw b'01001001'     movwf portb      call retardo     movlw b'00111110'     movwf portb      call retardo     movlw b'00000000'     movwf portb     call retardo   minutos1     btfsc porta,2     goto cerom1  cerom1     btfsc porta,2     goto unom1     movlw b'00111110'     movwf portb     call retardo     movlw b'01000001'     movwf portb     call retardo     movlw b'01000001'     movwf portb     call retardo     movlw b'00111110'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo    unom1     btfsc porta,2     goto dosm1     movlw b'00010000'     movwf portb     call retardo     movlw b'00100001'     movwf portb     call retardo     movlw b'01111111'     movwf portb     call retardo     movlw b'00000001'     movwf portb      call retardo     movlw b'00000000'     movwf portb      call retardo  dosm1     btfsc porta,2     goto tresm1     movlw b'00110011'     movwf portb     call retardo     movlw b'01000101'     movwf portb      call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01110001'     movwf portb     call retardo     movlw b'00000000'     movwf portb      call retardo   tresm1     btfsc porta,2     goto cuatrom1     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'00111110'     movwf portb     call retardo     movlw b'00000000'     movwf portb      call retardo  cuatrom1     btfsc porta,2     goto cincom1     movlw b'01111000'     movwf portb     call retardo     movlw b'00001000'     movwf portb     call retardo     movlw b'00001000'     movwf portb     call retardo     movlw b'01111111'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo  cincom1     btfsc porta,2     goto cerom1     movlw b'01111001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001111'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo  minutos2     btfsc porta,3     goto cerom2  cerom2     btfsc porta,3     goto unom2     movlw b'00111110'     movwf portb     call retardo     movlw b'01000001'     movwf portb     call retardo     movlw b'01000001'     movwf portb     call retardo     movlw b'00111110'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo    unom2     btfsc porta,3     goto dosm2     movlw b'00010000'     movwf portb     call retardo     movlw b'00100001'     movwf portb     call retardo     movlw b'01111111'     movwf portb     call retardo     movlw b'00000001'     movwf portb      call retardo     movlw b'00000000'     movwf portb      call retardo  dosm2     btfsc porta,3     goto tresm2     movlw b'00110011'     movwf portb     call retardo     movlw b'01000101'     movwf portb      call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01110001'     movwf portb     call retardo     movlw b'00000000'     movwf portb      call retardo   tresm2     btfsc porta,3     goto cuatrom2     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'00111110'     movwf portb     call retardo     movlw b'00000000'     movwf portb      call retardo  cuatrom2     btfsc porta,3     goto cincom2     movlw b'01111000'     movwf portb     call retardo     movlw b'00001000'     movwf portb     call retardo     movlw b'00001000'     movwf portb     call retardo     movlw b'01111111'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo  cincom2     btfsc porta,3     goto seism2     movlw b'01111001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001111'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo  seism2     btfsc porta,3     goto sietem2     movlw b'00111110'     movwf portb     call retardo     movlw b'01000001'     movwf portb      call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001110'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo   sietem2     btfsc porta,3     goto ochom2     movlw b'01000000'     movwf portb     call retardo     movlw b'01001000'     movwf portb     call retardo     movlw b'01111111'     movwf portb     call retardo     movlw b'00001000'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo   ochom2     btfsc porta,3     goto nuevem2     movlw b'00111110'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'01001001'     movwf portb     call retardo     movlw b'00111110'     movwf portb     call retardo     movlw b'00000000'     movwf portb     call retardo   nuevem2     btfsc porta,3     goto cerom2     movlw b'00110001'     movwf portb     call retardo     movlw b'01001001'     movwf portb      call retardo     movlw b'01001001'     movwf portb      call retardo     movlw b'00111110'     movwf portb      call retardo     movlw b'00000000'     movwf portb     call retardo  retardo   decfsz delay1,1      goto  retardo    decfsz delay2,1 goto retardo return  end 


Comments

Popular posts from this blog

php - How to display all orders for a single product showing the most recent first? Woocommerce -

asp.net - How to correctly use QUERY_STRING in ISAPI rewrite? -

angularjs - How restrict admin panel using in backend laravel and admin panel on angular? -