Commencé le projet pet_tracker_2, une nouvelle évolution avec mes nouveaux outils de l'ancien pet-tracker

DeepSleep/Pet_tracker_2/dir3.lua

@@ -0,0 +1,52 @@
+-- fonction dir_vers() pour afficher toutes les versions de tous les fichiers *.lua sur le NodeMCU !
+-- fonction filec(fichier) pour afficher la version d'un seul fichiers sur le NodeMCU !
+
+function dir3()
+        
+    print("\n 0_dir3.lua   zf200611.1714   \n")
+
+    function file_vers(name_file)
+        local z=""
+        if string.find(name_file,"%.lua") then
+            z=name_file..":"
+            -- print("fichier: "..name_file)
+            local f,i1,i2,j1,j2,k,t = f,i1,i2,j1,j2,k,t
+            f = file.open(name_file, "r")
+            while true do
+                local t = f:readline()   if t == nil then break end
+                -- recherche de l'entête de version [print("\n ]
+                -- ATTENTION, il faut échapper la '(' avec un % et convertir le '\' en char(92)
+                k='print%("'..string.char(92)..'n '
+                i1,j1 = string.find(t,k)
+                if i1 ~= nil then
+                    k=string.char(92)..'n"%)'
+                    i2,j2 = string.find(t,k,j1)
+                    z=name_file..": "..string.sub(t,j1+1,i2-2)
+                    break
+                end
+            end
+            f:close()
+            uart.write(0,".")
+        end
+        return z
+    end
+
+    zdir={}   list_files={}
+    local k,v = k,v   local pfile = file.list()
+    for k,v in pairs(pfile) do
+        zdir[#zdir+1] = file_vers(k)
+    end
+    table.sort(zdir)   for i=1, #zdir do   print(zdir[i])   end
+
+    dir_vers=nil   file_vers=nil   list_files=nil   zdir=nil
+    dir3=nil   
+    
+end
+dir3()
+
+--[[
+
+status, err = pcall(function () print(zhash("il était une fois trois petits cochons roses...")) end)  if status==false then print("Error: ",err) end
+
+]]
+