Forum de Programmation en langage PANORAMIC
Rechercher
 
 

Résultats par :
 


Rechercher Recherche avancée

Mots-clés

Derniers sujets
» Animations FLASH
Lun 1 Jan - 13:01 par Admin

» Bonne Année 2018
Ven 29 Déc - 0:48 par Admin

» Automate cellulaire : simulation de feu de forêt
Sam 9 Déc - 2:56 par Admin

»  Exécution des fichiers CPL
Mar 28 Nov - 19:18 par Admin

» Quelques fonctions de la user32.dll
Sam 25 Nov - 1:43 par Admin

» Copier vers une FORM définie l’image de fond du bureau.
Ven 24 Nov - 2:38 par Admin

»  Capture d’écran de Windows
Ven 17 Nov - 0:27 par Admin

»  Courbes de Bézier cubiques
Mer 8 Nov - 2:28 par Admin

» Harmonographe
Mer 8 Nov - 2:22 par Admin

Janvier 2018
LunMarMerJeuVenSamDim
1234567
891011121314
15161718192021
22232425262728
293031    

Calendrier Calendrier


Animations FLASH

Voir le sujet précédent Voir le sujet suivant Aller en bas

Animations FLASH

Message par Admin le Lun 1 Jan - 13:01

Code:
rem ============================================================================
rem    Animations FLASH pour la Physique, la Chimie, les Mathématiques,
rem    les Sciences, le Français, la Géographie, etc.
rem ============================================================================

Init()
Menu()

end
rem ============================================================================
SUB Init()
    label clic
    dim i,u$
    full_space 0 : color 0,50,150,250
    caption 0,"Animations FLASH"
    dll_on "kgf.dll" : ' Adapter le chemin de la DLL
END_SUB
rem ============================================================================
SUB Menu()    
    main_menu 1
        sub_menu 02 : parent 02,1 : caption 02,"Physique"
        sub_menu 03 : parent 03,1 : caption 03,"Mathématiques"
        sub_menu 04 : parent 04,1 : caption 04,"Sciences"
        sub_menu 05 : parent 05,1 : caption 05,"Français"
        sub_menu 06 : parent 06,1 : caption 06,"Géographie"
' ------------------------------------------------------------------------------    
        sub_menu 08 : parent 08,1 : caption 08,"Quitter"  : on_click 08,clic
        sub_menu 09 : parent 09,1 : caption 09,"?"        
        sub_menu 10 : parent 10,9 : caption 10,"Infos"    : on_click 10,clic
        sub_menu 11 : parent 11,9 : caption 11,"A-Propos" : on_click 11,clic
' ------------------------------------------------------------------------------        
        sub_menu 12 : parent 12,2 : caption 12,"Acoustique"
        sub_menu 13 : parent 13,2 : caption 13,"Electomagnétisme"
        sub_menu 14 : parent 14,2 : caption 14,"Electotechnique"
        sub_menu 15 : parent 15,2 : caption 15,"Mécanique"
        sub_menu 16 : parent 16,2 : caption 16,"Ondes"
        sub_menu 17 : parent 17,2 : caption 17,"Optique"
        sub_menu 18 : parent 18,2 : caption 18,"Thermodynamique"
        sub_menu 20 : parent 20,2 : caption 20,"Physique quantique"
' ------------------------------------------------------------------------------        
        sub_menu 23 : parent 23,2 : caption 23,"Animation EDF"
        sub_menu 24 : parent 24,2 : caption 24,"Energie"
        sub_menu 25 : parent 25,2 : caption 25,"Dossier physique chimie"
' ------------------------------------------------------------------------------        
        sub_menu 26 : parent 26,5 : caption 26,"Vocabulaire"
' ------------------------------------------------------------------------------                    
        sub_menu 30 : parent 30,12 : caption 30,"Clavier :  visualisation d’un signal fabriqué au clavier."
        sub_menu 31 : parent 31,12 : caption 31,"Dopler  : principe de l’effet Doppler."
        sub_menu 32 : parent 32,12 : caption 32,"Echographie : principe de l’échographie."
        sub_menu 33 : parent 33,12 : caption 33,"Onde_sonore_plane : propagation d’une onde sonore plane."
        sub_menu 34 : parent 34,12 : caption 34,"Ondes_stationnaires : illustration des ondes stationnaires."
        sub_menu 35 : parent 35,12 : caption 35,"Sonar : étude des fonds marins avec un sonar."        
            for i = 30 to 35 : on_click i,clic : next i
' ------------------------------------------------------------------------------
        sub_menu 40 : parent 40,13 : caption 40," topoB : lignes de champs crées par un aimant ou un fil."
            on_click 40,clic
' ------------------------------------------------------------------------------
        sub_menu 50 : parent 50,14 : caption 50,"La turbine et l’alternateur – animation du CEA."
            on_click 50,clic
' ------------------------------------------------------------------------------
        sub_menu 60 : parent 60,15 : caption 60,"Les 4 interactions fondamentales."
        sub_menu 61 : parent 61,15 : caption 61,"Principe d’un amortisseur."
        sub_menu 62 : parent 62,15 : caption 62,"Animation, chute d’une bille dans un fluide visqueux."
        sub_menu 63 : parent 63,15 : caption 63,"Vecteurs en cinématique (position, vitesse et accélération)."  
        sub_menu 64 : parent 64,15 : caption 64,"Exemple de mouvements en mécanique"  
        sub_menu 65 : parent 65,15 : caption 65,"Animations sur les lois de Kepler."
        sub_menu 66 : parent 66,15 : caption 66,"Animation du CEA sur les lois de Kepler."
        sub_menu 67 : parent 67,15 : caption 67,"Mouvement de différents points d’un solide."
        sub_menu 68 : parent 68,15 : caption 68,"Animation simulant le mouvement d’une particule chargée."
        sub_menu 69 : parent 69,15 : caption 69,"Etude de l’oscillateur harmonique."
        sub_menu 70 : parent 70,15 : caption 70,"Etude du pendule simple."
        sub_menu 71 : parent 71,15 : caption 71,"Illustration du principe d’inertie."
        sub_menu 72 : parent 72,15 : caption 72,"Mouvement d’un satellite."
        sub_menu 73 : parent 73,15 : caption 73,"Animation sur le travail d’une force constante."
        sub_menu 74 : parent 74,15 : caption 74,"Tirs : simulation d’un mouvement balistique."
        sub_menu 75 : parent 75,15 : caption 75,"TirsTraj : simulation d’un mouvement"      
            for i = 60 to 75 : on_click i,clic : next i    
' ------------------------------------------------------------------------------        
        sub_menu 80 : parent 80,16 : caption 80,"Doppler : animation sur l’effet Doppler."
        sub_menu 81 : parent 81,16 : caption 81,"Propagation d’une onde le long d’une corde."
        sub_menu 82 : parent 82,16 : caption 82,"Propagation d’une onde sonore plane."
            for i = 80 to 82 : on_click i,clic : next i  
' ------------------------------------------------------------------------------            
        sub_menu 90 : parent 90,17 : caption 90,"Animation présentant l’origine physique des arcs-en-ciel."
        sub_menu 91 : parent 91,17 : caption 91,"Lois de Snell-Descartes."
        sub_menu 92 : parent 92,17 : caption 92,"Dispersion par un prisme."
        sub_menu 93 : parent 93,17 : caption 93,"Principe d’une fibre optique."
        sub_menu 94 : parent 94,17 : caption 94,"Interférences entre deux sources ponctuelles."
        sub_menu 95 : parent 95,17 : caption 95,"Constructions des rayons lumineux pour une lentille simple dans les conditions de Gauss."
        sub_menu 96 : parent 96,17 : caption 96,"Lois de Snell-Descartes."
        sub_menu 97 : parent 97,17 : caption 97,"Principe du microscope."          
            for i = 90 to 97 : on_click i,clic : next i
' ------------------------------------------------------------------------------            
        sub_menu 100 : parent 100,18 : caption 100,"Diagramme des phases d’un corps pur."
        sub_menu 101 : parent 101,18 : caption 101,"Modèle microscopique de la pression d’un gaz"
            for i = 100 to 101 : on_click i ,clic : next i
' ------------------------------------------------------------------------------            
        sub_menu 110 : parent 110,20 : caption 110,"Animation du CEA sur l’IRM."
            on_click 110,clic
' ------------------------------------------------------------------------------            
        sub_menu 120 : parent 120,23 : caption 120,"Le fonctionnement d’une centrale biomasse."
        sub_menu 121 : parent 121,23 : caption 121,"Le fonctionnement d’une centrale Hydraulique."            
            for i = 120 to 121 : on_click i,clic : next i
' ------------------------------------------------------------------------------        
        sub_menu 130 : parent 130,24 : caption 130,"Les différentes formes d'énergie"
        sub_menu 131 : parent 131,24 : caption 131,"Les grandes dates de l'énergie"
        sub_menu 132 : parent 132,24 : caption 132,"Les diverses sources d'énergie"
        sub_menu 133 : parent 133,24 : caption 133,"Où sont les sources d'énergie"
        sub_menu 134 : parent 134,24 : caption 134,"L'extraction du pétrole ou du gaz"
        sub_menu 135 : parent 135,24 : caption 135,"L'énergie et ses transformations"
        sub_menu 136 : parent 136,24 : caption 136,"Le transport du pétrole ou du gaz"
        sub_menu 137 : parent 137,24 : caption 137,"Le charbon"
        sub_menu 138 : parent 138,24 : caption 138,"La force de l'éau"
        sub_menu 139 : parent 139,24 : caption 139,"De l'uranium à l'énergie nucléaire"
        sub_menu 140 : parent 140,24 : caption 140,"La biomasse"
        sub_menu 141 : parent 141,24 : caption 141,"La géothermie"
        sub_menu 142 : parent 142,24 : caption 142,"Les autres sources d'énergie"
        sub_menu 143 : parent 143,24 : caption 143,"La turbine et l'alternateur"
        sub_menu 144 : parent 144,24 : caption 144,"De la centrale à la ville"
        sub_menu 145 : parent 145,24 : caption 145,"Energie et économie d'énergie dans la maison"
        sub_menu 146 : parent 146,24 : caption 146,"L'énergie dans les transports"
        sub_menu 147 : parent 147,24 : caption 147,"Energie et effet de serre"
        sub_menu 148 : parent 148,24 : caption 148,"L'énergie du futur"
        sub_menu 149 : parent 149,24 : caption 149,"Des habitats intelligents"
        sub_menu 150 : parent 150,24 : caption 150,"Les biocarburants de 2ème génération"
        sub_menu 151 : parent 151,24 : caption 151,"Les panneaux solaires"
        sub_menu 152 : parent 152,24 : caption 152,"Le démanteèlement nucléaire"
        sub_menu 153 : parent 153,24 : caption 153,"Principe de la pile à combustible"
        sub_menu 154 : parent 154,24 : caption 154,"RJHmpeg2-a"
        sub_menu 155 : parent 155,24 : caption 155,"La torche à plasma"
            for i = 130 to 155 : on_click i,clic : next i
' ------------------------------------------------------------------------------            
        sub_menu 160 : parent 160,25 : caption 160,"Que sont la physique et la chimie ?"
        sub_menu 161 : parent 161,25 : caption 161,"Au coeur de la matière"
        sub_menu 162 : parent 162,25 : caption 162,"Les états et les transformations de la matière"
        sub_menu 163 : parent 163,25 : caption 163,"De la matière à l'atome : l'exemple de l'eau"
        sub_menu 164 : parent 164,25 : caption 164,"Les propriètés de la matière"
        sub_menu 165 : parent 165,25 : caption 165,"Comment voir les atomes ?"
        sub_menu 166 : parent 166,25 : caption 166,"Exemples de réactions chimiques"
        sub_menu 167 : parent 167,25 : caption 167,"L'énergie et ses transformations"
        sub_menu 168 : parent 168,25 : caption 168,"L'électricité"
        sub_menu 169 : parent 169,25 : caption 169,"La gravitation"
        sub_menu 170 : parent 170,25 : caption 170,"La poussée d'Archimède"
        sub_menu 171 : parent 171,25 : caption 171,"D'autres formes de force"
        sub_menu 172 : parent 172,25 : caption 172,"Les mécanismes"
        sub_menu 173 : parent 173,25 : caption 173,"L'équilibre et le mouvement"
        sub_menu 174 : parent 174,25 : caption 174,"La pression"
        sub_menu 175 : parent 175,25 : caption 175,"Le son"
        sub_menu 176 : parent 176,25 : caption 176,"La lumière"
        sub_menu 177 : parent 177,25 : caption 177,"Les grandes dates de la physique-chimie"
        sub_menu 178 : parent 178,25 : caption 178,"La découverte de l'électron par J.J. Thomson"
        sub_menu 179 : parent 179,25 : caption 179,"Le microscope à effet tunnel"
        sub_menu 180 : parent 180,25 : caption 180,"La découverte de la radioactivité naturelle par H. Becquerel"
        sub_menu 181 : parent 181,25 : caption 181,"L'effet Doppler"
        sub_menu 182 : parent 182,25 : caption 182,"Lois de Kepler"
        sub_menu 183 : parent 183,25 : caption 183,"Emettre la lumière grain à grain / Echange quantique d'énergie"
        sub_menu 184 : parent 184,25 : caption 184,"Invariance de la vitesse de la lumière et relativité du temps"
        sub_menu 185 : parent 185,25 : caption 185,"Spectres et composition chimique du Soleil"              
            for i = 160 to 185 : on_click i,clic : next i
' ------------------------------------------------------------------------------                        
        sub_menu 200 : parent 200,026 : caption 200,"A la garre"
        sub_menu 201 : parent 201,026 : caption 201,"La communication par téléphone"
        sub_menu 202 : parent 202,026 : caption 202,"Se déplacer en ville"
        sub_menu 203 : parent 203,026 : caption 203,"L'alphabet, les accents et la cédille"
        sub_menu 204 : parent 204,026 : caption 204,"Vocabulaires de la famille (Adjectifs possessifs)"
        sub_menu 205 : parent 205,026 : caption 205,"Vocabulaire du corps"
        sub_menu 206 : parent 206,026 : caption 206,"Les animaux"
        sub_menu 207 : parent 207,026 : caption 207,"Les pays d'Europe"
        sub_menu 208 : parent 208,026 : caption 208,"Les vêtements"
        sub_menu 209 : parent 209,026 : caption 209,"Mots-fléchés 'alimentaires'"        
            for i = 200 to 209 : on_click i,clic : next i
' ------------------------------------------------------------------------------            
        sub_menu 210 : parent 210,003 : caption 210,"Géométrie"
        sub_menu 211 : parent 211,210 : caption 211,"Je veux reproduire un triangle"
        sub_menu 212 : parent 212,210 : caption 212,"Je veux tracer un triangle régulier"
        sub_menu 213 : parent 213,210 : caption 213,"Construction d'un triangle équilatéral"
        sub_menu 214 : parent 214,210 : caption 214,"Tracer un triangle isocèle"
        sub_menu 215 : parent 215,210 : caption 215,"Construction d'un triangle isocèle"
        sub_menu 216 : parent 216,210 : caption 216,"Tracer des perpendiculaires à l'équerre"
        sub_menu 217 : parent 217,210 : caption 217,"Construction d'une perpendiculaire à l'équerre"
        sub_menu 218 : parent 218,210 : caption 218,"Tracer des perpendiculaires au compas"
        sub_menu 219 : parent 219,210 : caption 219,"Construction d'une perpendiculaire au compas"
        sub_menu 220 : parent 220,210 : caption 220,"Tracer un rectangle avec l'équerre"
        sub_menu 221 : parent 221,210 : caption 221,"Tracer un rectangle au compas"
        sub_menu 222 : parent 222,210 : caption 222,"Tracer un carré à l'équerre"
        sub_menu 223 : parent 223,210 : caption 223,"Tracer un carré au compas"
        sub_menu 224 : parent 224,210 : caption 224,"Construction d'un parallèlogramme"
        sub_menu 225 : parent 225,210 : caption 225,"Tracer d'un parallèlogramme au compas (1)"
        sub_menu 226 : parent 226,210 : caption 226,"Tracer d'un parallèlogramme au compas (2)"
        sub_menu 227 : parent 227,210 : caption 227,"Tracer un losange au compas"
        sub_menu 228 : parent 228,210 : caption 228,"Tracer un losange au compas et à l'équerre"
        sub_menu 229 : parent 229,210 : caption 229,"Somme de trois angles d'un triangle = 180°"
        sub_menu 230 : parent 230,210 : caption 230,"Mesuer un angle avec un rapporteur"
        sub_menu 231 : parent 231,210 : caption 231,"Construction d'un cercle passant par deux points donnés"
        sub_menu 232 : parent 232,210 : caption 232,"Construction du symétrique d'un point par rapport à un autre"        
        sub_menu 233 : parent 233,210 : caption 233,"Utilisation du Rapporteur."
        sub_menu 234 : parent 234,210 : caption 234,"La Symétrie Centrale."
        sub_menu 235 : parent 235,210 : caption 235,"La Symétrie Axiale."
        sub_menu 236 : parent 236,210 : caption 236,"Tracer un Cercle."
        sub_menu 237 : parent 237,210 : caption 237,"Propriété de Thalès. (1)"
        sub_menu 238 : parent 238,210 : caption 238,"Propriété de Thalès. (2)"        
            for i = 211 to 238 : on_click i,clic : next i
' ------------------------------------------------------------------------------            
        sub_menu 240 : parent 240,003 : caption 240,"Mesures"
        sub_menu 241 : parent 241,240 : caption 241,"Les heures, les minutes"
            on_click 241,clic
' ------------------------------------------------------------------------------      
       sub_menu 250 : parent 250,003 : caption 250,"Personnalités"
       sub_menu 251 : parent 251,250 : caption 251,"Archimède"
       sub_menu 252 : parent 252,250 : caption 252,"Pythagore"
       sub_menu 253 : parent 253,250 : caption 253,"Thales"
            for i = 251 to 253 : on_click i,clic : next i
' ------------------------------------------------------------------------------                        
       sub_menu 260 : parent 260,004 : caption 260,"Corps humain"
       sub_menu 261 : parent 261,260 : caption 261,"Voyage au pays du sommeil"
       sub_menu 262 : parent 262,260 : caption 262,"Pyramide alimentaire"                  
            for i = 261 to 262 : on_click i ,clic : next i
' ------------------------------------------------------------------------------            
       sub_menu 270 : parent 270,004 : caption 270,"Vivant"
       sub_menu 271 : parent 271,270 : caption 271,"La fossilisation"
       sub_menu 272 : parent 272,270 : caption 272,"Animaux et cycle de saisons"      
           for i = 271 to 272 : on_click i,clic : next i
' ------------------------------------------------------------------------------
       sub_menu 280 : parent 280,004 : caption 280,"Matière"
       sub_menu 281 : parent 281,280 : caption 281,"Le cycle de l'eau - 1"
       sub_menu 282 : parent 282,280 : caption 282,"Le cycle de l'eau - 2"
       sub_menu 283 : parent 283,280 : caption 283,"Le cycle de l'eau - 4"      
           for i = 281 to 283 : on_click i,clic : next i
' ------------------------------------------------------------------------------          
       sub_menu 290 : parent 290,003 : caption 290,"Calcul"
       sub_menu 291 : parent 291,290 : caption 291,"Calculatrice"
           on_click 291,clic
' ------------------------------------------------------------------------------      
      sub_menu 300 : parent 300,006 : caption 300,"France"
      sub_menu 301 : parent 301,300 : caption 301,"Les grandes villes"
      sub_menu 302 : parent 302,300 : caption 302,"L'Europe à 25 en chiffres"      
           for i = 301 to 302 : on_click i,clic : next i
' ------------------------------------------------------------------------------
      sub_menu 310 : parent 310,006 : caption 310,"Monde"
      sub_menu 311 : parent 311,310 : caption 311,"Les zones climatiques"      
           for i = 311 to 311 : on_click i,clic : next i
' ------------------------------------------------------------------------------  
      
END_SUB
rem ============================================================================
Clic:
   select number_click
       case 08 : Quitter() : return
       case 10 : Info()    : return
       case 11 : Apropos() : return
       case 30 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/1_Acoustique/clavier/clavier_p.swf"
       case 31 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/1_Acoustique/doppler/doppler.swf"
       case 32 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/1_Acoustique/echographie/echographie.swf"
       case 33 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/1_Acoustique/onde_sonore_plane/onde_sonore_plane.swf"
       case 34 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/1_Acoustique/ondes_stationnaires/ondes_stationnaires.swf"
       case 35 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/1_Acoustique/sonar/sonar.swf"
' ------------------------------------------------------------------------------
       case 40 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/2_Electromagnetisme/topoB/topoB.swf"
       case 50 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/3_Electrotechnique/CEA_turbine_alternateur/turbine.swf"
       case 60 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/4interactions/4interactions.swf"
       case 61 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/amortisseur/amortisseur.swf"
       case 62 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/chute_bille_fluide/chute_bille_fluide.swf"
       case 63 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/cinematique/cinematique.swf"
       case 64 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/Exemple%20Mouvements/mouvements.swf"
       case 65 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/Kepler/Kepler.swf"
       case 66 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/Kepler_CEA/kepler.swf"
       case 67 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/Mouvement%20Solide/CentreIinertie.swf"
       case 68 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/mouvt_charge/mouvt_charge.swf"
       case 69 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/oscillateur-harmonique/oscillateur-harmonique.swf"
       case 70 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/pendule-simple/pendule-simple.swf"
       case 71 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/Principe%20Inertie/PrincipeInertie.swf"
       case 72 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/satellite/satellite.swf"
       case 73 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/simul_travail-force-constante/simul_travail-force-constante.swf"
       case 74 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/tirs/tirs.swf"
       case 75 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/4_Mecanique/tirTraj/tirsTraj.swf"
' ------------------------------------------------------------------------------      
       case 80 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/5_Ondes/doppler/doppler.swf"
       case 81 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/5_Ondes/onde_corde/onde_corde.swf"
       case 82 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/5_Ondes/onde_sonore_plane/onde_sonore_plane.swf"
' ------------------------------------------------------------------------------      
       case 90 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/6_Optique/arc_en_ciel/arc_en_ciel.swf"
       case 91 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/6_Optique/descartes/descartes.swf"
       case 92 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/6_Optique/dispersion_prisme/dispersion_prisme.swf"
       case 93 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/6_Optique/fibre/fibre.swf"
       case 94 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/6_Optique/interferences/interferences.swf"
       case 95 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/6_Optique/lentille_construction/lentille_construction.swf"
       case 96 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/6_Optique/lois-snell-descartes/lois-snell-descartes.swf"
       case 97 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/6_Optique/microscope/microscope.swf"
' ------------------------------------------------------------------------------      
       case 100 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/7_Thermodynamique/diagramme_phase/diagramme_phase.swf"
       case 101 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/7_Thermodynamique/gaz/gaz.swf"
' ------------------------------------------------------------------------------      
       case 110 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/9_Physique%20Quantique/IRM_CEA/IRM_CEA.swf"
       case 120 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/12_Animations%20EDF/Biomasse/biomasse-centrale-0914884001350919408.swf"
       case 121 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/12_Animations%20EDF/CentraleHydraulique/hydro-centrale-0808809001350918097.swf"
' ------------------------------------------------------------------------------      
       case 130 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/01-formes-energie.swf"
       case 131 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/02-GrandesDates.swf"
       case 132 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/03-sources-energie.swf"
       case 133 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/04-lieu-ressources.swf"
       case 134 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/05-extraction-petrole.swf"
       case 135 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/06_Energie_transformation.swf"
       case 136 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/06-transport-petrole.swf"
       case 137 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/07-charbon.swf"
       case 138 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/08-force-eau.swf"
       case 139 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/09-nucleaire.swf"
       case 140 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/10-biomasse.swf"
       case 141 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/10-geothermie.swf"
       case 142 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/11-AutresSourcesEn.swf"
       case 143 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/12-turbine.swf"
       case 144 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/13-centrale.swf"
       case 145 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/14-EconomieEnergie.swf"
       case 146 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/15-EnergiepourTransport.swf"
       case 147 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/16-energie-EffetDeSerre.swf"
       case 148 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/17-EnergieFutur.swf"
       case 149 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/Animation-habitats-intelligents.swf"
       case 150 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/biocarburants%20de%202eme%20generation.swf"
       case 151 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/CEA_Animation_PanneauxSolaires.swf"
       case 152 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/demantelement.swf"
       case 153 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/pile.swf"
       case 154 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/RJHmpeg2-a.SWF"
       case 155 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA_Energie/shiva.swf"
' ------------------------------------------------------------------------------      
       case 160 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/01_Phy-Chimie.swf"
       case 161 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/02_coeur_matiere.swf"
       case 162 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/03_etats_matiere.swf"
       case 163 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/03-matiere_des_atomes.swf"
       case 164 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/04_propriete_matiere.swf"
       case 165 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/04-voir_les_atomes.swf"
       case 166 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/05_reactions_chimiques.swf"
       case 167 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/06_Energie_transformation.swf"
       case 168 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/07_Electricite.swf"
       case 169 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/08_Gravitation.swf"
       case 170 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/09_archimede.swf"
       case 171 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/10_AutresFormes2Forces.swf"
       case 172 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/11_Mecanismes.swf"
       case 173 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/12_EQUILIBRE02.swf"
       case 174 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/13_PRESSION02.swf"
       case 175 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/14_Son.swf"
       case 176 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/15_Lumiere.swf"
       case 177 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/16_DatesPhysChimie.swf"
       case 178 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/CEA_electron.swf"
       case 179 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/CEA_Le_microscope_a_effet_tunnel.swf"
       case 180 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/CEA_radioactivite.swf"
       case 181 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/doppler-sansloupe.swf"
       case 182 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/kepler.swf"
       case 183 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/quantique.swf"
       case 184 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/relativite.swf"
       case 185 : u$ = "http://agregation.capes.free.fr/_Ressources_CAPES2015/physique/13_Animations%20CEA/CEA-Physique%20chimie/spectre.swf"
' ------------------------------------------------------------------------------      
       case 200 : u$ = "http://lexiquefle.free.fr/train.swf"
       case 201 : u$ = "http://lexiquefle.free.fr/telephone.swf"
       case 202 : u$ = "http://lexiquefle.free.fr/ville.swf"
       case 203 : u$ = "http://lexiquefle.free.fr/allpha.swf"
       case 204 : u$ = "http://lexiquefle.free.fr/famille0.swf"
       case 205 : u$ = "http://lexiquefle.free.fr/vocab.swf"
       case 206 : u$ = "http://lexiquefle.free.fr/animaux.swf"
       case 207 : u$ = "http://lexiquefle.free.fr/europ.swf"
       case 208 : u$ = "http://lexiquefle.free.fr/vetement.swf"
       case 209 : u$ = "http://mangerbouger.be/IMG/swf/motsfleches1.swf"
' ------------------------------------------------------------------------------      
       case 211 : u$ = "http://pcolleu.free.fr/maths/flash/reprodTriangle.swf"
       case 212 : u$ = "http://pcolleu.free.fr/maths/flash/regulier.swf"
       case 213 : u$ = "http://loiclecardonnel.free.fr/triangle/consequil.swf"
       case 214 : u$ = "http://pcolleu.free.fr/maths/flash/isocele.swf"
       case 215 : u$ = "http://loiclecardonnel.free.fr/triangle/consiso.swf"
       case 216 : u$ = "http://pcolleu.free.fr/maths/flash/perpendiculaires.swf"
       case 217 : u$ = "http://loiclecardonnel.free.fr/mediatrice/Perp4.swf"
       case 218 : u$ = "http://pcolleu.free.fr/maths/flash/perpendiculaires2.swf"
       case 219 : u$ = "http://loiclecardonnel.free.fr/mediatrice/Perp3.swf"
       case 220 : u$ = "http://pcolleu.free.fr/maths/flash/rectangle.swf"
       case 221 : u$ = "http://pcolleu.free.fr/maths/flash/rectangle2.swf
       case 222 : u$ = "http://pcolleu.free.fr/maths/flash/carre.swf"
       case 223 : u$ = "http://pcolleu.free.fr/maths/flash/carre2.swf"
       case 224 : u$ = "http://loiclecardonnel.free.fr/quadrila/para.swf"
       case 225 : u$ = "http://pcolleu.free.fr/maths/flash/parallelogramme.swf"
       case 226 : u$ = "http://pcolleu.free.fr/maths/flash/parallelogramme2.swf"
       case 227 : u$ = "http://pcolleu.free.fr/maths/flash/losange.swf"
       case 228 : u$ = "http://pcolleu.free.fr/maths/flash/losange2.swf"
       case 229 : u$ = "http://loiclecardonnel.free.fr/triangle/angles.swf"
       case 230 : u$ = "http://www.teacherled.com/resources/anglemeasure/angleteach.swf"
       case 231 : u$ = "http://loiclecardonnel.free.fr/cercle/cercle4.swf"
       case 232 : u$ = "http://loiclecardonnel.free.fr/symetrie/sym1.swf"
       case 233 : u$ = "http://mslp.ac-dijon.fr/_fichiers/animations/maths/flash/01_Rapporteur.swf"
       case 234 : u$ = "http://mslp.ac-dijon.fr/_fichiers/animations/maths/flash/02_Symetrie_Centrale.swf"
       case 235 : u$ = "http://mslp.ac-dijon.fr/_fichiers/animations/maths/flash/03_Symetrie_Axiale.swf"
       case 236 : u$ = "http://mslp.ac-dijon.fr/_fichiers/animations/maths/flash/04_Cercle_4.swf"
       case 237 : u$ = "http://mslp.ac-dijon.fr/_fichiers/animations/maths/flash/Ppte_Thales_1.swf"
       case 238 : u$ = "http://mslp.ac-dijon.fr/_fichiers/animations/maths/flash/Ppte_Thales_2.swf"
' ------------------------------------------------------------------------------              
       case 241 : u$ = "http://lexiquefle.free.fr/heure.swf"
' ------------------------------------------------------------------------------      
       case 251 : u$ = "http://mslp.ac-dijon.fr/_fichiers/animations/maths/flash/H_Archimede.swf"
       case 252 : u$ = "http://mslp.ac-dijon.fr/_fichiers/animations/maths/flash/H_Pythagore.swf"
       case 253 : u$ = "http://mslp.ac-dijon.fr/_fichiers/animations/maths/flash/H_Thales.swf"
' ------------------------------------------------------------------------------      
       case 261 : u$ = "http://www.erasme.org/libre/sante/animations/sommeil/accueil.swf"
       case 262 : u$ = "http://mangerbouger.be/IMG/swf/pyramide2.swf"
' ------------------------------------------------------------------------------            
       case 271 : u$ = "http://www.erasme.org/libre/environnement_SVT/animations/la_fossilisation.swf"
       case 272 : u$ = "http://www.erasme.org/libre/environnement_SVT/animations/les_animaux_et_le_cycle_des_saisons.swf"
' ------------------------------------------------------------------------------      
       case 281 : u$ = "http://www.erasme.org/libre/environnement_SVT/animations/le_cycle_de_l_eau.swf"
       case 282 : u$ = "http://prfabien.free.fr/lecycledeleau/Eau%20-%20cycle.swf"
       case 283 : u$ = "http://robert.pagesperso-orange.fr/eau/cycleau.swf"
       case 291 : u$ = "http://www.erasme.org/libre/divers/animations/calculatrice.swf"
       case 301 : u$ = "https://www.magnard.fr/ressources/9782210522022/A01_cai008.swf"
       case 302 : u$ = "http://sitecon.free.fr/swf/europe25chiffres.swf"
       case 311 : u$ = "https://www.magnard.fr/ressources/9782210522022/A01_cai019.swf"
' ------------------------------------------------------------------------------                
   end_select
 
   HTML_In_PANORAMIC(u$,20,20,width(0)-100,height(0)-150)
return
rem ============================================================================
SUB HTML_In_PANORAMIC(Flash$,xo,yo,larg,haut)
    dim_local hnd%, res%, url$, q$, WB1%
    q$ = chr$(34)
    file_open_write 9999,"flash.html"
    file_writeln 9999,"<embed src='"+Flash$+"'"+q$+" width="+q$+str$(larg)+q$+" height="+q$+str$(haut)+q$+">"
    file_close 9999
    hnd% = handle(0)
    url$ = "file://" + dir_current$ + "/flash.html"
    WB1% = dll_call1("WB_Create",hnd%)
    res% = dll_call5("WB_Locate",WB1%,xo,yo,larg+50,haut+50)
    res% = dll_call2("WB_Url",WB1%,adr(url$))
    file_delete "flash.html"
END_SUB
rem ============================================================================
SUB Quitter()
    if message_information_yes_no("Vous voulez vraiment quitter ?") = 1 then terminate
END_SUB
rem ============================================================================
SUB Info()
    dim_local t$
    t$ = "Voici une série d'animations FLASH pour :" + chr$(13)
    t$ = t$ + "la Physique, la Chimie, les Mathématiques, les Sciences, le Français, etc." + chr$(13) + chr$(13)
    t$ = t$ + "Ça vous permet à vous ou à vos enfants de reviser" + chr$(13)
    t$ = t$ + "vos cours ou d'acquérir des nouvelles connaissances" + chr$(13)
    t$ = t$ + "ou simplément de vous divertir tout en vous instuisant" + chr$(13) +chr$(13)
    t$ = t$ + " '' L'avantage d'être intelligent, c'est " + chr$(13)
    t$ = t$ + "qu'on peut toujours faire l'imbécile," + chr$(13)
    t$ = t$ + "alors que l'inverse est totalement impossible.'' " + chr$(13) + chr$(13)
    t$ = t$ + "    Woody Allen" + chr$(13) + chr$(13)
    t$ = t$ + "*** Bon voyage dans le pays merveilleux des sciences ***"
    
    message t$

END_SUB
rem ============================================================================
SUB Apropos()
    dim_local t$
         t$ = "Auteur  : Papydall" + chr$(13)
    t$ = t$ + "Date de création : 01 / 01 / 2018" + chr$(13)
    t$ = t$ + "Dernière modif   : 01 / 01 / 2018" + chr$(13)
    
    message t$

END_SUB
rem ============================================================================

_________________
Invité, merci d'être passé par ici.
avatar
Admin
Admin

Messages : 77
Date d'inscription : 08/09/2015
Age : 67
Localisation : MOKNINE (Tunisie)

Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com

Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum