Emacs macro per generare una sequenza?

Question

Stavo leggendo questo articolo su come creare macro vi: vi sequence macro e ho visto una macro utile per creare una sequenza nel buffer.

1.
2.
...
100.

Nel VI, il trucco è che si può premere Ctrl-a al di sopra di un numero e si aggiungerà uno ad esso, quindi questo ha reso facile la macro. Voglio essere in grado di fare la stessa cosa in emacs.

Answer 1

Se si utilizza Emacs 23 (e forse 22?), Utilizzare kmacro-insert-counter che è associato a C-x C-k TAB per impostazione predefinita. Così, per il tuo esempio, faresti:

C-x (C-x C-k TAB . RET C-x)

in modo da iniziare macro, inserire contatore seguito da, a capo, macro fine ''. Quindi C-x e e e e e e e ecc. Oppure M-1 0 0 C-x e per ottenerne 100.

EDIT:

dimenticato di dire è possibile impostare il contatore ad un valore iniziale anche. Ad esempio, per iniziare a 1 invece di 0, fare M-1 C-x C-k C-c.

E se non si desidera incrementare il contatore in un punto particolare, è necessario aggiungerlo a C-u. Ovviamente a questo punto le sequenze di tasti diventano un po 'ridicole, quindi di solito lego una chiave per inserire, ma non aumentare.

Answer 2

Ecco un extension che può aiutare.

Answer 3

Accanto a scottfrazer's answer, c'è un altro modo per creare una sequenza di numeri con CUA mode che può essere di grande aiuto quando si modifica il contenuto esistente. Vedi Mark Mansour's screencast on Emacs Column Editing dalla posizione 2:30.

Answer 4

Emacs 23 supporta frammenti di elisp nel testo di sostituzione di replace-regexp.

Mi capita spesso definisco macro della tastiera che seguono questo schema:

• copia un blocco di testo
• Passare a un numero che voglio incrementare nel blocco copiato del testo con isearch
• Attivare il contrassegnare e spostare il punto per definire una regione che comprende il numero
• Mx replace-regexp
• Al prompt "Sostituire regexp", immettere \([0-9]+\) per acquisire un gruppo o f uno o più cifre
• Al "regexp Sostituire ([0-9] +) con:" richiesta, inserire \,(1+ \#1), dove , indica che una forma elisp di sostituire segue, 1+ è una funzione di incremento, e \#1 è il primo testo della partita catturato, interpretato come un numero.

Dopo aver preso un minuto per definire la macro di tastiera, questo mi permette di avere quasi la comodità di taglia e incolla per generare un sacco di blocchi di codice quasi identico, come ad case dichiarazioni.

Si noti che questa tecnica può essere facilmente adattata ad es. numeri doppi (\,(* 2 \#1)) o qualsiasi altra cosa. Puoi anche usarlo per sostituire l'elemento successivo in una sequenza arbitraria usando una combinazione di 'position e 'nth, ma non entrerò in quello ora :).

Answer 5

C'è anche:

C-u M-! jot -s '.C-q C-j' 10

Non è pura elisp, ma ha lo stesso effetto. Potresti scrivere una macro nominata per eseguirla per te.

Answer 6

coloro che si sentono ci sono troppi trucchi per memorizzare potrebbe trovare l'acquisizione di alcuni elisp più redditizio:

 
M-: (dotimes (i 20) (insert (format "%2d.\n" (1+ i)))) 

Answer 7

Se si accende il modo minore CUA (cua-mode), è possibile selezionare una colonna di testo e poi riempirlo con una sequenza di numeri usando cua-sequence-rectangle (associato a M-n per impostazione predefinita).

Questa è la stessa cosa menzionata nel video di Török Gábor, ma ora è scritta qui in modo da non dover guardare l'intero video a meno che non lo si voglia. È un bel video

Answer 8

Dal rilascio 24,3 dell'Emacs (ritengo effettivamente dal rilascio 24,0), la sequenza di tasti è stata semplificata:

<F3> <F3> . <ENTER> <F4>

Poi ripetendo <F4> chiave ripeterà la macro.

Il trucco è che, dopo aver iniziato una macro con <F3>, un secondo <F3> premere il tasto inserirà il valore corrente del contatore della macro tastiera nel buffer, e incrementa il contatore di 1.

Altri trucchi:

• <F3> C-u 2 <F3> . <ENTER> <F4> sarà incrementato con due (invece di +1)
• C-u 100 <F3> <F3> . <ENTER> C-u 50 <F4> avrà inizio alle 100 e terminano alle 149
• C-x C-k C-f %03d <ENTER> <F3> <F3> . <ENTER> <F4> si bloccherà con zero come "000"

fonte: sezione Keyboard Macro Counter nel manuale Emacs.

Answer 9

È possibile utilizzare shell-command-on-region altrimenti:

C-u M-! seq 1 100|xargs -I{} echo {}"." 

Answer 10

Ecco un semplice defun per questo:

(defun insert-range (START END &optional STEP FORMAT) 
    "Inserts a range of integers from START to END with STEP (default to 1) 
in a given format (default to \"\\n%d\")" 
    (interactive 
    (list (read-number "Start: " 1) 
     (read-number "End: " 10) 
     (read-number "Step: " 1) 
     (read-string "Format (default to \"\\n%d\"): " nil nil "\n%d"))) 
    (dotimes (i (1+ (/ (- END START) STEP))) 
    (insert (format FORMAT (+ START (* i STEP)))) 
) 
)