Re: Mudlet 4.* - skrypty + mapper
: 23 paź 2020 09:59
/skrypty
lua local a="https://api.github.com/repos/tjurczyk/a ... test"local
b=getMudletHomeDir().."/latest.json"local c="https://codeload.github.
com/tjurczyk/arkadia/zip/"local d=getMudletHomeDir().."/scripts.zip"local e=""local
f=getMudletHomeDir().."/arkadia/"function installScripts()downloadFile(b,
a)registerAnonymousEventHandler("sysDownloadDone","handleVersionDownload",true)end function
handleVersionDownload(g,h,i)if h~=b then return true end local j=io.open(b,"rb")if j then local
k=yajl.to_value(j:read("*a"))j:close()os.remove(b)e=getMudletHomeDir().."/arkadia-"..k.name..
"/"tempTimer(0.1,function()downloadScripts(k.name)end)end end function
downloadScripts(l)pcall(deleteDir,f)registerAnonymousEventHandler("sysDownloadDone",
"handleDownload",true)downloadFile(d,c..l)cecho("\n<CadetBlue>(skrypty)<tomato>: Pobieram aktualna
paczke skryptow ("..l..")\n")end function handleDownload(g,h)if h~=d then return true end
registerAnonymousEventHandler("sysUnzipDone","handleUnzipEvents",
true)registerAnonymousEventHandler("sysUnzipError","handleUnzipEvents",true)unzipAsync(d,
getMudletHomeDir())end function handleUnzipEvents(m,...)if m=="sysUnzipDone"then os.
remove(d)uninstallPackage("Arkadia")uninstallPackage("generic_mapper")uninstallPackage("skrypty_master3")tempTimer(1,
function()os.rename(e,f)installPackage(f.."Arkadia.xml")cecho("\n<CadetBlue>(skrypty)<tomato>:
Skrypty zainstalowane\n")end)elseif m=="sysUnzipError"then cecho("\n<CadetBlue>(skrypty)<tomato>:
Blad podczas rozpakowywania skryptow\n")end end function deleteDir(n)for j in lfs.dir(n)do local
o=n..'/'..j if j~="."and j~=".."then if lfs.attributes(o,'mode')=='file'then os.remove(o)elseif lfs.
attributes(o,'mode')=='directory'then deleteDir(o)end end end lfs.rmdir(n)end
installScripts()clearCmdLine()
Ręczna instalacja
(skrypty): Pobieram aktualna paczke skryptow (4.12)
(skrypty): Skrypty zainstalowane
/skrypty
Robie tak, ale nic mi nie dziala
lua local a="https://api.github.com/repos/tjurczyk/a ... test"local
b=getMudletHomeDir().."/latest.json"local c="https://codeload.github.
com/tjurczyk/arkadia/zip/"local d=getMudletHomeDir().."/scripts.zip"local e=""local
f=getMudletHomeDir().."/arkadia/"function installScripts()downloadFile(b,
a)registerAnonymousEventHandler("sysDownloadDone","handleVersionDownload",true)end function
handleVersionDownload(g,h,i)if h~=b then return true end local j=io.open(b,"rb")if j then local
k=yajl.to_value(j:read("*a"))j:close()os.remove(b)e=getMudletHomeDir().."/arkadia-"..k.name..
"/"tempTimer(0.1,function()downloadScripts(k.name)end)end end function
downloadScripts(l)pcall(deleteDir,f)registerAnonymousEventHandler("sysDownloadDone",
"handleDownload",true)downloadFile(d,c..l)cecho("\n<CadetBlue>(skrypty)<tomato>: Pobieram aktualna
paczke skryptow ("..l..")\n")end function handleDownload(g,h)if h~=d then return true end
registerAnonymousEventHandler("sysUnzipDone","handleUnzipEvents",
true)registerAnonymousEventHandler("sysUnzipError","handleUnzipEvents",true)unzipAsync(d,
getMudletHomeDir())end function handleUnzipEvents(m,...)if m=="sysUnzipDone"then os.
remove(d)uninstallPackage("Arkadia")uninstallPackage("generic_mapper")uninstallPackage("skrypty_master3")tempTimer(1,
function()os.rename(e,f)installPackage(f.."Arkadia.xml")cecho("\n<CadetBlue>(skrypty)<tomato>:
Skrypty zainstalowane\n")end)elseif m=="sysUnzipError"then cecho("\n<CadetBlue>(skrypty)<tomato>:
Blad podczas rozpakowywania skryptow\n")end end function deleteDir(n)for j in lfs.dir(n)do local
o=n..'/'..j if j~="."and j~=".."then if lfs.attributes(o,'mode')=='file'then os.remove(o)elseif lfs.
attributes(o,'mode')=='directory'then deleteDir(o)end end end lfs.rmdir(n)end
installScripts()clearCmdLine()
Ręczna instalacja
(skrypty): Pobieram aktualna paczke skryptow (4.12)
(skrypty): Skrypty zainstalowane
/skrypty
Robie tak, ale nic mi nie dziala