    ddeFrmLoad kpadonly, frmKPADOnly, fromtoolbar, totoolbar
    ddeRegisterInterface txtOutput, label8, False, txtoutputvar

    ddeFrmLoad ledswitc, frmSimple_Hardware, totoolbar, fromtoolbar
    ddeRegisterInterface Ledsin, LEDSLbl, True, LedsInIO
    ddeRegisterInterface switchesout, SwitchesLbl, False, SwitchesOutIO

    ddeFrmLoad kpad7seg, frmKpad_7segs, fromtoolbar, totoolbar
    ddeRegisterInterface txtoutput, label8, False, txtoutputvar
    ddeRegisterInterface txtinput(0), label6, True, txtinputvar(0)
    ddeRegisterInterface txtinput(1), label7, True, txtinputvar(1)

    ddeFrmLoad terminal, FrmTerminal, totoolbar, fromtoolbar
    ddeRegisterInterface LEDSIn, LEDSlbl, True, LedsInIO
    ddeRegisterInterface switchesout, switcheslbl, False, SwitchesOutIO

    ddeFrmLoad Simulator, frmCPU_68HC11, fromToolbox, totoolbox
    ddeRegisterInterface dde0, Link_Address(8), True, ddevar(0)
    ddeRegisterInterface dde1, Link_Address(9), True, ddevar(1)
    ddeRegisterInterface dde2, Link_Address(10), True, ddevar(2)
    ddeRegisterInterface dde3, Link_Address(11), True, ddevar(3)
    ddeRegisterInterface dde4, Link_Address(12), True, ddevar(4)
    ddeRegisterInterface dde5, Link_Address(13), True, ddevar(5)
    ddeRegisterInterface dde6, Link_Address(14), True, ddevar(6)
    ddeRegisterInterface dde7, Link_Address(15), True, ddevar(7)

    ddeFrmLoad lcd, frmLCD, frmToolbar, tToolbar
    ddeRegisterInterface LEDSIn, LEDSlbl, True, LEDSvar

    ddeFrmLoad pc_Ports, frmPC_Ports, totoolbar, fromtoolbar
    For i = 0 To 3
        ' Firrst two are inputs, others outputs
        If i < 2 Then InOut = True Else InOut = False
        ddeRegisterInterface Port(i), PORTLbl(i), InOut, PORTvar(i)
    Next i
    ddeRegisterInterface hshake, PORTLbl(4), True, HShakeVar

    ddeFrmLoad traffic2, frmtraffic, fromtoolbar, totoolbar
    ddeRegisterInterface sensors, label4, False, SensorsVar
    ddeRegisterInterface controlT, label3, True, ControlTVar

    ddeFrmLoad kpad7seg, frmKpad_7segs, fromtoolbar, totoolbar
    ddeRegisterInterface txtoutput, label8, False, txtoutputvar
    ddeRegisterInterface txtinput(0), label6, True, txtinputvar(0)
    ddeRegisterInterface txtinput(1), label7, True, txtinputvar(1)


