HandleMyHookMenu:
;res numOP1,(iy+ParsFlag2) if need to preserve Ans and return no value
        pop hl
    xor a
    ld (IY+myflag),a
    ld (IY+nflags),a
    ld de,Op1
    ld a,(de)
    ld (ltype),a
    ld a,l
    cp 4
    jr nc,ContinueHandleMenu
    cp 1
    ld a,(de)
    jr z,HandleMyHookMenuCheckType
    push hl
        dec hl
        add hl,hl
        add hl,hl
        add hl,hl
        pop de
    push de
        dec de
        add hl,de
        ld de,(FPS)
        ex de,hl
        or a \ sbc hl,de
        ld a,(hl)
        pop hl
HandleMyHookMenuCheckType:
    cp $01   ;list type     -> it means it's a list, so it's a real sum()
    jr nz,ContinueHandleMenu
    xor a
    ret     ;process it like a real -m-e-n-u- sum()
ContinueHandleMenu:
    push hl
        call C3_ChkDirtyFlag
        pop hl
    ld de,DCSBLib_FuncTable
    ld bc,(DCSBLib_FuncTableEnd-DCSBLib_FuncTable)/2
    di
    jp popallargs

DCSBLib_FuncTable:
    .dw dbfStringWidth
    .dw dbfPxScan
    .dw dbfHometoGraph
    .dw dbfUsedPicList
    .dw dbfArcUnarcPic
    .dw dbfDCSLibVersion
    .dw dbfSimpleGUIMouse
    .dw dbfPushGUIStack
    .dw dbfPopGUIStack
    .dw dbfOpenGUIStack
    .dw dbfCloseGUIStack
    .dw dbfRenderGUIStack
    .dw dbfGUIMouse
    .dw dbfMenu
    .dw dbfPushAns
    .dw dbfPopAns
    .dw dbfClearAnsStack
    .dw dbfCn2BASICSend
    .dw dbfCn2BASICGet
    .dw dbfCn2BASICStop
DCSBLib_FuncTableEnd: