$wallb = new TShape( c("Form1") ); // Íà÷èíàåì çàäàâàòü óñëîâèÿ ñîçäàíèÿ ñòåíû
$wallb->parent = c("Form1");
$wallb->name="wall1";
$wallb->w = 32;
$wallb->h = 8;
$wallb->x = floor($x/32)*32;
$wallb->y = floor(($y+16)/32)*32-4;