* This script is Copyright 1995 by Steve Israelson
* Segments a line and then adds a small alcove
* to that line segment.  Then puts a control panel in it.
*
* Before calling this script, set A to the control panel type.
* Set B to the width of the control panel
* Set C to the height of the control panel

segmentLine B
* The pen is at the first point in the line pointing at the
* second, so turn -90 degrees to point away from the line
turn -90
newLine 64
turn 90
* here we set the type of next wall to the specified control panel
wallType A
newLine B
* Here we use a shortcut to connect to the last line of the
* original starting segment
lastPoint
makeLine
* We are done plotting points, now actually make the poly
floorHeight 400
height C
polyType MonsterImpassable
closePoly
