el sensado del robot ya esta, cuando lo integremos seguro habra que agregar cosas...

[z.facultad/75.68/celdas.git] / trunk / src / breve / robot / Demo-2wheels2-5.tz

diff --git a/trunk/src/breve/robot/Demo-2wheels2-5.tz b/trunk/src/breve/robot/Demo-2wheels2-5.tz
index 4e44234a966b063336a16e5e7ef486d87b43ba24..da40ac76fb6562c00d88020b4fac986a02b82625 100644 (file)
--- a/trunk/src/breve/robot/Demo-2wheels2-5.tz
+++ b/trunk/src/breve/robot/Demo-2wheels2-5.tz
@@ -16,9 +16,11 @@ CeldasControl : DemoController {
                 obs = new CeldasObstacle .
                 obs init at-location (0,1,10)with-size (20,3,1).\r
                 obs set-direction at (0,0,1) .\r
                 obs = new CeldasObstacle .
                 obs init at-location (0,1,10)with-size (20,3,1).\r
                 obs set-direction at (0,0,1) .\r

+                \r

                 obs = new CeldasObstacle. \r
                 obs init at-location (-25,1,0) with-size (20,3,1).\r
                 obs set-direction at (0,0,1).\r
                 obs = new CeldasObstacle. \r
                 obs init at-location (-25,1,0) with-size (20,3,1).\r
                 obs set-direction at (0,0,1).\r

+                \r

                 obs = new CeldasObstacle.\r
                 obs init at-location (-10,1,-10) with-size (1,3,20).\r
                 obs set-direction at (1,0,0).\r
                 obs = new CeldasObstacle.\r
                 obs init at-location (-10,1,-10) with-size (1,3,20).\r
                 obs set-direction at (1,0,0).\r


@@ -27,6 +29,10 @@ CeldasControl : DemoController {
                 obs init at-location (-10,1,10)  with-size (1,3,20).\r
                 obs set-direction at (1,0,0).\r
 
                 obs init at-location (-10,1,10)  with-size (1,3,20).\r
                 obs set-direction at (1,0,0).\r
 

+                obs = new CeldasObstacle.\r
+                obs init at-location (10,1,10)  with-size (1,3,20).\r
+                obs set-direction at (1,0,0).\r
+\r

                vehicle = new CeldasVehicle.
                self watch item vehicle.
 
                vehicle = new CeldasVehicle.
                self watch item vehicle.