Nombre de messages : 7017 Age : 74 Localisation : Moknine (Tunisie) Entre la chaise et le clavier Date d'inscription : 03/03/2012
Sujet: Quand M. Colère et Mme Calme échangent leur place Mer 19 Mai 2021 - 23:29
Pour exécuter ce code, vous aurez besoin de l’image ci-dessous. Click-droit puis enregistrer sous colere_calme.jpg Adaptez le chemin de la ligne 7 du code, exécutez le programme et observez le tour que vous joue votre cerveau !
colere_calme.jpg:
Code:
rem ============================================================================ rem Illusion rem ============================================================================ dim t$ caption 0,"Quand M. Colère et Mme Calme échangent leur place" picture 10 : width 10,width_client(0)-20 : height 10,300 : top 10,20 : left 10,40 file_load 10,"E:\Langages\Panoramic\Illusion\colere_calme.jpg" : ' <<<< ===== adapter le chemin qui mène à l'illusion alpha 20 : top 20,300 : left 20,50 : font_bold 20 : font_color 20,0,0,255 t$ = "Regardez les images de votre chaise et en face l'écran de l'ordinateur." +chr$(13) t$ = t$ + "M. Colère est sur la gauche et Mme Calme est sur la droite." + chr$(13) +chr$(13) t$ = t$ + "Maintenant, mettez vous debout et reculez de 2 mètres (minimum) de l'écran..."+chr$(13)+chr$(13) t$ = t$ + "...et voilà qu'ils ont échangé de place !" +chr$(13)+chr$(13) t$ = t$ + "L'illusion a été créée par Philippe G.Schyns et Aude Oliva de l'Université de Glasgow."+chr$(13) t$ = t$ + "Elle suggère que nous ne voyons pas toujours ce qu'il y a réellement devant nous..." caption 20,t$ rem ============================================================================
Yannick aime ce message
Minibug
Nombre de messages : 4570 Age : 58 Localisation : Vienne (86) Date d'inscription : 09/02/2012
Sujet: Re: Quand M. Colère et Mme Calme échangent leur place Mar 25 Mai 2021 - 14:39