#------------------------------------------------------------------------------
# TiViPE Textual Robotics Language. 
# Copyright (c) 2016, TiViPE, All rights reserved.
# Url:    www.tivipe.com
# Email:  tino@tivipe.com
# Author: Tino Lourens
# Date:   07 Sep 2016
#------------------------------------------------------------------------------
#------------------------------------------------------------------------------
# Move robot to a sitting position
#------------------------------------------------------------------------------
wait(2000)
&
stiff (1, 500, 0)
&
posture(Sit)
&
stiff(0, 500, 0)
&
#------------------------------------------------------------------------------
# Test all led names 175 in total
#------------------------------------------------------------------------------
say(There_are_89_leds_that_can_be_controlled) & wait(1000) & say(In_total_175_names_are_defined_that_control_one_or_a_group_of_leds.)
& ledon(AllLeds) & wait(500) & ledoff(AllLeds) & wait(500)
& ledon(AllLedsBlue) & wait(500) & ledoff(AllLedsBlue) & wait(500)
& ledon(AllLedsGreen) & wait(500) & ledoff(AllLedsGreen) & wait(500)
& ledon(AllLedsRed) & wait(500) & ledoff(AllLedsRed) & wait(500)
& ledon(Brain0) & wait(500) & ledoff(Brain0) & wait(500)
& ledon(Brain1) & wait(500) & ledoff(Brain1) & wait(500)
& ledon(Brain2) & wait(500) & ledoff(Brain2) & wait(500)
& ledon(Brain3) & wait(500) & ledoff(Brain3) & wait(500)
& ledon(Brain4) & wait(500) & ledoff(Brain4) & wait(500)
& ledon(Brain5) & wait(500) & ledoff(Brain5) & wait(500)
& ledon(Brain6) & wait(500) & ledoff(Brain6) & wait(500)
& ledon(Brain7) & wait(500) & ledoff(Brain7) & wait(500)
& ledon(Brain8) & wait(500) & ledoff(Brain8) & wait(500)
& ledon(Brain9) & wait(500) & ledoff(Brain9) & wait(500)
& ledon(Brain10) & wait(500) & ledoff(Brain10) & wait(500)
& ledon(Brain11) & wait(500) & ledoff(Brain11) & wait(500)
& ledon(BrainLeds) & wait(500) & ledoff(BrainLeds) & wait(500)
& ledon(BrainLedsBack) & wait(500) & ledoff(BrainLedsBack) & wait(500)
& ledon(BrainLedsFront) & wait(500) & ledoff(BrainLedsFront) & wait(500)
& ledon(BrainLedsLeft) & wait(500) & ledoff(BrainLedsLeft) & wait(500)
& ledon(BrainLedsMiddle) & wait(500) & ledoff(BrainLedsMiddle) & wait(500)
& ledon(BrainLedsRight) & wait(500) & ledoff(BrainLedsRight) & wait(500)
& ledon(ChestLedBlue) & wait(500) & ledoff(ChestLedBlue) & wait(500)
& ledon(ChestLedGreen) & wait(500) & ledoff(ChestLedGreen) & wait(500)
& ledon(ChestLedRed) & wait(500) & ledoff(ChestLedRed) & wait(500)
& ledon(ChestLeds) & wait(500) & ledoff(ChestLeds) & wait(500)
& ledon(EarLeds) & wait(500) & ledoff(EarLeds) & wait(500)
& ledon(FaceLed0) & wait(500) & ledoff(FaceLed0) & wait(500)
& ledon(FaceLed1) & wait(500) & ledoff(FaceLed1) & wait(500)
& ledon(FaceLed2) & wait(500) & ledoff(FaceLed2) & wait(500)
& ledon(FaceLed3) & wait(500) & ledoff(FaceLed3) & wait(500)
& ledon(FaceLed4) & wait(500) & ledoff(FaceLed4) & wait(500)
& ledon(FaceLed5) & wait(500) & ledoff(FaceLed5) & wait(500)
& ledon(FaceLed6) & wait(500) & ledoff(FaceLed6) & wait(500)
& ledon(FaceLed7) & wait(500) & ledoff(FaceLed7) & wait(500)
& ledon(FaceLedLeft0) & wait(500) & ledoff(FaceLedLeft0) & wait(500)
& ledon(FaceLedLeft1) & wait(500) & ledoff(FaceLedLeft1) & wait(500)
& ledon(FaceLedLeft2) & wait(500) & ledoff(FaceLedLeft2) & wait(500)
& ledon(FaceLedLeft3) & wait(500) & ledoff(FaceLedLeft3) & wait(500)
& ledon(FaceLedLeft4) & wait(500) & ledoff(FaceLedLeft4) & wait(500)
& ledon(FaceLedLeft5) & wait(500) & ledoff(FaceLedLeft5) & wait(500)
& ledon(FaceLedLeft6) & wait(500) & ledoff(FaceLedLeft6) & wait(500)
& ledon(FaceLedLeft7) & wait(500) & ledoff(FaceLedLeft7) & wait(500)
& ledon(FaceLedRight0) & wait(500) & ledoff(FaceLedRight0) & wait(500)
& ledon(FaceLedRight1) & wait(500) & ledoff(FaceLedRight1) & wait(500)
& ledon(FaceLedRight2) & wait(500) & ledoff(FaceLedRight2) & wait(500)
& ledon(FaceLedRight3) & wait(500) & ledoff(FaceLedRight3) & wait(500)
& ledon(FaceLedRight4) & wait(500) & ledoff(FaceLedRight4) & wait(500)
& ledon(FaceLedRight5) & wait(500) & ledoff(FaceLedRight5) & wait(500)
& ledon(FaceLedRight6) & wait(500) & ledoff(FaceLedRight6) & wait(500)
& ledon(FaceLedRight7) & wait(500) & ledoff(FaceLedRight7) & wait(500)
& ledon(FaceLeds) & wait(500) & ledoff(FaceLeds) & wait(500)
& ledon(FaceLedsBottom) & wait(500) & ledoff(FaceLedsBottom) & wait(500)
& ledon(FaceLedsExternal) & wait(500) & ledoff(FaceLedsExternal) & wait(500)
& ledon(FaceLedsInternal) & wait(500) & ledoff(FaceLedsInternal) & wait(500)
& ledon(FaceLedsLeftBottom) & wait(500) & ledoff(FaceLedsLeftBottom) & wait(500)
& ledon(FaceLedsLeftExternal) & wait(500) & ledoff(FaceLedsLeftExternal) & wait(500)
& ledon(FaceLedsLeftInternal) & wait(500) & ledoff(FaceLedsLeftInternal) & wait(500)
& ledon(FaceLedsLeftTop) & wait(500) & ledoff(FaceLedsLeftTop) & wait(500)
& ledon(FaceLedsRightBottom) & wait(500) & ledoff(FaceLedsRightBottom) & wait(500)
& ledon(FaceLedsRightExternal) & wait(500) & ledoff(FaceLedsRightExternal) & wait(500)
& ledon(FaceLedsRightInternal) & wait(500) & ledoff(FaceLedsRightInternal) & wait(500)
& ledon(FaceLedsRightTop) & wait(500) & ledoff(FaceLedsRightTop) & wait(500)
& ledon(FaceLedsTop) & wait(500) & ledoff(FaceLedsTop) & wait(500)
& ledon(FeetLeds) & wait(500) & ledoff(FeetLeds) & wait(500)
& ledon(LeftEarLed0) & wait(500) & ledoff(LeftEarLed0) & wait(500)
& ledon(LeftEarLed1) & wait(500) & ledoff(LeftEarLed1) & wait(500)
& ledon(LeftEarLed2) & wait(500) & ledoff(LeftEarLed2) & wait(500)
& ledon(LeftEarLed3) & wait(500) & ledoff(LeftEarLed3) & wait(500)
& ledon(LeftEarLed4) & wait(500) & ledoff(LeftEarLed4) & wait(500)
& ledon(LeftEarLed5) & wait(500) & ledoff(LeftEarLed5) & wait(500)
& ledon(LeftEarLed6) & wait(500) & ledoff(LeftEarLed6) & wait(500)
& ledon(LeftEarLed7) & wait(500) & ledoff(LeftEarLed7) & wait(500)
& ledon(LeftEarLed8) & wait(500) & ledoff(LeftEarLed8) & wait(500)
& ledon(LeftEarLed9) & wait(500) & ledoff(LeftEarLed9) & wait(500)
& ledon(LeftEarLeds) & wait(500) & ledoff(LeftEarLeds) & wait(500)
& ledon(LeftEarLedsBack) & wait(500) & ledoff(LeftEarLedsBack) & wait(500)
& ledon(LeftEarLedsEven) & wait(500) & ledoff(LeftEarLedsEven) & wait(500)
& ledon(LeftEarLedsFront) & wait(500) & ledoff(LeftEarLedsFront) & wait(500)
& ledon(LeftEarLedsOdd) & wait(500) & ledoff(LeftEarLedsOdd) & wait(500)
& ledon(LeftFaceLed0) & wait(500) & ledoff(LeftFaceLed0) & wait(500)
& ledon(LeftFaceLed1) & wait(500) & ledoff(LeftFaceLed1) & wait(500)
& ledon(LeftFaceLed2) & wait(500) & ledoff(LeftFaceLed2) & wait(500)
& ledon(LeftFaceLed3) & wait(500) & ledoff(LeftFaceLed3) & wait(500)
& ledon(LeftFaceLed4) & wait(500) & ledoff(LeftFaceLed4) & wait(500)
& ledon(LeftFaceLed5) & wait(500) & ledoff(LeftFaceLed5) & wait(500)
& ledon(LeftFaceLed6) & wait(500) & ledoff(LeftFaceLed6) & wait(500)
& ledon(LeftFaceLed7) & wait(500) & ledoff(LeftFaceLed7) & wait(500)
& ledon(LeftFaceLedBlue0) & wait(500) & ledoff(LeftFaceLedBlue0) & wait(500)
& ledon(LeftFaceLedBlue1) & wait(500) & ledoff(LeftFaceLedBlue1) & wait(500)
& ledon(LeftFaceLedBlue2) & wait(500) & ledoff(LeftFaceLedBlue2) & wait(500)
& ledon(LeftFaceLedBlue3) & wait(500) & ledoff(LeftFaceLedBlue3) & wait(500)
& ledon(LeftFaceLedBlue4) & wait(500) & ledoff(LeftFaceLedBlue4) & wait(500)
& ledon(LeftFaceLedBlue5) & wait(500) & ledoff(LeftFaceLedBlue5) & wait(500)
& ledon(LeftFaceLedBlue6) & wait(500) & ledoff(LeftFaceLedBlue6) & wait(500)
& ledon(LeftFaceLedBlue7) & wait(500) & ledoff(LeftFaceLedBlue7) & wait(500)
& ledon(LeftFaceLedGreen0) & wait(500) & ledoff(LeftFaceLedGreen0) & wait(500)
& ledon(LeftFaceLedGreen1) & wait(500) & ledoff(LeftFaceLedGreen1) & wait(500)
& ledon(LeftFaceLedGreen2) & wait(500) & ledoff(LeftFaceLedGreen2) & wait(500)
& ledon(LeftFaceLedGreen3) & wait(500) & ledoff(LeftFaceLedGreen3) & wait(500)
& ledon(LeftFaceLedGreen4) & wait(500) & ledoff(LeftFaceLedGreen4) & wait(500)
& ledon(LeftFaceLedGreen5) & wait(500) & ledoff(LeftFaceLedGreen5) & wait(500)
& ledon(LeftFaceLedGreen6) & wait(500) & ledoff(LeftFaceLedGreen6) & wait(500)
& ledon(LeftFaceLedGreen7) & wait(500) & ledoff(LeftFaceLedGreen7) & wait(500)
& ledon(LeftFaceLedRed0) & wait(500) & ledoff(LeftFaceLedRed0) & wait(500)
& ledon(LeftFaceLedRed1) & wait(500) & ledoff(LeftFaceLedRed1) & wait(500)
& ledon(LeftFaceLedRed2) & wait(500) & ledoff(LeftFaceLedRed2) & wait(500)
& ledon(LeftFaceLedRed3) & wait(500) & ledoff(LeftFaceLedRed3) & wait(500)
& ledon(LeftFaceLedRed4) & wait(500) & ledoff(LeftFaceLedRed4) & wait(500)
& ledon(LeftFaceLedRed5) & wait(500) & ledoff(LeftFaceLedRed5) & wait(500)
& ledon(LeftFaceLedRed6) & wait(500) & ledoff(LeftFaceLedRed6) & wait(500)
& ledon(LeftFaceLedRed7) & wait(500) & ledoff(LeftFaceLedRed7) & wait(500)
& ledon(LeftFaceLeds) & wait(500) & ledoff(LeftFaceLeds) & wait(500)
& ledon(LeftFaceLedsBlue) & wait(500) & ledoff(LeftFaceLedsBlue) & wait(500)
& ledon(LeftFaceLedsGreen) & wait(500) & ledoff(LeftFaceLedsGreen) & wait(500)
& ledon(LeftFaceLedsRed) & wait(500) & ledoff(LeftFaceLedsRed) & wait(500)
& ledon(LeftFootLeds) & wait(500) & ledoff(LeftFootLeds) & wait(500)
& ledon(LeftFootLedsBlue) & wait(500) & ledoff(LeftFootLedsBlue) & wait(500)
& ledon(LeftFootLedsGreen) & wait(500) & ledoff(LeftFootLedsGreen) & wait(500)
& ledon(LeftFootLedsRed) & wait(500) & ledoff(LeftFootLedsRed) & wait(500)
& ledon(RightEarLed0) & wait(500) & ledoff(RightEarLed0) & wait(500)
& ledon(RightEarLed1) & wait(500) & ledoff(RightEarLed1) & wait(500)
& ledon(RightEarLed2) & wait(500) & ledoff(RightEarLed2) & wait(500)
& ledon(RightEarLed3) & wait(500) & ledoff(RightEarLed3) & wait(500)
& ledon(RightEarLed4) & wait(500) & ledoff(RightEarLed4) & wait(500)
& ledon(RightEarLed5) & wait(500) & ledoff(RightEarLed5) & wait(500)
& ledon(RightEarLed6) & wait(500) & ledoff(RightEarLed6) & wait(500)
& ledon(RightEarLed7) & wait(500) & ledoff(RightEarLed7) & wait(500)
& ledon(RightEarLed8) & wait(500) & ledoff(RightEarLed8) & wait(500)
& ledon(RightEarLed9) & wait(500) & ledoff(RightEarLed9) & wait(500)
& ledon(RightEarLeds) & wait(500) & ledoff(RightEarLeds) & wait(500)
& ledon(RightEarLedsBack) & wait(500) & ledoff(RightEarLedsBack) & wait(500)
& ledon(RightEarLedsEven) & wait(500) & ledoff(RightEarLedsEven) & wait(500)
& ledon(RightEarLedsFront) & wait(500) & ledoff(RightEarLedsFront) & wait(500)
& ledon(RightEarLedsOdd) & wait(500) & ledoff(RightEarLedsOdd) & wait(500)
& ledon(RightFaceLed0) & wait(500) & ledoff(RightFaceLed0) & wait(500)
& ledon(RightFaceLed1) & wait(500) & ledoff(RightFaceLed1) & wait(500)
& ledon(RightFaceLed2) & wait(500) & ledoff(RightFaceLed2) & wait(500)
& ledon(RightFaceLed3) & wait(500) & ledoff(RightFaceLed3) & wait(500)
& ledon(RightFaceLed4) & wait(500) & ledoff(RightFaceLed4) & wait(500)
& ledon(RightFaceLed5) & wait(500) & ledoff(RightFaceLed5) & wait(500)
& ledon(RightFaceLed6) & wait(500) & ledoff(RightFaceLed6) & wait(500)
& ledon(RightFaceLed7) & wait(500) & ledoff(RightFaceLed7) & wait(500)
& ledon(RightFaceLedBlue0) & wait(500) & ledoff(RightFaceLedBlue0) & wait(500)
& ledon(RightFaceLedBlue1) & wait(500) & ledoff(RightFaceLedBlue1) & wait(500)
& ledon(RightFaceLedBlue2) & wait(500) & ledoff(RightFaceLedBlue2) & wait(500)
& ledon(RightFaceLedBlue3) & wait(500) & ledoff(RightFaceLedBlue3) & wait(500)
& ledon(RightFaceLedBlue4) & wait(500) & ledoff(RightFaceLedBlue4) & wait(500)
& ledon(RightFaceLedBlue5) & wait(500) & ledoff(RightFaceLedBlue5) & wait(500)
& ledon(RightFaceLedBlue6) & wait(500) & ledoff(RightFaceLedBlue6) & wait(500)
& ledon(RightFaceLedBlue7) & wait(500) & ledoff(RightFaceLedBlue7) & wait(500)
& ledon(RightFaceLedGreen0) & wait(500) & ledoff(RightFaceLedGreen0) & wait(500)
& ledon(RightFaceLedGreen1) & wait(500) & ledoff(RightFaceLedGreen1) & wait(500)
& ledon(RightFaceLedGreen2) & wait(500) & ledoff(RightFaceLedGreen2) & wait(500)
& ledon(RightFaceLedGreen3) & wait(500) & ledoff(RightFaceLedGreen3) & wait(500)
& ledon(RightFaceLedGreen4) & wait(500) & ledoff(RightFaceLedGreen4) & wait(500)
& ledon(RightFaceLedGreen5) & wait(500) & ledoff(RightFaceLedGreen5) & wait(500)
& ledon(RightFaceLedGreen6) & wait(500) & ledoff(RightFaceLedGreen6) & wait(500)
& ledon(RightFaceLedGreen7) & wait(500) & ledoff(RightFaceLedGreen7) & wait(500)
& ledon(RightFaceLedRed0) & wait(500) & ledoff(RightFaceLedRed0) & wait(500)
& ledon(RightFaceLedRed1) & wait(500) & ledoff(RightFaceLedRed1) & wait(500)
& ledon(RightFaceLedRed2) & wait(500) & ledoff(RightFaceLedRed2) & wait(500)
& ledon(RightFaceLedRed3) & wait(500) & ledoff(RightFaceLedRed3) & wait(500)
& ledon(RightFaceLedRed4) & wait(500) & ledoff(RightFaceLedRed4) & wait(500)
& ledon(RightFaceLedRed5) & wait(500) & ledoff(RightFaceLedRed5) & wait(500)
& ledon(RightFaceLedRed6) & wait(500) & ledoff(RightFaceLedRed6) & wait(500)
& ledon(RightFaceLedRed7) & wait(500) & ledoff(RightFaceLedRed7) & wait(500)
& ledon(RightFaceLeds) & wait(500) & ledoff(RightFaceLeds) & wait(500)
& ledon(RightFaceLedsBlue) & wait(500) & ledoff(RightFaceLedsBlue) & wait(500)
& ledon(RightFaceLedsGreen) & wait(500) & ledoff(RightFaceLedsGreen) & wait(500)
& ledon(RightFaceLedsRed) & wait(500) & ledoff(RightFaceLedsRed) & wait(500)
& ledon(RightFootLeds) & wait(500) & ledoff(RightFootLeds) & wait(500)
& ledon(RightFootLedsBlue) & wait(500) & ledoff(RightFootLedsBlue) & wait(500)
& ledon(RightFootLedsGreen) & wait(500) & ledoff(RightFootLedsGreen) & wait(500)
& ledon(RightFootLedsRed) & wait(500) & ledoff(RightFootLedsRed) & wait(500)
&
say(Ready)
#------------------------------------------------------------------------------
# End of program
#------------------------------------------------------------------------------