alias ipopup {
if (!$2) { return }
;se non esiste il secondo parametro, il comando non và
avanti
var %w = @popup,%popup = $replace($1,menubar,bpopup,status,mpopup,query,qpopup,channel,cpopup,nicklist,lpopup),%ticks
= $ticks,%file = $+(",$mircdir,$2,")
;qui dichiaro 4 variabili, quella della finestra che ci
servirà per caricare il testo del file per poi modificarlo
e infine salvarlo
;la variabile %popup che serve per vedere quale menu dobbiamo
caricare dal file popups.ini
;la variabile %ticks che serve per vedere quanto tempo impega
l'alias a importare i menu
;la variabile %file che indica il file dove andremo a salvare
il menu per poi caricarlo nei remote
window -c %w
;chiudo la window (solo se aperta) per non creare problemi
window -h %w
;qui invece creo una window, ma la nascondo
aline 0 %w [script]
;qui scrivo nella finestra la parola [script], poichè
i file dei remote hanno come topic [script]
aline 0 %w n0=menu $1 $chr(123)
;qui scrivo la prima linea del file di output, cioè
n0 (guardare altri file remote .ini e vedere che sono numerati)
.loadbuf $+(-t,%popup) %w popups.ini
;qui uso il comando loadbuf per caricare un intero file
in una finestra. E' specificata la flag -t, che indica ti
caricare solo un topic di un file (in questo caso quello
del menu, mpopup qpopup ecc...)
aline 0 %w $+(n,$calc($line(%w,0) - 2),=,$chr(125))
;qui scrivo l'ultima riga nella finestra, con il nN rispettivo
e con la parentesi } per chiudere il menu
.savebuf %w %file
;qui salvo il contenuto della finestra nel file %file, che
sarebbe il file output da noi scelte
window -c %w
;qui chiudo la finestra
.load -rs %file
;qui carico il file %file nei remote
echo -s $calc(($ticks - %ticks) / 1000) secs.
;e qui visualizzo il tempo impegato nello svolgere il lavoro
|