; PEEL_ALL · peel onion toward ground then GRIN · productivity
; =============================================================================
; NAME     PEEL_ALL
; OP modes:
;   0 → 7|1  peel to know_her / Hostess id
;   1 → 1    peel field_one
;   2 → 1    peel measure accept
;   3 → 1    peel free accept
;   else → 1 GRIN peel
; LAW  only BGS+BGF native peels · free never folds
; IRON
        global  peel_all
peel_all:
        mov     eax, 1
        test    edi, edi
        jnz     .done
        mov     eax, 7
        or      eax, 1
.done:  ret