First guess at 'spawn_square' procedure