diff --git a/AnimFer.sce b/AnimFer.sce
new file mode 100644
index 0000000000000000000000000000000000000000..286b2d955ac7f3a51cd87629e3c1df15240905f0
--- /dev/null
+++ b/AnimFer.sce
@@ -0,0 +1,10 @@
+tab= read("verre",100,101)
+for i=1:100
+    clf
+    a=string(double(i*16/100))
+    plot2d(tab(i,:),rect=[0,280,101,380])
+    xtitle("Température à "+a+" sec, barre de verre","x","T(K)")
+    sleep(100)
+end
+plot2d(tab(100,:),rect=[0,280,101,380])
+xtitle("Température à "+string(16)+" sec, barre de verre","x","T(K)")