Page 1 sur 1

[Résolu] Agrandir la zone d'affichage des figures 3D

MessagePosté: Mercredi 12 Juillet 2017, 19:21
par AndréC
Bonjour,
A partir du dé créé dans le fil suivant : http://forum.mathematex.net/asymptote-f34/supprimer-le-scintillement-d-un-de-a-jouer-en-3d-t16837.html j'ai créé une diapositive Beamer.

Lorsqu'il tourne avec la souris, il est découpé sur les bords gauche et droit. Comment peut faire en sorte que la zone d'affichage soit plus grande afin qu'il ne soit pas coupé lorsqu'il tourne ?

Le code LaTeX est le suivant :

Code: Tout sélectionner
% ****************** Début du préambule ******************
\documentclass[hyperref={pdfpagemode=FullScreen,colorlinks=true},
xcolor={dvipsnames,svgnames,table},aspectratio=169]{beamer} % Présentation générale et mise en page
\setbeamertemplate{navigation symbols}{}

\usepackage[utf8]{inputenc}
\usepackage[T1]{fontenc}           % Encodage des caractères accentués
\usepackage[inline]{asymptote}
\usepackage{tikz}     
\usepackage[frenchb]{babel}     % Règles françaises de typographie   

\usetheme{Madrid}
\setbeamertemplate{navigation symbols}{}
\author{AndréC}
\institute{Collège}
\title[Géométrie de l'espace] {Fiche 1}

   
\begin{document}

\begin{frame}[fragile]
\begin{asy}
import three;
    currentprojection =orthographic((5,2,3));
    currentlight=nolight;
    settings.tex="latex"; // Moteur LaTeX utilisé pour la compilation (latex, pdflatex, ...)
    settings.outformat="pdf"; // Format de sortie ; eps par défaut
    settings.prc=true; // Format PRC de la figure ; vrai par défaut
    settings.render=-1; // Rendu des figures ; -1 par défaut
    size(4cm,0);
    real a = 0.05;
    real h=0.001;
    path  carre = box ((0,0),(84a,84a)),
          disque = scale(9a)*unitcircle,
          patron1[] = shift(42a,42a)*disque,
          patron2[] = shift(14a,70a)*disque^^shift(70a,14a)*disque,
          patron3[] = shift(14a,70a)*disque^^shift(70a,14a)*disque^^shift(42a,42a)*disque,
          patron4[] = shift(14a,14a)*disque^^shift(14a,70a)*disque^^shift(70a,14a)*disque^^shift(70a,70a)*disque,
          patron5[] = shift(14a,14a)*disque^^shift(14a,70a)*disque^^shift(70a,14a)*disque^^shift(70a,70a)*disque^^shift(42a,42a)*disque,
          patron6[] = shift(14a,14a)*disque^^shift(14a,70a)*disque^^shift(70a,14a)*disque^^shift(70a,70a)*disque^^shift(42a,70a)*disque^^shift(42a,14a)*disque;
    transform3 tX=shift(-(84a+h)*X), tY=shift((84a+h)*Y), tZ=shift((84a+h)*Z);     
    path3 facegauche[] =shift(0,-h,0)*path3(patron6,ZXplane),
          facedroite[] =path3(patron1,ZXplane),
          faceavant[] =shift(h,0,0)*path3(patron2,YZplane),
          facearriere[] =shift(-h,0,0)*path3(patron5,YZplane),   
          facehaut[] =path3(patron4,XYplane),     
          facebas[] =shift(0,0,-h)*path3(patron3,XYplane);
//   draw(O--4.2X ^^ O--4.2Y ^^ O--4.2Z,red);     
    draw(tX*scale3(84a)*unitcube, surfacepen=lightolive);
    draw(box(O, 84a*(-X+Y+Z)), palecyan);
    draw(surface(tX*facegauche),darkmagenta);
    draw(surface(tX*tY*facedroite),darkmagenta);
    draw(surface(tX*tZ*facehaut),darkmagenta);
    draw(surface(-tX*facebas),darkmagenta);
    draw(surface(-tX*facearriere),darkmagenta);
    draw(surface(faceavant),darkmagenta);
\end{asy}
\end{frame}

\end{document}


Merci de vos lumières.

Re: Agrandir la zone d'affichage des figures 3D

MessagePosté: Mercredi 12 Juillet 2017, 21:35
par rebouxo
tu peux régler le facteur de zoom. Dans la fénêtre 3D, tu tape c, et tu récupère les positions de la caméra, du zoom, etc. Il n'y a plus qu'à faire un copier-coller.
Olivier

Re: Agrandir la zone d'affichage des figures 3D

MessagePosté: Mercredi 12 Juillet 2017, 22:13
par AndréC
Super, ça fonctionne nickel !