Snippets Project Page
Author: entropy
Added: 5y
Updated: 5y
mIRC: 7.52+
Hits: 961
Downloads: 12
Review: entropy
Size: 1.81KB
1 0
Login to vote.
File Restoration
v1.2
This neat snippet restores all files loaded. Kind of neat.
Download
JSON
▲ Review
▼ Source
; File Restoration v1.2 - by entropy 2018 ; Syntax: /r_reload <parameters> <path> ; Parameters are: -ua (unloadall) -la (loadall) and -ra (reloadall) ; Simply save this file as reload.mrc... alias r_reload { if (!$2) { echo 4 -a * Invalid Restoration Parameters! Syntax: /r_reload <-la|-ua|-ra> <path> return } var %mode if ($1 == -la) { %mode = loadall } if ($1 == -ua) { %mode = unloadall } if ($1 == -ra) { %mode = reloadall } var %path = $qt($2-), %b = 1, %c = 1, %d = 0, %e = 0, %totalmrc, %totalini echo 2 -a - echo 4 -a * Restoring Scripts: %path $+ ... echo 2 -a - while ($findfile(%path,*.mrc,%b,0)) { echo 3 -a * $v1 %totalmrc = %totalmrc $v1 inc %b } while ($findfile(%path,*.ini,%c,0)) { echo 3 -a * $v1 %totalini = %totalini $v1 inc %c } var %a = 1, %b, %c while ($gettok(%totalmrc,%a,32)) { %b = $qt($v1) %c = $nopath($v1) if (%mode == loadall && reload.mrc != %c) { load -rs %b } elseif (%mode == unloadall && reload.mrc != %c) { if ($script(%b)) { unload -rs %b } } elseif (%mode == reloadall && reload.mrc != %c) { reload -rs %b } inc %a } var %a = 1, %b, %c while ($gettok(%totalini,%a,32)) { %b = $qt($v1) %c = $nopath($v1) if (%mode == loadall && reload.mrc != %c) { load -rs %b } elseif (%mode == unloadall && reload.mrc != %c) { if ($script(%b)) { unload -rs %b } } elseif (%mode == reloadall && reload.mrc != %c) { reload -rs %b } inc %a } echo 2 -a - var %a = $iif($1 == -ua,Unload All,$iif($1 == -la,Load All,Reload All)) echo 4 -a * %a Complete! }
Changelog:
0
0