Building 33: Programming and using the glue robot

### WAIT_FOR_START ###
000
001   rem 'This program resets the robot head and stages, sounds a buzzer, and waits for the start signal.'
002   moveToZ 0,10
003     wait 5
004   moveToY 0,10
005   moveToX 0,10
006   onoffBZ 1,10
007   waitStart
008

### DRAW_LINE ###
000
001   rem 'This program draws a simple cross pattern.'
002   declare finalHeight
003   let finalHeight = inCom port03 + 100
004   let finalHeight = finalHeight + #wrkAdj(5)
005   moveToZ finalHeight,10
006   wait 5
007   lineMoveSpeed 10
008      lineMoveX 30
009      lineMoveY 40
010      lineMoveZ 0
011      lineMoveR 45
012    endLineMove
013    if
014      ld #sysFlag12
015    then
016      waitStart
017    end
018    moveToZ (finalHeight-100),15
019    moveToX 50,10
020    moveToY 50,10
021    moveToZ finalHeight,10
022    wait 5
023    lineMoveSpeed 10
024      lineMoveX -30
025      lineMoveY -40
026      lineMoveZ 0
027      lineMoveR 45
028    endLineMove
029    if 
030       ld #sysFlag32
031    then
032       waitStart
033    end
034