ButtonT

em.utils/ButtonT.em
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
import em from '@$$emscript'
export const $T = em.$declare('TEMPLATE')

import * as ButtonI from '@em.hal/ButtonI.em'
import * as EdgeI from '@em.hal/EdgeI.em'
import * as FiberMgr from '@em.utils/FiberMgr.em'
import * as Poller from '@em.mcu/Poller.em'

export namespace em$template {

    export const $U = em.$declare('MODULE')

    export const Edge = $proxy<EdgeI.$I>()

    export type Handler = ButtonI.Handler

    const debounceF = $config<FiberMgr.Obj>()

    export namespace em$meta {

        export function em$construct() {
            debounceF.$$ = FiberMgr.em$meta.create($cb(debounceFB))
            Edge.$$.em$meta.setDetectHandler($cb(buttonHandler))
        }
    }

    var cur_fxn = <Handler>$null
    var cur_dur = 0
    var cur_max = 0
    var cur_min = 0

    export function em$startup() {
        Edge.$$.init(true)
        Edge.$$.setDetectFalling()
    }

    function buttonHandler() {
        Edge.$$.clearDetect()
        if (cur_fxn != $null) debounceF.$$.$$.post()
    }

    function debounceFB(a: arg_t) {
        cur_dur = 0
        while (true) {
            Poller.pause(cur_min)
            if (!isPressed() && cur_dur == 0) return
            cur_dur += cur_min
            if (!isPressed() || cur_dur >= cur_max) break
        }
        cur_fxn()
    }

    export function isPressed(): bool_t {
        return !Edge.$$.getState()
    }

    export function onPressed(handler: Handler, min_dur_ms: u16, max_dur_ms: u16) {
        cur_fxn = handler
        cur_max = max_dur_ms
        cur_min = min_dur_ms
        if (handler == $null) {
            Edge.$$.disableDetect()
        }
        else {
            Edge.$$.enableDetect()
        }
    }

}

export function $clone() { return { $T, ...em$template } }