geometry : cercles inscrits entre 2 droites et passant par un point

geometry : cercles inscrits entre 2 droites et passant par un point

copier/coller le code gam1  ci-dessous pour remplacer dans : [créer du gam1 jouer-modifier un graphisme gam1 ]

_-_-_-_-_-_ cercles entre 2 droites _-_-_ (normal DIRECT) _-_-_-_-_-_

T1:p=150.0;30.0	cc=50,50,0	cf=222,222,250,0.7	sty=italique	d=12	t=cercles tangents au point et aux droites	!
P1:p=40.0;230.0 !
M0:pr=100 dx=1 dy=0 !
M1:pr=800 dx=4 dy=-2 !
M2:pr=500 dx=3 dy=22 !
M3:a=10.5 !
M4:a=350.5 !
//I1:p=550;400 i=ds1autres/lunette.jpg !
//CMD8rt: # I2.f_Estom(1,1,0,0,250,247,200) !
//I2:p=550;400 i=ds1autres/spires.jpg !
//CMD8ru: # I1.f_Enfle(0.5,1.7,0.0,0.0,0.0) !
$V1: type=nombre(0,0,30) !
$V2: type=nombre(0,0,30) !
Tp2:t=7_35 !
Tp3:t=5_40 !
Tp4:t=20_45 !
T2:p=50;P1.y+160 t=éloignement du point : !
A1:p=10;70 t=320 bo=40;800 va=200 !
T3:p=30;380 VU_OUI t= : hauteur du point. !
Proc1:tempo=200 nb=77 rep=1 !
Proc2:tempo=100 nb=50 rep=3 !
A2:p=5;115 t=500 bo=A1.min-30;A1.va*0.51 !va=A1.va*0.3 or=1 #
A3:p=10;10 t=500 bo=-1;100 va=27 #
A4:p=10;40 t=500 bo=-20;22 va=2 #
P2:p=P1.x+A1.va;P1.y-A2.va #
D1:p1=P1 p2=P1.x+800;P1.y-400.0 cc=0,40,250 #
D2:p1=D1.p1 p2=D1.p2.x;P1.y+400.0 cc=0,40,250 #
D3:p1=D1.p1 p2=D1.p2.x;P1.y cc=0,200,200 #
D4:p1=P2.x;0.0 p2=P2.x;718.0 cc=0,200,200 #
E0:c=P2.x;P2.y dm=3 cc=80,70,100 cf=70,50,70 #
E1:c=P2.x;P1.y dm=P1.y-P2.y cc=80,70,100 cf=70,250,70 #
D5:p1=P2.x;P1.y p2=D1*D4 cc=20,20,60 #
//E2:c=D5.Pm dM=P1.y-D5.p2.y cc=40,40,90 cf=170,30,50,0.2,Si if=I2 #
E2:c=D5.Pm dM=P1.y-D5.p2.y cc=40,40,90 cf=170,30,50,0.2,Si #
C2:E1*E2
D6:p1=C2[0] p2=C2[1] cc=190,210,0 #
//E3:c=D1*D5 pt=D6.p1 cc=100,190,240 cf=30,250,180,0.05,Ss if=I1 #
E3:c=D1*D5 pt=D6.p1 cc=100,190,240 cf=30,250,180,0.05,Ss #
C3:E3*D1
D7:p1=C3[0] L(D1) cc=100,0,40 #
D8:p1=C3[1] L(D1) cc=100,0,40 #
//E4:c=D3*D7 vu=A3.va+A4.va pt=C3[0] cc=100,0,40 cf=210,150,100,0.5,Ss if=I2 #
E4:c=D3*D7 vu=A3.va+A4.va pt=C3[0] cc=100,0,40 cf=210,150,100,0.5,Ss #
//E5:c=D3*D8 vu=A3.va pt=C3[1] cc=100,0,40 cf=0,150,190,0.6,Ss if=I1 #
E5:c=D3*D8 vu=A3.va pt=C3[1] cc=100,0,40 cf=0,150,190,0.6,Ss #
C4:E4*D7
C5:E5*D8
D9:p1=C4[0] p2=C5[0] cc=160,230,100 #
C6:E4*E3
C7:E3*E5
D10:p1=C6[0] p2=C6[1] vu=D7.vu cc=190,210,0 #
D11:p1=C7[0] p2=C7[1] cc=190,210,0 #

CMD1a: #-> ?=(OUI) #
CMD1b: # DS1[$V1]: *.VU_=VU_OUI #
CMD1c: # $V1.Plus(1) !>> ;#
CMD1d: #<- ?=($V1<$V2) #
CMD2a: #-> ?=($V1>=$V2) #
CMD2b: # DS1[$V1]: *.VU_=VU_NON #
CMD2c: # $V1.Plus(1) !>> ;#
CMD2d: #<- ?=($V1<=D11.vu) #

_-_-_-_-_-_-_-_-_-_-_


Aucune note. Soyez le premier à attribuer une note !

Ajouter un commentaire

Vous utilisez un logiciel de type AdBlock, qui bloque le service de captchas publicitaires utilisé sur ce site. Pour pouvoir envoyer votre message, désactivez Adblock.

utilitaire de bas de page pour gam1 version :       OK ? pour votre
script par page URL cookie
_-_-_-_-_-_ _-_-_-_-_-_

_-_-_-_-_-_-_-_-_-_-_
        ( × )

( en : cette page autre )
label =
Editer le script du label


Créer un site gratuit avec e-monsite - Signaler un contenu illicite sur ce site