ScriptManager
Script Manager
4
1115
361
554
Normal
Start
Say("Connexion établie")
Chercher visage
ControlCommand("Camera", CameraFaceTrackingEnable)
ControlCommand("Camera", CameraMovementTrackEnable)
ServoSpeed(d10, 4)
ServoSpeed(d11, 4)
Servo(d10, 50)
Servo(d11, 60)
:LOOP
IF ($CameraIsTracking = 0)
ServoRandom(d10, 30, 70)
ServoRandom(d11, 40, 75)
Sleep(1000)
ELSEIF ($CameraIsTracking = 1)
ControlCommand("Camera", CameraSnapshot)
MP3TriggerPlayTrack(d5, 38400, 5, 2000)
ServoSpeed(d10, 1)
ServoSpeed(d11, 1)
Servo(d8, 85)
Servo(d9, 15)
ControlCommand("Camera", CameraFaceTrackingDisable)
ControlCommand("Camera", CameraMovementTrackDisable)
Sleep(3000)
ServoSpeed(d10, 2)
ServoSpeed(d11, 2)
Servo(d10, 50)
Servo(d11, 60)
Servo(d8, 50)
Servo(d9, 50)
Halt()
ENDIF
Goto(LOOP)
Position d'attente
Sleep(1000)
ServoSpeed(d10, 2)
ServoSpeed(d11, 2)
ServoSpeed(d8, 2)
ServoSpeed(d9, 2)
Sleep(500)
Servo(d10, 50)
Servo(d11, 60)
Servo(d8, 50)
Servo(d9, 50)
Sleep(1000)
Lever les bras
Servo(d8, 85)
Servo(d9, 15)
Baisser les bras
Servo(d8, 30)
Servo(d9, 70)
Non (de la tête)
ServoSpeed(d10, 2)
Servo(d11, 50)
Sleep(500)
Servo(d10, 35)
Sleep(300)
Servo(d10, 65)
Sleep(400)
Servo(d10, 35)
Sleep(400)
Servo(d10, 50)
Sleep(400)
ServoSpeed(d10, 1)
Sleep(1000)
Servo(d11, 60)
Oui (de la tête)
ServoSpeed(d11, 2)
ServoSpeed(d10, 2)
Servo(d10, 50)
Sleep(500)
Servo(d11, 35)
Sleep(300)
Servo(d11, 65)
Sleep(400)
Servo(d11, 35)
Sleep(400)
Servo(d11, 60)
Sleep(400)
ServoSpeed(d11, 1)
Sleep(1000)
Face photo
ControlCommand("Camera", CameraFaceTrackingEnable)
Servo(d10, 50)
Servo(d11, 60)
$Snapshot = 0
:LOOP
IF ($CameraIsTracking = 1)
ControlCommand("Camera", CameraSnapshot)
MP3TriggerPlayTrack(d5, 38400, 5, 2000)
$Snapshot = $Snapshot+1
print ("Photo N°$Snapshot")
IF ($Snapshot=3)
ControlCommand("Camera", CameraFaceTrackingDisable)
sleep(100)
Servo(d11, 60)
Halt()
ENDIF
Sleep (3000)
ENDIF
Goto(LOOP)
Face record
ControlCommand("Camera", CameraFaceTrackingEnable)
Servo(d10, 50)
Servo(d11, 60)
:LOOP
IF ($CameraIsTracking = 1)
ControlCommand("Camera", CameraRecordStart)
sleep(10000)
ControlCommand("Camera", CameraRecordStop)
ControlCommand("Camera", CameraFaceTrackingDisable)
Sleep(1000)
Servo(d11, 60)
Sleep(1000)
Halt()
ENDIF
Goto(LOOP)
Movement, then Face tracking
ControlCommand("Camera", CameraMotionTrackingEnable)
Servo(d10, 50)
Servo(d11, 60)
$timer = 10
:LOOP1
IF ($CameraIsTracking = 1)
ControlCommand("Camera", CameraMotionTrackingDisable)
ControlCommand("Camera", CameraFaceTrackingEnable)
Sleep(3000)
:LOOP2
IF ($CameraIsTracking = 1)
ControlCommand("Camera", CameraRecordStart)
sleep(10000)
ControlCommand("Camera", CameraRecordStop)
ControlCommand("Camera", CameraFaceTrackingDisable)
ControlCommand("Camera", CameraMotionTrackingEnable)
Sleep(1000)
ELSEIF ($CameraIsTracking = 0 AND $timer > 0)
Sleep(1000)
$timer = $timer-1
print ($timer)
Goto(LOOP2)
ELSE
$timer = 10
ControlCommand("Camera", CameraFaceTrackingDisable)
ControlCommand("Camera", CameraMotionTrackingEnable)
Sleep(1000)
ENDIF
ENDIF
Goto(LOOP1)
Tour complet (à gauche)
Sleep(500)
left(255,5225)
Sleep(1000)
Tour complet (à droite)
Sleep(500)
right(255,5225)
Sleep(1000)
Demi-tour (à droite)
Sleep(500)
right(255,2610)
Sleep(1000)
Demi-tour (à gauche)
Sleep(500)
left(255,2610)
Sleep(1000)
Tourner à droite
Sleep(500)
right(255,1305)
Sleep(1000)
Tourner à gauche
Sleep(500)
left(255,1305)
Sleep(1000)
Notes
Notepad
155
1488
236
307
Normal
D0: Roue droite
D1: Roue gauche
D5: MP3 Trigger
D6: Mp3 Trigger (power)
D8: Bras droit
D9: Bras gauche
D10: Cou
D11: Tête
D13: PING Trigger
D14: PING Echo
D16: Oeil ON/OFF
D17: Camera ON/OFF
VoiceRecognition
Speech Recognition
5
1487
0
0
Normal
walli avance
forward()
walli recule
reverse()
walli tourne à gauche
left(255, 1000)
walli tourne à droite
right(255, 1000)
walli stop
stop()
0.92
Robot Enable Speech
Robot Disable Speech
false
SpeechSettings
Speech Settings
275
1734
0
0
Normal
Male
Adult
Moderate
Medium
Microsoft Hortense Desktop
100
Script
Déconnexion
140
1730
179
130
Normal
Script
Connexion
5
1731
178
130
Normal
SetDigital
Fan
648
58
0
0
Normal
D19
0
PingRadar
Radar Scan
218
10
0
0
Normal
false
0
D13
D14
250
25
true
true
true
250
1
60
40
NA
false
SetDigital
Led_Oeil-switch
453
183
0
0
Normal
D16
0
ModifiedServoMovementPanel
Servo Movement Panel
457
18
0
0
Normal
D1
D0
1
100
100
1
49
49
false
SetDigital
Camera-switch
549
183
0
0
Normal
D17
0
Servo_Vertical
Bras droit
563
953
0
0
Normal
D8
35
85
0
1
Master
false
Servo_Vertical
Bras gauche
564
788
0
0
Normal
D9
15
70
0
1
Master
false
Servo_Vertical
Bras
564
624
0
0
Normal
D8
20
81
0
1
Bras droit
false
D9
15
73
0
1
Bras gauche
true
Servo_Vertical
Tête
564
461
0
0
Normal
D11
35
85
0
1
Master
false
Servo_Horizontal
Cou
565
300
0
0
Normal
D10
30
70
0
1
Master
false
Connection
5
4
0
0
Normal
ControlCommand("Script Manager", ScriptStart, "Start")
COM4
6666
6667
6668
6669
6670
false
false
false
false
false
true
true
true
true
true
9600
SetDigital
MP3 Trigger Power
647
186
0
0
Normal
D6
0
CameraDevice
Camera
4
303
808
555
Normal
false
false
true
false
50
false
false
false
false
false
false
10
127
0
110
10
Red
Wireless Video Device
89
232
68
175
D10
30
70
0
1
Master
false
D11
35
85
0
1
Master
false
10
2
3
false
true
53
28
0
C:\Users\fredebec\Pictures\My Robot Pictures
100
99
24
MPEG4
true
www.ez-robot.com
2
$CameraIsTracking
$CameraCenterX
$CameraCenterY
$CameraObjectWidth
$CameraObjectHeight
res320x240
$CameraQRCode
119
MP3Trigger
MP3 Trigger
468
1512
344
123
Normal
0
100
Baud_38400
D5
true
1936
1056
2013.02.26.00