collapseos/blk/301

L3 BSET PC ORG @ 0x34 + ! ( execute )
    EXDEHL, ( HL now points to wordref )
    ( We don't apply BIN( reliably on stable ABI stuff, we
      might need to adjust addr. Ugly, but well... )
    BIN( @ [IF]
        A XORr, H ORr, IFZ, H BIN( @ 256 / LDrn, THEN,
    [THEN]
    E (HL) LDrr,
    D BIN( @ 256 / LDrn,
    EXDEHL,
    ( HL points to code pointer )
    DE INCss,
    ( DE points to PFA )
    JP(HL),