• From Andrej Arnold@2:5020/830.590 to All on Sat Feb 27 19:05:12 2021
    p, All!

    ..............
    wait10ms:
    rcall wait5ms ;5ms 7+x return addresses
    ;proceed with wait5ms ;+5ms
    wait5ms:
    rcall wait1ms ;1ms 6+x return addresses
    ;proceed with wait4ms ;+4ms
    wait4ms:
    rcall wait1ms ;1ms 6+x return addresses
    ;proceed with wait3ms ;+3ms
    wait3ms:
    rcall wait1ms ;1ms 6+x return addresses
    ;proceed with wait2ms ;+2ms
    wait2ms:
    rcall wait1ms ;1ms 6+x return addresses
    ;proceed with wait1ms ;+1ms
    wait1ms:
    rcall wait500us ;500s 5+x return addresses
    ;laeuft in wait500us ;+500s
    wait500us:
    rcall wait100us ;100s 4+x return addresses
    ;proceed with wait400us ;+400s
    wait400us:
    rcall wait100us ;100s 4+x return addresses
    ;proceed with wait300us ;+300s
    wait300us:
    rcall wait100us ;100s 4+x return addresses
    ;proceed with wait200us ;+200s
    wait200us:
    rcall wait100us ;100s 4+x return addresses
    ;proceed with wait100us ;+100s
    wait100us:
    rcall wait50us ;50s 3+x return addresses
    ;proceed with wait50us ;+50s
    wait50us:
    rcall wait10us ;10s 2+x return addresses
    ;proceed with wait40us ;+40s
    wait40us:
    rcall wait10us ;10s 2+x return addresses
    ;proceed with wait30us ;+30s
    wait30us:
    rcall wait10us ;10s 2+x return addresses
    ;proceed with wait20us ;+20s
    wait20us:
    rcall wait10us ;10s 2+x return addresses
    ;proceed with wait10us ;+10s
    /* 10s and below based on MCU clock rate
    * - rcall needs 3 clock cycles
    * - ret needs 4 clock cycles
    */
    wait10us: ; 1+x return addresses


    #if CPU_FREQ == 8000000
    ;8MHz: clock cycle 125ns x = 2

    .global wait5us ;wait 5s
    .global wait4us ;wait 4s
    .global wait3us ;wait 3s
    .global wait2us ;wait 2s
    .global wait1us ;wait 1s

    ;wait10us
    rcall wait5us ;5s
    ;proceed with wait5us ;+5s
    wait5us:
    rcall wait1us ;1s
    ;proceed with wait4us ;+4s
    wait4us:
    rcall wait1us ;1s
    ;proceed with wait3us ;+3us
    wait3us:
    rcall wait1us ;1s
    ;proceed with wait2us ;+2s
    wait2us:
    rcall wait1us ;1s
    ;proceed with wait1us ;+1s
    wait1us:
    nop ;1s
    #endif

    ret

    ࠭᫨ :

    0000784e <wait10ms>:
    ;proceed with wait10ms ;+10ms
    wait10ms:
    rcall wait5ms ;5ms 7+x return addresses
    784e: 00 d0 rcall .+0 ; 0x7850 <wait5ms> 00007850 <wait5ms>:
    ;proceed with wait5ms ;+5ms
    wait5ms:
    rcall wait1ms ;1ms 6+x return addresses
    7850: 03 d0 rcall .+6 ; 0x7858 <wait1ms> 00007852 <wait4ms>:
    ;proceed with wait4ms ;+4ms
    wait4ms:
    rcall wait1ms ;1ms 6+x return addresses
    7852: 02 d0 rcall .+4 ; 0x7858 <wait1ms> 00007854 <wait3ms>:
    ;proceed with wait3ms ;+3ms
    wait3ms:
    rcall wait1ms ;1ms 6+x return addresses
    7854: 01 d0 rcall .+2 ; 0x7858 <wait1ms> 00007856 <wait2ms>:
    ;proceed with wait2ms ;+2ms
    wait2ms:
    rcall wait1ms ;1ms 6+x return addresses
    7856: 00 d0 rcall .+0 ; 0x7858 <wait1ms> 00007858 <wait1ms>:
    ;proceed with wait1ms ;+1ms
    wait1ms:
    rcall wait500us ;500s 5+x return addresses
    7858: 00 d0 rcall .+0 ; 0x785a <wait500us> 0000785a <wait500us>:
    ;laeuft in wait500us ;+500s
    wait500us:
    rcall wait100us ;100s 4+x return addresses
    785a: 03 d0 rcall .+6 ; 0x7862 <wait100us> 0000785c <wait400us>:
    ;proceed with wait400us ;+400s
    wait400us:
    rcall wait100us ;100s 4+x return addresses
    785c: 02 d0 rcall .+4 ; 0x7862 <wait100us> 0000785e <wait300us>:
    ;proceed with wait300us ;+300s
    wait300us:
    rcall wait100us ;100s 4+x return addresses
    785e: 01 d0 rcall .+2 ; 0x7862 <wait100us> 00007860 <wait200us>:
    ;proceed with wait200us ;+200s
    wait200us:
    rcall wait100us ;100s 4+x return addresses
    7860: 00 d0 rcall .+0 ; 0x7862 <wait100us> 00007862 <wait100us>:
    ;proceed with wait100us ;+100s
    wait100us:
    rcall wait50us ;50s 3+x return addresses
    7862: 00 d0 rcall .+0 ; 0x7864 <wait50us> 00007864 <wait50us>:
    ;proceed with wait50us ;+50s
    wait50us:
    rcall wait10us ;10s 2+x return addresses
    7864: 03 d0 rcall .+6 ; 0x786c <wait10us> 00007866 <wait40us>:
    ;proceed with wait40us ;+40s
    wait40us:
    rcall wait10us ;10s 2+x return addresses
    7866: 02 d0 rcall .+4 ; 0x786c <wait10us> 00007868 <wait30us>:
    ;proceed with wait30us ;+30s
    wait30us:
    rcall wait10us ;10s 2+x return addresses
    7868: 01 d0 rcall .+2 ; 0x786c <wait10us> 0000786a <wait20us>:
    ;proceed with wait20us ;+20s
    wait20us:
    rcall wait10us ;10s 2+x return addresses
    786a: 00 d0 rcall .+0 ; 0x786c <wait10us> 0000786c <wait10us>:
    .global wait3us ;wait 3s
    .global wait2us ;wait 2s
    .global wait1us ;wait 1s

    ;wait10us
    rcall wait5us ;5s
    786c: 00 d0 rcall .+0 ; 0x786e <wait5us>

    0000786e <wait5us>:
    ;proceed with wait5us ;+5s
    wait5us:
    rcall wait1us ;1s
    786e: 03 d0 rcall .+6 ; 0x7876 <wait1us> 00007870 <wait4us>:
    ;proceed with wait4us ;+4s
    wait4us:
    rcall wait1us ;1s
    7870: 02 d0 rcall .+4 ; 0x7876 <wait1us> 00007872 <wait3us>:
    ;proceed with wait3us ;+3us
    wait3us:
    rcall wait1us ;1s
    7872: 01 d0 rcall .+2 ; 0x7876 <wait1us> 00007874 <wait2us>:
    ;proceed with wait2us ;+2s
    wait2us:
    rcall wait1us ;1s
    7874: 00 d0 rcall .+0 ; 0x7876 <wait1us> 00007876 <wait1us>:
    ;proceed with wait1us ;+1s
    wait1us:
    nop ;1s
    7876: 00 00 nop
    nop
    nop ;500ns
    #endif

    ret
    7878: 08 95 ret
    ...............


    㢠 - Andrej
    --- Good luck!
    * Origin: ? (2:5020/830.590)
  • From Valentin Kuznetsov@2:5053/51.401 to Andrej Arnold on Sat Feb 27 22:58:19 2021
    p, Andrej!
    ⢥ 쬮 27 Feb 21 19:05:12 (AREA:RU.EMBEDDED)
    p, All!

    ..............
    x Origin: pp? (2:5020/830.590)

    ?
    --- WebFIDO/OS2 V0.16530k
    * Origin: Web p pp!! (2:5053/51.401)
  • From Andrej Arnold@2:5020/830.590 to Valentin Kuznetsov on Sun Feb 28 15:05:14 2021
    p, Valentin!

    㡡 27 ࠫ 2021 22:58, ᠫ() ,
    x Origin: pp? (2:5020/830.590)
    ?
    * Origin: Web p pp!! (2:5053/51.401)
    砫쭨 ࣠  ⠪ .

    - ᯮ冷 ⭮襭 㦡.

    㢠 - Andrej
    --- Good luck!
    * Origin: ? (2:5020/830.590)
  • From Valentin Kuznetsov@2:5053/51.401 to Andrej Arnold on Mon Mar 1 14:11:14 2021
    p, Andrej!
    ⢥ 쬮 28 Feb 21 15:05:14 (AREA:RU.EMBEDDED)

    ?

    - ᯮp冷 ⭮襭
    㦡.

    H ᪮ !
    --- WebFIDO/OS2 V0.16530k
    * Origin: Web p p!! (2:5053/51.401)