CALL FB : net:3 : Block : fbCodeBank:CodeBank2(Check:=sw2.OUT0, New:=sw2.OUT1, NewAction:=2, N:=32, Code:=void(webString), Codes:=void(Codes))
CALL FB : net:3 : Block : fbSWBool:sw2(G:=LearnWeb, IN:=KeybWeb.NewCode)
CALL FB : net:3 : Block : fbPinKeyboardWeb:KeybWeb(Key:=void(WebKey), Code:=void(webString))
ST VAR : net:0 : Output : Rights
LD VAR_OUT : net:0 : Block : fbCodeBank:CodeBankAction:USINT(0)
ST VAR : net:0 : Output : Done
LD VAR_OUT : net:0 : Block : fbCodeBank:CodeBankDone:BOOL(0)
CALL FB : net:0 : Block : fbCodeBank:CodeBank(Check:=sw1.OUT0, New:=sw1.OUT1, NewAction:=2, N:=32, Code:=void(code), Codes:=void(Codes))
CALL FB : net:0 : Block : fbSWBool:sw1(G:=Learn, IN:=Keyboard.NewCode)
ST VAR : net:0 : Output : MI_CIB1_OUT.ID1_OUT.DOs
LD VAR_OUT : net:0 : Block : fbPinKeyboardACM08E:KeyboardOut:TCIB_DO3(0)
CALL FB : net:0 : Block : fbPinKeyboardACM08E:Keyboard(Authorized:=sw0.OUT0, Denied:=sw0.OUT1, Beep:=Beep, In:=MI_CIB1_IN.ID1_IN.CODE, Code:=void(code))
CALL FB : net:0 : Block : fbSWBool:sw0(IN:=Done)
LD VAR_IN : net:0 : Block : fbSWBool:sw0G:BOOL(0)
CALL FN : net:0 : Block : EQ:(IN1:=Rights, IN2:=0)
