on serialPortInterface attribute
  -------------------------------------------------------------------------
  if attribute is "Volume du haut-parleur" then -- select the speaker volume
    select empty
    put "0;1;2;3;4;5;6;7" into choices
    put popMenu(the mouseLoc,choices) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    set itemDelimiter to ";"
    put item selectedMenuItem of choices into leVolume
    put leVolume into me
    get volume(leVolume) --XFCN
    beep 1
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "autoWrap" then                -- enable/disable autoWrap
    select empty
    put "autoWrapOn,autoWrapOff" into potentialMultipleChoices
    put "On;Off" into potentialMenuItems
    put popMenu(the mouseLoc,potentialMenuItems) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "strip controls" then      -- enable/disable stripControls
    -- except for the control characters carriage return and tab.
    select empty
    put "stripControlsOn,stripControlsOff" into potentialMultipleChoices
    put "On;Off" into potentialMenuItems
    put popMenu(the mouseLoc,potentialMenuItems) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "strip" then                        -- enable/disable strip
    select empty
    put "stripOn,stripOff" into potentialMultipleChoices
    put "On;Off" into potentialMenuItems
    put popMenu(the mouseLoc,potentialMenuItems) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "edit" then                        -- enable/disable edit
    select empty
    put "editOn,editOff" into potentialMultipleChoices
    put "On;Off" into potentialMenuItems
    put popMenu(the mouseLoc,potentialMenuItems) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "echo" then                        -- enable/disable echo
    select empty
    put "echoOn,echoOff" into potentialMultipleChoices
    put "On;Off" into potentialMenuItems
    put popMenu(the mouseLoc,potentialMenuItems) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "lineFeed" then               -- enable/disable lineFeeds
    select empty
    put "linefeedsOn,lineFeedsOff" into potentialMultipleChoices
    put "On;Off" into potentialMenuItems
    put popMenu(the mouseLoc,potentialMenuItems) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "handshaking" then      -- enable/disable CTS handshaking
    select empty
    put "CTSOutOn,CTSOutOff" into potentialMultipleChoices
    put "On;Off" into potentialMenuItems
    put popMenu(the mouseLoc,potentialMenuItems) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "Xon/Xoff" then     -- enable/disable XON/XOFF flowControl
    select empty
    put "XOnOutOn,XOnOutOff" into potentialMultipleChoices
    put "On;Off" into potentialMenuItems
    put popMenu(the mouseLoc,potentialMenuItems) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "data" then              -- select the number of data bits
    select empty
    put "data5,data6,data7,data8" into potentialMultipleChoices
    put "5;6;7;8" into potentialMenuItems
    put popMenu(the mouseLoc,potentialMenuItems) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "parity" then                -- select the type of parity
    select empty
    put "parityOff,parityOdd,parityEven" into potentialMultipleChoices
    put "Off;Odd;Even" into potentialMenuItems
    put popMenu(the mouseLoc,potentialMenuItems) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "stop bit" then          -- select the number of stop bits
    select empty
    put "stop10,stop15,stop20" into potentialMultipleChoices
    put "1.0;1.5;2.0" into choices
    put popMenu(the mouseLoc,choices) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    set itemDelimiter to ";"
    put item selectedMenuItem of potentialMultipleChoices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "port" then                            -- select the port
    select empty
    put "modemPort;printerPort" into choices
    put popMenu(the mouseLoc,choices) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    set itemDelimiter to ";"
    put item selectedMenuItem of choices into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
  if attribute is "baud" then                       -- select the baud rate
    select empty
    put "300;600;1200;1800;2400;3600;4800;7200;9600;19200;57600" into choices
    put popMenu(the mouseLoc,choices) into selectedMenuItem
    if selectedMenuItem is 0 then exit serialPortInterface
    set itemDelimiter to ";"
    put item selectedMenuItem of choices into rate
    put "baud" & rate into the target
    exit serialPortInterface
  end if
  -------------------------------------------------------------------------
end serialPortInterface